Código de sondeo ASP

<%@ language="vbscript"%>

<%response.Expires = 0%>

id=request.querystring("id")

llamar a isid( id)

set rs=conn.execute("seleccione * de [VoteTitle] donde id="&id)

<%=rs("votetitle")%>- ------- Código de votación online

set rs1=conn.execute("select * from [ VoteSelect] donde titleid="&id)

hazlo mientras no sea rs1.

asunto: <%=rs("votetitle")%>

<.table width="100%" border="0" cellpacing="0" cellpadding="0">

<%if rs("votetype")=1 entonces%>

">">

<%else%>

<%end if%>

<%=rs1("selectitem")%>

<%rs1.movext

bucle%>

gt;

< ;nombre de entrada="tipo de ip" tipo="oculto" id="tipo de ip" valor="<%=rs("tipo de ip")%>">