OLEDB, OleDbConnection (.NET) from ms 
 TCP/IP:
"Provider=DB2OLEDB;Network Transport Library=TCPIP;Network Address=XXX.XXX.XXX.XXX;Initial Catalog=MyCtlg;Package Collection=MyPkgCol;Default Schema=Schema;User ID=MyUser;Password=MyPW" 
 APPC:
"Provider=DB2OLEDB;APPC Local LU Alias=MyAlias;APPC Remote LU Alias=MyRemote;Initial Catalog=MyCtlg;Package Collection=MyPkgCol;Default Schema=Schema;User ID=MyUser;Password=MyPW" 

解决方案 »

  1.   

    OLEDB, OleDbConnection (.NET) from ms 
     TCP/IP:
    "Provider=DB2OLEDB;Network Transport Library=TCPIP;Network Address=XXX.XXX.XXX.XXX;Initial Catalog=MyCtlg;Package Collection=MyPkgCol;Default Schema=Schema;User ID=MyUser;Password=MyPW" 
     APPC:
    "Provider=DB2OLEDB;APPC Local LU Alias=MyAlias;APPC Remote LU Alias=MyRemote;Initial Catalog=MyCtlg;Package Collection=MyPkgCol;Default Schema=Schema;User ID=MyUser;Password=MyPW" 
      

  2.   

    去下载一个HISERVER.EXE程序,安装试一试吧,再用上面的字符串一定可以。
      

  3.   

    OLE DB .NET Data Provider (System.Data.OleDb) 
    The OLE DB .NET Data Provider uses native OLE DB through COM interop to enable data access.  To use the OLE DB .NET Data Provider, you must also use an OLE DB provider (e.g.  SQLOLEDB, MSDAORA, or Microsoft.JET.OLEDB.4.0).For IBM AS/400 OLE DB Provider' VB.NET
    Dim oOleDbConnection As OleDb.OleDbConnection
    Dim sConnString As String = _
               "Provider=IBMDA400.DataSource.1;" & _
               "Data source=myAS400DbName;" & _
               "User Id=myUsername;" & _
               "Password=myPassword"
    oOleDbConnection = New OleDb.OleDbConnection(sConnString)
    oOleDbConnection.Open()
     
      

  4.   

    OLE DB .NET Data Provider (System.Data.OleDb) 
    The OLE DB .NET Data Provider uses native OLE DB through COM interop to enable data access.  To use the OLE DB .NET Data Provider, you must also use an OLE DB provider (e.g.  SQLOLEDB, MSDAORA, or Microsoft.JET.OLEDB.4.0).For IBM AS/400 OLE DB Provider' VB.NET
    Dim oOleDbConnection As OleDb.OleDbConnection
    Dim sConnString As String = _
               "Provider=IBMDA400.DataSource.1;" & _
               "Data source=myAS400DbName;" & _
               "User Id=myUsername;" & _
               "Password=myPassword"
    oOleDbConnection = New OleDb.OleDbConnection(sConnString)
    oOleDbConnection.Open()
     
      

  5.   

    IBM DB2 
     OLEDB, OleDbConnection (.NET) from ms 
     TCP/IP:
    "Provider=DB2OLEDB;Network Transport Library=TCPIP;Network Address=XXX.XXX.XXX.XXX;Initial Catalog=MyCtlg;Package Collection=MyPkgCol;Default Schema=Schema;User ID=MyUser;Password=MyPW" 
     APPC:
    "Provider=DB2OLEDB;APPC Local LU Alias=MyAlias;APPC Remote LU Alias=MyRemote;Initial Catalog=MyCtlg;Package Collection=MyPkgCol;Default Schema=Schema;User ID=MyUser;Password=MyPW"