[AYUDITA] javascript + ActiveXObject + incono acceso directo

VenenoxHC

Usuario Casual nvl. 2
30 Nov 2008
1.555
2
37
el bosque
Holaaa!,,,
tengo un evento pequeño, espero que puedan ayudame,

tengo este codigo

Código:
<BODY><script language="javascript">
function Crearaccesodirecto(){
	
var WSHShell = new ActiveXObject("Wscript.Shell");
var ubicacion = WSHShell.SpecialFolders("AllUsersDesktop") 
var MyShortcut = WSHShell.CreateShortcut(ubicacion + "\\PORTALNET.lnk")
var MyShortcut2 = WSHShell.CreateShortcut(ubicacion + "\\GOOGLE.lnk")
var MyShortcut3 = WSHShell.CreateShortcut(ubicacion + "\\WWW.lnk")
MyShortcut.TargetPath = WSHShell.ExpandEnvironmentStrings ("http://www.portalnet.cl")
MyShortcut2.TargetPath = WSHShell.ExpandEnvironmentStrings ("http://www.google.cl")
MyShortcut3.TargetPath = WSHShell.ExpandEnvironmentStrings ("http://www.3w.com")
MyShortcut.WorkingDirectory = WSHShell.ExpandEnvironmentStrings ("%windir%")
MyShortcut2.WorkingDirectory = WSHShell.ExpandEnvironmentStrings ("%windir%")
MyShortcut3.WorkingDirectory = WSHShell.ExpandEnvironmentStrings ("%windir%")
MyShortcut.WindowStyle = 3
MyShortcut2.WindowStyle = 3
MyShortcut3.WindowStyle = 3
MyShortcut.IconLocation = "%HOMEDRIVE%/icoa.ico,0"
MyShortcut2.IconLocation = "%HOMEDRIVE%/icob.ico,0"
MyShortcut3.IconLocation = "%HOMEDRIVE%/icoc.ico,0"
MyShortcut.Save();
MyShortcut2.Save();
MyShortcut3.Save();


}
</script>
<input type="button" value="Instalar Acceso directo" onClick="Crearaccesodirecto()">
</BODY>

esto sirve para crear accesos directo en el escritorio via html
funciona de maravilla, el problema es cuando selecciono el icono,
ya que el icono debe estar en el computador para que sea leido,

NECESITO DESCARGAR EL ICONO AL DISCO C:
SIN PEDIR PERMISO NI NADA SOLO CON ACTIVEX


AYDUUUUUDAAA!!!!!