prelevare pagina con mail

[djjunior]

Salve, vorrei un'aiuto a questo script nella parte objMail.Bcc = , vorrei che prelevasse gli indirizzi che saranno nascosti, da una pagina creata ad hoc solo con tutti gli indirizzi in questa modalità: prova@prova.com; ciao@ciao.com etc.
E' possibile?
Ecco lo script

objMail.From = request.querystring("user")
objMail.To = "prova@prova.com"

objMail.Bcc = achi

objMail.Subject = "New File "
objMail.Fields("urn:schemas:httpmail:importance"). Value = 2
objMail.Fields.Update()
objMail.HTMLBody = "ecco il file

objMail.Send()

Grazie per il Vs. aiuto.
Gino

[OcchioCrepato]

Dove sono gli indirizzi email che vuoi metterre in Bcc? in un db, in un file?

[djjunior]

sarebbero in un file e/o pagina

[OcchioCrepato]

Originariamente inviato da djjunior
sarebbero in un file e/o pagina

o uno o l'altro. direi che fra le due sarebbe meglio in un file testo.
meglio ancora sarebbe metterli in una tabelle in un db.

comunque li metti in un file di testo, un indirizzo per ogni riga. Ogni indirizzo deve essere separato dal siccessive tramite ; (punto e virgola)
tramite filesystemobject
leggi il contenutio del file e lo assegni ad una variabile e poi al bcc.

guarda gli esempi che ho postato

[wallrider]

ma il file con gli indirizzi è sul tuo stesso sito, vero?

[djjunior]

Grazie per i tuoi esempi, se invece gli indirizzi sarebbero in una pagina asp che li preleva a sua volta dal db?(cosa utile per me)
Per rispondere a wallrider, si il file sarebbe sul mio stesso sito.
Comunque avevo pensato ad un include, ma non sono come assegnarlo.
Suggerimenti?
Grazie
Gino

[OcchioCrepato]

Originariamente inviato da djjunior
Grazie per i tuoi esempi, se invece gli indirizzi sarebbero in una pagina asp che li preleva a sua volta dal db?(cosa utile per me)
Per rispondere a wallrider, si il file sarebbe sul mio stesso sito.
Comunque avevo pensato ad un include, ma non sono come assegnarlo.
Suggerimenti?
Grazie
Gino

se li hai già nel db recuperali direttamente da li che senso ha leggerli da una pagina che processa lo stesso db? fai fare solo del lavoro inutile al server.

[djjunior]

non riesco ad implementarlo allo script che utilizzo quindi l'unico sistema.
Puoi fare qualcosa?
Grazie 1000
Gino

[OcchioCrepato]

Apri la connessione al tuo db, esegui la query sulla tabella dove sono presenti gli indirizzi, cicli sul recordset, assegni le mail lette ad una variabile e poi al metodo Bcc dell oggetto objMail

set objConn=Server.CreateObject ("ADODB.Connection")
strConn="[qui scrivi la stringa di connessione al tuo database]"
'Apri la connessione
objConn.Open (strConn)

sBccMail=""

set Rs=Server.CreateObject ("ADODB.recordset")
Rs.CursorLocation=3
sSQL="select email from tuatabella"
rs.open sSQL,objconn,3,3
do while not rs.eof
 sBccMail=sBccMail & rs.fields("email") & ";"
 rs.movenext
loop
rs.close
objconn.close
set rs=nothing
set objconn=nothing

objMail.From = request.querystring("user")
objMail.To = "prova@prova.com"

objMail.Bcc = sBccMail

objMail.Subject = "New File "
objMail.Fields("urn:schemas:httpmail:importance").Value = 2
objMail.Fields.Update()
objMail.HTMLBody = "ecco il file

objMail.Send()