
07/09/2010, 21:28
|
| | Fecha de Ingreso: febrero-2010
Mensajes: 49
Antigüedad: 15 años, 1 mes Puntos: 0 | |
Procedimientos almacenados mysql Buenas esta es mi duda, en mi aplicacion se me pidio que utilizara procedimientos almacenados con mysql y llamarlos desde el programa pero no se como, osea necesito pasar el siguiente codigo al procedimiento que ya tengo realizado en la base de datos.
Public Sub Ingreso_Socio(ByVal cedula As Integer, ByVal nombre As String, _
ByVal direccion As String, ByVal telefono As String, _
ByVal profesion As String, ByVal apellido As String)
Me.con.ConnectionString = Coneccion()
Me.micomando.Connection = Me.con
Me.micomando.CommandText = "INSERT INTO socios(Cedula, Nombre, Direccion, Telefono, Profesion, Apellido)" _
& "VALUES(?Cedula, ?Nombre, ?Direccion, ?Telefono, ?Profesion, ?Apellido)"
micomando.Parameters.AddWithValue("?Cedula", cedula)
micomando.Parameters.AddWithValue("?Nombre", nombre)
micomando.Parameters.AddWithValue("?Direccion", direccion)
micomando.Parameters.AddWithValue("?Telefono", telefono)
micomando.Parameters.AddWithValue("?Profesion", profesion)
micomando.Parameters.AddWithValue("?Apellido", apellido)
Try
con.Open()
micomando.ExecuteNonQuery()
MsgBox("Socio creado correctamente", MsgBoxStyle.Information)
Catch ex As MySqlException
MsgBox("Error al crear el nuevo socio: ", MsgBoxStyle.Critical & ex.Message)
Finally
con.Dispose()
con.Close()
End Try
End Sub
Gracias y saludos, vera que es largo y podria reducirlo mucho con solo llamar el procedimiento pero no se como. |