Omkonvertering cdo til aspmail ???
Hej EksperterJeg har fået en mailingliste til at virke....
næsten .. nu vil den bare ikke sende til de
modtagere jeg har valgt ...
Den ligger her......
http://iceb.dk/list/
Gå ind i admin sektionen
Gå ind under send new
Tryk på send....
Her er filen der giver fejl
spawnedmailerSend.asp
<!--#include file ="SpawnedHead.asp"--><center><%
Dim mFrom,mTo,mSubject,mbcc,mBody,mArchive
mFrom = Request.Form("myemail")
mTo = Request.Form("to")
mSubject = Request.Form("subject")
mbcc = Request.Form("users")
mBody = Request.Form("body")
mArchive = Request.Form("archive")
if zDisplay1 = "Yes" then
response.write("The email has been sent to:<br><br>" & mbcc )
end if
Dim eCDO
Set eCDO = Server.CreateObject("CDONTS.NewMail")
eCDO.To = zEmail
eCDO.From = mFrom
eCDO.bcc = mbcc
eCDO.Subject = mSubject
eCDO.Body = mBody
eCDO.Send
Set eCDO = Nothing
if mArchive = "1" then
set conn=Server.CreateObject("ADODB.Connection")
conn.Provider="Microsoft.Jet.OLEDB.4.0"
conn.Open(Server.Mappath("SpawnedMailer.mdb"))
ArchiveSQL = "INSERT into Archive ('" & Replace(mSubject, "'", "''") & "','" & Replace(mBody, "'", "''") & "');"
conn.Execute ArchiveSQL
response.write("<br><br><br>Archived Successfully!<br><br>")
conn.close
end if
response.write("<br><br><br><center><a href='AdminIndex.asp'>ADMIN HOME</a><center>")
%></center><!--#include file ="SpawnedFoot.asp"-->
