Plateforme Level Extreme
Abonnement
Profil corporatif
Produits & Services
Support
Légal
English
Working with Text File SDF Format
Message
De
23/08/2005 08:46:16
Cetin Basoz
Engineerica Inc.
Izmir, Turquie
 
 
À
23/08/2005 08:07:46
Information générale
Forum:
Visual FoxPro
Catégorie:
Autre
Versions des environnements
Visual FoxPro:
VFP 9
OS:
Windows XP
Database:
Visual FoxPro
Divers
Thread ID:
01042857
Message ID:
01042869
Vues:
21
>I am a bit lost on how to work with text file.
>
>Scenario: Changing a text file contents into a text file contents that I can work with
>Roadblock: Need to understand how to import a "fixed" name textfile into the program.
>
>Current program starts as below:
>PARAMETER tcfile
>CLEAR
>PRIVATE pcdt, pctime1, pctermi, pcinout, pcnoee, pcfile
>STORE '' TO pcdt, pctime1, pcnoee
>IF PCOUNT() <> 1
> WAIT WINDOW TIMEOUT 10 'Source ascii file was not defined! Please define source filename.'
> RETURN
>ENDIF
>IF .NOT. FILE(tcfile)
> WAIT WINDOW TIMEOUT 2 'File does not exist or incorrect filename!'
> RETURN
>ENDIF
>
>As you can see, I have use parameter and I have to name a text file together to get the prg to work. All that is okay, but when compiled to exe, there exist a problem when I run the exe outside of foxpro it does not work.
>
>Can someone let me know how to improve this program so that when outside the foxpro environment I can just run this program with the text file found in the same folder.
>
>Appreciate some assistance here.
>
>Regards,
>Christopher

I didn't understand what's your problem and what you're trying to do. Maybe you want something like this:
local lcFile
lcFile = getfile('TXT')
if empty(m.lcFile)
     WAIT WINDOW TIMEOUT 10  'Source ascii file was not defined! Please define source filename.'
     RETURN
ENDIF
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
Précédent
Répondre
Fil
Voir

Click here to load this message in the networking platform