<% OPTION EXPLICIT Response.Buffer = True %> <% 'Some before doings... 'Lets get the current poll... Dim sTitle Dim sQuestion Dim vAnswers(13) Dim vCount(13) 'Get active one... PollMentor_GetPollInfo -1, sTitle, sQuestion, vAnswers, vCount %> Encuesta Al Modo Nuestro



¿Cuál es tu Tema Preferido

del CD: "Al Modo Nuestro"?

 

 


<% Dim nCount Dim nDef Dim nTotal nTotal = 0 For nCount=1 To 13 If vAnswers(nCount) <> "" Then nTotal = nTotal + vCount(nCount) %> checked<%End If%> name="R1"><%=vAnswers(nCount)%>
<% nDef = True End If Next %>

 

 


 Ver Resultados

 

 



<%=FAQ_GetAd( 3 )%>

 

 <%=FAQ_GetAd( 2 )%>