请教各大虾们,求VB连接SQL数据库的语句!!!!!!!!!

[txqgyf]

小弟我刚学VB不久,想知道
用什么语句能把SQL里的数据连接,
并且有哪几种方法,并说明哪一种好一点!!!!
谢谢!!!!!!!!!!!!!

[daisy8675]

ado连接咯

拿一个adodc控件，按属性页面去连接，最后会自动生成连接字符。

[txqgyf]

还有其它的办法吗????
ADODC控件我用过,不是很好.

我要的是编码!!!!!!!!!!
谢谢!!!!!!!!!!!!!!!

[wenhongL]

Dim cn As New ADODB.Connection
Dim rs As New ADODB.Recordset
cn.ConnectionString = "Provider=SQLOLEDB.1;SERVER=" & ServerName & ";DATABASE=" & DatabaseName & ";UID=" & SysUserName & ";PWD=" & SysPassword
If cn.State = 1 Then cn.Close
cn.Open
rs.Open "select * from tb ", cn, 1, 1

[benny7878]

用ODBC
把工程属性的启动对象改成SUB MAIN
在工程/引用里引用MS AXTIVEX DATA OBJECTS 2。6
以下写在模块里：
public cn as adodb.connection
public rs as adodb.recordset
sub main()
Set cn = New ADODB.Connection
cn.Open "dsn=fchy;uid=sa;password=SCENERY;"
end sub

[shmilyls]

'创建ADO连接数据库对象
Public adoCon As ADODB.Connection
'创建ADO记录集对象
Public adoRS As ADODB.Recordset
'创建ADO命令对象
Public adoCmd As ADODB.Command
'创建ADO参数对象
Public adoPara As ADODB.Parameter
Public proCon As String


Public Sub ConnectDB()
'创建新的ADO连接对象
Set adoCon = New ADODB.Connection
With adoCon
'指明连接数据库所使用的驱动程序是SQL
.Provider = "SQLOLEDB"
'指定连接字符串
'Server是SQL Server服务器的名字---SQL SERVER的实例名（不一定是机器名）
'Uid是SQL SERVER的登录名
'Pwd是SQL SERVER的登录（如sa）的对应的密码
'Database指定在SQL SERVER数据库中已经建立的数据库名
.ConnectionString = "Server=;Uid=;Pwd=;Database="
'打开连接
.Open
End With

End Sub

[gzsxy8013]

ado控件 很好的 vb.net夯得一笔调子

[haipingma]

http://www.connectionstrings.com
給你看看