• Viernes 26 de Abril de 2024, 20:41

Mostrar Mensajes

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 - cpmario

Páginas: [1] 2 3 ... 26
1
Visual Basic 6.0 e inferiores / Re: Instalar VB6 sp5 en Windows 7
« en: Lunes 23 de Mayo de 2011, 20:18 »
El problema se refiere al lenguaje de VB6, si tienes instalado VB6 en inglés debes de instalar el SP6 en inglés, o si es VB6 en español, debes de instalar el SP6 en español.
 :comp:

2
Visual Basic 6.0 e inferiores / Re: Instalar VB6 sp5 en Windows 7
« en: Martes 10 de Mayo de 2011, 21:31 »
Lo que puedo decirte es que desde Win XP virtual puedes acceder a todos los archivos que se encuentren en Win7 y si tienes un programa de VB6 con base de datos Access 97 o 2000, el pro0grama funciona desde WinXP y puede leer datos en cualquier lugar del disco duro.
Por ejemplo tengo un programa que se llama CP Reparaciones y tengo los archivos fuente, el ejecutable y la base de datos Access 2000 en el mismo fólder, el ejecutable del programa puedo arrancarlo desde WinXP o Win7 sin problema.
El fólder que te indico debe estar en un directorio del Win7 y no dentro del WinXP.

Espero haberme explicado y esa información te sirva.
 :comp:

3
Visual Basic 6.0 e inferiores / Re: Instalar VB6 sp5 en Windows 7
« en: Martes 10 de Mayo de 2011, 19:34 »
Te informo que no sé cual sea el error.
Pero, porqué deseas instalar el SP5, el que debes de instalar es el SP6 ya que soluciona algunos errores y puedes además de manejar las Bases de datos de Access 2000.
Te recomiendo mejor instalar el SP 6
Link de descarga en Microsoft   http://www.microsoft.com/downloads/es-e ... 718C7E381D

El VB6 no funciona bien en Win 7 de 64 bit, que es el sistema operativo que tengo.
Lo que actualmente estoy haciendo es que tengo instalado en Win7 (64 bit) el Win XP virtual y dentro de ese Win XP instalé VB6 y todos los controles que tengo, sin problema.

 :comp:

4
Visual Basic 6.0 e inferiores / Re: Solución al error de "No coinciden los tipos" W7 con SP1
« en: Jueves 3 de Marzo de 2011, 19:28 »
Muchas gracias por esa valiosa información.
 :good:

5
Visual Basic 6.0 e inferiores / Re: Instalar VB6 sp5 en Windows 7
« en: Lunes 6 de Septiembre de 2010, 06:50 »
Espero te sirva, ya que quien preguntó, no se dignó a colocar un mensaje. :rolleyes:

Si necesitas más información, por aquí seguimos.  :comp:

6
Visual Basic 6.0 e inferiores / Re: Instalar VB6 sp5 en Windows 7
« en: Jueves 29 de Julio de 2010, 15:10 »
El problema que se tiene en la instalación del VB6 y el service pack 6 en Windows Vista y Win 7 es debido a que los instaladores son de 16 bit.
Te proporciono la información para modificar los archivos del CD-ROM de VB6 para retirar los archivos de 16 bit y hacer la instalación en Win 32 o 64-Bit, (XP, Vista o Win 7)
.
También puede hacerse un DVD con la instalación modificada, con Service Pack 6 y los CDs del MSDN, todo en uno.

----------------------------------
Como instalar VB6 in Win 32 o 64-Bit, (XP, Vista o Win 7)

1. Haga una copia de el CD de instalación del VB en el disco duro.
2. Haga una copia de Setupvb98pro.stf ó setupvs98ent.stf (según la versión de VB que tenga) y nómbrela acmboot.stf
3. Haga una copia de Setupacmsetup.exe y nómbrela acmboot.exe
4. Copie todo el contenido del folder setup al folder previo (donde se encuentra acmboot.exe). Acepte cuando le indique que reemplazará el archivo existente (el archivo acmboot.exe de ese fólder)
5. Active el programa Setup.exe.

Como Instalar el Service Pack 6 de VB
1. Desempaque el archivo que descarga de internet en un fólder.
2. Modifique vb98pro.stf ó vs98ent.stf  (según la versión de VB que tenga) y nómbrela acmsetup.stf
3. Active el programa acmsetup.exe para efectuar la instalación.

Como instalar los CD del MSDN (se requiere un DVD)
1. Haga una copia del CD1 en el disco duro.
2. Haga una copia de setupmsdn98.stf y nómbrela setup.stf
3. Haga una copia de setupacmsetup.exe y nómbrela setup.exe
4. Copie todo el contenido del folder setup al folder previo (donde se encuentra setup.exe). Acepte cuando le indique que reemplazará el archivo existente.
5. Copie del CD2 el archivo MSDN332.inf al directorio raíz del CD1 (donde se encuentra setup.exe)
6. Copie del CD2 todo el contenido del fólder MSDN dentro fólder del mismo nombre del CD1.
7. Active setup.exe
---------------------------------

Está probado en Windows  XP y Win7 de 64 bits, y no hubo problemas para la instalación. No todo funciona al 100%, y Win 7 te indicará que hay problemas de compatibilidad.
Existe otra alternativa que solo sirve en Win 7 Ultimate o empresarial, y es haciendo un Windows XP virtual. Actualmente estoy trabajando con el VB6 de ese modo.

Espero te sirva... No se te olvide comentar si te sirvió.
 
 :comp:

7
Visual Basic 6.0 e inferiores / Re: Escribir caracteres especiales
« en: Sábado 17 de Julio de 2010, 15:28 »
Un control TextBox o un RichTextBox solo muestra signos de interrogación cuando colocas los caracteres que nos muestras, ya que son unicode.
Para mostrar eso caracteres unicode puedes hacer un control de usuario como el ejemplo que existe en el siguiente enlace de PSC

http://www.planet-source-code.com/vb/sc ... 3&lngWId=1

Espero que lo anterior te de una idea de como lograr lo que deseas.

 :comp:

8
Visual Basic 6.0 e inferiores / Re: Crear un notepad
« en: Sábado 17 de Julio de 2010, 15:10 »
Un TextBox solo acepta 32kb de texto, si deseas abrir documentos más grandes debes usar un RichTextBox.
 :comp:

9
Visual Basic 6.0 e inferiores / Re: CUELGUE DEL COMPILADOR
« en: Jueves 8 de Julio de 2010, 01:24 »
La posible causa pudiera ser un archivo del proyecto que esté corrupto. Alguna vez me pasó a mi y lo que recuerdo que hice fue rehacer por completo el proyecto.
Del siguiente modo: hacer un proyecto nuevo en otro fólder agregar todas las referencias de tu proyecto e ir agregando uno por uno las formas, módulos, controles y otros archivos del proyecto antiguo.
Es posible que el error de uno de los archivos se muestre.
Espero te sirva. No se me ocurre que más pudieras hacer.
 :comp:

10
Visual Basic para principiantes / Re: Error de compilacion - funciones left$ y right$
« en: Jueves 21 de Enero de 2010, 16:53 »
Revisa el artículo en la siguiente página:
http://support.microsoft.com/kb/225121/es

 :comp:

11
Visual Basic 6.0 e inferiores / Re: Programa en .exe de visual basic 6?
« en: Martes 1 de Diciembre de 2009, 16:57 »
Poco probable que sea un problema del VB6.
Puede ser debido al antivirus de Symantec.
Revisa el siguiente enlace: http://www.forospyware.com/t180799.html

 :comp:

12
Visual Basic 6.0 e inferiores / Re: programa de archivos en visual basic
« en: Domingo 2 de Agosto de 2009, 00:23 »
Te explicaba que tenías que hacer un texbox en la forma que estás usando.
Citar
Supón que la caja de texto donde escribes el nombre del archivo que deseas buscar se llama txtNombreArchivo entonces escribes en lugar de:
Si no tienes un texbox llamado txtNombreArchivo se mostrará un error como el que dices.
Te recomiendo volver a leer el tutorial que tengas de VB.
 :comp:

13
Visual Basic 6.0 e inferiores / Re: programa de archivos en visual basic
« en: Sábado 1 de Agosto de 2009, 19:33 »
Cambia
Código: Text
  1. If FileExists Then
  2.  

por

Código: Text
  1. If FileExists(strRutaYNombreArchivo) Then
  2.  
:comp:

14
Visual Basic 6.0 e inferiores / Re: programa de archivos en visual basic
« en: Sábado 1 de Agosto de 2009, 01:17 »
Supón que la caja de texto donde escribes el nombre del archivo que deseas buscar se llama txtNombreArchivo entonces escribes en lugar de:

Código: Text
  1. strNombreArchivo = "ALGORITMOS.PDF"
  2.  
Escribes
Código: Text
  1. strNombreArchivo = txtNombreArchivo.Text
  2.  
:comp:

15
Visual Basic 6.0 e inferiores / Re: programa de archivos en visual basic
« en: Viernes 31 de Julio de 2009, 22:41 »
Espero lo siguiente resuelva tu duda.
Código: Text
  1.     Dim strRuta As String
  2.     Dim strNombreArchivo As String
  3.     Dim strRutaYNombreArchivo As String
  4.    
  5.     strRuta = "D:MIS DOCUMENTOSLIBROS" 'Ruta donde tienes los libros
  6.     strNombreArchivo = "ALGORITMOS.PDF"
  7.     strRutaYNombreArchivo = strRuta & strNombreArchivo
  8.     If FileExists Then
  9.         MsgBox "Encontré el archivo", vbExclamation
  10.     Else
  11.         MsgBox "No encontré el archivo", vbExclamation
  12.     End If
  13.  
Código: Text
  1. Public Function FileExists(sFile As String) As Boolean
  2.     ' Tests for file existence
  3.     If sFile = "" Then
  4.         FileExists = False
  5.     End If
  6.     On Error Resume Next
  7.     FileExists = ((GetAttr(sFile) And vbDirectory) = 0)
  8. End Function
  9.  
:comp:

16
Visual Basic 6.0 e inferiores / Re: programa de archivos en visual basic
« en: Viernes 31 de Julio de 2009, 20:48 »
No se entiende lo que deseas. Repite la pregunta y coloca algo de tu código.
 :comp:

17
Visual Basic 6.0 e inferiores / Re: Tengo Problema con Access 2003 y Visual Basic 6.0
« en: Viernes 31 de Julio de 2009, 20:44 »
El problema debe estar en la siguiente instrucción:
Código: Text
  1. !orden = orden + 1
  2.  

El campo es autonúmerico, por lo que no debes modificarlo. Elimina dicha línea.
 :comp:

18
Visual Basic para principiantes / Re: Fallo en cerrar documento de Word desde VB6
« en: Viernes 3 de Julio de 2009, 18:40 »
El comando para cerrar word es:
Código: Text
  1. Word.Application.Quit 
  2.  
:comp:

19
Visual Basic 6.0 e inferiores / Re: Error con LoadPicture
« en: Viernes 5 de Junio de 2009, 20:02 »
Me di a la tarea de instalar el Win98.
No encontré problemas al colocar una imagen el portapapeles.
Pero me di cuenta que te hace falta escribir el comando completo

Tienes:
Código: Text
  1.     Clipboard.SetData Picture1
  2.  
  3.  

Debes tener:
 
Código: Text
  1.    Clipboard.SetData Picture1.Picture
  2.  

Te adjunto un pequeño proyecto que funciona en Win98.
 :comp:

20
Visual Basic 6.0 e inferiores / Re: Error 6: Run Time:Over flow. Alguien se ha tenido con error?
« en: Jueves 4 de Junio de 2009, 23:09 »
Lo "IDEAL" es que tu código maneje todos los posibles errores antes de que se presenten, pero eso no existe en la práctica.
En los programas se coloca manejo de errores, pero solo para manejo de errores inesperados, o en este caso para detectar donde se genera el error.
En un programa es lamentable que termine abruptamente por querer ahorrarse el manejo de errores.
 :brickwall:

21
Visual Basic 6.0 e inferiores / Re: Error 6: Run Time:Over flow. Alguien se ha tenido con error?
« en: Jueves 4 de Junio de 2009, 22:37 »
Para empezar en InnoSetup los archivos del sistema al menos son 9 y se registran así.

Código: Text
  1. [Files]
  2. ; begin VB & system files
  3. Source: "stdole2.tlb";  DestDir: "{sys}"; OnlyBelowVersion: 0,6; Flags: restartreplace uninsneveruninstall sharedfile regtypelib
  4. Source: "msvbvm60.dll"; DestDir: "{sys}"; OnlyBelowVersion: 0,6; Flags: restartreplace uninsneveruninstall sharedfile regserver
  5. Source: "vb6es.dll";    DestDir: "{sys}"; OnlyBelowVersion: 0,6; Flags: restartreplace uninsneveruninstall sharedfile
  6. Source: "oleaut32.dll"; DestDir: "{sys}"; OnlyBelowVersion: 0,6; Flags: restartreplace uninsneveruninstall sharedfile regserver
  7. Source: "olepro32.dll"; DestDir: "{sys}"; OnlyBelowVersion: 0,6; Flags: restartreplace uninsneveruninstall sharedfile regserver
  8. Source: "asycfilt.dll"; DestDir: "{sys}"; OnlyBelowVersion: 0,6; Flags: restartreplace uninsneveruninstall sharedfile
  9. Source: "comcat.dll";   DestDir: "{sys}"; OnlyBelowVersion: 0,6; Flags: restartreplace uninsneveruninstall sharedfile regserver
  10. ; end VB system files  9
  11.  
  12.  

Los OCX se registran así:
Código: Text
  1. Source: COMDLG32.OCX; DestDir: "{sys}"; Flags: sharedfile restartreplace regserver
  2. Source: CMDLGES.DLL; DestDir: "{sys}"; Flags: sharedfile
  3.  
  4.  
Fijate en los Flags.

Pero es poco probable que sean la causa del error que muestras.
Debes de hacer rutinas para manejo de errores y que descubras en que evento o subrutina de genera el error. Esto normalmente de maneja con 'On Error Goto'

 :comp:

22
Visual Basic para principiantes / Re: Utilización de comando TIMER VB6
« en: Jueves 28 de Mayo de 2009, 20:06 »
En una forma coloca un timer con nombre Timer1 y con su propiedad Interval = 1000 y una etiqueta con nombre Label1
Coloca el siguiente código en el evento timer

Código: Text
  1. Private Sub Timer1_Timer()
  2.     Static blnShowLabel As Boolean
  3.     If blnShowLabel Then
  4.         Label1.Visible = True
  5.         blnShowLabel = False
  6.     Else
  7.         Label1.Visible = False
  8.         blnShowLabel = True
  9.     End If
  10.     DoEvents
  11. End Sub
  12.  
Puedes activar o desactivar el Timer con la propiedad enabled

Código: Text
  1.      Timer1.enabled = false
  2.  

 :comp:

23
Visual Basic 6.0 e inferiores / Re: VISUAL BASIC TRANSPARENTE
« en: Viernes 22 de Mayo de 2009, 18:43 »
Con tu explicación y sin código, difícilmente alguien adivinará como ayudarte.

En esta discusión encontrarás 2 maneras de hacer transparente una forma.

viewtopic.php?f=39&t=36727&p=133553&hilit=transparente#p133553

Y si, minúsculas por favor.

 :comp:

24
Bases de Datos / Re: VB6 y Acces2002. Definir tabla a leer en VB6; Error 13
« en: Sábado 25 de Abril de 2009, 21:46 »
Lo que significa el error 13 es que estás tratando de usar una variable de forma incorrecta. Por ejemplo: una variable númerica por una de texto.
Efectúe un copy-paste a una forma en VB y lo primero que noto es que tienes 2 variables no declaradas:
Código: Text
  1. TBL.MoveFirst 'nos posicionamos en el primer registro de la tabla
  2.  
Código: Text
  1. TBL.Close 'cierra tabla
  2.  

Supongo que debe ser TB1 en lugar de TBL

Eso es probable por que no tengas el Option Explicit en la primera línea de la forma. Te sugiero la coloques y revises de nuevo el programa ejecutándolo para que veas que errores te marca.

No encontré otro error.

 :comp:

25
Visual Basic para principiantes / Re: Error al ejecutar un exe
« en: Miércoles 22 de Abril de 2009, 19:47 »
PAra que el programa se ejecute en un equipo que no tenga el VB6 instalado crea un paquete de instalación.
Esta es una explicación de como activar la opción en VB6 para hacer un paquete de instalación.

En VB6 y tu proyecto abierto, localiza en el menú 'Complementos' la opción que se llama 'Administrador de complementos' verás aparecer una ventana con Título 'Administrador de complementos'. Haz un clic en 'Asistente de distribución y empaquetado' y después en el Frame 'Comportamiento de carga' selecciona 'Cargado/Descargado' y 'Cargar al iniciar' y después haz clic en botón 'Aceptar'.
Ahora en el menú 'Complementos' de VB aparece la opción 'Asistente de distribución y empaquetado' con lo que podrás hacer tu instalación, solo sigue las instrucciones.

 :comp:

Páginas: [1] 2 3 ... 26