Go Premium for a chance to win a PS4. Enter to Win

x
  • Status: Solved
  • Priority: Medium
  • Security: Public
  • Views: 229
  • Last Modified:

Fax

i'm writing vb project. On Click button i need to fax text from the text box.
0
Sychev1
Asked:
Sychev1
1 Solution
 
Barry CunneyCommented:
0
 
Barry CunneyCommented:
You could use the WriteProfileString API call and rewrite the [WINDOWS], DEVICE entry in the WIN.INI file to change printer to a FAX printer set up. VB will instantly use the new printer, when the next Printer.Print command is next issued
0
 
anu1401Commented:
try this code:
Dim num As Integer

Private Sub cmdClose_Click()
    End
End Sub

Private Sub Form_Load()
    cmbAttach.Enabled = False
    cmbFaxaddress.Enabled = False
    cmdCancel.Enabled = False
    cmdSend.Enabled = False
    Option1.Enabled = False
    Option2.Enabled = False
    Text1.Enabled = False
End Sub

Private Sub mnu_Connect_Click()
    If MSComm1.PortOpen = False Then
        MSComm1.PortOpen = True
       
        cmbAttach.Enabled = True
        cmbFaxaddress.Enabled = True
        cmdCancel.Enabled = True
        cmdSend.Enabled = True
        Option1.Enabled = True
        Option2.Enabled = True
        Text1.Enabled = True
       
        MsgBox "Port opened"
    Else
        MsgBox "Port already opened"
    End If
End Sub

Private Sub MSComm1_OnComm()

End Sub

anu
0
 
DanRollinsCommented:
Hi Sychev1,
It appears that you have forgotten this question. I will ask Community Support to close it unless you finalize it within 7 days. I will ask a Community Support Moderator to:

    Accept BCUNNEY's comment(s) as an answer.

Sychev1, if you think your question was not answered at all or if you need help, just post a new comment here; Community Support will help you.  DO NOT accept this comment as an answer.

EXPERTS: If you disagree with that recommendation, please post an explanatory comment.
==========
DanRollins -- EE database cleanup volunteer
0
 
SpideyModCommented:
per recommendation

SpideyMod
Community Support Moderator @Experts Exchange
0

Featured Post

Industry Leaders: We Want Your Opinion!

We value your feedback.

Take our survey and automatically be enter to win anyone of the following:
Yeti Cooler, Amazon eGift Card, and Movie eGift Card!

Tackle projects and never again get stuck behind a technical roadblock.
Join Now