Question : VBS - Aide requise pour modifier le code

Bonjour, aide de somone du

Could à à modifiy le code suivant de sorte que :

1.) si l'entrée de notation a lieu plus de 10 minutes (qui est déjà dans le manuscrit) alors que le manuscrit attendra 20 le contrôle du minutes
then pour la même entrée et s'il a lieu toujours plus de 10 minutes puis déclenchent le code suivant ci-dessous. Si l'entrée de notation est en-dessous 10 minutes alors ne font pas l'objShell d'anything.

Set =
de CreateObject (le « WScript.Shell ») varFile = Chr (34) et « C:\scripts\command.bat » et xe /c du
objShell.run le « C:\Windows\System32\cmd.e » de Chr (34) et l'objShell du varFile
= l'état réglés de Nothing

The deuxième est « si le fichier de consignation n'est pas trouvé » nous avons besoin du manuscrit pour attendre 20 minutes alors contrôle encore la notation et avons sinon trouvé qu'alors exécuter le code suivant (ci-dessous) si la notation existe alors ne faire rien. objShell du

Set =
de CreateObject (« WScript.Shell ») varFile = Chr (34) et « C:\scripts\command.bat » et xe /c de
objShell.run « C:\Windows\System32\cmd.e » de Chr (34) et objShell réglé du varFile
= Nothing


class= > " clair " de

> de " codeSnippet " de class= de

class= " lineNumbers " de

class= de

1 : 2 : 3 : 4 : 5 : 6 : 7 : 8 : 9 : 10 : 11 : 12 : 13 : 14 : 15 : 16 : 17 : 18 : 19 : 20 : 21 : 22 : 23 : 24 : 25 : 26 : 27 : 28 : 29 : 30 : 31 : 32 : 33 : 34 : 35 : 36 : 37 : 38 : 39 : 40 : 41 :

l'id= " codeSnippet853714 " class= " de ' * COMPOSER LA DATE D'AUJOURD'HUI CETTE PARTIE DU NOM DE FICHIER de NOTATION strYear = année (TodayDT) strMonth = mois (TodayDT) strDay = jour (TodayDT) si CInt (strMonth) < 10 puis strMonth = « 0 » et strMonth finir si si CInt (strDay) < 10 puis strDay = « 0 » et strDay finir si strToday = strYear et strMonth et strDay 'wscript.echo strToday Placer l'objFSo = le CreateObject (« Scripting.FileSystemObject ») nom = « \ \ serveur \ part \ NOTATION pour le restarts_ » et strToday et le « .doc » si objFSo.FileExists (nom) puis objFile réglé = objFSO.GetFile (nom) strTime = objFile.DateLastModified s'isdate (strTime) puis Décollement = cdate (strTime) DTN = maintenant si datediff (« n », décollement, DTN) > 10 puis wscript.echo « dernière entrée de notation plus de 10 minutes » autrement wscript.echo « le système est encore vivant » finir si finir si autrement '* si le fichier de consignation n'était pas trouvé. 'wscript.echo « fichier de consignation non trouvé » 'Envoyer l'acommmand au système Placer l'objShell = le CreateObject (« WScript.Shell ») varFile = Chr (34) et « C:\scripts\command.bat » et Chr (34) objShell.run « C:\Windows\System32\cmd.exe /c » et varFile Placer l'objShell = rien (...)

class= de

Réponse : VBS - Aide requise pour modifier le code

Cliquer dessus l'émission-réception - > des groupes d'émission-réception - > définissent des groupes d'émission-réception (au fond et peut être ce qui jrathi signifié). La zone de dialogue de groupes d'émission-réception s'ouvre. L'intervalle d'émission-réception est dedans là. … Thinkpads_User