[VBS] appliquer selon nom du pc

Résolu
micka418 -  
 micka418 -
Bonjour,
j'essai d'appliquer une fonction de mon logon script (vbs) à seulement 3 machines, comme ci dessous, mais j'obtient une erreur sur NOMPC115 ligne 5 (Type incompatible: '[string: "NOMPC115"]'
Quelqu'un a t il une idée de comment ecrire cette ligne correctement.
Merci

Dim Sh
Set WshNetwork = WScript.CreateObject("WScript.Network")
NomMachine = WshNetwork.ComputerName
Set Sh = CreateObject("WScript.Shell")
If NomMachine = "NOMPC73" or "NOMPC115" or "NOMPC67" Then
Sh.Run "\\SERVEUR1\Netlogon\test.bat"
Set Sh = Nothing
End If
A voir également:

3 réponses

lermite222 Messages postés 8724 Date d'inscription   Statut Contributeur Dernière intervention   1 191
 
Bonjour,
If NomMachine = "NOMPC73" or NomMachine ="NOMPC115" or NomMachine ="NOMPC67" Then

A+
1
Nyctaclope Messages postés 5315 Date d'inscription   Statut Membre Dernière intervention   1 253
 
Bonjour

Je pense que la chaîne "NOMPC115" est interprétée comme une valeur LOGIQUE ( attendue logiquement après la valeur logique NomMachine = "NOMPC73" ), et cela plante nécessairement ..
Je ne connais pas la syntaxe du IF pour ton logiciel, mais il me semble qu'il faut répéter "NomMachine = .." devant la deuxième et troisième valeur
Tu auras alors la combinaison OR entre trois conditions :

If (NomMachine = "NOMPC73") or (NomMachine = "NOMPC115") or (NomMachine = "NOMPC67") Then ...
Et je mettrais des parenthèses pour plus de sécurité ..

Cela devrait marcher ...

A+
Nyctaclope
1
micka418
 
Merci à vous 2 pour votre réponse rapide, effectivement il fallait que j' ajoute "NomMachine" pour chaques conditions.
A+
0