Ir para conteúdo
Fórum Script Brasil
  • 0

Enquete Com Grafico


Gheraldo

Pergunta

8 respostass a esta questão

Posts Recomendados

  • 0

Achei um exemplo aqui de um sistema que eu fiz, da uma olhada se voce entende a lógica:

<%
'-----------------------------------------------'
' Sistema de controle de comissões de formatura '
' Desenvolvido por: Alexandre Rugila            '
' lerenquete.asp - V. 1.00                      '
' tela de leitura/participação na enquete       ' 
' Ultima atualização: 13/05/2005                '
'-----------------------------------------------'  


if session("acesso") <> true then
   response.write "<p class='erro' align='center'>Usuário não autorizado</p>"
   response.write "<p align='center'><a href='principal.asp'>Clique aqui para efetuar login</a></p>"
   response.end
end if
%>

<!--#include file='conecta.asp'-->

<%
session("id") = request("id")
sql = "Select * from enquetes where enquete=" & request("id")
set rs = conexao.execute(sql)
sqltotalvotos = "Select count(enquete) as totalvotos from enquetes_respostas where enquete=" & request("id")
set rstotal = conexao.execute(sqltotalvotos)
sqlopcao1 = "Select count(resposta) as opcao1 from enquetes_respostas where resposta=1 and enquete=" & request("id")
set rsop1 = conexao.execute(sqlopcao1)
sqlopcao2 = "Select count(resposta) as opcao2 from enquetes_respostas where resposta=2 and enquete=" & request("id")
set rsop2 = conexao.execute(sqlopcao2)
sqlopcao3 = "Select count(resposta) as opcao3 from enquetes_respostas where resposta=3 and enquete=" & request("id")
set rsop3 = conexao.execute(sqlopcao3)
sqlopcao4 = "Select count(resposta) as opcao4 from enquetes_respostas where resposta=4 and enquete=" & request("id")
set rsop4 = conexao.execute(sqlopcao4)
totalvotos=Cint(rstotal("totalvotos"))
   opcao1=Cint(rsop1("opcao1"))
   opcao2=Cint(rsop2("opcao2"))
   opcao3=Cint(rsop3("opcao3"))
   opcao4=Cint(rsop4("opcao4"))
if totalvotos > 0 then
   eop1=opcao1/totalvotos
   eop2=opcao2/totalvotos
   eop3=opcao3/totalvotos
   eop4=opcao4/totalvotos
else
   eop1=0
   eop2=0
   eop3=0
   eop4=0
end if


response.write "<html>"
   response.write "<head>"
      response.write "<title>Enquetes</title>"
   response.write "</head>"
   response.write "<body>"
      response.write "<form name='cadastro' method='post' action='vota.asp'>"
      response.write "<table border='0' width='100%'>"
         response.write "<tr><a href='enquetes.asp'><b>[IR PARA ENQUETES]</b></a><BR><BR>"
            response.write "<B>PERGUNTA: </B> " & Ucase(Rs("titulo")) & "<br>"
            response.write "</tr>"
            response.write "<tr><td>Vote</td><td>Opcão</td><td>Votos</td><td>Estatisticas</td></tr>"
               response.write "<tr><td><input type='radio' name='opcao' value='1'></td><td>" & Rs("opcao1")  & "</td><td>" & Opcao1 & "</td><td><img src='barra.gif' width='" & (200*eop1) & "' height='11'>" & FormatPercent(eop1) & "</td></tr>"
               response.write "<tr><td><input type='radio' name='opcao' value='2'></td><td>" & Rs("opcao2")  & "</td><td>" & Opcao2 & "</td><td><img src='barra.gif' width='" & (200*eop2) & "' height='11'>" & FormatPercent(eop2) & "</td></tr>"
               response.write "<tr><td><input type='radio' name='opcao' value='3'></td><td>" & Rs("opcao3")  & "</td><td>" & Opcao3 & "</td><td><img src='barra.gif' width='" & (200*eop3) & "' height='11'>" & FormatPercent(eop3) & "</td></tr>"
               response.write "<tr><td><input type='radio' name='opcao' value='4'></td><td>" & "Outros"  & "</td><td>" & Opcao4 & "</td><td><img src='barra.gif' width='" & (200*eop4) & "' height='11'>" & FormatPercent(eop4) & "</td></tr>"
      response.write "</table>"
      Response.write "<input type='submit' value='Contar meu voto'>"
      Response.write "</form>"
   response.write "</body>"
response.write "</html>"
set rs=nothing
set rstotal=nothing
set rsop1=nothing
set rsop2=nothing
set rsop3=nothing
set rsop4=nothing
conexao.close : set conexao=nothing
%>

Link para o comentário
Compartilhar em outros sites

  • 0

Eu até poderia posta aqui um exemplo mas ele só iria funcionar se voce tiver instalado o componente.

O script é grandinho mas a unica coisa que voce tem que se preocupar é passar 1 valor ou um array que ele monta o grafico

Primeiro analisa qual o componente de grafico teu servidor web tem disponivel pra dai voce desenvolver, mas ainda tem a opcao de montar um grafico na mao

Link para o comentário
Compartilhar em outros sites

  • 0

Eu esqueci de um detalhe importante: Eu quero gerar o gráfico com informações extraidas de um Danco de Dados Access, se alguém souber como fazer isso me ajuda por favor, se tiver um jeito de fazer isso sem componente será ainda melhor, pode ser usando figuras mesmo, é um gráfico não muito complexo. Ficarei grato se me ajudarem.

Link para o comentário
Compartilhar em outros sites

  • 0

você diz aquelas barrinhas indicando a pct e votos...

pra fazer isso não é torrendo minha paciencia me reportando o tópico pra alguém te ajudar o negocio é relaxar e esperar.... odeio isso....

vou te dar um exemplinho...

nome )))))))))))))))))))))))))) 100%

nome ((((((((((((((((((( 70%

nome ((((((((((((((((((((( 80%

não se preoculpe se o que quer for diferente a ideia pode ser usada...

a imagen você pode fazer assim

'primeiro acahamos a porcentagem

porcentagem=total_de_votos/votos_neste_nome*100

'agora achamos o tamanho da barra

tamanho_total=400 'a barra com 100% tera 400 pixels

'achamos o tamanho para a pct

tamanho_barra=porcentagem*tamanho_total/100

' e criamos a barra

<img src="barra.gif" width="<%=tamanho_barra%>">

Link para o comentário
Compartilhar em outros sites

Participe da discussão

Você pode postar agora e se registrar depois. Se você já tem uma conta, acesse agora para postar com sua conta.

Visitante
Responder esta pergunta...

×   Você colou conteúdo com formatação.   Remover formatação

  Apenas 75 emoticons são permitidos.

×   Seu link foi incorporado automaticamente.   Exibir como um link em vez disso

×   Seu conteúdo anterior foi restaurado.   Limpar Editor

×   Você não pode colar imagens diretamente. Carregar ou inserir imagens do URL.



  • Estatísticas dos Fóruns

    • Tópicos
      152k
    • Posts
      651,7k
×
×
  • Criar Novo...