KEI 的隨手雜記

Outlook Express 參數的放置位置 HKEY_CURRENT_USER\Identities\ 帳號相關設定值 HKEY_CURRENT_USER\Software\Microsoft\Internet Account Manager 郵件實體存放位置 C:\Documents and Settings\{UserName}\Local Settings\Application Data\Identities\{GID}\Microsoft\Outlook Express\ GID的號碼位置為 [HKEY_CURRENT_USER\Identities] "Default User ID"="{XXXXXXXX-XXXX-XXXX-XXXX-XXXXXXXXXXXX}" 通訊錄存放的位置為 C:\Documents and Settings\{UserName}\Application Data\Microsoft\Address Book\ 郵件規則存放的位置為 HKEY_CURRENT_USER\Identities\{GID}\Software\Microsoft\Outlook Express\5.0\Rules\Mail 影響郵件規則的檔案為 Folder.dbx

PRF的產生 用Office 的 Resource Kit Tools 產生 可以參考這邊 http://technet.microsoft.com/zh-cn/library/cc179062.aspx 匯入PRF "C:\Program Files\Microsoft Office\OFFICE10\outlook.exe" /importprf \\share\outlook.prf 用 AutoIT 修改 PRF ===================================================== IniWrite("Default.PRF", "Account1", "AccountName", "Displayname") IniWrite("Default.PRF", "Account1", "POP3Server", "Server FQDN") IniWrite("Default.PRF", "Account1", "SMTPServer", "Server FQDN") IniWrite("Default.PRF", "Account1", "POP3UserName", "login name") IniWrite("Default.PRF", "Account1", "EmailAddress", "email") IniWrite("Default.PRF", "Account1", "DisplayName", "Displayname") PRF 長的樣子大約如下 ============================================================ ;Automatically...

起因 想要把一些廣告信的來源進行阻擋由不想誤檔正常的信件。 原理 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...

起因 由於 POP3 的 services 常常被猜密碼覺得煩麻煩的，所以想要把這些猜密碼的位址阻擋。 安裝套件 fail2ban-0.8.4-23.el4.noarch.rpm ( http://www.fail2ban.org/wiki/index.php/Downloads ) gamin-0.1.7-1.4.EL4.i386.rpm (CentOS 4.6 CD#1) gamin-python-0.1.7-1.4.EL4.i386.rpm (CentOS 4.6 CD#3) shorewall-4.4.18-1.noarch.rpm ( http://www.shorewall.net/ ) 設定 /etc/fail2ban/jail.conf [dovecot-check] enabled = true filter = dovecot-check action = iptables-multiport[name=dovecot-check, port="pop3,pop3s,imap,imaps", protocol=tcp] logpath = /var/log/mail/dovecot ignoreip = 168.192.0.1 192.168.1.0/24 bantime  = 1800 findtime  = 300 maxretry = 3 /etc/fail2ban/fail2ban.conf logtarget = /var/log/fail2ban.log /etc/fail2ban/filter.d/dovecot-check.conf [Definition] failregex = (?: pop3-login|imap-login): .*(?:Authentication failure|Aborted login \(auth failed|Aborted login \(tried to use disabled|Disconnected \(auth failed).*rip=(?P<host>\S*),.* ignoreregex = 啟動 /etc/rc.d/ini...

#NoTrayIcon $program_stop = "C:\Program Files\Symantec\Symantec Endpoint Protection\Smc.exe -stop" $program_start = "C:\Program Files\Symantec\Symantec Endpoint Protection\Smc.exe -start" $del_file = "C:\Program Files\Common Files\Symantec Shared\HWID\sephwid.xml" $pass = "123456" run($program_stop, "", @SW_HIDE) WinWaitActive("密碼") ControlSend("密碼", "", "Edit1", $pass) ControlClick("密碼", "", "[CLASS:Button; INSTANCE:1]") RegWrite("HKEY_LOCAL_MACHINE\SOFTWARE\Symantec\Symantec Endpoint Protection\SMC\SYLINK\SyLink", "HardwareID", "REG_SZ", "") FileDelete($del_file) ProcessWaitClose("Smc.exe") run($program_start)

Set objOutlook = CreateObject("Outlook.Application") Set myNameSpace = objOutlook.GetNamespace("MAPI") Set myInboxFolder = myNameSpace.GetDefaultFolder(6) Set myNewFolder = myInboxFolder.Folders.Add("資料夾一") Set myNewFolder = myInboxFolder.Folders.Add("資料夾二") Set myNewFolder = myInboxFolder.Folders.Add("資料夾三")

方法一： 1. 執行 netplwiz 2. 在使用者帳戶的視窗中，取消 「必須輸入使用者名稱和密碼，才能使用這台電腦」，套用後選擇要自動登入的帳戶，並輸入選擇帳戶的密碼。 方法二： 1.Windows 鍵 +R   > 開起執行 2. 執行 rundll32 netplwiz.dll,UsersRunDll 3. 在使用者帳戶的視窗中，取消 「必須輸入使用者名稱和密碼，才能使用這台電腦」，套用後選擇要自動登入的帳戶，並輸入選擇帳戶的密碼。

基本檢查: 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    ...

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

@UserProfileDir 說明: Path to current user's Profile folder. WinXP: C:\Documents and Settings\UserName @MyDocumentsDir 說明: path to My Documents target WinXP: 我的文件實際指向的位置 @ProgramFilesDir 說明: path to Program Files folder WinXP: C:\Program Files @TempDir 說明: Path to the temporary files folder. WinXP: C:\Documents and Settings\UserName\Local Settings\Temp @UserName 說明: ID of the currently logged on user. WinXP: 登入系統的使用者名稱