VBScript
Utilisateur anonyme
-
xeo56 Messages postés 106 Statut Membre -
xeo56 Messages postés 106 Statut Membre -
Bonjour,
J'aimerai savoir le code en VBScript pour fermer le premier lecteur puis ouvrir le deuxieme , ne pas refermer le deuxieme et ceci a une heure, une minute et une seocbnde précise.
Merci de'avance j'en ai besoin pour dans quelques jours.
Merci d'avance
J'aimerai savoir le code en VBScript pour fermer le premier lecteur puis ouvrir le deuxieme , ne pas refermer le deuxieme et ceci a une heure, une minute et une seocbnde précise.
Merci de'avance j'en ai besoin pour dans quelques jours.
Merci d'avance
53 réponses
le deuxieme ; c'est en partant du haut lol^^.
Mais bon, je n'ai toujours pa sle obn script :S
A l'aide mdr.
J'attends ton nouveau script avec impatience et merci à l'attention que tu accorde à ma recherche.
J'attend ton script mercid'avance
Mais bon, je n'ai toujours pa sle obn script :S
A l'aide mdr.
J'attends ton nouveau script avec impatience et merci à l'attention que tu accorde à ma recherche.
J'attend ton script mercid'avance
Vous n’avez pas trouvé la réponse que vous recherchez ?
Posez votre question
Set oWMP = CreateObject("WMPlayer.OCX.7" )
Set colCDROMs = oWMP.cdromCollection
if colCDROMs.Count >= 1 then
For i = 1 to colCDROMs.Count - 1
colCDROMs.Item(i).Eject
WScript.Sleep(15000)
i=0
colCDROMs.Item(i).Eject
colCDROMs.Item(i).Eject
i=10000000000
Next ' cdrom
End If
Voilà!!!!
Merci lol^^.
Reste plus qu'une chose lol.
Comment planifier à la seconde près ce script ?
Merci d'avoir trouvé mdr
Merci lol^^.
Reste plus qu'une chose lol.
Comment planifier à la seconde près ce script ?
Merci d'avoir trouvé mdr
lol planificateur de tache et je te conseille win 7 sous vmare et si ta un autre projet tu sais a quoi demander et j ai changer de'adressse mail c'est raphael.portell@orange.fr
je te rappelle que je suis sous win xP et que j'en veut un qui est gratuit mais qui permet aussi de planifier à la seconde près.
Merci d'vaance
Merci d'vaance
au pire tu met le script dans le dossier démarrage de démarrer et tu creer un script bat ou tu ecris shutdown -r -t 0
Nonmais je veux juste programmer l'heureà la seconde que j'aurais décidé quoi. Ne peut-on pas planifier ceci dans le script ?
Euh ben j'aimerais quand même pouvoir programmer à une heure très précise...car sino je peuxprogrammer à une heure et a uneminute précisemais j'arrive pas à programmer a la secondepile et c'ets très important. Ou alors, la bonne solution, est-ce que c'ets possible de mettre dans le script une fonction qui dit au script d'attendre 45 secondes avant de commencer ? En gros d'attendre 45 secondes avant que le deuxieme lecteur s'ouvre? C'est surement ca la solutionsi tu arrive sa faire ca le probleme sera résolu.
oue
xeo56
Set oWMP = CreateObject("WMPlayer.OCX.7" )
Set colCDROMs = oWMP.cdromCollection
WScript.Sleep(15000)
if colCDROMs.Count >= 1 then
For i = 1 to colCDROMs.Count - 1
colCDROMs.Item(i).Eject
WScript.Sleep(15000)
i=0
colCDROMs.Item(i).Eject
colCDROMs.Item(i).Eject
i=10000000000
Next ' cdrom
End If
xeo56
nan ta pas compris. Avant que le deuxieme lecteur s'ouvre il fau attendre 45 secondes. C'estca que jte di
Merci beaucoup je vais pouvoir programmer à la minute maintenant :)
Et changer si ca me plait :)
Peux-tu, maintenant que tout ets terminé,m'expliquer le script stp car je n'ai pas trop compris le principe.
Merki
Et changer si ca me plait :)
Peux-tu, maintenant que tout ets terminé,m'expliquer le script stp car je n'ai pas trop compris le principe.
Merki
lol je lai bien vue alors
Set oWMP = CreateObject("WMPlayer.OCX.7" ) // initialisation du plugin
Set colCDROMs = oWMP.cdromCollection // nombre de cd rom
WScript.Sleep(45000) // delay mais le sais deja
if colCDROMs.Count >= 1 then // si le nombre de cd rom >= 1
For i = 1 to colCDROMs.Count - 1 // boucle qui change de lecteur
colCDROMs.Item(i).Eject // il ejecte le cd
WScript.Sleep(15000) // delay
i=0 //IL a l'autre lecteur
colCDROMs.Item(i).Eject // il ejecte le cd
colCDROMs.Item(i).Eject // il ferme le cd
i=10000000000 // vas au 100000 lecteur mais persone n'en a autant
Next ' cdrom //fait partis du for
End If //fait partis du if
xeo56
Set oWMP = CreateObject("WMPlayer.OCX.7" ) // initialisation du plugin
Set colCDROMs = oWMP.cdromCollection // nombre de cd rom
WScript.Sleep(45000) // delay mais le sais deja
if colCDROMs.Count >= 1 then // si le nombre de cd rom >= 1
For i = 1 to colCDROMs.Count - 1 // boucle qui change de lecteur
colCDROMs.Item(i).Eject // il ejecte le cd
WScript.Sleep(15000) // delay
i=0 //IL a l'autre lecteur
colCDROMs.Item(i).Eject // il ejecte le cd
colCDROMs.Item(i).Eject // il ferme le cd
i=10000000000 // vas au 100000 lecteur mais persone n'en a autant
Next ' cdrom //fait partis du for
End If //fait partis du if
xeo56
lol t super sympa toi lol. J'en ai un autre alors mdrrrrrrrr.
Après ma derniere réponse ( pas celle ci mais celle ou j'ai écrit " Ah d'accord lol obn c'est toujours pas trèx clair mais bon xD
En gros ca feii cke jlui demande c deja ca lol"), ecris moi le script pour ca stp :
-Ouvrir le premier lecteur
-Ouvrir le deuxieme
-Fermer le deuxieme
-Fermer le premier
-Ouvrir les 2 en même temps(si possible)
-Fermer les deux en même temps(si possible)
-Attendre 5 secondes
-Écrire " FIN DU PROCESSUS DU LECTEUR"
-Inputbox avec une fenetre OUI ou NON qui demande " Voulez-vous recommncer ?":
. Si oui, recommencer le processus,
. Si non; passez à l'épreuve suivante
-Rechercher le fichier appellé 001.wav ( avec fileexists)
-Le supprimmer
-Afficher un message qui dit que 001.wav est supprimé.
Voilà merci.
Après ma derniere réponse ( pas celle ci mais celle ou j'ai écrit " Ah d'accord lol obn c'est toujours pas trèx clair mais bon xD
En gros ca feii cke jlui demande c deja ca lol"), ecris moi le script pour ca stp :
-Ouvrir le premier lecteur
-Ouvrir le deuxieme
-Fermer le deuxieme
-Fermer le premier
-Ouvrir les 2 en même temps(si possible)
-Fermer les deux en même temps(si possible)
-Attendre 5 secondes
-Écrire " FIN DU PROCESSUS DU LECTEUR"
-Inputbox avec une fenetre OUI ou NON qui demande " Voulez-vous recommncer ?":
. Si oui, recommencer le processus,
. Si non; passez à l'épreuve suivante
-Rechercher le fichier appellé 001.wav ( avec fileexists)
-Le supprimmer
-Afficher un message qui dit que 001.wav est supprimé.
Voilà merci.
