梦想在远方

 sql="insert into table1(title,body) values('titlestr','bodystr')"
conn.Execute sql
sql="SELECT @@IDENTITY AS Identity"
set rs=conn.execute（sql）
key=rs("Identity")