How do I update a sql database with data from a text box on a form?

I'm new to VB.Net and I need to know how to insert a new record in a sql table from data in two text boxes on a form called txtFirstName and txtLastName. Also the sql table has a CustID field which is the index, it's not auto generated so I need to increment it by one when a record is inserted. Thank you for your help.
Private Sub Button3_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button3.Click
 
        Dim dbConnection As New SqlConnection("Data Source=192.168.0.4,1433;Network Library=DBMSSOCN;Initial Catalog=TestData;User ID=sa;Password=password;")
 
        Dim queryString As String = "SELECT * FROM dbo.Patient"
 
        Dim dataAdapter As SqlDataAdapter = New SqlDataAdapter( _
          queryString, dbConnection)
 
        dbConnection.Open()
 
        Dim tblCustomer As DataSet = New DataSet
        dataAdapter.Fill(tblCustomer, "Customer")
 
        MISSING CODE GOES HERE
 
 
        dbConnection.Close()
 
 
 
 
    End Sub

Open in new window

rfgrahamAsked:
Who is Participating?
 
sijishJohnConnect With a Mentor Commented:
Oops...
what jpaulino said was right..that was not the sql code..sorry to mislead you..

Dim conn As New SqlConnection("Data Source=192.168.0.4,1433;Network Library=DBMSSOCN;Initial Catalog=TestData;User ID=sa;Password=password;")
        conn.Open()
        Dim strSQL As String = "INSERT INTO <Your Table Name> (<Field1>, <field2>) VALUES (@First, @Last)"
 
        Dim dbComm As New SqlCommand(strSQL, conn)
        dbComm.Parameters.Add("@First", SqlDbType.VarChar)
        dbComm.Parameters.Add("@Last", SqlDbType.VarChar)
 
        dbComm.Parameters("@First").Value = txtFirstName.Text
        dbComm.Parameters("@Last").Value = txtLastName.Text
 
        dbComm.ExecuteNonQuery()
        conn.Close()

Open in new window

0
 
sijishJohnCommented:
use this to increment the CustID field

select Max(CustID)+1 from <tablename>

Refer this link

http://www.java2s.com/Code/ASP/ADO.net-Database/GenerateSQLinsertcommandVBnet.htm
0
 
rfgrahamAuthor Commented:
sijishJohn,

I made a change in my sql db table to use Identity, which is for incrementing my ID field when a record is added.

I'm connecting to a sql db on another computer so I'm using:
"Imports System.Data.SqlClient" in the General Declarations of my code window.
0
Keep up with what's happening at Experts Exchange!

Sign up to receive Decoded, a new monthly digest with product updates, feature release info, continuing education opportunities, and more.

 
Jorge PaulinoIT Pro/DeveloperCommented:
>>I made a change in my sql db table to use Identity, which is for incrementing my ID field when a record is added.

That way you only need to insert the fields ... don't use the CustID in the Transact SQL command.
The example that sijishJohn has showed you is for Access and for SQL is a little (no to much) different.
Check this example that I have posted:
http://www.experts-exchange.com/Programming/Languages/.NET/Visual_Basic.NET/Q_23349839.html 
0
 
sijishJohnCommented:
Ok then this will be enough...
Dim conn As New SqlConnection("Data Source=192.168.0.4,1433;Network Library=DBMSSOCN;Initial Catalog=TestData;User ID=sa;Password=password;")
        conn.Open()
        Dim strSQL As String = "INSERT INTO <table name> (FirsName, LastName) VALUES (?, ?)"
 
        Dim dbComm As New SqlCommand(strSQL, conn)
        dbComm.Parameters.Add("FirstName", SqlDbType.VarChar)
        dbComm.Parameters.Add("LastName", SqlDbType.VarChar)
 
        dbComm.Parameters("FirstName").Value = txtFirstName.Text
        dbComm.Parameters("LastName").Value = txtLastName.Text
 
        dbComm.ExecuteNonQuery()
        conn.Close()

Open in new window

0
 
rfgrahamAuthor Commented:
Thanks for you help but I have a related question, maybe you'll know the answer to this one.
http://www.experts-exchange.com/Programming/Languages/.NET/Q_23826936.html
0
 
Jorge PaulinoIT Pro/DeveloperCommented:
Did you looked to my example ? Maybe not!
0
Question has a verified solution.

Are you are experiencing a similar issue? Get a personalized answer when you ask a related question.

Have a better answer? Share it in a comment.

All Courses

From novice to tech pro — start learning today.