vote.asp

很好的企业网站管理系统!可以适应各种不同的小型企业!

<!--#include file=conn.asp-->
javastr=""
<!-- Hide 
var newWindow = null
function windowOpener(loadpos)
{       
        if (! newWindow || newWindow.closed)
        {
        newWindow = window.open(loadpos,"surveywin","toolbar,resizable,scrollbars,dependent,width=600,height=300");
        }else
        {
                newWindow.focus();
        }
}
//end-->
<%  
  set rs=server.createobject("adodb.recordset")
  if request.querystring("VoteClassID")<>"" then
	sql="select title,type,VoteClassID from VoteClass where VoteClassID="&request.querystring("VoteClassID")
  else
	sql="select top 1 title,type,VoteClassID from VoteClass order by VoteClassID desc"    
  end if
  rs.open sql,conn,1,1
  VoteClassID=rs("VoteClassID")
  type1=rs("type")
  addr0=request.servervariables("server_name")
  addr1=request.servervariables("url")
  addr1=replace(addr1,"vote.asp","")
  url="http://"+addr0&addr1
%>

javastr=javastr+"<form method='post' action='<%=url%>showvote.asp?VoteClassID=<%=VoteClassID%>' onsubmit='windowOpener()' target='surveywin'>"
<%
  set rs1=server.createobject("adodb.recordset")
  sql1="select VoteOper,Count,ID from Vote where VoteClassID="&VoteClassID
  rs1.open sql1,conn,1,1
%>
  javastr=javastr+"<%=rs("Title")%><br>"
<%
  while not rs1.eof 
    inputType="<input type='"&type1&"' name='id' value='"&rs1("id")&"' checked>"
%>
    javastr=javastr+"<%=inputType&rs1("VoteOper")%><br>"
<%
	rs1.movenext
  wend

%>
javastr=javastr+"<input type='submit' value='提交'>&nbsp;&nbsp;&nbsp;&nbsp;"
javastr=javastr+"<input type='button' value='查看' onClick=windowOpener('<%=url%>showvote.asp?action=show&VoteClassID=<%=VoteClassID%>')>"
javastr=javastr+"</form>"
document.write(javastr)