- #1
I
iwi121
Neues Mitglied
Themenersteller
- Dabei seit
- 31.12.2005
- Beiträge
- 2
- Reaktionspunkte
- 0
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: & i & list1 & list & vbCr
in der mssg.box erscheint aber erst alle zeilen von list1 und dann alle zeilen von list ... ich brauch sie aber nebeneinander
Ps. ich lese damit die dateieigenschaften eines dokuments aus
weiß jemand woran es liegt ???
danke ines
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: & i & list1 & list & vbCr
in der mssg.box erscheint aber erst alle zeilen von list1 und dann alle zeilen von list ... ich brauch sie aber nebeneinander
Ps. ich lese damit die dateieigenschaften eines dokuments aus
weiß jemand woran es liegt ???
danke ines