<% If Request.QueryString("open") = "add2" Then %>
<% Set Connect = Server.CreateObject("ADODB.Connection")
Connect.Open "driver={Microsoft Access Driver (*.mdb)};dbq=c:\inetpub\wwwroot\applications\citatdatabas\data\citat.mdb"
VisaCitat = Request.form("Citat")"
sql = "insert into citat(citat) values ('" & replace(VisaCitat,"'","''") & "')"
connect.execute sql,,128
set rs = connect.execute("select @@identity")
Visaid = rs(0)
RecSet.Close
Connect.Close
Select @@identity fungerar dock bara med Access 2000
red: pace
Ditt exempel fungerar inte, det tar fram id för det citat som liger först i alfabetisk ordning
------------------ essentitia preter non sans multiplicandum
Dom har stöd för att man när man skapar en tabell definierar att en kolumn får automatiskt genererade värden vid insert. Funktionellt är det ungefär samma som sql server (DB2 har lite mer varianter) mfl men syntaxen skiljer sig något.
I deras online-dokumentation fanns det ingen beskrivning av någon speciell funktion för att plocka fram det senast skapade värdet vilket gör funktionaliteten mindre användbar.
Någon DB2-kunnig (sgtpepper?) som har ytterligare info?
------------------ essentitia preter non sans multiplicandum