Ver Mensaje Individual
  #1 (permalink)  
Antiguo 23/02/2007, 16:02
eduardo90
(Desactivado)
 
Fecha de Ingreso: julio-2006
Mensajes: 273
Antigüedad: 17 años, 9 meses
Puntos: 5
Pregunta les pido de su ayuda

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