• Martes 13 de Mayo de 2025, 00:34

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 ... 19 20 [21] 22 23 ... 26
501
Visual Basic 6.0 e inferiores / Re: Empaquetadores
« en: Martes 17 de Mayo de 2005, 23:55 »
Revisé nuevamente lo que preguntas, al parecer el problema es que tomas los archivos de System32
Source: "C:\WINDOWS\system32\...

Te recomiendo que los coloques en otro fólder, lo que yo hago, es hacer una instalación con el empaquetador de VB6 y luego tomo con el Inno Setup los archivos del fólder donde los almacena el empaquetador de VB6.

Tip: para que no repitas el path de los archivos del empaquetador en la sección de Setup de Inno Setup coloca la instrucción SourceDir

Ejemplo:
[Setup]
SourceDir=c:\vb6\incap21\paquete\Support

[Files]
Source: "Crpaig80.dll"; DestDir: "{sys}"; Flags: sharedfile

Te adjunto un ejemplo de un script de InnoSetup versión 5.0.8

:)

502
Visual Basic 6.0 e inferiores / Re: Empaquetadores
« en: Martes 17 de Mayo de 2005, 23:32 »
En mi instalación de Inno Setup están así:

Source: "C:\VB\Incap21\paquete\Support\Crpaig80.dll"; DestDir: "{sys}"; Flags: sharedfile

Elimina "CopyMode: alwaysskipifsameorolder;" y prueba.

 :)

503
Visual Basic 6.0 e inferiores / Re: A Ver Si Alguien Lo Sabe
« en: Sábado 7 de Mayo de 2005, 22:25 »
De los archivos adjuntos, la primera parte y la segunda parte son exactamente iguales. El proyecto está incompleto ya que faltan todos los archivos .frx que son los que tienes las imagenes de las formas.

 :unsure:

504
Visual Basic 6.0 e inferiores / Re: Desaparace Mi Barra De Menus
« en: Sábado 7 de Mayo de 2005, 00:02 »
Hay al menos dos posibles razones, que no sean formas MDI o que la forma MDI y la hija tengan los mismos menús.

 :)

505
Visual Basic 6.0 e inferiores / Re: Carga De Archivos
« en: Viernes 6 de Mayo de 2005, 05:10 »
Encontré un código en la red, que te servirá para lo que deseas. Es muy rápido aún en un disco grande.

 :hola:

506
Visual Basic 6.0 e inferiores / Re: Desaparace Mi Barra De Menus
« en: Viernes 6 de Mayo de 2005, 03:56 »
Te adjunto un proyecto que viene en el MSDN con el VB6, es el MDI
Te dará una mejor idea de como hacer el programa que planeas.

 :)

507
Visual Basic 6.0 e inferiores / Re: Desaparace Mi Barra De Menus
« en: Viernes 6 de Mayo de 2005, 03:33 »
A la forma hija (child) tienes que hacerle un menú igual a la MDI.

 :)

508
Visual Basic 6.0 e inferiores / Re: Archivo Install
« en: Martes 26 de Abril de 2005, 21:43 »
Detalles de instalación.

Algunos archivos debes de agregarlos manualmente durante la creación de la instalación.
La instalación solo agrega el archivo de ayuda, si está definido como tal en propiedades del proyecto. Los demás archivos que uses, por ejemplo: las bases de datos, archivos de texto etc, debes agregarlos manualmente.
En uno de los pasos al crear la instalación viene un botón que dice "Agregar...". Úsalo para añadir todos los archivos que usas, además de el ejecutable y el de ayuda.

 :)

509
Visual Basic 6.0 e inferiores / Re: Archivo Install
« en: Martes 26 de Abril de 2005, 05:38 »
Revisa mi explicación en la siguiente discusión:

http://foros.solocodigo.com/index.php?showtopic=10657&hl=

 :)

510
Visual Basic 6.0 e inferiores / Re: Ayuda Con El Método Addnew
« en: Domingo 17 de Abril de 2005, 07:29 »
En esos tipos de error es difíciles de localizar donde se generan, sería posible que expusieras el código que usas. Para tener una mejor posibilidad de ayudarte.

 :)

511
Visual Basic 6.0 e inferiores / Re: Buscando Un Ocx Para Leer Palabras
« en: Domingo 10 de Abril de 2005, 23:15 »
El Agente de Microsoft sirve para lo que deseas. Puedes añadir rutinas a VB. Hay muchos ejemplos de programas en la red.

El enlace para descarga de los archivos que necesitas están en:

http://www.microsoft.com/msagent/default.asp

También en este enlace puedes descargar todo en un archivo.

http://www.softonic.com/ie/13784

 :)

512
Visual Basic 6.0 e inferiores / Re: 1min De Silencio Por Nuestro Querido Vb
« en: Miércoles 6 de Abril de 2005, 22:22 »
En resumen:
Microsoft deja de dar soporte a VB6

 :(

513
Visual Basic 6.0 e inferiores / Re: 2 Pcs Y Una Base De Datos !
« en: Martes 5 de Abril de 2005, 03:26 »
Visual Basic está diseñado para eso. Solo tendrías problemas al acceder a un mismo registro al mismo tiempo o cuando quieras usar la base de datos de manera exclusiva, por ejemplo al repara la base de datos.

 :)

514
Visual Basic 6.0 e inferiores / Re: Cambiar Resolucion Pantalla En Xp
« en: Domingo 27 de Marzo de 2005, 22:25 »
También puedes revisar mi mensaje en la siguiente discusión del foro:

http://foros.solocodigo.com/index.php?show...t=0&#entry37880

 :)

515
Visual Basic 6.0 e inferiores / Re: Uso Del Combobox Y Base De Datos... Access
« en: Viernes 25 de Marzo de 2005, 16:42 »
Si la base de datos es grande, es más eficiente usar FindFirst

   dim varCod_acc_Usuario as variant
   dim recUSUARIOS as recordset
   dim recNIVEL as recordset

   ' obtener primero el cod_acc del usuario en la variable varCod_acc_Usuario
   '
   recNIVEL.MoveFirst
   recNIVEL.FindFirst "cod_acc = " & varCod_acc_Usuario
   If recNIVEL.NoMatch Then
      MsgBox "No hay nivel de acceso para este usuario"
   Else
      MsgBox "Tipo de acceso:" & recNIVEL("tipo_acc")
   End If

Si cod_acc es númerico no necesita comillas simples en:
   recNIVEL.FindFirst "tipo_acc = " & varCod_acc_Usuario

Pero si es tipo cadena de texto (string) si las necesita.
   recNIVEL.FindFirst "tipo_acc = '" & varCod_acc_Usuario & "'"

 :)

516
Visual Basic 6.0 e inferiores / Re: Mscal.oxc
« en: Viernes 18 de Marzo de 2005, 02:09 »
El control de MSCAL.OCX está diseñado principalmenmte para el Office de Microsoft, así que la referencia en el registro señala al siguiente path C:\Archivos de programa\Microsoft Office\Office
Posiblemente el problema es que hay varias versiones de MSCAL.OCX, una en el path anterior y otras en Windows\System ó Windows\System32
Haz una búsqueda y verifica que sean las mismas versiones en todos los path.
Pero mejor, te sugiero que dejes de usar MSCAL.OCX, ya que solo trae problemas, ya que OFFICE de Microsoft lo repara y como quiera quedas a la larga con versiones diferentes. Algunas veces las instalaciones fallan a pesar de tener la última versión del control. Lo deje de usar por ese motivo. Ahora uso un control de Sheridan.

 :)

517
Visual Basic 6.0 e inferiores / Re: Duda Con Notepad
« en: Viernes 11 de Marzo de 2005, 02:11 »
Debes dimensionar las variables según desees, locales de módulo o públicas.

dim intFreeFile as integer      ' Almacena el siguiente número de archivo disponible
dim gstrFullFilename as string ' Aqui va el nombre de archivo con el path
dim mlngLenFile as long     ' Almacena la longitud del archivo
dim gstrDocument as string   ' Aqui se guarda el archivo completo

Lo único que debes especificar es el nombre del archivo con algo así:
gstrFullFilename ="Mi Archivo.txt"
Y obtendrás en gstrDocument el archivo para manipularlo.

En ayuda de VB están siguientes instrucciones
FreeFile- Devuelve un tipo Integer que indica el siguiente número de archivo disponible para su uso en la instrucción Open.

Close- Termina las operaciones de entrada/salida (E/S) en un archivo abierto con la instrucción Open. Para asegurar que no esté abierto previamente.

Open- Activa operaciones de entrada/salida (E/S) con un archivo.
Sintaxis= Open rutaacceso [For modo] [Access acceso] [bloquear] As
  • númeroarchivo [Len=longitudregistro]


LOF()  Devuelve un tipo Long que indica el tamaño, en bytes, de un archivo abierto mediante la instrucción Open.

Input - Devuelve un tipo String que contiene caracteres de un archivo abierto en modo Input o Binary.

Si explicaras para que deseas abrir el archivo, se te podría ayudar mejor.

Adendum: si te fijas todas las variables tienen un prefijo que significa que tipo de varible es y en que alcance tiene. Te adjunto un archivo doc con las convenciones.  Lo encontré en la red.
 :)

518
Visual Basic 6.0 e inferiores / Re: Copiar-pegar Rápido
« en: Jueves 10 de Marzo de 2005, 20:03 »
Planet-Source-Code sufrió un "email bomb attack" pero ya está en línea y el el código fuente que te mencioné, ya revisé que si se encuentra.

 :devil:

519
Otra manera de facilitar el registro o eliminar el registro de los OCX y DLL es agregar al registro instrucciones para que al hacer un clic con el botón derecho de ratón aparezca en el menú Register y Unregister lo que les evitaría el uso directo de regsvr32.exe

Claro que es mejor el uso de fusión para lo que desean, pero me pareció oportuno proporcionarles esta utilidad, que me encontré en la red, y que les facilitará su trabajo.

Adjunto el archivo en un zip, que es un agregado para el registro.

 :)

---------------------
"Corrector Ortográfico de Notas", freeware, utilidad para programadores.
Programado en VB6, con diccionario propio.
http://consultapractica.aztecaonline.net/index2.html
---------------------

520
Visual Basic 6.0 e inferiores / Re: Copiar-pegar Rápido
« en: Jueves 10 de Marzo de 2005, 17:26 »
Encontré un programa en Planet-Source-Code.com que reúne las características de lo que buscas. Te coloco la descripción del mismo.

Citar
Title: Spell check 2.0 CODED BY JOHN CASEY
Description: Spell check any text chat window you have open, (Ex: look at screenshot). works with almost all windows. By just clicking on a windows text field it gets the hwnd and gets the text from it. If you right click on a highlighted word it can be added or it can give you suggestions. I put in a 1024 letter limit so it would not slow down while your typing, you can change it to be what ever you want in the code.

Enlace: http://www.Planet-Source-Code.com/vb/scrip...=58098&lngWId=1

No pude confirmar si todavía se encuentra en ese sitio, debido a que Planet-Source-Code.com está fuera de línea. Te lo pasaría por email (464kb) el programa es pequeño pero trae un diccionario de 1.8mb
 :)

521
Visual Basic 6.0 e inferiores / Re: Duda Con Notepad
« en: Jueves 10 de Marzo de 2005, 16:53 »
Con el siguente código tendrás el archivo en una variable de texto:
Código: Text
  1. intFreeFile = FreeFile
  2. Close intFreeFile
  3. Open gstrFullFilename For Input As intFreeFile
  4. mlngLenFile = LOF(intFreeFile)
  5. gstrDocument = Input(mlngLenFile, intFreeFile)
  6. Close intFreeFile
  7.  
  8.  
En la varible gstrDocument queda el archivo, en mlngLenFile queda la longitud el archivo.
 :)

522
Visual Basic 6.0 e inferiores / Re: Como Crear Un Formulario Que Diga Espere.
« en: Domingo 6 de Marzo de 2005, 06:37 »
Usa el siguiente código:

Código: Text
  1.  
  2. 'Mostrar forma que avisa que espere el usuario
  3. frmShowProcess.Show vbModeless
  4. SetWindowPos frmShowProcess.hWnd, HWND_TOPMOST, 0, 0, 0, 0, Flags
  5. DoEvents
  6.  
  7. 'el código para llenar datagrid
  8. Set DataGrid1.DataSource=rs1,
  9.  
  10. 'descargar la forma de aviso
  11. SetWindowPos frmShowProcess.hWnd, HWND_NOTOPMOST, 0, 0, 0, 0, Flags
  12. Unload frmSowProcess
  13.  
  14.  
La forma que presenta el aviso de esperar se llama frmShowProcess. Elabórala como tú desees.

Complementa con el siguiente código, que va en un módulo, para que la forma que presenta el aviso aparezca al frente de las demás.
Código: Text
  1.  
  2. '****************************************************************
  3. 'Windows API/Global Declaraciones para :AppOnTop
  4. '****************************************************************
  5. Declare Function SetWindowPos Lib "user32" (ByVal _
  6.        hWnd As Long, ByVal hWndInsertAfter As Long, ByVal X _
  7.        As Long, ByVal Y As Long, ByVal cx As Long, ByVal cy _
  8.        As Long, ByVal wFlags As Long) As Long
  9.  
  10. Global Const SWP_NOMOVE = 2
  11. Global Const SWP_NOSIZE = 1
  12. Global Const Flags = SWP_NOMOVE Or SWP_NOSIZE
  13. Global Const HWND_TOPMOST = -1
  14. Global Const HWND_NOTOPMOST = -2
  15.  
  16.  

 :)

523
Visual Basic 6.0 e inferiores / Re: Textbox Enabled!!
« en: Jueves 3 de Marzo de 2005, 05:19 »
Porque no usas mejor la propiedad Text1.Locked = True para evitar que escriban en el TextBox.

 :)

524
Visual Basic 6.0 e inferiores / Re: Problema Con Data
« en: Jueves 3 de Marzo de 2005, 05:10 »
No debe preocuparte la instrucción Set Data1.Recordset = recContrato no debe modificar la funcionalidad de tu programa.
Lo que modificas con el Data1 es la base de datos. Si requieres que el recorset se actualice con lo que modificas con el Data1, solo debes hacer recContrato.Refresh. Esto si usas ese mismo Recorset (recContrato) en otra parte del programa.

 :)

525
Visual Basic 6.0 e inferiores / Re: Problema Con Data
« en: Miércoles 2 de Marzo de 2005, 22:44 »
Explica un poco más, no entendí lo que deseas saber.
 :hola:

Páginas: 1 ... 19 20 [21] 22 23 ... 26