Aprire un editor di testo e aggiungere il seguente codice in un nuovo documento :
Dim FSODim fileObjectDim mp3SizeDim fileNamefileName = InputBox ( " Inserisci il nome del file MP3 " )
Le prime due righe di codice dichiarano FileSystemObject e le variabili oggetto File . La variabile mp3Size contiene la lunghezza del file di un file MP3, e la variabile di nome di file contiene il nome del file MP3 che si desidera esaminare . La dichiarazione finale utilizza la funzione InputBox per richiedere per quel nome di file
2
Incollare il codice riportato di seguito dopo il codice elencato nel passaggio precedente : .
Set FSO = CreateObject ( " Scripting.FileSystemObject " ) Set FileObject = FSO.GetFile ( fileName ) per
mp3Size = fileObject.SizeMsgBox "MP3 Size = " & mp3Size
Questo codice crea un nuovo FileSystemObject e un nuovo oggetto File . La funzione fileObject.Size recupera la lunghezza del file del formato MP3 e lo memorizza nella variabile mp3Size . La dichiarazione finale mostra che la lunghezza in una finestra di messaggio .
3
Salvare il file e dargli l'estensione " . Vbs . " Per esempio , se si desidera chiamare il programma GetMp3Size , nominare le " GetMp3Size.vbs . " di file
4
Avviare Esplora risorse e individuare il file VBS è stato salvato . Fare doppio clic sul file per eseguirlo , e digitare il nome di qualsiasi file MP3 nella casella di testo che appare.
5
Premere " Invio". L' VBScript gestisce e visualizza la lunghezza del file del MP3 .
Programmazione © www.354353.com