Help me

Question

Bonjour à tous 

Voilà, je cherche à mettre en point un script vbs qui me permettre de trouver un disque amovible puis écrire son nom (G:\, ou K:\ ou J:\) sur un fichier texte que je récupèrerai plus tard dans batch  avec une variable.

Merci de votre aide

PS : je suis un nul en vbs

diabonme · Answer

Bonjour ! 

Pas de réponse ?

gillardg · Answer

Drives Property
Returns a Drives collection consisting of all Drive objects available on the local machine.

object.Drives 

The object is always a FileSystemObject. 

Remarks
Removable-media drives need not have media inserted for them to appear in the Drives collection. 

You can iterate the members of the Drives collection using a For Each...Next construct as illustrated in the following code: 

Function ShowDriveList
   Dim fso, d, dc, s, n
   Set fso = CreateObject("Scripting.FileSystemObject")
   Set dc = fso.Drives
   For Each d in dc
      n = ""
      s = s & d.DriveLetter & " - " 
      If d.DriveType = 3 Then
         n = d.ShareName
      ElseIf d.IsReady Then
         n = d.VolumeName
      End If
      s = s & n & "
"
   Next
   ShowDriveList = s
End Function

http://www.activeserverpages.dk/iishelp/vbscript/html-vss/vbsTOC.htm

PCPT · Answer

thème topic : déplacé de VB6 vers VBS

Help me

3 réponses

Votre réponse