Get data to database in sql

See more:

VB

ASP.NET

SQL

Hi I was designing web application I have created fields now I was trying to store the data in database using asp.net code. Below code asp.net code I am not getting any errors but data is not saving in the stored procedure in sql. can anyone please suggest what would be the error for this code.

Private Sub btnSave_Click(sender As Object, e As EventArgs) Handles btnSave.Click
        If hDelete.Value = "Delete" Then
            DeleteAlert()
        Else
            If Validation() Then

                Dim recepient As String = CheckChanges()

                Dim cn As New SqlConnection
                cn.ConnectionString = conStrDRS
                Using cn
                    cn.Open()
                    ' Create the command with the sproc name and add the parameter required'
                    Dim cmd As SqlCommand = New SqlCommand("UpdateRegistration", cn)
                    cmd.CommandType = CommandType.StoredProcedure
                    cmd.Parameters.AddWithValue("@Title", txtTitle.Text)
                    cmd.Parameters.AddWithValue("@ReferenceNo", txtReferenceNo.Text)
                    cmd.Parameters.AddWithValue("@CounterParty", txtCounterParty.Text)
                    cmd.Parameters.AddWithValue("@Company", ddlCompany.SelectedValue)
                    'cmd.Parameters.AddWithValue("@Status_Code_Old", hStatusOld.Value)
                    cmd.Parameters.AddWithValue("@Custodian", ddlCustodian.SelectedValue)
                    'cmd.Parameters.AddWithValue("@CreatedOn", Date.ParseExact(lblCreatedOn.Text, "dd/MM/yyyy", System.Globalization.DateTimeFormatInfo.InvariantInfo))
                    cmd.Parameters.AddWithValue("@OwnerDepartment", ddlOwnerDepartment.SelectedValue)
                    cmd.Parameters.AddWithValue("@CreatedBy", getUserName(hUserID.Value, "name"))
                    cmd.Parameters.AddWithValue("@Status", txtStatus.Text)
                    cmd.Parameters.AddWithValue("@Remarks", txtRemarks.Text)
                    cmd.Parameters.AddWithValue("@SecurityLevel", ddlSecurityLevel.SelectedValue)
                End Using
                cn.Close()
                'go back to main screen
                'Response.Write("<script language='javascript'> { alert('Alert saved successfully'); var url = 'default.aspx?UserID=" & getUserName(hUserID.Value, "cdms") & "}</script>")

                End If
            End If


    End Sub

This is stored procedure in sql:

CREATE PROCEDURE [dbo].[UpdateRegistration]( 
 @Title nvarchar(500)
 ,@CounterParty nvarchar(200) 
 ,@Company nvarchar(10)
 ,@Custodian varchar(25)
 ,@OwnerDepartment varchar(100)
 ,@Remarks nvarchar(1000)
 ,@Status varchar(2)
 ,@SecurityLevel varchar(2)
 ,@CreatedBy varchar(25)
 ,@CreatedOn datetime
 )
 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 dbo.Registration
 (Title
 ,Counterparty
 ,Company
 ,Custodian
 ,OwnerDepartment
 ,Remarks
 ,Status
 ,SecurityLevel
 ,CreatedBy
 ,CreatedOn)

 VALUES
 ( @Title
 ,@Counterparty
 ,@Company
 ,@Custodian
 ,@OwnerDepartment
 ,@Remarks
 ,@Status
 ,@SecurityLevel
 ,@CreatedBy
 ,@CreatedOn
 )
 END

Thanks in advance!!!