简单问题，在线等，马上结贴

[MonkeyDHua]

我在模版里做了两个过程用来打开数据库，然后在窗体load里用call connopen()来打开，可是怎么错误了，是哪里写错了呢？应该怎么做？

Public Sub connopen()
Set conn = New ADODB.Connection
Dim connstr As String
connstr = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & App.Path & "\data\data.mdb;" & "Persist Security Info=False;"
conn.Open connstr
End Sub

Public Sub connend()
conn.Close
Set conn = Nothing
End Sub

[fly70]

工程->引用->将Microsoft activeX data objects 2.0 library 选上

[babara0715]

你要把错误的信息写出来，还要试一下自己的过程有没有写错

[daisy8675]

你的错误信息是什么，代码没有问题。
如果你要别人解答，起码要帖完整代码。我这边根本看不见你的变量声明在那里

[hosin]

对conn进行操组前，要检查一下它的状态比较好。

[jackchina]

我帮你顶顶人气!!!
你能帮我解答一上我的问题吗:关于"保存"命令条件判断?!!! ,我也在线等啊!我是一个大菜鸟,请帮忙!

[Hassle]

connstr = "DRIVER={Microsoft Access Driver (*.mdb)};DBQ=" & App.Path & "\data\data.mdb"