Protected Sub button1_Click(ByVal sender As Object, ByVal e As EventArgs) Handles button1.Click Dim mid As String(定义一个变量mid) Dim mname As String(定义一个变量mname) mid = TextBox1.Text(变量mid接受textbox1的值) mname = TextBox2.Text(变量mname接受textbox2的值) Dim cnn As SqlConnection(定义一个变量cnn,类型为sqlconnection) Dim cmd As SqlCommand(定义一个变量,类型为sqlcommand) cnn = New SqlConnection(ConfigurationSettings.AppSettings("student"))(将cnn实例化,且指定连接为web.config中的student) cmd = New SqlCommand("insert_proce", cnn)(将cmd实例化,执行insert_proce这个存储过程,使用cnn这个连接) cmd.CommandType = CommandType.StoredProcedure(cmd的命令类型为存储过程) cmd.Parameters.Add("@xuehao", SqlDbType.NVarChar, 10).Value = mid(将接收到的值通过parameters属性传递过去,mid的值赋予存储过程的@xuehao) cmd.Parameters.Add("@xingming", SqlDbType.NVarChar, 10).Value = mname(同上)
cnn.Open()
(打开连接) cmd.ExecuteNonQuery()
(执行)
End Sub
insert_proce存储过程:
CREATE PROCEDURE insert_proce @xuehao varchar(10),@xingming varchar(10) AS
insert into member (MID,MNAME) VALUES (@xuehao,@xingming)
GO