Ir para conteúdo
Fórum Script Brasil

Marcos-rj

Membros
  • Total de itens

    638
  • Registro em

  • Última visita

Tudo que Marcos-rj postou

  1. me diz uma coisa, o upload está sendo feito certinho p/ a pasta configurada? e este arquivo vai ser enviado por email?
  2. está repetindo os tópicos várias vezes!!!
  3. upload sem componentes Upload sem componentes
  4. você precisa enviar o arquivo p/ o servidor usando algum componente p/ fazer o upload, e na propriedade .AttachFile do cdonts colocar o endereço completo do arquivo.
  5. são 2 passos para enviar um e-mail com anexo a partir de um formulario. Passo 1: Fazer upload do arquivo. Passo 2: Fazer o envio de e-mail, colocando no caminho do anexo o caminho do arquivo no qual foi feito o upload. no cdonts objMail.AttachFile Server.MapPath("pasta/nomedoarquivo")
  6. O nome do componente é Persits ASPEmail Set Mail = Server.CreateObject("Persits.MailSender") Manual ASPEmail
  7. Da uma ligada p/ seu provedor e vê se eles mudaram alguma coisa e se ainda tem este componente.
  8. Marcos-rj

    Erro '80040e14'

    A linha 111 faz a execução desta sql; MM_editQuery = "delete from " & MM_editTable & " where " & MM_editColumn & " = " & MM_recordId
  9. Marcos-rj

    Enviar E-mail

    na conexao você não colocou o nome do banco de dados. db = "dados/arvore"
  10. Marcos-rj

    Email...

    você não consegue enviar o e-mail pois da erro, ou está querendo enviar junto um anexo? Ou as duas coisas?
  11. Marcos-rj

    Email...

    O seu servidor tem CDONTS?
  12. Dá para fazer em ASP, mas você não acha melhor em javascript? Pois valida antes de enviar o form.
  13. Marcos-rj

    Enviar E-mail

    não esta funcionando pois tem um erro. No formulário não tem o campo chamado USUARIO e sim EMAIL. tenta colocar assim: email = request.form("email") SQL = "Select email, senha from Admin where email = '" & email & "' "
  14. Continua a mesma coisa, vou fatiar a imagm em tres p/ ver se resolve. Topo, meio e fim e colocar numa tabela. valeu
  15. Ele est assim: criei uma tabela, joguei a imagem dentro, e usando div p/ colocar os dados na posição.
  16. Fiz uma página p/ impressão de dodos vindos de um formulário. nesta página coloquei uma imagem no fundo e usei camadas p/ colocar os dados na posição que quqero imprimir. Só que quando mando imprimir a imagem está reduzindo sozinha. a imagem tem + ou - o tamanho de uma folha A4, ela esta com os tamanhos width="595" height="792". alguém sabe dizer por que ela reduz automanticamente? fica quase a metade da folha A4!
  17. <style> @page { @top-left{ content: ""; } @bottom-center { content: ""; } } </style>
  18. Marcos-rj

    Buscando Info No Bd Access

    Como está o Select? E coloca a conexao com o banco.
  19. Qual o tamanho? manda p/ mim. carioca.marcos@gmail.com
  20. eu vi, estou tentando pegar também.
  21. Estive estudando seu código, mas endereço da página mudou para: http://www.correios.com.br/servicos/cep/ce...p;cep=20231-046
  22. Marcos-rj

    Buscando Info No Bd Access

    posta o código de como está agora: Pelo que vi no seu código, parece que dá este erro pois você está usando mesmo nome en 2 recordsets, Set rs 2x. No 2º select coloca outro nome. Set rs1, ou qualquer outro.
  23. Marcos-rj

    Buscando Info No Bd Access

    tira o "FechaConexao" não existe neste código!
  24. Marcos-rj

    Buscando Info No Bd Access

    Set Conexao = CreateObject("ADODB.CONNECTION") DSNtemp="DRIVER={Microsoft Access Driver (*.mdb)}; " & "DBQ=" & server.mappath("../../../dados/arvore.mdb") conexao.Open DSNtemp
  25. Marcos-rj

    Buscando Info No Bd Access

    Pra falar a verdade já esperava que desse erro. Vamos trocar sua conexão com banco de dados? tenta assim: <% vIota = request.form("Iota") Set Conexao = CreateObject("ADODB.CONNECTION") DSNtemp="DRIVER={Microsoft Access Driver (*.mdb)}; " & "DBQ=" & server.mappath("../../../dados/arvore.mdb") sqlstmt = "SELECT * FROM prlist WHERE Iota like '%" & vIota & "%' " Set rs = Server.CreateObject("ADODB.Recordset") rs.Open sqlstmt, conexao, 3, 3 totalrecs = rs.recordcount achei="sim" if rs.eof then%> e coloca o select assim denovo. <%Sql = "SELECT * FROM prlist ORDER BY Iota" Set rs = Conexao.Execute(Sql) While not rs.EOF %> vê se funciona.
×
×
  • Criar Novo...