2014/6/28 跑步

菩薩。早安。

Exchange 2003 SMTP setting for authenticated user

Reference:
http://help.globalscape.com/help/me3/configuring_authenticated_access_to_exchange.htm

狀況：
有一個 Part time user 要從公司外收發信件。但是他的 Outlook 已經設定其他地方的 Exchange server，只能用 POP3 + SMTP 的方式收發信件。

Exchange Server 2003 設定：

(要 restart SMTP service 讓他生效)

Outlook 2007 設定：

FTP login - 500 OOPS cannot change directory

Reference:
http://tilt.lib.tsinghua.edu.cn/node/784
http://www.nidify.com/index.php?option=com_content&view=article&id=228&Itemid=247

原因：
啟用了SELinux (Secure Enhance Linux)

解法一：調整SELinux設定。
1. 用 getsebool -a | grep ftp 確認 ftp_home_dir --> off
2. 以指令 setsebool -P ftp_home_dir on 修改

解法二：關閉SELinux。
1. vi /etc/selinux/config
2. 修改 SELINUX=enforcing to SELINUX=disabled
3. 執行 setenforce 0 生效

2014/6/21 跑步

這次從安康社區跑到靜心湖，總計跑了 40 分鐘。
靜心湖的荷花開了~~~

2014/6/15 吃冰

中油竹東福利會 資源莊

2014/6/15 跑步

跑完隔天感覺左邊髖關節有點酸。

2014/6/14 台北一日遊

午餐：ゆで太郎Yudetarou蕎麥麵

Windows 7 附檔名 關聯 變更

狀況：
有好幾次遇到 OrCAD .dsn 開啟的問題，安裝 OrCAD 新版本後開啟 .dsn 還是用舊版開啟。

一般解法：

進階解法：
用 regedit 刪除 [HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Explorer\FileExts] 裡面的 .dsn

終於搞定的方法：
OrCAD .opj 可以正常用新版開啟。將 regedit 的 [HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Explorer\FileExts] .opj 匯出成 ext.reg，修改 ext.reg 的內容把 .opj 全部換成 .dsn，再執行 ext.reg 匯入 registry。終於搞定了。

perl csv to excel saveas overwrite

Reference:
http://www.perlmonks.org/bare/?node_id=823261

use Win32::OLE qw(in with);
use Win32::OLE::Const 'Microsoft Excel';

# global setting
$Win32::OLE::Warn = 3; # die on errors...
# get already active Excel application or open new
my $Excel_to_write = Win32::OLE->GetActiveObject('Excel.Application') || Win32::OLE->new('Excel.Application', 'Quit');
$Excel_to_write->{SheetsInNewWorkBook} = 1;
$Excel_to_write->{Visible} = 1;
$Excel_to_write->{DisplayAlerts} = 0;

my $Book_to_write = $Excel_to_write->Workbooks->Add;
my $Sheet_to_write = $Book_to_write->Worksheets(1);
open (CSV, "C:/tmp/ASSY.CSV");
$col = $row = 1;
while (<CSV>) {
chomp;
my @line = split(",",$_);
for $cell (@line){
$Sheet_to_write->Cells($row,$col)->{'Value'} = $cell;
$col++;
}
$row++; $col = 1;
}
close(CSV);
$Book_to_write->SaveAs( {
Filename => "C:\\tmp\\Assy.xls",
FileFormat => xlWorkbookNormal}
);
$Book_to_write->Close;

颱風防災 汽車 氣墊

突然下大雨造成淹水的狀況越來越多，如果可以 "快速" 把汽車變成汽艇，那就太好了。

 大雨造成淹水的新聞
雨襲中南部　水淹嘉義宛如海水浴場

汽車變汽艇，可惜充氣太慢了。
颱風防災.泡水車.吳書契.汽車救生艇防泡水車.汽車浮墊.汽車防護套