如何联系sql sever2000?

Question

Dim cn As New ADODB.Connection
Dim rs As New ADODB.Recordset
Dim cm As New ADODB.Command
cn.ConnectionString = "Provider=SQLOLEDB.1;Persist Security Info=False;User ID=sa;Initial Catalog=clgl;Data Source=数据库" cn.Open
rs.CursorLocation = adUseClient
rs.Open "连接字符串", cn, adOpenDynamic, adLockBatchOptimistic

Answer 1

你用过ＡＣＣＥＳＳ，那就把原来用ＡＣＣＥＳＳ做的数据库用sqlserver来实现吧。
ＡＤＯ和sqlserver的连接方法见楼上的。
一同学习，一同提高