Ir para conteúdo
Fórum Script Brasil

Henderson

Membros
  • Total de itens

    362
  • Registro em

  • Última visita

Tudo que Henderson postou

  1. Seguinte... tem uma pagina, que tem incluido um arquivo de css com os estilos e tal inclusivo o estilo que define cor em link, a:hover, a:link, bla bla bla mas tem uma parte da pagina, que não pode ter formataçao nenhuma, os links tem que ficar da cor padrão e tal. tem alguma coisa que eu possa fazer, pra que só nessa parte da pagina seja ignorado o css? preciso disso porque é assim, os usuarios cadastram textos no banco de dados, com codigo html. e nessa parte da pagina, o texto tem que aparecer exatamente como foi cadastrado, mas nas partes de links, o link aparece com o padrão definido no css
  2. Henderson

    Email Em Massa

    aí Preciso de algum jeito mandar um email para varios endereços que vao ser digitados numa caixa de texto e separado por virgulas.. é usando CDONTS fiz assim path = split(destino,",") for i = 0 to Ubound(path) e_destino = path(i) ''FORMAR A SENHA randomize caracteres="0,1,2,3,4,5,6,7,8,9,A,B,C,D,E,F,G,H,I,J,K,L,M,N,O,P,que,R,S,T,U,V,W,X,Y,Z" matriz=split(caracteres,",") for x = 1 to 12 valor = matriz(Ubound(matriz) * rnd) senha = senha & valor next 'FIM SENHA ''REALIZA AS AÇOES DE CADA MEMBRO nome = Request.Form("nome") sql = "INSERT INTO cadastro (id,email,data)VALUES('"&senha&"','"&e_destino&"','"&data&"')" set rs = conexao.execute(sql) '--------------------------------------------------------- 'ENVIA O EMAIL '--------------------------------------------------------- mensagem = "<!DOCTYPE HTML PUBLIC '-//W3C//DTD HTML 4.01 Transitional//EN'><html><head><title>Convite de Cadastro</title><meta http-equiv='Content-Type' content='text/html; charset=iso-8859-1'></head><body>" mensagem = mensagem & "<div align='justify'>" mensagem = mensagem & "Olá " & nome & "<br>" mensagem = mensagem & "<br>" mensagem = mensagem & "Você está recebendo um convite para se cadastrar na área restrita do site GRUPO 511." mensagem = mensagem & " Nele você terá acesso a um conteúdo especial sobre os nossos projetos, além de " mensagem = mensagem & "encontrar dicas e textos sobre Marketing Multi Nível. É muito importante " mensagem = mensagem & "se cadastrar no site, pois através dele poderemos aumentar a nossa comunicação e " mensagem = mensagem & "saberemos quem realmente está interessado e merece participar de nossa equipe."&"<br><br><br>" mensagem = mensagem & "Link para cadastro:"&"<br>" mensagem = mensagem & "http://"&dominio&"/cadsite.asp?id="&senha mensagem = mensagem & "<br>" & "<br>" mensagem = mensagem & "Você tem sete dias a partir do envio deste e-mail para se cadastrar ou este link " mensagem = mensagem & "se tornará automaticamente inválido, sendo necessário pedir novo convite a um dos Administradores." mensagem = mensagem & "<br>"&"<br>"&"<br>" mensagem = mensagem & "Aproveite o site! Ele foi construído para aumentar a integração entre o grupo e sua " mensagem = mensagem & "presença é fundamental para cumprirmos esse objetivo." mensagem = mensagem & "<br>" & "<br>" mensagem = mensagem & "Atenciosamente," mensagem = mensagem & "<br>" & "<br>" & "<br>" mensagem = mensagem & "GRUPO 511"&"<br>" mensagem = mensagem & "http://"&dominio mensagem = mensagem & "</div>" mensagem = mensagem & "</body></html>" Set Mailer = CreateObject("CDONTS.NewMail") Mailer.From = remetente_cad ' e-mail de quem esta enviando a mensagem Mailer.Subject = "Convite de Cadastro" Mailer.To = e_destino ' e-mail de quem vai receber a mensagem Mailer.BodyFormat = 0 ' parametro de formatação Mailer.Body = mensagem Mailer.Send Set Mailer = Nothing senha = "" e_destino = "" next so que se verem, é gerada uma senha automaticamente só que assim, por exemplo, eu mando para dois emails, ele gera duas senhas diferentes só que se eu saio e entro na pagina de novo, ele gera as mesmas senhas. tipo, primeiro envio: senhas -> AAAB, AAAC são diferentes, mas no segundo envio vai para cada email, pra um a senha AAAB, pro outro AAAC que isso? que eu faço pra arrumar?
  3. Henderson

    Tabela Dinâmica

    está aqui o que o marcos falo! se tu tive duvida de como qe é pra monta o codigo <!--#include file="conexao.asp"--> <html> <head> <title>Produtos1</title> <meta http-equiv="Content-Type" content="text/html; charset=iso-8859-1"> </head> <body bgcolor="#FFFFFF" text="#000000"> <table width="282" border="0" cellspacing="5" cellpadding="0" height="130"> <% do while not rs_max.eof %> <tr> <td height="12" width="103" valign="top"> <font size="2" face="Verdana" color="#000000">Ref.: <%=rs_max("referencia")%> </font></td> <td width="164" height="12"><b><font size="2" face="Verdana" color="#000000"><%=rs_max("titulo")%></font></b></td> </tr> <tr> <td height="12" width="103" valign="top"> <table width="33" border="0" cellspacing="0" cellpadding="0"> <tr> <td> <div align="left"><img src="imgs/<%=rs_max("Img")%>" width="80" height="80" border="1"></div> </td> </tr> <tr> <td><img src="imgs/5px.gif" width="1" height="5"></td> </tr> <tr> <td> <div align="center"><a href="imgs/<%=rs_max("JPG")%>"><img src="imgs/amp_img.jpg" width="70" height="18" border="0"></a></div> </td> </tr> </table> </td> <td valign="top" width="164"> <p><font size="2" face="Verdana" color="#000000"><%=rs_max("descricao")%></font></p> </td> </tr> <% rs_max.movenext loop %> </table> </body> </html>
  4. bom, nãõ entendi direito o que tu queé mas isso aqui tá errado <% response.write "<img src=image/'& =CStr(mid(palavra,i+1,1)) &'.gif border=0>" %> o certo é <% response.write "<img src=image/"& CStr(mid(palavra,i+1,1)) &".gif border=0>" %> mas eu não entendi direito a tua duvida! vê se isso aí só resolve né!
  5. Henderson

    Email Como Spam

    ok entendi é que pensei que era algo no codigo e tal, sei lá alguma forma de evitar mas já vi, é pelo conteudo da mensagem, fala como ganhar dinheiro essas coisas, ai deve cair no spam mas valeu!
  6. Henderson

    Email Como Spam

    Ola uso o seguinte codigo para envio de email mas eles chegam no email e vao pra caixa de spam tem como fazer com qe isso não aconteça? Set Mailer = CreateObject("CDONTS.NewMail") Mailer.From = "Grupoe 511 <"&remetente_cad&">" ' e-mail de quem esta enviando a mensagem Mailer.To = Request.Form("email") ' e-mail de quem vai receber a mensagem Mailer.BodyFormat = 1 ' parametro de formatação Mailer.Subject = "Convite de Cadastro" Mailer.Body = mensagem Mailer.Send Set Mailer = Nothing
  7. Henderson

    Diferença Entre Datas

    como que se usa isso? sintaxe? nunca usei!
  8. Olá Preciso de alguma forma calcular a diferença entre duas datas uma cadastrada no banco e a atual se for maior que 7, deleta como eu faço pra calcular essa diferença? o campo no banco é do tipo texto
  9. Henderson

    Wmclube

    bom, veja se aceita então: http://scriptbrasil.com.br/forum/index.php?showtopic=88654 rotativo em todas as paginas abaixo o código do meu banner caso aceite! <script language='JavaScript' type='text/javascript' src='http://ads.seusucesso.info/adx.js'></script> <script language='JavaScript' type='text/javascript'> <!-- if (!document.phpAds_used) document.phpAds_used = ','; phpAds_random = new String (Math.random()); phpAds_random = phpAds_random.substring(2,11); document.write ("<" + "script language='JavaScript' type='text/javascript' src='"); document.write ("http://ads.seusucesso.info/adjs.php?n=" + phpAds_random); document.write ("&amp;clientid=19"); document.write ("&amp;exclude=" + document.phpAds_used); if (document.referrer) document.write ("&amp;referer=" + escape(document.referrer)); document.write ("'><" + "/script>"); //--> </script><noscript><a href='http://ads.seusucesso.info/adclick.php?n=ae2e1b14' target='_blank'><img src='http://ads.seusucesso.info/adview.php?clientid=19&amp;n=ae2e1b14' border='0' alt=''></a></noscript> me informe no meu tópico, mesmo que não aceite, por favor!
  10. Henderson

    Wmclube

    numero de visitas, pageviews, tamanho de banner, rotativo, fixo??? fala aí!
  11. mas era assim mesmo que tinha que ser feito? usando esses replaces e split que usei? porque assim funciona mas não sei se é o certo!
  12. nossa, consegui mas eu fiz mó zona pra conseguir pegar só a parte que eu precisava! como a parte antes da nota (que é o que eu queria) e parte que tem depois da nota eram sempre iguais... eu dei um replace colocando ## depois dei um split separando pelos ## e peguei a nota veja pagina = "http://www.unisanta.br/vestibular/inscricao/aprovados_por_codigo.asp?cd_inscricao="&i Set xmlhttp = Server.CreateObject("Microsoft.XMLHTTP") xmlhttp.Open "GET",pagina, False xmlhttp.setRequestHeader "ContentType","text/html" xmlhttp.Send() codigo = xmlhttp.ResponseText antes = "<strong><font color=""#000000"" size=""2"" face=""Verdana, Arial, Helvetica, sans-serif"">" depois = "</font></strong></center>" codigo = Replace(codigo,antes,"##") codigo = Replace(codigo,depois,"##") path = split(codigo,"##") nota = path(4) creio que tinha um jeito mais fácil né?
  13. não sei usar esse XMLHTTP me dá uma noção aí de como faço? nunca usei isso!
  14. aí galera, beleza? Seguinte! Tem essa página http://www.unisanta.br/vestibular/inscrica...nscricao=922293 O número de inscriçao vai por querystring, tão vendo? Então, eu tenho um for, que busca uma faixa de numeros de inscrição aí eu gero o link, com o valor no for! está mas eu preciso abrir essa url e gravar o dado NOTA que tem na página num banco de dados do meu site... tem como? se tiver me ensinem a fazer, não tenho idéia!
  15. está desse jeito eu sei, já está assim mas desse jeito é ruim, fica aqele tec-tec do browse horrível nos batepapos não tem isso então deve ter uma forma de verificar sem ter que ficar atualizando a página
  16. Olá Seguinte.. Tenho um sistema de pedidos online para uma pizzaria O administrador tem uma página onde vê os pedidos realizados Mas cada vez que um novo pedido é feito, ele tem de atualizar a página ou não verá o pedido Tem algo que eu possa fazer, que fique verificando a todo instante se há um novo pedido? Tipo em bate-papo, mas sem usar refresh, que vai fica recarregando a página toda hora e aquele tec tec insuportável do internet explorer tem algo a fazer? valeu aí
  17. Henderson

    Datas

    mas eu não preciso comparar com o dia de hoje preciso comparar com uma data de 20 dias atraz eu peguei em algum lugar acho que foi até aqui, uma função que diminui os dias na data faço um while com os resultados do banco, uso a função se a 'diminuição' é maior ou igual a 20, eu deleto o registro funciono certim! valeu aí!
  18. Henderson

    Datas

    Aee... já dei uma procurada aqui, mas não achei o que queria é o seguinte tenho um campo data no bd, com a data armazenada assim dd/mm/aaaa às hh:mm eu preciso criar uma página que deleta todos os registros que foram cadastrados há mais de 20 dias como fazer isso? não faço idéia porque não sei muuuito de php então me ajudem por favor! valeu aí!
  19. aí, beleza? Seguinte... to com esse código aqui como eu faço pro menu quando selecionado e depois clicar no botão, seja aberto o link em nova janela? porque do jeito que está ele tá abrindo na mesma ou então, se eu coloco ao invés de parent, coloco blank, dá erro, não funciona <script language="JavaScript" type="text/JavaScript"> <!-- function menu(targ,selObj,restore){ eval(targ+".location='"+selObj.options[selObj.selectedIndex].value+"'"); if (restore) selObj.selectedIndex=0; } function objeto(n, d) { //v4.01 var p,i,x; if(!d) d=document; if((p=n.indexOf("?"))>0&&blank.frames.length) { d=blank.frames[n.substring(p+1)].document; n=n.substring(0,p);} if(!(x=d[n])&&d.all) x=d.all[n]; for (i=0;!x&&i<d.forms.length;i++) x=d.forms[i][n]; for(i=0;!x&&d.layers&&i<d.layers.length;i++) x=MM_findObj(n,d.layers[i].document); if(!x && d.getElementById) x=d.getElementById(n); return x; } function menuGo(selName,targ,restore){ var selObj = objeto(selName); if (selObj) menu(targ,selObj,restore); } //--> </script> <select name="menu1" class="caixa" onChange="menu('parent',this,0)"> <option value="parceiro1">Parceiro 1</option> <option value="parceiro2">Parceiro 2</option> <option value="parceiro3">Parceiro 3</option> </select> <input name="Button1" type="button" class="botao" onClick="menuGo('menu1','parent',0)" value="ok">
  20. ok, ok é o que to fazendo fiz o topo, realmente parecido com o original, mas sem as frescuras em flash que tinha. o rodapé está praticamente idêntico mas o corpo do site estou fazendo do meu jeito tirando da minha cabeça tudo o que estou fazendo está ficando legal daqui a um tempo, quando eu acabar de fazer o lay e programar todo o monte de coisa que ainda tem pra administrar o host, posto o resultado, pra você avaliarem o design e os valores dos planos, hehe!
  21. Henderson

    Erro Em Data No Iis

    marcos, já tentou modificar as configurações do formato da data no "opções regionais e de idioma" no painel de controle? aqui, isso só já resolveu, o formato tava errado lá tu clica lá, aí na janela que abre, clica em "personalizar" vai na aba "data" e seleciona o formato abreviado da data veja se dá certo
  22. po, esse é o problema falarem que eu estou fazendo o que não devia não quero arrajar pra minha cabeça iuahiuahuia pior que eu acabei de achar um host aí que usa esse template =\ sei lá, o site já tá mais de 50% feito com esse layout não sei o que faço!
  23. ah tá mas eu copiei praticamente uahiauhiuahuia tipo, tá tudo igual só os conteúdos do centro da página é que estão meio diferentes não sei se já viram na net, mas ó, 2 prints do meu... http://img149.imageshack.us/img149/7372/imagemyk4.png http://img149.imageshack.us/img149/9290/imagem2ef9.png
  24. aí galera beleza? Seguinte... Tem um layout do templatemonster que eu acho iraaaaaaado mas sabem como é né, é muito caro os layout lá esse em especial 59 dolares então, eu fiz um igualzinho mas eu mesmo fiz não copiei imagens nem nada fiz do zero no fireworks, tenho o png e tal tanto que o topo era em flash, eu não quiz fazer, fiz estático mesmo to fazendo alguma coisa de errado? eu não pudia fazer isso?
×
×
  • Criar Novo...