工作中-維護系統的主要環境與語言

  • 175
  • 0

這是一項艱難的任務,

現在社會常用程式語言絕大部分是使用C、C#、 .net、PHP、Python 或是 Ruby (for 網頁或系統)

但這次主要維護的系統環境是 (ASP + VB + HTML) + MS SQL 

網路上找到的資料實在久遠或是甚至404 (想找相關的書真的要有點年代)

好喔,我現在應該要穿越一下時空才是 (馬的軟體這種東西汰舊換新的也太快了吧!!!!)

以下是我沒看過或是忘記的語法,先寫下來記得一下下

on error resume next 

......

on error goto 0

 

On Error Resume Next 表示當一個執行階段錯誤產生時,程式控制立刻到發生錯誤陳述式接下去的陳述式,而繼續執行下去。
On Error GoTo 0 停止現在程序裏任何已啟動的錯誤處理程式。 
On Error Resume Next 會使程式從接著發生錯誤陳述式之後的陳述式繼續執行。或是從接著含有 On Error Resume Next 陳述式之程序的陳述式繼續執行。

這個陳述式可以使程式不管執行階段錯誤而繼續執行下去。您可以將錯誤處理常式放在錯誤會發生的地方,而不必另放在同一程序裏的其它位置。當另一個程序被呼叫的時候,On Error Resume Next 不會發生作用。所以如果您希望常式裏有自建錯誤處理常式,您應該在每個呼叫的常式裏執行 On Error Resume Next 陳述式。

附註 在處理關於物件的錯誤時,On Error Resume Next 指令比 On Error GoTo 更好。每當運用物件的時候,檢查 Err 可以消除不知道程式碼在使用那一個物件的疑慮。您可以確定是那個物件將錯誤代碼放在 Err.Number 中,就如同可以確定是那個物件產生錯誤(Err.Source 中所表示的物件)。
On Error GoTo 0 取消目前程序裏的錯誤處理。它並不是表示處理錯誤的程式碼從行號 0 開始,就算程式裏真的有 0 行號也一樣。如果沒有 On Error GoTo 0 陳述式,當程序結束的時候,錯誤處理程式就自動關閉。

ref: http://programmer-club.com.tw/ShowSameTitleN/vb/25736.html

set rs=server.CreateObject("adobb.recordset")
sql = ""			//輸入sql語法
rs.Open sql, conn, adOpenStatic, adLockReadOnly
listinfo.stdListRange = 1000
listinfo.NonCreateRSFlag = true
listinfo.ViewCol = 8
listinfo.ViewLink = ""		//加入URL

set listinfo.dataset = rs
listinfo.add ""			//雙引號內加入HTML語法
listinfo.listFormBegin="" 	//雙引號內加入HTML的FORM 開頭
listinfo.listFormEnd="" 	//雙引號內加入HTML的FORM 結尾
rs.Close

++++++++++++++++++++++++++++++++++++++++++++++++++++++++++

EX:
listinfo.listFormBegin="<form id=""form_list"" name=""form_list"" method=""post"">" 
listinfo.listFormEnd="</form>" 

++++++++++++++++++++++++++++++++++++++++++++++++++++++++++

rs.Open sql, conn, adOpenStatic, adLockReadOnly
if rs.EOF then 
[...]				//取值抓資料庫
rs.Close
end if

相信大家對於連結資料庫的資訊應該很熟悉 (不然資訊也很好找尋得到)
我不懂的就是那個什麼 listinfo.add 的那些函式啦!
就語法的認知是,
組成form所增加的Row之類的,
但勢必得看另一隻檔案,
解答的話會再放上來。

今天先這樣,我的權限還沒過,不能看到上層的其他檔案。(include其他函式的資料夾)
QQ

=====================================================================================

盡力耍廢也很好

By 金魚