> Tech > Connexion à  l’AS/400

Connexion à  l’AS/400

Tech - Par Renaud ROSSET - Publié le 24 juin 2010
email

Après avoir installé le provider OLE DB sur les systèmes client et avoir démarré les serveurs hôte AS/400, on est prêt à  se relier à  l'AS/400 en utilisant OLE DB et ADO. On utilisera soit le Provider MSDASQL OLE pour ODBC et le driver IBM Client Access ODBC soit le

Connexion à  l’AS/400

provider IBMDA400 OLE DB natif pour l’AS/400. On peut
utiliser ces deux providers OLE DB avec les objets ADO Connection, Command et
Recordset. Voyons comment se connecter à  IBMDA400 depuis une application VB 6.0.

Avant de pouvoir utiliser ADO à  partir de VB, il faut établir une référence vers
l’ADO dans le projet VB. Pour ajouter une référence à  la bibliothèque objet ADO
en VB 6.0, sélectionnez References dans le menu Project pour afficher la boîte
de dialogue References de la figure 3.

OLE DB et ADO assurent une liaison performante et pratiquement directe entre les
applications Windows et la base de données AS/400

Défilez jusqu’à  la rubrique Microsoft ActiveX Data Objects 2.x Library. Sélectionnez
la référence et cliquez sur OK pour ajouter la bibliothèque objet ADO au projet.
Vous pouvez désormais établir une connexion vers l’AS/400 en utilisant l’objet
ADO Connection. Le code VB de la figure 4 indique comment procéder.

La première ligne de la figure 4 montre l’endroit où vous créez une instance de
l’objet ADO Connection nommé cn. Ensuite, la méthode Open de l’objet Connection
est exécutée et une chaîne (string) de connexion OLE DB est transmise comme premier
paramètre. La chaîne de connexion OLE DB indique le provider OLE DB et la source
de données cible à  laquelle il se connectera.
La chaîne de connexion de l’exemple utilise le mot-clé PROVIDER pour indiquer
le provider IBMDA400 et le mot-clé DATA SOURCE pour indiquer que le provider se
connectera à  l’AS/400 dénommé S101AA0A. Pour utiliser le provider OLE DB pour
l’AS/400, il faut indiquer le mot-clé PROVIDER ; faute de quoi, la valeur de MSDASQL
sera le provider par défaut. Les deux paramètres suivants, indiqués par les deux
paires de doubles guillemets («  »), indiquent l’ID utilisateur et le mot de passe.
Toutefois, le provider IBM AS/400 OLE DB ne reconnaît pas ces paramètres. Dans
ce cas, l’ID utilisateur et le mot de passe sont tirés des propriétés de Client
Access offrant deux possibilités : soit l’utilisation de votre ID utilisateur
et mot de passe Windows, soit l’indication que l’ID utilisateur et le mot de passe
seront demandés au moment de la connexion. Une fois la méthode Open terminée,
on peut effectuer d’autres accès à  la base de données ADO. Quand la connexion
n’est plus nécessaire, on peut la fermer par la méthode Close.

Dans l’exemple, j’ai codé en dur le nom du système spécifié dans DATA SOURCE.
Lors du déploiement d’applications ADO, on pourra être amené à  modifier le nom
du système utilisé pour le faire correspondre au nom de source cible auquel on
se connectera. C’est pourquoi il est bon de permettre la configuration du nom
du système à  l’exécution.

Téléchargez cette ressource

Cybersécurité des collectivités : Enjeux, Perspectives & Solutions

Cybersécurité des collectivités : Enjeux, Perspectives & Solutions

Villes, intercommunalités, métropoles, départements et régions sont particulièrement exposés aux risques de cybersécurité. Ce livre blanc Stormshield présente les défis cyber que rencontrent les collectivités, les solutions et perspectives pour qu’elles puissent assurer leur mission d’utilité publique, en toute sécurité.

Tech - Par Renaud ROSSET - Publié le 24 juin 2010