<% response.cookies(echsys)("ManageUserName")="" response.cookies(echsys)("ManageKEY")="" response.cookies(echsys)("ManagePurview")="" response.cookies(echsys)("ManageFullName")="" response.cookies(echsys)("ManageReglevel")="" showerr=request("showmess") Function getcode1() Dim test On Error Resume Next Set test=Server.CreateObject("Adodb.Stream") Set test=Nothing If Err Then Dim zNum Randomize timer zNum = cint(8999*Rnd+1000) Session("verifycode") = zNum getcode1= Session("verifycode") Else getcode1= "" End If End Function %> <%=copyright%><%=version%><%=ver%> <%if showerr<>"" then%> <%end if%>
楚雄师范学院体育场馆使用与租用系统

查询场馆

申请场馆名称:

申请表单

租用时间

租用时间段

申请单位或个人信息

 

(申请通过将与您联系)
<%response.end%>