SQL problemer...

du må jo spesifisere kolonnen i din SQL !!

SELECT afdeling, Email FROM Plusbrugere GROUP by afdeling

Den SQL sætning var osse mit første bud...men det virker ikke...jeg får denne fejl:

[Microsoft][ODBC Microsoft Access-driver] Du har forsøgt at køre en forespørgsel, der ikke medtager det angivne udtryk "Email" som en del af en aggregatfunktion.

men ja...Kolonnerne hedder Email og Afdeling

inneholder din tabell en kolonne som heter 'Email' ?

Group by kræver at du kører f.eks. en Count(*) eller noget i din query. Måske er det Order du mener :-)

nute: ja, det har jeg

Order by dur ikke...så bliver afdelingerne bare listet ud i en pærevælling :)

just4fun >> nja...man kan saktens bruke 'group by' på tekst kolonner, men resultatet er jo at man grupperer mange identiske kolonner om til en kolonne. Når man så henter ut flere kolonner enn den man grupperer på, så har man ikke noe sted å legge de utfyllende informasjoner. Så...du har forsåvidt rett, men du skriver det litt galt ;-)

daloon >> prøv

SELECT afdeling, Email FROM Plusbrugere ORDER BY afdeling

Så du siger at :
"SELECT afdeling, Email FROM Plusbrugere ORDER by afdeling, Email"
bliver listet i en pærevælling :-)....hmm

daloon >> men hva er det du egentlig ønsker ? hvordan skal ditt output være ? noe ála dette:

<input type="checkbox" value="mail@dresse.dk,mail@dresse2.dk,mail@dresse3.dk"> IT-Avdeling<br/>
<input type="checkbox" value="mail@dresse.dk,mail@dresse2.dk,mail@dresse3.dk"> Annen avdeling

nute >> urRight!
Jeg kan sku bare aldrig finde ud af hvor meget man skal sige for ikke at forvirre mere end nødvendigt :-)

nute: Nemlig!

well...så er du nødt til å trikse litt:

<%
strAfdeling = ""
firstIteration = true
Do

    if( firstIteration ) then
        strAfdeling = objRS("Afdeling")
        firstIteration = false
    end if
   
    strEmail = strEmail & objRS("Email")
   
    if( objRS("Afdeling") <> strAfdeling ) then
        %>
        <INPUT TYPE="checkbox" NAME="recipient" value="<%= strEmail %>"><%= strAfdeling %><BR>
        <%
        strAfdeling = objRS("Afdeling")
    else
        strEmail = strEmail & ","
    end if

    <%
    ObjRS.MoveNext
Loop While Not ObjRS.EOF

%>

okay..tak...jeg prøver lige :)

ehm..hvad blev vi enige om at SQL sætningen skulle være?

"SELECT afdeling, Email FROM Plusbrugere ORDER by afdeling, Email;" ?

uups...sorry :-)

SELECT afdeling, Email FROM Plusbrugere ORDER by afdeling

Jeg tror heller ikke jeg gjorde mig helt klar før...

jeg ønsker noget i denne retning:

<input type="checkbox" value="it@dresse.dk,it@dresse2.dk,it@dresse3.dk"> IT-Avdeling<br/>
<input type="checkbox" value="Annen@dresse.dk,Annen@dresse2.dk,Annen@dresse3.dk"> Annen avdeling

har du testet det script jeg sendte ?

/nute

håber ikke jeg gi'r dig alt for meget arbejde :)

ja...det fungere..men ikke rigigt..dette bliver resultatet:

<INPUT TYPE="checkbox" NAME="recipient" value="mma@plus.dk;rert, ert;we;ww@ww.com, dd;wewww;ll@plus.dk;beh@plus.dk">Direktion<BR>
       
<INPUT TYPE="checkbox" NAME="recipient" value="mma@plus.dk;rert, ert;we;ww@ww.com,dd;wewww;ll@plus.dk;beh@plus.dklhk@plus.dk;ml@plus.dk;mkl@plus.dk;la@plus.dk">Ekspedition<BR>

som du kan se bliver e-mail adresserne gentaget i de 2 afdelinger.....under IT checkboxen er det kun IT mail-adresserne der skal listes..osv

nute: jeg ofre gerne flere points, hvis du kan få det til at virke.

nåja...jeg kan se at man er nødt til å kode litt ekstra...denne fungerer for meg:

ObjRS.open SQL, objConn, 1, 3


strAfdeling = ""
firstIteration = true
while NOT ObjRS.EOF

    if( firstIteration ) then
        strAfdeling = ObjRS("Afdeling")
        firstIteration = false
    end if
   
   
    if( ObjRS("Afdeling") <> strAfdeling ) then
        strEmail = LEFT( strEmail, LEN( strEmail ) - 1 )
        %>
        <INPUT TYPE="checkbox" NAME="recipient" value="<%= strEmail %>"><%= strAfdeling %><BR>
        <%
        strAfdeling = objRS("Afdeling")
        strEmail = objRS("Email") & ","
    else
        strEmail = strEmail & objRS("Email") & ","
    end if

    ObjRS.MoveNext
    if( ObjRS.EOF ) then
    strEmail = LEFT( strEmail, LEN( strEmail ) - 1 )
        %>
        <INPUT TYPE="checkbox" NAME="recipient" value="<%= strEmail %>"><%= strAfdeling %><BR>
        <%
    end if
wend
objConn.Close
%>

/nute

okay kool...prøver lige

okay..nu er den der næsten :)

nu kan jeg bare ikke Request.form("recipient") fra den næste side..

koden på den næste side er:

<%@LANGUAGE = VBSCRIPT%> <html>
<body>

<%

' Get the form data
name        = Request.Form("name")
senderEmail = Request.Form("email")
subject    = "Regarding " & Request.Form("subject")
recipient  = Request.Form("recipient")
body        = Request.Form("body")

' Create the JMail message Object
set msg = Server.CreateOBject( "JMail.Message" )

' Set logging to true to ease any potential debugging
' And set silent to true as we wish to handle our errors ourself
msg.Logging = true
msg.silent = true

' Enter the sender data
msg.From = senderEmail
msg.FromName = name

' Note that as addRecipient is method and not
' a property, we do not use an equals ( = ) sign
msg.AddRecipient recipient

' The subject of the message
msg.Subject = subject

' And the body
msg.body = body

' Now send the message, using the indicated mailserver
'if not msg.Send("mail.amigamos.com" ) then
'    Response.write "<pre>" & msg.log & "</pre>"
'else
'    Response.write "Message sent succesfully!"
response.write recipient & "ddd"

'end if


' And we're done! the message has been sent.


%>
</body>
</html>

som du kan se har jeg disablet selve mail funktion...
"response.write recipient" giver intet resultat

jeg har ingen problemer med å requeste innholdet i 'recipient'. Hvilken method har du satt på din form ? det skal være 'post':

<form name="" method="post">

okay...det var method="post".....men den sender stadig ingen mail.

Jeg bruger dette script: http://tech.dimac.net/Websites/dimac/Website/Products/w3JMail/{8096E230-7744-4045-A2CD-F50179DCC365}?exId={83FCD061-FF2C-4496-91B0-37A742C1FBCD}

men hvis du ikke har tid, så bare lad mig give dig dine points.

Tak for hjælpen

du mangler jo å sende mailen !!

legg til

msg.Execute

til sist i sitt script

doh! ja :D
nu virker det!!

skriv et svar så du kan få dine points

et svar så du kan få dine points

liige et aller aller sidste spørgsmål..

e-mail scriptet (ikke dit) melder en fejl. Tilsyneladende kan den ikke finde ud af at sende til flere mails, fordi tegnet imellem mail'sne er forkert...test@test.com,test2@test.com virker ikke, og test@test;test2@test.com virker heller ikke...har du et forslag? :)

help :)

send mailsene en og en. Lag en array av alle recipients:

<%

' Get the form data
name        = Request.Form("name")
senderEmail = Request.Form("email")
subject    = "Regarding " & Request.Form("subject")
recipient  = Request.Form("recipient")
body        = Request.Form("body")

' Create the JMail message Object
set msg = Server.CreateOBject( "JMail.Message" )

' Set logging to true to ease any potential debugging
' And set silent to true as we wish to handle our errors ourself
msg.Logging = true
msg.silent = true

' Enter the sender data
msg.From = senderEmail
msg.FromName = name

' The subject of the message
msg.Subject = subject

' And the body
msg.body = body
recArr = SPLIT( recipient, "," )

for i = 0 to UBOUND( recArr )
  msg.AddRecipient recipient
  msg.Execute
next

altså sådan? :

<%

' Get the form data
name        = Request.Form("name")
senderEmail = Request.Form("email")
subject    = "Regarding " & Request.Form("subject")
recipient  = Request.Form("recipient")
body        = Request.Form("body")

' Create the JMail message Object
set msg = Server.CreateOBject( "JMail.Message" )

' Set logging to true to ease any potential debugging
' And set silent to true as we wish to handle our errors ourself
msg.Logging = true
msg.silent = true

' Enter the sender data
msg.From = senderEmail
msg.FromName = name

' Note that as addRecipient is method and not
' a property, we do not use an equals ( = ) sign
msg.AddRecipient recipient

' The subject of the message
msg.Subject = subject

' And the body
msg.body = body
recArr = SPLIT( recipient, "," )

for i = 0 to UBOUND( recArr )
  msg.AddRecipient recipient
  msg.Send("mail.amigamos.com")
next

' Now send the message, using the indicated mailserver
if not msg.Send("mail.amigamos.com" ) then
    Response.write "<pre>" & msg.log & "</pre>"
else
    Response.write "Message sent succesfully!"
end if


' And we're done! the message has been sent.


%>

msg.execute skal ikke bruges..

hovsa...dette skal nok ikke med...men det virker stadig ikke

' Now send the message, using the indicated mailserver
if not msg.Send("mail.amigamos.com" ) then
    Response.write "<pre>" & msg.log & "</pre>"
else
    Response.write "Message sent succesfully!"
end if

hvorfor skal den ikke det ?

msg.execute?

tjaa....enkelte mails sender den fint uden msg.execute

helt præcis får jeg denne fejl-meddelse:

-> MAIL FROM:
  <- 250 OK ... Sender ok
  -> RCPT TO:webmaster@amigamos.com,rob@rob-design.dk
<- 550 ... we do not relay
  -> RCPT TO:webmaster@amigamos.com,rob@rob-design.dk
<- 550 ... we do not relay
  -> RCPT TO:webmaster@amigamos.com,rob@rob-design.dk
<- 550 ... we do not relay
  -> DATA
<- 503 Incorrect command sequence
Error: 503 Incorrect command sequence
.execute()

kunne det tænkes der er fordi mail serveren ikke understøtter "masse" mails?

det tyder jo på en feil med den server du sender fra. Du har ikke lov til å relay'e...det er ingenting galt med scriptet

cool...så ved jeg det!!

du kender vel ikke en server der gør, så jeg lige kan teste? :)

Men ellers mange tak for hjælpen nute!!!!

"du kender vel ikke en server der gør" -- nope...