Article View: es.comp.os.as400
Article #418RE: ODBC para AS/400
From: FELIX
Date: Tue, 12 Sep 2000 15:07
Date: Tue, 12 Sep 2000 15:07
38 lines
1803 bytes
1803 bytes
Con VBA y un DSN con el Client-Access puedes hacerlo as�:
Dim wrkodbc As Workspace
Dim con_as400 As DAO.Connection
Dim rs As DAO.Recordset
dim sqltxt as string
'Crea el objeto Workspace de ODBCDirect y los objetos connection y
recordset
Set wrkodbc = CreateWorkspace("NuevoWorkspaceODBC", "admin", "", dbUseODBC)
Set con_as400 = wrkodbc.OpenConnection("conexion1", , ,
"ODBC;UID=user;PWD=password;DSN=as400")
sqltxt = "sentencia SQL"
Set rs = con_as400.OpenRecordset(sqltxt, dbOpenDynamic)
Saludos
F�lix.
Angel <mva@arrakis.es> escribi� en el mensaje de noticias
39b6883d_3@news.arrakis.es...
> Tengo que realizar unas aplicaciones, en VB6.0, dicha aplicaci�n debe
coger
> la informaci�n de un servidor AS/400 V4R4. Donde puedo conseguir
informaci�n
> sobre los ODBC disponibles en el mercado que soporten OLEDB o donde puedo
> conseguirlos, "Preferentemente de libre distribuci�n".
>
>
> Muchas gracias
>
> Angel
> Burgos (SP)
> mva@arrakis.es
>
>
>
Technical Details
Message-ID:
<8pl9fp$be2$1@diana.bcn.ttd.net>Path:
arc1-ca.pugleaf.net!supernews.google.com!sn-xit-02!sn-xit-03!supernews.com!news.tele.dk!130.133.1.3!fu-berlin.de!newsfeed.bcn.ttd.net!news.bcn.ttd.net!not-for-mailReferences:
<39b6883d_3@news.arrakis.es>Show Full Headers
Complete Article Headers
X-Google-Language: SPANISH,ASCII X-Google-Thread: 104581,e24301bb97f2c584 X-Google-Attributes: gid104581,public X-Google-ArrivalTime: 2000-09-12 06:06:43 PST Path: arc1-ca.pugleaf.net!supernews.google.com!sn-xit-02!sn-xit-03!supernews.com!news.tele.dk!130.133.1.3!fu-berlin.de!newsfeed.bcn.ttd.net!news.bcn.ttd.net!not-for-mail From: "FELIX" <padreangel@mixmail.com> Newsgroups: es.comp.os.as400 Subject: RE: ODBC para AS/400 Date: Tue, 12 Sep 2000 15:07:51 -0000 Organization: Telefonica Transmision de Datos Lines: 40 Message-ID: <8pl9fp$be2$1@diana.bcn.ttd.net> References: <39b6883d_3@news.arrakis.es> NNTP-Posting-Host: 193.152.242.204 X-Priority: 3 X-MSMail-Priority: Normal X-Newsreader: Microsoft Outlook Express 5.00.2314.1300 X-MimeOLE: Produced By Microsoft MimeOLE V5.00.2314.1300