初学者------与ACCESS连接失败
书上抄来的，2个问题，一个是连接失败，我已经建立了数据库和表。二个是出现未声明名称"OleDbe"错误提示。
Imports System.Data.OleDb
Public Class Form1
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
Dim cstring As String = "provider=microsoft.jet.oledb.4.0;data source=txlg1.mdb"
Try
Dim mycon As New OleDbConnection(cstring)
mycon.Open()
MessageBox.Show("已经建立连接", "正确")
mycon.Close()
Catch ex As Exception
'MessageBox.Show(OleDbe.MessageBox, "连接失败") '如果使用这一句，出现未声明名称"OleDbe"错误提示。
MessageBox.Show("连接失败", "失败") '这里出现“连接失败”
End Try
End Sub
End Class
[解决办法]
'Application.DoEvents()
p_DBPath = System.Environment.CurrentDirectory & "\ZD.mdb" '数据库路径
'连接字符串
p_DBcnn1.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;Data source=" & p_DBPath & ";Persist Security Info=False"
p_DBcnn1.Open() '打开数据库连接
p_DBcmd1.Connection = p_DBcnn1 '为p_DBcmd1绑定数据库连接
p_SQLStr = "Select * from ZB"
p_DBcmd1.CommandText = p_SQLStr 'SQL语句
p_DBreader1 = p_DBcmd1.ExecuteReader
[解决办法]
Dim p_DBPath As String '数据库文件名（包括路径)
Dim p_DBcnn1 As New OleDbConnection '定义数据库链接
Dim p_DBcmd1 As New OleDbCommand 'OleDbCommand 类(操作数据库)
Dim p_DBreader1 As OleDbDataReader 'DataReader类
Dim p_SQLStr As String
