Consultas SQL
Publicado por Geovanni (1 intervención) el 30/09/2006 00:45:00
Hola.
Me estoy iniciando en el mundo de la programación y mi consulta es la siguiente.
Estoy realizando una conexion desde VB.NET a MySQL, la conexion me esta sirviendo perfectamente, el problema surge cuando relizo un INSERT, UPDATE, DELETE debido a que me genera un error.
En el ejemplo yo realizo INSERT y justo cuando ejecuto el siguiente codigo:
ejecuta.ExecuteNonQuery
Me da el error : "No se controló InvalidOperationExection"
Me podrian ayudar.....
Gracias
'******* Codigo que estoy utilizando
'**************************************
Imports MySql.Data
Imports MySql.Data.MySqlClient
Public Class Form1
Public Function fnConecta(ByVal strServidor, ByVal StrUsuario, ByVal StrPassword) As Boolean
Dim con As MySqlConnection
Dim ejecuta As New MySqlCommand
con = New MySqlConnection()
con.ConnectionString = "server=" & strServidor & ";" _
& "user id=" & StrUsuario & ";" _
& "password=" & StrPassword & ";" _
& "database=prueba"
'Manejo de errores
'Para realizar el control si se establece o no la conexion a la base de datos
Try
con.Open()
fnConecta = True
ejecuta.CommandText = "insert into materia (idmateria,monto)values('MA0123',3000)"
ejecuta.ExecuteNonQuery() '''''Aqui es donde me da el error
con.Close()
Catch mierror As MySqlException
fnConecta = False
Finally
con.Dispose()
End Try
End Function
Me estoy iniciando en el mundo de la programación y mi consulta es la siguiente.
Estoy realizando una conexion desde VB.NET a MySQL, la conexion me esta sirviendo perfectamente, el problema surge cuando relizo un INSERT, UPDATE, DELETE debido a que me genera un error.
En el ejemplo yo realizo INSERT y justo cuando ejecuto el siguiente codigo:
ejecuta.ExecuteNonQuery
Me da el error : "No se controló InvalidOperationExection"
Me podrian ayudar.....
Gracias
'******* Codigo que estoy utilizando
'**************************************
Imports MySql.Data
Imports MySql.Data.MySqlClient
Public Class Form1
Public Function fnConecta(ByVal strServidor, ByVal StrUsuario, ByVal StrPassword) As Boolean
Dim con As MySqlConnection
Dim ejecuta As New MySqlCommand
con = New MySqlConnection()
con.ConnectionString = "server=" & strServidor & ";" _
& "user id=" & StrUsuario & ";" _
& "password=" & StrPassword & ";" _
& "database=prueba"
'Manejo de errores
'Para realizar el control si se establece o no la conexion a la base de datos
Try
con.Open()
fnConecta = True
ejecuta.CommandText = "insert into materia (idmateria,monto)values('MA0123',3000)"
ejecuta.ExecuteNonQuery() '''''Aqui es donde me da el error
con.Close()
Catch mierror As MySqlException
fnConecta = False
Finally
con.Dispose()
End Try
End Function
Valora esta pregunta


0