PING D'UNE LISTE DE POSTE : WHOSBAD

cs_ermo Messages postés 5 Date d'inscription mercredi 9 janvier 2002 Statut Membre Dernière intervention 27 novembre 2006 - 27 nov. 2006 à 12:30
angenoir999 Messages postés 19 Date d'inscription vendredi 25 août 2006 Statut Membre Dernière intervention 2 octobre 2008 - 24 janv. 2007 à 14:22
Cette discussion concerne un article du site. Pour la consulter dans son contexte d'origine, cliquez sur le lien ci-dessous.

https://codes-sources.commentcamarche.net/source/20287-ping-d-une-liste-de-poste-whosbad

angenoir999 Messages postés 19 Date d'inscription vendredi 25 août 2006 Statut Membre Dernière intervention 2 octobre 2008 1
24 janv. 2007 à 14:22
Bonjour

moi c'est pareil, sur la même ligne de code.

Pourtant et j'ai bien vérifier, tous les droits sont bons et la config IIS aussi (j'ai mis ce que tu as dit).

Je ne comprend pas.

Angenoir999
cs_defrance Messages postés 24 Date d'inscription jeudi 6 mars 2003 Statut Membre Dernière intervention 20 novembre 2011
27 nov. 2006 à 17:09
Après m'etre repencher sur le code, je précise qu'il faut AUSSI ajouter dans le paramétrage de IIS du répertoire l'autorisation d'executer des executables (comme ping) en plus des scripts...
cs_ermo Messages postés 5 Date d'inscription mercredi 9 janvier 2002 Statut Membre Dernière intervention 27 novembre 2006
27 nov. 2006 à 15:43
Excuse-moi de t'embèter mais ça par ex, ça marche.

<% Don_A_Ecrire = "BLABLA" %>
<% Set FSO = Server.CreateObject("Scripting.FileSystemObject") %>
<% Fich_TEST= Server.MapPath("Fich_TEST.txt") %>
<% set inF = FSO.OpenTextFile(Fich_TEST,2,true) %>
<% inF.writeLine Don_A_Ecrire %>
<% inF.close %>
cs_defrance Messages postés 24 Date d'inscription jeudi 6 mars 2003 Statut Membre Dernière intervention 20 novembre 2011
27 nov. 2006 à 15:14
et c'est justement cette ligne qui crée le fichier avec la commande juste au dessus :
ping.exe -n 1 -a AdressIP > fichier
AdressIP : l'adresse ou le poste à pinger
fichier : le fichier qui est crée avec le résultat du ping
cs_ermo Messages postés 5 Date d'inscription mercredi 9 janvier 2002 Statut Membre Dernière intervention 27 novembre 2006
27 nov. 2006 à 13:38
OK, mais c'est cette ligne qui génère l'erreur.

Return = MyShell.Run(szExec, 0, True)
cs_defrance Messages postés 24 Date d'inscription jeudi 6 mars 2003 Statut Membre Dernière intervention 20 novembre 2011
27 nov. 2006 à 12:58
comme indiqué dans la description, il faut avoir les droits en écriture sur le répertoire où sera enregistré le fichier généré sinon c'est permission refusée.
cs_ermo Messages postés 5 Date d'inscription mercredi 9 janvier 2002 Statut Membre Dernière intervention 27 novembre 2006
27 nov. 2006 à 12:30
Ce code m'interesse mais lors de l'execution j'ai le message :
Erreur d'exécution Microsoft VBScript error '800a0046'

Permission refusée

/Lect_BDD.asp, line 23

Pouvez-vous me dire comment faire ?
Rejoignez-nous