dim connect,rs,i
set connect = server.createobject("adodb.connection")
connect.open dsn
set rs = connect.execute("select email from users where datediff('d',senastInloggad,date()) > 60")
i = 0
while not rs.eof
if i > 0 then response.write ";" else i = 1
response.write rs(0)
rs.movenext
wend
Trådstart#1
Hej!
Jag vill, från min databas få en e-mail lista över de användare som inte varit inloggad de senaste 60 dagarna.
Hur gör jag?
E-mail adresserna vill jag ha utskrivna separerade med ";" i en följd, typ: mail1@mail.com;mail2@mail.com;mail3@mail.com osv.
Fältet i databasen som mailadressen sparas i heter "email".
Datumet sparas med hjälp av "Now()" och heter "SenastInloggad"
Tabellen heter users och databastypen är ju då Access!
Tacksam för hjälp!