我没用的2008 ,这是2005里我写的Dim constr As String = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & Application.StartupPath & "\zr.mdb;Jet OLEDB:Database Password=1234 "Dim olecon As OleDbConnectionolecon = New OleDbConnection(constr)Dim comstr As String = "select * from cb where cname='ww'"Dim comm As New OleDbCommand(coms
Dim path As String = "D:\vb\TEXT\Sj\Sj\data\Access_2007.accdb" Dim conn As String = "Provider=Microsoft.ACE.OLEDB.12.0;Data Source=" & path & ";Jet OLEDB:Database Password=MyDbPa