Ir para conteúdo
Fórum Script Brasil

Brunao

Membros
  • Total de itens

    56
  • Registro em

  • Última visita

Tudo que Brunao postou

  1. Ok, mas como faço pra zuar o cara q tentar me zuar, tipo abrir milhões de Alertas aqueles Alert de java script.
  2. Amigos, estou pedindo uma ajuda, pois fico revoltado com pessoas que dedicam seu tempo em destruir as coisa que levamos um grande tempo pra fazer. Esses que se dizem Hacker, mas na verdade são umas pessoas bossais que não tem o que fazer e se aproveitam de saber programar um pouquino e fazem o possível pra sacanear nois programadores que ficamos as vezes dias e dias sem dormir para acabar um site e tal. Então eu não quero apenas bloquear, quero ferra eles, se alguém tiver alguma sugestão diferente por favor post. Eis meu problema Tenho um site que tem o mural de recados, na primeira página tem aparece as 2 últimas mensagens, em 7 dias de funcionamento do site diversas pessoas já colocaram scripts pra zuar a página, tipo redirecionar pra outras paginas, travar o site enfim, zoar meu trabalho de dias e dias. Depois de pensar muito resolvi fazer um filtro mas um filtro que sacaneie quem qr me sacanear, como funcionaria. _O cara entra no Mural e escreve a mensagem, a mensagem é redirecionada, pra uma pag, chamada filtro, essa pagina testa se tem algumas palavras pré estabelecidas por mim exemplo: <script>. se tiver palavras definidas por mim (faça) Script que fica abrindo milhares de alerts pra esse cara ficar preso na pagina por horas ou ter q reiniciar Senão grava no Bd Normalmente O que eu não sei fazer é a parte de cadastrar as palavras e scripts q não quero no mural e depois fazer um script q testa e abre esses alerts q também não sei fazer.
  3. Brunao

    Problemas Com O If

    Boa Tarde galera. Estou com uma dúvida que julgo ser muito idiota, pois sou programador a muito tempo, mas fiquei um ano sem programar e to tendo muita dificuldade nisso. Acontece o seguinte: Eu tenho essa página ASP, que busca informações no BD, a página funciona corretamente, porém quero fazer um IF que veja se o campo RESPONSAVEL no BD estiver vazio ele não escreve nada. Valeu, Galera!!!! <%@LANGUAGE="VBSCRIPT" CODEPAGE="1252"%> <!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN" "http://www.w3.org/TR/html4/loose.dtd"> <html> <style type="text/css"> <!-- .style10 { font-family: Verdana, Arial, Helvetica, sans-serif; font-size: 14px; } .style11 { font-family: Verdana, Arial, Helvetica, sans-serif; color: #006666; font-weight: bold; font-size: 15px; } body { background-color: #EEEEEE; } a:link { color: #006666; } a:visited { color: #006666; } a:hover { color: #006666; } a:active { color: #006666; } --> </style> <%id= request.QueryString("id")%> <% Dim DB set DB = Server.CreateObject("ADODB.Connection") DB.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & server.mappath("../data/db_site.MDB") DB.mode = adModeRead DB.open Set rs = DB.Execute("SELECT * FROM casa_noturna WHERE id = "&id) %> <table width="600" border="0" cellpadding="0" cellspacing="1" bgcolor="#000000"> <tr> <td bgcolor="#eeeeee"><table width="100%" height="100%" border="0" cellpadding="0" cellspacing="0" bgcolor="#CCFF00"> <tr> <td valign="top"><table width="100%" height="10" border="0" cellpadding="0" cellspacing="0"> <tr> <td></td> </tr> </table> <table width="598" height="100" border="0" cellpadding="0" cellspacing="0"> <tr> <td width="9" height="100"></td> <td width="170"><img src="imagens/<%=rs.fields("logo")%>" width="170" height="100"></td> <td width="9"></td> <td width="398" align="left" valign="top"><span class="style11"><strong><%=rs.fields("estabelecimento")%></strong></span><br> <span class="style10"><%=rs.fields("endereco")%> - <%=rs.fields("bairro")%><br> (<%=rs.fields("ddd")%>) <%=rs.fields("tel1")%> | (<%=rs.fields("ddd")%>) <%=rs.fields("tel2")%><br> <%=rs.fields("cidade")%> - <%=rs.fields("estado")%></span> </td> <td width="12">&nbsp;</td> </tr> </table> <table width="100%" height="10" border="0" cellpadding="0" cellspacing="0"> <tr> <td></td> </tr> </table></td> </tr> </table> <table width="100%" height="1" border="0" cellpadding="0" cellspacing="0" bgcolor="#000000"> <tr> <td></td> </tr> </table> <table width="598" border="0" cellpadding="0" cellspacing="0"> <tr> <td width="10" height="19">&nbsp;</td> <td width="578"><span class="style10"><%=rs.fields("sobre")%> <br> [COLOR=red]<%if rs.fields("responsavel") = "" then%> <%else%> <strong>Respons&aacute;vel:</strong> <%=rs.fields("responsavel")%> <br> <%end if%>[/COLOR] <strong>Site:</strong> <a href="<%=rs.fields("site")%>"><%=rs.fields("site")%></a> <br> <strong>Email:</strong> <a href="mailto:<%=rs.fields("email")%>"><%=rs.fields("email")%></a> <br> <strong>Capacidade:</strong> <%=rs.fields("capacidade")%><br> <strong>Ambientes:</strong> <%=rs.fields("ambientes")%></span> </td> <td width="10">&nbsp;</td> </tr> </table> </td> </tr> </table> <% rs.Close SET rs = NOTHING SET DB = NOTHING %> </body> </html>
  4. Brunao

    Request

    Frequentemente nos deparamos em códigos prontos com esses Request e percebo que assim como eu muitas pessoas tem a mesma dúvida com relação a utilidade de cada um deles. Se cada um ajudar um pouquinho acho que rápidinho descobrimos a serventia de todos eles. Request.BinaryRead (count) Request.ClientCertificate (key) Request.Cookies (name) Request.Form (key) Request.QueryString (key) Request.ServerVariables Request.TotalBytes Obrigado a todos !!!
  5. Brunao

    Response

    Frequentemente nos deparamos em códigos prontos com esses Responses e percebo que assim como eu muitas pessoas tem a mesma dúvida com relação a utilidade de cada um deles. Se cada um ajudar um pouquinho acho que rápidinho descobrimos a serventia de todos eles. Response.AddHeader (name, value) Response.AppendToLog (String) Response.BinaryWrite (Data) Response.Buffer Response.CacheControl Response.Charset Response.Clear () Response.ContentType Response.Cookies (name) Response.End () Response.Expires Response.ExpiresAbsolute Response.Flush () Response.IsClientConnected Response.Pics Response.Redirect (URL) Response.Status Response.Write (String) Desde já Obrigado, a todos!!!
  6. Amigos minha dúvida é a seguinte, peguei um código pronto e estou com dúvida numa linha de comando, gostaria de saber se alguém pode me ajudar!!! tudo.src="http://pc200/vPUBS?SQL=select au_id, au_nome FROM authors WHERE state = '"+uf.value+"' FOR XML AUTO&root=root" onde tudo é um XML. Gostaria de saber o seguinte, eu sei que pc200 é o endereço da rede, vPUBS seria um endereço de banco de dados sql server?? é possivel fazer uma consulta desse jeito via javascript e XML??
  7. Brunao

    Datasrc E Datafld

    Ele chama um campo de estabelecimento, tipo - Credicard Hall Na verdade vai ter um While para que esse datafld busque no xml os estabelecimentos, daí eles aparecem no <select><option> para a pessoa selecionar. Não sei se consegui ser claro!! Estou aguardando, muito obrigado!!!
  8. Brunao

    Datasrc E Datafld

    <form name="form1" method="get" action="incluir2.asp"> <select name="estabelecimento"> <option><DATASRC=#Interno datafld=estabelecimento></option> </select> <br> <input type="submit" name="Submit" value="Enviar"> </form> Essa parte de vermelho é a parte que está errada, conto com a colaboração da galera!!! Abraços a Todos!!!
  9. <form name="form1" method="get" action="incluir2.asp"> <select name="estabelecimento"> <option><DATASRC=#Interno datafld=estabelecimento></option> </select> <br> <input type="submit" name="Submit" value="Enviar"> </form> Essa parte de vermelho é a parte que está errada, conto com a colaboração da galera!!! Abraços a Todos!!!
  10. Brunao

    Select

    <html> <head> <meta http-equiv="Content-Type" content="text/html; charset=iso-8859-1"> <style type="text/css"> <!-- .style1 { font-family: Verdana, Arial, Helvetica, sans-serif; font-size: 12px; font-weight: bold; } --> </style> </head> <body> <% Dim DB set DB = Server.CreateObject("ADODB.Connection") DB.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & server.mappath("..\db\balada.mdb") DB.mode = adModeRead DB.open Set rso = DB.Execute("SELECT DISTINCT Cidade FROM estabelecimentos WHERE cidade ORDER BY cidade ASC") %> <form name="form1" method="post" action=""> <p><span class="style1">Cidade:</span><br> <select name="cidade"> <%while not rso.eof%> <option><%=Response.Write(rso.fields("cidade"))%></option> <%rso.movenext%> <%wend%> <%rso.Close%> <%set rso = nothing%> </select> <br> <span class="style1">Estabelecimento: </span><br> <select name="select"> <% Set rs = DB.Execute("SELECT estabelecimento FROM estabelecimentos WHERE estabelecimento ORDER BY estabelecimento ASC") %> <%while not rs.eof%> <option><%=Response.Write(rs.fields("estabelecimento"))%></option> <%rs.movenext%> <%wend%> <%rs.Close%> <%set rs = nothing%> <%SET DB = NOTHING%> </select> </body> </html> O primeiro select seleciona as diferentes cidades, eu queria que o segundo select só mostrasse os estabelecimentos referente a cidade, como faço isso? Abraços !!!!
  11. Brunao

    Select

    Po galera obrigado, eu testei o tal distinct e caiu como uma luva para minha aplicação. Valeu mesmo!!!
  12. Brunao

    Select

    Tenho um BD que tem diversas pessoas cadastradas, eu quero fazer um select que me retorne todas as cidades diferentes : Tipo assim: no meu bd tem 5 caras de Santos, 10 de São Paulo, 20 de Manaus e 4 de Boa Vista, Eu gostaria que retornasse pra mim apenas Santos, São Paulo, Manaus e Boa Vista. Ocorre que quando faço um select normal ele retorna 5 vezes santos , 10 vezes São Paulo, 20 Vezes Manaus e 4 vezes Boa Vista. e na verdade eu quero que ele retorne apenas um registro de cada cidade diferente. BD.mdb Tabela1 - NOME - CIDADE Abraços a todos.
  13. Brunao

    Select P/ Expert

    Desculpa minha ignorancia o que é PM?? Esse link é um arquivo zip com o arquivo asp o BD e fotos, LINK
  14. Brunao

    Select P/ Expert

    Mudando de assunto, o bareta esse GMAIL é aquele email que é grandão da google?? Qual o tamanho dele? Ele é pago? Você poderia me enviar um convite para entrar nele? Meu email é baladas1000@hotmail.com . De qualquer forma obrigado.
  15. Brunao

    Select P/ Expert

    Tentei usar inner join em outros aplicativos e não consegui, nesse minha principal dificuldade está sendo criar um algoritimo que faça essa consulta, desculpa se fui folgado pedindo p/ que alguém baixasse o cód para tentar fazer, é porque virei a noite tentando fazer isso e ainda não consegui, estou cansado e estou tentando de tudo inclusive ajuda de companheiros. Vou deixar o link aqui se algué se interessar em me ajudar agradeço muito. Esse link é um arquivo zip com o arquivo asp o BD e fotos, LINK Abraços a todos.
  16. Brunao

    Select P/ Expert

    Talvez eu tenha errado no inner join, não gosto muito do inner join porque sempre erro. Vou disponibilizar um arquivo.zip com meu esse arquivo q não estou conseguindo fazer, junto com o bd e as fotos. Se você puder me ajudar agradeço muito. Abraços
  17. Brunao

    Select P/ Expert

    já tentei o inner join, mas me parece que ele não fumfa em access.
  18. Brunao

    Select P/ Expert

    Tenho 3 tabelas 1º USUARIOS Id - autonumeração Login - texto 2º FAVORITOS Regs - autonumeração Id_Usuarios - numero Id_Favoritos - numero 3º FOTOS Cod - autonumeração Id - numero Foto - texto (foto.jpg) O campo USUARIOS Id se relaciona com os campos FAVORITOS Id_Usuarios e FOTOS Id. Meu sistema é como o de fotologs. você adiciona seus Amigos/Favoritos e na tela do seu fotolog sempre aparece a ultima foto postada pelo seu amigo/favorito. Então eu gostaria de fazer exatamente isso, eu entro com o Id mas não sei como fazer um relacionamento dessas tabelas para ela me apresentar apenas a ultima foto de cada amigo/favorito. Creio que para um programador que manje bem de asp e sql resolva isso com apenas um select. Aguardo resposta pessoal, muito Obrigado!!!
  19. Brunao

    ---.eof / Not ---.eof

    .eof significa que o cursor chegou no fim dos registros do banco de dados. Quando fazemos esta condição while not rs.eof . . . wend Essa condição segnifica: Enquanto não chegar ao ultimo registro do banco de dados faça. Entendeu? Abraços
  20. Brunao

    If

    Para entenderem meu problema vou passar um site que faz o que quero fazer. Bom esse é o LINK Perceba quando você acessa esse link que aparece o seguinte endereço no browser: http://www.fotologbr.com.br/fotolog.asp?userid=2487 até aí beleza, mas quando você clica em algum thumb aparece o seguinte endereço no browser: http://www.fotologbr.com.br/fotolog.asp?us...7&fotoid=103866 , percebam que agora apareceu um fotoid=103866 . Eu quero que a minha página quando abra faça um teste tipo um if, da seguinte forma, se o fotoid for passado pelo endereço no browser então a variavel id é igual a fotoid, senão id = 1 Se o endereço no brouwser aparecer assim: http://www.fotologbr.com.br/fotolog.asp?userid=2487&fotoid=103866 id=request("fotoid") Senão --> http://www.fotologbr.com.br/fotolog.asp?userid=2487 Então id=1 Como faço essa condição (if) Obrigado
  21. É possível sim: O lance esta no select, vou passar um select que fiz em um código meu, você adpita pra vc, a parte que vai interessar pra você é o WHERE LIKE o % serve para dizer que ele seleciona todos os compromissos que tenham brasil no nome exemplo: -Se a sintaxe fosse brasil% ele selecionaria brasilia, brasilandia etc.. -Se a sintaxe fosse %brasil ele selecionaria obrasil, meubrasil etc.. -Se a sintaxe fosse %brasil% ele selecionaria tudo que contenha a palavra brasil <% "SELECT * FROM COMPROMISSO WHERE lugar LIKE %brasil%" %> Espero ter ajudado!!
  22. E ai galera beleza Gostaria de fazer uma rotina simples: A idéia é a seguinte, fazer um delay de 10 segundos, exemplo: -O programa manda um email para o primeiro usuario do banco de dados; - delay de 10 segundos; - manda um email para o segundo usuario do Banco de Dados; - delay de 10 segundos; e assim por diante até o último usuario do bd. A única coisa que não sei fazer é esse delay de 10 segundos, se alguém puder me ajudar. A parte de enviar os emails eu já fiz, queria que entre um e outro email ele esperasse 10 segundos. Desde já Valeu!!
  23. Brunao

    Galeria De Fotos

    Olha só eu tenho um site de baladas e tinha esse problema também, a melhor solução que eu encontrei foi o Photoshop. Você cria uma macro <acões> que faz exatamente o que você quér podendo até programar o tamanho máximo do arquivo. qualquer coisa, estou a disposição.
  24. Esse é um script de envio de Cartão postal. Está funcionando corretamente, porém a parte destacada em vermelho tá escrito numa linha só, quando tento coloca-las ordenadamente pulando linha dá erro. O que quero fazer é tipo assim descrito abaixo em azul: Lembrando que estou usando o componente Aspmail aguardo a colaboração!!!
  25. ASPMail ou CDONTS!!! O meu servidor suporta qualquer um dos dois!!! Você sabe como me ajudar?
×
×
  • Criar Novo...