I want to connect to sql server using vba code THROUGH DAO without using odbc/dns
I have this :
if i use odbc in : constring ="odbc;DSN=mydsn;DATABASE=mydatabase;" it works like follow
i don't like to use odbc to connecto sql server but all others strings what i could found on net don't work like:
"driver=sql server;server=myadress,1433;initial catalog=mydatabase;user id=myidL;PASSWORD=mypwd;"
"Data Source=ipserevr,1433; Network Library=DBMSSOCN;Initial Catalog=mydb;USER ID=mid;PASSWORD=mypwd;"
"provider=sqloledb;data source=myserver;initial catalog=mydb;userid=myid;PASSWORD=mypwd;"
OR SIMILAR
PLS NOTE:
I'M CONNECTING TO SQL SERVER THROUGH VPN CONNECTION
i hope someone will notice where i'm wrong
thanks
I have this :
Code:
Dim A As Database
Dim B As TableDef
Dim C As DAO.Recordset
Dim mytable As String
Dim constring As String
Set B = A.CreateTableDef(mytable)
B.connect = constring
B.SourceTableName = mytable
A.TableDefs.Append B
Set C = A.OpenRecordset(mytable)
Code:
Set B = A.CreateTableDef(mytable)
B.connect = "odbc;DSN=mydsn;DATABASE=mydatabase;"
B.SourceTableName = mytable
A.TableDefs.Append B
Set C = A.OpenRecordset(mytable)
"driver=sql server;server=myadress,1433;initial catalog=mydatabase;user id=myidL;PASSWORD=mypwd;"
"Data Source=ipserevr,1433; Network Library=DBMSSOCN;Initial Catalog=mydb;USER ID=mid;PASSWORD=mypwd;"
"provider=sqloledb;data source=myserver;initial catalog=mydb;userid=myid;PASSWORD=mypwd;"
OR SIMILAR
PLS NOTE:
I'M CONNECTING TO SQL SERVER THROUGH VPN CONNECTION
i hope someone will notice where i'm wrong
thanks
Last edited: