updatesurvey.asp

来自「asp的新闻网站」· ASP 代码 · 共 25 行

<%
'programmer:潘树文
'date:2001-2-2
%>
<%
Response.Expires =0

%>
<!--#include file="../include/odbc.asp"-->

<%
surveyid=Request("radio1")
'surveyId=request("surveyId")

Application.Lock 
sql="update news2_survey set voteNum=voteNum+1 where surveyid='"&surveyid&"'"
conn.Execute (sql)


Application.UnLock 

Response.Redirect "viewsurvey.asp?surveyId="&surveyId&"&menuid="&request("menuid")
%>