Office中国论坛/Access中国论坛

标题: 怎么样用代码连接表，连接SQL2000，不用DSN [打印本页]

---

作者: xthand    时间: 2006-12-28 01:51
标题: 怎么样用代码连接表，连接SQL2000，不用DSN
RT

这是用DSN的代码

Private Sub Command0_Click()
    Dim db As Database
    Dim tdef As TableDef
    Set db = CurrentDb()
    Set tdef = db.CreateTableDef("TS")
    tdef.Connect = "ODBC;DATABASE=MSPetShop;UID=saWD=;DSN=hh"
    tdef.SourceTableName = "dbo.Account"
    db.TableDefs.Append tdef
End Sub

可不可以不用DSN，用IP能做到吗？怎么写？谢谢。

---

作者: xthand    时间: 2006-12-29 01:30
自己顶一下。

---

作者: xthand    时间: 2006-12-29 01:50
知道了

tdef.Connect = "ODBC;Driver=SQL Server;server=ZJH;UID=saWD=;DATABASE=MSPetShop"

换成这样就OK了，哎，自己还是要动手多试试

---

欢迎光临 Office中国论坛/Access中国论坛 (http://www.office-cn.net/)

Powered by Discuz! X3.3