Session Variable
am 19.08.2007 19:45:50 von colleen1980Hi: I delete the files/cookies and clear history from the IE 6.0
browser and try to write in a text file use FSO but it dont write any
thing in the file needs help
Thanks.
vote_input.asp
vote.asp
<%
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="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)
%>
<%
g_selected="vote_countd.txt"
set act = fso.opentextfile(server.mappath(g_selected))
counter_d = clng(act.readline)
%>
<% total=counter_a+counter_b+counter_c+counter_d
%>
A
<%= formatnumber((counter_a/total)*100,1) %>%B
<%= formatnumber((counter_b/total)*100,1) %>%C
<%= formatnumber((counter_c/total)*100,1) %>%D
<%= formatnumber((counter_d/total)*100,1) %>%Total Votes: <%= total %>