begin process at 2012 02 13 15:15:47
  Trouver un code source :
 
dans
 
[ Dernières recherches ]
Accueil > 

Code

 > 

VBScript

 > MONTER UNE IMAGE CD-ROM SUR UN LECTEUR VIRTUEL DAEMON

MONTER UNE IMAGE CD-ROM SUR UN LECTEUR VIRTUEL DAEMON


 Information sur la source

Note :
Aucune note
Catégorie :VBScript Niveau :Débutant Date de création :25/08/2004 Vu / téléchargé :26 847 / 473
Auteur : Fixnyl

Ecrire un message privé
Commentaire sur cette source (3)
Ajouter un commentaire et/ou une note

 Description

Lorsqu’un jeu ou une application vous demande d’insérer le cd-rom dans le lecteur c’est emmerdant. Donc le mieux c’est de créer une image du cd-rom et de la montée sur un lecteur virtuel. Moi j’utilise Nero pour l’image et Daemon pour le lecteur virtuel… Voici donc comment faire pour monter l’image…

Source

  • 'declaration des constantes
  • Const DRIVE_NUMBER = 0
  • Const DRIVE_LETTER = "F:"
  • 'declaration des objets
  • Set WSShell = WScript.CreateObject("WScript.Shell")
  • Set WSArguments = WScript.Arguments 'récupérer les arguments de la ligne de commande
  • Set FSO = CreateObject("Scripting.FileSystemObject")
  • 'nom est emplacement de l'application Daemon
  • strDaemon= Chr(34) & "C:\Program Files\D-Tools\daemon.exe" & Chr(34)
  • If WSArguments.Count Then
  • Set Drive = FSO.GetDrive(DRIVE_LETTER)
  • WSShell.run strDaemon & " -unmount " & DRIVE_NUMBER 'dechargement du lecteur
  • While Drive.IsReady = True : Wend 'on attend qu'il soit decharger
  • Wscript.Sleep 1000 'des fois ca suffit pas alors on attend encore un peu
  • WSShell.run strDaemon & " -mount " & DRIVE_NUMBER & "," & chr(34) & WSArguments(0) & chr(34) 'chargement de l'image
  • While Drive.IsReady = False : Wend 'on attend la fin du chargement
  • End If
'declaration des constantes
Const DRIVE_NUMBER = 0
Const DRIVE_LETTER = "F:"

'declaration des objets
Set WSShell = WScript.CreateObject("WScript.Shell")
Set WSArguments = WScript.Arguments    'récupérer les arguments de la ligne de commande
Set FSO = CreateObject("Scripting.FileSystemObject")

'nom est emplacement de l'application Daemon
strDaemon= Chr(34) & "C:\Program Files\D-Tools\daemon.exe" & Chr(34) 

If WSArguments.Count Then
   Set Drive = FSO.GetDrive(DRIVE_LETTER)
   WSShell.run strDaemon & " -unmount " & DRIVE_NUMBER           'dechargement du lecteur
   While Drive.IsReady = True : Wend                                 'on attend qu'il soit decharger
   Wscript.Sleep 1000                              'des fois ca suffit pas alors on attend encore un peu
   WSShell.run strDaemon & " -mount " & DRIVE_NUMBER & "," & chr(34) & WSArguments(0) & chr(34)   'chargement de l'image
   While Drive.IsReady = False : Wend                      'on attend la fin du chargement
End If

 Conclusion

Dans le zip ya le script et un fichier de registre pour les associations des images iso et nrg, mais si le lecteur virtuel ou les paths ne correspondent pas ça marchera pas…

 Fichier Zip

Les Membres Club peuvent télécharger directement un fichier contenu dans le zip sans télécharger le zip en entier !

Télécharger le zip


 Sources du même auteur

Source avec Zip Source avec une capture PROGRAMME DE RECHERCHE DE FICHIERS IDENTIQUES
Source avec Zip INTERCEPTER L'APPUI DE TOUCHES AU NIVEAU SYSTÈME
JOUER UN SON ET LIRE UN PROCESSUS EN PARTICULIER
COMPARE ET SUPPRIME LES FICHIERS IDENTIQUES
Source avec Zip ASSEMBLER DES IMAGES
Toutes les sources de Fixnyl

 Sources de la même categorie

Source avec Zip Source avec une capture RECHERCHE & SAUVEGARDE DES FICHIERS PAR LEURS EXTENSIONS par hackoo
Source avec Zip Source avec une capture [VBS] SPLASH SCREEN EN VBSCRIPT par hackoo
Source avec Zip Source avec une capture [VBS] GOOGLE EASTER EGGS par hackoo
Source avec Zip Source avec une capture FILE2COMPARE: COMPARAISON DE DEUX FICHIERS LIGNE PAR LIGNE par hackoo
Source avec Zip Source avec une capture [VBS] COMMENT CRÉER UN DOSSIER ET LE PROTÉGER PAR MOT DE PAS... par hackoo
Toutes les sources de la catégorie VBScript

Commentaires et avis

Commentaire de Stephane le 25/08/2004 13:46:26

bouton gauche sur l'eclair rouge > device 0 > image.nrg

:D
bien vu quand meme l'argument de commande
++

Commentaire de Fixnyl le 25/08/2004 14:56:59

et aussi un lien vers un fichier qui peut etre tres utile pour fabriquer les scripts :

http://www.microsoft.com/downloads/details.aspx?displaylang=en&familyid=b4cb2678-dafb-4e30-b2da-b8814fe2da5a

Commentaire de damahom le 06/09/2008 10:27:52

Desole pour:
1. reprendre un vieux sujet.
2. je ne comprends pas le VBS.

Mais d'apres l'algorithme de base, ce code est tres bien.
Et merci mille fois pour le website, vraiment tres utile>

 Ajouter un commentaire

Nos sponsors


Sondage...

Comparez les prix


Archos 7 home tablet - 2 Go
Entre 149€ et 159€

Visiter le guide achat

CalendriCode

Février 2012
LMMJVSD
  12345
6789101112
13141516171819
20212223242526
272829    

Consulter la suite du CalendriCode

Photothèque

Photo Green Energy Solutions With Light Bulb Morphed Into LandscapePhoto Photo aérienne de Saintes Maries de la Mer
Photo Monument Valley Utah known as The Mittens 

Visiter la photothèque
 
Développement réalisé par Nicolas SOREL (Nix) avec l'aide de : Cyril DURAND et Emmanuel (EBArtSoft), Merci à Vincent pour ses précieux conseils.
CodeS-SourceS.com© Toute reproduction même partielle est interdite sauf accord écrit du Webmaster
CodeS-SourceS.com© est une marque déposée tous droits réservés

Google Coop CodeS-SourceS Google Coop CodeS-SourceS
Temps d'éxécution de la page : 0,640 sec (4)

Nous contacter | Annoncer sur CodeS-SourceS | Mentions légales
Outils Convertisseur VB/C# Snippets et scripts Outils en ligne La ToolBox
Communauté Programmation Photographie Technologie Newsgroups Emploi Forum Blogs
Guide d'achat Téléphonie mobile Image et son Informatique Bureautique Jeux vidéo
Logiciels Internet & Réseau Développement Market Android Jeux & Loisirs Graphisme Multimédia Sécurité Pilotes
Loisirs Cartes virtuelles Vidéos droles Jeux en ligne Géoguide AndroLib (Android Market)