1
Abra Windows Bloc de notas y pegue el código siguiente en un nuevo archivo de texto:
fileName = WScript.Arguments ( 0 )
Set fso = CreateObject ( " Scripting.FileSystemObject " )
fullPath = fso.GetAbsolutePathName ( fileName )
set shell = WScript.CreateObject ( " Shell.Application " )
shell.Namespace ( 0 ) . . ParseName ( fullPath ) InvokeVerb "& Imprimir "
Guarde el archivo de texto como "C : \\. printPDF.vbs "
2
Abra Visual Basic y cree un nuevo proyecto haciendo clic en "Archivo" y "Nuevo proyecto ". Elige proyecto "Windows Forms " .
3
Haga doble clic en el componente " OpenFileDialog " dentro de la " caja de herramientas " del panel para agregar un archivo de diálogo abierto para su proyecto.
4
Haga doble clic en el componente "Button" dentro de la " caja de herramientas " del panel para agregar un botón para su proyecto. Aparecerá un botón en el formulario de Windows.
5
Haga doble clic en el botón de nueva creación para abrir su código fuente .
6
Pega el siguiente para pedir al usuario para un archivo para imprimir y ejecutar el VBScript para imprimirlo:
OpenFileDialog1.Filter = " PDF archivos