Insertar datos en Access compilando desde linea de comandos.

22/04/2005 - 16:56 por Jaime Infante | Informe spam

Hola a todos estoy haciendo un ejemplo de como actualizar una tabla de
Access compilando desde la linea de comandos pero me da los errores
siguientes, si alguien me puede ayudar por favor.

Gracias

Imports System
Imports System.Data
Imports System.Data.OleDb
Imports Microsoft.VisualBasic

Public Class ConsolaBasica

Public Shared Sub Main()

Dim strCnn As String = "Provider=Microsoft.Jet.ADODB.4.0;Data
Source=d:\BaseDatos.mdb"
Dim strINSERT As String = "INSERT INTO series VALUES('A124811',1)"

Dim cnn As New ADODB.Connection
Dim rst As New ADODB.Recordset

cnn.Open(strCnn)
rst=cnn.Execute(strINSERT)
cnn.Close()
End Sub
End Class

Compilo asi:

vbc inserta.vb r:/System.dll /r:System.Data.dll r:/System.XML.dll
Errores:
Error BC30002: El tipo "ADODB.Connection" no esta definido
Dim cnn as new ADODB.Connection

Error BC30002: El tipo "ADODB.Recordset" no esta definido
Dim rst as new ADODB.Recordset

Siga el debate

1 respuesta

Tengo una respuesta

DRAGON AGE™: INQUISITION – Matadragones

Leer las respuestas

#1 A.Poblacion

22/04/2005 - 21:19 | Informe spam

En la linea de comandos estás enlazando con System.Data.dll, es decir,
ADO.NET, pero en el código fuente estás tratando de acceder a datos con el
antiguo ADO (objeto COM).

Cambia el fuente para que use ADO.NET:

Imports System
Imports System.Data
Imports System.Data.OleDb
Imports Microsoft.VisualBasic

Public Class ConsolaBasica

Public Shared Sub Main()
Dim strCnn As String = "Provider=Microsoft.Jet.ADODB.4.0;Data
Source=d:\BaseDatos.mdb"
Dim strINSERT As String = "INSERT INTO series VALUES('A124811',1)"
Dim cnn As New OleDbConnection(strCnn)
cnn.Open()
Dim cmd as New OleDbCommand(strINSERT, cnn)
cmd.ExecuteNonQuery()
cnn.Close()
End Sub
End Class

"Jaime Infante" wrote in message
news:
Mostrar la cita

Leer las otras respuestas

Preguntas similares

Busqueda sugerida :