Bonjour,
 
J'ai un script qui tue des process Windows sur un poste au préalable saisi dans un formulaire, j'ai une erreur à l'execution du script.
Sachant que j'ai executer le script en VBS, il marche impeccable.
Pourriez vous m'aider ?
Merci d'avance
 
<%
Const SW_SHOWNORMAL=1
Dim args,net,ProcessSet, Process,shell,ProcessName,Computer
Set net  = Server.CreateObject("WScript.Network" )
Set shell = Server.CreateObject("WScript.Shell" )
ProcessName="pcsws.exe"
Computer=request.form("poste" )
response.write(computer + ProcessName)
Set ProcessSet=GetObject("winmgmts:{impersonationLevel=impersonate}!//" & Computer).InstancesOf _
 ("Win32_process" )
 
Trouve=false
for each Process in ProcessSet
 If InStr(1,Process.Name, ProcessName, vbTextCompare)>0 Then
  Trouve=true
  result=Process.terminate(0)
  If result<>0 Then
   response.write("Erreur terminaison processus" )
   'Wscript.echo "Erreur terminaison processus " & ProcessName & " code " & result
  Else
   response.write("Processus " & Process.Name & " correctement terminé sur " ) & Computer
   'Wscript.echo "Processus " & Process.Name & " correctement terminé sur " & Computer
  End if
 End If
 Next
If not trouve Then response.write "Processus " & ProcessName & " non trouvé"%>
</body>

quel est le message d'erreur?

 
L'erreur est la page 500 asp, pour l'erreur interne, je comprends vraiment pas.