Vraag : VBScript - vang de Inhoud van de Omslag in Serie

Ik moet de inhoud (filename en filesize slechts) van een omslag in een tweedimensionale array.

bijvoorbeeld - van de weg „C:\TEMP\FOLDER23“ vangen, zou ik het manuscript de namen van alle dossiers samen met de grootte van alle dossiers willen vangen, en de gegevens zetten in een tweedimensionale genoemde serie " aFileNameSize“.

I zou hopen dat een vraag van de serie zou produceren:

strFileName = aFileNameSize (0.0)
intFileSize = aFileNameSize (0.1)
Vertoning/>
Msgbox strFileName &“, „& intFileSize

Thank u… DavidS

Antwoord : VBScript - vang de Inhoud van de Omslag in Serie

als hoop die ik heb begrepen

weg in lijn 1
1:
2:
3:
4:
5:
6:
7:
8:
9:
10:
11:
12:
13:
14:

strFolder = „C:\TEMP\FOLDER23“
Schemerig aFileNameSize (0, 1)

Plaats objFSO = CreateObject („Scripting.FileSystemObject“)
Plaats colFolder = objFSO.GetFolder (strFolder)
Plaats colFiles = colFolder.Files

Voor elk strFile in colFiles
aFileNameSize (0.0) = strfile.name
aFileNameSize (0.1) = strfile.size
strFileName = aFileNameSize (0.0)
intFileSize = aFileNameSize (0.1)
MsgBox strFileName & „,“ & intFileSize & „bytes“
Daarna
Andere oplossingen  
 
programming4us programming4us