[AYUDITA] javascript + ActiveXObject + incono acceso directo

Tema en 'Programación & Programación Web' iniciado por VenenoxHC, 6 Feb 2013.

  1. VenenoxHC

    VenenoxHC Usuario Casual nvl. 2
    37/41

    Registrado:
    30 Nov 2008
    Mensajes:
    1.798
    Me Gusta recibidos:
    1
    Holaaa!,,,
    tengo un evento pequeño, espero que puedan ayudame,

    tengo este codigo

    Insertar CODE, HTML o PHP:
    <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!!!!!