Notax

Pessoal to precisando resolver o seguinte problema... preciso que ao clicar em um CheckBox o já existente TextField se transforme em um ListMenu, com o mesmo nome e id do TextField... é possível? alguém pode me ajudar? []'s Notax

Uhm... ele digita esse e-mail no form que antecede o envio ou o e-mail está no BD?

hahaha... boa... foi mau! []'s Notax

OK... qual o erro e em qual linha? por via das duvidas posta tb esse conexao.asp tb... []'s Notax

Mas aí é que tá a coisa... olha só... esse site que tu indicou o cara publicou o swf nu e cru na net... tipo, podes fazer o seguinte teste: cria um palco 600X400, coloca uma foto inteira no fundo exporta esse filme como teste.swf e publica esse arquivo na net... assim mesmo... daí acessa www.teudominio.com.br/teste.swf e verás que a foto redimensiona proporcionalmente de acordo com o tamanho do navegador... salvo alguns limites... faça o teste, brinque com as larguras do browser e verá que dá certo... Só não sei se isso resolve sua dúvida! qualquer. coisa posta aí! []'s Notax

Depende... você usou o "GoTo and Play"??? Posta aí as actions do botão da cena 2 que faz voltar para a cena 1! []'s Notax

Posta aí o script! []'s Notax

você quer tipo um chat... um atendimento on-line no seu site... é isso? ou ta querendo disponibilizar o MSN para download??? não entendi muito bem... explica ae... []'s Notax

no flash é assim: on (release) { //Goto Webpage Behavior getURL("palestras.htm","frame"); //End Behavior } no asp você vai ter que usar um request.form = ("variavel_text_field") barbada assim... []'s Notax

Bah Micheus... valeu a força... Funcionou direitinho aqui... foi uma baita ajuda! bastou fazer isso tudo que você sugeriu com o InterBase ativo... fuincionu que foi uma beleza! Não posso deixar de agradecer tb a Tatiane.InterArt que me ajudou muito tb com algumas dúvidas que eu tinha de FireBird e me ajudou a me situar nesses BDS que eu não conhecia... Fica aqui meu muito obrigado a vocês.. []'s Notax

Pessoal, bom dia. Preciso abrir um banco de dados com extenção .GDB para exportalo para txt e não estou conseguindo... Tentei seguir uns tutos aqui da web mas ainda não rolou... eu já baixei e instalei o firebird 2.0 e InterBase... no Interbase no IBConsole está dando este erro: Podem me ajudar a configurar o firebird ou a usar o interbase... to tomando um laço aqui... a única coisa que eu preciso é exportar este .gdb para txt, excel ou access; onde será que está o meu erro? Alguém da essa força? []'s Notax

Bah véio... sem palavras... valeu a força! []'s Notax

Matou a pau! valeu véio! []'s Notax

valeu denovo... segue conforme solicitado: O arquivo já foi reanalisado: MD5: ccaa8f665716d213a6ac44ca3c044432 Data 2008.03.30 07:30:19 (CET) [>3D] Resultados 13/32 Permalink: analisis/183bfaeaaa09873651d68b8a858f67f9 []'s Notax

Pessoal, podem examinar este log abaixo? O motivo é porque o avast identificou um virus na memória ram e outro no computador... mandei os dois pra quarentena... mas será que não vou me incomodar no futuro? valeu a força. []'s Notrax

Opa Anderson, beleza? A idéia é a de não usar a paginação... apenas como último recurso! será que é possível alguma outra forma? EDITADO: Pessoal, tinha isso aqui em cima do meu código: Response.Expires = 0 daí eu dei uma pesquisada no google e tentei assim: Response.Buffer = false expantosamente funcionou!!! a questão é: alguém sabe me explicar o por que??? []'s Notax

Pessoal, boa noite... Então... na verdade ainda não consegui resolver este problema... Fiz uma gambiarra aqui para ajudar... mas resolver ainda não... Determinadas consultas que tenho apresentam erros por serem muito grandes, ou seja, muitos dados no bd a serem impressos em tela... Quando eu limito a qtde de dados a serem impressos funciona... mas isso não chega a ser uma solução, porque muitas vezes preciso da consulta completa mesmo... e nesse caso tranca ou até mesmo dá uma mensagem de erro, como essa abaixo: Response object error 'ASP 0251 : 80004005' Response Buffer Limit Exceeded /contas_resultado_consulta.asp, line 0 Execution of the ASP page caused the Response Buffer to exceed its configured limit. Já to tentando alguma coisa em nivel de servidor... mas será que não existe nenhuma forma de corrigir este problema através dos scripts? []'s Notax

Pessoal, bom dia... To fazendo um app para envio de newsletter... comecei então selecionando um que eu pudesse aproveitar algumas coisas aqui do forum mesmo e tratei de modificá-lo... a começar pelo componente, que era cdonts e eu preciso que seja em cdo.sys... Feito isso, já estou conseguindo enviar listas pequenas de e-mails sem problema algum, no entanto quero aprimorar este aplicativo um pouco mais, conforme os itens listados abaixo: 1) Como faço para limitar por exemplo o numero de e-mails a serem enviados por hora? Digamos por exemplo que eu queira disparar 240 e-mails por hora, mas a minha lista tem aproximadamente 15.000 e-mails... isso lebaria mais ou mens 62 hrs... ou 62 disparos... no entanto não quero fazer isso manualmente... quero carregar a lista toda e apartir dela que o app se encarregue de fazer os envios de pacotes conforme programado... Pra fazer isso eu teria que usar uma paginação? mas onde? no send.mail? 2) Como faço para gerar estatísticas dos envios destes e-mails? Por exemplo: quantos chegaram? quantos não chegaram e por qual motivo (cx cheia, e-mail inexistente)??? Quantos foram clicados e em qual link? o script que eu estou usando para fazer as modificações (é muito bom por sinal) inicialmente foi desenvolvido por Felipe Siola e segue abaixo: <!--#include file="restrito.asp"--> <!--#include file="cons.asp"--> <html> <head> <title>Administração da NewsLetter</title> <style> input {background-color: #D4D4D4; font-family: Verdana; font-size: 8pt; color: #000000;} textarea {background-color: #D4D4D4; font-family: Verdana; font-size: 8pt; color: #000000;} </style> </head> <body link="#000000" vlink="#000000" alink="#000000"> <font face="Verdana" size="2"> <% acao=Request.querystring("acao") select case acao case "enviar" %> <form action="admin.asp?acao=enviando" method="post"> <input type="hidden" name="data" value="<%=Date()%>"> <p align="center"> Assunto :<br> <input type="text" name="assunto" size="49"><br> Mensagem :<br> <textarea name="mensagem" cols="60" rows="15"></textarea><br> <input type="submit" value="Enviar"> </form><BR> Obs: Todos os e-mails são enviados em formato HTML<BR> Para quebra de linha utilize a tag "&lt;br&gt;" <hr size="1"> <% case "enviando" %> <% user = 0 assunto = Request.Form("assunto") mensagem = Request.form("mensagem") AbreConexao Sql = "SELECT email FROM dados" If Len(mensagem) Then Set rs = Server.CreateObject("ADODB.Recordset") rs.Open Sql, ConStr, 3, 3 While Not rs.EOF Set objCDOSYSMail = Server.CreateObject("CDO.Message") Set objCDOSYSCon = Server.CreateObject ("CDO.Configuration") objCDOSYSCon.Fields("http://schemas.microsoft.com/cdo/configuration/smtpauthenticate") = 1 objCDOSYSCon.Fields("http://schemas.microsoft.com/cdo/configuration/sendusername") = "mkt@sjfinance.com.br" objCDOSYSCon.Fields("http://schemas.microsoft.com/cdo/configuration/sendpassword") = "senha" objCDOSYSCon.Fields("http://schemas.microsoft.com/cdo/configuration/smtpconnectiontimeout") = 30 objCDOSYSCon.Fields.update Set objCDOSYSMail.Configuration = objCDOSYSCon objCDOSYSMail.From = email objCDOSYSMail.To = rs("email") objCDOSYSMail.Subject = assunto objCDOSYSMail.HtmlBody = mensagem 'objCDOSYSMail.fields.update On Error Resume Next objCDOSYSMail.Send Set objCDOSYSMail = Nothing Set objCDOSYSCon = Nothing Response.Write "Email enviado para : " & rs("email") & "<br>" user = user + 1 rs.MoveNext Wend Response.Write "No total foram enviados " & user & " emails." rs.Close Set rs = Nothing Sql = "INSERT INTO enviados (assunto,mensagem,data) " Sql = Sql & "VALUES('" & Request.Form("assunto") & "','" & mensagem & "','" & Request.Form("data") & "')" Conexao.Execute(Sql) Else Response.Redirect "admin.asp?acao=erro" End If FechaConexao %> <% case "modificar" %> <% AbreConexao Sql = "SELECT * From dados" Set rs = Conexao.Execute(Sql) while not rs.EOF%> <table border="0" cellpadding="0" cellspacing="0"> <tr> <td><input type="text" value="<%=rs("email")%>" name="email" size="30"></td> <td><form method="POST" action="admin.asp?acao=alterar&id=<%=rs("id")%>"> <input type="submit" value="Alterar"></form></td> <td><form method="POST" action="admin.asp?acao=deletar&id=<%=rs("id")%>"> <input type="submit" value="Apagar"></form></td> </tr> </table> <hr size="1"> <% rs.MoveNext wend FechaConexao %> Grato pela atenção. []'s Notax. p.s. caso possam dar uma olhadinha no link abaixo... ainda to com problemas por lá... :blush: http://scriptbrasil.com.br/forum/index.php?showtopic=116293

Então... Voltando ao problema... Debuguei conforme a Andreia sugeriu... campo por campo... continua travando a consulta no mesmo lugar, independente do campo consultado. O mais engraçado é que no IE ela tranca sempre um pouco antes (por exemplo na posição 50) já no FF ela vai um pouquinho mais (por exemplo posição 60)... Não sei o que pode estar errado, me parece que o que está acontecendo é que a consulta não deva estar acontecendo por algum problema na formação das tabelas, sei lá, derepente estão "pesadas" demais... Será que rola mais uma força? []'s Notax

beleza... vou tentar aqui! posto o resultado dos testes na sequencia... Brigadão Andréia! []'s Notax

Bah minha amiga... O retorno do resultado no bd é instantaneo! Não demora nada... Tive olhando aqui... e o que eu achei esquisito é que tenho consultas até maiores do que esta e que não dão problema nenhum... acho que realmente deve ter alguma coisa no meu código com problema... algum erro que eu não esteja vendo... o difícil é que não ta dando erro nenhum! Rola mais alguma dica? []'s Notax

Oi Andreia, brigadão pela ajuda... demorei pra responder por que estava fazendo vários outros testes... mas ainda não consegui resolver esse problema! Eu to usando o * porque realmente preciso imprimir na tela todos os campos do BD. Eu vi ali que na verdade eu tinha 4 selects, sendo que eram dois em cada sub... e as subs são executadas individualmente... De qualquer forma eu só estava executando de fato dois selects... portanto eliminei os outros dois, mas mesmo assim não resolveu o problema... Lembrando que estes dois selects que eu deixei são executados individualmente... um em cada sub. Continua o mesmo problema... chega em um momento único da consulta que trava e nada mais acontece... ficando a consulta incompleta sem apresentar nenhum tipo de erro! Na verdade a consulta nem é TÃO grande assim, são 100 linhas com 21 colunas... Alguma outra dica? valeu a força. []'s Notax

Pessoal, bom dia. Seguinte: tenho uma consulta que tá dando pau... Não mostra mensagem de erro nenhum, mas quando chega a um determinado ponto ela trava... para de mostrar resultados... Eu não quero usar paginação nessa consulta... alguém tem alguma pista do que poderia estar acontecendo? segue script: <% Option Explicit Response.Expires = 0 Dim objConn, objRs, strQuery, ComandoSQL, Conexao, ddi, mmi, aai, datai, ddf, mmf, aaf, dataf, txtNome, chcNome Dim strConnection chcNome = request.form ("chcNome") if chcNome = "ON" then call comnome else call semnome end if Sub semnome() ddi = request.form ("txtddi") mmi = request.form ("txtmmi") aai = request.form ("txtaai") datai = (ddi &"/"& mmi &"/"& aai) datai = Cdate(day (datai) &"/"& month (datai) &"/"& year (datai)) ddf = request.form ("txtddf") mmf = request.form ("txtmmf") aaf = request.form ("txtaaf") dataf = (ddf &"/"& mmf &"/"& aaf) dataf = Cdate(day (dataf) &"/"& month (dataf) &"/"& year (dataf)) Session.LCID=1033 ComandoSQL = "select * from clientes where DATA BETWEEN #" & (datai) & "# and #" & (dataf) & "# ORDER BY DATA ASC" Set objConn = Server.CreateObject("ADODB.Connection") objConn.Open "DBQ=" & Server.MapPath("bd.mdb") & ";Driver={Microsoft Access Driver (*.mdb)}","username","password" strQuery = "SELECT * FROM clientes WHERE DATA" Session.LCID=1046 Set ObjRs = objConn.Execute(ComandoSQL) end sub Sub comnome() ddi = request.form ("txtddi") mmi = request.form ("txtmmi") aai = request.form ("txtaai") datai = (ddi &"/"& mmi &"/"& aai) datai = Cdate(day (datai) &"/"& month (datai) &"/"& year (datai)) ddf = request.form ("txtddf") mmf = request.form ("txtmmf") aaf = request.form ("txtaaf") dataf = (ddf &"/"& mmf &"/"& aaf) dataf = Cdate(day (dataf) &"/"& month (dataf) &"/"& year (dataf)) txtNome = request.form ("txtNome") Session.LCID=1033 ComandoSQL = "select * from clientes where nome = '" & txtNome & "' and DATA BETWEEN #" & (datai) & "# and #" & (dataf) & "# ORDER BY DATA ASC" Set objConn = Server.CreateObject("ADODB.Connection") objConn.Open "DBQ=" & Server.MapPath("bd.mdb") & ";Driver={Microsoft Access Driver (*.mdb)}","username","password" strQuery = "SELECT * FROM clientes WHERE NOME" Session.LCID=1046 Set ObjRs = objConn.Execute(ComandoSQL) end sub %> <html> <head> <title></title> </head> <body bgcolor="#FFFFFF"> <div align="center" style="width: 756; height: 119"> <p align="left"><font face="Verdana, Arial, Helvetica, sans-serif"><em><strong>Cadastro Clientes (consulta)</strong></em></font><font size="1"><b><font face="Verdana, Arial, Helvetica, sans-serif" color="#000000"> </font></b></font></p> <div align="left"> <table width="650" border="0" cellspacing="0" cellpadding="0" height="1"> <tr> <td width="650" valign="top" height="136"> <table border="0" cellpadding="0" cellspacing="0" width="650"> <tr bgcolor="ffffff"> <td width="650" colspan="3"> <table width="100%" border="0" cellspacing="2" cellpadding="2"> </table> </td> </tr> <tr> <td colspan="3"> <form method="GET" action="action_excluir_clientes.asp"> <%While Not objRS.EOF %> <p>&nbsp;</p><table width="650" border="0" cellspacing="0" cellpadding="0" height="1"> <tr> <td height="1" align="center" width="650"> <table border="0" width="650" height="107" cellpadding="2"> <tr bgcolor="#0099FF"> <td width="266" height="1" align="center"> <font size="1" color="FFFFFF"><b><font face="Verdana">NOME / RAZ&Atilde;O SOCIAL</font></b></font></td> <td width="211" height="1" align="center"> <font size="1" color="FFFFFF"><b></b> </font> <font size="1" color="FFFFFF"><b><font face="Verdana"> RG / IE</font></b> </font></td> <td width="222" height="1" align="center"> <font size="1" color="FFFFFF"><b><font face="Verdana">CPF / CNPJ</font></b></font></td> <td width="158" height="1" align="center"><font size="1" color="FFFFFF"><b><font face="Verdana">DATA COME&Ccedil;O</font></b></font></td> </tr> <tr bgcolor="#FFFFFF"> <td width="266" height="1" align="center" style="border-style: solid; border-width: 2"> <div align="left"><font size="-7" face="Arial, Helvetica, sans-serif"><b><font color="#000000"> <%Response.write objRS("nome")%> </font> </b></font></div></td> <td height="1" align="center" style="border-style: solid; border-width: 2"> <div align="left"> <font size="-7" face="Arial, Helvetica, sans-serif"><b> <%Response.write objRS("rg")%> </b></font></div></td> <td width="222" height="1" align="center" style="border-style: solid; border-width: 2"> <div align="left"><font size="-7" face="Arial, Helvetica, sans-serif"><b> <%Response.write objRS("cpf")%></a> </b></font></div></td> <td width="158" height="1" align="center" style="border-style: solid; border-width: 2"> <div align="left"><font size="-7" face="Arial, Helvetica, sans-serif"><b><font color="#000000"> <%Response.write objRS("data")%> </font></b></font></div></td> </tr> <tr bgcolor="#0099FF"> <td height="1" align="center"> <font size="1" color="FFFFFF"><b><font face="Verdana">ENDERE&Ccedil;O</font></b></font></td> <td height="1" align="center"> <font size="1" color="FFFFFF"><b></b> </font> <font size="1" color="FFFFFF"><b><font face="Verdana">BAIRRO</font></b> </font></td> <td height="1" align="center"> <font size="1" color="FFFFFF"><b><font face="Verdana">CIDADE</font></b></font></td> <td height="1" align="center"><font size="1" color="FFFFFF"><b><font face="Verdana">CEP</font></b> </font></td> </tr> <tr bgcolor="#FFFFFF"> <td height="1" align="center" style="border-style: solid; border-width: 2"><div align="left"><font size="-7" face="Arial, Helvetica, sans-serif"><b><font color="#000000"> <%Response.write objRS("endereco")%> </font></b></font></div></td> <td height="1" align="center" style="border-style: solid; border-width: 2"><div align="left"><font size="-7" face="Arial, Helvetica, sans-serif"><b><font color="#000000"> <%Response.write objRS("bairro")%> </font></b></font></div></td> <td height="1" align="center" style="border-style: solid; border-width: 2"><div align="left"><font size="-7" face="Arial, Helvetica, sans-serif"><b><font color="#000000"> <%Response.write objRS("cidade")%> </font></b></font></div></td> <td height="1" align="center" style="border-style: solid; border-width: 2"><div align="left"><font size="-7" face="Arial, Helvetica, sans-serif"><b><font color="#000000"> <%Response.write objRS("cep")%> </font></b></font></div></td> </tr> <tr bgcolor="#0099FF"> <td height="1" align="center"> <font size="1" color="FFFFFF"><b><font face="Verdana">TELEFONE</font></b></font></td> <td height="1" align="center"> <font size="1" color="FFFFFF"><b></b> </font> <font size="1" color="FFFFFF"><b><font face="Verdana">CELULAR</font></b> </font></td> <td height="1" align="center"> <font color="FFFFFF" size="1" face="Verdana"><b>TIPO</b></font></td> <td height="1" align="center"> <font size="1" color="FFFFFF"><b></b> </font> <font size="1" color="FFFFFF"><b><font face="Verdana">N&ordm; Associados</font></b> </font></td> </tr> <tr bgcolor="#FFFFFF"> <td height="1" align="center" style="border-style: solid; border-width: 2"><div align="left"><font size="-7" face="Arial, Helvetica, sans-serif"><b><b><font color="#000000"> <%Response.write objRS("telefone")%> </font></b></b></font></div></td> <td height="1" align="center" style="border-style: solid; border-width: 2"><div align="left"><font size="-7" face="Arial, Helvetica, sans-serif"><b><font color="#000000"> <%Response.write objRS("celular")%> </font></b></font></div></td> <td height="1" align="center" style="border-style: solid; border-width: 2"><div align="left"><font size="-7" face="Arial, Helvetica, sans-serif"><b><b><font color="#000000"> <%Response.write objRS("tipo")%> </font></b></b></font></div></td> <td height="1" align="center" style="border-style: solid; border-width: 2"><div align="left"><font size="-7" face="Arial, Helvetica, sans-serif"><b><font color="#000000"> <%Response.write objRS("n_assoc")%> </font></b></font></div></td> </tr> <tr bgcolor="#0099FF"> <td height="16" colspan="2" align="center"> <font size="1" color="FFFFFF"><b></b> </font> <font color="FFFFFF" size="1" face="Verdana"><b>Representante 1 </b></font><font size="1" color="FFFFFF"><b></b></font></td> <td height="16" align="center"><font color="FFFFFF" size="1" face="Verdana"><b>Fone Representante 1</b></font></td> <td height="16" align="center"><font size="1" color="FFFFFF"><b><font face="Verdana">E-mail Representante 1</font></b></font></td> </tr> <tr bgcolor="#FFFFFF"> <td height="1" colspan="2" align="center" style="border-style: solid; border-width: 2"><div align="center"><font size="-7" face="Arial, Helvetica, sans-serif"><b><font color="#000000"> </font></b></font></div> <div align="left"></div> <div align="left"><font size="-7" face="Arial, Helvetica, sans-serif"><b><font color="#000000"> <%Response.write objRS("repres1")%> </font></b></font></div></td> <td height="1" align="center" style="border-style: solid; border-width: 2"><font size="-7" face="Arial, Helvetica, sans-serif"><b><font size="-7" face="Arial, Helvetica, sans-serif"><b><font color="#000000"> <%Response.write objRS("fonecontato1")%> </font></b></font></b></font></td> <td height="1" align="center" style="border-style: solid; border-width: 2"><font size="-7" face="Arial, Helvetica, sans-serif"><b><font color="#000000"> <%Response.write objRS("email1")%> </font></b></font></td> </tr> <tr bgcolor="#0099FF"> <td height="16" colspan="2" align="center"> <font size="1" color="FFFFFF"><b></b> </font> <font color="FFFFFF" size="1" face="Verdana"><b>Representante 2 </b></font></td> <td height="16" align="center"><font color="FFFFFF" size="1" face="Verdana"><b>Fone Representante 2</b></font></td> <td height="16" align="center"><font size="1" color="FFFFFF"><b><font face="Verdana">E-mail Representante 2</font></b></font></td> </tr> <tr bgcolor="#FFFFFF"> <td height="1" colspan="2" align="center" style="border-style: solid; border-width: 2"><div align="center"><font size="-7" face="Arial, Helvetica, sans-serif"><b><font color="#000000"> </font></b></font></div> <div align="left"></div> <div align="left"><font size="-7" face="Arial, Helvetica, sans-serif"><b><font color="#000000"> <%Response.write objRS("repres2")%> </font></b></font></div></td> <td height="1" align="center" style="border-style: solid; border-width: 2"><font size="-7" face="Arial, Helvetica, sans-serif"><b><font size="-7" face="Arial, Helvetica, sans-serif"><b><font color="#000000"> <%Response.write objRS("fonecontato2")%> </font></b></font></b></font></td> <td height="1" align="center" style="border-style: solid; border-width: 2"><font size="-7" face="Arial, Helvetica, sans-serif"><b><font color="#000000"> <%Response.write objRS("email2")%> </font></b></font></td> </tr> <tr bgcolor="#0099FF"> <td height="16" colspan="2" align="center"> <font size="1" color="FFFFFF"><b></b> </font> <font color="FFFFFF" size="1" face="Verdana"><b>Representante 1 </b></font><font size="1" color="FFFFFF"><b></b></font></td> <td height="16" align="center"><font color="FFFFFF" size="1" face="Verdana"><b>Fone Representante 1</b></font></td> <td height="16" align="center"><font size="1" color="FFFFFF"><b><font face="Verdana">E-mail Representante 3</font></b></font></td> </tr> <tr bgcolor="#FFFFFF"> <td height="1" colspan="2" align="center" style="border-style: solid; border-width: 2"><div align="center"><font size="-7" face="Arial, Helvetica, sans-serif"><b><font color="#000000"> </font></b></font></div> <div align="left"></div> <div align="left"><font size="-7" face="Arial, Helvetica, sans-serif"><b><font color="#000000"> <%Response.write objRS("repres3")%> </font></b></font></div></td> <td height="1" align="center" style="border-style: solid; border-width: 2"><font size="-7" face="Arial, Helvetica, sans-serif"><b><font size="-7" face="Arial, Helvetica, sans-serif"><b><font color="#000000"> <%Response.write objRS("fonecontato3")%> </font></b></font></b></font></td> <td height="1" align="center" style="border-style: solid; border-width: 2"><font size="-7" face="Arial, Helvetica, sans-serif"><b><font color="#000000"> <%Response.write objRS("email3")%> </font></b></font></td> </tr> <tr bgcolor="#0099FF"> <td height="16" colspan="2" align="center"> <font color="FFFFFF" size="1" face="Verdana"><b>Valor da Mensalidade</b></font></td> <td height="16" align="center"><font color="FFFFFF" size="1" face="Verdana">&nbsp;</font></td> <td height="16" align="center"><font size="1" color="FFFFFF"><b></b></font></td> </tr> <tr bgcolor="#FFFFFF"> <td height="1" colspan="2" align="center" style="border-style: solid; border-width: 2"><font size="-7" face="Arial, Helvetica, sans-serif"><b><font size="-7" face="Arial, Helvetica, sans-serif"><b><font color="#000000"> </font><font size="1"><b><font color="#000000" size="-7" face="Arial, Helvetica, sans-serif"> <%Response.write formatnumber(objRS("valor"),2)%> </font></b></font><font color="#000000"> </font></b></font></b></font></td> <td height="1" align="center" style="border-style: solid; border-width: 2">&nbsp;</td> <td height="1" align="center" style="border-style: solid; border-width: 2">&nbsp;</td> </tr> <tr bgcolor="#FF9900"> <td height="1" colspan="4" align="center" style="border-style: solid; border-width: 2">&nbsp;</td> </tr> <% 'Movendo para o proximo registro objRS.MoveNext Wend %> </table> </td> </tr> </table> </form> </td> </tr> </table> </td> </tr> </table> </div> <% objRs.close objConn.close Set objRs = Nothing Set objConn = Nothing %> </div> </body> </html> []'s Notax