sk's resources: 8月 2007

2007年8月29日星期三

PHP 寫入 / 讀取檔案的方法

在 PHP 中處理檔案的函數有幾十個，當中常用的是
fopen(); fclose(); flock(); fexists(); fwrite();

以下是開啟檔案與寫入檔案的基本做法：
//開啟檔案, 讀取模式
$handle = fopen($file, "r");
while (!feof($handle)) {echo fgets($handle);
fclose($handle);

//開啟檔案, 寫入模式
$handle= fopen($file,'w');
if (flock($handle, LOCK_EX)) { fwrite($handle,"abc"); flock($handle, LOCK_UN); } else {echo "Couldn't lock the file !";}
fclose($add);

這些函數可以參考 PHP 的說明： http://au3.php.net/manual/tw/function.fopen.php
特別要提一提 flock() 這個函數：

為什麼要重點說flock()？因為這是一個對於網路編程非常重要的功能。我舉個例子，兩個人同時投票，而且選的都是選項A，正確結果應該是2，但實際上卻會是1。為什麼會這樣？這就是因為同時計算與寫入的特點啦，所以我們在投票前一定要先用flock()函數把檔鎖住，投完後再打開檔讓其他的進程進行操作，這樣才能防止出現上面的那類錯誤。

EditPlus 2 功能眾多的文字編輯器 [站長推薦，建網必備]

介紹：
EditPlus 是一套在 Windows 下專為網際網路所設計的文字編輯程式。它除了可以做為取代 NotePad 的一個好選擇外，還可以作為網頁製作及程式設計師的撰寫工具。它以鮮明色彩顯示文字語法的方式，讓使用者方便撰寫 HTML, CSS, PHP, ASP, Perl, C/C++, Java, JavaScript, VBScript 以及其它的程式語言；使用者可以使用其預設的語法色彩或者也可以依個人的喜好來自訂色彩。

站長誠意推薦，它十分簡便，備有 HTML 結果預覽功能 + Debug Message，還有自動備份，Tab browsing, color tags, etc.

Name: Sponge Uk/tCA
Serial No: C2573-CE608

下載：
ftp://ftp.editplus.com/epp231_en.exe

官方網頁：
http://www.editplus.com/download.html

Mini Log 論壇貼子追蹤器

站長於 2007 年夏又一無聊之作，用於記錄論壇貼子的訪客來源及資料，包括使用的作業系統、瀏覽器、ISP、時間、到訪那一個貼子等。

你會發現最多人用的瀏覽器是 IE 6，最多人用的作業系統是 WinXP，最多人用的 ISP 是和記/網上行，或許你還會發現某某報張記者到訪某幾個貼子呢~

Mini Log 論壇貼子追蹤器
Mini Log 論壇貼子追蹤器 (後備)

Mini Music 網上隨身聽

Mini Music 網上隨身聽是站長在 2007 年暑假其中一樣無聊之作，它就像 Music Player 般連續播放 PlayList 內的歌，主要用於 blog / forum 中作隨機音樂。版面雖然簡陋，但卻有齊 Music Player 中的三種基本播放方式：

Play in ascending order (順序播放)
Play as random (隨機播放)
Random a music (隨機歌曲一首)

用家也可以在 PlayList 中選擇某一首音樂。若想增加音樂，就要問站長了 ^^

Mini Music 網上隨身聽
Mini Music 網上隨身聽 (後備站)

教你如何用手帕包裝禮品 (圖解說明)

最逢節日，都要送禮物給朋友和親友。這裡有教你如何用手帕來包裝禮品，雖然都是簡單的方法，不過好的包裝可以為禮品加分喔！

下載PDF檔：
下載點一
下載點二

FSScreen Version 1.1 [螢幕擷取不用煩]

軟件：FSScreen Version 1.1
大小：25.8Kb

介紹：
FSScreen 是一個免費的螢幕擷取軟件，它能把 Print Screen 後的圖像自動儲存成順序的 .bmp 圖檔，節省用家 Print Screen 後到小畫家貼上圖片>儲存的動作。

用法：
開啟程式 > 每次按 print screen 程式便會把圖儲存成 .bmp 圖檔
用於擷取遊戲畫面動態畫面、製造教學最好不過。

下載
http://cgi-bin.simradar.com/2791/File_Attachment/fsscreen.zip

Kai's Power Tools 7 [Photoshop / PhotoPaint 插件] 輕鬆製出各類特效

名稱： Kai's Power Tools 7
大小： 22.22M
語言：英文

介紹：
KPT-Kai's Power Tools 是一套功能很強的影像處理plug-in(外掛插件)，必須在Adobe Photoshop、Aldus Photostyler、Corel PhotoPaint下才能使用，本身並不是獨立的軟體。

市面上看的到的各種影像處理濾鏡plug-in，有好幾百種，而KPT的功能強悍、知名度高、被廣泛使用，在業界應該無人不知。其它如Eye Candy等，也是有口碑蠻值得推薦的Filter。

下載：
KPT 7

安裝方法：
解壓後執行 Setup > 輸入序號 > 選擇 [Adobe Photoshop 安裝目錄]\\Plugins。註冊時選擇 Fax / mail 形式。執行 Photoshop，到Filter 便可以用 KPT 了。

Adobe Illustrator CS2 v12 英文版 - 著名的畫公仔軟件

Name: Adobe_Illustrator_CS2_v12.rar
Size: 142MB
Language: English

介紹：
Adobe Illustrator 與 Adobe Photoshop 的不同之處，在於 Illustrator 專為「畫公仔」而設，Photoshop 則主要為圖像處理。最新版是 CS 3，但由 CS 3 的最低要求也要 512 MB 記憶體，所以不比 CS 2 普及。

Backup：
http://mihd.net/tiwvyq
(按 Request Download Link > Download File)

Source (with other backup points)：
http://www8.discuss.com.hk/viewthread.php?tid=2761869&extra=&page=1
遇上 Sorry, the free service is at full capacity. 的朋友，試多幾次就下載到了

Adobe Photoshop CS2 - 圖像處理變得簡單

名稱：Photoshop CS2
大小：320MB
語言：English

介紹：
Adobe Photoshop 是有名的圖像處理軟件，最新版是 CS3，可到官方網站下載 trial version。CS2 和 CS3 的功能相差不遠，而且較省記憶體。

Backup 1 (分割檔 x 4)
Photoshop_CS2.part1.rar
http://www.mediafire.com/?3xx2tfedmym
Photoshop_CS2.part2.rar
http://www.mediafire.com/?bxe1duy2wjb
Photoshop_CS2.part3.rar
http://www.mediafire.com/?6bxmybk5w43
Photoshop_CS2.part4.rar
http://www.mediafire.com/?0y9wtq4wdmo

Backup 2:
Photoshop_CS2.part1.rar
http://www.zshare.net/download/3026612740917d/
Photoshop_CS2.part2.rar
http://www.zshare.net/download/302166388e8ee8/
Photoshop_CS2.part3.rar
http://www.zshare.net/download/30259390a40560/
Photoshop_CS2.part4.rar
http://www.zshare.net/download/3026935c6fa44b/

Backup 3:
Photoshop_CS2.part1.rar
http://www.badongo.com/file/3972352
Photoshop_CS2.part2.rar
http://www.ecupload.net/4727164
Photoshop_CS2.part3.rar
http://www.badongo.com/file/3973283
Photoshop_CS2.part4.rar
http://www.badongo.com/file/3969334

內附 Keygen

使用技巧可參看本網頁的教學文章

超級兔子魔法設定 Super Rabbit Magic Set v8.0 (繁)免安裝版

【軟體名稱】超級兔子魔法設定 Super Rabbit Magic Set
【軟體版本】 v8.0
【語言界面】繁體中文
【檔案大小】 11.3mb
【作業系統】都可以
【試用限制】無
【官方網站】 http://tw.pctutu.com/
【個人評等】 ★★★★★

「超級兔子魔法設定 Super Rabbit Magic Set」是個與Tweak UI 類似的系統設定軟體，所具備的功能比 Tweak UI 和國內同類軟體還要多，而且有全中文的使用者介面，特別為中文用戶設計的功能有︰輸入法排列、更改目前系統的語言、更改開始功能表的「程式集」、「文件」等。

軟體簡介：更新 / Frank 2007/8/10

「超級兔子魔法設定 Super Rabbit Magic Set」是個與Tweak UI 類似的系統設定軟體，所具備的功能比 Tweak UI 和國內同類軟體還要多，而且有全中文的使用者介面，特別為中文用戶設計的功能有︰輸入法排列、更改目前系統的語言、更改開始功能表的「程式集」、「文件」等。
超級兔子魔法設定繁體中文版內含有：
魔法設定、登錄檔檢查、修理專家、軟體優化、記憶體整理、IE保護器..等等多套相當實用的軟體。
已購買註冊者，註冊碼適用所有作業系統的版本！
最新軟體：2007年8月10日
超級兔子魔法設定8.0
許久沒有更新軟體，真是對不起大家，由於簡體版與網站功能結合一起，而我們未能提供繁體網站的功能，所以簡體及繁體在功能上有相差，但主要是網絡功能那部分，不太影響普通功能
2007-8-10 超級兔子8.0
一、超級兔子清理王8.0
1 修正註冊表清理與Vista兼容性
2 智能處理Update的下載
3 可移除300種軟件

二、超級兔子魔法設置8.0
1 新增禁止Vista 的ZIP資料夾功能
2 新增禁止開始選單的搜索嚮導功能
3 新增禁止啟動時更新組策略功能
4 新增UAC管理批准模式下只提升並驗證的可執行檔案
5 提供Vista系統資料夾恢復數據
6 修正Vista下取消捷徑小箭頭無效的Bug
7 新增Vista評分修改功能
8 修正執行時的登錄檔權限修改錯誤
9 改進與IE7兼容性

三、超級兔子系統檢測5.0
新增智能硬盤碎片整理功能，速度更快
四、超級兔子上網精靈7.99
修正工具條無法加載的Bug
五、超級兔子IE修復專家7.99
新增 11170種木馬病毒清除
主程式請雙擊 srgui.exe

下載
http://www.sendspace.com/file/524vhp
http://www.divshare.com/download/1554898-ac1

Dr.eye 譯典通 8.0 專業版

eXeScope 6.50 程式修改器

軟體名稱: eXeScope 6.50 免安裝版
語言介面: 英文
檔案大小: 587 KB
作業系統: Win95, Win98, WinME, WinNT, Win2000, WinXP, Win2003

軟體簡介:
這是一套可將程式中的英文字挑出來加以修改、翻譯，將軟體轉成中文的操作介面，可更改選單、字型、對話方塊，還能直接修改 EXE、DLL、OCX。

下載連結:
主程式
中文化

若下載不到請稍後嘗試

[翻譯軟體] Dr.eye 6.0 專業版

Dr.eye 是著名的翻譯軟體，最新版本是 8.0。
8.0 的檔案達 1 GB 之大，相比 6.0 較小巧而且功能卻很齊備。

【軟體名稱】： Dr.eye 6.0 專業版 + 程式更新檔 1 & 2 + 註冊器
【軟體語言】：英文 / 中文
【檔案格式】：rar + iso
【檔案大小】：311MB

簡介
Dr.eye 6.0 專業版是一套結合中、英、日三向語言翻譯的工具軟體，採用最新的翻譯核心技術，內含豐富的資料庫；搭配TTS語音技術，電腦說給你聽；全文翻譯讓你快速了解外國文件的內容，定期的新字擴充讓你的辭典內容最新最完整，全新規劃的語言學習功能，讓你從單詞到句子跟著真人學習，效果馬上可見，這樣一套完整的工具肯定可以幫助使用者快速地掌握最新的致勝先機、更有效地提升語言能力。

即時辭典
豐富完整的資料庫，包含英漢/漢英辭典（繁、簡）、英英/英漢雙解辭典（繁）、日華/華日辭典（繁、簡）、計算機辭典（繁）、國際金融貿易辭典（繁）、劍橋百科全書（繁）。

即時翻譯
游標指到那裏，翻譯就到那裏；不論是中翻英、英翻中、中翻日、日翻中，三向語言皆可翻譯。

全文翻譯
不論整句、整段、整篇，只要輕輕一按，英文翻中文、中文翻英文、日文翻中文、中文翻日文，查看整篇外國文章頓時變輕鬆，並且支援 Office文件及Outlook郵件。

網頁翻譯
瀏覽中、英、日文網站，輕輕一按，英文、日文網頁立刻變中文網頁，中文網頁立刻變英文、日英網頁，讓您迅速了解最新消息，同時支援簡、繁體網頁互相翻譯。

檔案翻譯
快速將簡、繁體檔案文件互相翻譯；中、英文檔案文件互相翻譯；中、日文檔案文件互相翻譯，支援檔案格式包含*.txt、*.htm、*.html、 *.doc、*.xls、*.ppt。

還有更多功能...[詳情]

下載 (共四個分割檔)
dreye.part1.rar
http://www.ecupload.net/3186114
dreye.part2.rar
http://www.ecupload.net/2299139
dreye.part3.rar
http://www.ecupload.net/3590109
dreye.part4.rar
http://www.ecupload.net/3979099

後備下載點
dreye.part1.rar
http://www.mediafire.com/?0tglti1dmvd
dreye.part2.rar
http://www.zshare.net/download/2856148578b75b/
dreye.part3.rar
http://www.justupit.com/55e0c42431395c1e673804b76fe57465
dreye.part4.rar
http://www.mediafire.com/?9wmtny91xtm

安裝方法：
1. 把四個分割檔放在同一個資料來內，解壓縮 dreye.part1.rar，完成後會出現四個檔案：
- Dr.Eye.6.0.iso (光碟影像)
- Id60t01.exe (更新檔一)
- Id60t02.exe (更新檔二)
- Dr.Eye 6.0 SP3破解.exe (註冊器)
2. 把 Dr.Eye.6.0.iso 燒成光碟或使用虛疑光碟工具(e.g., daemon-tools)進行程式安裝。
3. 然後安裝 Id60t01.exe (更新檔一) 和 Id60t02.exe (更新檔二)
4. 最後執行 Dr.Eye 6.0 SP3破解.exe，按 Register 便能成功註冊。

Windows Media Player Firefox Plugin [解決 firefox 無法播放線上 mp3]

試試播放以下的 MP3

播不到嗎？讓我介紹兩個解決辦法：

1. 下載 Windows Media Player Firefox Plugin

File size: 302K

Platform:
Windows XP SP2 (x86)
Windows XP SP2 (x64)
Windows Vista (x86)
Windows Vista (x64)
Browser: Firefox

介紹：
解決 firefox 不能播放線上 mp3 的 Plugin
配合 WMP 10 / 11 使用

下載：
Download
Windows Media Player 11
Windows Media Player 10

Source: http://port25.technet.com/pages/windows-media-player-firefox-plugin-download.aspx

2. 手動加載 Plugin
若果上面的方法不行，可以配合以下方法 (99% 成功)
1. 用 exescope 開啟 C:\Program Files\Mozilla Firefox\plugins\np-mswmp.dll
2. 在左邊選擇 Resource > Version > 1
3. 在右邊，選擇 FileExtents 一行，right click > Edit
把原來的 *|*|*|*|asf,asx,*|wm,*|wma,*|wax,*|wmv,*|wvx,*
修改成 *|*|*|*|asf,asx,*|wm,*|wma,*|wax,*|wmv,*|wvx,*|mp3,*

成功後，就能播放線上 MP3 了

CuteFTP Pro v8.0.6 繁體版 (免安裝)

名稱： CuteFTP Pro v8.0.6 繁體版(免安裝)
檔案： CuteFTP Pro v8.0.6.zip
大小： 7.68 MB
官方網站： http://www.cuteftp.com/

介紹：
CuteFTP Pro是一個全新的商業級FTP客戶端程序，其加強的文件傳輸系統能夠完全滿足今天的商家們的應用需求。這裡文件通過構建於SSL或SSH2安全認證的客戶機/服務器系統進行傳輸，為VPN、WAN、Extranet開發管理人員提供最經濟的解決方案！企業再不需要為了一套安全的數據傳輸系統而進行破費了。此外，CuteFTP Pro還提供了Sophisticated Scripting、目錄同步、自動排程、同時多站點連接、多協議支持（FTP、SFTP、HTTP、HTTPS）、智能覆蓋、整合的HTML編輯器等功能特點以及更加快速的文件傳輸系統。

安裝用法：
解壓縮檔案 > 執行 patch 註冊程式
點擊 cuteftppro.exe 執行主程式

下載:
Link 1
Link2

2007 年版窮學生專用的免費軟體CD

Software for Starving Students 是一套集 Windows 及 Mac上最好的免費軟體CD，這對窮學生來說最好不過了，因為完全免費！現在2007年的版本已可以下載，訪客只要把ISO下載回來後，燒成光碟片就可以！

這裡列出光碟所包含的軟體：
http://softwarefor.org/faq.html#q5

下載：
http://softwarefor.org/downloads.html

機構網頁：
http://softwarefor.org/

Vukan Karadzic 精選的 25 款免費字型

由網頁設計師 Vukan Karadzic 精選的 25 款字型，充滿藝術氣息，全都是免費的。

下載：
http://www.elogodesign.com/favorite-free-fonts-vukan-karadzic/

PS：若有些字型無法下載，可稍後再下

500 個免費英文字型

Fonts 500 顧名思義就是提供500個免費字型，每個都很精美，比較偏藝術風，對於一些網頁設的美工人員，應該有蠻大的用處，下圖是擷取幾個字型的畫面。

下載
http://www.fonts500.com/

PS：若有些字型無法下載，可稍後再下

Microsoft Office XP Pro 繁體中文版

軟體名稱： Microsoft Office XP Professional 繁體中文版
檔案類型： .rar + .iso 光碟影像檔
檔案大小： 483MB

Backup1：(共有 5 個分割檔)
OfficeXP_pro_zhtw.part1.rar
http://www.mediafire.com/?d83ddmjnzel
OfficeXP_pro_zhtw.part2.rar
http://www.mediafire.com/?bjtmjmrr2wz
OfficeXP_pro_zhtw.part3.rar
http://www.mediafire.com/?99zutd2xtyq
OfficeXP_pro_zhtw.part4.rar
http://www.mediafire.com/?axigzb0um6l
OfficeXP_pro_zhtw.part5.rar
http://www.mediafire.com/?9xgylmceb3c

Backup 2
OfficeXP_pro_zhtw.part1.rar
http://www.zshare.net/download/28402153ddc9ed/
OfficeXP_pro_zhtw.part2.rar
http://www.zshare.net/download/2839749955bc9a/
OfficeXP_pro_zhtw.part3.rar
http://www.zshare.net/download/28378453aa3aa0/
OfficeXP_pro_zhtw.part4.rar
http://www.zshare.net/download/2838972ce80caf/
OfficeXP_pro_zhtw.part5.rar
http://www.zshare.net/download/28392587d0a9e3/

Backup 3
OfficeXP_pro_zhtw.part1.rar
http://www.badongo.com/file/3847604
OfficeXP_pro_zhtw.part2.rar
http://www.badongo.com/file/3844609
OfficeXP_pro_zhtw.part3.rar
http://www.badongo.com/file/3846201
OfficeXP_pro_zhtw.part4.rar
http://www.badongo.com/file/3847221
OfficeXP_pro_zhtw.part5.rar
http://www.badongo.com/file/3847851

安裝辦法：
1. 把五個分割檔放在同一個資料夾內，解壓縮 OfficeXP_pro_zhtw.part1.rar 。成功的話會出現了一個 .iso (光碟影像檔)
2. 把它燒成光碟或使用虛疑光碟工具(e.g. Daemon-tools)進行安裝

The Typing of The Dead

遊戲名稱：The Typing of the Dead (死亡打字員)
檔案大小： 9X MB
遊戲語系：英文版
發行時間：2002年
遊戲發行：SEGA

簡介：
在Typing of the Dead中，你將遇到與《死亡之屋 2》相同的場景，但遊戲中你將無法使用光線槍來攻擊敵人，取而代之的是必須鍵入螢幕中敵人身上所出現的字母。你輸入英文字的速度越快、越準確，殺死殭屍的速度也越快而獲得的分數也會比較高

《死亡打字員》的誕生，將長期以來的打字訓練枯燥概念化為神奇的遊戲享受。心、眼、手一體，緊張綿密的遊戲節奏充分調動你的潛能，在不知不覺中迅速提高打字速度與正確率，使你“玩有所得”。
除了移植自街機的街機模式和原創故事模式之外，這款精彩遊戲提供了教學模式、訓練模式、BOSS模式等等新奇有趣的遊戲方式，針對不同打字水平和不同需求的玩家作出了更為貼心的設計。
．史上最悤打字遊戲，親身體驗心驚膽跳
．網絡功能，異地互聯並肩作戰
．教學模式，打字學習輕鬆上手
．訓練模式，針對打字缺陷進行提高

最低配置：
PentiumII 233MHz以上
64MB以上記憶體
8MB以上支援DIRECTX的3D加速卡

推薦配置：
PentiumII 450MHz以上
128MB以上記憶體
操作系統：Windows95/98/2k/xp

Serial no. TDK02200-176403-17407

下載:
http://www.gigasize.com/get.php/-1099955532/Tod_E_Full-Version.EXE
http://s4.quicksharing.com/v/8666976/Tod_E_Full_Version.EXE.html
http://www.badongo.com/cn/file/837086 (解壓密碼：coke750101分享於微風論壇bbs.wefong.com)
http://z02.zupload.com/download.php?file=getfile&filepath=16484

2007年8月28日星期二

Array Length

//Count Number of Elements in an array

$array = array ("ABC","DEF", "GHI", "KLM");
echo Count(Array);

結果： 4
記著這是 number of elements 而不是 array index = 3

使用 javascript 建立、讀取 Cookies

Cookies 是用來儲存用家資料的東東，以下是建立、讀取 Cookies 的方法

1. 建立 Cookies
c_name 是 cookies 的名字
value 是儲存值
expiredays 是儲存期限 (按日字計算)

function setCookie(c_name,value,expiredays)
{
var exdate=new Date()
exdate.setDate(exdate.getDate()+expiredays)
document.cookie=c_name+ "=" +escape(value)+
((expiredays==null) ? "" : ";expires="+exdate.toGMTString())
}

2. 讀取 Cookies 資料
c_name 是 cookies 的名字

function getCookie(c_name)
{
if (document.cookie.length>0)
{
c_start=document.cookie.indexOf(c_name + "=")
if (c_start!=-1)
{
c_start=c_start + c_name.length+1
c_end=document.cookie.indexOf(";",c_start)
if (c_end==-1) c_end=document.cookie.length
return unescape(document.cookie.substring(c_start,c_end))
}
}
return ""
}

在 Excel 內輸入二次方

若果想在 Excel 裡輸入 x² (二次方符號) 而不是 x^2 這種樣子，我們該怎樣做呢？

方法：輸入 x 後按緊 Alt 並輸入 178，然後放開 Alt
Alt + 數字是在 Windows 內輸入 ASCII code 的快速鍵，178 = ²，你們也可輸入其他數字試試看 :-)

這個方法也適用於整個 MS Office 軟件。

ASCII code 對應表：

處理 radio button

大家都知道 radio button 選項的 name 必須是一樣的，那麼我們怎樣用 javascript 偵測那個選項被選取呢？

方法是給每個 radio button 一個 ID，再用
if(getElementById('radio1').checked==true){ ... }
elsif(getElementById('radio2').checked==true){ ... }
etc.
就可以了

如果 radio button 太多的話，可以用這個技巧
for(var i = 0 ; i < radioName.length ; i++){
if(getElementById('radio'+ i ).checked==true){ ... }
}

選取某一個 radio button
document.getElementById('radio2').checked=true;

ID(getElementById) Vs Name(getElementsByName)

幾乎每個做過Web開發的人都問過，到底元素的ID和Name有什麼區別阿？為什麼有了ID還要有Name呢?而同樣我們也可以得到最classical的答案：ID就像是一個人的身份證號碼，而Name就像是他的名字，ID顯然是唯一的，而Name是可以重複的。

我們可以使用 document.getElementsByName 來獲取一個包含頁面中所有指定 Name 元素的物件陣列。

getElement... 方式

除了 document.getElementById('Name') 外，也可以
document.getElementsByTagName('Name')

與 getElementById 不同，getElementsByTagName('Name') 的 Element 是有 s 的

2007年8月26日星期日

Excel VBA 實用小技巧

1. 獲得最後一個 row number 和 column number
lastr=ActiveSheet.Cells.SpecialCells(xlCellTypeLastCell).Row

'Select the last record
'Select the last row in the worksheet
'End + Up

Rows(Rows.Count).Select
Selection.End(xlUp).Select

'last row #
Rows(Rows.Count).End(xlUp).Row

'last column #
Columns(Columns.Count).End(xlToLeft).Column

2. 為 Cells 加入背景色
'Color a cell
With Selection.Interior
.ColorIndex = 6 'Yellow
.Pattern = xlSolid
End With

colorindex = 0 '透明顏色

3. 文字設定
' Bold font
Cells(1,1).Font.Bold=True
' font size
Cells(1,1).Font.Size=12

4. 清理整頁
Sheets("Sheets").Activate
Cells.Clear

5. 使用 Excel function
Application.VLookup(cells(2,1), Range("A1:B99"), 2, False)
Application.Index(....)

6. 開啟 Excel 檔, 檢查檔案是否存在
' Call function to test file lock.
If Not IsFileOpen(strFileName) Then
' If the function returns False, open the document.
Workbooks.Open strFileName
End If

Function IsFileOpen(FileName As String)
Dim iFilenum As Long
Dim iErr As Long

On Error Resume Next
iFilenum = FreeFile()
Open FileName For Input Lock Read As #iFilenum
Close iFilenum
iErr = Err
On Error GoTo 0

Select Case iErr
Case 0: IsFileOpen = False
Case 70: IsFileOpen = True
Case Else: Error iErr
End Select

End Function

7. 檢查 Worksheet 是否存在
If Not SheetExists(shtName) Then
.......
Else
Sheets(shtName).Activate
End If

Function SheetExists(SheetName As String) As Boolean
' returns TRUE if the sheet exists in the active workbook
SheetExists = False
On Error GoTo NoSuchSheet
If Len(Sheets(SheetName).Name) > 0 Then
SheetExists = True
Exit Function
End If
NoSuchSheet:
End Function

8. 加入 new sheet
Sheets.Add.Name = shtName
Sheets(shtName).Move After:=Sheets(Sheets.Count)

9. 複製 Range
Range("A1").Copy Destination:=Range("B1")

startRow = Worksheets(1).UsedRange.Row 'ws 使用範圍的開始列
startCol = Worksheets(1).UsedRange.Column 'ws 使用範圍的開始欄
endRow = Worksheets(1).UsedRange.Rows.Count + startRow - 1 'ws 使用範圍的終點列
endCol = Worksheets(1).UsedRange.Columns.Count + startCol - 1 'ws 使用範圍的終點欄

10. 複製 format
Cells(1,1).Copy
Range("B1").PasteSpecial Paste:=xlPasteFormats

11. Find Method + Exact Match
Dim rng as range
Set rng = range(...).Find("abc",LookIn:=xlValue, LookAt:=xlWhole)
if rng Is Nothing then
msgbox("not found")
else
msgbox("found")
end if

12. InStr 字母最先出現位置 (findB 不能使用)
MyPos = Instr(startPosition, SearchString, SearchChar, 1) '0 = 二進位比對方式, case sensitive ; 1=文字對比方式, 大小楷沒有分別
MyPos = Instr(1, SearchString, SearchChar, 0)

13. Data Conversion
CBool(expression)
CByte(expression)
CCur(expression)
CDate(expression)
CDbl(expression)
CDec(expression)
CInt(expression)
CLng(expression)
CSng(expression)
CStr(expression)
CVar(expression)
CStr(expression)

14. 日期格式
Format(#17/04/2004#, "Short Date") 'would return '17/04/2004'
Format(#17/04/2004#, "Long Date") 'would return 'April 17, 2004'
Format(#17/04/2004#, "yyyy/mm/dd") 'would return '2004/04/17'
Format(Date, "yyyy/mm/dd")
Format(Date, "d mmmm yyyy") 'would return 12 January 2008
Format(Date, "d mmm yyyy") 'would return 12 Jan 2008

15. Return Relative Address
Range("A1:A10").Address(0, 0)

16. 設定快速鍵
Application.OnKey "%b", "runIt" '按 Alt + b 執行 runIt procedure
% = Alt
^ = Ctrl
+ = Shift

解除快速鍵
Application.OnKey "%b", ""

Excel 寬度、闊度
Application.Width
Application.Height

VBA 資源網

訂閱：文章 (Atom)

sk's resources

2007年8月29日星期三

PHP 寫入 / 讀取檔案的方法

EditPlus 2 功能眾多的文字編輯器 [站長推薦，建網必備]

Mini Log 論壇貼子追蹤器

Mini Music 網上隨身聽

教你如何用手帕包裝禮品 (圖解說明)

FSScreen Version 1.1 [螢幕擷取不用煩]

Kai's Power Tools 7 [Photoshop / PhotoPaint 插件] 輕鬆製出各類特效

Adobe Illustrator CS2 v12 英文版 - 著名的畫公仔軟件

Adobe Photoshop CS2 - 圖像處理變得簡單

超級兔子魔法設定 Super Rabbit Magic Set v8.0 (繁)免安裝版

Dr.eye 譯典通 8.0 專業版

eXeScope 6.50 程式修改器

[翻譯軟體] Dr.eye 6.0 專業版

Windows Media Player Firefox Plugin [解決 firefox 無法播放線上 mp3]

CuteFTP Pro v8.0.6 繁體版 (免安裝)

2007 年版窮學生專用的免費軟體CD

Vukan Karadzic 精選的 25 款免費字型

500 個免費英文字型

Microsoft Office XP Pro 繁體中文版

The Typing of The Dead

2007年8月28日星期二

Array Length

使用 javascript 建立、讀取 Cookies

在 Excel 內輸入二次方

處理 radio button

ID(getElementById) Vs Name(getElementsByName)

getElement... 方式

2007年8月26日星期日

Excel VBA 實用小技巧

目錄

網誌存檔

關於我自己

2007年8月29日 星期三

2007年8月28日 星期二

2007年8月26日 星期日

目錄

網誌存檔

關於我自己

2007年8月29日星期三

2007年8月28日星期二

2007年8月26日星期日