• Martes 13 de Mayo de 2025, 05:42

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 ... 17 18 [19] 20 21 ... 26
451
Visual Basic 6.0 e inferiores / Re: Api Findfiles
« en: Viernes 14 de Octubre de 2005, 02:21 »
Aquí encuentras la información necesaria y ejemplo de código

http://www.elguille.info/vb/ejemplos/ShellObjects.htm

 :smartass:

452
Visual Basic 6.0 e inferiores / Re: Tengo Un Programa Y No Logro Descifralo
« en: Jueves 13 de Octubre de 2005, 23:08 »
Explica que quieres decir con
Citar
la linea que hace que salte cuando llega a un determinado punto

Te refieres a una línea de texto o de código, y cual es el 'determinado punto'.

De preferencia da un ejemplo de como reproducir lo que dices.

 <_<

453
Visual Basic 6.0 e inferiores / Re: Abrir Programas
« en: Jueves 13 de Octubre de 2005, 05:35 »
Usa lo siguiente para abrir un documento en Excel,

En un módulo coloca
Código: Text
  1. Declare Function ShellExecute Lib "shell32.dll" Alias "ShellExecuteA" (ByVal hWnd As Long, ByVal lpszOp As String, ByVal lpszFile As String, ByVal lpszParams As String, ByVal LpszDir As String, ByVal FsShowCmd As Long) As Long
  2.  
  3. Declare Function GetDesktopWindow& Lib "user32" ()
  4.  

En un evento click de un botón lo siguiente
Código: Text
  1.  
  2.     r = ShellExecute(GetDesktopWindow, "open", gstrAppPath & "test.xls", "", "C:\", vbMaximizedFocus)
  3.  
  4.  

 Espero te sirva..

:)

454
Visual Basic 6.0 e inferiores / Re: Mas Inno Setup
« en: Lunes 10 de Octubre de 2005, 23:46 »
Muy bueno. Lo necesario para transformar los archivos LST.
Gracias por compartir tu trabajo.  :comp:
Lo revisaré más a fondo.

  :)

455
Visual Basic 6.0 e inferiores / Re: Microsoft Help Workshop
« en: Domingo 9 de Octubre de 2005, 20:02 »
El Guille tiene información al respecto

http://www.elguille.info/vb/HHW/indice.htm

 <_<

456
Visual Basic 6.0 e inferiores / Re: Borrar Directorios En Inno Scrip
« en: Domingo 9 de Octubre de 2005, 00:23 »
Ya lo probé y a mí si me funciona, elimima el fólder de instalación completamente. Lo agregé al final de archivo de Inno Setup.

[UninstallDelete]
Type: filesandordirs; Name: "C:\Consulta"

Debes de asegurarte que ningún programa esté activo.

 :comp:

457
Visual Basic 6.0 e inferiores / Re: No Repetir Items En Un Listbox
« en: Viernes 7 de Octubre de 2005, 20:21 »
Usa este listado
Código: Text
  1.     Agregado = True
  2.     For i = 0 To LstTramites.ListCount
  3.         If Tramite = LstTramites.List(i) Then
  4.             Agregado = False
  5.         End If
  6.     Next i
  7.  
  8.     If Agregado = True Then
  9.        LstTramites.AddItem Tramite
  10.     Else
  11.        MsgBox "El Trámite ya fué agregado", vbInformation
  12.     End If
  13.  
  14.  
:)

458
Visual Basic 6.0 e inferiores / Re: Mas Inno Setup
« en: Viernes 7 de Octubre de 2005, 18:39 »
Si te quieres entretener en eso, está bien, pero ya existe un programa que lo hace y se llama: InnoScript
Pero si lo elaboras, a mi me interesa.

 :whistling:

459
Visual Basic 6.0 e inferiores / Re: Mas Inno Setup
« en: Viernes 7 de Octubre de 2005, 14:59 »
Según la documentación en el archivo de ayuda debes quitar 'nowait'
Por ejemplo:

[Run]
Filename: "{tmp}\agtx0c0a.exe"; Description: "Controladores audio -necesarios-"; Flags: postinstall skipifsilent
Filename: "{tmp}\lhttsspe.exe"; Description: "Controladores Windows -necesarios-"; Flags: postinstall skipifsilent
Filename: "{tmp}\spchcpl.exe"; Description: "Controladores para lectura de texto automática -necesarios-"; Flags: postinstall skipifsilent

 :smartass:

460
Visual Basic 6.0 e inferiores / Re: Borrar Directorios En Inno Scrip
« en: Viernes 7 de Octubre de 2005, 06:58 »
Busca en la ayuda de Inno Setup la sección UninstallDelete

Podría ser algo así:

[UninstallDelete]
Type: filesandordirs; Name: "C:\MYFOLDER"

 :ph34r:

461
Visual Basic 6.0 e inferiores / Re: Pestañas (supongo Que Preguntas Básicas)
« en: Jueves 6 de Octubre de 2005, 05:33 »
Es más fácil usar Microsoft Tabbed Dialog Control 6.0 (sp6)
 :)

462
Visual Basic 6.0 e inferiores / Re: Mas Inno Setup
« en: Miércoles 5 de Octubre de 2005, 14:49 »
Adjunto el archivo que uso para castellano.

 :ph34r:

463
Visual Basic 6.0 e inferiores / Re: Mas Inno Setup
« en: Miércoles 5 de Octubre de 2005, 05:22 »
Pon esto a final de la línea
Código: Text
  1. ; WorkingDir: {app}
  2.  
  3.  

 :smartass:

464
Visual Basic 6.0 e inferiores / Re: Mas Inno Setup
« en: Martes 4 de Octubre de 2005, 16:13 »
Se me pasaba...

En cuanto a RegTypeLib no parece tener que ver con 32 o 64 bit, son para librerías TLB ?

sharedfile: son los archivos compartidos, otras aplicaciones también pueden usarlos.

 :smartass:

465
Visual Basic 6.0 e inferiores / Re: Mas Inno Setup
« en: Martes 4 de Octubre de 2005, 16:08 »
Posiblemente tengas Win XP profesional, y a veces después que instalas la segunda vez algún archivo del sistema u OCX, te impide al acceso al registro.
Al parecer debido a protección de registro, a pesar de tener privilegios de Administrador.
Yo revise las claves del registro a las que se impedían el acceso con un programa que se llama RegMon que encuentras en www.sysinternals.com (freeware). Localizas cuál es la clave, cambias privilegios de acceso a la clave y desaparecen los errores.
Pero no puedes hacer esto, si vas a hacer una instalación que distribuirás a tus clientes. Opte por agregar en (Inno Setup) flags: noregerror, por ejemplo:
Código: Text
  1.   Source: DBLIST32.OCX; DestDir: "{sys}"; Flags: sharedfile restartreplace regserver noregerror
  2.  
  3.  
:smartass:

466
Visual Basic 6.0 e inferiores / Re: Inno Setup Y Fusión
« en: Martes 4 de Octubre de 2005, 15:53 »
Tienes un error en la sección [Icons]
Cambia esto:
Código: Text
  1. Name: {userdesktop}\CargaMP3; Filename: C:\CargaMP3.exe; Tasks: desktopicon; WorkingDir: C:\mp3; Iconindex: 0
  2.  
  3.  
Por esto otro:
Código: Text
  1. Name: {userdesktop}\CargaMP3; Filename: C:\mp3\CargaMP3.exe; Tasks: desktopicon; WorkingDir: C:\mp3; Iconindex: 0
  2.  
  3.  
Puedes mejorar la legibilidad del código de instalación si estableces en la sección [Setup] lo siguiente:
Código: Text
  1. SourceDir=c:\documents and settings\pablo\mis documentos\proyectos vb\visual fonola 10_definitive\paquete\support
  2.  
  3.  
Y luego en sección [Files] solo escribes escribes algo como esto (sin el path)
Código: Text
  1. Source: vb6es.dll; DestDir: {sys}; MinVersion: 4.0,4.0; Flags: sharedfile
  2.  
  3.  
En cuanto al error en la instalación de ADO, explica que tipo de error aparece.
 :)

467
Existe problema para poder distribuir microsoft forms 2.0 object library (FM20.DLL), se debe tener instalado Office o instalar Microsoft ActiveX Control Pad para tener derecho a usar este control. Revisen este enlace.

http://support.microsoft.com/default.aspx?scid=kb;es;224305

 :devil:

468
Visual Basic 6.0 e inferiores / Re: Mas Inno Setup
« en: Martes 4 de Octubre de 2005, 00:24 »
Lo del Crystal Report:

Source: "crpe32.dll"; DestDir: "{sys}"; Flags: sharedfile
Source: "Crystl32.OCX"; DestDir: "{sys}"; Flags: sharedfile restartreplace regserver

El STDOLE2.TLB es un archivo del sistema:

Source: STDOLE2.TLB; DestDir: "{sys}"; Flags: restartreplace uninsneveruninstall sharedfile regtypelib

(WinSysPathSysFile) = Directorio del sistema en XP es C:\Windows\System32
{sys} este código es el equivalente de Inno Setup a lo anterior.

 :)

469
Visual Basic 6.0 e inferiores / Re: Inno Setup Y Fusión
« en: Viernes 30 de Septiembre de 2005, 06:53 »
Lee esta discusión, encontrarás valiosa información de Inno Setup

 :)

470
Visual Basic 6.0 e inferiores / Re: Como Cambian El TamaÑo De La Letra
« en: Martes 27 de Septiembre de 2005, 04:37 »
Prueba con esto, además del tamaño puedes cambiar el nombre, etc

Sel.Font.Name = "Arial"
Sel.Font.Size = 14
Sel.Font.Bold = True

 :)

471
Visual Basic 6.0 e inferiores / Re: Devolver Valor Desde Main En Aplic. Vb
« en: Viernes 23 de Septiembre de 2005, 17:04 »
Gracias por la información

 :)

472
Visual Basic 6.0 e inferiores / Re: Problemas Con Consulta Sql
« en: Jueves 15 de Septiembre de 2005, 08:39 »
En SQL de Access hay dos formas de encontrar una comilla simple.

Para encontrar Julian's se usa 'Julian''s'
Comilla simple, Julian, comilla simple, comilla simple, s, comilla simple

La otra opción es:  'Julian[']s'

 :)

También descubrí una rutina para que se basa en este principio para buscar palabras semejantes o que pudieran estar mal escritas con o sin acento por ejemplo:
El usuario busca 'cancion' pero en la base de datos existe 'canción' o al revés, el usuario busca canción y en la base de datos existe CANCION sin acento. Si les interesa la publico.

 :comp:

473
Visual Basic 6.0 e inferiores / Re: Insertar Objeto Ole En Db Acces97
« en: Jueves 8 de Septiembre de 2005, 01:13 »
Se me olvidaba, la forma y el control picture deben tener
la propiedad ScaleMode = 3 - Pixel

 :rolleyes:

474
Visual Basic 6.0 e inferiores / Re: Insertar Objeto Ole En Db Acces97
« en: Jueves 8 de Septiembre de 2005, 00:54 »
Comparto lo que encontré en la red.
Lo adecué, para mostrar imágenes en alta definición, estrecharlas a cualquier control Picture y a pantalla completa.

Adjunto el archivo.....

 :comp:

---------------------

"Corrector Ortográfico de Notas", freeware, utilidad para programadores.
Reemplaza al bloc de notas.
Programado en VB6, con diccionario propio.

http://consultapractica.aztecaonline.net/index2.html

475
Visual Basic 6.0 e inferiores / Re: Activar Cerrado Automático De La Barra De Tareas
« en: Martes 6 de Septiembre de 2005, 04:48 »
Ocultar la barra de tareas, es fácil, modificando el registro.
Lo que no es posible hacer es que se oculte automaticamente (autohide).

MindEye dice:
Citar
Ya probe a ocultar la barra de tareas, pero se queda el hueco de la misma, en pantalla,

Si alguien sabe como ocultar automáticamente la barra de tareas, le agradeceré nos lo indique.

 :devil:

Páginas: 1 ... 17 18 [19] 20 21 ... 26