showgueststyle.asp

来自「本程序系统完全实现了医院网站程序的全部功能的前台和后台程序」· ASP 代码 · 共 18 行

<%
'**************************************************************
' Software name: PowerEasy SiteWeaver
' Web: http://www.powereasy.net
' Copyright (C) 2005－2008 佛山市动易网络科技有限公司 版权所有
'**************************************************************

Dim ShowGStyle
ShowGStyle = request("ShowGStyle")
If ShowGStyle = "" Or Not IsNumeric(ShowGStyle) Then
    ShowGStyle = 1
Else
    ShowGStyle = Int(ShowGStyle)
End If
response.cookies("ShowGStyle") = ShowGStyle
response.redirect request.servervariables("http_referer")
%>