【ASP】基本語法 & 查詢

工作需要不得不去碰 ASP

這邊記錄一下有用到的功能

之後遇到能快速記憶



ASP 是比較老的語言在編碼用big5比較少問題...(懶得找解決方式)

用 Notepage 比 Dreamweaver 少問題

1.連結資料庫及查詢、新增、修改

先include DB檔簡化程式碼：<!-- #include virtual="DB.FUN" -->

新增：

Set conn = GetSQLServerConnection("192.168.0.1","admin","12345","dbname")

'方法一
sql = "INSERT INTO vote (name) VALUES ('賴俊銘')"
Set Rs = conn.Execute(sql)

'方法二
Set RS = Server.CreateObject("ADODB.Recordset")
RS.Open "vote",Conn,1,3
Rs.AddNew
Rs("name") = "賴俊銘"
Rs.Update

查詢：

Set conn = GetSQLServerConnection("192.168.0.1","admin","12345","dbname")
Set RS = Server.CreateObject("ADODB.Recordset") '建立Recordset物件
RS.Open "student",Conn,1,3 '從資料表(student)讀取記錄存放在Recordset物件，
                           '1 表示記錄指標可上下移動，更新過的記錄會立即反
                           '映到先前已讀取的Recordset物件，3表示只有在呼叫
                           'Update方法做更新時才鎖定記錄
'讀取資料表的欄位名稱做為標題
For I = 0 To RS.Fields.Count - 1
    Response.Write RS.Fields(I).Name & " "
Next
  
'顯示資料表中所有紀錄
Do While Not RS.EOF '檢查是否到達資料表的結尾
   Response.Write RS(0) & " " & RS(1) & " " & RS(2) 
   RS.MoveNext '將記錄指標移到下一筆記錄(另有RS.MoveFirst,RS.MoveLast)
Loop

'尋找記錄並顯示
RS.Find="學號='1234'"
Response.Write "學號：" & RS("學號") & "

陣列使用：

set a(0) = 1
Response.Write(a(0))

參考頁面：http://120.105.184.250/peiyuli/lesson-43.htm