<%
'conn
connstr = "driver={microsoft access driver (*.mdb)};dbq=" & Server.mappath("test.mdb")
set conn = server.CreateObject("adodb.connection")
conn.open connstr
resumePerson = "111"
sql1="insert into [p_account] (personUn) values ('"&resumePerson&"')"
sql2="select @@identity as aa"
set rs = server.CreateObject("adodb.recordset")
conn.Execute(sql1)
rs.open sql2,conn,1,3
response.Write(rs("aa"))
%
'conn
connstr = "driver={microsoft access driver (*.mdb)};dbq=" & Server.mappath("test.mdb")
set conn = server.CreateObject("adodb.connection")
conn.open connstr
resumePerson = "111"
sql1="insert into [p_account] (personUn) values ('"&resumePerson&"')"
sql2="select @@identity as aa"
set rs = server.CreateObject("adodb.recordset")
conn.Execute(sql1)
rs.open sql2,conn,1,3
response.Write(rs("aa"))
%