<%
on error resume next
u_input=request.form("u_input") %>
<% set fso = createobject("scripting.filesystemobject")
if session("voted_before") = "" then
session("voted_before") = "Yes"
' reads and adds a one to the selected value
g_selected="poll/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="poll/vote_counta.txt"
set act = fso.opentextfile(server.mappath(g_selected))
counter_a = clng(act.readline)
%>
<%
g_selected="poll/vote_countb.txt"
set act = fso.opentextfile(server.mappath(g_selected))
counter_b = clng(act.readline)
%>
<%
g_selected="poll/vote_countc.txt"
set act = fso.opentextfile(server.mappath(g_selected))
counter_c = clng(act.readline)
%>
<% total=counter_a+counter_b+counter_c
%>OMJ Hajj Program
