myselCoz= "select top 5 nomeLoc from Local inner join Categoria on Local.catLoc = Categoria.nomeCat where catLoc="&request("nomeCat")&" group by ntComida Having Max(ntComida)"
faltou um & antes do group by
- Fórum WMO
- → Viewing Profile: Posts: vinicius.mendes
Community Stats
- Group Usuários
- Active Posts 85
- Profile Views 1416
- Member Title Normal
- Age 40 years old
- Birthday January 17, 1984
-
Sexo
Não informado
-
Localidade
são josé do rio preto
Contact Information
- Windows Live v_tonuzzo@hotmail.com
0
Neutral
User Tools
Friends
vinicius.mendes hasn't added any friends yet.
Latest Visitors
Posts I've Made
In Topic: [Resolvido] Select Com Top5, Inner Join, Having E Max
17/03/2008, 15:29
In Topic: Calculo De Data
06/03/2008, 11:43
vc pode usar a função datediff()
funciona assim:
[codebox]
Função: DateDiff ( )
devolve um numero de intervalo entre duas datas.
DiffADate = "A partir de hoje : " & DateDiff("d", Now, "10-12-2002")
As diferenças possiveis a fazer estão restritas pelas seguintes hipóteses :
yyyy -> Ano
q -> Quarto
m -> Mês
y -> Dia do Ano
d -> Dia
w -> Dia da semana
ww -> Semana do ano
h -> Hora
n -> Minuto
s -> Segundo
[/codebox]
retirado do site
http://www.supertraf...traqueado</sup>
abraços
funciona assim:
[codebox]
Função: DateDiff ( )
devolve um numero de intervalo entre duas datas.
DiffADate = "A partir de hoje : " & DateDiff("d", Now, "10-12-2002")
As diferenças possiveis a fazer estão restritas pelas seguintes hipóteses :
yyyy -> Ano
q -> Quarto
m -> Mês
y -> Dia do Ano
d -> Dia
w -> Dia da semana
ww -> Semana do ano
h -> Hora
n -> Minuto
s -> Segundo
[/codebox]
retirado do site
http://www.supertraf...traqueado</sup>
abraços
In Topic: Select Para Gerar Um Grafico
05/03/2008, 15:56
resolvi o problema.
vou colocar o código para eventuais duvidas e ajudar a quem precisar.
[codebox]
Set rs = Server.CreateObject("ADODB.RecordSet")
rs.open "SELECT status, count(*) as total from candidatos where status in (a,b,c) group by status order by total asc", conn
'Instância o Objeto ChartDirectorSet
set cd = CreateObject("ChartDirector.API")
'------------------------------------------
if not rs.EOF then
do while not rs.EOF
data = data&","&rs("total")
labels = labels &","& rs("status")
rs.MoveNext
loop
end if
'Split Devolve um array com um numero especificado de substrings.
'a função right(data,len(data)-1) server para pegar tudo da var Data a partir do lado direito ignorando o 1 caracter
'pq o 1 caracter é uma ',' e só atrapalha.
Arraydata = Split(right(data,len(data)-1), ",",-1,1)
Arraylabels = Split(right(labels,len(labels)-1), ",",-1,1)
'Informa os dados para o gráfico
data = Array(Arraydata(0),Arraydata(1),Arraydata(2))
'Informa os rótulos do gráfico
labels = Array(Arraylabels(0),Arraylabels(1),Arraylabels(2))
[/codebox]
agora sempre q eu pedir a exibição do gráfico ele utiliza os dados do MySQL e atualiza meu gráfico, sem eu precisar atualizar ele na unha toda vez q queria ver o gráfico atualizado.
espero q isso ajude mais alguém...
abraços.
vou colocar o código para eventuais duvidas e ajudar a quem precisar.
[codebox]
Set rs = Server.CreateObject("ADODB.RecordSet")
rs.open "SELECT status, count(*) as total from candidatos where status in (a,b,c) group by status order by total asc", conn
'Instância o Objeto ChartDirectorSet
set cd = CreateObject("ChartDirector.API")
'------------------------------------------
if not rs.EOF then
do while not rs.EOF
data = data&","&rs("total")
labels = labels &","& rs("status")
rs.MoveNext
loop
end if
'Split Devolve um array com um numero especificado de substrings.
'a função right(data,len(data)-1) server para pegar tudo da var Data a partir do lado direito ignorando o 1 caracter
'pq o 1 caracter é uma ',' e só atrapalha.
Arraydata = Split(right(data,len(data)-1), ",",-1,1)
Arraylabels = Split(right(labels,len(labels)-1), ",",-1,1)
'Informa os dados para o gráfico
data = Array(Arraydata(0),Arraydata(1),Arraydata(2))
'Informa os rótulos do gráfico
labels = Array(Arraylabels(0),Arraylabels(1),Arraylabels(2))
[/codebox]
agora sempre q eu pedir a exibição do gráfico ele utiliza os dados do MySQL e atualiza meu gráfico, sem eu precisar atualizar ele na unha toda vez q queria ver o gráfico atualizado.
espero q isso ajude mais alguém...
abraços.
In Topic: Select Para Gerar Um Grafico
28/02/2008, 14:03
eu tirei o chr(9) e continuou dando erro, ainda não consegui descobrir o q esta travando =//
In Topic: Select Para Gerar Um Grafico
19/02/2008, 09:53
valeu pela resposta Diego.
agora gerou um erro.
ChartDirector error '800a8000'
Error converting argument 1 to type class DoubleArray
line 86
linha 86 --> Call c.setData(data, labels)
é a linha onde pega os valores montados no array =//
agora gerou um erro.
ChartDirector error '800a8000'
Error converting argument 1 to type class DoubleArray
line 86
linha 86 --> Call c.setData(data, labels)
é a linha onde pega os valores montados no array =//
- Fórum WMO
- → Viewing Profile: Posts: vinicius.mendes
- Privacy Policy
- Regras ·