mail automatica in asp

[luisa227]

pippo compie gli anni il tale giorno ed inserisce la sua data di nascita compilando un

apposito form quindi i suoi dati vanno a finire in un db
Voglio che alla data a cui corrisponde il compleanno, mi sia inviata una mail automatica che

mi avvisi che pippo compie gli anni.
Solo che pensandoci bene x l'invio di una mail io dovrei avere una pagina web attiva con un

codice che ogni giorno mi controlla la corrispondenza della data odierna con quella di pippo.

Io la pagina sempre attiva non ce la posso avere a meno che qualcuno ogni santo giorno

visiti la paginetta web in cui ho il codice x il controllo della data.
Ci sarebbe un sistema x attivare l'invio automatico della mail? come posso fare?
spero di esermi spiegata

[Roby_72]

Se hai accesso al server web puoi farlo, come amministratore intendo, schedulando un'operazione.
Altrimenti devi sperare che ogni santo giorno qualcuno clicchi almeno l'home page del tuo sito da cui farai partire il controllo ed eventualmente l'email.

Roby

[vincenza]

Mi inserisco anch'io in questo filo ... ho lo stesso problema ...

capito che devo cliccare tutti i giorni se non ho accesso al server ... vi faccio vedere anche il codice che mi dovrebbe spedire le mail con un giorno di anticipo ...

set rs=conn.execute("SELECT * FROM agenda WHERE avviso=false")

	if not rs.eof then
	
		utente=rs.fields("soggetto")
		
		oggetto=rs.fields("oggetto")	
		corpomail=rs.fields("evento")		
		data=rs.fields("data")
	
		While Not rs.EOF
		
		If DateDiff("d", data, Date)=1 Then
			
set rs1=conn.execute("SELECT email FROM iscrizione WHERE soggetto='"& rs.fields("soggetto") &"'")

		if not rs1.eof then
				
		email=rs1.fields("email")
				
		Set mailbox = Server.CreateObject("CDO.Message")

		mailbox.From = "miamail@xxx.it"

		mailbox.To = email

		mailbox.Subject = oggetto 

		mailbox.TextBody = corpomail

		mailbox.Send()
				
		Set mailbox = Nothing 
				
		end if
				
		rs1.Close

		set rs1 = Nothing
				
		end if

conn.execute("UPDATE agenda SET avviso=true WHERE id="& rs.fields("id") &"")

		rs.movenext
			
		wend
		
		end if
		
	rs.Close
		
	Set rs = Nothing

	conn.Close

	Set conn = Nothing

%>

la mail parte ... non sempre ... e posticipata rispetto alla data dell'evento ... eppure il codice mi sembra così semplice ...

altro particolare esilarante: pur memorizzando l'avvenuta spedizione (avviso=true) ho che mail con l'avviso true partono più volte e mail che non sono mai partite hanno l'avviso true .... sto diventando matta ...

qualcuno mi sa dare un codice che funzioni?

o almeno individuare la falla di questo ....



enza