José A. Giménez [Py]
2009-01-05 02:25:28 UTC
Hola a todos, feliz año!
Estoy dando los primeros pasos con SQL Server EXpress 2008. Consegui
importar una base de datos de Access 2007 en el SQL Server 2008.
Sin embargo estoy teniendo problemas para acceder por código a las tablas,
que ya las tengo vinculadas.
En todo mi front manejo las grabaciones y ediciones en las tablas vinculadas
usando el método seek, por ejemplo, para borrar un registro:
Set registro = AbrirConSeek("CtasBancarias")
With registro
.Index = "PrimaryKey"
.Seek "=", Me.LaCuenta
If Not .NoMatch Then
.Delete
End If
.Close
Cerar
End With
Set registro = Nothing
Usando el código que encontré en la red (AbrirConSeek) que me permitía hacer
el seek a una tabla vinculada (usando .Openrecordset)
Set AbrirConSeek =
DBEngine.Workspaces(0).OpenDatabase(Mid(CurrentDb().TableDefs(TableName).Connect,
_
36), False, False,
";pwd=miclave").OpenRecordset(TableName, dbOpenTable)
Ahora que tengo vinculadas las bases en el SQL Server Express 2008, no
puedo utilizar este método, tampoco hacer esto:
Set base = CurrentDb
Set registro = base.OpenRecordset("CtasBancarias", dbOpenTable)
Que cadena de conexion debo usar para poder seguir usando el seek con las
tablas vinculdas en el SQL Server. Que experiencia han tenido haciéndo la
vinculacion a SQL server?
Muchas Gracias!!!!!!!!!!!!!!!!!
Estoy dando los primeros pasos con SQL Server EXpress 2008. Consegui
importar una base de datos de Access 2007 en el SQL Server 2008.
Sin embargo estoy teniendo problemas para acceder por código a las tablas,
que ya las tengo vinculadas.
En todo mi front manejo las grabaciones y ediciones en las tablas vinculadas
usando el método seek, por ejemplo, para borrar un registro:
Set registro = AbrirConSeek("CtasBancarias")
With registro
.Index = "PrimaryKey"
.Seek "=", Me.LaCuenta
If Not .NoMatch Then
.Delete
End If
.Close
Cerar
End With
Set registro = Nothing
Usando el código que encontré en la red (AbrirConSeek) que me permitía hacer
el seek a una tabla vinculada (usando .Openrecordset)
Set AbrirConSeek =
DBEngine.Workspaces(0).OpenDatabase(Mid(CurrentDb().TableDefs(TableName).Connect,
_
36), False, False,
";pwd=miclave").OpenRecordset(TableName, dbOpenTable)
Ahora que tengo vinculadas las bases en el SQL Server Express 2008, no
puedo utilizar este método, tampoco hacer esto:
Set base = CurrentDb
Set registro = base.OpenRecordset("CtasBancarias", dbOpenTable)
Que cadena de conexion debo usar para poder seguir usando el seek con las
tablas vinculdas en el SQL Server. Que experiencia han tenido haciéndo la
vinculacion a SQL server?
Muchas Gracias!!!!!!!!!!!!!!!!!