请教VB2005中连接SQL2000数据库代码的问题？

[zxy7608035]

在VB6中，我连接SQL2000没有任何问题，使用连接字符串。
但在VB2005我不知道该如何做？请教各位是否有这方面的例子代码或者程序？谢谢。我查了好多资料，说的都是连接ACCESS的代码，没有SQL的完整代码。
我不用绑定，我想利用连接字符串，当查询完数据后，我就要关闭连接。

以下是我用VB6写的连接SQL2000完整代码，往数据库中写入数据
Private Function WriteSQL(Data1() As String, Data2() As Single, Data3() As String, Data4() As String) As String '写入数据库
Dim m As Integer,n As Integer,k As Integer
Dim strSQL As String

Dim cn As ADODB.Connection
On Error Resume Next

Set cn = New ADODB.Connection
Dim cn_str As String
cn_str = "DRIVER=SQL Server;server=" & ServerName & ";uid=sa;pwd=;database=Test"
cn.Open cn_str

For m = 0 To UBound(Data4)
strSQL = "'" & Data1(m) & "',"
For n = 0 To UBound(Data2, 2)
strSQL = strSQL & Data2(m, n) & ","
Next
strSQL = strSQL & "'" & Data3(m) & "'"
strSQL = "INSERT INTO " & Data4(m) & " VALUES(" & strSQL & ")"
cn.Execute strSQL
Next

cn.Close
Set cn = Nothing
End Function

[vbman2003]

生病在家休息，手边没有vs2005,给不出示例，你在网上搜索一下SqlDbConnection....这是vs2005给sql量身打造的sql数据库连接对象...

[vbman2003]

vb2005的数据库引擎是ADO.NET,对象方法与VB6中引用的ado对象完全不同....
虽然vb2005中可以添加ADO引用来实现vb6的代码，不过放弃ado.net的优势还不如不用vb2005...

[zxy7608035]

谢谢楼上朋友，对VB2005我刚刚开始用，请问VB2005如何连接数据库比较高效？是否有这方面的例子？

[hzybc]

http://www.connectionstrings.com/