1 Ανοίξτε το Windows Notepad και επικόλληση του παρακάτω σε ένα νέο αρχείο κειμένου :
fileName = WScript.Arguments ( 0 )
Ορισμός FSO = CreateObject ( " Scripting.FileSystemObject " )
fullpath = fso.GetAbsolutePathName ( fileName )
φλοιού set = WScript.CreateObject ( " Shell.Application " )
shell.Namespace ( 0 ) . . ParseName ( fullpath ) InvokeVerb " & Εκτύπωση "
Αποθηκεύστε το αρχείο κειμένου ως " C : . \\ printPDF.vbs " 2
Ανοίξτε Visual Basic και να δημιουργήσετε ένα νέο έργο κάνοντας κλικ στο " Αρχείο" και "New Project ". Επιλέξτε " Windows Forms " του έργου .
Εικόνων 3
Κάντε διπλό κλικ στο " OpenFileDialog " συστατικό στο " Toolbox" πίνακα για να προσθέσετε ένα παράθυρο διαλόγου ανοιχτό αρχείο στο έργο σας .
Η 4
κάντε διπλό κλικ στο " κουμπί" συστατικό στο " Toolbox" πίνακα για να προσθέσετε ένα κουμπί στο έργο σας . Ένα κουμπί θα εμφανιστεί με τη μορφή των Windows σας .
5
Κάντε διπλό κλικ στο κουμπί που δημιουργήθηκε πρόσφατα για να ανοίξετε τον πηγαίο κώδικά του .
Η 6
Επικολλήστε τον παρακάτω, για να ζητήσει από το χρήστη για ένα αρχείο για εκτύπωση και τη λειτουργία του VBScript για να εκτυπώσετε: " . αρχεία PDF
Πνευματικά δικαιώματα © Γνώση Υπολογιστών Όλα τα δικαιώματα κατοχυρωμένα