Ir para conteúdo
Fórum Script Brasil
  • 0

Problemas Com O Script

bolomaster

Perguntado por bolomaster,

 Share

Pergunta

bolomaster

bolomaster

Postado
Postado

Bem pessoal este script é de um sistema de informativo que desenvolvi aqui.

ele funcionou o mês de maio perfeitamente, so que quando foi no mês de junho ele parou de funcionar ele parou assim na virada do dia 31 para o dia 01, e agora ele não retorna registro nenhum sempre diz que nenhum registro foi encontrado. e olhe que tem informaçoes no banco de dados. gostaria que vocês ME AJUDASSEM A LOCALIZAR O PROBLEMA PARA QUEM QUISER TESTAR VOU DEIXAR UM LINK DOS ARQUIVOS DO INFORMATIVO OK

o nome do script é enviarposts.asp

Arquivos

aguardarei a ajuda de vocês. até breve

segue abaixo o codigo que não esta funcionando 

<% Session.LCID = 1046 %>
<%

dim caminho, hora, data, titulo, texto, enviadopor, htmlemail, mail, db, rs, sql, dataini, datafim, id
   
 dataini = date()-1&" 19:00:00"
 datafim = date()&" 18:59:59" 
  set db = server.CreateObject("ADODB.connection")
     set rs = Server.CreateObject("ADODB.RecordSet")
     caminho = server.MapPath("dados/informativo2.mdb")
       db.open "Driver={Microsoft Access Driver (*.mdb)};DBQ=" & caminho
           sql = "Select * from informativos where hora between #"&dataini&"# and #"&datafim&"#"
     rs.open sql,db,3,3
        if rs.eof then
             Response.write "De "&dataini&" até "&datafim&" não foram postadas informações."
              set mail = createObject("CDONTS.newMail")
               mail.from = "faculdade@atenas.edu.br"
              mail.to = "rafael@atenas.edu.br"
            
              mail.subject = "Informativo Atenas"
             htmlemail = htmlemail &"De "&dataini&" até "&datafim&" Não foram postadas informações"
              mail.body = htmlemail
             mail.MailFormat = 0        
             mail.Bodyformat = 0
             mail.send
             set mail = nothing
        Else
            set mail = createObject("CDONTS.newMail")
            mail.from = "faculdade@atenas.edu.br"
            mail.to = "rafael@atenas.edu.br"

            mail.subject = "Informativo Atenas de "&dataini& " até "&datafim&"."
            htmlemail = htmlemail &"<style type='text/css'>"
            htmlemail = htmlemail & "a:link{text-decoration:none;} "
            htmlemail = htmlemail & ".fonte {    color: #FFFFFF;     font-family: Arial, Helvetica, sans-serif;     font-size: xx-small;}"
            htmlemail = htmlemail & ".fonte2 {    color: #FFFFFF;    font-family: Arial, Helvetica, sans-serif;    font-size: x-small;}"
            htmlemail = htmlemail & ".link2 {    color: #F75E6C;    font-family: Arial, Helvetica, sans-serif;    font-size: xx-small;}"
            htmlemail = htmlemail & ".link2:hover{    color:#FFFFFF;    font-family: Arial, Helvetica, sans-serif;    font-size: xx-small;}"
            htmlemail = htmlemail & ".link {    color: #FFFFFF;    font-family: Arial, Helvetica, sans-serif;    font-size: x-small;}"
            htmlemail = htmlemail & ".link:hover{    color:#F75E6C;    font-family: Arial, Helvetica, sans-serif;    font-size: x-small;}"
            htmlemail = htmlemail & "</style>"
            htmlemail = htmlemail & "<body  background='http://www.atenas.edu.br/informativo/imagens/fundo_barra.gif' leftmargin='0' rightmargin='0'  bottommargin='0' topmargin='0'>"
            htmlemail = htmlemail & "<font color='#FFFFFF'>"
            htmlemail = htmlemail & "<table width='100%'  border='0' cellpadding='0' cellspacing='0' background='http://www.atenas.edu.br/informativo/imagens/fundo_barra.gif' class='fonte'>"
            htmlemail = htmlemail & "<tr>"
            htmlemail = htmlemail & "<td colspan='3'><div align='center'>"
            htmlemail = htmlemail &  "<img src='http://www.atenas.edu.br/informativo/imagens/topoinformativo.jpg'"
            htmlemail = htmlemail &" </div></td>"
            htmlemail = htmlemail &  "</tr>"
            htmlemail = htmlemail & "<tr>"
            htmlemail = htmlemail & "<td colspan='3' bgcolor='#FFFFFF'></td>"
            htmlemail = htmlemail & "</tr>"
            htmlemail = htmlemail &"<tr>"
            htmlemail = htmlemail & "<td colspan='2'>" &"&nbsp;"& "</td>"
            htmlemail = htmlemail &" <td width='47%'>O melhor meio de comunica&ccedil;&atilde;o da Faculdade e Col&eacute;gio Atenas de Paracatu</td>"
            htmlemail = htmlemail & "</tr>"
            htmlemail = htmlemail & "<tr>"
            htmlemail = htmlemail &" <td colspan='3' bgcolor='#FFFFFF'></td>"
            htmlemail = htmlemail &"</tr>"
            htmlemail = htmlemail &"<tr>"
            htmlemail = htmlemail &"<td width='17%'>&nbsp;</td>"
            htmlemail = htmlemail &"<td width='36%'>&nbsp;</td>"
            htmlemail = htmlemail &"<td>&nbsp;</td>"
            htmlemail = htmlemail &"</tr>"
            htmlemail = htmlemail &"<tr>"
            htmlemail = htmlemail &"<td>&nbsp;</td>"&"<td>&nbsp;</td>"&"<td>&nbsp;</td>"&"</tr>"&"<tr>"
            htmlemail = htmlemail &" <td colspan='3'><div align='center' class='fonte2'><strong>AS INFOMAÇÕES POSTADAS FORAM:</strong></div></td>"
            htmlemail = htmlemail &"</tr>"&"<tr>"&"<td>&nbsp;</td>"&"<td>&nbsp;</td>"&"<td>&nbsp;</td>"&"</tr>"&"<tr>"&"<td colspan='3'> </font>"
            do while not rs.eof
            hora = rs.fields("hora")
            data = rs.fields("data")
            texto = rs.fields("texto")
            id = rs.fields("id")
            titulo = rs.fields("titulo")
            enviadopor = rs.fields("enviadopor")
            htmlemail = htmlemail &"<table width='85%'  border='0' align='center' cellpadding='0' cellspacing='0' class='fonte2'>"
            htmlemail = htmlemail &"<tr>"
            htmlemail = htmlemail &" <td width='18%' rowspan='2'><div align='center'><img src='http://www.atenas.edu.br/informativo/imagens/ico02.gif' width='56' height='49'></div></td>"
            htmlemail = htmlemail & " <td width='82%'>" &"<strong>"&" T&iacute;tulo:<a href='http://www.atenas.edu.br/informativo/vercomunicado.asp?id="&id&"' class='link'>"& titulo &" </strong></a> </td>"
            htmlemail = htmlemail & "</tr>"
            htmlemail = htmlemail & " <tr>"
            htmlemail = htmlemail &" <td><strong>Postado Por: " &enviadopor&" em: "&hora& "</strong></td>"
            htmlemail = htmlemail &"</tr>"&"<tr>"&"<td colspan='2' bgcolor='#FFFFFF'></td>"&"</tr>"&"<tr>"&"<td colspan='2'>&nbsp;</td>"&"</tr>"&"</table>"
            rs.movenext
            loop
            rs.close
            db.close
            set rs = nothing
            set db = nothing
            htmlemail = htmlemail &"</td>"&"</tr>"&"<tr>"&"<td colspan='3'>Se não conseguir visualizar este email <a href='http://www.atenas.edu.br/informativo/' target='_blank' class='link2'>Clique aqui</a></td>"&"</tr>"&"</table>"
            mail.body = htmlemail
            mail.MailFormat = 0        
            mail.Bodyformat = 0
            mail.send
            set mail = nothing
            Response.write htmlemail    
        end if 
    
%>

Link para o comentário
Compartilhar em outros sites

6 respostass a esta questão

Posts Recomendados

  • 0
DataSet

DataSet

Postado
Postado

O servidor onde ele está hospedado grava a data no formato dd/mm/aaaa ou mm/dd/aaaa ? você tem que observar isso.

Se o S.O do servidor é em inglês ele grava mm/dd/aaaa, e se você baixar o banco pra sua máquina que é em português, e visualizar a tabela, ele vai te mostrar as datas da coluna em dd/mm/aaaa.

Talvês esse seja o problema. Em vez de gravar 01/06/2006, ele gravou 06/01/2006

Uma solução possível é gravar a data sempre no formato mm/dd/aaaa:

month(request("dataini")) &"/"& day(request("dataini")) &"/"& year(request("dataini"))
Independente da versão do S.O, ele vai retornar a data correta. Daí pra mostrar pro usuário você remonta assim: 
day(rs("dataini")) &"/"& month(rs("dataini")) &"/"& year(rs("dataini"))

Qualquer coisa tecla aí...

Link para o comentário
Compartilhar em outros sites
  • 0
bolomaster

bolomaster

Postado
  • Autor
Postado

até poderia, so que intensão é que ele envie os posts para os emails da seguinte forma de ontem as 19:00 até hj as 18:59 , por isso to usando o campo data e hora

mas vou tentando aqui se souber de mais alguma coisa que possa ser ficarei agradecido

Abraços

Rafael Marciano

Link para o comentário
Compartilhar em outros sites
  • 0
Guest Visitante

Guest Visitante

Postado
Postado

pessoal é o seguinte eu agora troquei o campo no banco de dados eu coloquei como texto, e to passando a data e hora da seguinte forma

now()

e está indo a data e hora corretas, so que continua não selecioinando os dados

alguém pode ter mais alguma ideia

obrigado a todos e fui

Link para o comentário
Compartilhar em outros sites

Participe da discussão

Você pode postar agora e se registrar depois. Se você já tem uma conta, acesse agora para postar com sua conta.

Visitante
Responder esta pergunta...

×   Você colou conteúdo com formatação.   Remover formatação

  Apenas 75 emoticons são permitidos.

×   Seu link foi incorporado automaticamente.   Exibir como um link em vez disso

×   Seu conteúdo anterior foi restaurado.   Limpar Editor

×   Você não pode colar imagens diretamente. Carregar ou inserir imagens do URL.

×
 Share
Ir para lista de Perguntas


  • Estatísticas dos Fóruns

    • Tópicos
      152,1k
    • Posts
      651,8k
×
×
  • Criar Novo...