vb 提示运行时错误 操作已被取消
来源:百度知道 编辑:UC知道 时间:2024/09/13 02:39:35
编的时候提示调试
Private Sub MDIForm_Load()
Dim strCnn As String
strCnn = "Provider=MSDASQL.1;Persist Security Info=False; data source=sellsystem"
conn.Open strCnn
MDIfrmMain.mnchpwd.Enabled = False
MDIfrmMain.adduser.Enabled = False
MDIfrmMain.mntrade.Enabled = False
MDIfrmMain.mnbuyst.Enabled = False
MDIfrmMain.mnsellst.Enabled = False
MDIfrmMain.mngrade.Enabled = False
MDIfrmMain.mntable.Enabled = False
End Sub
那里错了呀 还有就是不明白运行vbp文件的时候提示路径/文件访问错误 是怎么回事?好心人 帮我解答一下 谢谢了 我的毕业设计马上就要交了很急呀
一楼的 还是运行不出来呀 提示数据源名称过长 现在还是不知道怎么改 怎么就提示操作已被取消呢
Private Sub MDIForm_Load()
Dim strCnn As String
strCnn = "Provider=MSDASQL.1;Persist Security Info=False; data source=sellsystem"
conn.Open strCnn
MDIfrmMain.mnchpwd.Enabled = False
MDIfrmMain.adduser.Enabled = False
MDIfrmMain.mntrade.Enabled = False
MDIfrmMain.mnbuyst.Enabled = False
MDIfrmMain.mnsellst.Enabled = False
MDIfrmMain.mngrade.Enabled = False
MDIfrmMain.mntable.Enabled = False
End Sub
那里错了呀 还有就是不明白运行vbp文件的时候提示路径/文件访问错误 是怎么回事?好心人 帮我解答一下 谢谢了 我的毕业设计马上就要交了很急呀
一楼的 还是运行不出来呀 提示数据源名称过长 现在还是不知道怎么改 怎么就提示操作已被取消呢
你的DataSource的路径写错了,我帮你改了。
Private Sub MDIForm_Load()
Dim strCnn As String
strCnn = "Provider=MSDASQL.1;Persist Security Info=False; data source=" & App.Path & "\sellsystem.mdb"
或
strCnn = "Provider=MSDASQL.1;Persist Security Info=False; data source= D:\sellsystem.mdb"
conn.Open strCnn
MDIfrmMain.mnchpwd.Enabled = False
MDIfrmMain.adduser.Enabled = False
MDIfrmMain.mntrade.Enabled = False
MDIfrmMain.mnbuyst.Enabled = False
MDIfrmMain.mnsellst.Enabled = False
MDIfrmMain.mngrade.Enabled = False
MDIfrmMain.mntable.Enabled = False
End Sub