AutoIT UDF(excel.au3)修正

原本的值
Global Const $xlCSVMSDOS = 24
Global Const $xlTextWindows = 20
修改為
Global Const $xlCSVMSDOS = 6
Global Const $xlTextWindows = -4158
修正使用 excel.au3 存檔成 csv 及 txt 檔案格式的問題

留言

張貼留言

這個網誌中的熱門文章

2024年 Android 上的大易輸入法及行列輸入法

圖片
關於輸入法孤兒的這件事情，真的要感謝網路上的好心人。  這邊做一下紀錄避免未來忘記了 首先輸入法要感謝高茂原先生 (Daniel Kao)修改了 萊姆輸入法 讓這個很好用的輸入法繼續活著。    高先生在Github 上面的專案我使用的版本是 V6.9.0  Github 上面的專案     下面這個是高先生出版的書籍   Android 開源專案「真」實戰啟航  
閱讀完整內容

安裝 Postgrey (Postfix Greylisting Policy Server)

起因 想要把一些廣告信的來源進行阻擋由不想誤檔正常的信件。 原理 Postgrey 的運作原理是讓 SMTP Server 在收到郵件後先回應 450 給來源 SMTP Server，若來源伺服器是正常的 SMTP Server 會在一段時間後自動重試，如果對方是使用發送垃圾郵件的工具不會將信件重送，如此可以達到有效阻擋垃圾郵件的目的。 安裝套件 postgrey-1.33-1.el4.rf.noarch.rpm perl-BerkeleyDB-0.43-1.el4.rf.i386.rpm perl-IO-Multiplex-1.10-1.el4.rf.noarch.rpm perl-Net-Server-0.99-1.el4.rf.noarch.rpm 參考下載位置  http://pkgs.org/ 設定 /etc/postfix/main.cf smtpd_restriction_classes = greylisting greylisting = check_policy_service unix:postgrey/socket smtpd_recipient_restrictions = ... check_client_access pcre:/etc/postfix/greylist ... /etc/postfix/greylist /(\-.+){4}$/ greylisting /(\..+){4}$/ greylisting # everything with 4 or more dots/hyphens in the hostname /(^|[0-9.x_-])(abo|br(e|oa)dband|cabel|(hk)?cablep?|catv|cbl|cidr|d?client2?|cust(omer)?s?|dhcp|dial?(in|up)?|d[iu]p|[asx]?dsld?|dyn(a(dsl|mic)?)?|home|in-addr|modem(cable)?|(di)?pool|ppp|ptr|rev|static|user|YahooBB[0-9]{12}|c[[:alnum:]]{6,}(\.[a-z]{3})?\.virtua|[1-9]Cust[0-9]+|AC[A-Z][0-9A-F...
閱讀完整內容

AutoIT 檢查網路連線狀態

基本檢查: Global Const $NETWORK_ALIVE_LAN = 0x1 Global Const $NETWORK_ALIVE_WAN = 0x2 $x =DLLCall("sensapi.dll","int","IsNetworkAlive","str",$NETWORK_ALIVE_LAN) msgbox (4096,"測試",$x[0]) 應用: While 1 $connect = _GetNetworkConnect() If $connect Then     MsgBox(64, "Connections", $connect) Else     MsgBox(48, "Warning", "There is no connection") EndIf sleep(5000) Wend Func _GetNetworkConnect()     Local Const $NETWORK_ALIVE_LAN = 0x1  ;net card connection     Local Const $NETWORK_ALIVE_WAN = 0x2  ;RAS (internet) connection     Local Const $NETWORK_ALIVE_AOL = 0x4  ;AOL         Local $aRet, $iResult         $aRet = DllCall("sensapi.dll", "int", "IsNetworkAlive", "int*", 0)         If BitAND($aRet[1], $NETWORK_ALIVE_LAN) Then $iResult &= "LAN connected" & @LF    ...
閱讀完整內容