baobiaook.asp

来自「本软件程序是一个基于WEB的进销存管理平台,代码十分完整,无错!」· ASP 代码 · 共 17 行

          <%
Set ObjReference = Server.CreateObject("jxc1.check") 
ObjReference.myfilee()
%>

<% 
dim time1,time2,ku
time1= request.querystring("time1")
time2= request.QueryString("time2")
ku = request.QueryString("ku")
if ku = "全部" then
response.Redirect("baobiaook1.asp?time1="&time1&"&"&"time2="&time2)
else
response.Redirect("baobiaook2.asp?time1="&time1&"&"&"time2="&time2&"&"&"ku="&ku)
end if

 %>