ASP.NET

 Public Shared Function Save(ByVal myContactInfo As ContactInfo) As Integer
            Dim result As Integer = 0
            ' Using
            Dim myConnection As SqlConnection = New SqlConnection(AppConfiguration.ConnectionString)
            Try
                Dim myCommand As SqlCommand = New SqlCommand("JobsDb_ContactInfo_InsertUpdateSingleItem", myConnection)
                myCommand.CommandType = CommandType.StoredProcedure
                If myContactInfo.UserID = -1 Then
                    myCommand.Parameters.AddWithValue("@Userid", DBNull.Value)
                Else
                    myCommand.Parameters.AddWithValue("@Userid", myContactInfo.UserID)
                End If
                myCommand.Parameters.AddWithValue("@UserName", myContactInfo.UserName)
                myCommand.Parameters.AddWithValue("@Title", myContactInfo.Title)
                myCommand.Parameters.AddWithValue("@FirstName", myContactInfo.FirstName)
                myCommand.Parameters.AddWithValue("@LastName", myContactInfo.LastName)
                myCommand.Parameters.AddWithValue("@Email", myContactInfo.Email)
                If String.IsNullOrEmpty(myContactInfo.StreetAddress1) Then
                    myCommand.Parameters.AddWithValue("@StreetAddress1", DBNull.Value)
                Else
                    myCommand.Parameters.AddWithValue("@StreetAddress1", myContactInfo.StreetAddress1)
                End If

                If String.IsNullOrEmpty(myContactInfo.StreetAddress2) Then
                    myCommand.Parameters.AddWithValue("@StreetAddress2", DBNull.Value)
                Else
                    myCommand.Parameters.AddWithValue("@StreetAddress2", myContactInfo.StreetAddress2)
                End If
                If String.IsNullOrEmpty(myContactInfo.ZiporPost) Then
                    myCommand.Parameters.AddWithValue("@ZipOrPost", DBNull.Value)
                Else
                    myCommand.Parameters.AddWithValue("@ZipOrPost", myContactInfo.ZiporPost)
                End If
                myCommand.Parameters.AddWithValue("@CountryId", myContactInfo.CountryID)
                myCommand.Parameters.AddWithValue("@StateId", myContactInfo.StateID)
                myCommand.Parameters.AddWithValue("@city", myContactInfo.City)
                If String.IsNullOrEmpty(myContactInfo.PrimaryPhone) Then
                    myCommand.Parameters.AddWithValue("@PrimaryPhone", DBNull.Value)
                Else
                    myCommand.Parameters.AddWithValue("@PrimaryPhone", myContactInfo.PrimaryPhone)
                End If
                If String.IsNullOrEmpty(myContactInfo.SecondaryPhone) Then
                    myCommand.Parameters.AddWithValue("@SecondaryPhone", DBNull.Value)
                Else
                    myCommand.Parameters.AddWithValue("@SecondaryPhone", myContactInfo.SecondaryPhone)
                End If
                myCommand.Parameters.AddWithValue("@WorkStatus", myContactInfo.WorkStatus)
                myCommand.Parameters.AddWithValue("@SHMyName", myContactInfo.SHMyName)
                myCommand.Parameters.AddWithValue("@SHMyEmail", myContactInfo.SHMyEmail)
                myCommand.Parameters.AddWithValue("@SHMyPhones", myContactInfo.SHMyPhone)
                myCommand.Parameters.AddWithValue("@ActivityDate", myContactInfo.ActivityDate)

                Dim returnValue As DbParameter
                returnValue = myCommand.CreateParameter
                returnValue.Direction = ParameterDirection.ReturnValue
                myCommand.Parameters.Add(returnValue)
                myConnection.Open()
                myCommand.ExecuteNonQuery()
                result = Convert.ToInt32(returnValue.Value)
                myConnection.Close()
            Finally
                CType(myConnection, IDisposable).Dispose()
            End Try
            Return result
        End Function
and i want to get return value of user id which is main column and primary key with identity specification =yes
i want to get something like this
            
If Not (Profile.UserId = -1) Then
                myContactInfo.UserID = Profile.UserId

                [ContactInfoManager].Save(myContactInfo)
                [BandEManager].Save(myBandE)
                [DPManager].Save(mydp)
            Else
                Dim returnvalue As Integer = ContactInfoManager.Save(myContactInfo)
                Profile.UserId = returnvalue
                [BandEManager].Save(myBandE)
                [DPManager].Save(mydp)
            End If

<script>

function chkall(ival)
		{
		var f= document.getElementById("DataGrid1");
		for(var i=0; i<f.getElementsByTagName("input").length ;i++ )
		{
			if(f.getElementsByTagName("input").item(i).type == "checkbox" )
			{
				f.getElementsByTagName("input").item(i).checked=ival;
				
			}	
		} 
</script>
</code>
then in the grid view i define
<code><asp:datagrid id="DataGrid1" runat="server">
	<Columns>
	   <asp:TemplateColumn HeaderText="Select All">
		 <HeaderTemplate>
            <asp:CheckBox ID="chkboxViewSelectAll" runat="server" OnCheckedChanged="chkall(this.checked)"></asp:CheckBox>
           </HeaderTemplate>
		<ItemTemplate>
		<asp:CheckBox id="CheckBox1" runat="server"></asp:CheckBox>
		</ItemTemplate>
	   </asp:TemplateColumn>
	</Columns>
</asp:datagrid>