[Frage] script

[iwi121]

hallo zusammen ,

ich habe folgende zeilen :

strPath="C:\va201205\Doku_frei"
strName="hauptformular_3.doc"

Set objShell=CreateObject("Shell.Application")
Set objFolder=objShell.Namespace(strPath)
Set objFile = objFolder.ParseName(strName)

Const cats=39
Redim arrHeaders(cats)

For i=0 To cats
arrHeaders(i)=objFolder.GetDetailsOf(objFolder.Items,i)
wert=objFolder.GetDetailsOf(objFile,i)


list1=list1 & arrHeaders(i)
list=list & wert
Next

MsgBox "test:" & list1 & list & vbCr

leider wird mir in der message box erst alle werte von list 1 aufgelistet und dann list .... ich brauch sie aber nebeneinander !!!
jemand ne idee wo mein fehler liegt ??

es geht um dateieigenschaften anzeigen

danke ines

[Abraxax]

eine tolle frage hast du da zu unserem forum.

*move* 2 asp, perl und co.