‖‖‖‖‖‖‖‖‖‖看看是什么错误,怎么执行2遍啊!!!
function up_date(xf_n)
set rs2=server.createobject("adodb.recordset")
sql2="select top " & xf_n & " * from users where usrid ='"& usrid&"'"
rs2.open sql2, conn, 1,3
do While not rs2.eof
if Datediff("s",rs2("end_date"),now())<0 then
rs2("end_date")=DateAdd("m",1,rs2("end_date"))
else
rs2("end_date")=DateAdd("m",1,now())
end if
rs2("stat") = 2
rs2.update
rs2.movenext
loop
rs2.close
set rs2 = nothing
end function