Level Extreme platform
Subscription
Corporate profile
Products & Services
Support
Legal
Français
Import from like 28_07_2003.TXT , 29_07_2003.TXT files
Message
From
29/07/2003 08:51:56
Cetin Basoz
Engineerica Inc.
Izmir, Turkey
 
General information
Forum:
Visual FoxPro
Category:
Coding, syntax & commands
Miscellaneous
Thread ID:
00814477
Message ID:
00814483
Views:
15
>Hi All,
>i have a like 28_07_2003.TXT , 29_07_2003.TXT files and its creating for date and its containing strings like below
>
>
>11:41,07.29.03,1N,3A,5N,7A,9A,2N,4N,6N,8N,0N,1D,3D,5D,7D,9D,2D,4C,6D,8C,0C
>11:41,07.29.03,1N,3A,5N,7A,9A,2N,4N,6N,8N,0N,1D,3D,5D,7D,9D,2D,4C,6D,8C,0C
>11:42,07.29.03,1N,3A,5N,7A,9A,2N,4N,6N,8N,0N,1D,3D,5D,7D,9D,2D,4C,6D,8C,0C
>11:43,07.29.03,1N,3A,5N,7A,9A,2N,4N,6N,8N,0N,1D,3D,5D,7D,9D,2D,4C,6D,8C,0C
>
>
>now .. i wantto create a cursor with field Cstring c(75) want to import the lines between two dates range as user choice . how can i do ?
>
>TIA
Create Cursor myTest (myField c(75))
ldStart = {^2003/7/27}
ldEnd   = {^2003/7/29}
For ix=0 to ldEnd-ldStart
ldDate = ldStart+ix
lcFile =  padl(Day(ldDate),2,'0')+'_'+;
  padl(Month(ldDate),2,'0')+'_'+;
  padl(Year(ldDate),4)+'.txt'
  If File(lcFile)
     Append from (lcFile) type sdf
  endif
endfor 
browse
Cetin
Çetin Basöz

The way to Go
Flutter - For mobile, web and desktop.
World's most advanced open source relational database.
.Net for foxheads - Blog (main)
FoxSharp - Blog (mirror)
Welcome to FoxyClasses

LinqPad - C#,VB,F#,SQL,eSQL ... scratchpad
Previous
Next
Reply
Map
View

Click here to load this message in the networking platform