"
Response.write ""
Response.Write "" & Item & " "
Response.write "
"
Response.write ""
if session.Contents(counter) <> "" then
confronto = Instr(1,cstr(session.Contents(counter)),chr(34),1)
val = replace(session.Contents(counter),chr(34),"")
else
val = session.Contents(counter)
end if
Response.Write " "
if confronto >0 then Response.Write "("" _"" )"
'Response.Write " " & counter & " = " & session.Contents(counter)
Response.write "
"
Response.write " "
Next
%>
"
Response.write ""
Response.Write "" & Item & " "
Response.write "
"
Response.write ""
if Application.Contents(counter) <> "" then
confronto = Instr(1,cstr(Application.Contents(counter)),chr(34),1)
val = replace(Application.Contents(counter),chr(34),"")
else
val = Application.Contents(counter)
end if
Response.Write " "
if confronto >0 then Response.Write "("" _"" )"
'Response.Write " " & counter & " = " & Application.Contents(counter)
Response.write "
"
Response.write " "
Next
%>