Conectar a un libro mediante SQL

[Muscaria]

Holas a todos, veran tengo este problemita. secede que tengo un libro llamado bitacora y este funciona con un form que se conecta mediante SQL todo esto en el mismo libro y funciona perfectamente.

Ahora quise pasar el formulario y el modulo donde esta la conexion sql a mi otro proyecto osea tengo ahora una carpeta llamada prueba dentro de esta el archivo bitacoras y el otro akelos es te ultimo el principal, a este le agregue el form de bitacoras y el modulo de la conexion. pero l ejecutarlo no funciona el form de la bitacora no se conecta.

me pueden ayudar a conectar a este libro de bitacoras .

Option ExplicitPublic Cnx As New ADODB.ConnectionPublic Rst As New ADODB.RecordsetPublic Cnx1 As New ADODB.ConnectionPublic Rst1 As New ADODB.RecordsetPublic elegida As StringSub Conectar()Application.ScreenUpdating = FalseDim UltFila As Long, NombreHoja As String, Maq As StringDim Fila As Long, Columna As Long
Cnx.Open "Provider=Microsoft.ACE.OLEDB.12.0;Data Source=" & ThisWorkbook.Path & "\" & ThisWorkbook.Name & _                 ";Extended Properties=""Excel 12.0 Xml;HDR=YES"";"
Datos.SelectNombreHoja = Datos.NameUltFila = Datos.Cells.Find("*", SearchOrder:=xlByRows, SearchDirection:=xlPrevious).RowSet Rst = New ADODB.RecordsetWith Rst  .ActiveConnection = Cnx  .CursorType = adOpenStatic  .CursorLocation = adUseClient  .LockType = 3 'adLockBatchOptimisticEnd WithEnd Sub[/HTML]

ese codigo funciona perfectamente en el mismo libro, ayudenme a conectarme desde akelos a bitacoras mediante sql.

Agradesco su ayuda .

Saludos

Muscaria

[Muscaria]

Hize un formulario d prueba ya que el original pesa demasiado como ara subirlo, igual este archivo de prueba pesa un poquito de lo permitido asi que lo subi a Skydrive para que lo puedan descargar.

Clic en Akelos

la ubicación en el disco D:\

si ejecutan solo bitácora verán que funciona bien ahora si abren el archivo akelos y llaman al formulario de bitácoras verán que no funciona la conexión.

espero que me puedan ayudar. :tan:

Gracias

Saludos

Muscaria

[Muscaria]

Holas a todos, hize algunos cambios al codigo de conexion pero ahora me dice que se requiere un objecto y me llama marca al Userform1.show

Ahora puse este codigo.

Cnx.Open "Provider=Microsoft.ACE.OLEDB.12.0;Data Source=D:\Pruebasql\Bitacora.xlsm " & _
                 ";Extended Properties=""Excel 12.0 Xml;HDR=YES"";"[/PHP]

por favor alguna sugerencia.

Saludos

Muscaria

[Muscaria]

Alguna sugerencia de porque me dice que falta un objecto y me resalta el userform1.show y ahi esta el formulario.

Gracias

SAludos

Muscaria

[Muscaria]

Hola siguiendo con el tema, use otro tipo de conexión.

Option Explicit
Public Cnx As New ADODB.ConnectionPublic Rst As New ADODB.RecordsetPublic elegida As StringSub Conectar()Application.ScreenUpdating = FalseDim UltFila As Long, NombreHoja As String, Maq As StringDim Fila As Long, Columna As LongCnx.Open "Provider=Microsoft.ACE.OLEDB.12.0;Data Source=" & ThisWorkbook.Path & "\BITACORA.xlsx" & _                 ";Extended Properties=""Excel 12.0 Xml;HDR=YES"";"Datos.SelectNombreHoja = Datos.NameUltFila = Datos.Cells.Find("*", SearchOrder:=xlByRows, SearchDirection:=xlPrevious).RowSet Rst = New ADODB.RecordsetWith Rst  .ActiveConnection = Cnx  .CursorType = adOpenStatic  .CursorLocation = adUseClient  .LockType = 3 'adLockBatchOptimisticEnd With End Sub[/PHP]

como dije en otro tema, me dice que el formulario no existe. alguna ayuda por favor.

Saludos

Muscaria

[joshua]

Saludos.

Por lo poco que pude ver no es en si el formulario si no el objeto Datos que hace referencia a una hoja, no puedo trabajar con tu archivo ya que tiene controles no muy comunes y que son de licencia como el Flexgrid basicamente no se pueden hacer las pruebas pertinentes espero haberte ayudado en algo.

Atte.

joshua

[Celest3]

Yo tube un problema similar y loq ue hise fue instalar el Vb6 y una actualizacion y funcionaron los controles otro me dijo que buscara las dll de esos controles y las registrara.

Espero que te sirva de algo.

Nos vemos

Celest3

[joshua]

Saludos Muscaria.

Primera y única advertencia estas infrigiendo la siguiente norma.

[info]

• * 2.3 Nunca utilices el tema de otro usuario para tus consultas, aunque sea similar. Crea tu propio tema.

[/info]

Por favor sigue y respeta las normas del foro, no nos obligues a tomar otras medidas.

Atte.

joshua

[Muscaria]

Ok Joshua, mi tema estaba creado y le di una alternativa a su consulta ya que ambos estamos en un tema parecido.

de todas maneras no volvera a suceder. y disculpen.

Saludos

Muscaria

[Muscaria]

hola a todos, sigo con mi problema de poder conectarme a otro libro desde un formulario usando usando conexion Ado

en resumen.

1.- antes tenia el libro bitacora y programado en el mismo libro, todo funciona perfectamnete .

2.- ahora trato de conectarme desde un formulario que pertenece a otro libro

3.- cuando lo llama me dice que falta objecto y me marca el Userform1que es el formulario de para ingresar datos a la bitacora y aveces me marca Datos.select que es una hoja que esta en el libro bitacora.

4.- yo yengo todos los controles instalados como les dije en el archivo original que todo funciona desde le mismo libro no hay problemas, por eso descarto que se por controles.

5.- pienso que tal vez la conexión este mal ?¡

he subidos algunos ejemplo esperando le echen un vistazo y me ayuden a ver el problema.

espero su apoyo.

Gracias

Muscaria

[Muscaria]

Buenas tardes, al no ver una repuesta, quizas puedan darme otras alternativas para hacer este proceso. o ver si la conexion esta bien o algo falta.

espero contar con su apoyo

gracias

Saludos

Muscaria