VBScript
Fermé
Utilisateur anonyme
-
Modifié par BmV le 22/12/2011 à 17:21
xeo56 Messages postés 92 Date d'inscription mardi 23 novembre 2010 Statut Membre Dernière intervention 15 janvier 2014 - 19 août 2012 à 17:01
xeo56 Messages postés 92 Date d'inscription mardi 23 novembre 2010 Statut Membre Dernière intervention 15 janvier 2014 - 19 août 2012 à 17:01
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
A voir également:
- VBScript
- Microsoft VBScript - Forum Windows 7
- Pause vbscript ✓ - Forum VB / VBA
- Vbscript split ✓ - Forum VB / VBA
- Shutdown en vbscript - Forum VB / VBA
- Windows 11 vbscript - Accueil - Optimisation
53 réponses
xeo56
Messages postés
92
Date d'inscription
mardi 23 novembre 2010
Statut
Membre
Dernière intervention
15 janvier 2014
24
21 déc. 2011 à 22:17
21 déc. 2011 à 22:17
on en aurra baver lol
Utilisateur anonyme
21 déc. 2011 à 22:18
21 déc. 2011 à 22:18
oui lol mai je te signale que tu n'as toujours pas réussi.
Regarde le message qui précede le tien.
Regarde le message qui précede le tien.
xeo56
Messages postés
92
Date d'inscription
mardi 23 novembre 2010
Statut
Membre
Dernière intervention
15 janvier 2014
24
21 déc. 2011 à 22:21
21 déc. 2011 à 22:21
le deuxieme en partant du haut du bas
Utilisateur anonyme
21 déc. 2011 à 22:24
21 déc. 2011 à 22:24
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
xeo56
Messages postés
92
Date d'inscription
mardi 23 novembre 2010
Statut
Membre
Dernière intervention
15 janvier 2014
24
21 déc. 2011 à 22:35
21 déc. 2011 à 22:35
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
Utilisateur anonyme
21 déc. 2011 à 22:36
21 déc. 2011 à 22:36
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
xeo56
Messages postés
92
Date d'inscription
mardi 23 novembre 2010
Statut
Membre
Dernière intervention
15 janvier 2014
24
21 déc. 2011 à 22:40
21 déc. 2011 à 22:40
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
Utilisateur anonyme
21 déc. 2011 à 22:44
21 déc. 2011 à 22:44
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
xeo56
Messages postés
92
Date d'inscription
mardi 23 novembre 2010
Statut
Membre
Dernière intervention
15 janvier 2014
24
21 déc. 2011 à 23:09
21 déc. 2011 à 23:09
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
Utilisateur anonyme
21 déc. 2011 à 23:11
21 déc. 2011 à 23:11
Nonmais je veux juste programmer l'heureà la seconde que j'aurais décidé quoi. Ne peut-on pas planifier ceci dans le script ?
xeo56
Messages postés
92
Date d'inscription
mardi 23 novembre 2010
Statut
Membre
Dernière intervention
15 janvier 2014
24
21 déc. 2011 à 23:12
21 déc. 2011 à 23:12
non dsl mais je vais chercher
Utilisateur anonyme
21 déc. 2011 à 23:15
21 déc. 2011 à 23:15
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.
xeo56
Messages postés
92
Date d'inscription
mardi 23 novembre 2010
Statut
Membre
Dernière intervention
15 janvier 2014
24
Modifié par xeo56 le 21/12/2011 à 23:27
Modifié par xeo56 le 21/12/2011 à 23:27
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
Utilisateur anonyme
21 déc. 2011 à 23:28
21 déc. 2011 à 23:28
nan ta pas compris. Avant que le deuxieme lecteur s'ouvre il fau attendre 45 secondes. C'estca que jte di
xeo56
Messages postés
92
Date d'inscription
mardi 23 novembre 2010
Statut
Membre
Dernière intervention
15 janvier 2014
24
21 déc. 2011 à 23:30
21 déc. 2011 à 23:30
oui mais reprend le je vien juste de le modifier
Utilisateur anonyme
21 déc. 2011 à 23:31
21 déc. 2011 à 23:31
Tu as fais une faute xD : Tu as écris 15 ( la premiere fois) au lieu de 45
xeo56
Messages postés
92
Date d'inscription
mardi 23 novembre 2010
Statut
Membre
Dernière intervention
15 janvier 2014
24
Modifié par xeo56 le 21/12/2011 à 23:33
Modifié par xeo56 le 21/12/2011 à 23:33
ah oui merci et sa marche
xeo56
xeo56
Utilisateur anonyme
21 déc. 2011 à 23:34
21 déc. 2011 à 23:34
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
xeo56
Messages postés
92
Date d'inscription
mardi 23 novembre 2010
Statut
Membre
Dernière intervention
15 janvier 2014
24
Modifié par xeo56 le 21/12/2011 à 23:44
Modifié par xeo56 le 21/12/2011 à 23:44
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
xeo56
Messages postés
92
Date d'inscription
mardi 23 novembre 2010
Statut
Membre
Dernière intervention
15 janvier 2014
24
21 déc. 2011 à 23:47
21 déc. 2011 à 23:47
et si ta un projet demande moi sa me feras passer le temp lol
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.
Utilisateur anonyme
21 déc. 2011 à 23:45
21 déc. 2011 à 23:45
Ah d'accord lol obn c'est toujours pas trèx clair mais bon xD
En gros ca feii cke jlui demandec deja ca lol
En gros ca feii cke jlui demandec deja ca lol