用vb怎么连接SQL数据库

Question

用vb怎么连接SQL数据库,请指教

Answer 1

'Sql_Server 连接
Dim connstr
Dim conn
connstr = "Provider=SQLOLEDB;Data Source='192.168.0.222';DATABASE=muonline;UID=mu;pwd=991588"
'connstr = DBconnect.Provider = "SQLOLEDB.1"
'DBconnect.ConnectionString = "DATABASE='muonline';SERVER='192.168.0.222' ;UID='mu';PWD='991588';"'打开
Set conn = CreateObject("adodb.connection")
'Set conn = Server.CreateObject("ADODB.Connection")
conn.open connstr

Answer 2

一楼的,web版的来这赚分来啦?

Answer 3

一段代码,希望看得明白哪些地方可以填你自己的东西.首先引用ado
Set conn = New ADODB.Connection
Set rsxx = New ADODB.Recordsetconn.ConnectionString = "Provider=SQLOLEDB;Data Source=XXX;UID=XXX;pwd=XXX" 
conn.CommandTimeout = 30
conn.CursorLocation = adUseClient
conn.Openrsxx.Open "select * from ITEM where PROP_NO like 'K%'", conn, adOpenStatic, adLockOptimistic
Set VF1.DataSource = rsxx
VF1.Refresh
从引用到建立连接到取得记录集.全有了

Answer 4

Public Con As New ADODB.Connection
Public rs As New ADODB.Recordset
Public str As String
Sub main()
    Dim str As String    '连接SQL数据库,数据库名称=Manager,登录名:sa,密码:sa,    str = "provider=sqloledb.1;data source=.;initial catalog=Manager;user id=sa;password=sa"    '打开连接str
    Con.Open str    '显示登录窗体
    frmPic.ShowEnd Sub

Answer 5

建议查MSDN关于ADODB和ADODC的内容
包括connectiont对象和recordset对象

Answer 6

这种问题在FAQ中查找一下就很多了！！
或者一个简单的方法就是用ADODC控件直接生成连接字符串，然后粘贴到connectstring中就可以了，主要是连接对象的连接字符串正确！！