ERREUR: 800A0009 VBscript

j'ai une erreur qui s'affiche quand j’exécute mon script:

ligne: 12
caract:2
erreur: Indice en dehors de la plage

Code:

1
2
3
4
5
6
7
8
9
10
11
12
13
14
'-----------------------------------------------------------------------------------------?----------------------------------------------
' Fichier VBScript : "StartService.vbs"
' Démarrage du service
'-----------------------------------------------------------------------------------------?----------------------------------------------
        Dim objFSO, objWMIService, objService, colServiceList
         Dim objReseau, Ordinateur
         Dim Reponse
	 Dim WshShell
	 Dim service
 
	Set arg = WScript.Arguments
	service = arg(0)
Set WshShell = CreateObject("WScript.Shell")
  Set objReseau = CreateObject("WScript.Network")

c'est la ligne 12 qui pose problème mais je voit pas pourquoi.
merci de me venir en aide.

salut,
l'objet WshArguments a une propriété count qu'il faut tester avant d'appeler le 1er item de la collection
si count = 0, l'appel déclenchera ce genre d'erreur : dans ton cas, si le script StartService n'est pas suivi par un paramètre de commande

merci omen999