Thiago Airold Perez

Boa tarde amigo, Percebi algo que me parece um erro tente mudar abaixo de diferente para igual onde está negrito! SELECT DISTINCT tbClientes.codigo, tbClientes.nome, tbEspecialidades.especialidade FROM tbClientes INNER JOIN tbEspecialidades on tbClientes.especialidade = tbEspecialidades.codigo INNER JOIN tbPedidos on tbPedidos.cliente = tbClientes.cliente e o resto da query continua normal Se não der posta ai! Espero ter ajudado

Boa tarde, caso for usar em varios numeros diferentes que veem de variavel pode usar esta função function limpanumero(num) num = replace(num,",","") num = replace(num,".","") limpanumero = num end function numero = "6500,87" numero = limpanumero(numero)

Ola Boa tarde, tente fazer desta forma set rsgd = con.execute("select count(codigo) as totd from ligacoes") totd = rsgd("totd") Dim arrCategorias(), arrVal() set rsg1 = con.execute("SELECT duvida, Count(codigo) AS COC FROM Ligacoes GROUP BY duvida ORDER BY duvida") y = 0 do while not rsg1.eof 'aqui você vai montar uma variavem com todos os dados separados por virgula var_val = var_val & (rsg1("COC") * 100) / totd & "," var_categ = var_categ & rsg1("duvida") & "," rsg1.movenext loop 'abaixo separamos para que você possa usar o array var_val = Split(var_val, ",", -1, 1) var_categ = Split(var_categ, ",", -1, 1) 'agora já pode usar como queria 'var_val(0) exibe o primeiro valor - var_val(1) exibe o segundo e assim por diante Espero ter ajudado!!