How can I Insert data into SQL Server using VBNet

Question

I am new to vb net I need to insert  data in table by using vb net please can any one help  I have tried this   Here I tried Sample Code   I got this exception Column name or number of supplied values does not match table definition  thanks advance  Private Sub btnSave Click ByVal sender As System Object  ByVal e As  System EventArgs   Handles btnSave Click      Dim strName As String   txtName Text     Dim strId As String   txtID Text     Dim strPhone As String   txtPhone Text     Dim strBranch As String   cmboxBranch SelectedItem ToString       Dim  strCourse As String   cmbboxCourse SelectedItem ToString       Dim dblFee As Double   Double Parse txtFee Text        Dim strCommand As String    insert into student values     amp  strName  amp         amp  strId  amp            amp  strPhone  amp         amp  strBranch  amp         amp  strCourse  amp        amp  dblFee  amp           Dim command As SqlCommand   New SqlCommand strCommand  connection      command CommandType   CommandType Text         MsgBox strCommand        connection Open       If  command ExecuteNonQuery   Equals 1   Then         MsgBox  Information stored in database       Else         MsgBox  Not stored in database       End If  End Sub

User · Answer

Imports System Data  Imports System Data SqlClient  Public Class Form2  Dim myconnection As SqlConnection  Dim mycommand As SqlCommand  Dim dr As SqlDataReader  Dim dr1 As SqlDataReader  Dim ra As Integer   Private Sub Button1 Click ByVal sender As System Object  ByVal e As System EventArgs  Handles Button1 Click       myconnection   New SqlConnection  server localhost uid root pwd  database simple         you need to provide password for sql server      myconnection Open        mycommand   New SqlCommand  insert into tbl cus  name   class   phone   address   values      amp  TextBox1 Text  amp         amp  TextBox2 Text  amp         amp  TextBox3 Text  amp         amp  TextBox4 Text  amp        myconnection       mycommand ExecuteNonQuery        MessageBox Show  New Row Inserted   amp  ra       myconnection Close    End Sub  End Class

User · Answer

Function ExtSql ByVal sql As String  As Boolean     Dim cnn As SqlConnection     Dim cmd As SqlCommand     cnn   New SqlConnection My Settings mySqlConnectionString      Try         cnn Open           cmd   New SqlCommand         cmd Connection   cnn         cmd CommandType   CommandType Text         cmd CommandText   sql         cmd ExecuteNonQuery           cnn Close           cmd Dispose       Catch ex As Exception         cnn Close           Return False     End Try     Return True End Function

User · Answer

It means that the number of values specified in your VALUES clause on the INSERT statement is not equal to the total number of columns in the table  You must specify the columnname if you only try to insert on selected columns   Another one  since you are using ADO Net   always parameterized your query to avoid SQL Injection  What you are doing right now is you are defeating the use of sqlCommand   ex  Dim query as String   String Empty query  amp    INSERT INTO student  colName  colID  colPhone    query  amp                         colBranch  colCourse  coldblFee     query  amp    VALUES   colName  colID   colPhone   colBranch  colCourse   coldblFee    Using conn as New SqlConnection  connectionStringHere       Using comm As New SqlCommand           With comm              Connection   conn              CommandType   CommandType Text              CommandText   query              Parameters AddWithValue   colName   strName               Parameters AddWithValue   colID   strId               Parameters AddWithValue   colPhone   strPhone               Parameters AddWithValue   colBranch   strBranch               Parameters AddWithValue   colCourse   strCourse               Parameters AddWithValue   coldblFee   dblFee          End With         Try             conn open               comm ExecuteNonQuery           Catch ex as SqlException              MessageBox Show ex Message ToString     Error Message           End Try     End Using End USing    PS  Please change the column names specified in the query to the original column found in your table

[sql-server] How can I Insert data into SQL Server using VBNet

Examples related to sql-server

Examples related to vb.net