如何通过VS2013中的VB连接mdb数据库

Access 用OleDb.OleDbConnection

连接字符串示例：

Private ConnectionString As String = "Provider=Microsoft.Jet.OLEDB.4.0Data Source=|DataDirectory|\jilu.mdb"

（1）如果是ACCESS数据库，很方便，只要代码中的数据库连接语句中的数据源改为相对地址，Data source =" &App.path &"/xxxx.mdb，然后把数据库Mdb文件放到和你VB工程的同一目录下就可以了，对方不用安装ACCESS也可以运行。

（2）如果是SQL数据库，用INI 或是文本文件记录下当前的数据库的名字等信息程序每次运行时先读取INI就可以了 ，但是对方得安装SQL 服务器。

有多种方法，具体还有看你连接什么数据库，以及采用什么连接方式

我经常用的方法是用DAO连接Access

具体方法是

1、先添加DAO的引用

2、定义全局变量

public DAO.Database myDb

DAO.Workspace myWs

public DAO.Recordset myRec

DAO.DBEngine de = new DAO.DBEngineClass()

3、自己定义一个打开数据库的函数，以便自己调用

public void OpenDb(String sql)

{

string dbStr

dbStr = "c:\\钟山亮.mdb"//数据库的路径

myWs = de.Workspaces[0]

myDb = myWs.OpenDatabase(dbStr, null, null, null)

myRec = myDb.OpenRecordset(sql, DAO.RecordsetTypeEnum.dbOpenDynaset,

DAO.RecordsetOptionEnum.dbDenyWrite,

DAO.LockTypeEnum.dbOptimistic)

}

4、打开数据库

string sql="select * from myTb"//书写你自己的SQL语句

OpenDb(sql)

while (!myRec.EOF)//遍历记录{

myRec.MoveNext()

}

myRec.Close()

myDb.Close()

---