Ir para conteúdo
Fórum Script Brasil

jissa

Veteranos
  • Total de itens

    2.999
  • Registro em

  • Última visita

Tudo que jissa postou

  1. Para voce poder enviar o arquivo anexado voce tem que utilizar ASP ou PHP.. Caso tenha alguma duvida quanto aos dois Poste a mensagem no Forum respectivo.
  2. jissa

    Avatar

    Tudo bem com voce thuran??
  3. Olha.. da forma que voce me enviou salvei no meu server... http://infinite-informatica.com.br/testes/indique.asp O Problema pode ser que o seu Server não suporte o CDONS.. as duas paginas estao 100% corretas.
  4. cara não vi este menu la não.. entrei no phpnuke.org (é isto?) passa o endereço preu dar uma olhada..
  5. jissa

    Ajuda

    serve assim? <% pId = CLng(Request.QueryString("id")) my_Conn.Open ConStr sql ="SELECT * FROM cintatos WHERE id=" & pId RS.open sql, my_Conn, 1, 3 If not RS.EOF Then RS.Delete End If RS.Close my_Conn.Close Response.Redirect "listacontatos.asp" %>
  6. Manda pra mim o codigo que voce fez. todo ele... uam coisa os dois provedores tem suporte ao CDONS (não acho que seja isto.. mas tem alguns que suporta apenas o ASPMAIL)??
  7. Virus, Exploits, BackDors, Cavalo de troia .. o nome que quiser..... Todos exploram os Bugs dos Sistemas Operacionais, não necessariamente Bugs muitas vzs fazem com que os Sistemas gerem um BUG por uma falha normalmente Humana de não proteção de uma determinada porta e ai se alguém sem querer descobrir.. já era.. é o que acontece com os Virus... o cara fica estudando como burlar o Antivirus.. depois o que ira fazer no computador apos isto..
  8. Eu vi umas caracteristicas do virus MS-Blaster que faz exatamente isto.. da uma pesquisada nos Sites de Antivirus se tem alguma ferramenta para remover... tem um tópico aqui mesmo no Forum de Win que tem o path de atualizacao da Microsoft para voce não pega-lo novamente..
  9. jissa

    Tabelas...

    Ae Anao.. se precisar de Tester para o Seu Editor.. pode mandar
  10. jissa

    Asp E Php

    Existem algumas coisas que o PHP tem que o ASP não tem... (pelo menos não sei) socks.. portas.. por exemplo no PHP voce consegue validar um e-mail checando a porta SMTP do Server no ASP isto não existe... (apenas um exemplo) existem outros... Mas ASP tem uma coisa muito boa.. que é o GLOBAL.ASA se voce souber trabalhar com ele ele pode trabalhar por voce... Escolher um.. nem sempre é o que queremos.. e sim o que devemos utilizar.. no meu caso a maioria dos Clientes tem Server Microsoft.. o motivo principal para eu ir pro ASP.. mas to comessando a pegar alguma coisa de PHP somente para Aprender algo novo..nunca se sabe quando irei precisar
  11. jissa

    Tags Meta Busca

    Olha.. tenho este link.. da uma olhada.. voce coloca os parametros e cria a metatag.. é bom que você vai ver o que digitou onde aparece como aparece.. da uma Olhada
  12. jissa

    Avatar

    Puxa.. Voce estudou.. eu inda não... mas o da Orelha não foi pra voce.. foi para completar os itens... do Dark .. :)
  13. CALCULADODA... Copie e Cole.. e Rode.. :o <html> <head> <title>Calculadora</title> </head> <body> <FORM METHOD="POST" ENCTYPE="application/x-www-form-urlencoded" name="calc"> <CENTER> <P><B><FONT SIZE="5" COLOR="#0000FF" FACE="Verdana">Calculadora</FONT></B></P> <P> <HR ALIGN="CENTER" WIDTH="41%"> </P> </CENTER> <CENTER> <P><script language="JavaScript"> <!-- function compute(obj) {obj.expr.value = eval(obj.expr.value)} var one = '1' var two = '2' var three = '3' var four = '4' var five = '5' var six = '6' var seven = '7' var eight = '8' var nine = '9' var zero = '0' var plus = '+' var minus = '-' var multiply = '*' var divide = '/' var decimal = '.' function enter(obj, string) {obj.expr.value += string} function clear(obj) {obj.expr.value = ''} // --></SCRIPT> <TABLE BORDER="2"> <td colspan=4><input type="text" name="expr" size=25 action="compute(this.form)"> <TR> <TD ALIGN="CENTER"> <P ALIGN="CENTER"><input type="button" value=" 7 " onClick="enter(this.form, seven)"> </TD> <TD ALIGN="CENTER"> <P ALIGN="CENTER"><input type="button" value=" 8 " onClick="enter(this.form, eight)"> </TD> <TD ALIGN="CENTER"> <P ALIGN="CENTER"><input type="button" value=" 9 " onClick="enter(this.form, nine)"> </TD> <TD ALIGN="CENTER"> <P ALIGN="CENTER"><input type="button" value=" / " onClick="enter(this.form, divide)"> </TD> </TR> <TR> <TD ALIGN="CENTER"> <P ALIGN="CENTER"><input type="button" value=" 4 " onClick="enter(this.form, four)"> </TD> <TD ALIGN="CENTER"> <P ALIGN="CENTER"><input type="button" value=" 5 " onClick="enter(this.form, five)"> </TD> <TD ALIGN="CENTER"> <P ALIGN="CENTER"><input type="button" value=" 6 " onClick="enter(this.form, six)"> </TD> <TD ALIGN="CENTER"> <P ALIGN="CENTER"><input type="button" value=" * " onClick="enter(this.form, multiply)"> </TD> </TR> <TR> <TD ALIGN="CENTER"> <P ALIGN="CENTER"><input type="button" value=" 1 " onClick="enter(this.form, one)"> </TD> <TD ALIGN="CENTER"> <P ALIGN="CENTER"><input type="button" value=" 2 " onClick="enter(this.form, two)"> </TD> <TD ALIGN="CENTER"> <P ALIGN="CENTER"><input type="button" value=" 3 " onClick="enter(this.form, three)"> </TD> <TD ALIGN="CENTER"> <P ALIGN="CENTER"><input type="button" value=" - " onClick="enter(this.form, minus)"> </TD> </TR> <TR> <TD COLSPAN="2"><input type="button" value=" 0 " onClick="enter(this.form, zero)"></TD> <TD ALIGN="CENTER"> <P ALIGN="CENTER"><input type="button" value=" . " onClick="enter(this.form, decimal)"> </TD> <TD ALIGN="CENTER"> <P ALIGN="CENTER"><input type="button" value=" + " onClick="enter(this.form, plus)"> </TD> </TR> <TR> <TD ALIGN="CENTER" COLSPAN="2"> <P ALIGN="CENTER"><input type="button" value=" = " onClick="compute(this.form)"> </TD> <TD ALIGN="CENTER" COLSPAN="2"> <CENTER> <P><INPUT TYPE="RESET" VALUE="AC"> </CENTER> </TD> </TR> </TABLE> </P> </CENTER> <SPAN STYLE="Position : Relative; Left : 0px; Top : 0px; Width : 150px; Height : 140px"> <P ALIGN="CENTER"> <P> <CENTER> <P><BR> <BR> </CENTER> <P> </P> </SPAN> <P> <HR ALIGN="CENTER"> </FORM> </body> </html>
  14. jissa

    Ajuda !

    ixi.. tem varias formas.. faz assim pega uns na Pagina Principal do ScriptBrasil.. tem varios exemplos de cadastros/alteracoes .. acho que é melhor.. ai se tiver alguma duvida quanto ao funcionamento Posta aqui;
  15. Ta funcionando legal.. tava pensando em simplificar.. mas assim ta bom.. tem todas as opcoes que necessita.. caixa, radio texto e campos... faltou só uns combo e validacoes.... mas fica facil implementar
  16. jissa

    Site.com.br ?

    As formas que conheço via Barra de endereço: http://scriptbrasil.com.br https://www.scriptbrasil.com.br www.scriptbrasil.com.br ou ainda o IP se tiver.. tipo 200.185..... ta falando de diretorios fisicos.. ? tipo os que ficam no provedor? se for cada um utiliza de uma forma, mas normalmente é o nome do dominio
  17. jissa

    Tabelas...

    Bem.. concordo com todos.... mas... eu não perco muito tempo com html na mao não... gosto de saber dos comandos... eu me preoculpo mais com o codigo dos scripts, se tem os editores para facilitar.. quem sou eu para complicar.. Eu como sou pobre.. uso os gratuitos.. hoje estou utilizando um chamado html kit.. não sei se é bom ou se é ruim.. pior ou melhor que os outros.. mas para eu trabalhar serve... eu queria uma copia doDeam Weaver.. que dizem ser Otimo.. mas quem sabe um dia consigo um..
  18. A diferença do que eu fiz para o do Recomenda.. que no deles voce fica vinculado a eles.. o meu é independente não precisa pegar scripts de outro server... este é o Codigo deles... voce sempre vai ficar dependendo do funcionamento, no meu codigo só precisa alterar e colocar no Seu Site.. dependendo somente de voce mesmo... Melhor ter uma solucao local não acha? <!-- Início Código Recomenda --> <a href="http://www.recomenda.com.br/cgi-bin/recomenda.exe?modo=0" target="_blank"><img SRC="http://www.recomenda.com.br/b.gif" border="0"></a> <!-- Fim Código Recomenda --> Eu.. vendendo meu peixe.. ops.. é de Graça :D
  19. na verdade não tem diferença nenhuma, porque o Default para o indexOF é 0 então colocando o 0 ou não vai dar na mesma... o primeiro item é o campo de pesquisa no caso ai "@" e o segundo o fromIndex que tem o padrão 0 Agora se tiver uma string grande e quiser falar para o index em que posicao iniciar a busca.. ai sim este segundo parametro é necessario caso não ele vai iniciar sempre a scring da posicao 0. ex.: var nome = "Script"; var onde= nome.indexOf("r", 0) //Vai retornar 3 (pos do r) var onde= nome.indexOf("r", 4) //Vai retornar -1 (não encontrou) //porque iniciou depois do r var onde= nome.indexOf("Z", 0) //Vai retornar -1 (não encontrou) Os dois são diferentes mas iguais :D
  20. Po Dark.. quis fazer um completo.. para ter todas as opcoes e não coloquei nenguma validacao que achei que ficaria grande demais.. Mas tai.. se tiver qualquer duvida Posta ai.
  21. Po Vilela.. o rapaz ta aprendendo :) O Anao tem 13 (disse ele)
  22. Sim.. tem que ter o outlook instalado.. mas é bom para aprender a linguagem :)
  23. jissa

    Dia 14 Agosto

    Recebi um e-mail da Microsoft.... Achei legal.. aparece uma tela como se fosse do DOS antiga.. aparecendo uma mensagem..
  24. jissa

    Form-mail

    Acabei de Postar no Forum ASP um Form-Mail completo, precisa so trocar o email de recebimento Da uma Olhada..: FormMail
  25. Form-E-mail em ASP - Completo... e funcionando Bem são dois arquivos necessarios para o envio do e-mail... FALE_CONOSCO.ASP - Este Formulario que o usuario preenche ENVIA.ASP - Funcoes que vao tratar as variaveis e enviar o e-mail para o destino Na forma que esta o Formulario funciona 100% já testei, as unicas linhas que necessita de alteração são: sEmailTo = "EMAIL@DOMINIO.COM.BR" 'E-MAIL QUE O FORMULARIO SERA ENVIADO(cola-se o e-mail que recebera o formulario preenchido sNameTo = "Nome da Empresa" ´Seu Nome ou da Empresa que esta recebendo o formulario(Apenas um nome para referencia) Mailer.RemoteHost = "127.0.0.1" (Seu Host smtp.. dependendo do provedor pode-se utilizar o que esta ai mesmo, sem problemas A mensagem de agradecimento esta no proprio Formulario ENVIA.ASP, se quiser pode criar uma outra pagina.. ou redirecionar para onde quiser Qualquer duvida ou problema, Poste aqui: Bos Sorte Segue os Fontes: FALE_CONOSCO.ASP ****************------------- INICIA AQUI --------------------*************** Por Favor não Remova os creditos, nem do ScriptBrasil, nem os Meus - Obrigado****************************************************************************** <!-- FALE_CONOSCO.ASP - Exemplo de Form-mail para www.scriptbrasil.com.br --> <!-- Autor : Jair Issa - jair.issa@linksat.com.br --> <% Response.addHeader "pragma", "no-cache" Response.CacheControl = "Private" Response.Expires = 0 %> <% '------------------------------------------- ' Aqui está o código para que apareça uma ' mensagem de erro quando um dos campos ' não for preenchido corretamente Dim ErroMsg Dim strMsg ErroMsg = cstr(Request.QueryString ("erro")) msg = "" Select case ErroMsg case "1" msg = "Digite um nome para contato !" case "2" msg = "Digite um email válido!" case "3" msg = "Digite um texto !" end select if msg <> "" then Response.Write "<p align=""center""><font face=""verdana"" color=" & DefaultColor & " size=""1""><b>" & msg & "</b></font></p>" end if ' Fim do código de erro '------------------------------------------- %> <% '------------------------------------------- ' Esta área você poderá configurar ' ao seu gosto. Anexe as folhas de estilos ' mas respeitando os nomes dos campos. '------------------------------------------- %> <HTML> <HEAD> <title>Form-E-mail - Exemplo para www.scriptbrasil.com.br By jair.issa@linksat.com.br</title> <body> <form action="enviar.asp" method="POST"> <center> <span style="height:1; Filter: Blur(Direction=50, Strength=8); font-weight:700; font-style:italic"> <font size="5" face="Verdana">&nbsp; <font color="#6699FF">&nbsp; </font></font> </span> <span style="height:1; Filter: Blur(Direction=50, Strength=8); font-weight:700; "> <b><font face="Verdana" size="5">Fale Conosco</a></font></b></span></P> <font face="Verdana">Faça sua consulta sobre nossos serviços ou dê a sua opinião sobre qualquer coisa que desejar.<br><b><br>Seus comentários e sugestões ou criticas são muito importantes<br></b></font> </p> <table cellpadding="3" cellspacing="0" width="686"> <tr><td align="center" width="680"> <p>&nbsp;</td></tr><tr><td align="right" width="680"> <p align="left"><font face="Verdana"><strong>Que tipo de comentários gostaria de enviar?</strong></font></p> <p align="left"><font face="Verdana">&nbsp;<input type="radio" name="TipoMensagem" value="Consulta" checked></font><font face="Verdana">Consulta&nbsp;&nbsp; <input type="radio" name="TipoMensagem" value="Reclamação">Reclamação&nbsp;&nbsp; <input type="radio" name="TipoMensagem" value="Sugestão">Sugestão</font></p> <p align="left"><font face="Verdana"><strong>Sobre que área deseja fazer um comentário?</strong></font></p> <p align="left"><font face="Verdana"><strong>&nbsp;</strong><select name="Assunto" size="1"> <option>Desenvolvimento</option> <option>Empresa</option> <option>Funcionário</option> <option>Serviços</option> <option>Site da Web</option> <option>Suporte</option> <option selected>(Outro)</option> </select></font><font face="Verdana"> Outro: <input type="text" size="26" maxlength="100" name="OutroAssunto"></font></p> <table border="1" cellpadding="0" cellspacing="0" style="border-collapse: collapse; border-width: 0" bordercolor="#111111" width="100%" id="AutoNumber1"> <tr> <td width="21%" style="border-style: none; border-width: medium"> <font face="Verdana" size="1">Empresa:</font></td> <td width="79%" style="border-style: none; border-width: medium"> <font face="Verdana" size="1"> <input type="text" name="name" size="50"></font></td> </tr> <tr> <td width="21%" style="border-style: none; border-width: medium"> <font face="Verdana" size="1">E-mail:</font><font color="#FF0000" face="Verdana">&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; </font></td> <td width="79%" style="border-style: none; border-width: medium"> <font face="Verdana" size="1"> <input type="text" name="email" size="50"></font></td> </tr> <tr> <td width="21%" style="border-style: none; border-width: medium"> <font face="Verdana" size="1">Telefone:</font><font face="Verdana">:</font></td> <td width="79%" style="border-style: none; border-width: medium"> <font face="Verdana" size="1"> <input type="text" name="telefone" size="20">&nbsp; Fax :</font><font face="Verdana" size="1"><input type="text" name="fax" size="20"></font></td> </tr> <tr> <td width="21%" style="border-style: none; border-width: medium"> <font face="Verdana" size="1">Contato:&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; </font> <font face="Verdana">&nbsp;</font></td> <td width="79%" style="border-style: none; border-width: medium"> <font face="Verdana" size="1"> <input type="text" name="contato" size="50"></font></td> </tr> </table> <p align="left"> <font face="Verdana" size="1"> <br></font> <font face="Verdana" color="#FF0000"> &nbsp;</font><font face="Verdana" size="1">Mensagem<br> <textarea name="text" rows="5" cols="66" ></textarea></p> </font><font face="Verdana" size="1"> <center><input type="submit" value="Enviar Formulário"></center></font></td></table></center> </BODY> </HTML> ENVIAR.ASP ****************------------- INICIA AQUI --------------------*************** Por Favor não Remova os creditos, nem do ScriptBrasil, nem os Meus - Obrigado ****************************************************************************** <!-- ENVIAR.ASP - Exemplo de Form-mail para www.scriptbrasil.com.br --> <!-- Autor : Jair Issa - jair.issa@linksat.com.br --> <% 'Declarando variveis Dim sNameTo, sNameFrom, sEmailFrom, sText, sEmailTo, sAssunto Dim contato, tipomensagem, outroservico, name, telefone, fax 'Pegando os dados digitados nos campos e colocando em variaveis contato = Request.form("contato") name = Request.form("name") telefone = Request.form("telefone") fax = Request.form("telefone") tipomensagem = Request.form("TipoMensagem") outroassunto = Request.form("OutroAssunto") sNameFrom = Request.Form("name") sEmailFrom = Request.Form("email") sEmailTo = "EMAIL@DOMINIO.COM.BR" 'E-MAIL QUE O FORMULARIO SERA ENVIADO sNameTo = "Nome da Empresa" ´Seu Nome ou da Empresa que esta recebendo o formulario sText = Request.Form("text") sAssunto = Request.Form("Assunto") 'Cria o objeto set mailer = server.createobject("SMTPsvg.Mailer") Mailer.FromName = sNameFrom Mailer.FromAddress = sEmailFrom 'Host para envio de emails Mailer.RemoteHost = "127.0.0.1" Mailer.AddRecipient sEmailTo, sNameTo Mailer.Subject = "Fale Conosco" & " / " & SEmailFrom & " / " & name Mailer.AddBCC "Nome 2", "EMAIL@DOMINIO.COM.BR" 'e-MAIL QUE O fORMULARIO SERA ENVIADO 'Monta a texto para o envio strMsgHeader = "Data/Horario do Envio :" & date() & " / " & time() & vbCrLf & "DADOS ENVIADOS: " & vbCrLf & "Seu e-mail : (" & sEmailFrom & ") " & vbCrLf & "Empresa : " & name & vbCrLf & "Contato : " & contato & vbCrLf & "Tipo : " & tipomensagem& "/" & "Assunto :" & sAssunto & "/" & outroassunto & vbCrLf & "Telefone :" & telefone & " / " & "Fax: " & fax & vbCrLf & vbCrLf strMsgFooter = vbCrLf & "Mensagem: " & vbCrLf &sText Mailer.BodyText = strMsgHeader & strMsgFooter ' Se for enviado redirecionar para obrigado.asp if Mailer.SendMail then ' Response.Redirect "obrigado.asp" response.write ("<center>") response.write ("<table border='0' width='439'>") response.write ("<tr>") response.write ("<h2>") response.write ("<font color='#00B0FF'><b>Obrigado por utilizar nosssos Serviços!!</b></font>") response.write ("</h2>") response.write ("<h3>") response.write ("<p>Sua Mensagem foi enviada com sucesso. <p></font>") response.write ("</h3>") response.write ("</center>") 'Monta a texto para o envio response.write ("<br><h4><b><i>DADOS ENVIADOS: </i>") response.write ("<br>Data/Horario do Envio :" & date() & " / " & time()) response.write ("<br>Seu e-mail : " & sEmailFrom) response.write ("<br>Empresa : " & name) response.write ("<br>Contato : " & contato) response.write ("<br>Tipo : " & tipomensagem& "/" & "Assunto :" & sAssunto & "/" & outroassunto) response.write ("<br>Telefone :" & telefone & " / " & "Fax: " & fax) response.write ("<br>Mensagem Enviada : " &sText) response.write ("<p><p><h3>") response.write ("<p>Em breve entraremos em contato.</font>") response.write ("</h3>") else ' Se não for enviado mostra o erro que ocoreu Response.Write ("Ocorreu um erro.<BR>") Response.Write ("O Erro é " & Mailer.Response) end if %>
×
×
  • Criar Novo...