VFP 愛用者社區 首頁 VFP 愛用者社區
本討論區為 Visual Foxpro 愛用者經驗交流的地方, 請多多利用"搜尋"的功能, 先查看看有無前例可循, 如果還有不懂的再發問. 部份主題有附加檔案, 須先註冊成為社區居民才可以下載.
 
 常見問題常見問題   搜尋搜尋   會員列表會員列表   會員群組會員群組   會員註冊會員註冊 
 個人資料個人資料   登入檢查您的私人訊息登入檢查您的私人訊息   登入登入

如何獲得剛插入資料庫的記錄的ID號?(轉貼)

 
發表新主題   回覆主題    VFP 愛用者社區 首頁 -> VFP 討論區
上一篇主題 :: 下一篇主題  
發表人 內容
Ruey



註冊時間: 2003-03-12
文章: 1698
來自: tunglo

第 1 樓

發表發表於: 星期一 九月 01, 2003 8:29 pm    文章主題: 如何獲得剛插入資料庫的記錄的ID號?(轉貼) 引言回覆

來源:雅狐 aob
如何獲得剛插入資料庫的記錄的ID號?

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值。
如果你用的不是SQL Server 2000,你最好一個簡單的存儲過程來解決這個問題。

代碼:
CREATE PROCEDURE myProc
    @param1 INT
AS
BEGIN
    SET NOCOUNT ON
    INSERT INTO someTable
    (
        intField
    )
    valueS
    (
        @param1
    )
    SET NOCOUNT OFF
    SELECT NEWID = @@IDENTITY
END


在ASP中你可以這樣做:

代碼:
<%
    fakevalue = 5
    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,你可以用下面這樣的方法:
<%
    fakevalue = 5
    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游標來防止出錯。例如下面的例子:

代碼:
<%
    fakevalue = 5
    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
%>

_________________
#############################
快樂媽咪系列幸福宅配,喝十全雞湯~原來幸福那麼簡單!!

學會VFP使用者社區的搜尋,Code才會更有趣~
#############################
回頂端
檢視會員個人資料 發送私人訊息
從之前的文章開始顯示:   
發表新主題   回覆主題    VFP 愛用者社區 首頁 -> VFP 討論區 所有的時間均為 台北時間 (GMT + 8 小時)
1頁(共1頁)

 
前往:  
無法 在這個版面發表文章
無法 在這個版面回覆文章
無法 在這個版面編輯文章
無法 在這個版面刪除文章
無法 在這個版面進行投票
無法 在這個版面附加檔案
無法 在這個版面下載檔案


Powered by phpBB © 2001, 2005 phpBB Group
正體中文語系由 phpbb-tw 維護製作