vb.net 如何读取和修改access中的数据并保存 VS2008环境
比如我有个名字为param.mdb的数据库,存储在E下面的IO文件夹中数据库里有两个列表,一个叫A一个叫B,在A里面有四个记录,假设记录名称分别为C,D,E,F,C,D,...
比如我有个名字为param.mdb的数据库,存储在E下面的IO文件夹中
数据库里有两个列表,一个叫A一个叫B,在A里面有四个记录,假设记录名称分别为C,D,E,F,
C,D,E,F都有相对应的数据在后面一列,请问我要如何读取这些数据显示到Form1上四个对应的textbox中;
相对应的,如何把Form1上四个对应的textbox上直接修改数据并保存回数据库中
参考了很多提问也没搞明白,谁给我能用的代码我试试,谢谢
我重新整理下吧,之前的问题有点问题
我点击读取参数按钮,执行读取参数的功能,将数据库中“设备参数”下的四组参数分别显示到界面上的四个TextBox中,我在直接在TextBox输入新的参数进去,点击保存参数可以将新的参数覆盖原来的参数,谢谢,上面那个代码好像有问题,我是个菜鸟,改不出来 展开
数据库里有两个列表,一个叫A一个叫B,在A里面有四个记录,假设记录名称分别为C,D,E,F,
C,D,E,F都有相对应的数据在后面一列,请问我要如何读取这些数据显示到Form1上四个对应的textbox中;
相对应的,如何把Form1上四个对应的textbox上直接修改数据并保存回数据库中
参考了很多提问也没搞明白,谁给我能用的代码我试试,谢谢
我重新整理下吧,之前的问题有点问题
我点击读取参数按钮,执行读取参数的功能,将数据库中“设备参数”下的四组参数分别显示到界面上的四个TextBox中,我在直接在TextBox输入新的参数进去,点击保存参数可以将新的参数覆盖原来的参数,谢谢,上面那个代码好像有问题,我是个菜鸟,改不出来 展开
展开全部
Dim myConnOle1 As New OleDbConnection
myConnOle1.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source= "E\IO\param.Mdb"
myConnOle1.Open()
’显示
Dim sql As string= "SELECT C,D ,E,F From A where ………………"
Dim da As new OleDbDataadapter = (sql,myConnOle1)
Dim dt as new datatable
da.Fill(dt)
textbox1.text= dt.rows(0)(0)(0)(0)
textbox2.text= dt.rows(0)(1)(0)(0)
textbox3.text= dt.rows(0)(0)(1)(0)
textbox4.text= dt.rows(0)(0)(0)(1)
‘修改
Dim sqlupdt As string= "update A set C=’“&textbox1.text&”‘ ………………"
dim cmd as new oledbcommand(sqlupdt,myConnOle1)
cmd.ExecuteNonQuery()
myconn.close()
msgbox(“给点悬赏吧朋友~~~~O(∩_∩)O~~~~~”)
myConnOle1.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source= "E\IO\param.Mdb"
myConnOle1.Open()
’显示
Dim sql As string= "SELECT C,D ,E,F From A where ………………"
Dim da As new OleDbDataadapter = (sql,myConnOle1)
Dim dt as new datatable
da.Fill(dt)
textbox1.text= dt.rows(0)(0)(0)(0)
textbox2.text= dt.rows(0)(1)(0)(0)
textbox3.text= dt.rows(0)(0)(1)(0)
textbox4.text= dt.rows(0)(0)(0)(1)
‘修改
Dim sqlupdt As string= "update A set C=’“&textbox1.text&”‘ ………………"
dim cmd as new oledbcommand(sqlupdt,myConnOle1)
cmd.ExecuteNonQuery()
myconn.close()
msgbox(“给点悬赏吧朋友~~~~O(∩_∩)O~~~~~”)
追问
我试一下先哦,没问题一定采纳,先谢谢你的帮助啊
追答
有疑问可以追问
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询