Carlos Julio

Eu não consegui fazer do jeito que eu queria, com o XML virtual... Mas funcionou beleza do jeito que eu fiz... então, apesar de ninguém ter respondido minhas duvidas aqui, eu consegui resolver todos os problemas... Obrigado a todos, mesmo sem ninguém me ajudar!!! hahah Feliz ano novo!

Agora q vi que voce não quer usar While not... não sei porque, mas tudo bem... ema ema... :P Bom, então "contatene" os resultados, formando um array: <% Dim MeuArray MenuArray = " " while not rs.EOF '(isto voce vai ter q fazer, para correr todo o RS!!!) MenuArray = MeuArray & "," & rs("campo") rs.movenext wend 'depois, para mostrar For Each item In MeuArray Response.Write(item & "<br />") Next %> Acho que voce esta complicando as coisas, mas beleza....

Posta o codigo pra gente... vamos aprender juntos... Abracos.

Vagner... use SELECT CASE <% Select Case resultado_total Case TE response.write("Transferido") Case RP response.write("Remanejado") Case DE response.write("Desistente") Case EV response.write("Evadido") End Select %> sera que é isto q eu entendi?

Felipe... Erro no conceito... A programacao esta ocorrendo direito... mas pense: Para colocar o leite na geladeira eu preciso: ter o leite na mao, abrir a gelareida, colocar o leite onde é devido, fechar a geladeira. Certo? então, faca isto com seu codigo... O loop precisa existir (while not rs.EOF.....rs.movenext ..... wend), e toda aquela setagem de variaveis, precisa setar, "imprimir na tela" (response.write(blablabla)) e rodar novamente... então, refaca o seu codigo, por que pelo que percebi, voce esta mostrando apenas o ultimo jogo, e não todos como queria... certo? Abracos, boa sorte.

Vagner... Diario, diario2 e Diario3 são tabelas? Eu faria assim: Uma tabela chamada "Boletim"... Com as colunas ID Codigo Aluno ... Faltas Trimestre (do mesmo jeito q você fez). então, voce faz o seu primeiro SELECT normalmente, e depois voce faz um SELECT SUM(Coluna1 + coluna2 + coluna3) as somaXPTO FROM Boletim..... E na hora do resultado deste novo RecordSet, voce vai chama-lo como rs("somaXPTO"), como se fosse um campo do seu banco de dados. Boa sorte.

Eu to refazendo o texto inteiro, por que agora já resolvi um monte de problemas, mas tem um que da SODA de resolver.... Eu quero pegar uma tabela do banco de dados e transformar em um XML. Pegar um XSL, transformar isto em HTML e fazer o output. A intenção inicial era pegar e fazer o XML "virtual", sem ter que ter ele "fisicamente" no HD. Mas descobri que isto não é possivel, então o que estou fazendo agora é gravar ele em um diretorio, e depois de parseado e colocado o HTML eu deleto o arquivo XML. Bom, eu resolvi um monte de problemas, mas agora acontece que o XSL não esta sendo encontrado.... O erro é: Error loading XSL Document : ---------------------------- Error code: -2146697210 Error reason: Erro de sistema: -2146697210. Error line: 0 O codigo que da este erro é: nome_xsl_virtual = "XSL/" 'Para parsear com os XMLs nome_xsl_completo = nome_xsl_virtual & "teste.xsl" set oXSL = Server.CreateObject("Microsoft.XMLDOM") oXSL.Async = False oXSL.Load(Server.MapPath(nome_xsl_completo)) if oXSL.parseerror.errorcode <> 0 then Response.Write "Error loading XSL Document :" & "<BR>" Response.Write "----------------------------" & "<BR>" response.write "Error code: " & oXSL.parseError.errorCode response.write "<br />Error reason: " & oXSL.parseError.reason response.write "<br />Error line: " & oXSL.parseError.line Response.End End If vendo os caminhos com "PhisicalPAth", todos estao corretos. não sei o que pode ser. Mas para procurar alguma solucao, peguei um dos XMLs que eu gero, o XSL que usado, e joguei num diretorio com o ASP que faz o "parseamento". FUNCIONOU!? COMO ASSIM? porque num lugar funciona e noutro não? Alguma luz? Obrigado.