[VBS] appliquer selon nom du pc

Résolu/Fermé
micka418 - 24 janv. 2011 à 14:51
 micka418 - 24 janv. 2011 à 16:05
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 8702 Date d'inscription dimanche 8 avril 2007 Statut Contributeur Dernière intervention 22 janvier 2020 1 190
24 janv. 2011 à 14:57
Bonjour,
If NomMachine = "NOMPC73" or NomMachine ="NOMPC115" or NomMachine ="NOMPC67" Then

A+
1
Nyctaclope Messages postés 5315 Date d'inscription dimanche 6 avril 2008 Statut Membre Dernière intervention 11 décembre 2022 1 250
24 janv. 2011 à 15:05
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
Merci à vous 2 pour votre réponse rapide, effectivement il fallait que j' ajoute "NomMachine" pour chaques conditions.
A+
0