VB与SQL Server连接失败是什么原因

[qq_42231567]

VB上录入数据无法连接到SQL Server是什么原因
Private Sub Command1_Click()
Dim Conn As New ADODB.Connection
Dim rs As New ADODB.Recordset
Conn.ConnectionString = "Provider=SQLOLEDB.1;Persist security Info=True;User ID=sa;Password=123456;Initial Catalog=特种车辆驾驶员管理系统;Data Source=local"
Conn.Open
Dim sql As String
sql = "insert into 特种车辆驾驶员信息表（DirverID,DriverName,HandringID,CitizenID,Sex,DLGrade,[Date of obtaining DL],[Validity of DL],[Driving Unit]）values('" & Text1.Text & "','" & Text2.Text & "','" & Text3.Text & "','" & Text4.Text & "','" & Text5.Text & "','" & Text6.Text & "','" & Text7.Text & "','" & Text8.Text & "','" & Text9.Text & "')"
rs.Open sql, 3, 3
Conn.Close
End Sub

[二月十六]

vb链接字符串是什么样的？试试把链接字符串里边把数据库地址、端口号写上

[卖水果的net]

Data Source=local" 改成 server=local 或 server=. 或 server=你的ip地址

[zjcxc]

Data Source=local --- 改成 Data Source=(local)