VFP 愛用者社區

[Niles]

小弟對於使用 mscomm32.ocx 送 data 至 com port 沒有太大問題
但是如果要用相同的概念直接送 data 至 LPT1 請問要如何做?
目前我查到的說明全部是需要透過 windows 的列印集區 去送列印命令
我想要控制的設備是發票機,並沒有 drivers for windows , 所以 windows 不可能認識這台設備
直接送 data 至 LPT1 應該是 DOS 時代就有的方式 , 可惜小弟當時還未學習程式
還望前輩們給予指點, 多謝 感恩

[BIN]

可以先設Fujitsu DL系列的印表機Driver試看看可不可以印...

[Niles]

To BIN : 感謝指導~
但是這仍是透過 windows 的列印集區去送列印指令
不曉得有沒有更直接的控制方式?
因為有時候仍會需要跟設備做交談, 比方說傳回發票機狀態
若我這樣的想法是不可行的 還望指正

[goto-dream]

參考這文章

http://vfp.sunyear.com.tw/viewtopic.php?t=801&highlight=ains

[Niles]

To goto-dream : thank you so much ~

其實我日前已經認真讀過 Ruey 大貼的這篇, 目前的解決方案拜此文指導尚且可以運作 , 在此也感謝 Ruey 大大
另外順便說說這過程中的一些心得:
1.想要利用 LPT 通訊讀取回設備狀態是不對的想法, 因為那些設備提供的回應通常是 for RS232 的交談方式
2.如果想要做的上述動作, 應該仰賴 drivers 的協助, 以 Win32Api 函式讀回 (這點我是自己猜的)
3.原來只要將原本送給 rscomm32 的指令 改成 ???+指令就可以了, ex.
Store Chr(27) + 'z' + Chr(1) To Thisform.RS232.Output && 初始化印表機
改為
??? Chr(27) + 'z' + Chr(1)
就 OK 了 (當然了,前置的 set printer 指令必須先設好)

[catjoke]

你試試使用:Win32API:

DECLARE INTEGER CopyFile IN KERNEL32.DLL ;
STRING @SourceFileName, ;
STRING @DestFileName, ;
INTEGER bFailIfExists
CopyFile("c:\Abc.txt", "LPT1:", 0)

[Niles]

To catjoke: 感謝你的意見啦

此方法應該也可行. 但是我忘了解釋更清楚. 此處提到的列印設備其實是專指 [收據/發票機]
如 Epson Rp-U420, Tm-U220B 等機器, 主要是 for POS 用途
因此會有所謂 [交易中列印] 情況 => 每刷一筆條碼就要馬上印出一行
所以如果每掃描一次條碼就要把內容COPY到 TXT 檔,然後 CALL 你上述 Function 可能會比較累
不過此方式在 [交易後列印] 模式真的很不錯用~