Hola estoy tratando de crear una secuencia de comandos que se abre una gran variedad de páginas de internet y programas a través de un vbscript, pero estoy teniendo dificultades para abrir los archivos pdf que se encuentran en una unidad de red, he probado un montón de comandos, pero no puede conseguir los archivos para que se abra a todos por lo que cualquier ayuda se agradece 🙂

Set IE = CreateObject("InternetExplorer.Application") 
set WshShell = WScript.CreateObject("WScript.Shell")  
IE.Navigate "https://websiteaddress.com
IE.Visible = True 
Wscript.Sleep 3000 
WshShell.SendKeys "text"
WshShell.SendKeys "{ENTER}"
Wscript.Sleep 3000
WshShell.SendKeys "text"
WshShell.Sendkeys "{TAB}"
WshShell.Sendkeys "{TAB}"
WshShell.Sendkeys "text"
WshShell.SendKeys "{ENTER}"
Wscript.Sleep 3000
WshShell.SendKeys "{TAB}"
WshShell.SendKeys "{TAB}"
WshShell.SendKeys "{ENTER}"
Wscript.Sleep 3000
WshShell.SendKeys "{TAB}"
WshShell.SendKeys "{TAB}"
WshShell.SendKeys "{TAB}"
WshShell.SendKeys "{TAB}"
WshShell.SendKeys "{ENTER}"
Wscript.Sleep 3000
WshShell.SendKeys "{TAB}"
WshShell.SendKeys "{TAB}"
WshShell.SendKeys "{TAB}"
WshShell.SendKeys "{TAB}"
WshShell.SendKeys "{TAB}"
WshShell.SendKeys "{TAB}"
WshShell.SendKeys "{ENTER}"
Wscript.Sleep 3000
WshShell.SendKeys "%{TAB}"
WshShell.SendKeys "%{F4}"
Wscript.Sleep 3000
WshShell.SendKeys "%{TAB}"
IE.Navigate "https://websiteaddress.com"
IE.Visible = True 
Wscript.Sleep 3000
WshShell.SendKeys "text"
WshShell.SendKeys "{ENTER}"
Wscript.Sleep 3000
WshShell.Run "H:\Shortcuts /k dir *.*"
WshShell.Run "Notepad.exe"
Wscript.Sleep 3000
WshShell.Run "calc.exe"

Soy muy nuevo en vbscripting pero he probado las dos líneas siguientes y ni el trabajo;

WshShell.Run "G:\pathtofile\thepdf.pdf"

WshShell.Run "NET USE G: \server\share\thepdf.pdf"
  • por favor, publicar su secuencia de comandos junto con uno de los intentos realizados
  • Editado mi pregunta original con el código y los intentos.
InformationsquelleAutor CharlieG | 2012-06-24

1 Comentario

  1. 2

    Me sorprende usted es nuevo en vbscript y, sin embargo, elegir que idioma para hacer estas cosas, vbscript no es muy adecuado para este tipo de trabajo y los días de vbscript se cuentan, ruby sería una mejor opción si desea utilizar un programa de idioma y si desea automatizar cosas que le beter uso http://www.autohotkey.com/

    De todos modos, como este se debe trabajar en vbscript. El «» representa un único » dentro de una cadena.

    Set WshShell = CreateObject("WScript.Shell")
    WshShell.Run """g:\path with spaces\thepdf.pdf"""
    • Gracias por la respuesta de pedro, la razón detrás del uso de vbscript es im a automatizar el proceso de inicio en el trabajo y estamos muy restringido en el que vayan a ser capaz de descargar/instalar aplicaciones…yo, por supuesto, mirar en el autohotkey aplicación y también dar a este un intento.
    • Comprobado y funciona perfectamente, muchas gracias Pedro!
    • eres bienvenido, el éxito con AH. podría aceptar la respuesta ?
    • Hecho, y gracias de nuevo 🙂

Dejar respuesta

Please enter your comment!
Please enter your name here