LucasForever

Obrigado Andrea... :lol: :lol:

Obrigado pela resposta, mas é que to aprendendo muito ainda, e na programação que estou fazendo já tem session, posso utilizar mais de uma seção?? e como eu faria para este caso que exemplifiquei? diz ai por favor! obrigado e fico no aguardo.

Boa tarde galera...ainda to com problemas no meu e-comerce... agora é o seguinte: quero mandar os dados de uma página para outra sem usar um form e tipo, tenho um campo de e-mail e quero que os dados deste campo de email quando preenchidos sejam enviados e apareçao em outra página quando eu a carregar, ou em quantas páginas eu quizer... ou seja, sempre que eu carregar a mesma página ou outra, que ele esteja sempre lá, entenderão?? me ajudem ai por favor? no aguardo, obrigado.

eu coloquei deu isto: Erro de tempo de execução do Microsoft VBScript erro '800a01f4' Variável não definida: 'Val' epois defini a variavel Val ai deu este erro: Erro de tempo de execução do Microsoft VBScript erro '800a000d' Tipos incompatíveis no aguardo...

e eu já tentei usar este Cdbl() que você falou, mas deu erro... não sei porque. ou usei no lugar errado. os dados do correios vem vem com ponto, tipo : 10.5 10 9.5 5.5 20 ai depois vai para o codigo faz a soma que é este: ------------------------------------- <% For loop1 = LBound(session("car_prod_id")) to UBound(session("car_prod_id")) arrTemp = Split(Session("car_prod_id")(loop1),"&") car_iten_prod = arrTemp(1) set car_prod_atual = lojaDB.Execute("SELECT * FROM produtos WHERE id="& car_iten_prod &" AND disp='S'") car_prod_nome = car_prod_atual("nome") car_prod_preco = car_prod_atual("preço") car_prod_imagem = car_prod_atual("imagem") arrTemp = Split(Session("car_prod_id")(loop1),"&") car_iten_id = arrTemp(0) car_iten_quant = arrTemp(2) car_subtotal = car_iten_quant * car_prod_preco car_total = car_total + car_subtotal car_totalv = car_total + car_frete %> ------------------------------------------------- dai tem 2 valores para aparecer: o frete e o total, que seriam: -------------------------------------------------- 'valor do frete <%=FormatNumber(car_frete,2,-1,0,-1)%> 'total em R$ dos pedidos no carrinho <%=FormatNumber(car_totalv,2,-1,0,-1)%> eu acho que ou se coloca uma função la no script que vem do correio, tipo no: Car_frete = Request.QueryString("Tarifa") ou em algum trecho que faz a soma dos valores, onde o valor do frete vai aparecer, tipo: -------------------------------------------------- <% For loop1 = LBound(session("car_prod_id")) to UBound(session("car_prod_id")) arrTemp = Split(Session("car_prod_id")(loop1),"&") car_iten_prod = arrTemp(1) set car_prod_atual = lojaDB.Execute("SELECT * FROM produtos WHERE id="& car_iten_prod &" AND disp='S'") car_prod_nome = car_prod_atual("nome") car_prod_preco = car_prod_atual("preço") car_prod_imagem = car_prod_atual("imagem") arrTemp = Split(Session("car_prod_id")(loop1),"&") car_iten_id = arrTemp(0) car_iten_quant = arrTemp(2) car_frete = função ou escript aqui.... car_subtotal = car_iten_quant * car_prod_preco car_total = car_total + car_subtotal car_totalv = car_total + car_frete %> ------------------------------------------------------------------ eu so não sei montar esta função ou script...será que você sabe?? obrigado. :blink: :blink:

olá, boa noite, 1- Tem de ter instalado o llS no seu pc 2- vai no dream...e MENU/SITE/NOVOSITE... 3 - Em definição de sites você coloca o nome do site, depois escolhe: sim, desejo utilizar uma tecnologia de servidor, depois, escolhe ASP VBScript, pronto, dai é so escolher a pasta dentro do servidor IIS e fazer o teste de url... 4- o seu site esta criado e pronto para ser testado no dream... qualquer coisa posta ai... :ph34r: :ph34r:

Ai luna, um código muito bom, que reformulei e funciona legal... <% 'abro uma seção com o nome de "envia" session("envia") = true Server.ScriptTimeOut = 60 'esta linha pedi o parametro "nome" do formulário flash ou html. nome = request("nome") 'esta linha pedi o parametro "email" do formulário flash ou html. email = request("email") 'esta linha pedi o parametro "telefone" do formulário flash ou html. telefone = request("telefone") 'esta linha pedi o parametro "mensagem" do formulário flash ou html. mensagem = request("mensagem") 'Mensagem que será enviada em html para o susite.com.br mensagem01 = "<table width='100%' border='0' cellpadding='0' cellspacing='0' bgcolor='#FFFFFF'><tr><td width='100%' valign='middle'><div align='left'><p>CONTATO DO SEUSITE.COM.BR</p><p><font size='2' face='Verdana, Arial, Helvetica, sans-serif'>Nome: <font color='#333333' face='Arial, Helvetica, sans-serif'> "&nome&"</font> <br> E-mail: <font color='#333333' face='Arial, Helvetica, sans-serif'> "&email&"</font><br> Telefone: <font color='#333333' face='Arial, Helvetica, sans-serif'> "&telefone&"</font> <br> Mensagem: <font color='#333333' face='Arial, Helvetica, sans-serif'> "&mensagem&"</font> </font></p></div></td></tr></table>" 'Mensagem que será enviada em html para o destinatario mensagem02 = "<table width='100%' border='0' cellpadding='0' cellspacing='0' bgcolor='#FFFFFF'><tr><td width='100%' valign='middle'> <div align='left'><p>**MENSAGEM AUTOM&Aacute;TICA**</p><p><font size='2' face='Verdana, Arial, Helvetica, sans-serif'>Prezado(a)<font color='#333333' face='Arial, Helvetica, sans-serif'>"&nome&",</font><br><br>Agradecemos sua visita.<br>Sua mensagem foi recebida em nossos servidores.<br>Estaremos respondendo em breve, Obrigado.<strong><br></strong></font></p></div></td></tr><tr><td valign='middle'><div align='left'></div><div align='left'><p><strong></strong></p></div></td></tr><tr><td valign='middle'><p><strong><font size='2' face='Verdana, Arial, Helvetica, sans-serif'>Atenciosamente</font></strong></p><p><strong><font size='2' face='Verdana, Arial, Helvetica, sans-serif'>SEU seusite.COM.BR</font></strong></p></td></tr><tr><td valign='middle'>&nbsp;</td></tr><tr><td valign='middle'><p><font size='2' face='Verdana, Arial, Helvetica, sans-serif'>Fone: (16)3722-4614</font><BR><font size='2' face='Verdana, Arial, Helvetica, sans-serif'></font><BR>E-mail: contato@seusite.com.br</p><p>&nbsp;</p></td></tr></table>" 'configuração para o servidor de envio de e-mail. 'não modificar esta linha. Set semail = Server.CreateObject("CDO.Message") 'não modificar esta linha. Set sconfigure = Server.CreateObject ("CDO.Configuration") 'esta linha abaixo pode ser modificada dependendo do caminho do servidor. sConfigure.Fields("http://schemas.microsoft.com/cdo/configuration/smtpserver") = "localhost" 'não modificar esta linha. sConfigure.Fields("http://schemas.microsoft.com/cdo/configuration/smtpserverport") = 25 'não modificar esta linha. sConfigure.Fields("http://schemas.microsoft.com/cdo/configuration/sendusing") = 2 'não modificar esta linha. sConfigure.Fields("http://schemas.microsoft.com/cdo/configuration/smtpconnectiontimeout") = 30 'não modificar esta linha. sConfigure.Fields.update 'primeira mensagem que será enviada para o contato do seusite.com.br Set semail.Configuration = sConfigure 'remetente da mensagem semail.from = nome&"<"& email &">" 'para onde vai a mensagem semail.to = "contato@seusite.com.br" 'assunto da mensagem semail.subject = "formulario do site seusite.COM.BR" 'mensagem que será enviada em html- mensagem 01 semail.HTMLBody = mensagem01 'envia a mensagem01 semail.send 'segunda mensagem que será enviada para o destinatario "é aconfirmação automática " Set semail.Configuration = sConfigure 'rementente da mensagem semail.from = "contato@seusite.com.br" 'para onde vai a mensagem semail.to = nome&"<"& email &">" 'assunto da mensagem semail.subject = "contato do site www.seusite.com.br" 'mensagem que será enviada em html - mensagem 02 semail.HTMLBody = mensagem02 'envia a mensagem02 semail.send ' destruo os objetos Set semail = Nothing set sConfigure = Nothing 'Apago a seção utilizada session("envia") = false %> qualquer dúvida posta ai...vlw..?? :ph34r: :ph34r:

Realmente este código é o que pega o valor retornado do site do correio, depois ele vai para o codigo responsavel pela soma do frete com os valores do carrinho. mas este que você me passou não está funcionando não, está dando um erro: Erro de tempo de execução do Microsoft VBScript erro '800a000d' Tipos incompatíveis acho que tem de ser alguma função que faça com que o valor retornado do site do correio não fique com "." e sim com ",". ou algo do tipo, fico no aguardo novamente e obrigado.

Bom, amigo Bareta, ai é que está, ele não tem, ou não precisa deste retorno de codigo fonte ou quem a registrou, ele so retorna os valores e mostra se a página está ou não registrada, dai se alguém, incrementar, posta ai... e outra, este código retorna praticamente qualquer busca de domínio, .com.br, .com, .net, .gov.br, entre outros...é so chegar lá e digitar o domínio, e é bastante rápido o retorno... vi muitos e até utilizei muitos outros codigos de whois...que são muito extensos, demoram para retornar o resultado e outros nem retornam, este foi o unico que encontrei que busca tudo que quero sem precisar de muita programação e funciona bem. mas se alguém, fizer um "upgrade" nele, posta ai pra gente...valeu... :ph34r: :ph34r:

Ai amigo Graymalkin, o código que pega os valores no site do correios é este aqui: <% Response.AddHeader "cache-control", "private" Response.AddHeader "pragma", "no-cache" Response.ExpiresAbsolute = #January 1, 1990 00:00:01# Response.Expires=Now()-1 Response.AddHeader "Cache-Control", "must-revalidate" Response.AddHeader "Cache-Control", "no-cache" Car_frete = Request.QueryString("Tarifa") If Request("buscafrete")=1 Then Dim UrlResposta '---------AQUI A SUA URL DE RESPOSTA------------------------------- UrlResposta = "http://localhost/livrariagenesis/lojavirtual3/carrocompras.asp" '------------------------------------------------------------------ Response.Redirect("http://www.correios.com.br/encomendas/precos/calculo.cfm?cepOrigem=" & Request("cepOrigem") & "&cepDestino=" & Request("cepDestino") & "&valorDeclarado="& Request("valorDeclarado")& "&peso=" & Request("peso") & "&resposta=" & UrlResposta & "") End if %> este é o form que envia os ceps, um cep fica sempre definido. <form action="<%Request.ServerVariables("SCRIPT_NAME")%>" method="get" name="form1" ID="Form1"> <table width="100%" border="0" cellpadding="0" cellspacing="0" ID="Table1"> <tr align="left" valign="middle"> <td colspan="3"><strong><font color="#FFFFFF" size="2" face="Verdana, Arial, Helvetica, sans-serif">Calcule aqui o seu frete</font></strong></td> </tr> <tr align="left"> <td colspan="2"><font color="#FFFFFF" size="2" face="Verdana, Arial, Helvetica, sans-serif">Ponha o Cep de destino:</font></td> <td width="52%" valign="middle"> <font color="#FFFFFF" face="Verdana, Arial, Helvetica, sans-serif"> <input name="cepDestino" type="text" id="Text1" value="" size="8" maxlength="8"> <input type="submit" name="Submit" value="Calcular" id="Submit2"> <input type="hidden" name="cepOrigem" value="59628080" id="Hidden1"> <input type="hidden" name="buscafrete" value="1" id="buscafrete"> <input type="hidden" name="peso" value="1" id="peso"> </font></td> </tr> <tr align="left"> <td width="24%"> <font color="#FFFFFF" face="Verdana, Arial, Helvetica, sans-serif">&nbsp; </font><font color="#FFFFFF" size="2" face="Verdana, Arial, Helvetica, sans-serif">Destino:</font></td> <td><font color="#FFFFFF" size="2" face="Verdana, Arial, Helvetica, sans-serif"><%=Request.QueryString("UFdestino")%></font></td> <td rowspan="2" align="center" valign="middle"><font color="#FFFFFF" size="2" face="Verdana, Arial, Helvetica, sans-serif">Clique <a href="#">AQUI</a> para tirar d&uacute;vidas sobre o frete</font></td> </tr> <tr align="left"> <td><font color="#FFFFFF" size="2" face="Verdana, Arial, Helvetica, sans-serif">Local:</font></td> <td><font color="#FFFFFF" size="2" face="Verdana, Arial, Helvetica, sans-serif"><%=Request.QueryString("LocalDestino")%></font></td> </tr> </table> </form> o codigo que faz a conta dos valores que tem no carrinho é este aqui <% For loop1 = LBound(session("car_prod_id")) to UBound(session("car_prod_id")) arrTemp = Split(Session("car_prod_id")(loop1),"&") car_iten_prod = arrTemp(1) set car_prod_atual = lojaDB.Execute("SELECT * FROM produtos WHERE id="& car_iten_prod &" AND disp='S'") car_prod_nome = car_prod_atual("nome") car_prod_preco = car_prod_atual("preço") car_prod_imagem = car_prod_atual("imagem") arrTemp = Split(Session("car_prod_id")(loop1),"&") car_iten_id = arrTemp(0) car_iten_quant = arrTemp(2) car_subtotal = car_iten_quant * car_prod_preco car_total = car_total + car_subtotal car_totalv = car_total + car_frete %> o que mostra o valor do frete na tela é este: <%=FormatNumber(car_frete,2,-1,0,-1)%> ok, espero que agora dê para você entender melhor...muito obrigado e aguardo sua resposta. :rolleyes: :rolleyes:

Bom dia galera... é um codigo muito importante e que poucos programadores conhecem...refiz este script de busca de dominio registrado, funciona para .com.br, .com, .net, entre outros... so testei os mais conhecidos. <%@LANGUAGE="VBSCRIPT" CODEPAGE="1252"%> <% 'refeito por lucas forever Dim mensagem1 ' variavel If request.form("dominio")<>"" then ' Inseri a url que você está buscando procuraurl = "http://www." & request.form("dominio") dominio = request.form("dominio") ' Cria um objeto XML Set criaconexao = CreateObject("Microsoft.XMLHTTP") ' Conecta-se com a url buscada criaconexao.Open "get", procuraurl, False on error resume next criaconexao.Send pagina = criaconexao.getResponseHeader("Date") ' Retorna a busca if pagina="" then mensagem1 = "Resultado da pesquisa:<br><br>www."&dominio&"<br><br><strong><font color='#009900'>PARABÊNS, DOMÍNIO DISPONÍVEL PARA REGISTRO<br><br></strong>" else mensagem1 = "Resultado da pesquisa:<br><br>www."&dominio&"<br><br><strong><font color='#FF0000'>IMPOSSÍVEL, DOMÍNIO JÁ REGISTRADO<br><br></font></strong>" end if Set criaconexao = Nothing end if %> <html> <head> <title>sistema de whois</title> <meta http-equiv="Content-Type" content="text/html; charset=iso-8859-1"> </head> <body><form method=post action="whoisbom.asp"> <table width="95%" border="0" align="center" cellpadding="0" cellspacing="0"> <tr> <td> <div align="center">para dominios .com, .net, .com.br, entre outros.</div></td> </tr> <tr> <td> <div align="center">www. <input type=text name=dominio size=20> <input name="submit" type=submit value="Buscar dominio"> </div></td> </tr> <tr> <td>&nbsp;</td> </tr> <tr> <td><div align="center"> <%=mensagem1%> </div></td> </tr> <tr> <td>&nbsp;</td> </tr> <tr> <td>&nbsp;</td> </tr> </table> </form> </body> </html> se alguém incrementar este codigo, por favor poste ele aqui.

certo amigo Graymalkin, obrigado, mas, onde eu uso Val()?? tem como você ver no codigo acima e me mostrar por favor?? :P

Cara , Marcos, testei o seu script...aqui da funcionando legal a busca por .com.br, mas os outros... a página passa uma vida carregando e não aparece nada... será que você não tem outro script por ai...??

"Um conselho de amigo" ---------------------------------------- Para tantas pessoas que querem hospedar o seu site gratuitamente eu deixo um conselho: Não vale a pena. quer saber o porque? 1- O espaço e o limite de banda são muito limitados. 2- Muitos não dão suporte a nada. 3- E-mails são muito limitados. 4- Seu site pode sair do ar a qualquer hora (e você não tem direito de dizer nada). 5- Muitas hospedagem, lhe obrigam a utilizar, ou abrem automaticamente banners deles.(o que é um grande incomodo) 6- Com tantos sites de hospedagem (profissionais) cobrando tão pouco por mês, eu acho melhor investir do que se arriscar! ---------------------------------------- eu já passei por estas dores de cabeça, e hoje reconheço o meu erro. até mais...

ok, amigo, vou verificar aqui...e e falo, obrigadão.

Amigo marcos, acho que a função que faz todo o processo de calculo está no site do correio, já que este codigo puxa os valores on-line de lá. o codigo de frete, eu peguei em um site que não me lembro qual agora...funcionou legal...so que eu tive que adaptar para que fosse feito o calculo já na página do carrinho de compras, antes de fechar o pedido. amigo, onde eu ponho esta função?? --------------------------------------------------------------- eu descobri uma coisa agora... quando o valor vem do site do correio ele vem como R$ 9.5 .... será que tem alguma coisa a ver com ele aparecer no meu codigo R$ 95,00 ??..... por que os valores inteiros ficam normais...

Obrigado, Marcos...vi no site que você colocou aqui...é isto mesmo que eu quero...vlw... :P

obrigado por se importar...está ai o codigo...ele funciona normalmente...so está dando este erro de numeros...obrigado...

Boa noite novamente, estou montando um sistema de calculo de frete para uma loja virtual, está tudo funcionando perfeitamente exceto pelos valores inteiros, e fracionários, por exemplo: Eu digito o numero do cep do destinatário e do remetente e ele me retorna o valor do frete R$ 34,00 (que esta correto). Mas por exemplo se eu digitar 2 números de ceps próximos que era para ele me retornar por exemplo o valor R$ 9,50 (este seria o correto) mas ele me retorna o valor R$ 95,00 que está errado. o certo seria R$ 9,50. ou seja os números inteiros ele retorna normal, mas os fracionários ele está me passando como se fossem inteiros também. alguém já teve um problema parecido, pode me ajudar com isto por favor?? obrigado.

Boa noite, alguém conhece um sistema de whois que busque alem do dominio .com.br, busque tambem os doinios .com, .net, .adv.br, .agr.br e os demais que existem, ou pelo menos a maior parte dele, em asp?? obrigado.

ai pessoal, vamos dar um help...me ajude ai por favor...

Olá, boa tarde... A Desenhart Studio está abrindo uma grande oportunidade para você que está cansado de sites gratuitos que oferecem hospedagem e não vale a pena, então você está no lugar certo. Oferecemos hospedagem gratuita com ótimo espaço para armazenamento de seu site e webmail para webmasters e webdesigners que indicarem clientes para Desenhart Studio. Você também ganhará pontos por cada cliente indicado por você, e você poderá trocar estes pontos por dinheiro, ou upgrades em sua hospedagem. para maiores informações mande um e-mail para: vendas@desenhartstudio.com com o assunto "parceria". Mais uma vez, obrigado a todos. Denilson Junior - Gerente de vendas Desenhart Studio - Conectando o Mundo a você. www.desenhartstudio.com.br

WWW.DESENHARTSTUDIO.COM.BR SUPORTE ON-LINE CLIQUE AQUI A DS está oferecendo a seus novos clientes, 10 dias de hospedagem gratuita para testar nossos serviços, em qualquer plano, assim você vai poder confirmar todo o nosso padrão em atendimento e serviços e testar os nossos painéis de controle WINDOWS E LINUX.10 DIAS GRÁTIS PARA TESTAR, CLIQUE AQUI. NOSSO PLANOS: PHP web php 1 -R$ 9,90/mês, 200 MB em disco, 6 GB Transf. banda mensal (não cobramos pelo boleto, ou seja, este valor é integral, sem aumento) web php 2 -R$ 14,90/mês, 300 MB em disco, 10 GB Transf. banda mensal (não cobramos pelo boleto, ou seja, este valor é integral, sem aumento) web php 1 -R$ 19,90/mês, 500 MB em disco, 20 GB Transf. banda mensal (não cobramos pelo boleto, ou seja, este valor é integral, sem aumento) ASP web asp 1 -R$ 9,90/mês, 100 MB em disco, 1 GB Transf. banda mensal (não cobramos pelo boleto, ou seja, este valor é integral, sem aumento) web asp 2 -R$ 14,90/mês, 150 MB em disco, 2 GB Transf. banda mensal (não cobramos pelo boleto, ou seja, este valor é integral, sem aumento) web asp 3 -R$ 19,90/mês, 200 MB em disco, 3 GB Transf. banda mensal (não cobramos pelo boleto, ou seja, este valor é integral, sem aumento) COMUM A TODOS O PLANOS • Redirecionamentos ilimitados de página / endereço • Ilimitadas Contas POP3 / SMTP • ASP, ASP.net 1.1 e 2.0,ColdiFusion,Perl • PHP 4, PHP 5, CGI, HTML, HTM • 1 Conta FTP acesso ilimitado • Ilimitados Subdomínios • Estatísticas de Acesso diariamente • Extensões do FrontePage • Backup coletivo • Gerenciamento do seu site através de Painel de controle em Português.(Cpanel) • Gerenciamento do seu site através de Painel de controle em Português.(Plesk) • Conexão 128 (Atualização Segura de seu site) • Ilimitados redirecionamentos de e-mails • Opção de respostas automáticas para emails • Ilimitadas Listas de Email (Mail Lists) • Conta Pega-Tudo • Filtro de Mensagens • Anti-Vírus • SPAM ASSASIN • Webmail em português • Servidor SMTP e POP3 personalizados • Ilimitados bancos MySQL • Ilimitados bancos MS-SQL • phpMyAdmin para gerenciamento do MySQL • Suporte a bancos MS-Access • Conexões ODBC • Suporte a Flash • Suporte a JavaScript • Suporte a CSS • Suporte a Certificado Seguro - SSL • Suporte a XML • Suporte a SSI (Server Side Include) • Backup diário e semanal mantido em máquinas externas • Garantia de uptime em contrato • Servidores monitorados 24 horas (a cada minuto) • Construtor de Sites em 5 Passos Site Builder • Ferramentas úteis comuns a todos os planos Mais informações • Extensões Microsoft FrontPage • Estatísticas de acesso atualizadas diariamente • Restringir pastas por senha • Páginas de erro personalizáveis • Ferramentas de backup pessoal • Proteção de conteúdo (Hot Link) • Visualização prévia • Controle de desempenho • Tipos MIME • Logs de Acesso • ASP.NET Starter Kits (Scripts Pré-configurados) • Agendamento de tarefas (Scheduler) • Gerenciador de Arquivos • Logs de Espaço em disco utilizado • Logs de Transferência utilizada Dispomos de planos de hospedagem maiores para sites de e-comerce (loja virtual) e outras empresas que precisão de espaço em disco e tráfego maiores, para maiores informações consulte nosso departamento de hospedagem no e-mail: hospedagem@desenhartstudio.com ou clique aqui para maiores detalhes. Se ainda está com DÚVIDAS CLIQUE AQUI ! ou por e-mail: vendas@desenhartstudio.com AGUARDAMOS A SUA VISITA, OBRIGADO. WWW.DESENHARTSTUDIO.COM.BR

Bom dia pessoal... sou novo por aqui e tenho um pouco de conhecimento em ASP. gostaria de saber se alguém pode me ajudar, estou tentando modificar um script asp que já peguei pronto, já fiz muitas modificações neste codigo que já utilizei em outros trabalhos que desenvolvi... o problema é que não estou conseguindo colocar paginação nele... já tentei usar alguns scripts de paginação nele, mas, não consegui...alguém pode me ajudar... o codigo é o seguinte: se alguém quizer ver o codigo funcionando clique aqui, não está funcionando totalmente.... ai você verá a página que eu já modifiquei e coloquei alguns parametros neste codigo para que os produtos sejam puxados do bd e ordenados de 3 em 3 por linha...so que como não tem um limite para a quantidade de arquivos que aparecem por pagina, se eu tiver 100 produtos, vai aparecer todos os 100 registros em uma unica pagina. dai que tem de entrar a paginação... para que apareçam por exemplo 15 produtos por página... alguém sabe modificar este codigo para ficar paginando??? pode entrar em contato comigo por email se quizer... obrigado..