推薦：asp教程之如何制作2欄分頁顯示代碼
顯示形式： ID NAME | ID NAME 1 JULIET | 2 PALYBOY 3 BABY |4 TOM 5 LENA | 6 JERY 首頁 前頁 后頁 尾頁 頁數：1/4 6條/頁 總記錄數:25條 代碼： !--#include file=conn.asp-- html body bgcolor=#FFFFFF text=#000000 table width=60% border=1

1.SQL Server
  對于SQL Server 2000來說，它提供了兩個全新的函數(IDENT_CURRENT,SCOPE_IDENTITY),并且改進了@@IDENTITY的不足.當你插入新記錄后，可以調用函數:
    PRINT IDENT_CURRENT('table') '這將獲得新的IDENTITY值，不管數據庫中是不是有記錄添加(這就避免了@@IDENTITY的連接限制)
    或者：PRINT SCOPE_IDENTITY() '這將獲得在當前存儲過程，觸發器等其他程序創建的最新記錄的IDENTITY值.
  而全局變量@@IDENTITY有一個問題，當對一張表執行insert時，如果該表有觸發器程序在執行插入操作，然后，接著在另一張表中插入記錄，這樣返回@@IDENTITY值就是第二張表的IDENTITY值。

在ASP中你可以這樣做:
<% 
    set conn = Server.CreateObject("ADODB.Connection")
    conn.open "<conn string>"
    set rs = conn.execute("exec myProc @param1=" & fakeValue)
    response.write "New ID was " & rs(0)
    rs.close: set rs = nothing
    conn.close: set conn = nothing
%>

2.Access 
  對于Access,你可以用下面這樣的方法：
<% 
    set conn = Server.CreateObject("ADODB.Connection")
    conn.open "<conn string>"
    conn.execute "Insert into someTable(intField) values(" & fakeValue & ")"
    set rs = conn.execute("select MAX(ID) from someTable")
    response.write "New ID was " & rs(0)
    rs.close: set rs = nothing
    conn.close: set conn = nothing
%>
  然而對于多人同時向數據庫中添加數據，我們就要利用記錄集的adOpenKeyset游標來防止出錯。例如下面的例子:
<% 
    set conn = Server.CreateObject("ADODB.Connection")
    conn.open "<conn string>"
    set rs = Server.CreateObject("ADODB.Recordset")
    rs.open "select [intField] from someTable where 1=0", conn, 1, 3
    rs.AddNew
    rs("intField") = fakeValue
    rs.update
    response.write "New ID was " & rs("id")
    rs.close: set rs = nothing
    conn.close: set conn = nothing
%>

分享：解析ASP中連接各種類型數據文件的方法
1.建立MdbRecordset對象。MDB數據庫是一個完整的數據庫，內部可能含有若干個數據表，在此函數中，Connection的作用是連接數據庫，Recordset的作用是打開數據表。 Function CreateMdbRecordset(數據庫文件名, 數據表名或Select語句 ) Dim conn,Provider,DBPat