VB操作SQL Server(二)——数据录入(增)

页面导航:首页 > 软件编程 > vb.net > VB操作SQL Server(二)——数据录入(增)

VB操作SQL Server(二)——数据录入(增)

来源: 作者: 时间:2016-01-18 16:54 【

通过VB向SQL Server数据库中录入数据,可以使用数据绑定控件录入数据与使用SQL语句录入1.利用数据绑定控件录入数据使用数据绑定控件录入数据可以运行较少的代码,实现向数据库中录入

通过VB向SQL Server中录入数据,可以使用数据绑定控件录入数据与使用SQL语句录入

1.利用数据绑定控件录入数据
使用数据绑定控件录入数据可以运行较少的代码,实现向数据库中录入数据,数据绑定后,由于数据绑定控件已经与数据表相连接,所以只需通过ADO控件的AddNew方法添加一条新的空白记录,再通过Update方法保存当前的记录,即可完成向数据库中录入数据。
例:向数据库中添加一条记录
[vb] 
Private Sub cmdAdd_click() 
      Adodc1.Recordset.AddNew 
End Sub 
 
Private Sub cmdSave_click() 
     Dim I as Long 
     for I =0 to 6 
          Adodc.Recordset.Fields(i).value=Text(i+1).text 
     Next I 
     Adodc1.Recoedset.Update 
     MsgBox"添加信息成功!" 
End Sub 

2.使用Insert语句录入数据
  使用SQL语句录入数据,通过connection对象的execute方法执行SQL语句,语法如下:
    connection.execute字符串,记录数,字符串参数
例:向student数据库中添加一条学生信息
[vb] www.2cto.com
Dim cnn as ADODB.conection 
Dim rst as ADODB.recordset 
 
Private sub Form_Load() 
    set cnn=New ADODB.connection 
    set rst=new ADODB.recordset 
    cnn.open"provider=SQLOLEDB;Persist security Info=True;User ID=sa;Initial Catalog=student;Data Source=." 
    rst.open"select * from student_info",cnn 
    set MSHFlexGrid.DataSource=rst 
End Sub 
 
Private sub cmdAdd_click() 
   cnn.execute"insert into student_info(txtSID,txtName,txtSex;txtBornData,txtRuDate,txtClassNo)" & _ 
      "value('" & txtSID & "','" & txtName & "','" & txtSex & "','" & txtBornDate & "','" & txtRuDate & "','" & txtClassNo & "')" 
End Sub 


作者:linlin80230619
Tags:

文章评论

最 近 更 新
热 点 排 行
Js与CSS工具
代码转换工具

<