FiveTech Support Forums

FiveWin / Harbour / xBase community
Board indexActive topicsAll discussionsLogin (GitHub)
Board index FiveWin for Harbour/xHarbour FTP-directory
Antonio Linares
Posts: 44162
Joined: Thu Oct 06, 2005 05:47 PM
FTP-directory
Posted: Tue Aug 14, 2007 10:49 AM
Dietmar,

Try this:
Code: Select all Collapse
oText := TTxtFile():New( datei ) 

FOR x = 1 to len(aSpringer) 
   oText:Add(SubStr( aSpringer[x,1], 1, At( ".", aSpringer[x,1] ) + 3 ) ) 
NEXT
regards, saludos

Antonio Linares
www.fivetechsoft.com
Dietmar Jahnel
Posts: 83
Joined: Mon Oct 17, 2005 10:33 AM
FTP-directory
Posted: Tue Aug 14, 2007 12:42 PM

As long as there are no subdirectories I'm getting a clean result with this code.

Thanks again,
Dietmar

creswinman
Posts: 33
Joined: Thu Aug 24, 2006 03:14 AM
FTP-directory
Posted: Tue Oct 09, 2007 12:02 AM

Poo usas FOpen() ?

Continue the discussion

Static archive · New replies & topics via GitHub Discussions