选举/用户投票（不用db）

用户投票在很多网站是很有用也很受欢迎的，你不需要数据库跟踪结果。通过在服务器上操作文本文档，你可以跟踪到用户的输出和图解似的显示结果和每个选举的百分比。用户只允许选举每个用户的会议的时间来不让多数的输出出现或者阻止用户不停地刷新或重新加载。
<%
on error resume next
u_input=request.form("u_input") %>

<% set fso = createobject("scripting.filesystemobject")
if session("voted_before") = "" then
session("voted_before") = "Yes"

读取和添加一项到选择值
g_selected="vote_count"& u_input &".txt"
set act = fso.opentextfile(server.mappath(g_selected))
counter = clng(act.readline)
counter = counter + 1
act.close
Set act = fso.CreateTextFile(server.mappath(g_selected), true)
act.WriteLine(counter)
act.Close
end if
%>



<%
g_selected="vote_counta.txt"
set act = fso.opentextfile(server.mappath(g_selected))
counter_a = clng(act.readline)

%>



<%
g_selected="vote_countb.txt"
set act = fso.opentextfile(server.mappath(g_selected))
counter_b = clng(act.readline)

%>



<%
g_selected="vote_countc.txt"
set act = fso.opentextfile(server.mappath(g_selected))
counter_c = clng(act.readline)

%>

简单生活，希望对大家有用!要觉得本文有价值请分享给您的朋友，生活就是人来人往，分享越多!收获越多!作者：天天ASP家园