Inserting variables

Collapse
X
 
  • Time
  • Show
Clear All
new posts
  • Davemon1126
    New Member
    • May 2007
    • 3

    #1

    Inserting variables

    I'm trying to do a simple data inserting using variables from text box input. I'm also new to VB.net but have used VB6. I get and error code at the Executenonquery line and don't know why.

    Imports system.data.sql client

    Public Class Form1
    Dim v1 As String
    Dim v2 As String
    Dim connectionstrin g As String = "Data Source=SBSERVER ;Initial Catalog=graygo_ test;Integrated Security=True"
    Dim conn1 As New SqlConnection(c onnectionstring )
    Dim commandstring As String = "select * from custinfo"
    Dim dataadapter As New SqlDataAdapter( commandstring, conn1)
    Dim ds_graygo As New DataSet()

    Private Sub Form1_Load(ByVa l sender As System.Object, ByVal e As System.EventArg s) Handles MyBase.Load


    End Sub

    Private Sub btninsertrecord _click(ByVal sender As System.Object, ByVal e As System.EventArg s) Handles Button1.Click
    v1 = TextBox1.Text
    v2 = TextBox2.Text

    Dim cmdstring = "insert into cusinfo (cusid,cusnam,c uadd) values (4,v1,v2)"

    Dim cmd As New SqlCommand(cmds tring, conn1)
    conn1.Open()
    cmd.ExecuteNonQ uery()
    conn1.Close()

    End Sub
  • MMcCarthy
    Recognized Expert MVP
    • Aug 2006
    • 14387

    #2
    This question is being moved to the .NET forum.

    ADMIN

    Comment

    • vanc
      Recognized Expert New Member
      • Mar 2007
      • 211

      #3
      Since you want to insert into database with values from variables, so you should put your variables values into INSERT command not variable names.
      ---> insert......... ..values(...... .,value of v1, value of v2)

      cheers.

      Comment

      • gomzi
        Contributor
        • Mar 2007
        • 304

        #4
        Originally posted by Davemon1126
        I'm trying to do a simple data inserting using variables from text box input. I'm also new to VB.net but have used VB6. I get and error code at the Executenonquery line and don't know why.

        Imports system.data.sql client

        Public Class Form1
        Dim v1 As String
        Dim v2 As String
        Dim connectionstrin g As String = "Data Source=SBSERVER ;Initial Catalog=graygo_ test;Integrated Security=True"
        Dim conn1 As New SqlConnection(c onnectionstring )
        Dim commandstring As String = "select * from custinfo"
        Dim dataadapter As New SqlDataAdapter( commandstring, conn1)
        Dim ds_graygo As New DataSet()

        Private Sub Form1_Load(ByVa l sender As System.Object, ByVal e As System.EventArg s) Handles MyBase.Load


        End Sub

        Private Sub btninsertrecord _click(ByVal sender As System.Object, ByVal e As System.EventArg s) Handles Button1.Click
        v1 = TextBox1.Text
        v2 = TextBox2.Text

        Dim cmdstring = "insert into cusinfo (cusid,cusnam,c uadd) values (4,v1,v2)"

        Dim cmd As New SqlCommand(cmds tring, conn1)
        conn1.Open()
        cmd.ExecuteNonQ uery()
        conn1.Close()

        End Sub
        Try,

        Dim cmdstring = "insert into cusinfo (cusid,cusnam,c uadd) values (4,'" & v1 & "','" & v2 & "');"

        Comment

        • Davemon1126
          New Member
          • May 2007
          • 3

          #5
          Originally posted by gomzi
          Try,

          Dim cmdstring = "insert into cusinfo (cusid,cusnam,c uadd) values (4,'" & v1 & "','" & v2 & "');"
          Thanks, sometimes can't see the forest for the trees.

          Comment

          Working...