Calendar
頁面載入中
Placard
頁面載入中
Category
頁面載入中
Latest Entries
頁面載入中
Latest Comments
頁面載入中
Last Messages
頁面載入中
User Login
Links
Information
頁面載入中
Search
Other


Welcome to my blog!
  ASP開啟資料庫
 
1.建立一個my.mdb資料庫
2.在ASP'檔案開始處,插入下列一段程式碼,即可開啟my.mdb資料庫
 
<%
Set DBConnection=Server.CreateObject("ADODB.Connection")
ConnectionString="provider=Microsoft.Jet.OLEDB.4.0;Data source=" & Server.mappath("my.mdb")
DBConnection.open ConnectionString
Set Rs  = Server.CreateObject("ADODB.RecordSet")
%>
 
3若要讀取my.mdb的資料表HTAX,讀取第reno筆資料的
 "接收資料","傳送資料","更新日期"等欄位資料,程式如下:

<%
'----------讀取資料 開始----------
 SQLcmd="select * from  HTAX"
 Rs.Open SQLcmd,DBConnection,2,2
 rs.MoveFirst
    rs.Move (reno)
 PC=rs("接收資料")
 Cs=rs("傳送資料")
 PC_time=RS("更新日期")
 rs.close
%>
 
4若要以表格顯示資料,程式如下
<%
  ' Part I:輸出「抬頭名稱」
    For i=0 to rs.Fields.Count-1
     Response.Write "<TD>" & rs(i).Name & "</TD>"
  Next
%>
</TR>
<%
  ' Part II:輸出資料表的「內容」
    rs.MoveFirst  ' 將目前資料錄移到第一筆
    While Not rs.EOF ' 判斷是否過了最後一筆
      Row = "<TR>"
     For i=0 to rs.Fields.Count-1
        Row = Row & "<TD>" & rs(i) & "</TD>"
     Next
     Response.Write Row & "</TR>"
     rs.MoveNext ' 移到下一筆
  Wend
'-------關閉資料庫並釋放資源-----
RS.close
set RS=nothing
DBConnection.close
set DBConnection=nothing
%>
[ 閱讀全文 | 回復(0) | 引用通告 | 編輯

  Post  by  jade 發表於 2006/12/21 下午 10:48:00
  • 上一篇:USB

發表評論:

    大名:
    密碼: (遊客無須輸入密碼)
    主頁:
    標題:
    頁面載入中
頁面載入中
Powered by Oblog.