|
Esta sección te permite ver todos los posts escritos por este usuario. Ten en cuenta que sólo puedes ver los posts escritos en zonas a las que tienes acceso en este momento.
Mensajes - José D
1
« en: Miércoles 16 de Abril de 2003, 02:04 »
 Ok, no hay problema, libero al servidor de solocodigo del hospedaje del Avatar que uso y lo pongo en el servidor FTP. El Avatar que muestra (el cual es el mismo) lo toma del FTP así que si lo desea, puede quitarlo del servidor de solocodigo.
2
« en: Miércoles 16 de Abril de 2003, 00:29 »
Gerard está de vacaciones por esta semana, lo menciono por si vez que no recibes respuestas sobre el Avatar, pero de seguro podrá chequear su correo en donde se encuentre.
Pero también puedes enviarle la imagen del Avatar a Solocodigo, eso fue lo que yo hice con la mía. Lo bueno es que solocodigo te la ajusta en tamaño para el Avatar ya que el que yo tengo es algo más grande pero solocodigo la ajustó.
Puedes enviarsela a solocodigo o en caso de que sea tardio, enviarlema a mi y yo la puedo subir al FTP.
Pondré una información en tu bandeja U2U para que te pongas en contacto con solocodigo o conmigo y así subir el Avatar, bueno.
3
« en: Martes 15 de Abril de 2003, 15:37 »
 Si, aquí está: Private Declare Function ExitWindowsEx& Lib "user32" (ByVal uFlags&, ByVal dwReserved&) Dim i As Integer Private Sub Commad1_Click() If Option1.Value = True Then i = ExitWindowsEx(1, 0&) 'Apaga el equipo End If If Option2.Value = True Then i = ExitWindowsEx(2, 0&) 'Reinicia el Sistema End If If Option3.Value = True Then i = ExitWindowsEx(0, 0&) 'iniciar Windows con nuevo usuario End If End Sub
Eso lo tengo en un Formulario con OptionButton igual como la ventanita de Windows que pide a escoger, no sé cómo deseas aplicarlo en tu caso. PD: Parece que las caritas hacen de las suyas:D en esa parte es & )
4
« en: Lunes 14 de Abril de 2003, 17:27 »
Normalmente cuando haces un ejecutable, el programa tendrá el Icono del Form Principal del Proyecto. Si tienes varios Formularios con distintos Iconos, también puedes hacer esto por el menú Proyectos - Propiedades del Proyecto. En la pestaña Generar puedes cambiar el Icono que representara a la aplicación, escogiendo el Icono de cualquiera de los Form del proyecto (en caso de ser diferentes)  Iconos y Cursores http://www.lawebdelprogramador.com/icocur.phpAquí tienes Iconos y Cursores Clásificados por orden, al final de la lista están los iconos XP.  Aquí los AVI XP http://www.vbavi.craigmellon.co.uk/default.aspSi deseas mostrar una pequeña ventana en forma Model que muestre el proceso de borrar un registro de la BD, por ejemplo: el papelito saliendo de la carpetica y pasando a la papelera o pasando a borrarse sin pasar a la papelera, con el control Animation podrás hacerlo y con un Timer cerrar la ventana modal antes que el AVI se vuelva a repetir o pararlo con la propiedad del mismo Animation. Sobre los gif, lo dificil sería usarlo para los botones porque hasta guardar en una carpeta los Emoticon es sencillo, pero usarlos en un control que no lo soporta o no trae dicha propiedad es lo complicado. Para distribución de tu aplicación, un EXE no sirve porque no posee lo que necesita en caso de pasarlo a otros PCs, tienes que empaquetar las dll y ocx que necesita para funcionar, incluso la bd. Sobre el Instalador, tienes a la mano el Asistente de Empaquetado y Distribución del Microsoft Visual Studio el cual lo tienes en las Herramientas del Visual Studio no del VB y es muy fácil de usar, él te adjuntara las dependencias de tu programa y el asistente muestra las opciones de empaquetado que dispone, no es nada complejo. Por otro lado, tienes otros empaquetadores que podrían ser mejores, como el Setup Factory, el cual puedes conseguir en la web. Ya que además de evitar problemas con la distribución, en ocasiones se busca algo más compacto para distribución cuando el instalador llega pesar mucho.
5
« en: Lunes 14 de Abril de 2003, 17:05 »
 Bien, así lo haré.
6
« en: Domingo 13 de Abril de 2003, 22:56 »
Hola muchachos. Conoce alguien un muy buen manual sobre el uso del Microsoft Help Workshop, que por favor no sea este: http://jl_manuales.galeon.com/tutores/h ... mlhelp.htmEn la web del Guille tampoco encontré algo que me dejara satisfecho para esto. Yo estoy viendo este  Tutorial: http://www.iespana.es/solocodigo/HELP_WORKSHOP.DOCEs un tutorial de LWP hecho por el mismo Xavi Vila (el webMaster de LWP) y como veran, esta bien aunque un poco incomo de aplicar. Excluyendo el del primer link, y teniendo como único a la mano el del segundo link Tendría alguien otra forma de hacer una Ayuda con el Microsoft Help Workshop ya que sé que se hace de varias formas (lo cual he visto) pero no conozco los pasos para hacerlo de otra forma. Quien ya haya trabajado con el Help Workshop que por favor me indique el link de un tutorial o ejemplo que tenga disponible. Preferiblemente un tutorial en vez de un ejemplo hecho, sino, pues lo segundo entonces. Bien, que la pasen bien, nos vemos.
7
« en: Domingo 13 de Abril de 2003, 21:12 »
Tengo un datareport
Hasta ahí todo bien... y en ese pongo los RptTextBox
Y eso para qué? pero si en la bd hay 50 registros, ese se repite 50
Esa parte no la entiendo? Yo solo queria que me imprimiera una sola vez
¿Y cuántas veces imprime? en un formulario estoy con el cliente 24, pulso Imprimir y me sale el datareport, pero solo con todos los datos de ese cliente
El DataReport sacando todos los datos de ese registro, eso es normal. cuando dices con "pero con sólo todos los datos del cliente 24? entonces ¿qué se supone que debe de salir?
8
« en: Domingo 13 de Abril de 2003, 21:03 »
¡Claro! misterwilliam, Gerard terminará de acomodarlo luego de semana Santa al regresar de unas vacaciones, en todo caso, está en pie la idea de poder ayudar todos los que lo deseen para tenerlo listo y funcionando a todo dar para la comunidad ententera de la web.
9
« en: Domingo 13 de Abril de 2003, 20:59 »
Bueno, en verdad esto no es nada elegante y creo que menos de que sirva, ya que aunque se asemeja a la idea (la cual es muy buena debo decir) creo que este ocx no sirve para lo que se tiene pensado.
Si pones el OCX Marchoso encima del CommandButton, y en el Load del Form cargas al OCX así:
Marchoso1.FineName= "C:RutaArchivo.gif" entonces se cargará el gif "animandose claro" encima del CommanbButton, el problema es que si el Gif tiene a su alrededor un entorno Blanco, pues no se vería bien en el Command que es gris. Otro problema con eso es que se tiene que agrandar el CommandButton para que el gif (el ocx marchoso) no tape el Caption del CommandButton. Y una última cosa es que el ocx marchoso no tiene evento Click, por lo que si se pulsa el CommandButton sobre el ocx Marchoso (el que muestra al gif animado) no se estaría ejecutando el Evento del CommandButton ¡desde luego!.
En internet se encuentra muy fácil y rápidamente a dicho ocx, pero al probarlo te fijarás que no es tan agradable su uso para esto como lo menciono.
PD: Ese Gif que indicas HurryCrack no sé cuál es, busqué pero no encontré notas de Gerard sobre eso, solo uno pero que no tiene ningún Gif, ¿podrías poner el link directo a ver? al menos yo no lo conseguí.
10
« en: Domingo 13 de Abril de 2003, 20:52 »
 Gracias muchachos, ya está.
11
« en: Domingo 13 de Abril de 2003, 20:50 »
Si a la propiedad ControlBox del Form la pones a False, el Formulario no mostrará ninguno de sus botones por lo que no se podrá cerrar el Formulario Por otro lado: Este código es para que al pulsar la X del Formulario, no se cierre: Private Sub Form_QueryUnload(Cancel As Integer, UnloadMode As Integer) If UnloadMode = vbFormControlMenu Then Cancel = True End If End Sub
12
« en: Viernes 11 de Abril de 2003, 04:31 »
 ¿Cómo logras que VB acepte en Referencias la extensión .old si esta no aparece como opción de adquisición?
13
« en: Jueves 10 de Abril de 2003, 17:35 »
Lo digo porque hace como un año al tener instalado una distribución de Linux, no me conectaba nunca a internet, me recorrí todo un centro comercial hasta que la gente representante de Linux con quienes acudí me indicaron que era porque el Sistema no admitia el hardware, Linux es muy celoso o no tan compatible con todo (cosa que se sabe), tengo un HSP56 MicroModem y la única solución era comprarme uno nuevo si es que quería conectarme a internet con Linux  Chequea el tipo de modem que tienes y contacta con la sede de Linux que tengas más cerca  y averigua si tu modem es acto para Linux o en la Web Representantes de Linux de tu país y enviales un correo  y así vas eliminando cabos sueltos y descartas esa posibilidad, que ojala  no sea un winmodem y tengas que comprar otro modem, sino poder utilizar el que tienes.
15
« en: Jueves 10 de Abril de 2003, 16:12 »
Recuerden que solocodigo indica que es mejor volver a editar la nota en vez de escribir una nueva, en caso de olvidar o agregar algun detalle que no se comentó en la nota inicial. Aunque si la nota que se ha publicado se modifica luego de un buen tiempo, entonces, en ese caso, si podría ser necesario agregar una nueva nota que complete la información de la primera porque se pensaría que el usuario ya ha leido la nota y no sabría del nuevo agregado y así sabría que hay algo nuevo. Pero de 13:50 a 13:53 solo son 3 minutos de diferencia, en ese caso, para un agregado inmediato luego de publicar la nota, es aconsejable indicar lo nuevo en la misma nota ya iniciada. Recomendaciones de solocodigo: http://www.indomito.net/~solocodi/foros ... php?tid=20
16
« en: Jueves 10 de Abril de 2003, 01:45 »
:excl: Esta muy bien...Cuando tengas los mapas o escenarios del juego, ojala y puedas postear algunas imagenes para ver cómo te va quedando ya que de aquí a un año, al menos ver algo del desarrollo y así se sume alguna otra persona que tenga algo bajo la manga y se sienta orgulloso de mostrar su esfuerzo ya que los juegos toman tiempo. Así ya se podría opinar de cosas que no sean comentarios, sino "hechos" para opinar sobre el Render de la imagen, texturas e iluminación y ambiente. :excl: Se me ocurre algo a ver si les parece interesante:Para no dejar a nadie por fuera, también personas que no programen juegos, podrían aportar sus ideas para los que si lo hacen. ¿Cómo? pues facil... Posteando sus StoryBoard aquí mismo en el Foro, ya que un juego se basa en una Historia, y así incluso personas que manejan PhotoShop podrían postear sus trabajos 2D o 3D en varios angulos y así los diseñadores puedan tomar como molde la idea del trabajo 2D y hacer sus 3D. Pero esta web se conoce como solocodigo.com y el Foro como Programación de Video Juegos y de seguro al webMaster solocodigo no le parezca que esto entre en el perfil de la web  (lo de postear diseños gráficos) tal vez los gráficos de un juego "programado" y más favorable para la web, "código". Por eso no sabría si eso llegase a funcionar. Podrían ser desde juegos sencillos como los conocidos, Tetris, 3 en Raya etc... o "mejor aun" juegos 3D. Los foros más activos son los siguientes (en ese orden): VB, C/C++ y no sé cuál es el tercero, pero si esto llegase a funcionar, se estaria rescatando otro Foro inactivo y esperando en el futuro que los demás foros inactivos comiencen a mostrar actividad, verdad? En problema con los Poster sería su tamaño que no exceda de 64k o subirlos al servidor FTP y jalarse el link desde aquí, eso hacen otros lugares para no almacenar archivos pesados y hacer al servidor más flexible para los usuaros. Bueno, ahí les dejo la idea.
17
« en: Jueves 10 de Abril de 2003, 01:23 »
Si, tienes a tu alcance muchos manuales de VB en muchas web. En La Web del Programador hay muchos. http://www.lawebdelprogramador.com/curs ... sual+BasicPuedes bajar los de Carlos Peralta el cual tienes a la vista en la lista del primer link que te muestro, pero igual, este es el link directo para ver el Curso Teorico y práctico dividido en 7 capitulos en documento word, va lo básico a lo medio, ideal para quien se inicia en VB. Curso Teorico y Práctico de Carlos Peralta. http://www.lawebdelprogramador.com/cursos/vb/index2.phpPuedes escoger otros tutoriales de la lista del primer link luego de ver los ya comentados. Pero esos capitulos no abarcan en lo que respecta a Bases de Datos, tengo otros dos de Carlos Peralta que no están en LWP (no los he visto ahí) pero pesan mucho, cuando pueda subirlos al servidor FTP te pondré el link para que los bajes, mientras puedes irte acondicionado con lo ya mencionado.
18
« en: Jueves 10 de Abril de 2003, 01:11 »
Yo Tenia Un problema Similar, pero con una base de datos access 2000, actualmente utilizo DAO con Access 2000, solo hay que reemplazar unos archivos dll, te anexo los archivos son 3, debes de buscarlos (regularmente estan en c:%Windir%System32) les replazas la extenciòn con .old y copias los nuevos archivos a esta carpeta.
Una duda:  Dices que has usado DAO con Access2000 y que sólo cambiaste la extensión de archivo .dll a .old pero ¿son .old o .olb? Lo digo porque VB sólo muestra las extensiones: *.olb, *.tlb, *.dll (para Referencia) VB no me acepta los archivos ni con .old ni con .olb Y en mi caso, es System en vez de System32 ya que en System32 no tengo ningún tipo de archivos dll, old o olb ni ocx Cambién la extensión como indicas, lo copié a C:windowsSystem y VB no me los acepta. ¿¿hay que registrarlos?? porque fuese o no el caso, de todas formas no me deja registrarlos no lo acepta. Podrían aclarar eso, por favor.
19
« en: Miércoles 9 de Abril de 2003, 17:45 »
20
« en: Miércoles 9 de Abril de 2003, 17:06 »
Al parecer el que buscas para VC no te sirvió o no encontraste lo que buscabas, el Paint hecho en VB lo subí al FTP pero no es proporcionado por mi, sino por el usuario Gerard, lo pongo ahí porque como sabes, solo se permite adjuntar a la nota 64k y el arhivo zip pesa mucho más, si te llega a servir, dale las gracias a Gerard que es quien lo consiguió. http://www.iespana.es/solocodigo/Editordecomicos.zip
21
« en: Martes 8 de Abril de 2003, 19:12 »
Perdon pero lo anterior lo escribí de memoria y da error al usarlo tal cual como aparece, no edito la nota anterior porque entonces cómo se sabría del cambio, a ver si así, se vuelve a ver esto. [b]1. [u]Busca al inicio del string la palabra indicada en la SQL:[/u][/b] Select * From Producto Where Descripcion Like 'Plastico%' [b]2. [u]Busca al final del string la palabra indicada en la SQL:[/u][/b] Select * From Producto Where Descripcion Like '%Plastico' [b]3. [u]Busca todos los registros que contengan en cualquier parte la palabra indicada en la SQL:[/u][/b] Select * From Producto Where Descripcion Like '%Plastico%'
Esto lo probé en el VisData del VB, con una tabla llamada Producto apuntando al campo Descripcion y buscando la palabra Plastico (no uso acentos en código) La primera SQL sólo me mostraba los registros que tenian dicha palabra al inicio de todo el string. La segunda solo los que la tenían al final del string y la última, todas las que tenían la palabra, de 10 registros sólo 2 no tenían la palabra, la consulta SQL no sacó a la vista los dos registros que no tenían la palabra.  Espero que les funcione igual a todos los demás, que lo prueben y cualquier cosa avisen por aquí bien.
22
« en: Martes 8 de Abril de 2003, 16:55 »
Hay yo solo lo he hecho una vez y de forma más corta, es decir, no con este código que pongo aquí sino con algo más corto pero no recuerdo bien como es, y fijate que no consigo el proyecto porque tengo el disco duro algo regado:D [b]Api:[/b] Private Declare Function GetVolumeInformation& Lib "kernel32" Alias "GetVolumeInformationA" (ByVal lpRootPathName As String, ByVal pVolumeNameBuffer As String, ByVal nVolumeNameSize As Long, lpVolumeSerialNumber As Long, lpMaximumComponentLength As Long, lpFileSystemFlags As Long, ByVal lpFileSystemNameBuffer As String, ByVal nFileSystemNameSize As Long) [b]Y esto lo pones donde vas a llamar esa información:[/b] Dim cad1 As String * 256 Dim cad2 As String * 256 Dim numSerie As Long Dim longitud As Long Dim flag As Long Unidad = "C:" Call GetVolumeInformation(Unidad, cad1, 256, numSerie, longitud, flag, cad2, 256) MsgBox "Numero de Serie de la unidad " & Unidad & " = " & numSerie
Esto sirve para evitar que se cargue el software en PC de los "amigos de lo ajeno" (pero el ejecutable claro) con una sentencia If comparas el serial del discho duro del PC en donde reside el software, y si no es igual a uno indicado, pues que se descargue de memoria y ya:D Algo así como un AntiCopy
23
« en: Lunes 7 de Abril de 2003, 21:39 »
He entrado al chat y he salido de él y he actualizado varias veces la web y sigue indicando que el usuario está en el chat.
Eso explica la razón por la que en ocasiones hay alguien en el chat y al entrar "casualidad" que esa persona se va, indicando el chat que hay 0 usuarios.
Al parecer siempre había 0 usuarios, la persona que estuvo antes, se marcha pero el aviso de chat sigue indicando que dicha persona(s) está en el chat lo cual no es cierto.
Solo actualiza cuando se vuelve a entrar al chat, pero ni actualizando la web, ni cerrando y volviendo a abrir el navegador, no lo actualiza. Y al parecer es igual para cualquier otro expectador.
Fuera de eso, la web "al parecer" (digo al parecer no sea que hable muy prontamente, y ver en varios días si sigue estando bien lo últimamente arreglado) ya no tiene ningún problema, faltando entonces sólo el detalle de la actualización del chat.
24
« en: Lunes 7 de Abril de 2003, 21:15 »
Me gusta la forma indicada anteriormente, yo lo he probado, pero así:
select * from Tabla where Campo like N'%Palabra%' select * from Tabla where Campo like N'Palabra%' select * from Tabla where Campo like N%Palabra'
La primera opcion, busca en medio de una cadena, la segunda que empiece con esa palabra, y la tercera, que termine con la palabra a buscar.
25
« en: Lunes 7 de Abril de 2003, 20:00 »
Para compactar una BD lo tengo pero en ADO no en DAO, mira a ver si esto te pueda servir: (perteneciente a AMB Software) [b]Mediante este código lograremos compactar una base de datos de Microsoft Access.[/b] Public Function compactDB(ByVal SOUR_path As String, ByVal DEST_path As String) As Boolean On Error GoTo Err_compact Private JRO As New JRO.JetEngine Private DB_sour As String, DB_dest As String DoEvents DB_sour = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & SOUR_path DB_dest = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & DEST_path & " ;Jet OLEDB:Engine Type=5" JRO.CompactDatabase DB_sour, DB_dest compactDB = True Exit Function Err_compact: compactDB = False MsgBox Err.Description, vbExclamation End Function
|
|
|