44
Hi
I have created a stored procedure for registration form as
SET ANSI_NULLS ON
GO
SET QUOTED_IDENTIFIER ON
GO
-- =============================================
-- Author: <Author,,Name>
-- Create date: <Create Date,,>
-- Description: <Description,,>
-- =============================================
CREATE PROCEDURE dbo.Pro_Login
@loginid varchar(50),
@password varchar(50),
@confirmpassword varchar(50),
@firstname varchar(50),
@lastname varchar(50),
@address varchar(200),
@address2 varchar(200),
@address3 varchar(200),
@city varchar(50),
@country varchar(50),
@province varchar(50),
@postalcode bigint,
@phone varchar(50),
@email varchar(50),
@how varchar(50)
AS
BEGIN
-- SET NOCOUNT ON added to prevent extra result sets from
-- interfering with SELECT statements.
SET NOCOUNT ON;
-- Insert statements for procedure here
insert into login
(loginid,password,confirmpassword,firstname,lastna me,address,address2,address3,city,country,province ,postalcode,phone,email,how)
values(@loginid,@password,@confirmpassword,@firstn ame,@lastname,@address,@address2,@address3,@city,@ country,@province,@postalcode,@phone,@email,@how)
END
I have called the stored procedure in my front end as
Dim con As SqlConnection
Dim cmd As SqlCommand
Dim str As String
str = "user id=sa;password=cast;database=jsc;server=AURORA-SERVER"
con = New SqlConnection(str)
Try
con.Open()
cmd.CommandType = CommandType.StoredProcedure
cmd.CommandText = " Pro_Login "
cmd.Connection = con
Dim loginid As New SqlParameter("@loginid", SqlDbType.VarChar, 50)
loginid.Value = txtLoginId2.Text.ToString()
Dim password As New SqlParameter("@password", SqlDbType.VarChar, 50)
password.Value = txtPassword1.Text.ToString()
Dim confirmpassword As New SqlParameter("@confirmpassword", SqlDbType.VarChar, 50)
confirmpassword.Value = txtConfirmPassword.Text.ToString()
Dim firstname As New SqlParameter("@firstname", SqlDbType.VarChar, 50)
firstname.Value = txtFirstName.Text.ToString()
Dim lastname As New SqlParameter("@lastname", SqlDbType.VarChar, 50)
lastname.Value = txtLastName.Text.ToString()
Dim address As New SqlParameter("@address", SqlDbType.VarChar, 200)
address.Value = txtAddress.Text.ToString()
Dim address2 As New SqlParameter("@address2", SqlDbType.VarChar, 200)
address2.Value = txtAddress2.Text.ToString()
Dim address3 As New SqlParameter("@address3", SqlDbType.VarChar, 200)
address3.Value = txtAddress3.Text.ToString()
Dim city As New SqlParameter("@city", SqlDbType.VarChar, 50)
city.Value = txtCity.Text.ToString()
Dim country As New SqlParameter("@country", SqlDbType.VarChar, 50)
country.Value = ddlCountry.Text.ToString()
Dim province As New SqlParameter("@province", SqlDbType.VarChar, 50)
province.Value = txtProvince.Text.ToString()
Dim postalcode As New SqlParameter("@postalcode", SqlDbType.BigInt)
postalcode.Value = CInt(txtPostalCode.Text.ToString())
Dim phone As New SqlParameter("@phone", SqlDbType.VarChar, 50)
phone.Value = txtPhone.Text.ToString()
Dim email As New SqlParameter("@email", SqlDbType.VarChar, 50)
email.Value = txtEmail1.Text.ToString()
Dim how As New SqlParameter("@how", SqlDbType.VarChar, 200)
how.Value = txtHow.Text.ToString()
cmd.Parameters.Add(loginid)
cmd.Parameters.Add(password)
cmd.Parameters.Add(confirmpassword)
cmd.Parameters.Add(firstname)
cmd.Parameters.Add(lastname)
cmd.Parameters.Add(address)
cmd.Parameters.Add(address2)
cmd.Parameters.Add(address3)
cmd.Parameters.Add(city)
cmd.Parameters.Add(country)
cmd.Parameters.Add(province)
cmd.Parameters.Add(postalcode)
cmd.Parameters.Add(phone)
cmd.Parameters.Add(email)
cmd.Parameters.Add(how)
cmd.ExecuteNonQuery()
Catch
End Try
End Sub
