使用ASP+MSSQL时添加数据无法获取及时获取ID的解决办法

将ID设置成非自动编号，或是另外设置一个字段NO，给这个字段值，特提供给这个字段值的函数。

TABLE，表的名称，TD，字段的名称
操作示例
sql="select * from userlist"
rs.open sql,conn,3,3
rs.addnew
rs("id")=getlastid("userlist","id")
.....

function getlastid(table,td)
        dim rs,sql,no
        set rs=Server.CreateObject("ADODB.RecordSet")
        sql="select top 1 "&td&" from "&table&" where "&td&">0 order by "&td&" desc"
        rs.open sql,conn,3,3
        no=1
        if not rs.EOF then
                if isblank(rs(td))=false then no=rs(td)+1
        end if
        rs.close
        set rs=nothing
        getlastid=no
end function