PureBasic

Bonjour à tous.

Je voudrais savoir si il serait possible de faire un code pour lancer un fichier par exemple un exe, ou un jpg, etc ..... si le fichier n'a pas d'extension.

Ce qui serait bien, ce serait de ne pas le renommer l'utiliser et réenlever l'extension apres, car si le programme lanceur s'arrette avant la fin, le fichier sans extension se retrouverait avec une extension et donc perdrait son interet du départ.

J'aurais besoin de cette idée car je voudrais faire un lanceur et "obliger" l'utilisateur à passer par lui et "l'empecher" de démarrer un de mes prg en cliquant directement dessus.

Je sais si à son tour il renomme en .exe cela remarche, mais je ne pense pas que les gens autour de moi (qui s'y connaissent encore moins que moi) prendrons le risque de le faire.

Merci
Bonne journée

Je ne vois pas, mais si c'est un de tes prog que tu veux lancer avec ton lanceur, tu peux faire en sorte qu'il ne démarre pas lorsque l'on le lance sans un code secret mis en parametre.

Dans le prog à lancer tu rajoute au debut :
if ProgramParameter()<>"code secret" : end : endif

Et lorsque tu le lance tu écrit
Runprogramme("ton prog.exe","code secret",repertoire$)

Voila, si cela peut t'aider.

Merci de ton aide.

Le probleme c'est que les programmes que je lance ne sont pas tous de moi.
En plus y'a de tout, VB, ACCESS, EXCEL, etc...

Je pense donc que ce n'est pas la solution, mais par contre ce que tu viens de me donner comme combine va me servir pour ceux que je lancerais et qui seront en pure

Encore merci à toi.

Si quelqu'un a une autre idée ....

Bonne journée

je pense que si tu fais 'Runprogramme("ton prog"'

"ton prog" sans extension, et qu'il sagit d'un "*.exe" cela doit marcher !

Tu as raison (comme DAB) DOBRO

Le bleme est a moitié résolu, cela paraissait tellement compliqué que je n'avais pas essayé le plus simple.

Mais par contre pour un ACCESS ça marche pas apparement, j'ai essayé :
Puis Alors la ACCESS s'ouvre mais pas le fichier.
Puis Pareil.

J'ai plus d'idée

Bonne journée

Euh, solution conne : Copie ton fichier dans un rep temporaire puis supprime le.

Sinon tu crypte qlq octets de ton fichier

a tout hasard n'a tu pas essayé

RunProgram("c:\FichierMdbSansExtension")

directement !!

car windows lui sait quel est le type de fichier que tu cherche a cacher
si ACCESS est parametrer pour ce genre de fichier,windows devrai en principe l'appeler

un peut comme quand tu double click sur une image, le prg a qui est atribué a ce type d'image s'ouvre avant (painshoppro par exemple )...

Dobro a écrit :a tout hasard n'a tu pas essayé

RunProgram("c:\FichierMdbSansExtension")

directement !!

Oui oui j'avais essayé, pour les solution faciles c'est chezmoi
Mais helas mille fois helas, il m'ouvre le notepad qui rame a mort.

Je pense que justement Windows sait lequel ouvrir grace aux extension sinon il est perdu le petit.
A ce crosoft qd on sort ds sentiers battus .....

@DORIAN bonjour

Oui c'est aussi une solution, le cryptage, mais comme les progs ne sont pas tous a moi......

C'est en fait juste pour pas que l'utilisateur créé un raccourci directement sur le fichier que mon lanceur est censé lancer, sinon a quoi il sert le lanceur

Bon si des fois vous avez une idée
Merci de votre aide

Bon je viens d'essayer avec un fichier acces et excel et ça marche :

Change l'extension de ton fichier et execute le programme avec le nom de ton fichier en parametre :
RunProgram("C:\Program Files\Microsoft Office\OFFICE11\MSACCESS.EXE","c:\fichier.riri","c:\")

Il faut mettre une extension sinon c'est le prog qui la met de lui même !

Et le fichier s'ouvre impeccable. et l'enregistrement marche aussi (tester juste avec excel)

A toi de te refaire tes types d'extensions et le tour est joué. Et c'est clair que la majorité des personne ne s'auront pas l'ouvrir, surtout si il ne savent pas quel type de fichier c'est !

T'a raison pour excel ...
Mais je n'y arrivais pas parce qu'en plus, j'avais des espaces dans le nom de fichier.

Par contre avec ACCESS waloo, il ne veut rien savoir ce bourrin, il veut son extension ou sinon niet.....

J'suis dégouté

Merci de ton aide.

Tiens c'est bizarre chez moi ça passe avec ACCESS 2003 sous win2k

Moi c'est ACCESS 2000 sous W2000