Ir para conteúdo
Fórum Script Brasil

igor.damiano

Membros
  • Total de itens

    102
  • Registro em

  • Última visita

Tudo que igor.damiano postou

  1. igor.damiano

    Email

    Reginaldo ASP, já programo com BD e Cdonts... Queria um script pra mandar pra vários usuários que estejam cadastrados em tal data.... urso.louco, esse newsletter que passou é em xml... complicado... seria um bem simples mesmo em asp pra ver como funciona ... Valeu
  2. igor.damiano

    Email

    Eu tenho um cadastro de usuários e gostaria de enviar um email para eles, mas sem ser de um por um... Como faço para enviar para todas as pessoas ? O que quero fazer mesmo, é selecionar uma data(data de nascimento) e todos usuários que tiverem essa data, vai um email... Alguém pode postar um script que faço isso... Valeu
  3. igor.damiano

    Paginação

    Estou tentando fazer paginação, mas está dando esse erro: ___________________________ ADODB.Recordset error '800a0cb3' O provedor não dá suporte à operação solicitada pelo aplicativo. /leilao/pedido/paginacao.asp, line 37 ______________________ Que é bem nessa linha: RS.AbsolutePage=intpagina Se comentar essa linha, o resto do script funciona, mas não corretamente... Vou postar o script de paginação e o de conexão: Paginação: <!--#Include file="conexao.inc"--> <% Dim conexaodb, rs, sql '-------------------------------------------------------------------------- 'Vamos criar o objeto Record Set -> neste caso é necessário declará-lo, 'pois vamos utilizar algumas funções deste objeto Set RS = Server.CreateObject("adodb.recordset") RS.PageSize = 5 'quantidade de registros por página. Você pode alterar sem conforme precise. 'Vamos fazer a busca na tabela contatos SQL = "select * from resp_pedidos " call abreconexao set RS = conexaodb.execute(SQL) 'Vamos agora verificar exceções do tipo “fim de arquivo” (EOF), se a página atual é menor 'que zero, se é maior que o número total de páginas, etc. IF RS.EOF then Response.Write "nenhum registro encontrado" Response.End 'paramos o programa ELSE 'Definindo em qual pagina o visitante está IF Request.QueryString("pagina")="" then intpagina=1 ELSE IF cint(Request.QueryString("pagina"))<1 then intpagina=1 ELSE IF cint(Request.QueryString("pagina"))> RS.PageCount then intpagina=RS.PageCount ELSE intpagina=Request.QueryString("pagina") END IF END IF END IF END IF 'Fim das verificações de exceções 'Usamos a propriedade AbsolutePage para dizer ao RS que página ele esta RS.AbsolutePage=intpagina ' Inicia o contador que vai controlar os registros mostrados intrec=0 'Enquanto o contador for menor que a quantidade de registros mostrados ou ' não for o final do arquivo While intrec < RS.PageSize and not RS.EOF '------------------- AQUI VEM TUDO O QUE SEÁ PAGINADO ----------------------- response.write RS("cnpj") & " - " & RS("fone") & " - " & RS("email") & "<BR>" '--------------------------------------------------------------------------------------------- RS.MoveNext ' Acrescenta +1 ao contador intrec=intrec+1 'Se for EOF (fim de arquivo), imprimir branco na tela IF RS.EOF then response.write " " END IF Wend 'fim do loop 'Vamos verificar se não é a página 1, para podermos colocar o link “anterior”. IF intpagina > 1 then %> <a href="paginacao.asp?pagina=<%=intpagina-1%>">Anterior</a> <% END IF 'Se não estivermos no último registro contado, então é mostrado o link p/ a próxima página IF strcomp(intpagina,RS.PageCount) <> 0 then %> <a href="paginacao.asp?pagina=<%=intpagina + 1%>">Próxima</a> <% END IF %> _____________________ Aqui o de conexao: <% sub AbreConexao const cntCaminho ="D:\leilao\database\base.mdb" set conexaodb =Server.CreateObject("ADODB.Connection") conexaodb.open "driver={Microsoft Access Driver (*.mdb)};dbq=" & cntCaminho end sub sub FechaConexao conexaodb.close set conexaodb = nothing end sub %> ______________________ Por favor me ajudem a ver o que é esse erro e a corrigir.... Obrigado
  4. Como fazer botões personalizados ??? Que são coloridos, não esses cinzas(<input type="submit" value="Continuar -&gt;" name="btFecha">) ??? Alguém pode me passar um exemplo de um botão personalizado ???? Valeu
  5. O Jissa falou pra fazer assim, mas não consegui... Faz assim.. no link do pop coloca TARGET=Nova e coloca o CLOSE() para fechar o POP. Por Favor me passa a linha completa do href fazendo isso acima....
  6. O Jissa falou pra fazer assim, mas não consegui... Faz assim.. no link do pop coloca TARGET=Nova e coloca o CLOSE() para fechar o POP. Por Favor me passa a linha completa do href fazendo isso acima.... ----------------------------------- Tenho o script de abrir um POPUP, nesse POPUP tem um link, queria saber se tem como fazer isso: Quando clicar no link, fechar o POPUP, abrir uma nova janela e ir para a página do LINK ??? porque quando clico no link do POPUP, ele abre a página do link no proprio POPUP... Se alguém puder colocar o script para fazer isso ... Valeu
  7. Estava pensando em montar meu próprio servidor de web em casa... A única dúvida que tenho, é em relação ao servidor de email: Para enviar os email&acute;s, tudo bem, uso o próprio SMTP do win2000, mas para receber, como faço ??? Sei que tenho que ter um serviço POP, mas aonde consigo ele ??? E como funciona o recebimento de email&acute;s, quando o cara te manda um email, ele fica armazenado aonde???? E nesse servidor POP, tem que configurar o seu dominio ??? Gostaria que me explicassem legal essa parte de recebimento de email&acute;s e quais programas usar ... Se possivel, sites que falam a respeito ... Obrigado
  8. Estava pensando em montar meu próprio servidor de web em casa... A única dúvida que tenho, é em relação ao servidor de email: Para enviar os email&acute;s, tudo bem, uso o próprio SMTP do win2000, mas para receber, como faço ??? Sei que tenho que ter um serviço POP, mas aonde consigo ele ??? E como funciona o recebimento de email&acute;s, quando o cara te manda um email, ele fica armazenado aonde???? E nesse servidor POP, tem que configurar o seu dominio ??? Gostaria que me explicassem legal essa parte de recebimento de email&acute;s e quais programas usar ... Se possivel, sites que falam a respeito ... Obrigado
  9. Pessoal, sou iniciante em php e gostaria de rodar sites em PHP em meu servidor win2000. Me disseram que é só instalar o PHP e configurar o IIS, é só isso? Gostaria que me passassem um esquema para fazer a instalação e configuração para rodar PHP no Win2000. E que tbe me indicassem sites em português que fale a respeito disso ... Valeu
  10. igor.damiano

    Correio E Sedex

    Alguém tem algum script para cep que quando o cara digitar o cep, já preenche o formulário com os dados rua/bairro... E um para calcular o sedex.
  11. igor.damiano

    Upload

    Alguém tem algum script de upload que não usa componentes, grava no Banco de Dados e que define o tamanho e o tipo de arquivo ???? Se puderem me arrumar agradeço... Valeu
  12. igor.damiano

    Webmail

    Foi mal não explicar direito, é para baixar o webmail e colocar no meu site.... Valeu
  13. igor.damiano

    Webmail

    Pessoal, onde consigo baixar um bom webmail gratuito e em português para colocar no meu site e que vocês recomendam ??? Se possível, postem os links... Valeu
  14. Como desabilitar os menus SALVAR COMO(Arquivo, salvar como) e CÓDIGO FONTE(do menu exibir, código fonte) ?
  15. igor.damiano

    Spam

    beleza Pgmador! Desculpe, mas prefiro não dizer o meu site. E você que tem me ajudado muito... Acho p*** sacanagem essas listas negras, bloquear o seu site por spam... Tbe não leio os email´s que não quero, abro meu email no webmail primeiro, apago os email´s que não prestam e depois baixo eles pra minha máquina. Mas existem uns caras que não tem o que fazer e ferram o teu site...
  16. Tenho o script para desabilitar o botão direito do mouse, mas se o sujeito for no menu EXIBIR depois EXIBIR CÓDIGO FONTE, ele consegue pegar todo o fonte. E se o sujeito for no menu ARQUIVO e SALVAR COMO, também consegue pegar o fonte. Como faço para proteger o código fonte disso ??? Vocês poderiam passar o script??? Valeu
  17. igor.damiano

    Spam

    O que acham ?
  18. Pessoal, estou tendo problemas para alterar dados do cadastro no menu suspenso, mas precisamenente quando chamo o dado cadastrado. Eu tenho a tabela ESTADO onde tem todos os estados e a tabela DADOS, onde gravo o estado que o usuário escolher no cadastro entre as demais informações que preenche. Acontece o seguinte, consigo gravar todos os dados corretamente, mas quando chamo as informações para o usuário alterar, no menu suspenso, vem a primeira informação da tabela e não a que gravou. Ex.: O usuário é de SP e escolheu o estado SP, mas quando vai alterar, aparece AM que é a primeira informação da tabela ESTADO. Abaixo estão os scripts: Aqui é na hora do cadastro: <% Dim conexaodb,rsCat,strSQL strSQL = "SELECT * FROM ESTADO ORDER BY ESTADO" Call abreconexao set rsCat = conexaodb.Execute(strSQL) %> <font color=black size=2 face="verdana">2: <td> <SELECT name="ESTADO" > <% Do while not rsCat.EOF %> <option value="<% = rsCat("estado")%>"><% = rsCat("estado")%> </option> <% rsCat.MoveNext LOOP rsCat.close set rsCat = Nothing %> </SELECT> Aqui é quando puxo as informações para serem alteradas <% Dim conexaodb,rsCat,strSQL strSQL = "SELECT * FROM ESTADO ORDER BY ESTADO" Call abreconexao set rsCat = conexaodb.Execute(strSQL) %> <tr><td><font color=black size=2 face=verdana>Interesse1:</td> <td> <SELECT name="estado" > <% Do while not rsCat.EOF %> <option value="<% = rsCat("estado")%>"><% = rsCat("estado")%> </option> <% rsCat.MoveNext LOOP rsCat.close set rsCat = Nothing %> </SELECT> Ao invés de aparecer SP, como no exemplo, aparece AM. Já tentei puxar as informações assim: <% Dim conexaodb,rsCat,strSQL strSQL = "SELECT * FROM DADOS" Call abreconexao set rsCat = conexaodb.Execute(strSQL) %> <tr><td><font color=black size=2 face=verdana>Interesse1:</td> <td> <SELECT name="estado" > <% Do while not rsCat.EOF %> <option value="<% = rsCat("estado")%>"><% = rsCat("estado")%> </option> <% rsCat.MoveNext LOOP rsCat.close set rsCat = Nothing %> </SELECT> Mas aparece o estado correto que é SP, mas somente SP, não aparece os outros estados. Gostaria que me ajudassem a puxar o estado correto da tabela que é gravado o estado e que aparece os demais para o usuário trocar. Valeu e espero que me ajudem como sempre... Abraços
  19. Eu tenho um site e preciso divulgar ele. Como faço para enviar email para as pessoas sem caracterizar que seja SPAM ? Alguém pode me ajudar ???? Valeu
  20. igor.damiano

    Spam

    Estou alterando para colocar o que o servidor onde hospedo meu site disse sobre spam: "NÃO VOU dizer o nome do servidor em que hospeda meu site". Existe uma "black list", onde os sites que recebem email´s, principalmente provedores, que acham que são spam, incluem o ip do site de hospedagem nessa tal "black list". O que acontece se o ip estiver lá: Todos os clientes do site de hospedagem não conseguem enviar email´s para o site/provedor que colocou o ip nessa "black list", bloqueia todos email´s que tiverem o ip nessa "black list". Ferra todos os clientes do site de hospedagem, o email nem chega no destinatario. Pelo que sei, essas listas negras são proibidas, pegando como exemplo, pessoas que colocam a empresa na justiça do trabalho e a empresa coloca o nome da pessoa nessas listas negras e o cara não arruma emprego. O que você´s acham disso ??? Eu tenho um site e preciso divulgar ele. Como faço para enviar email para as pessoas sem caracterizar que seja SPAM ? Alguém pode me ajudar ???? Valeu
  21. Alguém sabe o dódigo hexa da cor OURO ?
  22. igor.damiano

    Cor Ouro

    Alguém sabe o dódigo hexa da cor OURO ?
  23. Pessoal, estou precisando de uma função de data para data de vencimento. Gostaria de uma função bem simples, que só mostre a data do vencimento no seguinte formato: DD/MM/AAAA. O vencimento é de 7 dias da data de geração. Por favor, preciso urgente Obrigado
  24. Pessoal, poderiam me indicar os servidores/sites que hospedam ASP GRATUITAMENTE e que rode legal o CDONTS ???? Agradeço
  25. Tenho 5 banners diferentes e gostaria que eles aparecessem cada um em seu horário respectivo na mesma área da página. Como isso pode ser feito ? <script LANGUAGE = "JAVASCRIPT"> var dataHora,xHora,xDia,dia,mes,ano,mostre; dataHora = new Date(); xHora = dataHora.getHours(); {local = ".html"} if (xHora >= 0 && xHora < 12) {mostre = "banner1"} if (xHora >= 12 && xHora < 18) {mostre = "banner2"} if (xHora >= 18 && xHora <= 23) {mostre = "banner3"} document.write(mostre + local); <!--#Include file="document.write(mostre + local);"--> </SCRIPT> Coloquei dessa maneira, mas não funciona. Alguém pode me ajudar e me passar um script desse ? Obrigado
×
×
  • Criar Novo...