ODBC As400 avec Lotus Script

[nicolas]

- Souhaite faire un développement qui attaque des fichiers bases de données As400,En exemple , affiche une table de fichier base de donnée 'As400' ....A quoi peut ressembler le code ..... Car j'aimerais attaquer des fichiers As400 avec LotusScipt ....Merci pour votre aide qui me sera précieuse .....

[Pof]

Si ça peu t'aider Cette agent se connecte au 400 et crée un doc notes dans ma base Option PublicUselsx "*LSXODBC"Sub Initialize'////////////////////////////////////////////// DECLARATION //////////////////////////////////////////////////////////////////// Dim session As New NotesSession Set dbDonPerso = session.CurrentDatabase Vserveur = dbDonPerso.Server '/////////////////////////////////////////////// PROCEDURE //////////////////////////////////////// 'Partie ODBC Dim con As New ODBCConnection Dim Qry As New ODBCQuery Dim res As New ODBCResultSet 'Connecte la base Set Qry.connection = Con RetCode% = Con.ConnectTo( "SourceODBC" , "Nom User" , "Password" ) 'Créer le requête Set res .Query =Qry Qry.SQL = "Select * FROM Table" 'Execute la requête Res.Execute 'Se place sur le 1 enr de la requête RetCode% = Res.FirstRow While RetCode% = True Set Exenf = dbDonPerso.createDocument Exenf.form = "M_Exenfant" Exenf.Matricule = Res.GetValue("MATRICULE") Call Exenf.save(True,True) End If RetCode% = Res.NextRow Wend 'Ferme la connection RetCode% = Res.Close (DB_CLOSE) RetCode% = Con.DisConnectEnd Sub

[nicolas]

merci ...quel Odbc utilise tu pour faire le lien base de donnée entre notes et As400 ...Tu as acheté un logiciel pour pouvoir faire le lien .... ?

[nicolas]

Je pars en vacances lundi pour 3 semaines ...je m'y pencherais plus en détails .... à mon retour ...j'aurais besoin de ton aide qui me sera précieuse .... pour m'aider sur le code .... je te soliciterais ....merci A +

[Olivier franchet]

Ou se trouve ton serveur Domino ????Si il est directement sur l'iSeries, aucun soft à avoir, l'accès est natif dans Domino/400.Si il est sur un OS autre que l'iSeries, tu doit posséder le driver adéquat vers DB2 ... mais attention, ce driver n'a rien à voir avec ceux utilisé pour DB2 UDB.Sous windows, il te faut DB2 Connect ... à acheter auprès d'IBM ou d'un partenaire IBM. Si tu veux une adresse d'un partenaire, je peux t'en donner un sérieux.[%sig%]

[nicolas]

D'accord cela confirm bien .... ce que l'on m'avais dit .....Oui effrectivement mon domino est sur un serveur Windows Nt4 ...Cela confirme bien qu'il faut acheter IBM DB2 Connect pour Windows Nt4 serveur ...ou / 2000 ...Est ce que qq l'a dèjà installé sur soin serveur Windows ....pour voir s'il n'y a pas de bug ... ou plantage ...On m'a parlé de DCES aussi .... qui peut être bien pour faire des réplications de données ....pour attaquer les bases DB2

[Olivier franchet]

DECS sert uniquement à faire du mappage ( entre 1 champ Notes d'un masque et 1 en champ d'un enregistrement du SGBD) comme LEI, mais uniquement en temps réel.Je m'explique our chaque enregistrement présents dans la table (ou vue) d'un SGBD, il doit exister 1 document du coté Notes avec pour seule valeur commune la clé de l'enregistrement.Bien évidemment, tu veux afficher l'ensemble de l'enregistrement avec un masque Notes. DECS va te permettre de mapper les champs de ton masque avec les champs de la table/vue de ton SGBD. Et quand un document sera affiché, l'ensemble de données seront extraite en temps réel depuis le SGBD.Les avantages sont multiples : interface via Notes/Web, lecture/ecriture des données via l'interface, 1 seul conteneur de données![%sig%]