请教:VB中的ADO与SQL server的连接?

别用ＡＤＯ了，现已升级到ＡＤＯ．ＮＥＴ，用代码和组件都行，代码较灵活．服务器名称与使用的登陆方式有关，代码一两句话也说不清楚

恩 刚刚把那一块弄明白了~~

偶也是菜鸟，进来学习 ADO不是比较新的么，怎么也过时了？

添加一个MS ADO DATA CONTROL 6.0的组建,然后加到面板上,在点组建的属性ADODC propty,点第三个build,得到连接字符串,下面就不说了

我也刚学习中， 用的ado对象， 不是ado 控件， 连的ACCESS 另外 ，可以去http://community.csdn.net/Index.htm CSDN 社区学习学习 下面是书上连接sql server 数据源的代码，不知对你有帮助不。 通过3个不同提供者connection 对象演示provider属性，且使用defaultbase属性设置 microsoft ODBC 提供者的默认数据库。 Dim cnn1 As ADODB.Connection Dim cnn2 As ADODB.Connection Dim cnn3 As ADODB.Connection On Error GoTo errhandle ‘使用Microsoft ODBC 提供者打开连接 Set cnn1 = New ADODB.Connection cnn1.ConnectionString = "driver={SQL Server};" & _ "server=bigsmile;uid=sa;pwd=pwd" cnn1.Open strCnn cnn1.DefaultDatabase = "pubs" '显示提供者 MsgBox "Cnn1 provider: " & cnn1.Provider ’使用 microsoft JET 提供者打开连接 Set cnn2 = New ADODB.Connection cnn2.Provider = "Microsoft.Jet.OLEDB.3.51" cnn2.Open "C:\Samples\northwind.mdb", "admin", "" '显示提供者 MsgBox "Cnn2 provider: " & cnn2.Provider '使用SQL 服务器打开连接 Set cnn3 = New ADODB.Connection cnn3.Provider = "sqloledb" cnn3.Open "Data Source=srv;Initial Catalog=pubs;", "sa", "" ‘显示提供者 MsgBox "Cnn3 provider: " & cnn3.Provider cnn1.Close cnn2.Close cnn3.Close Exit Sub errhandle: MsgBox Err.Description, vbOKOnly, "错误" 【 在 jiaoshui 的大作中提到: 】 : 偶是一个菜鸟哈,刚刚接触 : 想问一下,怎么用ADO连接SQL里的数据源啊?用写代码还是怎么着呢 : 服务器名称是什么呢? : ...................