Prueba con esto ...
Private Sub cmdImprimeForm_Click()
' Referencias: Windows Script Host Object Model (System32\wshom.ocx)
Dim oWSH As WshNetwork
Dim sPrinterDefault As String
Tipo: Mensajes; Usuario: Semper
Prueba con esto ...
Private Sub cmdImprimeForm_Click()
' Referencias: Windows Script Host Object Model (System32\wshom.ocx)
Dim oWSH As WshNetwork
Dim sPrinterDefault As String
Ahi te va un ejemplo ...
En un formulario pones dos MsFlexGrid (MsFlexGrid1, MsFlexGrid2)y un Command (Command1) para copiar del flex1 al flex2 ...
Option Explicit
Private Sub...
Tienes cuando menos 2 opciones para hacerlo con el diseño que actualmente manejas ...
Usando la coleccion Controls() del formulario
For colorf = 1 To 60
Me.Controls("Text" &...
Si no lo has hecho aun, prueba actualizando tu VB con el ServicePack 6; una vez hecho lo anterior, prueba a generar de nuevo el ejecutable y el empaquetado ...
El SP6 para VB6 lo obtienes aqui .....
A ver ... prueba con esto en tu ComboBox (El Style del Combo debe ser 0 o 1)
Private Sub Combo1_KeyUp(KeyCode As Integer, Shift As Integer)
Dim sTexto As String, nPos As Long, nItem As Long
...
@diapli
Para abrir un documento Excel con contraseñas en una conexion (ADO o DAO), primero hay que abrir el libro en Excel especificando las contraseñas e inmediatamente despues, abrir la conexion...
Bien, para acceder a un documento protegido con contraseñas (aparte de las contraseñas para proteger libro u hoja), usa esta sintaxis ...
Set ObjW = ObjExcel.Workbooks.Open(dir, , , ,...
Sustituye los signos "+" por "&" para hacer concatenado de cadenas, variables, etc ....
El signo "+" es para sumar valores... en tu caso, estarias sumando una cadena con un valor "X" (fec_ini.value,...
Pues el problema que tienes es de compatiblidad entre versiones de Office.
Lo puedes comprobar simplemente tomando un documento de Word o de Excel de tu equipo (generado con Office 2007) y tratando...
En cada maquina, y por cada usuario de esa maquina que tenga acceso a tu hoja de excel, deberas configurar el nivel de seguridad en Excel para macros (abrir Excel, ir a Herramientas, Macro,...
La referencia a incluir es la Microsoft Excel x.x Object Library ..
Checa el ejemplo de nuevo ...
Lo probaste ajustando los datos (nombre del doc excel, columna, renglones a copiar, etc) a lo que...
Postea los datos del servidor que estas usando (SQL 2000, SQL2005, etc), asi como la consulta que estas generando, cuantos registros aproximadamente estarias obteniendo, el codigo de tu programa que...
Ok..
Que clase de contraseña tiene el archivo de Excel ?
Protección de Libro? Protección de Hoja? Algun otro tipo?
Hice las pruebas con ambas contraseñas y no me abre ventana para pedir la...
Modifica esto en tu codigo ...
No debes usar el END para terminar una aplicacion, porque este simplemente detiene (aborta) la ejecucion del programa, pero no da el tiempo a este para realizar las...
Solo te faltaria esto para cerrar el Excel ...
nomHoja = ObjW.Sheets(1).Name ' para saber el nombre de la hoja del archivo de excel
ObjW.Sheets(1).Name = Trim(nomHoja)
ObjW.Close
...
Comando.CommandText = "INSERT INTO Facturación(Cliente,Fecha,[DNI-CIF]," & _
"Domicilio,Marca,Matrícula,Conceptos,Mat1," & _
"Imp1,Mat2,Imp2,Mat3,Imp3,Mat4,Imp4) " & _
"VALUES 1,2,3,4, ..."
El evento _Change se activa solo cuando escribes directamente en el area de texto del combobox (sea que lo haga el usuario o que lo hagas por codigo)...
Si lo que quieres es detectar cuando el...
Para copiar una columna de un documento Excel a un FlexGrid (MSFlexGrid o MSHFlexGrid) puedes hacer algo asi ...
Option Explicit
Private Sub Command1_Click()
Dim oExcel As Excel.Application...
Pues lo mas sencillo seria que al pasar esas fechas al portapapeles, lo hicieras directamente en formato MM/DD/YYYY con el Format() para que al pegarlas en excel no se cambiara el orden ...
Otra...
Aqui creo que el problema no es de programacion basicamente, sino del origen de los datos que se quieren registrar...
Si el medicamento es otro, entonces su codigo deberia ser diferente ...
Este...
Si quieres que te funcione el evento _Change, el estilo del Combobox debe ser 0 (Dropdown Combo) o 1 (Simple Combo) .... Si lo tienes en 2 (Dropdown List) no te va a funcionar el _Change ...
...
Hola yochy...
No se entiende que es lo que deseas exactamente...
Podrias extenderte mas en tu requerimiento ?
Que se supone que debe hacer tu aplicacion ? Es un mantenimiento a una tabla de...
Hola surinam...
Aqui te dejo la liga al tema donde hace poco tratamos el tema del Lector de Huellas ...
Entre los dispositivos soportados por el driver esta el DigitalPersona ...
Bueno, espero...
Por definicion, en VB6 (no se en otras versiones), cuando un MDIChild esta activo y tiene barra de menus, esta oculta la barra de menus del formMDI ...
Esto aplica, aun si solo se tiene un unico...
Para registrar/desregistrar DLLs/OCXs dinamicamente, via codigo, te dejo este ejemplo ...
en un modulo (.bas) pon esto ...
Option Explicit
Private Declare Function FreeLibrary Lib "kernel32"...