Trabajar con un ODBC de AS400 (ASP.NET)

[Jano2]

Amigo
conectate atraves de oledb es mucho mas rapido que ODBC.

Dim Conexion As String
Conexion = "Provider=IBMDA400.DataSource.1;Persist Security Info=False;User ID=USER;password=PAss;Data Source=SISTEMA;Protection Level=None;Initial Catalog='';Transport Product=Client Access;SSL=DEFAULT;Force Translate=65535;Default Collection='';Convert Date Time To Char=TRUE;Catalog Library List='LIBRERIA';Cursor Sensitivity=3"


Dim StrConnString As String
Dim Sql As String

Dim con As New OleDbConnection(Conexion_Cartera)

Sql = "SELECT * FROM TABLA"

Dim DaAdapter As New OleDbDataAdapter(Sql, con)
Dim Ds As New DataSet

con.Open()

DaAdapter .Fill(Ds, "Tabla")

Return Ds

con.Close()
DaCartera = Nothing
Ds = Nothing


Usa el driver del Client Acces para OLEDB