estoy tratando de hacer una conexion al As400 y tengo muchos errores.
con esta función:
Public Function conecta(ByVal Clave, ByVal usuario, ByVal AS400, ByVal Biblio)
MensaPri.Text = "Comenzando conexion ..."
Dim conexion400 As OleDb.OleDbConnection
conexion400 = New OleDb.OleDbConnection("Provider=HiTOLEDB400.1;Pass word=" + Clave + ";Persist Security Info=True;User ID=" + usuario + ";Data Source=" + as400 + ";Mode=Read;Libraries=" + Biblio + ";Host Code Page=284 - Spanish;LangID or Table=ESP - Spanish")
Dim daConsulta As OleDb.OleDbDataAdapter
daConsulta = New OleDb.OleDbDataAdapter
daConsulta.SelectCommand = New OleDb.OleDbCommand
daConsulta.SelectCommand.Connection = conexion400
Try
conexion400.Open()
tabla = conexion400.GetOleDbSchemaTable(OleDbSchemaGuid.Ta bles, New Object() {Nothing, Nothing, Nothing, "TABLE"})
conexion400.Close()
Catch ex As OleDb.OleDbException
Dim pos As Integer
Dim texto As String
pos = CStr(ex.Message).IndexOf(":")
texto = CStr(ex.Message).Substring(pos + 1, ex.Message.Length - (pos + 1))
MensaPri.Text = texto
conexion400.Close()
Exit Function
End Try
MensaPri.Text = ""
End Function
y me da muchos errores como:
Error 1 El tipo 'OleDb.OleDbConnection' no está definido. C:\Documents and Settings\admin\Mis documentos\Visual Studio 2005\WebSites\WebSite1\ejem01\ejemplo01.aspx.vb 12 28 C:\...\WebSite1\
Creo que me falta cargar algo, pero no se que es.
Gracias.
Hola a todos, en la función para conectarme al as400 me entrega el error "Tipo OleDb.OleDbConnection no está definido"
Ojalá alguien pueda ayudarme.
Gracias
