请帮我看下VB的ADO控件连接SQL数据库哪里错了！

来源：百度知道 编辑：UC知道 时间：2024/07/03 10:04:20
提示：ODBC 驱动程序管理器未发现数据源名称并且未指定默认程序。代码如下：Private Sub Form_Load()
Dim cn As New ADODB.Connection
cn.ConnectionString = "DSN=Personnel;UID=sa,PWD=;"
cn.Open
不知道哪里就了，在管理工具里已经设置好了！还是不能连接上！请高手解决！谢谢！

con0.Open "Provider=SQLOLEDB.1;Password=2752;Persist Security Info=True;User ID=sa;Initial Catalog=ALS;Data Source=10.170.0.81"
Rec0.CursorLocation = adUseClient
strsql3 = "select LinID from ZLin where CFC=1 order by 'LinID'"
Rec0.Open strsql3, con0, adOpenKeyset, adLockPessimistic
If Not Rec0.EOF = True Then
Set Me.DataCombo3.RowSource = Rec0
Me.DataCombo3.ListField = Rec0.Fields("LinID").Name
End If
没大看明白你的连接，感觉你的连接好像不完整
这个是我的源程序，你看能用不。。。

到你的控制面板去看看数据源中是否有一个名为Personnel的数据连接。没有就添加，有就检查设置正确吗。