Ya cerre la conexion y la volvi abrir y ahora me sale otro error, este es el codigo
Cita: Private Sub Agregar1()
Dim cad As New MySqlConnection("Database=Pacientes;Data Source=localhost;User Id=root;Password=utan")
cad.Open()
Dim sql As String = "SELECT * FROM generales"
Dim cmd As New MySqlCommand(sql, cad)
Dim dr As MySqlDataReader = cmd.ExecuteReader(CommandBehavior.CloseConnection)
'Dim comMySQL As New MySqlCommand
Try
dr.Close()
cad.Open()
cmd.CommandText = "Insert into generales (fecha, apellidos, nombres, ocupacion, recomendado) values (" & TextBox18.Text & "," & TextBox2.Text & "," & TextBox1.Text & "," & TextBox3.Text & "," & TextBox4.Text & ")"
cmd.ExecuteNonQuery()
Catch ex As MySqlException
MessageBox.Show("Error:" & ex.Message)
Return
Catch ex As Exception
MessageBox.Show("Error:" & ex.Message)
Return
End Try
End Sub
y el error
Error: You have an error in your SQL syntax; check the manual that corresponds to you MYSQL server version for the rights syntax to use near viene la hora del reloj los datos que intriduje y por ultimo dice at line 1
alguna sugerencia!!!! gracias