[AYUDITA] javascript + ActiveXObject + incono acceso directo

Discussion in 'Programación & Programación Web' started by VenenoxHC, Feb 6, 2013.

  1. VenenoxHC

    VenenoxHC Usuario Casual nvl. 2
    37/41

    Joined:
    Nov 30, 2008
    Messages:
    1,780
    Likes Received:
    1
    Holaaa!,,,
    tengo un evento pequeño, espero que puedan ayudame,

    tengo este codigo

    Code:
    <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!!!!!