ok.asp

来自「网上学生心里调查系统」· ASP 代码 · 共 37 行

<%dim ok
ok=trim(request("ok"))

 
function ref(url,i)
response.write"<meta http-equiv=refresh content="&i&";URL="&url&">"
response.write"<center><br><font color=red>"&i&"</font> 秒后自动返回 ....如不想等待请<a href="&url&">点击</a></center>"
end function



if len(ok)=0 then
  response.write "<center>正在返回首页！</center>"
  response.write ref("index.asp",3)
elseif ok="zx" then
  response.write "<center>谢谢您添加资讯！正在返回管理中心，等待管理员审核</center>"
  response.write ref("add_zx.asp",3)
elseif ok="city" then
  response.write "<center>谢谢您添加城市！正在返回管理中心</center>"
  response.write ref("add_city.asp",3)
elseif ok="site" then
  response.write "<center>谢谢您添加网站！正在返回管理中心，等待管理员审核</center>"
  response.write ref("add_site.asp",3)
elseif ok="xinxierror0" then
  response.write "<center><font color=red>请选择资讯！</font><form><input type='button' value=' 关      闭 ' onclick='window.close()'></form></center>"
elseif ok="xinxierror" then
  response.write "<center><font color=red>没有该资讯（可能已经被删除）</font><form><input type='button' value=' 关      闭 ' onclick='window.close()'></form></center>"
elseif ok="carderror0" then
  response.write "<center><font color=red>请选择用户名片</font><form><input type='button' value=' 关      闭 ' onclick='window.close()'></form></center>"
elseif ok="xinxierror" then
  response.write "<center><font color=red>没有该用户名片（可能已经被删除）</font><form><input type='button' value=' 关      闭 ' onclick='window.close()'></form></center>"
elseif ok="error" then
  response.write "<center><font color=red>区号错误或暂时没有该城市信息，返回首页？</font></center>"
  response.write  ref("index.asp",3)
end if

%>