VBScript

Utilisateur anonyme -
xeo56 Messages postés 92 Date d'inscription Statut Membre Dernière intervention - 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

A voir également:

VBScript
Shutdown en vbscript - Forum VB / VBA
Problème d'InputBox en VBScript ✓ - Forum VB / VBA
[VBScript] Exécution automatique ✓ - Forum VB / VBA
[PHP] Exécution d'un VBScript ✓ - Forum PHP
[VBScript] numéro de semaine ✓ - Forum VB / VBA

53 réponses

Réponse 41 / 53

xeo56 Messages postés 92 Date d'inscription Statut Membre Dernière intervention 24

oue lol

Réponse 42 / 53

Utilisateur anonyme

Alors ? MDR

Réponse 43 / 53

xeo56 Messages postés 92 Date d'inscription Statut Membre Dernière intervention 24

jme penche dmain bonne nuit

Réponse 44 / 53

Utilisateur anonyme

Coucou,

ALORS ? Mdr

Vous n’avez pas trouvé la réponse que vous recherchez ?

Posez votre question

Réponse 45 / 53

xeo56 Messages postés 92 Date d'inscription Statut Membre Dernière intervention 24

je mi mais mais se seras un ee car j ai un logiciel qui s'appele neobook qui fais du jscript , vbs et son propre langage en graphique--

xeo56

Réponse 46 / 53

Utilisateur anonyme

euh ben tant que ca sexecute comme avant no csoucis;)
alors ? XD

xeo56 Messages postés 92 Date d'inscription Statut Membre Dernière intervention 24

Va sur raphy2010.free.fr

xeo56 Messages postés 92 Date d'inscription Statut Membre Dernière intervention 24

ilya le logiciel

Utilisateur anonyme

Moi ce que je veux c'est le script. Et fais le script pareil que ceux que tu ma deja faits stp c'est important.

merci e'avance, j'aurais besoin de ce script pour cesoir :S

xeo56 Messages postés 92 Date d'inscription Statut Membre Dernière intervention 24

Pour se soir imposible je suis pas chez moi mais mais sir portable ke vais essayer mais se que j ai faisait marche

Réponse 47 / 53

Utilisateur anonyme

J'ai pas compri. Ta di koi

xeo56 Messages postés 92 Date d'inscription Statut Membre Dernière intervention 24

Je suis pas chez moi mais je rentre et donc peut être que tu auras ton script

Utilisateur anonyme

J'espere !!!xD

xeo56 Messages postés 92 Date d'inscription Statut Membre Dernière intervention 24

Tu auras ton script ce midi

Utilisateur anonyme

Alors ? MDRRRRR

xeo56 Messages postés 92 Date d'inscription Statut Membre Dernière intervention 24

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
i=0
colCDROMs.Item(i).Eject
i=1
colCDROMs.Item(i).Eject
i=0
colCDROMs.Item(i).Eject
i=1
Vbscript.delay (5000)
AlertBox "Fin du processus du lecteur"
Set Choix=MsgBox("Voulez-vous recommencer",vbYesNo+vbQuestion,"Ejecte Cd")
if Choix>=oui then
else
Set fichier= FileExists (001)
If Fichier >= True then
DeleteFile(001)
Msgbox "Fichier trouver et supprimer"
else
msgbox "Fichier non trouver"
End If
i=1000000000000000
End If
Next ' cdrom
End If

Réponse 48 / 53

Utilisateur anonyme

Euh peux-tu corriger le script stp ? C'est embarassant. Enfin STP hein^^

Réponse 49 / 53

xeo56 Messages postés 92 Date d'inscription Statut Membre Dernière intervention 24

OUI je me mais de suite mais sa tu vas faire koi avec

Réponse 50 / 53

Utilisateur anonyme

C'est juste pour étudier tkt.
Nan laisse ca sert à rien finallement ^^
Par contre j'ai des scripts que j'ai fais moi-même dis(mo ce qu'il va pa stp :

Sub DeleteAFile(ByVal 001.wav)

Dim fso

Set fso = CreateObject("Scripting.FileSystemObject")
fso.DeleteFile("001.wav")

End Sub

J'en ai plusieurs scripts mais déjà dis mo ce qu'il ne va pas dans celui la stp

Réponse 51 / 53

xeo56 Messages postés 92 Date d'inscription Statut Membre Dernière intervention 24

bien sûre il est bien met le à la place de se que j ai fais

Réponse 52 / 53

Utilisateur anonyme

Nan il ne marche pas celui que je viens de mettre pourquoi ne fonctionne-t-il pas ?

xeo56 Messages postés 92 Date d'inscription Statut Membre Dernière intervention 24

Enlevé le byval

xeo56 Messages postés 92 Date d'inscription Statut Membre Dernière intervention 24

Enleve le 001.wa au début

Réponse 53 / 53

Utilisateur anonyme

Bon alors là le script s'éxécute mais le fichier ne s'efface pas.

xeo56 Messages postés 92 Date d'inscription Statut Membre Dernière intervention 24

Enlevé le À au tout debut à deletez

Utilisateur anonyme

camarche tj pas

xeo56 Messages postés 92 Date d'inscription Statut Membre Dernière intervention 24

Enleve le 001.wa au début s

Utilisateur anonyme

pareil :s

xeo56 Messages postés 92 Date d'inscription Statut Membre Dernière intervention 24

Enleve dim fso

Discussions similaires

Faire une pause en VBS

Ouvrir image dans une fenêtre en VBS

probleme vbscript

Microsoft VBScript

Pause dans un Script VB

Votre réponse

Discussions similaires