再问 datagridview 自动更新、删除、添加的问题

[复制链接]
查看11 | 回复6 | 2021-1-27 05:48:41 | 显示全部楼层 |阅读模式
在网上东拼西凑,弄了如下的代码

PrivateSubButton24_Click(ByValsenderAsSystem.Object,ByValeAsSystem.EventArgs)HandlesButton24.Click
Dimstr1AsString
DimmyconAsOleDb.OleDbConnection
DimDataFile_nameAsString
DimmycomAsOleDb.OleDbCommand
DimmyadpAsOleDb.OleDbDataAdapter
DimCBuilderAsOleDb.OleDbCommandBuilder
DimmydsAsNewDataSet
dimConnString,DataFile_Pathasstring
DataFile_Path="E:\VB-database2015\experiment008\data\ex.mdb"
ConnString="Provider=Microsoft.Jet.OLEDB.4.0;DataSource="&DataFile_Path&";PersistSecurityInfo=True;JetOLEDB:DatabasePassword=admin"
DataFile_name="userinfo"
str1="select*from"&DataFile_name
mycon=NewOleDb.OleDbConnection(ConnString)
mycon.Open()
mycom=NewOleDb.OleDbCommand(str1,mycon)
myadp=NewOleDb.OleDbDataAdapter
mycom.Connection=mycon
'''''mycom.CommandType=mycom.CommandType.Text
''''mycom.CommandText=DataFile_name
myadp.SelectCommand=mycom

'myadp.MissingSchemaAction=MissingSchemaAction.AddWithKey
CBuilder=NewOleDb.OleDbCommandBuilder(myadp)
'CBuilder.QuotePrefix="["
'CBuilder.QuoteSuffix="]"
Try
IfCBuilderIsNothingThen
CBuilder.DataAdapter=NewOleDb.OleDbDataAdapter
myadp.DeleteCommand=CBuilder.DataAdapter.DeleteCommand
myadp.InsertCommand=CBuilder.DataAdapter.InsertCommand
myadp.UpdateCommand=CBuilder.DataAdapter.UpdateCommand
EndIf
Ifmyds.HasChanges=TrueThen
myadp.Update(myds,DataFile_name)
''''table1DataAdapter.adapter.update(tablename)
MsgBox("数据更新成功!")
Else
MsgBox("无数据更新!")
EndIf
CatchexAsException
MsgBox("userinfo数据库更新出错")
EndTry
mycom.Connection=mycon
mycon.Close()
FillDataGrid2("Select*from"&DataFile_name)
EndSub
没有与datagridviewer2连接上,怎么修改呢?

分 -->
回复

使用道具 举报

千问 | 2021-1-27 05:48:41 | 显示全部楼层
在网上东拼西凑,弄了如下的代码
-》东拼西凑?还是先找个比较完整的例子认认真真的学习一下吧。
回复

使用道具 举报

千问 | 2021-1-27 05:48:41 | 显示全部楼层
网上找不到完整的例子,没有办法。
大家有没有完整的程序,简单的就行,可以分享下。
回复

使用道具 举报

千问 | 2021-1-27 05:48:41 | 显示全部楼层
你这段代码与datagridviewer2有什么关系呢?连datagridviewer2的一根毛也没有发现啊。
回复

使用道具 举报

千问 | 2021-1-27 05:48:41 | 显示全部楼层
http://download.csdn.net/detail/a304788727/630969
回复

使用道具 举报

千问 | 2021-1-27 05:48:41 | 显示全部楼层
谢谢devmiao。

我把程序下载了,是c#,可以打开,运行出现错误终止。是网络数据库,看不懂。
各位有没有vb的直接datagridviewerupdate的方法?
回复

使用道具 举报

千问 | 2021-1-27 05:48:41 | 显示全部楼层
http://blog.sina.com.cn/s/blog_56e19aa70100yhia.html
这个文章不错,我将两段程序直接改成函数,然后调用,数据能显示,数据库也能更新。
回复

使用道具 举报

您需要登录后才可以回帖 登录 | 立即注册

本版积分规则

主题

0

回帖

4882万

积分

论坛元老

Rank: 8Rank: 8

积分
48824836
热门排行