|
|
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 - observador
26
« en: Viernes 13 de Junio de 2003, 06:15 »
Lo que sucede es que ese codigo no funciona para WinNT, Win200 o WinXP, si no mal recuerdo solo funciona para Win98 y/o Win95... Visiten el foro que esta en: http://programador.foro.st
27
« en: Lunes 9 de Junio de 2003, 13:24 »
Bien... eso lo puedes solucionar al compartir tu codigo en dos o mas archivos... Por ejemplo si en tu programa utilizas funciones que sean para el uso y manejo de archivos, deberias colocarlas en un archivo aparte y luego utilzar la directiva #include para juntarlo en tiempo de compilacion... El caso en que tu codigo lo dividas en modulos independientes para que no llegues al limite de 64kb del segmento de memoria por modulo... ademas que esto puede hacer mas legible tu codigo... Visita el foro de: http://programador.foro.stHasta pronto...
28
« en: Viernes 30 de Mayo de 2003, 06:37 »
Ok... Es agradable saberlo... y recuerda, "Nunca es tarde mientras existas..."Por cierto... si visitan el foro que está en: http://programador.foro.st/no me enojo...  Saludos y hasta pronto...
29
« en: Jueves 29 de Mayo de 2003, 10:43 »
Que tal FREMEPA... una pregunta ¿eres tu el FREMEPA que se registro el miercoles 28 de mayo (Ayer) a las 01:55 en el foro: programador.foro.st ? Si la respuesta es afirmativa pues no te alarmes mucho, el codigo del que hablan aqui en estos post esta en ese foro asi que allá lo puedes descargar... y probarlo... Y si no eres tu el FREMEPA de allá, pues no lo podras descargar, te tendras que registrar para poder descargarlo, pero creo que si eres el que se registro allá... asi que ya puedes tener acceso al codigo... Por si las moscas aqui les dejo el link: http://miarroba.com/foros/ver.php?foroid=121634y el post se titula: Una de iconos Por cierto... Saludos hasta Perú... 
30
« en: Jueves 29 de Mayo de 2003, 06:18 »
Gracias? Ok... PD. Yo soy el autor:P  Hasta pronto
32
« en: Sábado 17 de Mayo de 2003, 09:51 »
Bien... No hay problema... lo que pasa es que apenas 2 dias antes de que tu subieras el codigo yo lo habia borrado con todo y mesaje... como nadie dijo nada... pense que a nadie le habia interesado... aunque si me di cuenta de que varios descargaron el adjunto... Y es que como ya se ha comentado antes, es agradable saber si las respuesta que se dan son utiles o no... Ademas, personalmente, me motiva a continuar respondiendo, pero como no se obtiene señal de ser util... pues por eso... Bueno... aunque creo que si me exalte un poco... pero ahi esta, a ver si a ti si te comentan algo... Hasta pronto....
33
« en: Sábado 17 de Mayo de 2003, 09:41 »
Bien... para eso tienes que cambiarle los atributos al archivo (por ejemplo desde en Explorador de Windows), les colocas la propiedad de solo lectura a los archivos en cuestion y ya... Asi cuando habras el proyecto veras que los form tienen el candadito que dices...
34
« en: Viernes 16 de Mayo de 2003, 05:15 »
Bien... Ese codigo (*.*) es mio, yo lo habia subido aqui antes, pero como nadie dice nada... pues lo quite...  ¿Que te digan que tal? Pues muy bien si es mio, no te digo pues...  
35
« en: Miércoles 14 de Mayo de 2003, 04:34 »
Bien... es facil, visual basic cuenta con una funcion llamada Command, la cual te devuelve los argumentos que fueron pasados a la aplicacion... Mira la respuesta completa, con codigo te la subi a la siguiente direccion: http://www.gratisweb.com/puntovisualbas ... andos.htmlChecala y cualquier duda acerca del codigo que te muestro pues hazmela saber... Espero te sea util...Hasta pronto...
36
« en: Martes 13 de Mayo de 2003, 06:37 »
Bien... Mira no es muy dificil lograr lo que dices, se trata de separar las lineas en donde se encuentren retornos de carro (ENTER), he ir sumando (o multiplicando) los valores obtenidos de dicha linea... Mira la respuesta te la subi a la siguiente direccion: http://www.gratisweb.com/puntovisualbas ... linea.htmlbueno... es solo para darle mejor presentacion... pero alli esta... Cualquier duda sobre el codigo que te muestro no dudes en hacerla... Bye.... Hasta pronto.... 
37
« en: Martes 13 de Mayo de 2003, 05:04 »
Bien... aqui esta el codigo que te permite tverificar si el mismo programa ya esta ejecutandose... y si es asi, ya no permitir ejecutar otra instancia... Copealo y pegalo en la seccion (General) (Declaraciones) de un formulario... Private Sub Form_Load() If App.PrevInstance Then MsgBox "Este programa [" & App.EXEName & ".exe]" & " ya está en ejecución", vbInformation, "Aplicación." End 'Terminar esta instancia End If End Sub Para probarlo, crea el ejecutable y luego desde el explorador dale doble clik, cuando ya este en ejecucion vuelve a darle doble click al archivo y observa lo que pasa... Bueno... espero te sea util... (Probado en VB5)
38
« en: Viernes 9 de Mayo de 2003, 15:06 »
Bien... eso que tu quieres se puede hacer con la funcion InStr... Aqui esta un codigo de ejemplo... para usarlo crea un nuevo proyecto Exe estandar, insertale un control CommandButton, copea el siguiente codigo y pegalo en la seccion (General) (Declaraciones) del Form... ejecutalo... Private Sub Command1_Click() Dim Caracter As String Dim Cadena As String Dim PosicionDeCaracter As Integer Cadena = "Esta es la cadena Donde buscaras un caracter" Caracter = "d" 'Buscar este caracter, puede ser otra cadena tambien como "donde" 'Una comparación textual que comienza en la posición 1 PosicionDeCaracter = InStr(1, Cadena, Caracter, vbTextCompare) MsgBox "El caracter ""d"" esta en la posicion: " & PosicionDeCaracter, vbInformation Caracter = "Donde" 'Busca esta cadena 'Una comparación binaria que comienza en la posición 5 PosicionDeCaracter = InStr(5, Cadena, Caracter, vbBinaryCompare) MsgBox "La cadena ""Donde"" esta en la posicion: " & PosicionDeCaracter, vbInformation Caracter = "z" 'Buscar este caracter 'Una comparación textual que comienza en la posición 2 PosicionDeCaracter = InStr(2, Cadena, Caracter, vbTextCompare) MsgBox "El caracter ""z"" esta en la posicion: " & PosicionDeCaracter, vbInformation 'Como no esta devuelve 0 (Cero) End Sub Bien... pues ahi esta... es todo tuyo.... (Probado en VB5)... Bye...
39
« en: Viernes 9 de Mayo de 2003, 07:17 »
Bien... Eso lo puedes solucionar con el Block de notas...
Mira... Ejecuta la utilidad Block de notas que viene con windows, Ve al menu Archivo y selecionan Abrir, busca el directorio donde este el proyecto y cuando lo encuentres, en la opcion Tipo del Cuadro de dialogo Abrir, selecionan la opcion "Todos los archivos", ahora busca es esa carpeta el archivo de proyecto (que tiene extension .vbp), seleccionalo y abrelo... Hecho esto veras algo asi como lo siguiente:
Type=Exe
Reference=*G{00020430-0000-0000-C000-000000000046}#2.0#0#C:WINDOWSSystem32stdole2.tlb#OLE Automation
Object={248DD890-BB45-11CF-9ABC-0080C7E7B78D}#1.0#0; MSWINSCK.OCX
Module=mdlMD5; mdlMD5.bas
Object={831FDD16-0C5C-11D2-A9FC-0000F8754DA1}#2.0#0; MSCOMCTL.OCX
Object={3B7C8863-D78F-101B-B9B5-04021C009402}#1.2#0; RICHTX32.OCX
Form=frmDebug.frm
Form=frmOptions.frm
Form=frmIM.frm
Module=mdlAMSN; mdlAMSN.bas
Form=frmMain.frm
Form=Form1.frm
Form=frmLogin.frm
Object={F9043C88-F6F2-101A-A3C9-08002B2F49FB}#1.2#0; comdlg32.ocx
Form=popup.frm
Form=frmAddContact.frm
Form=frmAbout.frm
Module=Tray; tray.bas
Form=frmSkin.frm
Module=mdlFunctions; mdlFunctions.bas
IconForm="frmMain"
Startup="frmLogin"
HelpFile=""
Title="Rhubarb1"
ExeName32="MSN.exe"
Command32=""
Name="Rhubarb1"
HelpContextID="0"
CompatibleMode="0"
MajorVer=0
MinorVer=30
RevisionVer=0
AutoIncrementVer=0
ServerSupportFiles=0
VersionComments="0.30.030403-0901"
VersionCompanyName="Project Rhubarb"
VersionFileDescription="MSN Instant Messaging Client"
VersionLegalCopyright="Open Source Software"
VersionLegalTrademarks="Open Source Software"
VersionProductName="AMSN"
CompilationType=-1
OptimizationType=1
FavorPentiumPro(tm)=0
CodeViewDebugInfo=0
NoAliasing=0
BoundsCheck=0
OverflowCheck=0
FlPointCheck=0
FDIVCheck=0
UnroundedFP=0
StartMode=0
Unattended=0
Retained=0
ThreadPerObject=0
MaxNumberOfThreads=1
DebugStartupOption=0
[MS Transaction Server]
AutoRefresh=1
¿Ya hubicaste (viste) donde esta la linea que dice "Retained=0"? Sino buscala, casi siempre estara cerca del final...
Ahora selecionala y borrala, elimina tambien el retorno de carro, quedara algo asi como:
Type=Exe
Reference=*G{00020430-0000-0000-C000-000000000046}#2.0#0#C:WINDOWSSystem32stdole2.tlb#OLE Automation
Object={248DD890-BB45-11CF-9ABC-0080C7E7B78D}#1.0#0; MSWINSCK.OCX
Module=mdlMD5; mdlMD5.bas
Object={831FDD16-0C5C-11D2-A9FC-0000F8754DA1}#2.0#0; MSCOMCTL.OCX
Object={3B7C8863-D78F-101B-B9B5-04021C009402}#1.2#0; RICHTX32.OCX
Form=frmDebug.frm
Form=frmOptions.frm
Form=frmIM.frm
Module=mdlAMSN; mdlAMSN.bas
Form=frmMain.frm
Form=Form1.frm
Form=frmLogin.frm
Object={F9043C88-F6F2-101A-A3C9-08002B2F49FB}#1.2#0; comdlg32.ocx
Form=popup.frm
Form=frmAddContact.frm
Form=frmAbout.frm
Module=Tray; tray.bas
Form=frmSkin.frm
Module=mdlFunctions; mdlFunctions.bas
IconForm="frmMain"
Startup="frmLogin"
HelpFile=""
Title="Rhubarb1"
ExeName32="MSN.exe"
Command32=""
Name="Rhubarb1"
HelpContextID="0"
CompatibleMode="0"
MajorVer=0
MinorVer=30
RevisionVer=0
AutoIncrementVer=0
ServerSupportFiles=0
VersionComments="0.30.030403-0901"
VersionCompanyName="Project Rhubarb"
VersionFileDescription="MSN Instant Messaging Client"
VersionLegalCopyright="Open Source Software"
VersionLegalTrademarks="Open Source Software"
VersionProductName="AMSN"
CompilationType=-1
OptimizationType=1
FavorPentiumPro(tm)=0
CodeViewDebugInfo=0
NoAliasing=0
BoundsCheck=0
OverflowCheck=0
FlPointCheck=0
FDIVCheck=0
UnroundedFP=0
StartMode=0
Unattended=0
ThreadPerObject=0
MaxNumberOfThreads=1
DebugStartupOption=0
[MS Transaction Server]
AutoRefresh=1
Observa que ya no esta la linea... ni tampoco el retorno de carro....
Ahora guarda los cambios...
Cierra el block de notas... y vuelve a abrir el proyecto desde VB o dandole doble click en el Explorador de Windows... y listo, ahora ya no te dice que la clave "Retained" no es valida...
Esta linea la agrega VB6, eso hace que versiones anteriores de VB no la reconoscan, pero en este caso Retained no es critica para el funcionamiento... asi que puedes eliminarla....
Espero haberme explicado bien... y si no haganmelo saber y tratare de ejemplificarlo mejor...
Bye....
40
« en: Lunes 5 de Mayo de 2003, 20:34 »
Se puede, es utilizando una API, ShellExecute, con esta funcion puedes ejecutar cualquier cosa que este en la maquina o en la red local o incluso abrir una pagina de Internet... Inserta un control CommandButton en el formularios, copea el siguiente codigo en (General) (Declaraciones) de un formulario y sustituye el valor de la variable Archivo por el nombre del archivo, incluye la ruta del archivo si es necesario... y ejecutalo... Private Declare Function ShellExecute Lib "shell32.dll" Alias "ShellExecuteA" (ByVal hwnd As Long, ByVal lpOperation As String, ByVal lpFile As String, ByVal lpParameters As String, ByVal lpDirectory As String, ByVal nShowCmd As Long) As Long Dim Archivo As String Private Sub Command1_Click() 'Si el archivo esta el el directorio de trabajo 'solo es necesario indicarle el nombre del archivo 'Ejemplo: "basededatos.mdb" 'Si el archivo no esta el el directorio de trabajo 'entonces argumento Archivo deve incluir la ruta completa 'Ejemplo: "C:basededatos.mdb" Archivo = "C:basededatos.mdb" ShellExecute 0, "Open", Archivo, "", "", vbNormalFocus End Sub Con este codigo le indicas al SO que te abra el archivo con el programa configurado para ello (que en este caso supongo que debe ser Access)... y listo...
41
« en: Lunes 5 de Mayo de 2003, 20:19 »
Bien... Todo tiene solucion... Mira aunque luego prodras ver la imagen alla... por si te urge... pues aqui lo coloca... apenas me acabo de car cuenta de tu mensaje... Si no estas registrado aqui... pues me cuentas alla... Ok? Me cuentas que tal... ------------------------ Ok ahora ya esta agregado eso que dices.... checalo y me dices (Alla) 
42
« en: Lunes 5 de Mayo de 2003, 08:29 »
Bien... Si se puede... pega el siguiente codigo en un proyecto exe estandar, el la seccion (General) (Declaraciones) del form... Ejecutalo y presiona F2 para ver un mensaje o F1 para salir...
Private Sub Form_Load()
Me.KeyPreview = True
End Sub
Private Sub Form_KeyDown(KeyCode As Integer, Shift As Integer)
If KeyCode = vbKeyF1 Then
Unload Me
ElseIf KeyCode = vbKeyF2 Then
MsgBox "Presionaste F2"
End If
End Sub
Como puedes ver... la validacion de las pulsaciones de teclas extendidas se hace en el evento KeyDown...
Bueno... espero y te sea util...
43
« en: Miércoles 12 de Marzo de 2003, 05:40 »
Bien... No entendi muy bien lo que quieres hacer con tu programa...
¿Quieres que solo se vean las areas en donde haya un control? o ¿Quieres areas del formulario que sean visibles aunque no tengan controles?... Pues no entendi...
Pero de todas maneras ahi te va un codigo.. espero que te sea util...
Lo que hace es lo primero... solo presenta como areas visibles donde encuentre un control... pero puede ser modificado facilmente para que se muestren otras areas aunque no alla controles al mismo tiempo...
Fue provado en Visual Basic 5 y Visual Basic 6...
Saludos...
44
« en: Martes 11 de Marzo de 2003, 04:16 »
Bien... Un comentario para los que quieran bajar el zip desde el link que proporciono Gerard...
El link si funciona... pero no dandole click sobre él con el boton primario...
Para que puedan descargar el zip, lo que deben hacer es posicionar el puntero del mouse sobre el link y darle clic con el boton secundario... Aparecera un menu contextual que ya deben conocer...
El en menu que se desplego seleccionen la opcion "Guardar destino como..." y denle clic... ahora esperen a que salga la ventana guardar como y ya...
De esta forma pueden bajar el zip desde el enlace que proporciono Gerard...
Saludos....
45
« en: Sábado 8 de Marzo de 2003, 03:03 »
Oye Astor... eso es mala idea... system no te devolvera la irformacion que requieres... y por tanto nunca sabra el programa que la llamo cuales son los archivos encontrados... Bien... radarman... la respuesta esta en la en las funciones "findfirst" y "findnext" que devuelnen una estructura que contiene informacion de un archivo si este fue encontrado... Ambas trabajan en conjunto.... Una sirve para buscar el primer archivo que cumpla ciertas caracteristicas en el nombre y la extension que se le indique y la otra se encarga de buscar todos los demas archivos que cumplan la misma mascara ya indicada... Anexo un archivo que muestra la forma de trabajar con ambas funciones.... Espero y les sirva.... 
46
« en: Viernes 7 de Marzo de 2003, 12:32 »
Bien... pues lo que quieres hacer depende de los formatos con los que vallas a mostrar tu informacion con el printf....
Puedes indicar cuantos digitos decimales quieres mostrar poniendo poniendo un punto entre el % y la letra que vallas a utilizar para ver el valor nmerico, despues del punto coloca el numero de digitos, fijate en el ejemplo...
Te mando un archivo adjunto que muestra como se veria un mismo numero pero mostrando un numero especifico de digitos despues del punto decimal...
Ojala y te sea util....
47
« en: Viernes 7 de Marzo de 2003, 12:14 »
La solucion que proporciona juank es mas peligrosa que la que originalmente se queria... Si no se le pone un tratamiento a los errores, el programa explota  Si el programa es codificado como dice juank, no se necesitan el control que el menciona... Pero que mas da... creo que la pregunta se refiere a C asi que aqui esta el codigo... y cuando ya no puede escribir mas archivos, te muestra por pantalla el numero de archivos que logro escribir... El codigo utilza la unidad 3 1/2 como se planteo originalmente... no recomiendo cambiarle la unidad sobre la cual se va a escribir los archivos... eso si puede ser peligroso... no... SI ES PELIGROSO... ya que puedes dañar tu HD si es alli donde intentas escribir.... Nota: Al ser usuario de disquet me he dado cuenta de que cuando estas escribiendo demasiados archivos en un solo directorio llega a un limite y el sistema operativo no te permite escribir mas archivos en el... surgen mensajes como "disco lleno" aunque no sea cierto... lo que esta lleno es el area del directorio utilizada para guardar la informacion de los archivos contenidos en él... y eso se resuelve creando otro subdirectorio y comenzando a escribir en el los demas archivos... y ahora ya no te dice nada de disco lleno ni nada.... Esto lo menciono porque a lo mejor al programa no se le permite crear mas archivos, sin que el disco este lleno... yo probe el codigo bajo MS-DOS y lo ejecute por partes... para permitirme salir cuando quisiera... y solo le permiti crear 700 archivos vacios en el HD... pues como no tenia disquet a la mano tenia que probarlo en algo.... Asi que cuando vallan a probar el codigo les recomiendo tener un disquet a la mano... ahi la ven ustedes si quieren correr riesgos.... Alguien tubo una pregunta... yo tengo una respuesta... pero cada quien es responsable de la forma en que usa el codigo adjunto del programa... No me hago reponsabe de el mal uso del codigo fuente. Repito: NO ME HAGO RESPONSABLE DEL MAL USO DEL CODIGO FUENTE...
48
« en: Viernes 7 de Marzo de 2003, 11:12 »
Bien... Supongo que ya has hecho Hiperenlaces a otras paginas... pues tambien podemos realizar Hiperenlaces a un fichero cualquiera... En este caso el navegador intentara ejecutar el archivo y si no puede hacerlo... entonces le preguntara al visitante si desea descargarlo y guardarlo en unidades locales (HD, 3 1/2... etc...) Esta es una forma sencilla de permitir a los visitantes de nuestra pagina que copeen archivos a su computadora... Ejemplo: <A href="archivo.zip">Pulsa aqui para bajarte una copia a tu ordenador</A> Este es codigo de ejempo... en lugar de archivo.zip coloca la ruta real del archivo que quieres que descarguen.... y listo...
49
« en: Viernes 7 de Marzo de 2003, 11:06 »
La forma mas facil de hacer eso que tu dices es utilizando la directiva "bgsound" con sus respectivos parametros...
Aqui envio una pagina sencilla pero que muestra tiene sonido de fondo.... tambien envio el archivo de sonido...
Los archivos contenidos en el zip deben estar juntos...
Pero si la pagina y el archivo de sonido estan en difentes carpetas entonces hay que especificar la ruta en el parametro src...
Bien... pruebalo y espero que despeje tus dudas...
50
« en: Viernes 7 de Marzo de 2003, 10:45 »
Bien... Supongo que ya has hecho Hiperenlaces a otras paginas... pues tambien podemos realizar Hiperenlaces a un fichero cualquiera... En este caso el navegador intentara ejecutar el archivo y si no puede hacerlo... entonces le preguntara al visitante si desea descargarlo y guardarlo en unidades locales (HD, 3 1/2... etc...) Esta es una forma sencilla de permitir a los visitantes de nuestra pagina que copeen archivos a su computadora... Ejemplo: <A href="archivo.zip">Pulsa aqui para bajarte una copia a tu ordenador</A> Este es codigo de ejempo... en lugar de archivo.zip coloca la ruta real del archivo que quieres que descarguen.... y listo...
|
|
|
Mostrar Mensajes
