
24/02/2007, 10:31
|
| | Fecha de Ingreso: agosto-2006 Ubicación: en lima peru
Mensajes: 184
Antigüedad: 18 años, 6 meses Puntos: 0 | |
Re: les pido de su ayuda Cita:
Iniciado por eduardo90 Bueno aca esta el problema
Imports System.Data.SqlClient
Public Class Form1
Inherits System.Windows.Forms.Form
Private oConexion As SqlConnection
Private oDataSet As DataSet
Private oDataAdapter As SqlDataAdapter
Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
'Crea la conexion
oConexion = New SqlConnection()
oConexion.ConnectionString = "Server=(local);Database=General;uid=sa;pwd=;"
'Crea el adaptador
oDataAdapter = New SqlDataAdapter()
Dim oCmdInsercion As New SqlCommand("INSERT INTO Autores" & _
"(IDAutor,Autor) VALUES(@IDAutor,@Autor)", oConexion)
oDataAdapter.InsertCommand = oCmdInsercion
oDataAdapter.InsertCommand.Parameters.Add(New SqlParameter("@IDAutor", SqlDbType.Int))
oDataAdapter.InsertCommand.Parameters.Add(New SqlParameter("@Autor", SqlDbType.NVarChar))
Dim oCmdConsulta As New SqlCommand("SELECT * FROM Autores", oConexion)
oDataAdapter.SelectCommand = oCmdConsulta
oDataSet = New DataSet()
Me.CargaDatos()
End Sub
Private Sub CargaDatos()
'Vaciar el dataset
oDataSet.Clear() oConexion.Open()
oDataAdapter.Fill(oDataSet, "Autores")
oConexion.Close()
Me.grdDatos.DataSource = oDataSet
Me.grdDatos.DataMember = "Autores"
End Sub
End Class
me dice el siguiente error
Excepción no controlada del tipo 'System.Data.SqlClient.SqlException' en system.data.dll
Información adicional: Error del sistema.
claro que en VB.NET que he puesto o tengo de malo
lo que yo me explico es porque haces la insercion en el evento load, sin antes haber enviado los datos respectivos para la inserccion. |