29 de enero de 2002

Crear un acceso directo en el escritorio

Como crear un acceso directo en el escritorio con Windows Scripting Host (WSH)
oWsh = CreateObject("WScript.Shell"-) 
cDesktopDir = oWsh.SpecialFolders("Desktop"-) 
oLnk = oWsh.CreateShortcut(cDesktopDir + "Shortcut a Notepad.lnk"-) 
oLnk.TargetPath = oWsh.ExpandEnvironmentStrings("%windir%"-) + "notepad.exe"
Alex Feldstein, MCP
MVP Visual FoxPro
Etiquetas:

No hay comentarios. :

Publicar un comentario

Los comentarios son moderados, por lo que pueden demorar varias horas para su publicación.

Suscribirse a: Comentarios de la entrada ( Atom )