各位因為移機及整合的關係，本站將在明年一月中關閉，移機後重新閞站的時間未定
2011／12／19

目前程式還在測試中,bdl->產生autoit3 程式->寫入excel
請參考:
https://docs.google.com/open?id=0B7_Ti-yq61KGY2Y3YTk0YmEtNTdlYi00MDFlLWFjMGYtNmI3YzEyYWFlZjAx

bdl是可以寫使用dde直接寫入xls但是無法和ole的功能相比,但是可用


DEFINE val, rval STRING
DEFINE res INTEGER
DEFINE file STRING
要開啟的檔案
CONSTANT file = "c:\\tiptop\\test.xls"
CONSTANT prog = "EXCEL"
LET val = '中文1,2,3'
LET g_cmd = "EXCEL ", file
#開檔,必須存在一個
CALL ui.Interface.frontCall("standard","shellexec",[g_cmd],[]);
#連線到開啟的檔案,每一個windde命令必須,接著取得錯誤訊息
CALL ui.Interface.frontCall("WINDDE","DDEConnect",[prog,file],[res]);
CALL checkError(res)
#送資料到儲存格r3C1
CALL ui.Interface.frontCall("WINDDE","DDEPoke", [prog,file,"R3C1",val], [res] );
call checkerror(res)
#送資料到偖存格到下相對上面的列加1,欄加1
CALL ui.Interface.frontCall("WINDDE","DDEPoke", [prog,file,"R[1]C[1]",val], [res] );
call checkerror(res)
#儲存
CALL ui.Interface.frontCall("WINDDE","DDEExecute", [prog,file,"[save]"], [res] );
call checkerror(res)
#關閉
CALL ui.Interface.frontCall("WINDDE","DDEFinish", [prog,file], [res] );
CALL checkError(res)
CALL ui.Interface.frontCall("WINDDE","DDEFinishAll",[], [res] );
CALL checkError(res)

已經很久沒有寫文章了,學(寫)了一年tiptop ERP程式,最近進入收割期,期間有很多ox?...,
雖然crystal report 可以匯出excel,但有很多問題,如格線和精確控制(使用com),
抱歉做不到,其原生的語言generos只支援舊式的DDE(抱歉有人實作com,但是我是
以模組方式寫,因此比直拉寫com的方式簡單.)
因此對於只用過兩種大型ERP的我,舊的ERP可以完全支援EXCEL,但新的確不行,
使用者完全無法接受,最後只有自己寫模組來支援,首先我使用python 的模組來產生,
結果成功(但是套表的多頁不行),最後我再寫一個模組透過autoit3來產生,
也就是我可以完全控制EXCEL,因為它是透過client端,可以直接和excel溝通
今天剛寫完,但尚未測試完成,本著linux的愛好者open source精神,請參考

有一些公司的"主管" 要求限制某一些人只可以收送公司內部郵件,其它的郵件一律禁止,然而這一些功能並不是一般的 mail server 可以做的到,
最後找到hmailserver,它是一個windows下的免費軟體,我想透過它來relay 郵件，再轉到linux的郵件伺服器,其討論區中有談到限制本地使用者寄信