Buenas, utilizo Public Declare Function PAGESETUPDLG Lib "comdlg32.dll" Alias "PageSetupDlgA" (pPagesetupdlg As PAGESETUPDLG) As Long para presentar el cuadro de diálogo para configurar la página de...

gracias, pero sigo sin conseguir que me presente el papel que yo decida y no puedo capturar al aceptar el tipo de papel ni la bandeja de impresión

Buscando en las APIs encontré esto

Public Declare Function PAGESETUPDLG Lib "comdlg32.dll" Alias "PageSetupDlgA" (pPagesetupdlg As PAGESETUPDLG) As Long

Public Type PAGESETUPDLG
lStructSize...

Buenas, utilizo el Common Dialog para seleccionarla impresora y con Flags = cdlPDPrintSetup para configurarla, el problema es queuna vez he presionado aceptar el el cuadro de diálogo de la impresora,...

Buenas ¿hay alguna manera de colocar un control image delante de todos los controles de un formulario (botones, pictures, Text, etc?, en la ayuda he visto esto:

"Hay tres niveles gráficos...

Buenas, utilizo ADO y bases de datos de Access para hacer documentos con formato RTFque se abren con Word (y se pueden editar fácilmente una vez hechosevidentemente), lo que hago es un documento en...

Buenas, utilizo ado (mediante código) con una base de datos de Access e introduzco los datos en la base a través deun formulario con diversoscontroles vinculados a los campos de la base de datos...

El problema no es imprimirlo, el problema viene cuando lo guardas en una variable (double, single, currency) y lo tienes que comparar con otra cifra guardada en otra variable, entonces B=A falla, no...

Buenas, si en la ventana de inmediato (por ejemplo) tecleamos:
print Int(78.585*1000) nos da como resultado 78584 ¿alguien sabe por qué narices no pone 78585? curiosamente si ponemos 28.585 lo hace...

De la ayuda he sacado esto pero no me aclara mucho

El uso del método Execute en un objeto Connection ejecuta la consulta que se pasada al método en el argumento CommandText en la conexión...

A ver si me explico mejor, yo hago lo siguiente:

DimcnAgenda As New ADODB.Connection
DimrsAgenda As New ADODB.Recordset
Dim cmdAgenda As New ADODB.Command

Set cnAgenda = New ADODB.Connection...

Buenas, Utilizo ADO y el problema que tengo es que necesito llenar un RecordSet que sea actualizable para añadir registros, borrar,etc. pero solo puedo conseguirlo con en método OPEN, si utilizo...

Buenas, tengo dos bases de datos en Access, cada una con su ruta, llamémoslas BD1 y BD2 con la misma estructura y algunos registros iguales y otros distintos lo que quiero es insertar en la BD2 los...

Buenas, tengo dos bases de datos en Access, cada una con su ruta, llamémoslas BD1 y BD2 con la misma estructura y algunos registros iguales y otros distintos lo que quiero es insertar en la BD2 los...

Buenas, quería saber la manera de crear una bd de Access mediante código, una sola tabla bastaría y otra pregunta es: si tengo dos bases de Accesscon la misma estructura y algubnos registros iguales...

SOLUCIONADO:

If Data1.Recordset.State = adStateOpen Then Data1.Recordset.Close
Data1.Recordset.Open "INSERT INTO bdtabla SELECT * FROM bdtabla IN '" & CommonDialog1.filename & "'", ,...

Buenas, tengo dos bases de datos mdb con la misma estructura y lo que quiero hacer es copiar todos los registros de la una en la otra que se encuentra vacía.



Dim cn As New ADODB.Connection...

Me he actualizado a SP6 y ahora puedo ver que lo que daba el error era un RichtextBox pero no sé como arreglar el error que me da ahora -2147417848 error en el método 'TextRTF' del objeto 'IRichText'...

gracias, no sabía de las actualizaciones, voy a probar.

Buenas, tengo mi proyecto VB6 que abre una base de datos de access 97 y todo funciona bien, pero de vez en cuando y sólamente en el ejecutable (cuando está compilado) aparece el error -2147417848...

muy bueno, muchas gracias

Buenas, tengo unos textbox que solo aceptan números al teclear en ellos con:
Private Sub Text1_KeyPress(KeyAscii As Integer)
Select Case KeyAscii
Case 13
KeyAscii = 0
SendKeys "{tab}"
Case...

ya he encontrado la solución, no iba muy descaminado.
En un form con todos los textbox que quiera pongo:

Option Explicit
Private ColorenTextBoxes As Collection
Private Sub Form_Load()
Dim...

Buenas, tengo un montón de formularios con un montón de controles en cada formulario y lo que quiero conseguir es que cada vez que cambie el foco a un objeto diferente capture ese evento (supongo que...

Buenas de nuevo, Vanchi el método propuesto por ti sólo sirve para acotar el intervalo de la solución, el ejemplo que puse no era muy afortunado, fíjate en el siguiente:


la 1ª cantidad varía...