vb mysql 插入记录_怎么用VB向SQL数据库中添加记录

Sub 添加_OnClick(ByVal sender As Object, ByVal e As EventArgs)

Dim SqlConn As New SqlConnection

SqlConn.ConnectionString = "Persist Security Info=true;Initial Catalog=Data;uid=sa;pwd=123456;Data Source=.;"

SqlConn.Open()

Dim SqlCmd As New SqlCommand

SqlCmd.Connection = SqlConn

SqlCmd.CommandText = "Insert into #table (客户编号,性别,电话,电子信箱,地址,住址)values('" & 客户编号.Text & "','" & 性别.Text & "','" & 电话.Text& "','" & 电子信箱.Text & "'," & 地址.Text & ",'" & 住址.Text & "')"

SqlCmd.ExecuteNonQuery()

SqlConn.Close()

End Sub

取消

评论