Member Avatar for tendaimare

can someone help me with why this code is not inserting into the database

Dim MyConnection As SqlConnection

        Dim sqlstring As String = "INSERT INTO Workers (FName, LName, FullName)  VALUES ('" & Me.txtName.Text & "', '" & Me.txtSurname.Text & "', '" & Me.txtFullName.Text & "')"
        'Dim data_base As String = " C:\Documents and Settings\admin\Desktop\OCSWalkthrough\OCSWalkthrough\App_Data\Testing_DB.sdf"
        Dim data_base As String = " Data Source=NetServer;Initial Catalog=Testing_DB;User ID=xx;Password=xxxxxx"

        MyConnection = New SqlConnection("Data Source=" & data_base)
        Dim concom As SqlCommand = MyConnection.CreateCommand()


        MyConnection.Open()

        Dim cmnd As SqlCommand = New SqlCommand(sqlstring, MyConnection)

        cmnd.ExecuteNonQuery()        ' Execute the command here

        'and then read
        Dim myreader As SqlDataReader

        myreader = cmnd.ExecuteReader

        MyConnection.Close()
  • 1 Contributor
  • 1 Reply
  • 120 Views
  • 9 Hours Discussion Span
  • Latest Post Latest Post by tendaimare
Member Avatar for tendaimare

I got it

Dim MyConnection As SqlConnection
        Dim sqlstring As String = "INSERT INTO Workers (First_Name, Last_Name, Full_Name)  VALUES ('" & Me.txtName.Text & "', '" & Me.txtLastName.Text & "', '" & Me.txtFullName.Text & "')"
        Dim data_base As String = " Data Source=siv01-win1.wadns.net;Initial Catalog=Testing_DB;User ID=sa;Password=1234"
        MyConnection = New SqlConnection(data_base)
        Dim concom As SqlCommand = MyConnection.CreateCommand()
        MyConnection.Open()
        Dim cmnd As SqlCommand = New SqlCommand(sqlstring, MyConnection)
        cmnd.ExecuteNonQuery()        ' Execute the command here
Be a part of the DaniWeb community

We're a friendly, industry-focused community of developers, IT pros, digital marketers, and technology enthusiasts meeting, networking, learning, and sharing knowledge.