Button Click Inserts Sql Data From Web Form

[wjbob]

Hi Folks,

I'm completely new to this stuff so bear with me. And if this isn't the correct forum, just let me know which this should be in and I'll post it there. VB and VWD are both .NET apps so I figure this is the right place.

I'm using VWD and want to have a form, the contents of which get inserted into a sql db. I was able to find the following code that I tweaked a bit to get working in a VB program but cannot figure out how to adjust it to work on a web page. I'm still finding and watching videos and reading books I've downloaded and I'm learning a lot...but the answer to this seems to be evading me. I can use VWD's Gridview, etc. tools to populate a table but I would like to be able to make a custom form with a button to do the job instead.

So here's the VB code I found and was able to teach myself how to use....and actually got it working in a program....

Private Sub btnEnter_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnEnter.Click
 
        Dim SQLtext As String
        Dim myCon As New SqlClient.SqlConnection("Data Source=.\SQLEXPRESS;AttachDbFilename=E:\Documents and Settings\Bob\My Documents\Visual Studio 2005\Projects\Addresses\Addresses\FirstDatabase.mdf;Integrated Security=True;Connect Timeout=30;User Instance=True")
 
        SQLtext = "INSERT INTO Addresses (FirstName, LastName, StreetAddress, City, Phone) VALUES(@txtFirstName, @txtLastName, @txtStreetAddress, @txtCity, @txtPhone)"
 
        Dim myCom As New SqlClient.SqlCommand(SQLtext, myCon)
 
        Dim val1 = Me.txtFirstName.Text
        Dim val2 = Me.txtLastName.Text
        Dim val3 = Me.txtStreetAddress.Text
        Dim val4 = Me.txtCity.Text
        Dim val5 = Me.txtPhone.Text()
 
 
        myCom.Parameters.Add(New SqlClient.SqlParameter("@txtFirstName", SqlDbType.VarChar)).Value = val1
        myCom.Parameters.Add(New SqlClient.SqlParameter("@txtLastName", SqlDbType.VarChar)).Value = val2
        myCom.Parameters.Add(New SqlClient.SqlParameter("@txtStreetAddress", SqlDbType.VarChar)).Value = val3
        myCom.Parameters.Add(New SqlClient.SqlParameter("@txtCity", SqlDbType.VarChar)).Value = val4
        myCom.Parameters.Add(New SqlClient.SqlParameter("@txtPhone", SqlDbType.VarChar)).Value = val5
 
    End Sub
 
 

Thanks much,
Bob