vb6.0如何向已存在的数据库添加新记录
现有一个普通的form中放几个text控件和几个command控件,adodc控件,并已经用vb新建了一个access数据库,想达到以下效果:在几个text框中输入好数据...
现有一个普通的form中放几个text控件和几个command控件,adodc控件,并已经用vb新建了一个access数据库,想达到以下效果:在几个text框中输入好数据,然后按一下command就会往数据库中添加新的记录
展开
2个回答
2013-04-29
展开全部
Public myc As ADODB.ConnectionSet myc = New ADODB.Connection
myc.CursorLocation = adUseClient
myc.Open "driver={microsoft access driver (*.mdb)};dbq=数据库名.mdb;defaultdir=数据库所在文件夹;uid=;pwd=;"myc.Execute "insert int 表名 (字段列表) values ('" & text1.text & "','" & text2.text & "','" & text3.text & "','" & text4.text & "') 改下里面对应的数据就应该可以了,如果字段是数值的,把execute后sql命令中对应单引号去掉
myc.CursorLocation = adUseClient
myc.Open "driver={microsoft access driver (*.mdb)};dbq=数据库名.mdb;defaultdir=数据库所在文件夹;uid=;pwd=;"myc.Execute "insert int 表名 (字段列表) values ('" & text1.text & "','" & text2.text & "','" & text3.text & "','" & text4.text & "') 改下里面对应的数据就应该可以了,如果字段是数值的,把execute后sql命令中对应单引号去掉
2013-04-29
展开全部
Private Sub command1_clickdim myc As ADODB.ConnectionSet myc = New ADODB.Connection
myc.CursorLocation = adUseClient
myc.Open "driver={microsoft access driver (*.mdb)};dbq=数据库名.mdb;defaultdir=数据库所在文件夹;uid=;pwd=;"myc.Execute "insert int 表名 (字段列表) values ('" & text1.text & "','" & text2.text & "','" & text3.text & "','" & text4.text & "')End Sub
myc.CursorLocation = adUseClient
myc.Open "driver={microsoft access driver (*.mdb)};dbq=数据库名.mdb;defaultdir=数据库所在文件夹;uid=;pwd=;"myc.Execute "insert int 表名 (字段列表) values ('" & text1.text & "','" & text2.text & "','" & text3.text & "','" & text4.text & "')End Sub
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询