<% conn.open constr Sql="Select * from Fuser Where username='" & Session("user_name") & "' and L_ok=True" Set FRs=conn.Execute(Sql) return_vcp=false if not FRs.eof then return_vcp=true end if frs.close set frs=nothing session("vcp")=return_vcp %> 用户管理后台
<% page_main=request("page_main") if page_main<>"" then if instr(page_main,"onlinePay.asp")>0 then response.write "" end if %>