bolomaster

bem da pra você postar seu script, pois assim fica mais facil de entender atenciosamente, Rafael Marciano

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

e ai alguém deu uma olhada ?

Pessoal é o seguinte eu tenho um form de inscrição e to tentando fazer o seguinte (nunca fiz nada parecido com isso por isso nem sei se estou fazendo certo) criei um form com varios selects assim quando eu seleciono um select o outro vai atualizando e assim sucessivamente, sera que alguém pode me ajudar ? vou postar o script abraços e muito obrigado <table width="100%" border="0" cellspacing="0" cellpadding="5"> <tr> <td><table width="100%" border="0" cellspacing="0" cellpadding="0" class="fonte"> <tr> <td><img src="Imagens/Titulo_vestibular.gif" width="367" height="65"></td> </tr> <tr> <td bgcolor="#000000" width="1"></td> </tr> <tr> <td>&nbsp;</td> </tr> <tr> <td width="100%"></td> </tr> <tr> <td><div align="center"><strong>INFORMA&Ccedil;&Otilde;ES </strong></div></td> </tr> <tr> <td bgcolor="#000000" width="100%"></td> </tr> <tr> <td><p align="center"><strong>Siga corretamente estas instru&ccedil;&otilde;es para concluir com &ecirc;xito sua inscri&ccedil;&atilde;o</strong></p> <p>1 - Coloque seu nome completo, endere&ccedil;o, CPF, RG, etc....</p> <p>2 - Ap&oacute;s o preenchimento dos campos, surgir&aacute; uma tela com seus dados e no fim da pagina um banner, clique no banner para gerar o boleto. Voc&ecirc; dever&aacute; imprimir e pagar o mesmo at&eacute; a data de vencimento. </p> <p>3 - No dia da prova, voc&ecirc; deve vir munido do comprovante de pagamento e do original de sua identidade.</p> <p>&nbsp;</p> </td> </tr> <tr> <td width="100%">&nbsp;</td> </tr> <tr> <td><div align="center"></div></td> </tr> <tr> <td><div align="center"> <table width="602" border="0" cellpadding="0" cellspacing="0" bordercolor="#B5977A" class="borda32"> <tr> <td><table width="600" border="0" align="center" cellpadding="0" cellspacing="0" background="Imagens/Fundo_vest2005.jpg"> <tr> <td width="600"><div align="center"><img src="Imagens/topoForminscrVest2006.gif" width="600" height="80"></div></td> </tr> <tr> <td> <form name="vest1" method="post" action="enviarinscrvest.asp" onsubmit="return(validar(this))"> <table width="100%" border="0" align="center" cellpadding="0" cellspacing="0" class="fonte"> <tr> <td colspan="4"><div align="center"><strong><font size="3">F</font><font size="2">ormul&aacute;rio de Inscri&ccedil;&atilde;o para o 1 &ordm; Processo Seletivo de 2006</font> </strong></div></td> </tr> <tr> <td bgcolor="#000000" colspan="4"></td> </tr> <tr> <td colspan="2"><strong>Tipo de Prova*</strong></td> <td colspan="2"><strong>Local de Prova </strong></td> </tr> <tr> <td colspan="2"><select name="tprova" class="input2" id="tprova" > <option>Selecione aqui</option> <option value="Tradicional">TRADICIONAL</option> <option value="Agendado">AGENDADO</option> </select></td> <% tprova = request.form("tprova") if tprova = "Tradicional" then %> <td colspan="2"><select name="lprova" class="input2" id="lprova"> <option value="paracatu">Paracatu</option> </select></td> </tr> <tr> <td colspan="2"><strong>Codigo de Ativa&ccedil;&atilde;o</strong> </td> <td colspan="2"><strong>Nome*</strong> </td> </tr> <tr> <td colspan="2"><input name="reftran" readonly="true" type="text" id="reftran" value="000000009<%=contador%>" class="input2"> <font color="#FF0000"> (N&atilde;o altere este campo)</font> </td> <td colspan="2"><input name="nome" type="text" class="input2" id="nome" size="40"> </td> </tr> <tr> <td><strong>Endere&ccedil;o * </strong></td> <td><div align="left"><strong>Bairro*</strong></div></td> <td colspan="2"><strong>Cidade*</strong> </td> </tr> <tr> <td><input name="endereco" type="text" class="input2" id="endereco" size="30"> </td> <td><div align="left"> <input name="bairro" type="text" class="input2" id="bairro" size="15"> </div></td> <td colspan="2"><input name="cidade" type="text" class="input2" id="cidade" size="40"> </td> </tr> <tr> <td colspan="2"><strong>Estado*</strong> </td> <td colspan="2"><strong>CEP*</strong> </td> </tr> <tr> <td colspan="2"><input name="uf" type="text" class="input2" id="uf" size="5" maxlength="3"> </td> <td colspan="2"><input name="cep" type="text" id="cep" class="input2" onKeyPress="formatar(this,'00000-000')" maxlength="9"> (Ex: 99999-999) </td> </tr> <tr> <td colspan="2"><strong>Telefone*</strong> </td> <td colspan="2"><strong>Data de Nascimento*</strong> </td> </tr> <tr> <td colspan="2"><input name="ddd" type="text" id="ddd" size="1" class="input2" maxlength="2"> - <input name="telefone" type="text" class="input2" id="telefone" onKeyPress="formatar(this,'0000-0000')" size="10" maxlength="9" > </td> <td colspan="2"><input name="dtnasc" type="text" id="dtnasc" onKeyPress="formatar(this,'00/00/0000')" class="input2"maxlength="10"> (Ex: 99/99/9999)</td> </tr> <tr> <td colspan="2">&nbsp;</td> <td colspan="2">&nbsp;</td> </tr> <tr> <td colspan="2"><strong>Sexo*</strong> </td> <td colspan="2"><strong>Email</strong></td> </tr> <tr> <td colspan="2"><select name="sexo" id="sexo" class="input2"> <option>Masculino</option> <option>Feminino</option> </select> </td> <td colspan="2"><input name="email" type="text" class="input2" id="email" size="40"> </td> </tr> <tr> <td colspan="2"><strong>CPF</strong></td> <td colspan="2"><strong>RG*</strong> </td> </tr> <tr> <td colspan="2"><input name="cpf" type="text" id="cpf" class="input2" onKeyPress="formatar(this, '000.000.000-00')" maxlength="14"> (Ex: 999.999.999-99) </td> <td colspan="2"><input name="rg" type="text" class="input2" id="rg" size="15"> </td> </tr> <tr> <td colspan="2"><strong>Curso</strong> </td> <td colspan="2"><strong>Possui Curso Superior?*</strong> </td> </tr> <tr> <td colspan="2"><input name="curso" type="text" class="input2" id="curso" value="Direito" size="15"> </td> <td colspan="2"><select name="pcs" id="pcs" class="input2"> <option>N&atilde;o</option> <option>Sim Completo</option> <option>Sim Incompleto</option> </select> </td> </tr> <tr> <td colspan="2"><strong>Para o dia da prova necessita de algum procedimento especial? Se sim qual?</strong></td> <td colspan="2"><strong>Para Vestibular Agendado por favor colocar o dia e o hor&aacute;rio. </strong> <!-- <strong>Vestibular Agendado:</strong> --></td> </tr> <tr> <td colspan="2"><select name="sproced" class="input2" id="sproced"> <option value="sim">SIM</option> <option value="não">N&Atilde;O</option> </select> - <% sproced = request.form("sproced") if sproced = "sim" then %> <input name="proced" type="text" class="input2" id="proced" size="30"> <% else %> <input name="proced" type="text" value="não" readonly="true" class="input2" id="proced" size="30"> <% end if %> </td> <td colspan="2"><select name="dia" class="input2" id="dia"> <option value="08/07">08/07</option> </select> - <select name="horario" class="input2" id="horario"> <option value="8:30">8:30</option> </select></td> </tr> <tr> <td colspan="4"><strong>Ano de conclus&atilde;o do Ensino M&eacute;dio* </strong></td> </tr> <tr> <td colspan="4"><input name="concem" type="text" class="input2" id="concem"></td> </tr> <tr> <td colspan="4"><div align="left"><font color="#FF0000"><strong>Os campos com * s&atilde;o obrigat&oacute;rios</strong></font> </div></td> </tr> <tr> <td colspan="2">&nbsp;</td> <td colspan="2">&nbsp;</td> </tr> <tr> <td width="27%">&nbsp;</td> <td width="24%"><div align="center"> <input type="submit" name="Submit" value="Enviar" class="button"> </div></td> <td width="20%"><input type="reset" name="Submit2" value="Limpar" class="button"> </td> <td width="29%">&nbsp;</td> </tr> </table> </form> </td> </tr> <tr> <td><img src="Imagens/rodapeinscrvest2005.gif" width="600" height="79"></td> </tr> </table> <div align="center"></div></td> </tr> </table> </div></td> </tr> <tr> <td>&nbsp;</td> </tr> <tr> <td><img src="Imagens/PixelTrasp.gif" width="15" height="5"><a href="java script:history.back(-1)" class="link2">voltar...</a></td> </tr> <tr> <td>&nbsp;</td> </tr> </table></td> </tr> </table> <% else %> <td colspan="2"><select name="lprova" class="input2" id="lprova"> <option value="Cristalina">Cristalina</option> <option value="João Pinheiro">João Pinheiro</option> <option value="Paracatu">Paracatu</option> </select></td> </tr> <tr> <td colspan="2"><strong>Codigo de Ativa&ccedil;&atilde;o</strong> </td> <td colspan="2"><strong>Nome*</strong> </td> </tr> <tr> <td colspan="2"><input name="reftran" readonly="true" type="text" id="reftran" value="000000009<%=contador%>" class="input2"> <font color="#FF0000"> (N&atilde;o altere este campo)</font> </td> <td colspan="2"><input name="nome" type="text" class="input2" id="nome" size="40"> </td> </tr> <tr> <td><strong>Endere&ccedil;o * </strong></td> <td><div align="left"><strong>Bairro*</strong></div></td> <td colspan="2"><strong>Cidade*</strong> </td> </tr> <tr> <td><input name="endereco" type="text" class="input2" id="endereco" size="30"> </td> <td><div align="left"> <input name="bairro" type="text" class="input2" id="bairro" size="15"> </div></td> <td colspan="2"><input name="cidade" type="text" class="input2" id="cidade" size="40"> </td> </tr> <tr> <td colspan="2"><strong>Estado*</strong> </td> <td colspan="2"><strong>CEP*</strong> </td> </tr> <tr> <td colspan="2"><input name="uf" type="text" class="input2" id="uf" size="5" maxlength="3"> </td> <td colspan="2"><input name="cep" type="text" id="cep" class="input2" onKeyPress="formatar(this,'00000-000')" maxlength="9"> (Ex: 99999-999) </td> </tr> <tr> <td colspan="2"><strong>Telefone*</strong> </td> <td colspan="2"><strong>Data de Nascimento*</strong> </td> </tr> <tr> <td colspan="2"><input name="ddd" type="text" id="ddd" size="1" class="input2" maxlength="2"> - <input name="telefone" type="text" class="input2" id="telefone" onKeyPress="formatar(this,'0000-0000')" size="10" maxlength="9" > </td> <td colspan="2"><input name="dtnasc" type="text" id="dtnasc" onKeyPress="formatar(this,'00/00/0000')" class="input2"maxlength="10"> (Ex: 99/99/9999)</td> </tr> <tr> <td colspan="2">&nbsp;</td> <td colspan="2">&nbsp;</td> </tr> <tr> <td colspan="2"><strong>Sexo*</strong> </td> <td colspan="2"><strong>Email</strong></td> </tr> <tr> <td colspan="2"><select name="sexo" id="sexo" class="input2"> <option>Masculino</option> <option>Feminino</option> </select> </td> <td colspan="2"><input name="email" type="text" class="input2" id="email" size="40"> </td> </tr> <tr> <td colspan="2"><strong>CPF</strong></td> <td colspan="2"><strong>RG*</strong> </td> </tr> <tr> <td colspan="2"><input name="cpf" type="text" id="cpf" class="input2" onKeyPress="formatar(this, '000.000.000-00')" maxlength="14"> (Ex: 999.999.999-99) </td> <td colspan="2"><input name="rg" type="text" class="input2" id="rg" size="15"> </td> </tr> <tr> <td colspan="2"><strong>Curso</strong> </td> <td colspan="2"><strong>Possui Curso Superior?*</strong> </td> </tr> <tr> <td colspan="2"><input name="curso" type="text" class="input2" id="curso" value="Direito" size="15"> </td> <td colspan="2"><select name="pcs" id="pcs" class="input2"> <option>N&atilde;o</option> <option>Sim Completo</option> <option>Sim Incompleto</option> </select> </td> </tr> <tr> <td colspan="2"><strong>Para o dia da prova necessita de algum procedimento especial? Se sim qual?</strong></td> <td colspan="2"><strong>Para Vestibular Agendado por favor colocar o dia e o hor&aacute;rio. </strong> <!-- <strong>Vestibular Agendado:</strong> --></td> </tr> <tr> <td colspan="2"><select name="sproced" class="input2" id="sproced"> <option value="sim">SIM</option> <option value="não">N&Atilde;O</option> </select> - <% sproced = request.form("sproced") if sproced = "sim" then %> <input name="proced" type="text" class="input2" id="proced" size="30"> <% else %> <input name="proced" type="text" readonly="true" class="input2" id="proced" size="30"> <% end if %> </td> <td colspan="2"> <% lprova = request.form("lprova") select case lprova case "Paracatu" %> <select name="dia" class="input2" id="dia"> <option value="05/06">05/06</option> <option value="06/06">06/06</option> <option value="07/06">07/06</option> <option value="08/06">08/06</option> <option value="09/06">09/06</option> <option value="19/06">19/06</option> <option value="20/06">20/06</option> <option value="21/06">21/06</option> <option value="22/06">22/06</option> <option value="23/06">23/06</option> <option value="26/06">26/06</option> <option value="27/06">27/06</option> <option value="28/06">28/06</option> <option value="29/06">29/06</option> <option value="30/06">30/06</option> <option value="03/07">03/07</option> <option value="04/07">04/07</option> <option value="05/07">05/07</option> <option value="06/07">06/07</option> <option value="07/07">07/07</option> <option value="10/07">10/07</option> <option value="11/07">11/07</option> <option value="12/07">12/07</option> <option value="13/07">13/07</option> <option value="14/07">14/07</option> <option value="17/07">17/07</option> <option value="18/07">18/07</option> <option value="19/07">19/07</option> <option value="20/07">20/07</option> <option value="21/07">21/07</option> </select> - <select name="horario" class="input2" id="horario"> <option value="7:00">7:00</option> <option value="8:00">8:00</option> <option value="9:00">9:00</option> <option value="13:00">13:00</option> <option value="14:00">14:00</option> <option value="15:00">15:00</option> <option value="16:00">16:00</option> <option value="19:00">19:00</option> <option value="20:00">20:00</option> </select> <% case "Cristalina" %> <select name="dia" class="input2" id="dia"> <option value="06/06">06/06</option> <option value="13/06">13/06</option> <option value="20/06">20/06</option> <option value="27/06">27/06</option> <option value="04/07">04/07</option> <option value="11/07">11/07</option> <option value="18/07">18/07</option> <option value="25/07">25/07</option> </select> - <select name="horario" class="input2" id="horario"> <option value="7:00">7:00</option> <option value="8:00">8:00</option> <option value="9:00">9:00</option> <option value="13:00">13:00</option> <option value="14:00">14:00</option> <option value="15:00">15:00</option> <option value="16:00">16:00</option> <option value="19:00">19:00</option> <option value="20:00">20:00</option> </select> <% case "João Pinheiro" %> <select name="dia" class="input2" id="dia"> <option value="09/06">09/06</option> <option value="23/06">23/06</option> <option value="30/06">30/06</option> <option value="07/07">07/07</option> <option value="14/07">14/07</option> <option value="21/07">21/07</option> <option value="25/07">25/07</option> </select> - <select name="horario" class="input2" id="horario"> <option value="7:00">7:00</option> <option value="8:00">8:00</option> <option value="9:00">9:00</option> <option value="13:00">13:00</option> <option value="14:00">14:00</option> <option value="15:00">15:00</option> <option value="16:00">16:00</option> <option value="19:00">19:00</option> <option value="20:00">20:00</option> </select> <% end Select %> </td> </tr> <tr> <td colspan="4"><strong>Ano de conclus&atilde;o do Ensino M&eacute;dio* </strong></td> </tr> <tr> <td colspan="4"><input name="conEM" type="text" class="input2" id="conEM"></td> </tr> <tr> <td colspan="4"><div align="left"><font color="#FF0000"><strong>Os campos com * s&atilde;o obrigat&oacute;rios</strong></font> </div></td> </tr> <tr> <td colspan="2">&nbsp;</td> <td colspan="2">&nbsp;</td> </tr> <tr> <td width="27%">&nbsp;</td> <td width="24%"><div align="center"> <input type="submit" name="Submit" value="Enviar" class="button"> </div></td> <td width="20%"><input type="reset" name="Submit2" value="Limpar" class="button"> </td> <td width="29%">&nbsp;</td> </tr> </table> </form> </td> </tr> <tr> <td><img src="Imagens/rodapeinscrvest2005.gif" width="600" height="79"></td> </tr> </table> <div align="center"></div></td> </tr> </table> </div></td> </tr> <tr> <td>&nbsp;</td> </tr> <tr> <td><img src="Imagens/PixelTrasp.gif" width="15" height="5"><a href="java script:history.back(-1)" class="link2">voltar...</a></td> </tr> <tr> <td>&nbsp;</td> </tr> </table></td> </tr> </table> <% end if %>

verifique os valores das variaveis pode ser um valor que não esta enviando corretamente os valores . tente postar o script todo ai.. quem sabe podemos ajudar

acho que o ideal mesmo seria o oracle, mas como você prefere soluçoes free acho que o mysql e o postgreSQl são boas opçoes espero que tenha ajudado fui

por isso to usando <% Session.LCID = 1046 %> e já tentei ler as variaveis e o valor das mesmas .. retorna a data na forma correta

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 %>

Bem agora o problema é com o loop, eu criei a seguinte condiçao para que quando ele não tivesse nenhum dados que batesse com a consulta eu gostaria que ele enviasse um email dizendo que nenhuma informação havia sido postada.. e se tivesse enviasse o email so que agora ele está enviando a 1ª informação apenas e repete a mesma <% 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 nenhuma informação." set mail = createObject("CDONTS.newMail") mail.from = "Informativo Atenas" mail.To = "rafael@atenas.edu.br" mail.subject = "Informativo Atenas" htmlemail = htmlemail &"De "&dataini&" até "&datafim&" Não foram postadas nenhuma informação." mail.body = htmlemail mail.MailFormat = 0 mail.Bodyformat = 0 mail.send set mail = nothing Else hora = rs.fields("hora") data = rs.fields("data") texto = rs.fields("texto") id = rs.fields("id") titulo = rs.fields("titulo") enviadopor = rs.fields("enviadopor") set mail = createObject("CDONTS.newMail") mail.from = "informativo@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 & "<!--" 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 & ".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 & "-->" 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 & "<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 & "<object classid='clsid:D27CDB6E-AE6D-11cf-96B8-444553540000' codebase='http://download.macromedia.com/pub/shockwave/cabs/flash/swflash.cab#version=6,0,29,0' width='780' height='100'>" htmlemail = htmlemail & "<param name='movie' value='http://www.atenas.edu.br/informativo/imagens/topoinformativo.swf'>" htmlemail = htmlemail & "<param name='quality' value='high'>" htmlemail = htmlemail & "<embed src='http://www.atenas.edu.br/informativo/imagens/topoinformativo.swf' quality='high' pluginspage='http://www.macromedia.com/go/getflashplayer' type='application/x-shockwave-flash' width='780' height='100'></embed>" htmlemail = htmlemail & "</object>" 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'>" do while not rs.eof 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>Se não conseguir visualizar este email <a href='http://www.atenas.edu.br/informativo/' target='_blank' class='link'>Clique aqui</a></td>"&"<td>&nbsp;</td>"&"<td>&nbsp;</td>"&"</tr>"&"</table>" mail.body = htmlemail mail.MailFormat = 0 mail.Bodyformat = 0 mail.send set mail = nothing Response.Redirect "default.asp" end if %> se alguém souber o porque eu agradeço fui

Veio eu troquei a ' de lugar e agora funciona so que ele não mostra todos ele apenas repete o 1º registro olhe a linha href='http://www.atenas.edu.br/informativo/vercomunicado.asp?id='"&id&" class='link' ai eu coloquei assim oh href='http://www.atenas.edu.br/informativo/vercomunicado.asp?id="&id&"' class='link'

ei será que alguém sabe o porque não está funcionando ?

3º Resolvido

2º Resolvido

1º resolvido

Bem, a pergunta é bem intuitiva. Bem uma NEWSLETTER - é uma lista de emails, so que quero que os dados que sejam enviados no email sejam do meu site, então qual minha ideia, é buscar no banco de dados as informações, e ele envie estas informações a todos da lista numa determinada hora do dia até pensei e escrevi uma logica, mas ainda gostaria de opinioes e de ideias para concretizar esse projeto. ESTA SERIA A IDEIA INICIAL alguém já FEZ ALGO PARECIDO ??? aBRAÇOS RAFAEL MARCIANO

Olá Pessoal, tudo beleza É o seguinte, estou precisando de uma ajuda, gostaria de saber se algum de vocês conhecem algum sistema de envio de newsleter que faça um resumo diario e envie para o email de todos, pois eu até desenvolvi um aqui so que não consigo fazer o resumo das noticias para enviar todo fim de noite, alguém saberia como ? se alguém tiver alguma ideia, ou conhecer algum sistema parecido fico grato. Atenciosamente Rafael Marciano

Oi caro colega descreveri abaixo minhas opiniões sobre seu questionamento. Bem sistemas em delphi são sempre muito bons. (claro depende do programador), mas no seu caso eu esolheria algo como Java, ASP, PHP, ASP.net São linguagens de programação mais direcionadas ao que você pretende. bem como você quer banco grandes, o legal seria usar um oracle ou sqlserver mas cono não temos os recursos o mysql esta perfeito. você pode desenhar esta interface com um programa qualquer de editoraçao grafica (se você optar por asp ou php) Por isso estou recomendando essas linguagens pelo simples motivo de trabalhar com WEB. Aqui você pode usar o delphi ou VB ou qualquer outra linguagem para escrever um componente que faz isso. Eu escreveria o componente com o delphi e utilizaria a dll para registrar esses dados. Bem esta opiniao por mim aqui declarada foi analisada de acordo com as condiçoes que passou no forum, mas se o programador for bom e dominar a linguagem em questao ele não precisa se preocupar tanto com as questoes. Abraços e espero ter ajudado vc .

Tudo é uma questao de aprendizado !!!! Bem o nosso grande amigo guto já disse tudo... mas não podemos esquecer que muitos aqui são novatos .. alguns na verdade nem nunca tiveram contato com programação antes, devemos sim disponibilizar os fontes para nossos amigos aprenderem (sem que eles tirem nossos creditos) já passei noites em claro aprendendo , postando duvidas (algumas ate bobas) e revirando a net procurando codigos prontos para que pudesse estudar. Acho que sempre iremos ter aqueles que por preguiça não alterarao nem os nomes das variaveis para aprender assim como teremos aqueles que usaram nossos sistemas e o aperfeiçarão. Eu desenvolvo (hj) do zero acompanhando algumas logicas de sistemas prontos. mas um dia.. já usei alguns scripts prontos para que eu pudesse aprender. E assim caminha a humanidade. eheheh Abraços e Obrigado ao amigo Vagner (delphi Man) pelos creditos no sistema Estamos aqui para isso Abração proce mano

Salve pessoal já resolvi o problema é que to trabalhando com includes. esqueci de arrumar o link ... eeeh então ficaria assim oh ehehe já resolvi abraços a todos e podem fechar o tópico

Salve ai grande galera da SB, to com um problema de paginação mas não to entendo como esta acontecendo será que alguém ai tem alguma ideia... o script esta ai abaixo ... <% 'criação Rafael Marciano qry = request.querystring("qry") Set rs = Server.CreateObject("adodb.recordset") rs.PageSize = 5 select case qry case "" sql = "select * from livrEstudo order by id desc" rs.Open sql,db,3,3 case "livro" sql = "select * from livrEstudo where tipo = 'livro' order by id desc" rs.Open sql,db,3,3 case "estudo" sql = "select * from livrEstudo where tipo = 'estudo' order by id desc" rs.Open sql,db,3,3 end select IF rs.EOF then Response.Write "nenhum registro encontrado" Response.End 'paramos o programa ELSE 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 rs.AbsolutePage=intpagina intrec=0 %> <table width="500" border="0" cellspacing="10" cellpadding="0"> <tr> <td width="600">&nbsp;</td> </tr> <tr> <td><table width="500" border="0" align="center" cellpadding="0" cellspacing="0" class="fonte"> <tr> <td><strong><font size="+3" color="#FF5959">L</font><font size="+2" color="#FF5959">ivros e Estudos</font></strong></td> </tr> <tr> <td bgcolor="#FF5959"></td> </tr> <tr> <td>&nbsp;</td> </tr> <tr> <td> <% While intrec < rs.PageSize and not rs.EOF %> <table width="500" border="0" cellpadding="0" cellspacing="0" class="fonte"> <tr valign="top"> <td width="108"><div align="center"><strong><img src="<%=img%><%=rs.fields("figura")%>" width="84" height="100" align="center"></strong></div></td> <td width="491"><strong><font color="#FF5959">Titulo:</font> <%=rs.fields("titulo")%></strong><strong><font color="#FF5959"><br> Assunto:</font> <%=rs.fields("assunto")%></strong><strong><font color="#FF5959"><br> Tipo:</font> <%=rs.fields("tipo")%><br> <font color="#FF5959">Descri&ccedil;&atilde;o: </font><%=rs.fields("descrição")%> </strong></td> </tr> </table> <p></p> <div align="center"> <% rs.MoveNext intrec=intrec+1 IF rs.EOF then response.write " " END IF Wend IF intpagina > 1 then %> <a href="livrosest.asp?pagina=<%=intpagina-1%>&qry=<%=qry%>" class="linkd">Anterior</a> <% END IF IF strcomp(intpagina,rs.PageCount) <> 0 then %> <a href="livrosest.asp?pagina=<%=intpagina+1%>&qry=<%=qry%>" class="linkd">Próxima</a> <% END IF %> </div></td> </tr> <tr> <td></td> </tr> </table></td> </tr> <tr> <td>&nbsp;</td> </tr> </table> o erro é este oh ADODB.Recordset erro '800a0bb9' Os argumentos são incorretos, estão fora do intervalo aceitável ou estão em conflito. /informativo/up/paulor/livrosest.asp, line 13 se alguém tiver alguma ideia ... pode falar... t +

ola eu to com um problema para montar um relatorio em access. eu tenho 4 tabelas ementa cronatv contprog estmetaval e tenho um campo em comum entre elas que está me servindo para fazer relacionamento o campo é o idsec so que eu tenho que criar um filtro onde eu digite a idsec e ele mostre o relatorio baseado nestas 4 tabelas. de acordo com o filtro .. alguém tem alguma ideia ?? aguardo atenciosamente uma resposta Rafael

como você esta fazendo o select no banco de dados

não simplesmente não aparece nada nem mesmo os textos que estao nas tabelas

Salve Galera to precisando de uma ajuda gostaria de fazer dois selects no mesmo banco de dados... na mesma tabela... e este select seria com trabalho de datas, tipo mostrar somente os registros do dia anterior e não to conseguindo ... vou mostrar meu arquivo para vocês Arquivo.asp Bem o que eu queria era mostrar na outra coluna somente os registros do dia anterior e ainda na parte de baixo todos os registro.... deu para sacar.. abraços se alguém tiver alguma ideia por favor é so falar fui abraços Rafael Marciano

MEU AMIGO ISSO PODE SER PROBLEMA COM SEU COLLATION NAME