Jump to content

pipejara

Novato
  • Posts

    3
  • Joined

  • Last visited

Everything posted by pipejara

  1. Queria ver si habia la posibilidad de que alguien me ayudara con este codigo de un simple insert que la caga no le puedo encontrar el error ya que corre todo bien pero no inserta los datos Imports System.Data Imports System.Data.SqlClient Public Class Form1 Dim con As SqlConnection Dim cmd As SqlCommand Dim dr As SqlDataReader Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click cmd = New SqlCommand("insert into usuarios(usuario,pass) values(@Data1,@Data2) ", con) cmd.Parameters.AddWithValue("@Data1", TextBox1.Text) cmd.Parameters.AddWithValue("@Data2", TextBox2.Text) cmd.ExecuteNonQuery() MsgBox("Successfully inserted ") End Sub Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load con = New SqlConnection("Data Source=NTB\SQLExpress;Integrated Security=true; AttachDbFilename=|DataDirectory|\insert.mdf;User Instance=true;") con.Open() End Sub End Class
×
×
  • Create New...