Visual Basic - Tabla vinculada en access de slq server

Hola a todos y gracias de antemano,
tengo una base de datos en acces y necesito crear unos vinculos a unas tablas en sql server y claro esto tengo que hacerlo desde visual basic, pero no consigo encontrar nada al respecto. Alguien sabe como hacerlo??

Un saludo.

http://www.google.cl/search?hl=es&sa=X&oi=spell&resnum=0&ct=result&cd=1&q=vincular+tabla+access+con+sql+server&spell=1

es la forma mas facil de encontrar informacion cuando no sabes. Pero mantenlo en secreto.

Muchas gracias,
ya lo habia buscado pero no habia dado con nada.

Un saludo.

Esta es una función es un modulo de access que linkea, importa y exporta las tablas a sql utilizando un dsn, espero que te sirva...

' Linkea tablas del SQL
' Parametros: Tipo=L,I,E / Orig=Tabla SQL / Dest=Tabla Access
Function LinkSQL(strTip As String, strOrig As String, strDest As String)
Dim strSQL As String, strConn As String, nomSQL As String
nomSQL = Environ("COMPUTERNAME")
strSQL = "ODBC;DSN=SQL" & nomSQL & ";UID=user_juanchor;APP=Microsoft Office XP;WSID=" _
& nomSQL & ";DATABASE=sip_db;Network=DBMSSOCN;PWD=juanchor2003user;"
strConn = IIf(strTip = "L", acLink, IIf(strTip = "I", acImport, acExport))
BorrarTabla strDest
DoCmd.TransferDatabase strConn, "ODBC Database", strSQL, acTable, strOrig, strDest
End Function

Esta es una función es un modulo de access que linkea, importa y exporta las tablas a sql utilizando un dsn, espero que te sirva...

' Linkea tablas del SQL
' Parametros: Tipo=L,I,E / Orig=Tabla SQL / Dest=Tabla Access
Function LinkSQL(strTip As String, strOrig As String, strDest As String)
Dim strSQL As String, strConn As String, nomSQL As String
nomSQL = Environ("COMPUTERNAME")
strSQL = "ODBC;DSN=SQL" & nomSQL & ";UID=user;APP=Microsoft Office XP;WSID=" _
& nomSQL & ";DATABASE=sip_db;Network=DBMSSOCN;PWD=pwd;"
strConn = IIf(strTip = "L", acLink, IIf(strTip = "I", acImport, acExport))
BorrarTabla strDest
DoCmd.TransferDatabase strConn, "ODBC Database", strSQL, acTable, strOrig, strDest
End Function