UC知道编写VB系统时出现的错误！！！！
来源：百度知道 编辑：UC知道 时间：2024/09/22 12:51:56
运行的时候提示"实时错误 2147467259（80004005）
[Microsoft][obdc 驱动程序管理器] 未发现数据源名称并且为指定默认驱动程序"
上下文是
Private Sub MDIForm_Load()
Dim X0 As Long
Dim Y0 As Long
X0 = Screen.Width
Y0 = Screen.Height
X0 = (X0 - Me.Width) / 2
Y0 = (Y0 - Me.Height) / 2
Me.Move X0, Y0
Dim strCnn As String
strCnn = "Provider=MSDASQL.1;Persist Security Info=false;Data Source=小区物业管理系统"
（说是让调着一句）conn.Open strCnn
mnAddUser.Enabled = False
mnLouPan.Enabled = False
mnZhuHu.Enabled = False
mnTouSu.Enabled = False
mnBaoXiu.Enabled = False
mnWuYeFee.Enabled = False
frmLogin.Show
请问哪个大狭给解释解释！！！万分感谢！！！1
我需要详细的解答！！！！
[Microsoft][obdc 驱动程序管理器] 未发现数据源名称并且为指定默认驱动程序"
上下文是
Private Sub MDIForm_Load()
Dim X0 As Long
Dim Y0 As Long
X0 = Screen.Width
Y0 = Screen.Height
X0 = (X0 - Me.Width) / 2
Y0 = (Y0 - Me.Height) / 2
Me.Move X0, Y0
Dim strCnn As String
strCnn = "Provider=MSDASQL.1;Persist Security Info=false;Data Source=小区物业管理系统"
（说是让调着一句）conn.Open strCnn
mnAddUser.Enabled = False
mnLouPan.Enabled = False
mnZhuHu.Enabled = False
mnTouSu.Enabled = False
mnBaoXiu.Enabled = False
mnWuYeFee.Enabled = False
frmLogin.Show
请问哪个大狭给解释解释！！！万分感谢！！！1
我需要详细的解答！！！！
检查ODBC中定义的数据源名称是否一致(小区物业管理系统)
检查ODBC数据连接访问地址和数据库是否写对
===================================
或者可以使用OLEDB的连接方式
重新检查ODBC,最好不要用中文
Data Source=小区物业管理系统
在ODBC里重添加一个连接,指定你所要访问的库,再在代码里添加上去,就搞定,很简单的.努力吧,
strCnn = "Provider=MSDASQL.1;Persist Security Info=false;Data Source=小区物业管理系统"
检查名称 我也出现过这个问题 不要用汉字 就可以了
“数据源名称” 的定义呢？