发一个ASP的ADODB类代码

                                        else
                                                Insert_Table = true
                                end if
                                '获得最后增加ID
                                if table <> "" and id_column <> "" then
                                        Set ds = conn.Execute("select "&id_column&" from "&table&" order by "&id_column&" desc")
                                end if
                                if err then 
                                                Insertd = 0:err.clear
                                        else Insertd = ds(0)
                                end if
                                Set ds = nothing