Level Extreme platform
Subscription
Corporate profile
Products & Services
Support
Legal
Français
CommonDialog
Message
 
To
All
General information
Forum:
Visual FoxPro
Category:
Coding, syntax & commands
Title:
CommonDialog
Miscellaneous
Thread ID:
00592976
Message ID:
00592976
Views:
58
Hi all
I Use the commondialog to retreive multiple files If I run my app with WIn98se it work fine But IN Win2000 it cut the file name to 8 car. I use the same app with two different machine

My code look like this

With Thisform.oComm
If Thisform.pTypeFich <> 3
** MULTISELECT
.Flags = 0x200+0x8000
Endif
.DialogTitle ="Sélection des fichiers "
Do case
case thisform.ptypefich = 1
.Filter = "Facture IN*.*|IN*.*"
case thisform.ptypefich = 2
.Filter = "Banque PA*.*|PA*.*"
case thisform.ptypefich = 3
.Filter = "Liste de prix PL*.*|PL*.*"
Otherwise
.Filter = "All Files *.*|*.*"
endcase
.FilterIndex = Thisform.pTypeFich
.Filename = ""
.InitDir = lInitDir
.ShowOpen
lcFileName = Upper(.Filename)
EndWith


Thank's for your time !

Benoit
Next
Reply
Map
View

Click here to load this message in the networking platform