Plateforme Level Extreme
Abonnement
Profil corporatif
Produits & Services
Support
Légal
English
CommonDialog
Message
 
À
Tous
Information générale
Forum:
Visual FoxPro
Catégorie:
Codage, syntaxe et commandes
Titre:
CommonDialog
Divers
Thread ID:
00592976
Message ID:
00592976
Vues:
59
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
Suivant
Répondre
Fil
Voir

Click here to load this message in the networking platform