Gráfico

[Guest Duffy]

Fiz esse calculo para definir o tamanho da barra do gráfico,

a conexão e o recordset estão certos,mas está apontando erro de tipos incompativeis no calculo

set rsvotos = server.CreateObject("adodb.recordset")

rsvotos.Open "select sum(votos) as votos from enquete",conn,3

set rs = server.CreateObject("adodb.recordset")

rs.Open "select votos from enquete",conn,3,3

total = rsvotos("votos")

voto = rs("votos")

Ah o banco de dados é sql server

o calculo é esse de vermelho

<td style="font-family: verdana; font-size: 10px"><img src="imagem.gif" width="<%= cint(voto*total/100)%>" height="15"> %</td>

[ursolouco]

cint(voto*total/100)%>"

Altere para :

 width="<%= voto*total/100%>" 

Pois a divisão pode não retornar numeros inteiros

[Guest Duffy]

Cara valeu pela ajuda , mas continua com o mesmo erro

você tem mais alguma sugestão???

Se tiver eu agradeço, e mesmo se não tiver tb agradeço!!!

[Guest Guest]

Ah só uma coisa começou dar esse erro depois q eu mudei de banco de dados , quando era com o access rolava normal , depois de mudar para SQL Server ai parou de funcionar

[ursolouco]

Cara valeu pela ajuda , mas continua com o mesmo erro

você tem mais alguma sugestão???

Se tiver eu agradeço, e mesmo se não tiver tb agradeço!!!

Não sei Brother, mas desconfio que seu recordset não esta retornando nada, pois ele aponta para uma variavel que recebe a soma de toda coluna da tabela

[Guest Guest]

O recordset está retornando o valor certo porque eu testei dando um response.write , ele trás a soma certa da coluna.

[ursolouco]

O recordset está retornando o valor certo porque eu testei dando um response.write , ele trás a soma certa da coluna.

Eu hein, esses dias estão me aparecendo cada coisa...

width="<%Response.Write((voto * total) / 100)%>"

Faz um teste ai manoooooooo e põe a mensagem de erro pra gente ver...

[Guest Guest]

Dá o mesmo erro tipos incompativeis

Tipo de erro:

Erro de tempo de execução do Microsoft VBScript (0x800A000D)

Tipos incompatíveis

/grafico.asp, line 33

Ah com valores fixos em vez de valores do banco de dados ele faz a conta normal

[ursolouco]

Editei o POST, andei falando besteira....

<%

	Session.Lcid = 1046

	valor1 = "1,25"
	valor2 = "32,896"

	valor1 = FormatNumber(valor1)
	valor2 = FormatNumber(valor2)


'Multiplicando

	Multiplicado = (valor1 * valor2)

	Response.Write("O valor multiplicado é: " & Multiplicado & "<br>")

'Multiplicado = 41,125


'Dividindo o cabra

	Dividido = Multiplicado / 100

	Response.Write("O valor dividido é: " & Dividido)

'Dividido = 0,41112


%>

Procure ultilizar 'FormatNumber' nas variaveis para multiplicação e depois divida o retorno para obter o valor corretamente...

Abraços!!

Editado Maio 19, 2004 por ursolouco

[Decio]

você já tentou assim?:

total = Cint(rsvotos("votos"))

voto = Cint(rs("votos"))

<td style="font-family: verdana; font-size: 10px"><img src="imagem.gif" width="<%= voto*total/100%>" height="15"> %</td>

[ursolouco]

você já tentou assim?:

total = Cint(rsvotos("votos"))

voto = Cint(rs("votos"))

<td style="font-family: verdana; font-size: 10px"><img src="imagem.gif" width="<%= voto*total/100%>" height="15"> %</td>

Tipo Brother!!

Isso, seria para valores Inteiros (CINT()), agora, vamos dizer que a divisão não dê exata... erro no sistema ?

Não pode né ?

Este exemplo acima ele multiplica e divide legalzinho, só vamos ver como ele vai aplicar no sistema...

[Guest Guest]

Cara eu converti o campo pra inteiro no select e deu certo..

Falow , valeu!!!

[Decio]

Urso:

você já tentou assim?:

total = Cint(rsvotos("votos"))

voto = Cint(rs("votos"))

<td style="font-family: verdana; font-size: 10px"><img src="imagem.gif" width="<%= voto*total/100%>" height="15"> %</td>

Total e Voto sempre serão inteiros.O resultado da divisão é que não será.

Abraços

E ai , ficou uns tempos sumido...