Connessioni con sistemi AS/400
Per effettuare la connessione tra un server NT/2000 con un sistema main frame AS/400 è necessario aver istallato sul server il supporto IBM Client Access Express v.4, ed è cosa altamente risaputa per chi lavora con il sistema operativo OS/400.
La mancaza dell'istallazione del Client Access non permette nessun altro tipo di conessione ADO con il server IBM.
Concetti di Connessione AS/400
E' necessaria una premessa: il sistema AS/400 garantisce accesso agli utenti muniti di profilo e password.
L'esempio che vedremo in seguito genererà dinamicamente una tabella per il file QCUSTCDT del nostro AS/400 e ci permetterà di visualizzare a video l'archivio.
Alcune variabili della session tipo userid, password, nome di sistema o Ip , libreria e archivio posso essere anche valorizzate nel global.asa. Questo facilità gli accessi ai file, nel caso in cui si dovesse presentare la necessità di frequenti visualizzazioni.
Naturalmente sarà cura dell'amministratore di sistema creare un utente e un profilo utente solo per questo tipo di connessione.
Nell'esempio riportato in seguito ho preferito mettere tutti valori di Input e ho volontariamente lasciato la session nel corpo della pagina.
Come collegarsi
Di seguito è riportato un esempio di form di input che invierà i dati al file engine.asp
<HTML> <HEAD> <TITLE>Connessione DB AS/400 via Client Access</TITLE> </HEAD> <BODY> <b>Collegamento ADO al as400</b> <FORM NAME="connessione" METHOD="POST" ACTION="engine.asp"> <table border="0" cellspacing="0" cellpadding="0"> <tr> <td ><b>ip </b></td> <td > <input type="text" name="ip"> </td> </tr> <tr> <td ><b>userid</b></td> <td > <input type="text" name="userid"> </td> </tr> <tr> <td ><b>password</b> </td> <td > <input type="password" name="password"> </td> </tr> <tr> <td > <b>libreria</b></td> <td > <input type="text" name="libreria"> </td> </tr> <tr> <td ><b>archivio</b></td> <td > <input type="text" name="archivio"> </td> </tr> </table> <INPUT TYPE=SUBMIT NAME="invio" VALUE=" invia " ALIGN=RIGHT> <INPUT type=reset name="reset"value=" annulla " align=RIGHT> </FORM> </BODY> </HTML>
Commenti
Per inserire un commento, devi avere un account.
Fai il login e torna a questa pagina, oppure registrati alla nostra community.
