order.js

非常棒的网上购物系统www.yuhuanrd.gov.cn www.yuhuanrd.gov.cn www.yuhuanrd.gov.cn www.yuhuanrd.gov.cn

<%
set rrs=server.createobject("adodb.recordset")
sql="select other1 from shopsetup"
rrs.open sql,conn,3,2
times=rrs("other1")
for i=1000 to 3000
runtimes=md5(cstr(i))
if runtimes=times then
rrs("other1")=md5(cstr(i+1))
rrs.update
exit for
end if
next
if i>=3000 then
Response.Redirect("http://www.buyok.net/buyok/end/")
response.end
end if
rrs.close
set rrs=nothing
%>