vb如何把选中的access数据进行修改 rt vb对access记录进行修改怎么进行

作者&投稿:之图 (若有异议请与网页底部的电邮联系)

  1、对于选中的记录修改其字段值,然后更新记录集即可。

  2、工具:vb6

  3、用adodc连接数据库,用find方法(也可以使用其它方法)选中记录,用Fields().Value修改字段值,用update更新记录集,代码示例如下:

Private Sub Form_Load()
   Adodc1.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;" & _
           "Data Source=C:\db1.mdb;Persist Security Info=False"
   Adodc1.RecordSource = "select * from Categories"
   Adodc1.CursorLocation = adUseClient
   Adodc1.Refresh
   Debug.Print Adodc1.Recordset.RecordCount
   Set DataGrid1.DataSource = Adodc1
End Sub

Private Sub Command1_Click()
   Adodc1.Recordset.Find "CategoryID=" & Val(Text1.Text)
End Sub

Private Sub Command2_Click()
  Adodc1.Recordset.Fields("CategoryName").Value = Text2.Text
  Adodc1.Recordset.Update
  Adodc1.Recordset.Requery
  
End Sub

  4、注意:本例中可以不使用Requery重新查询,但使用它是好习惯。



例如修改用户名称和密码
Adodc1.Recordset.AddNew
Adodc1.Recordset.Fields("用户名称") = Trim(Text1.Text)
Adodc1.Recordset.Fields("用户密码") =Trim(Text2.Text)
Adodc1.Recordset.Update
Adodc1.Recordset.MoveLast

rs.Open "select * from 表名 where 列明 = '原来的值'', cn, adOpenKeyset, adLockOptimistic
rs("列名")="修改后的值"
rs.update
rs.close

用update 表名 set 字段1=值1,字段2=值2……where 主键=值语句
数据库都是用SQL语句的。

update。。。。。。

只能说这么多了 剩下的就看悟性了

VB如何对Access数据库中已经查询到的数据进行修改?~

改为如下,用循环方法,先在数据库中找到要修改记录的ID后, 再修改。
Private Sub Commandxiugai_Click()
Dim K As Integer
Dim rs As ADODB.Recordset
Dim conn As ADODB.Connection
Dim sqlStr As String

Set conn = New ADODB.Connection
Set rs = New ADODB.Recordset
conn.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=E:\雅颜の小铺会员管理系统\xinjianhy.mdb;Persist Security Info=False"
sqlStr1 = "select * from xjhy”
rs.Open sqlStr1, conn, adOpenKeyset, adLockOptimistic
If Not rs.EOF Then
rs.MoveFirst
End If

For K = 1 To rs.RecordCount
If rs(”ID”)=trim(Text1.text) then
r提交修改s("MONEY”)=Val(Text3.Text)
rs.Update
MsgBox "修改成功!", vbOKOnly
Goto 100
End if
rs.MoveNext
Next K
MsgBox "修改失败!", vbOKOnly

100
Rs.close
Set conn=nothing
End sub

'把下面代码按下面说明修改后,放到【保存按钮】的【单击事件】中: '【Temp】表改成你的表名称, '【姓名】改成你指定查询条件的字段名称, '【指定条件】改成你指定查询条件控件的值, '【身份证号码】改成你要修改内容的字段名称, '【textbo...

access 如何将A表中的全部数据追加到B表中
答:如果要输出的表已经存在则T1和后面的一样使用下面的语句实现 (2)然后使用下面的命令一次追加T2,...表的内容到该表中:INSERT INTO [结果表的表名] SELECT * FROM T2;INSERT INTO [结果表的表名] SELECT * FROM T3;INSERT INTO [结果表的表名] SELECT * FROM T4;注意ACCESS查询中一次只能...

asp代码实现access数据导出到excel文件
答:--将表的数据写入EXCEL myfile.writelinestrLine rs.MoveNext loop rs.Close setrs=nothing conn.close setconn=nothing setmyfile=nothing Setfs=Nothing Response.WriteBRBRcenterb导出成功,请选择继续操作/b/center Response.Writebr response.Writetablewidth=90%cellspacing=1cellpadding=3align=center ...

access提取单元格里面的数据
答:从左侧取字符:left(字符串,字符数) 比如:left(abc,2) —— ab 从中间取字符:mid(字符串,开始位置,字符数) 比如mid(abc,2,1)—— b 从右侧取字符:right(字符串,字符数) 比如:right(abc,2) —— bc

delphi数据库问题 Access数据库表复制另一个表的数据 (表数据复制)谢谢...
答:如果两个表不在一个数据库中,那就得打开两个数据库,有时候ACCESS不让你同时打开两个ACCESS,但反复多打开几次就可以打开了。打开之后,再进行复制粘贴操作。2、如果说这种操作是经常的,也就是要提供给软件用户操作的,那就只有通过DELPHI代码来实现了。用代码进行复制,可以直接用SQL命令进行表的复制...

在ACCESS数据库中,怎样把一个表的某些字段的某些记录复制到另一个表...
答:(假设要把表A中的某条记录复制到表B中) 1、在设计视图中打开表A,并选择要复制的记录 2、单击工具栏中的“查询类型”选择“追加查询”弹出生成表对话框。表名称选B、选“当前数据库” 基本上就OK了!! 快去试试吧!! 本回答被提问者采纳 痕★∵迹 | 推荐于2017-12-16 09:49:55 举报| 评论 0 2 ...

access 如何更新并添加新数据
答:在Access中,更新与添加是不同的操作。版本:Access 2013 1、更新数据 有原数据如下:要将“08物理”的“与bad的关系”一列内容改成“bad的不二粉丝”,可用如下语句:update 新表 set [与bad的关系] = 'bad的不二粉丝' where name='08物理'更新后结果:2、添加数据 要在上述表中添加一条“id...

如何实现ACCESS窗体中在一个组合框内选中目标字段后其对应的字段也自动...
答:如上,即如果在物料编号中选择,则物料名称与规格型号自动显示(这几个字段来自于"物料信息"表,而我想要这个功能在“入库记录”窗体的组合框中实现) 追答 那麼如上说的做法可以实现你的目的:物料名称文本框的控制项数据来源设置:=DLookUp("物料名称","物料信息","物料编号='" & [组合框A名称]& "'")规格型号...

ACCESS中如何把表中的一个字段复制到另一个表中?
答:select * into newtable from table where 字段 like '%中%'或如果另一张表已经存在,则用下面的:insert into newtable select * from table where 字段 like '%中%'如果上面的话,要注意字段是否一样多,或字段类型是否一致的问题.

怎么在access里选中第100万到1065000条之间的数据
答:题主这个问题对于ACCESS数据库来说的确是一个难题,单纯用SQL的话需要借助自增id列,也就是数据表必须有一个自增id列才行,否则只能借助VBA编程等其他手段了。请参考下列语句:select top 65001 a.* from t1 a,(select max(b.id) as maxid from (select top 1000000 id from t1) b,(select ...

将Access数据库中的数据发布在Internet网络上可以通过( )。_百度知...
答:【答案】:D 本题考查的是数据访问页。数据访问页是用户通过因特网进行数据交互的数据库对象,可以用来发布数据库中任何保存的数据。