2008年4月：東區認證中心asp.net初階課程

因四月份較為忙碌，所以四月份開的課程，就稍晚做課程的介紹，
實在抱歉！！
東區認證中心的「asp.net」初階課程將以VB語法為主，
由基本語法開始，並介紹幾個基本表單控制項的使用，
再介紹微軟Web Developer提供的驗證工具。
因初階加上進階共計30小時，已有學員希望能有一個完整作品展示，
所以預期初階課程會將驗證控制項介紹完，以便讓進階課程順利由
資料庫開始，而有時間進行完整作品設計，所以此次上課講義編排
上會與前面幾次不同，歡迎各位新朋友、老朋友都來課堂上學習與
分享經驗。

如果有疑問或課程建議，請提出來！
如果沒有回應，那我這篇文章一個月後會找時間刪除。

2008年4月：士林分校Windows 2003 Server三個階段課程

因四月份較為忙碌，所以四月份開的課程，就稍晚做課程的介紹，
實在抱歉！！
士林分校的「Windows 2003 Server」第一階段到第三階段課程，
最主要是介紹「如何管理Windows電腦」，所以由網域的介紹開始，
介紹使用者帳號的建立與群組的規劃、資料夾的分享與相關權限管理
群組原則的設計。
課程中以簡報檔案帶各位瞭解Windows Server。簡報檔我會在五月時
放在網路上提供分享，屆時再請各位上我的部落格下載。

如果沒有回應，那我這篇文章課程結束後再保留一個月，就會
找時間刪除

民國97年05月課程表

星期日	星期一	星期二	星期三	星期四	星期五	星期六
				1 東區認證PHP-12	2	3 東區認證 VC-7-8
4 東區認證ASP.Net-3-4	5	6	7	8 請勿安排課程	9	10 東區認證 VC-9-10
11 東區認證ASP.Net-5	12 請勿安排課程	13	14 家庭聚會	15 請勿安排課程	16 科豐時間	17 家庭聚會
18 東區認證ASP.Net-6-7 Janice時間	19 東區認證VC-1	20 科豐時間	21 東區認證VC-2 Janice時間	22 家庭聚會	23 東區認證VC-3	24 東區認證C-1-2 Janice時間
25 東區認證ASP.Net-8-9 Janice時間	26 東區認證VC-4 Janice時間	27 科豐時間	28 東區認證VC-5	29 請勿安排課程	30	31 東區認證C-3-4

2008年3月：東區認證中心 PHP 課程

因官方表示php4停止維護，所以課程內容會
以php6的標準為主來做介紹，
前面會花些時間跟各位說明網頁表單呼叫與基本
php語法，約第七次課程後開始說明MySQL。
課程中會說明如何由Excel或Access將檔案匯出到MySQL。
時間上允許，也會說明apache設定與相關安全規劃。
課程中不使用商業軟體，網站使用apache+php+mysql
編輯軟體使用emeditor或Zend Studio(Windows、linux)、
VSPHP(試用版、需.net framework)，或者您喜歡的免費軟體
皆可。
瀏覽器會提供給各位隨身版Firefox，關於Firefox所需的軟體網址，
都會登錄在裡面。
PHP課程是一個玩網頁、玩資料庫的好課程，各位於課程
中有疑問或課程建議，請提出來！
如果沒有回應，那我這篇文章一個月後會找時間刪除。

vb.net內與文字檔操作有關的語法

這是我在Yaoo知識+回覆的資料，
以下為vb.net內與文字檔操作有關的語法，
我就把他貼在這兒了。

1.搜尋字串
Function Get_str（）
Dim i As Integer = 0
FileOpen（1, "c:\要搜尋的文字檔.txt", OpenMode.Input）
Do Until EOF（1）
i = i + 1
If InStr（LineInput（1）, "要找的字串"） Then
MsgBox（"要找的字串在第： " & i & " 行"）
FileClose（1）
Exit Function
End If
Loop
MsgBox（"找不到此字串!"）
End Function
2.
如果是想要找出a.txt的bcb，並且拷貝到b.txt內
您可以這樣做
Dim sr As New System.IO.StreamReader（"c:\a.txt", System.Text.Encoding.Default）
Dim sw As New System.IO.StreamWriter（"c:\b.txt", False, System.Text.Encoding.Default）

Do While sr.Peek > -1
Dim t As String = sr.ReadLine
If t.Substring（0, 3） = "bvb" Then
sw.WriteLine（t）
End If
Loop

sw.Close（）
sr.Close（）
3.找出a.txt內的ab拷貝到b.txt，並且改為p2：
Dim sr As New System.IO.StreamReader（"c:\a.txt", System.Text.Encoding.Default）
Dim sw As New System.IO.StreamWriter（"c:\b.txt", False, System.Text.Encoding.Default）
Do While sr.Peek > -1
Dim t As String = sr.ReadLine
If t.Substring（0, 2） = "ab" Then
sw.WriteLine（"p2" & t.Substring（2））
End If
Loop
sw.Close（）
sr.Close（）

請注意這裡的括弧是全形的，拷貝到vb.net內之後記得改為半形喔！