[HELP] lancer une application avec ses arguments et demarrer dans....

Question

Bonjour,
voici mon souci,
J'ai besoin en urgence de pouvoir en fait transformer un fichier LNK
(typiquement : CIBLE et DEMARRER DANS) en VBS

Cible= "C:\Program Files\Oracle\Forms6\BIN\ifdbg60.EXE" MODULE=XXXGAL00 TERM=galilee:galilee userid=galirec/galirec@GALI

Demarrer=\FR2N\Data\Commun\MG\Galilee6\EXE

En effet le demarrer dans doit etre sur le reseau, mais le packaging de lappli et son install se font hors reseau

Pourriez vous m'aider s'il vous plait, je galere depuis 2 semaine

Par avance merci

Renfield · Answer

l'API ShellExecute te propose tous ces paramètres

babydoc · Answer

Je regarde cette info, notemment sur MSDN
Mais debutant en VBScript, pouvez me guider plus précisement
un example concret se rapprochant de mon cas s'il vous plait...
avec CIBLE et DEMARRER DANS

Merci

babydoc · Answer

Re,
Je pense m'etre mal expliqué, en effet, je ne cherche pas a appleler un link file
mais a recreer sa fonction dans un VBS,
En effet notre poste hors reseau, n'accepte pas le LNK puisque ce dernier pointe en DEMARRER DANS sur un lecteur mappé, mais en reproduisant son execution en VBS : cest a dire : lancer l'application avec sesargument (CIBLE) avec DEMARRER DANS, cest sensé fonctionné
donc pas de lancement du lnk puisque windows l'interdit sur son desktop, a cause du lien reseau, mais tout faire en VBS

MErci

Renfield · Answer

Vous êtes ici :
Thèmes / Visual Basic 6 / Système / Exécution

rien qui ne laissait présager du VBS

comme quoi, il est important de choisir la bonne section, quand on postes sur le forum

Renfield
Admin CodeS-SourceS- MVP Visual Basic

babydoc · Answer

Désolé, je me suis trompé,
ca peut arriver ...
Y a t il une facon d'y remedier...
JE desepere..
Sorry

cs_JMO · Answer

Bonjour à tous

Exemple de raccourci:

'création raccourci bureau avec ouverture programme
Set Shell = CreateObject("WScript.Shell")
DesktopPath = Shell.SpecialFolders("Desktop")
Set link = Shell.CreateShortcut(DesktopPath & "\UnRaccourciBureau.lnk")
link.Arguments = "1 2 3"
link.Description = "raccourci test"
'link.HotKey = "CTRL+ALT+MAJ+X"
link.IconLocation = "D:\eMule\eMule.exe,1"
link.TargetPath = "D:\eMule\eMule.exe"
link.WindowStyle = 3
link.WorkingDirectory = "e:\eMule"
link.Save

jean-marc

[HELP] lancer une application avec ses arguments et demarrer dans....

6 réponses

Votre réponse

Discussions similaires