| 上一篇主題 :: 下一篇主題 |
| 發表人 |
內容 |
蔡文華
註冊時間: 2005-10-31
文章: 118
第 1 樓
|
 發表於: 星期五 七月 28, 2006 11:42 am 文章主題: 請問如何直接呼叫列表機內的傳真列印..不需在讓使用者輸入相關傳真訊息呢? |
 |
|
| 請各位高手指導一下 |
|
| 回頂端 |
|
 |
蔡文華
註冊時間: 2005-10-31
文章: 118
第 2 樓
|
| 發表於: 星期一 七月 31, 2006 4:29 pm 文章主題: 沒人知道嗎??? |
|
|
help!! help!! help!!
i need help!!
help!! help!! help!!
i need help!!
help!! help!! help!!
i need help!! |
|
| 回頂端 |
|
|
Ruey
註冊時間: 2003-03-12
文章: 1698
來自: tunglo
第 3 樓
|
| 發表於: 星期一 七月 31, 2006 4:48 pm 文章主題: |
|
|
有WINFAX範例
找一下吧
_________________
#############################
快樂媽咪系列幸福宅配,喝十全雞湯~原來幸福那麼簡單!!
學會VFP使用者社區的搜尋,Code才會更有趣~
############################# |
|
| 回頂端 |
|
|
catjoke
註冊時間: 2003-06-16
文章: 175
來自: 香港
第 4 樓
|
| 發表於: 星期一 七月 31, 2006 5:35 pm 文章主題: |
|
|
SET PRINTER TO "Microsoft Fax"
REPORT FORM abc TO PRINTER NOCONSOLE
_________________
喵喎~ 貓當然是 "茅" 的嘛! ^0^; |
|
| 回頂端 |
|
|
garfield
Site Admin
註冊時間: 2003-01-30
文章: 2157
第 5 樓
|
| 發表於: 星期一 七月 31, 2006 6:52 pm 文章主題: |
|
|
終於試出來了,
大家參考看看
作業環境: windows xp home
用本機自已的 modem
windows 內建 fax
vfp 9
*****************************
FaxServer = CreateObject("FaxServer.FaxServer")
**FaxServer.Connect("\\"+GETWORDNUM(SYS(0),1)) &&-- 這是參考fox.wikis.com的程式, 經過測試的結果,在send()時, 會出現the handle is invalid
FaxServer.Connect(GETWORDNUM(SYS(0),1)) &&--測試後不能加上\\ 才正確
FaxDoc = FaxServer.CreateDocument( getfile() )
* 只能支援可以用 windows 開啟且直接列印的檔案, 要用印vfp的report就不知要如何運作..殘念.
FaxDoc.SendCoverpage = 0
FaxDoc.RecipientName = "收件者的名稱"
FaxDoc.SenderName = "尚易資訊有限公司"
FaxDoc.FaxNumber = "24913635"
FaxDoc.SenderFax = "24851720"
JobNo = FaxDoc.Send()
release FaxDoc
FaxServer.Disconnect()
release FaxServer
** 真高興有試出來 ^^
_________________
利用>>搜尋<<的功能會比問的還要快得到答案. |
|
| 回頂端 |
|
|
蔡文華
註冊時間: 2005-10-31
文章: 118
第 6 樓
|
| 發表於: 星期三 八月 02, 2006 9:06 am 文章主題: 太感謝你了..我後面會把整個完整透過report直接傳真的函式提供給大家 |
|
|
最近正在試著使用modem直接從report列印出去..
試了很多種方法..都無法順利完成..當然winfax或hinet提供的傳真主機
都有用過..不過試著想想..如果站在客戶購買你的系統角度來說,
後二種方法是最浪費錢的,也最容易被客戶有話說的,
所以後面我轉改從modem卡來研究了,因為他是最便宜的,
所以現在只缺幾個步驟就可以把整個從report直接傳真的函式完成了
謝謝樓上的高手指導!! |
|
| 回頂端 |
|
|
蔡文華
註冊時間: 2005-10-31
文章: 118
第 7 樓
|
| 發表於: 星期三 八月 02, 2006 9:15 am 文章主題: 請問 GETWORDNUM(SYS(0),1) 一定要在vfp9才有的函式嗎? |
|
|
如果使用vfp6就無法執行相關指令了...
是否有轉變的方法,可以適用在vfp6以上的呢?
這樣才可以提供在vfp6以上的所有程式人員使用...
==^^ |
|
| 回頂端 |
|
|
garfield
Site Admin
註冊時間: 2003-01-30
文章: 2157
第 8 樓
|
| 發表於: 星期三 八月 02, 2006 10:39 am 文章主題: |
|
|
left( SYS(0) , at('#',sys(0))-2)
替代
GETWORDNUM(SYS(0),1)
| 代碼: |
* 只能支援可以用 windows �}啟且直接列印的檔案, 要用印vfp的report就不知要如何運作..殘念.
|
這就是vfp不能直接用report 輸出到 windows fax 的癥結點,
但並非無解,
轉個彎繞一下路,
答案就出來了.
_________________
利用>>搜尋<<的功能會比問的還要快得到答案. |
|
| 回頂端 |
|
|
janlih
註冊時間: 2003-11-04
文章: 69
第 9 樓
|
| 發表於: 星期四 十二月 14, 2006 5:38 pm 文章主題: |
|
|
| garfield 寫到: | 終於試出來了,
大家參考看看
作業環境: windows xp home
用本機自已的 modem
windows 內建 fax
vfp 9
*****************************
FaxServer = CreateObject("FaxServer.FaxServer")
**FaxServer.Connect("\\"+GETWORDNUM(SYS(0),1)) &&-- 這是參考fox.wikis.com的程式, 經過測試的結果,在send()時, 會出現the handle is invalid
FaxServer.Connect(GETWORDNUM(SYS(0),1)) &&--測試後不能加上\\ 才正確
FaxDoc = FaxServer.CreateDocument( getfile() )
* 只能支援可以用 windows 開啟且直接列印的檔案, 要用印vfp的report就不知要如何運作..殘念.
FaxDoc.SendCoverpage = 0
FaxDoc.RecipientName = "收件者的名稱"
FaxDoc.SenderName = "尚易資訊有限公司"
FaxDoc.FaxNumber = "24913635"
FaxDoc.SenderFax = "24851720"
JobNo = FaxDoc.Send()
release FaxDoc
FaxServer.Disconnect()
release FaxServer
** 真高興有試出來 ^^ |
非常感謝，這是很不錯的功能
但如果放於廻圈內(一次多發)，每廻圈一次就會開啟一次檔案，請問有沒有方法傳送時不要開啟該檔案，我是試pdf檔
FaxDoc = FaxServer.CreateDocument( getfile() )
.......
.........
for i=1 to 2
JobNo = FaxDoc.Send()
endfor |
|
| 回頂端 |
|
|
|
常見問題
搜尋
會員列表
會員群組
會員註冊
個人資料
登入檢查您的私人訊息
登入
