- '------------------VB.Net链接Access方法----------------------------------------
- Dim objConn As New OleDbConnection()
- objConn.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0; Data source=" + Application.StartupPath() + "/PDDAWEB.mdb"
- objConn.Open()
- Dim objCmd As New OleDbDataAdapter("select * from pddawebtest", objConn.ConnectionString)
- Dim ds As New DataSet()
- objCmd.Fill(ds, "pddaweb")
- objConn.Close()
- Dim myTable As DataTable = ds.Tables("pddaweb")
- myTable.Rows(0)("name") = "gantian"
- Dim myRow As DataRow = myTable.NewRow()
- myRow("name") = "yitahutu"
- myRow("age") = "30"
- myTable.Rows.Add(myRow)
- Dim objCB As OleDbCommandBuilder = New OleDbCommandBuilder(objCmd)
- objCmd.Update(ds, "pddaweb")
- Console.WriteLine("that is ok.")
- Console.ReadLine()
- 'Application.StartupPath()是指当前程序的目录,这个是System.Windows.Form里有的一个变量。
- '/PDDAWEB.mdb是具体的Access文件名称,还有前面需要一个"/"
- 'select * from pddawebtestSQL语句,这里用的是导出表信息。
- 'pddaweb指的是填充用的表名,
- '蓝色部分起到的作用是回滚,只有回滚了,数据表才能更新。
VB.Net链接Access的方法
最新推荐文章于 2018-07-05 10:27:00 发布