线上推广的渠道:如何用vb 连接sql server 2000

来源：百度文库编辑：杭州交通信息网时间：2024/04/27 21:25:11

'引用ADO(Microsoft ActiveX Data Objects 2.X Library)
Private Sub Command1_Click()
On Error GoTo err
Dim cn As New ADODB.Connection, rs As New ADODB.RecordSet
'混合验证方式的连接：
'cn.ConnectionString = "Provider=SQLOLEDB.1;Persist Security Info=False;User ID=登陆用户名;Password=登录密码;Initial Catalog=数据库名;Data Source=服务器别名"
'集成验证的连接：
cn.ConnectionString = "Provider=SQLOLEDB.1;Integrated Security=SSPI;Persist Security Info=False;Initial Catalog=数据库名;Data Source=服务器别名"
cn.Open
rs.CursorLocation=adUseClient'设置客户端游标
rs.Open "select * from 表名称", cn, 3, 2
Set DataGrid1.DataSource=rs '把记录显示到DataGrid1里
Exit Sub
err:
MsgBox err.Description
End Sub

如何用vb 连接sql server 2000 如何用vb连接SQL Server的非默认实例？如何用vb与网络中的一个sql server 连接如何用vb语句连接SQL数据库 jsp如何用连接池连接SQL SERVER 2005 如何用C#连接到本地SQL Server 2005实例求：如何用vb6中的SQLDMO连接SQL SERVER服务器？ VB怎么连接 SQL server VB 远程连接 SQL Server 如何用VC++登录SQL Server数据库？