Discussion :

[patreims]

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
set WshShell = WScript.CreateObject("WScript.Shell" )
 
strDesktop = WshShell.SpecialFolders("Desktop" )
 
set oShellLink = WshShell.CreateShortcut(strDesktop & "\Assistance Informatique.lnk" )
 
oShellLink.TargetPath = "C:\Program Files(x86)\Mozilla Thunderbird\thunderbird.exe""mailto:mdh-informatique@univ-reims.fr"
 
oShellLink.IconLocation = "C:\Windows\System32\mycomput.dll, 0"
 
oShellLink.Description = "Mail mdh info"
 
oShellLink.Save

[l_autodidacte]

Bienvenu sur DVP

Il manquerait oShellLink.Save pour pouvoir enregistrer le raccourci créé

[ProgElecT]

Salut
Il me semble que la syntaxe de la ligne 7 doit être

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

oShellLink.TargetPath = "C:\Program Files(x86)\Mozilla Thunderbird\thunderbird.exe -compose to=mailto:mdh-informatique@univ-reims.fr"