Importar de SQL Server a Access aun sin funcionar
Publicado por yhosol (1 intervención) el 24/07/2007 21:39:32
Hola NIKE y a todos, he probado las opciones para importar de SQL server a Access, tomando los modelos que me indicaste(los que están en http://support.microsoft.com/kb/295646 ) , pero me ha sido imposible hacer que funcione, uno de las formas que adopté fue:
'-----Conexión a la base de datos de SQL Server (funciona bien)
Dim SQLConexion
SQLConexion = "Provider=SQLOLEDB.1;Integrated Security=SSPI;Persist Security Info=False;Initial Catalog='Prueba';Data Source='NEO';UID='u';PWD='p'"
Set base = New ADODB.Connection
'----------------------------------------------------------------------------
'----Especificación a la cadena de conexión de access -----------------------
SQLAccess = "Provider=Microsoft.Jet.OLEDB.4.0;" & "Data Source=" & _
"'C:\BaseAccess.mdb';User Id=admin;Password=''"
'----------------------------------------------------------------------------
'----------------------------------------------------------------------------
SQL = "SELECT * INTO [" & SQLAccess & "].[TablaDestinoDeAccess] from TablaDeSQLServer"
base.Execute SQL
'----------------------------------------------------------------------------
Aparece el error: "El nombre de propietario ''C:\BaseDeAccess.mdb'' especificado no existe o usted no tiene permisos para utilizarlo."
Las otras formas indicadas en "http://support.microsoft.com/kb/295646" las he probado, pero tampoco funcionan
la base de datos BaseDeAccess.mdb existe efectivamente en c:\, al igual que la tabla TablaDeSQLServer del Servidor SQL Server 2000, agradezco cualquier ayuda nuevamente
'-----Conexión a la base de datos de SQL Server (funciona bien)
Dim SQLConexion
SQLConexion = "Provider=SQLOLEDB.1;Integrated Security=SSPI;Persist Security Info=False;Initial Catalog='Prueba';Data Source='NEO';UID='u';PWD='p'"
Set base = New ADODB.Connection
'----------------------------------------------------------------------------
'----Especificación a la cadena de conexión de access -----------------------
SQLAccess = "Provider=Microsoft.Jet.OLEDB.4.0;" & "Data Source=" & _
"'C:\BaseAccess.mdb';User Id=admin;Password=''"
'----------------------------------------------------------------------------
'----------------------------------------------------------------------------
SQL = "SELECT * INTO [" & SQLAccess & "].[TablaDestinoDeAccess] from TablaDeSQLServer"
base.Execute SQL
'----------------------------------------------------------------------------
Aparece el error: "El nombre de propietario ''C:\BaseDeAccess.mdb'' especificado no existe o usted no tiene permisos para utilizarlo."
Las otras formas indicadas en "http://support.microsoft.com/kb/295646" las he probado, pero tampoco funcionan
la base de datos BaseDeAccess.mdb existe efectivamente en c:\, al igual que la tabla TablaDeSQLServer del Servidor SQL Server 2000, agradezco cualquier ayuda nuevamente
Valora esta pregunta
0