falsche Dateiauflistung
Übersicht

![]() |
juse4proBetreff: falsche Dateiauflistung |
![]() Antworten mit Zitat ![]() |
---|---|---|
hi,
ich glaube, dass meine überschrift erklärt was ich für probs habe... ich habe im durchsuchtem Ordner, genau 1 Ordner dieser wird aber hier nicht in den DIM gespeichert hier mal der Code: [AUSKLAPPEN] Dim weapon_paths$(32)
Function SearchForWeapons() Local i Local file$ Local dir=ReadDir("weapons\") For z=0 To 32 weapon_paths$(z)="" Next Repeat file$=NextFile(dir) If FileType("weapons\"+file$) = 2 Then weapon_paths$(i)=file$ If i<32 Then i=i+1 Print file EndIf If file$="" Then finish=1 Until finish=1 For z=0 To 32 Print weapon_paths$(z) Next WaitKey End Function SearchForWeapons() wieso? help |
||
Portfolio |LinkedIn |XING |
![]() |
Eingeproggt |
![]() Antworten mit Zitat ![]() |
---|---|---|
Du musst für FileType einen absoluten Pfad angeben. Siehe CurrentDir![]() mfG, Christoph |
||
![]() |
juse4pro |
![]() Antworten mit Zitat ![]() |
---|---|---|
funtz leider immer noch net:
Code: [AUSKLAPPEN] If FileType(CurrentDir$()+"weapons\"+file$) = 2 Then |
||
Portfolio |LinkedIn |XING |
Übersicht


Powered by phpBB © 2001 - 2006, phpBB Group