为Private Sub Command2_Click()
Call openconn
Set rs = New ADODB.Recordset
rs.Open "select * from dxsz", Conn, adOpenKeyset, adLockOptimistic
rs.AddNew
rs("编号") = Text2.Text
rs("事故日期") = DTPicker1
rs("主干道") = Text4.Text
rs("辅道") = Text5.Text
rs("职号") = Text1.Text
rs("姓名") = Text3.Text
rs("伤者姓名") = Text6.Text
rs("年龄") = Text7.Text
rs("家庭住址") = Text9.Text
rs("医院") = Text10.Text
rs("工作单位") = Text11.Text
rs("伤势") = Text12.Text
rs.Update
rs.Close
Set rs = Nothing
Call closeconn
MsgBox "添加数据成功!"
End Sub什么,我用VBADODC插入记录到ACCESS时,access每条记录指针上出现“+”号
Call openconn
Set rs = New ADODB.Recordset
rs.Open "select * from dxsz", Conn, adOpenKeyset, adLockOptimistic
rs.AddNew
rs("编号") = Text2.Text
rs("事故日期") = DTPicker1
rs("主干道") = Text4.Text
rs("辅道") = Text5.Text
rs("职号") = Text1.Text
rs("姓名") = Text3.Text
rs("伤者姓名") = Text6.Text
rs("年龄") = Text7.Text
rs("家庭住址") = Text9.Text
rs("医院") = Text10.Text
rs("工作单位") = Text11.Text
rs("伤势") = Text12.Text
rs.Update
rs.Close
Set rs = Nothing
Call closeconn
MsgBox "添加数据成功!"
End Sub什么,我用VBADODC插入记录到ACCESS时,access每条记录指针上出现“+”号
解决方案 »
- 请问 有没有办法在一个有模式的窗体下面显示一个无模式窗体!?
- vb6中怎样检测电脑上安装有MS SQL数据库,并安装有northwind、Master数据库实例
- 救命啊,回复就给分
- 关于VB工程开发环境功能的问题(在线 立结)
- 简单问题
- 急,高分求救
- 哪位大侠能给出这个网站查询的代码?可以给money
- 知道一个窗体的句柄,想做以下的事,How??
- www.msdn.net是什么鬼地方?我还以为会有很多人呢,没想到象个个人主页!msdn.com又访问不了,靠,搞不明白,Microsft的MSDN跑哪儿去了?
- 请教Vb程序加载窗体时出现错误的通常原因,删除掉form1.log文件不会对以后有影响吧?
- VB 可以和usb 串口通信么? 恳求答案
- vb程序执行时鼠标动一下就出现程序死机的情况,只能重新启动vb6.0
不是很明白你的意思