Discussion :

[fdloisel]

Bonjour et bonne année,

Je voudrais créer une appli sous delphi 7, qui m'affiche me contenu de certaines tables, stocké sur un as400 (db2).

Je ne sais pas comment, ni par quelles types de connexion?

[TéBeSsI]

DbExpress
a+

[Bloon]

par DbExpress je ne sais pas, sinon par BDE + ODBC (driver IBM Client Access) ça fonctionne plutôt bien.

Bloon

[delphi-fan]

Tout d'abord, il est bien entendu que tu dois avoir les autorisations d'accès à l'AS400, sinon cela ne marchera pas ...

A part ça, ca fonctionne même avec ADO car Client Access fournit un pilote ODBC. Mais il y a un préalable obligatoire sur l'AS400 :
- il faut à tout prix (pour éviter l'erreur SQL0113) définir un nom de Base de données dans l'AS400 -s'il n'existe pas bien sur- avec la commande :
ADDRDBDIRE RDB(SYSNAME) RMTLOCNAME(*LOCAL)
où sysname est par exemple le N° de série de l'AS genre S60F4A32B..
(Pour vérifier si un nom existe déjà, faire DSPRDBDIRE sur l'AS)

Après cela, tu montes une connexion classique avec comme chaîne de connexion (construire...) : Microsoft OLE DB Provider for ODBC Driver, puis sur l'onglet suivant la source de données (Client Access ou une que tu auras créé toi même) et aussi le "catalogue initial" (sysname ci dessus).

Une dernière précision : dans le composant ADOTable que tu poseras sur ta TForm, il te faudra aussi préciser la Table (propriété TableName) visée : le menu te fera dérouler les tables présentes dans ta source de données, mais si tu veux la visualiser dans une DBGrid par exemple, il te faudra impérativement sous peine d'erreur SQL0204 rajouter avant le nom de ta table la bibliothèque AS400 suivie d'un point "." .

Si tu veux un exemple source, envoie-moi un message ...

A+