VB程式Call WinFax傳真
奇怪一直無法順利利用系統傳真,使用者必須手動傳真
這問題一直困擾我跟使用者好久
今天終於抽空,好好的.仔細的測
解決了,
程式碼如下:
Set sendObj = CreateObject("WinFax.SDKSend")
sendObj.SetAreaCode ("")
sendObj.SetCountryCode ("")
sendObj.SetDialPrefix ("")
sendObj.SetNumber ("0," + 電話號碼)
sendObj.SetTo (cusna)
If sendObj.AddRecipient() = 1 Then
MsgBox "無法新增收件人!", vbExclamation
Exit Sub
End If

sendObj.SetPreviewFax (0)
sendObj.SetUseCover (0)
sendObj.SetUseCreditCard (0)
sendObj.SetResolution (1)
sendObj.SetUsePrefix (0)
sendObj.ShowCallProgess (1)
sendObj.SetPrintFromApp (1)
sendObj.Send (0)

問題出在,WinFax軟體設定
一.數據機與其他傳真裝置,使用預設,撥號設定,都不要輸入任何東西
二.傳送.電話簿中.大小寫視為相異及離開時儲存目錄樹結構不要打勾

janema66 發表在 痞客邦 留言(1) 人氣()