Hola a Todos: Me aparece un error al digitar el siguite código:
Private Sub BTN_GRABAR_Click(sender As Object, e As EventArgs) Handles BTN_GRABAR.Click
Dim conexion As String
conexion = "Data Source=LAPTOP-97SCGT1G;Initial Catalog=SISTEMATIPO;Integrated Security=True"
Dim cn As New SqlConnection
cn.ConnectionString = conexion
Dim adaptador As New SqlCommand("Insert into Clientes values ('" & TXT_RUTCLIENTE.Text & "', '" & TXT_NOMBRECLIENTE.Text & "', '" & TXT_DIRECCIONCLIENTE.Text & "', '" & TXT_COMUNACLIENTE.Text & "', '" & TXT_CONTACTOCLIENTE.Text & "', '" & TXT_TELEFONOCLIENTE.Text & "', '" & TXT_MAILCLIENTE.Text & "', '" & TXT_CONTACTO2CLIENTE.Text & "', '" & TXT_TELEFONO2CLIENTE.Text & "', '" & TXT_MAIL2CLIENTE.Text & "', '" & TXT_CONTACTO3CLIENTE.Text & "', '" & TXT_TELEFONO3CLIENTE.Text & "', '" & TXT_MAIL3CLIENTE.Text & "')", cn)
cn.Open()
adaptador.ExecuteNonQuery()
MsgBox("Se registró corectamente")
al principio declaré lo siguiente:
Imports System.Data.Sql
Imports System.Data.SqlClient
Imports System.Data.SqlTypes
y la conexión con la base de datos está ok, pero me sigue salisndo el error. ¿Alguien sabe a qué se debe? (Marqué con rojo los errores)
Muchas gracias.