📄 vote3.asp
字号:
<!-- #include virtual="/kjasp/func/CCookies.fun" -->
<%
If Not IsCookiesOpen Then
Response.Write "本网页须使用Cookies 功能,请先启动Cookies!"
Response.End ' 结束网页
End If
%>
<!-- #include virtual="/kjasp/func/FileCnt.fun" -->
<%
vote = Request("vote")
Myself = Request.ServerVariables("PATH_INFO")
If vote = Empty Then
%>
<!-- 以下为“投票网页”-->
<HTML>
<BODY BGCOLOR=WHITE>
<H2>您赞成中学生谈恋爱吗?<HR></H2>
<BLOCKQUOTE>
目前赞成票: <%=kjReadFileCounter("agree.txt")%>
<A HREF="<%=Myself%>?vote=Yes">赞成请在此按下</A><P>
目前反对票: <%=kjReadFileCounter("agreenot.txt")%>
<A HREF="<%=Myself%>?vote=No">反对请在此按下</A>
</BLOCKQUOTE>
<%
If Session("Voted") Then
Response.Write "<HR>您已经投票了!"
End If
%>
</BODY>
</HTML>
<%
ElseIf vote = "Yes" Then
If Not Session("Voted") Then
' 赞成: 将 agree.txt 的计数器加一
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -