Ir para conteúdo
Fórum CódigoFonte.net

lucas almeida

Membros
  • Total de itens

    35
  • Registro em

  • Última visita

Tudo que lucas almeida postou

  1. lucas almeida

    DELETE * FROM

    tenta assim: "Delete * From user_cadastro WHERE DataEmail < GetDate()"
  2. tenta assim: "INSERT INTO Cliente (Nome,Telefone) values ('" & nome & "','" & telefone & "')"
  3. Amigo, o que vc esta tentando fazer? se possivel post seu codigo p gente ver aonde esta o erro.. falow
  4. Oi Como se faz vai ser meio complicado para eu te explicar aqui...rs procure por tutoriais de ASP que vc aprendera....existem diversos tutoriais super bacanas de ASp espalhados pela net...google neles!rs Agora quanto ao banco de dados, ja que pelo vista voce vai utilizar ASP, recomendo SQL Server... Abraço Lucas
  5. Caro amigo, segue um tutorial muito legal para vc aprender a fazer seus proprios templates. http://forum.wmonline.com.br/index.php?showtopic=66199 Falow
  6. Olá, vou postar aqui um tutorial de imagem aleatória com PHP... Lá vai: Vô explica um poco passo a passo com os comentários para as pessoas que querem aprender como funciona: Se caso esse nao serveir, pode baixar um codigo nesse endereço: http://www.scriptbrasil.com.br/download/codigo/2758/ PHP <?php function imagem_de_erro($msg, $bg = array(255, 0, 0), $txt = array(0, 0, 0)){ $img = imagecreate(350, 120); //cria a imagem de erro $bg_col = imagecolorallocate($err_img, $bg[0], $bg[1], $bg[2]); //a cor de fundo... a primeira chamada pra essa função sempre coloca a cor de fundo. $txt_col = imagecolorallocate($err_img, $txt[0], $txt[1], $txt[2]); // agora define uma nova cor pra usa no texto imagestring($img, 1, 200, 100, $msg, $txt_col); //escreve o que foi enviado no parâmetro $msg na imagem imagejpeg($img); //envia a imagem pro navegador imagedestroy($img); //limpa a memória relacionada à imagem, como já foi pro navegador não é mais de nossa importância. } //função pra quando deu algum erro qualquer. /** Nota: eu ainda não obtive nenhum erro (com ou sem propósito), então eu não sei até que ponto esta função funciona... **/ $dir = @opendir("imagens"); //abre o diretório imagens. É lá onde você deve despejar suas imagens if($dir == false){ //verifica se ocorreu um erro ao abrir o diretório imagens (por exemplo, não existe tal diretório...) imagem_de_erro("Ocorreu um erro na hora de abrir o diretório."); } else{ $imagens = array(); //eu prefire declarar minha array antes de usa-la... while(($arquivo = readdir($dir)) !== false){ //agora vai lendo o diretório e encontrando os arquivos e pegando somente as imagens $explode = explode(".", $arquivo); //separa o nome do tipo $formato = $explode[count($explode) - 1]; //pega somente o formato. Esse count ali é só no caso de vc querer nomear a imagem "minha.imagem.jpg" por algum motivo... if($formato == "jpg" || $formato == "jpeg" || $formato == "png" || $formato == "gif"){ array_push($imagens, $arquivo); /*apenas se for de algum dos formatos desejados que a imagem é adicionada à nossa array de imagens. Se não for, não vai pra array e pronto. vc pode adicionar mais formatos ali adicionando mais '|| $formato == "ext"' ali, mas tem q ver lá no php.net se o formato é suportado*/ } } if(count($imagens) < 1){ //se não tinha nenhuma imagem, mostra um erro. imagem_de_erro("Não existem imagens no diretório."); } else{ $arr_shuffle = shuffle($imagens); //pra ajuda mais um pouco na aleatorização. Só com o rand tava muito repetitivo $aleatorio = rand(0, count($imagens) - 1); //pega um número qualquer pra ser usado na array $imagem_selecionada = $imagens[$aleatorio]; $imagem_selecionada = "imagens/".$imagem_selecionada; //pega uma imagem qualquer da array imagens e combina com "imagens/" pra n da erro $formato_imagem = explode(".", $imagem_selecionada); $formato_imagem = $formato_imagem[count($formato_imagem) - 1]; //vc deve se lembrar do while logo acima... if($formato_imagem == "jpg" || $formato_imagem == "jpeg"){ //se a imagem for JPG, então cria a imagem de uma jpg, manda uma jpg pro navegador e limpa a memória $img = imagecreatefromjpeg($imagem_selecionada); imagejpeg($img); imagedestroy($img); } elseif($formato_imagem == "png"){ //mesma coisa, agora com PNG $img = imagecreatefrompng($imagem_selecionada); imagepng($img); imagedestroy($img); } elseif($formato_imagem == "gif"){ //sem muita utilidade, já que GIF animado só em sonhos msm... mas lá vai. $img = imagecreatefromgif($imagem_selecionada); imagegif($img); imagedestroy($img); } else{ imagem_de_erro("Tipo de imagem desconhecido."); //n pergunte como uma imagem diferente foi parar aqui. } } } ?> Como usar: coloca assim no seu site: <img src="imagem.php" /> sendo imagem.php o link para o arquivo PHP onde vc colocou o script todo ali em cima. Se vc quiser usar em um fórum (onde tem essa coisa toda de não deixa passa imagem q n siga as regras (q são basicamente n pode ter interrogação (?) e tem q terminar com .jpg, .gif, etc...)), vc tem q criar uma pasta q termina com .jpg, .png ou .gif, e salvar esse script como index.php nessa pasta. Daí funciona da mesma maneira, mas vc pode chamar assim: <img src="imagem.jpg" /> q vai aparece a imagem como no código acima. Claro q no caso fizemos essa gambiarra toda ai só pra pode usa num fórum, pois então: CODE Assim q ficaria. Abraços!
  7. Cara, qto ao template, da uma olhada nesse endereço http://forum.wmonline.com.br/index.php?showtopic=66199 tem um tuto legal ai... falows
  8. Cara, O nome dele é editor html em asp. É um código em asp. Está disponível em http://www.superasp.com.br/download_popup.asp?id=271 O download é muito rápido. Copiei o código... espero q te ajude! <% arquivo = request("arquivo") ' Gravação da alteração if request("fill")=1 then Dim objFSO, objCountFile Dim strCountFileName strCountFileName = Server.MapPath(arquivo) Set objFSO = Server.CreateObject("Scripting.FileSystemObject") Set objCountFile = objFSO.CreateTextFile(strCountFileName, True) objCountFile.Write request("texto") objCountFile.Close Set objCountFile = Nothing Set objFSO = Nothing ' Ação depois da alteração response.redirect("editor.asp?arquivo=" & arquivo) else ' Verifica se existe o texto a ser editado if arquivo <> "" then Set objFSO = Server.CreateObject("Scripting.FileSystemObject") Set objFolder = objFSO.GetFolder(Server.MapPath(".")) existe = 0 For Each objFile in objFolder.Files if right(objFile,len(arquivo)) = arquivo then existe = 1 end if next Set objFolder = Nothing Set objFSO = Nothing end if if existe = 1 then ' Se existir, lê o texto atual Set fs = Server.CreateObject("Scripting.FileSystemObject") Set arq = fs.OpenTextFile(server.MapPath(arquivo)) Do while Arq.AtEndOfStream = false texto = texto & arq.Readline Loop ' Texto encontrado texto = left(texto,len(texto)) texto = replace(texto,chr(34),"'",1) Set fs = nothing Set arq = nothing else ' Texto não encontrado response.write "Texto não encontrado!" end if %> <html> <HEAD> <script LANGUAGE="JavaScript"> function Pick_Text(f) { f.elements.texto.value = document.all.editor.html + ""; } </SCRIPT> <script LANGUAGE="JavaScript"> function Preencher() { document.all.editor.html = <%= chr(34) & texto & chr(34) %>; } </SCRIPT> </HEAD> <BODY onload="Preencher();" leftmargin="20" topmargin="20"> <FORM METHOD="POST" NAME="XXX" ACTION="editor.asp" onSubmit="Pick_Text(this);"> <TEXTAREA NAME="texto" STYLE="display: none"></TEXTAREA> <OBJECT ID=editor DATA="editor.htm" TYPE="text/x-scriptlet" WIDTH="450" HEIGHT="300"> <!-- Isto só é exibido em browsers que não suportam scriptlets --> </OBJECT> <br> <INPUT TYPE="Submit" NAME="submit" VALUE="Salvar"> <INPUT TYPE="Hidden" NAME="fill" VALUE="1"> <INPUT TYPE="Hidden" NAME="arquivo" VALUE='<%= arquivo %>'> </FORM> <% end if %>
  9. Já tentou aplicar o CSS diretamente no objeto iframe? .conteudo{ overflow-x: hidden; } <iframe class="conteudo"....>
  10. cara, pelo visto vc deixou blocos em aberto... tipo <inicio> .... <fim> nao deve ter fechado os blocos corretamente tenta aí
  11. cara, posta seu html aí p gente dar uma olhada
  12. achei q fosse 0800 de acordo com as regras aqui não poder ser utilizado como meio d vendas! ok?!
  13. nada cara... o pessoal ta desanmimando de postar aqui por falta de ajuda.... o moderador ta meio ausente... coloca um moderador presente aqui pra vc ver se esse forum de ASP não vai bombar.. o do imasters ta bombando, o pessoal procura ajudar com a maior tempestidade possivel... isso ai q funfa!rs tem mta gente q mexe com ASp.....não é a melhor linguagem mas é meu ganha pao!hehehe abração
  14. Pessoal Toda vez q visito esse toopico de ASP vejo um monte de duvidas antigas... Alguem tem noticia do moderador do ASP???? Entao vammos tentar ajudar nossos colegas, quando da eu respondo algumas coisas... vamos nos mesmo colaborar um com os outros.... PROCURA-SE O MODERADOR DE ASP!!!rsrsrs Abraço a todos
  15. Cara, se entendi direito vc pode fazer isso em "vbscript", aí vc agenda no servidor para ele ser executado de x em x dias....saca? VBS e ASp é a mesma coisa... da uma pesquisa sobre script vbs... faloeee
  16. po brtoher ja tinha te resolvido mas fiz mais ou menos isso mesmo!!! valeu cara
  17. hehehe eu mesmo nao entendi....rs
  18. Cara, vc pode fazer o seguinte... Imaginando q as pessoas ja estao cadastradas no banco... Vamos supor q a pessoa entre no site mas nao tenha acesso ao item "noticias" no menu.... na parte noticia do menu, vc faz um If...tipo <% If Co_acesso=1 then %> ..... aqui o seu html... ..... <% End If%> eu faço assim cara.......tenta fazer alguma assim....
  19. Amigo, Ao inves de ser radio buton vc quer uma caixa de selecao para suas opções?
  20. Como assim? não entendi... só podera ter até 30 caracteres?
  21. lucas almeida

    Ajuda com email em ASP

    Pessoal Preciso de uma ajuda de voces... Fiz uma página em ASP que envia o email, aí quando faço o teste na pag e envio o email, ele chega assim... 2 Salientamos que já foram executados os procedimentos padrões de verificação neste AR (monitoração do SITAG, link e ativos). CGC - Nome da unidade Horario de inicio do problema 7435-PV BARREIRO/12:06:00 7174-GIFUGBH/21:12:12 0081-PV TUPINAMBAS/54:45:54 eu queria que ele chegasse sempre assim: CGC - Nome da unidade Horario de inicio do problema 7435-PV BARREIRO 12:06:00 7174-GIFUGBH 21:12:12 0081-PV TUPINAMBAS 54:45:54 não quero que os dados cheguem de forma desordenada....só isso.. vou postar meu codigo que envia o email para ver se vcs podem me ajudar.. '---------------------------------ENVIO DE EMAIL-------------------------------------- '"À<br> GISUTBH02<br>C/c GIFUG/BH<br><br> 1&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;Favor realizar as alterações abaixo:<br><br>1.1&nbsp;&nbsp;&nbsp; Favor incluir no Servidor :"&servidor&", Grupo: "&grupo&" o (os) usuário (os): "&matricula&".<br><br>Atenciosamente,<br> "&strNome&" - "&strMatricula&"<br>GIFUG/BH" Set objMail = Server.CreateObject("CDONTS.NewMail") objMail.From= ""&strMatricula&"@mail.dominio" 'objMail.To= ""&strMatricula&"@mail.dominio" objMail.To= "[email protected];"&strMatricula&"@mail.dominio" 'objMail.CC=""&strCp_gerencia&"@mail.dominio" objMail.Subject="#05 - PV com status NR no SIWAM" objMail.BodyFormat=0 objMail.MailFormat=0 body= "<html>" _ & "<head>" _ & "</head>" _ & "<body bgcolor=""white"">" _ & "<font face=""Arial"" size=""2"">" _ & "<font face=""Arial"" size=""2"" color=""black"">Ao </font><br> "_ & "<font face=""Arial"" size=""2"" color=""black"">Suporte</font><br>"_ & "<font face=""Arial"" size=""2"" color=""black"">c/c Relacionamento</font><br><br> "_ & "<font face=""Arial"" size=""2"" color=""black"">1&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; Informamos que os PV relacionados abaixo estão com status NR (não responde) no sistema SIWAM (http://www.siwam.coresp.dominio/):<br><br>"_ & "<font face=""Arial"" size=""2"" color=""black"">2&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; Salientamos que já foram executados os procedimentos padrões de verificação neste AR (monitoração do SITAG, link e ativos).</font><br><br>" body= body& "<DL><dd><font face=""Arial"" size=""2"" color=""black""> CGC - Nome da unidade &nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; Hora inicio do problema</font>" body= body& "<font face=""Arial"" size=""2"" color=""black"">&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; "& Replace(texto, vbcrlf,"<br>")&" </font><br></dl>" body= body & "<font face=""Arial"" size=""2"" color=""black"">3&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; Solicitamos providências desse Suporte com relação aos servidores.</font><br><br>"_ & "<font face=""Arial"" size=""2"" color=""black"">Atenciosamente</font><br>"_ & "<font face=""Arial"" size=""2"" color=""black"">"& strNome&" - "& strMatricula&".</font><br> "_ & "<font face=""Arial"" size=""2"" color=""black"">Ambiente de Rede</font><br> "_ & "</body>" _ & "</html>" grato Lucas Ops Acabou que o exempo q eu coloquei nao ficaram formatados mas é para ficar tipo quando tem tabela com borda"0"...
  22. Pessoal Preciso de uma ajuda, é o seguinte, tenho esse campo abaixo:(code) Só que não to conseguindo fazer 2 coisas em java script. 1º o campo so pode aceitar valores numericos, caso contrario um alert advertindo o usuario. 2º se o cara não preencher os 19 caracteres certinho não aceitar o submit, e voltar pra mesma tela! <tr> <td width="31%" height="25"><font face="Arial" size="2">Número do Patrimonio</font></td> <td width="78%" height="25"><input type="text" name="txtDs_Patrimonio" size="20"maxlength="19" value="<%=session("Ds_Patrimonio")%>" onkeyPress="formatar(this,'(##)##.##.###.#####',event)"> <font face="arial" color="red" size="1"> Ex.:(11)25.02.234.23456</font></td> </tr> Será que alguem pode me ajudar?
×
×
  • Criar Novo...