Level Extreme platform
Subscription
Corporate profile
Products & Services
Support
Legal
Français
Data file transfer on a dial up using Visual Foxpro 6.0
Message
 
To
18/04/2000 12:24:14
General information
Forum:
Visual FoxPro
Category:
Other
Miscellaneous
Thread ID:
00360792
Message ID:
00360914
Views:
11
Hi Doug,

This is from PC-Anywhere 9's help. It should get you started in the right direction...

Alex

Integer count
String match[10]
count = 0 ;set count to 0
;search for matching files
Find First "C:*.DAT" match
;if match found, go to @found
If ($Result == 1) GoTo @found
Type Line "No matching files found."
GoTo @end ;if not found, go to @end

@found:
Type Line "Matching files found."

@foundmore:
count = count + 1 ;increment count by 1
Type String match ;display filename
Type String "^M" ;hard carriage return
;search for next instance until no more are found
Find Next match

If $Result == 1 GoTo @foundmore
Type String "Number of *.DAT files found: "
Type Line count ;display count

@end:
Low-carb diet not working? Try the Low-food diet instead!
Previous
Next
Reply
Map
View

Click here to load this message in the networking platform