Merci pour ton aide Harkonnen,
je viens de coller la ligne, j'ai une erreur de compil, fin d'instruction demandée.
Mon code entier c'est :
Set objNetwork = CreateObject("Wscript.Network" )
strUser = objNetwork.UserName
strPath = "C:\Documents and Settings\" & strUser
Set fso = CreateObject("Scripting.FileSystemObject" )
StrFolder = strpath & "\Menu Démarrer\Programmes\Autres"
set WshShell = WScript.CreateObject("WScript.Shell" )
set oShellLink = WshShell.CreateShortcut(strFolder & "\Yahoo.lnk" )
oShellLink.TargetPath = "C:\\Program Files\\Internet Explorer\\iexplore.exe" "http:\\\\www.yahoo.fr"
oShellLink.WorkingDirectory = "C:\Program Files\Internet Explorer"
oShellLink.WindowStyle = 3
oShellLink.Save
Merci pour ton aide, j'ai trop peu de connaissance sur les script vbs ![:( :(](https://forum-images.hardware.fr/icones/frown.gif)