23 svar · 552 visningar · startad av flabber
Jag skulle vilja ha en funktion där man kan skicka ett mail till alla användare i ett community, går det, och i så fall hur bär jag mig åt ?
Eftersom det är ett community du bygger, måste jag ställa frågan ifall det är ett riktigt e-postmeddelande du skall skicka eller ifall det är ett 'internt mess' som de brukar kallas i community-kretsar. ;)
Vad heter tabellen med användare i din databas, samt vad heter kolumnen med användarens e-postadress?
Du får nog skriva om det här lite, men modellen är åt rätt håll iallafall.
Vi ponerar följande:
strMessage = "Detta är ett nyhetsmeddelande!"
adminsId = 12
SQL = "select * from users"
set rs = conn.execute(SQL)
do until rs.eof
SQL2 = "INSERT INTO meddelande (mottagare, avsandare, meddelande) VALUES (" & rs("id") & "," & adminsId & ",'" & strMessage & "' ")"
conn.execute(SQL2), , 128
rs.movenext
loop
set rs = nothing
Tackar för hjälpen.
Då kommer en föjdfråga från en novis på området.
Var lägger jag till denna lilla kodsnutt någonstans lämpligtvis?
Ja, det beror ju lite på vad du skall ha den till.
Är det bara du (som admin) som skall kunna använda scriptet eller?
Jag (admin) och 1 medlem till.
Har du något slags admingränssnitt idagsläget?
Har en fil där man får skriva in vem av användarna som är admin,sökväg till databas,adressen till smtpservern och lite sådant.
Den filen includas :r sedan i andra filers kod.
Om detta är någon form av admingränsnitt vet jag dock inte.
Svar1: Ja, access-databas är det
Svar2: Nej
Svar3: Nej
Provar för att lära mig mer om detta, och min erfarenhet säger att det är bättre att titta på vad andra har gjort före mig än att försöka läsa sig till något i en bok.
Tyckte bara att just den här funktionen saknades i denna varianten av community.
Fast de e klart man kanske inte ska in o klampa i något man inte har kontroll över.
Det som behövs är en connection mot databasen och ett formulär där man kan skriva själva meddelandet, eller ?
Får tyvärr inte till det själv, någon annan som kan? Förutsättningarna är som berättat ovan.
<form method="post" action="putMess.asp">
<input type="text" name="rubrik">
<input type="text" name="avsandare">
<input type="text" name="text">
<input type="submit" value="Posta">
</form>
<%
strRubrik = replace(request("rubrik"),"'","''")
adminsId = replace(request("avsandare"),"'","''")
strText = replace(request("text"),"'","''")
set conn = server.createobject("adodb.connection")
conn.open "Provider=Microsoft.OLEDB.Jet.4.0;Data Source=" & server.mappath("[red]/databas/databas.mdb[/red]")
SQL = "select * from users"
set rs = conn.execute(SQL)
do until rs.eof
SQL2 = "INSERT INTO meddelande (mottagare, avsandare, meddelande,rubrik) VALUES (" & rs("id") & "," & adminsId & ",'" & strText & "','" & strRubrik & "' ")"
conn.execute(SQL2), , 128
rs.movenext
loop
set rs = nothing
set conn = nothing
Ändra det röda, så att det passar din applikation.
Får följande felmeddelande
Microsoft VBScript compilation error '800a0401'
Expected end of statement
/community/massmailtest.asp, line 25
SQL2 = "INSERT INTO meddelanden (mottagare, avsandare, meddelande,rubrik) VALUES (" & rs("id") & "," & adminsId & ",'" & strText & "','" & strRubrik & "' ")"
---------------------------------------------------------------^
Nu får jag detta meddelande:
Microsoft JET Database Engine error '80040e14'
Syntax error in INSERT INTO statement.
INSERT INTO meddelanden (mottagare, avsandare, meddelande, rubrik) VALUES (22,,'','' )
Microsoft JET Database Engine error '80040e14'
Syntax error in INSERT INTO statement.
Exakt. Du saknar ett värde i formuläret 'avsandare' som du ser på första raden.
Kolla över dina formulär och att du har stavat rätt om du ändrat namn på några variabler. Det är alltså variabel 'adminsId' som är tom.
Får fortfarande felmeddelanden, men fyller jag i formuläret så kommer det in en post i meddelande tabellen. Det går tyvärr inte iväg till någon som ett meddelande dock.
