Πώς να στείλετε ένα Virtual Basic Fax

Visual Basic ( VB ) είναι μια γλώσσα προγραμματισμού που χρησιμοποιείται για τη δημιουργία εφαρμογών λογισμικού . VB μπορεί να στείλει ένα φαξ χρησιμοποιώντας μια βιβλιοθήκη αντικειμένων που ονομάζεται FAXCOMEXLib . Τα πράγματα που θα χρειαστείτε
Visual Basic editor
Σημειωματάριο
Η Εμφάνιση Περισσότερες οδηγίες
Η

1 Δημιουργήστε ένα νέο υπορουτίνα σε VB και καλούν τους Fax βιβλιοθήκη αντικειμένων και ρυθμίστε το μεταβλητές :

Private Sub Form_Load ( )

Dim objFaxDocument Όπως New FAXCOMEXLib.FaxDocument

Dim objFaxServer Όπως New FAXCOMEXLib.FaxServer

Dim objSender Όπως FAXCOMEXLib . FaxSender

Dim jobID As Object 2

Ρύθμιση χειρισμού λάθους κώδικα για να προλάβουν τυχόν λάθη και εμποδίζουν την εφαρμογή από τη συντριβή :

On Error GoTo Error_Handler

Η 3

Συνδεθείτε με το αντικείμενο του διακομιστή Fax : .

objFaxServer.Connect ( "" )
Η

4 Ανοίξτε το Σημειωματάριο
5

Πληκτρολογήστε το μήνυμα φαξ που θέλετε να στείλετε και να αποθηκεύσετε ως αρχείο txt
Η 6

Εισαγωγή το κείμενο για το φαξ , με τη συμπερίληψη των txt, δημιουργήσατε στα προηγούμενα βήματα : . . .

objFaxDocument.Body = " c : \\ Fax \\ MyMessage.txt "
Η 7

Ορίστε το όνομα του φαξ και το επίπεδο προτεραιότητας :

objFaxDocument.DocumentName = "My Fax Name"

objFaxDocument.Priority = FAXCOMEXLib.FAX_PRIORITY_TYPE_ENUM.fptHIGH

Σε αυτήν την περίπτωση το φαξ θα αποσταλεί αμέσως μόλις εκτελείται ο κώδικας .
8

Προσθέστε έναν αριθμό φαξ για όπου το φαξ θα αποσταλεί :

objFaxDocument.Recipients.Add ( " 999999999 " , " Wayne" )

Αντικαταστήστε τα ψηφία " 999999999 " με το σχετικό αριθμό φαξ .
Η

9 Ρυθμίστε την επιλογή της προσκόλλησης του κειμένου φαξ σε μια λήψη φαξ , όταν μέσω e-mail :

objFaxDocument.AttachFaxToReceipt = True
Η 10

Επιλέξτε έναν τύπο της συνοδευτικής σελίδας :

objFaxDocument.CoverPageType = FAXCOMEXLib.FAX_COVERPAGE_TYPE_ENUM.fcptSERVER

objFaxDocument.CoverPage = " γενικές"

11

Προσθέστε τη διεύθυνση ηλεκτρονικού ταχυδρομείου , όπου η παραλαβή φαξ θα αποσταλεί και ορίστε τον τύπο παραλαβής για το ηλεκτρονικό ταχυδρομείο :

objFaxDocument.ReceiptAddress = " MyName@mydomain.com "

objFaxDocument.ReceiptType = FAXCOMEXLib.FAX_RECEIPT_TYPE_ENUM.frtMAIL

12

Προγραμματίστε το χρόνο κατά τον οποίο πρέπει να αποσταλεί το φαξ :

objFaxDocument.ScheduleType = FAXCOMEXLib.FAX_SCHEDULE_TYPE_ENUM.fstSPECIFIC_TIME

objFaxDocument.ScheduleTime = CDate ( " 12:35:47 PM » )
Η 13

Προσθέστε το κείμενο θέμα του email :

objFaxDocument.Subject = " η σημερινή φαξ "
Η 14

Ορίστε τις ιδιότητες για τον αποστολέα και να αποθηκεύσετε τις πληροφορίες :

objFaxDocument.Sender.Title = "Κος "

objFaxDocument.Sender.Name = " John Ryan "

objFaxDocument.Sender.Email = " myemailaddress@mydomain.com "

objFaxDocument.Sender.ZipCode = " 44118 "