Jmail-problem

6 svar · 234 visningar · startad av timedia 23 maj 2002

timediaMedlem sedan maj 2001420 inlägg

Frågan23 maj 2002 13:45#1

Har ett nyhetsbrev som jag vill försöka med:

"jmail"
		set mlmsend = Server.CreateOBject( "JMail.Message" )
		mlmsend.Logging = true
		mlmsend.silent = true
		mlmsend.From = from
		mlmsend.FromName = myname
		mlmsend.AddRecipient from
		while not rsm.eof
		mlmsend.AddRecipientbcc rsm("email")
		rsm.movenext
		wend
		rsm.close
		mlmsend.Subject = subject
		mlmsend.body = message
		if not mlmsend.Send (rscfg("mailserver")) then
    	Response.write "<pre>" & mlmsend.log & "</pre>"
		else
    	Response.write "<center>" & "Message sent succesfully!" & "</center>" & "<br>"
		end if

Tyvärr blir det så här:

Microsoft VBScript runtime error '800a000d' 

Type mismatch: 'mlmsend.AddRecipientbcc' 

/maillist/sendit.asp, line 65

Rad 65 är mlmsend.AddRecipientbcc rsm("email")
förklaring av rsm: sqlm = "select email from list"
set rsm = conn.execute (sqlm)

Vad funkar inte?
..följdfråga: hur får jag den att skicka 100, sen en knapp som säger 'skicka nästa 100´ ?

@ndersMedlem sedan juni 200032 969 inlägg

23 maj 2002 13:48#2

Vad innehåller rsm("email")? Kan den vara null? Kontrollera det först.

if not isnull(rsm("email")) then mlmsend.AddRecipientbcc rsm("email")

Mvh,

Jesper TMedlem sedan nov. 20017 144 inlägg

23 maj 2002 13:48#3

Vad med:

mlmsend.AddRecipientbcc & rsm("email")

Jesper TMedlem sedan nov. 20017 144 inlägg

23 maj 2002 13:50#4

..följdfråga: hur får jag den att skicka 100, sen en knapp som säger 'skicka nästa 100´ ?

Det har varit uppe förut ett antal gånger, prova att sök : skicka AND jmail

MVH Jesper

timediaMedlem sedan maj 2001420 inlägg

23 maj 2002 13:52#5

Hej Anders och tack för snabbt svar :)

Glömde föklaring av rsm, men redigerade inlägget ovan.

LAMPMedlem sedan mars 2002777 inlägg

23 maj 2002 13:53#6

Prova lägga till mlmsend.LazySend = True för att slippa server script timeout.

doggelitoMedlem sedan juni 20003 076 inlägg

23 maj 2002 14:22#7

taget från https://www.dimac.se

When sending massive amounts of emails, you will need to
use the mail queue instead of sending them at once, or else your ASP will time out. 
This example shows how you use the nq 
method instead of the send() method. 
We only send a single email here, but you will get the picture. 

 
   jmailnq.asp

<%@LANGUAGE="VBSCRIPT" %>
<%

' Example on how to use queueing

' The message is set up as usual...
set Message = Server.CreateObject( "JMail.Message" )

Message.From = "janeway@voyager.com"
Message.Subject = "Testing"
Message.Body = "This is a test mail"
Message.AddRecipient "commander@enterprise.com","Jean Luc"

' Instead of using the Send() method, we use nq
' The email will be placed in the mail queue and sent
' as soon as the mailservice picks it up.
' We do not need to specify a mailserver, as the
' mailservice does all that for us.

' What we do need to do is to specify where the MS pickup
' directory is. If you are running w3 JMail on a
' Windows 2000 server, this is not neccessary, otherwise

' Unless you are running windows 2000 on your webserver,
' you will need to specify where the MS pickup directory
' is (c:\inetpub\mailroot\pickup\).

Message.MSPickupDirectory = "c:\inetpub\mailroot\pickup\"
Message.nq
%>
<HTML>
<BODY>
Email enqued! </BODY>
</HTML>