executer des commandes CL a distance sur AS400

Bonjour,

Je voudrais savoir comment si il ya un probleme sur mon code pour effectuer une commande CL a distance pour supprimer un utilisateur depuis un poste de travail sur l'AS400, j'ai essayé toute les solutions mais ca na rien donner il ya toujours des erreurs!! j'utilise le module ADODBAPI pour utiliser le driver OLE DB de microsoft voici mon code:

Code:

---

1 2 3 4 5 6 7 8 9 10 11 12 13 14 15

import win32com.client import adodbapi adodbapi.adodbapi.verbose = True constr = "Provider=IBMDA400; DATA SOURCE='AS400';User ID='xxx';Password='xxxx'" Trusted_Connection=yes;" sp_name='EXEC COMMAND DLTUSRPRF USRPRF("TOTO")' #cc=win32com.client.Dispatch('adodb.connection') #c.Open(constr)   cmd=win32com.client.Dispatch('ADODB.Command') cmd.ActiveConnection = constr #cmd.CommandType = win32com.client.constants.adCmdText cmd.CommandText = sp_name cmd.CommandType = win32com.client.constants.adCmdText cmd.Execute()

---

j'ai effectué des recherche sur le net mais rien! :(

enfin j'ai pu trouver la solution!

Correction:

Code:

---

1 2 3 4 5 6 7 8 9 10 11 12 13

import win32com.client import adodbapi adodbapi.adodbapi.verbose = True conn = win32com.client.Dispatch('adodb.connection') conn.ConnectionString = "Provider=IBMDA400; DATA SOURCE='AS400';User ID='xxxx';Password='xxxxx'" Trusted_Connection=yes;" sp_name="{{QSYS/DLTUSRPRF USRPRF(TOTO)}}" conn.Open()   cmd=win32com.client.Dispatch('ADODB.Command') cmd.ActiveConnection = conn cmd.CommandText = sp_name cmd.Execute()

---