perl 程式存取 MS Access MDB 資料庫
作者:cross 日期:2009-07-22 17:23
use strict;
use DBI;
# mdb 資料庫
my $mdb = 'C:\access.mdb';
# SQL 語法
my $sql = 'select * from notifications';
# 連線到資料庫
my $dbh = DBI->connect("dbi:ODBC:driver=microsoft access driver (*.mdb);dbq=$mdb");
# 執行 SQL 語法
my $sth = $dbh->prepare("$sql");
$sth->execute || die " Could not execute SQL statement ... maybe invalid?";
# 顯示出結果
while (my @row = $sth->fetchrow_array()){
print "@row\n";
}
錯訊訊息 freshclam - No such file or directory
作者:cross 日期:2009-07-14 12:02
還原MSSQL遇到備份組包含現有的xxx資料庫以外的資料庫備份問題
作者:cross 日期:2009-07-11 01:13
A主機(MSSQL不明)上有xxx 資料庫,B 主機(MSSQL2005)上也有 xxx 資料庫,
今天我要把 A 主機還原至 B 主機的 xxx 資料庫,
我拿到 A 主機Dump 出來的xxx.bak資料庫檔案,
執行 restore database apatw from disk = 'i:xxx.bak' 出現了
"備份組包含現有的xxx資料庫以外的資料庫備份問題"
等錯誤訊息,
我猜想是兩邊放置MDF路徑不同,所以我
但也是不行,同樣錯誤訊息,原因也不用多談了,先解決問題吧,restore database xxx from disk = 'i:xxx.bak'
with
move ''xxx to 'E:Microsoft SQL ServerMSSQL.1MSSQLDataxxx.mdf',
move 'xxx_log' to 'E:Microsoft SQL ServerMSSQL.1MSSQLDataxxx_log.LDF'
將 perl 程式打包成 exe
作者:cross 日期:2009-07-08 16:08
Linux 的作法就參考這裡 http://ssorc.tw/rewrite.php/read-911.html
而 Windows 呢,參考了http://techbbs.zol.com.cn/1/84_392.html
安裝了 activeperl 後,再使用 ppm 安裝 Parse-Binary, Win32-Exe, Module-ScanDeps, PAR-Dist,Getopt-ArgvFile
到 http://www.perl.com/CPAN/authors/id/S/SM/SMUELLER/ 下載 PAR-Packer-0.991-MSWin32-x86-multi-thread-5.10.0.par
PS: 要看你安裝的perl 是那個版本 5.8 or 5.10
再來 perl -MPAR::Dist -e "install_par('PAR-Packer-0.991-MSWin32-x86-multi-thread-5.10.0.par')"
這樣子就可以使用 pp 打包 perl 檔為 exe 了。
ProFTPD + quota 限制空間使用
作者:cross 日期:2009-07-01 13:28
這裡是用虛擬帳戶方式與檔案格式存放帳戶來作測試,
環境是已使用 RPM 安裝過了,所以需要自行編譯讓 ProFTPD 支援 quota 功能。
1。下載 1.3.2 版
wget ftp://ftp.proftpd.org/distrib/source/proftpd-1.3.2.tar.gz
2。編譯
install_user=ftp install_group=ftp ./configure --prefix=/usr/local --sysconfdir=/etc --localstatedir=/var/run --mandir=/usr/local/man --without-pam --disable-auth-pam --with-modules=mod_ratio:mod_readme:mod_quotatab:mod_quotatab_file LDFLAGS=-static
make
make install
3。裝好後,新的 proftpd 等執行檔案都在 /usr/local/sbin/裡,就把它 link 至 /usr/sbin/ 吧,
- 1



