26. juni 2006 - 09:27Der er
4 kommentarer og 1 løsning
mail til deltagere
Jeg har et familiesite hvor man logger ind. Alle brugernavne og kode er gemt i en base for sig selv. Når man er logget ind har man sit brugernavn i en session der så bruges når man fx opretter en nyhed. Nyhederne er gemt i en anden base hvor der er 2 tabeller. En nyhedstabel og en kommentartabel. Hver nyhed kan have x-antal kommentarer under sig. Det virker perfekt. Men nu vil jeg gerne have det sådan at folk kan tilmelde sig at få en mail hver gang der kommer en ny nyhed på siden. Desuden vil jeg gerne have at hvis man deltager i en nyhed ved at have indtastet en kommentar, så skal opretter + alle der har deltaget have en mail. Det er ikke så meget det med mail-komponent jeg spørger til, men i første omgang hvordan jeg nemmest gør det her?
Normalt foregår en nyhedsindtastning således:
opret_nyhed.asp (en form) -> billede.asp (en side til upload af billede) -> nyhed_db.asp (side der opretter det hele i basen)
Er det nok til at jeg kan få lidt hjælp til at komme igang?
For det først skal det selvfølgelig være en tilmeldingsfunktion, så du skal have bestemme hvor specifik den skal være.
Skal den være lige så specifik som her på E, hvor man kun modtager mails angående de kategorier man har valgt. Og man kan vælge pr ? om man vil "Abonner", så man får mails. Eller skal man bare få mails om alle nye nyheder samt alle kommentare når man har deltaget??
Afhængig af hvad du vælger her skal din DB modificeres....
Altså... Jeg regnede med at brugerbasen skulle have et felt hvor man kunne vælge om man vil have email eller ej. Det eneste det felt bestemmer er om man vil have en mail hver eneste gang der oprettes en ny nyhed.
Anden del er at hvis man nu kommenterer på en nyhed så skal opretter + alle der har deltaget have en mail! Sådan skal det være mere eller mindre ;o)
Det har jeg haft gjort således - håber det kan bruges. Det er testet og virker :)
strSQL = "select email, newsletter FROM fbrugere where newsletter='yes'" set rs = Connect.execute(strSQL) ' num variablen skal tælle hvor mange brugere vi sender til num = 0 while not rs.eof Set objMail = Server.CreateObject( "CDONTS.NewMail" ) objMail.To = rs("email") objMail.From = "afsender@host.dk" objMail.Subject = emne objMail.Body = indhold objMail.Host = "" objMail.Send Set objMail = Nothing num = num + 1 ' tilføjer 1 til varariablen for hvert genneløb rs.MoveNext Wend Response.write "<span class='text' align='center'>Nyhedsmailen blev sendt til <b>" & num & " </b> brugere<br>" response.write "<span align='center' >"
men. - Du skal lige vide hvilken objekt din server bruger og email component :) - detter er lavet til brug på b-one.net serverne
Tilladte BB-code-tags: [b]fed[/b] [i]kursiv[/i] [u]understreget[/u] Web- og emailadresser omdannes automatisk til links. Der sættes "nofollow" på alle links.