<!--#include file="config.asp" -->
<%
straID = request.QueryString("answer")
strpID = request.QueryString("pID")
strSQL = "UPDATE T_RESULTS Set icount = icount + 1 WHERE aID_FK = " & straID

Set MyConn = Server.CreateObject("ADODB.Connection")
MyConn.Open strConn

MyConn.Execute(strSQL)
MyConn.Close
Set MyConn = Nothing

Response.Cookies("poll"&strpID) = "done"
Response.Cookies("poll"&strpID).Expires = Date + 120


	if instr(Request.ServerVariables("HTTP_REFERER"),"?") Then
	strRedir = Request.ServerVariables("HTTP_REFERER")&"&poll=currentResults"
	else
	strRedir = Request.ServerVariables("HTTP_REFERER")&"?poll=currentResults"
	End if
response.Redirect(strRedir)
%>