Foros del Web » Creando para Internet » Diseño web »

ayuda con smart mailer

Estas en el tema de ayuda con smart mailer en el foro de Diseño web en Foros del Web. Hola tengo una pagina web en asp, y a la hora de enviar newsletters a los usuarios me da el siguiente error, y dada mi ...
  #1 (permalink)  
Antiguo 09/11/2005, 12:56
 
Fecha de Ingreso: mayo-2005
Mensajes: 9
Antigüedad: 18 años, 10 meses
Puntos: 0
ayuda con smart mailer

Hola tengo una pagina web en asp, y a la hora de enviar newsletters a los usuarios me da el siguiente error, y dada mi ignorancia no se resolverlo, UN AMIGO ME DICE QUE EL PROBLEMA ES DEFINIR CORRECTAMENTE EL COMPONENTE, PODEIS AYUDARME?
Smart Mailer 1.0.5
' Send on load
Server.ScriptTimeout = 1000
Set sm1 = new SmartMailer
sm1.checkVersion "1.05"
sm1.contentCharset = "us-ascii"
Session.CodePage = sm1.getCodepage()
sm1.smtpSetup "", "", "", ""
sm1.pickup = ""
sm1.component = "SMARTMAILER"
sm1.tmpFolder = ""
sm1.embedImages = true
sm1.progressBar = ""
sm1.ignore_errors = true
sm1.useQueue = true
sm1.setFrom strPageTitle, strAdminEmail
Set sm1.toRecord = rsMembersEmails
sm1.toRecordName = "MEM_FIRST"
sm1.toRecordEmail = "MEM_EMAIL"
sm1.total_mail = sm1.getTotalRecords(rsMembersEmails)
while not sm1.toRecord.EOF
sm1.setTo sm1.toRecord.Fields.Item(sm1.toRecordName).Value, sm1.toRecord.Fields.Item(sm1.toRecordEmail).Value
sm1.Subject = "" & strSubject & ""
' using static for body
sm1.setBody_Static_html "" & "Dear " & sm1.toRecord.Fields.Item(sm1.toRecordName).Value & ", " & vbCLRF & strBody & ""
' Attachments none
sm1.sendMail "multiple"
rsMembersEmails.MoveNext()
Wend
sm1.done()

set cmdUpdateNewsLetter = Server.CreateObject("ADODB.Command")
cmdUpdateNewsLetter.ActiveConnection = MM_connDUportalPro_STRING
cmdUpdateNewsLetter.CommandText = "UPDATE LETTERS SET LET_SENT = LET_SENT + 1 WHERE LET_ID = " & Request.Form("iData")
cmdUpdateNewsLetter.CommandType = 1
cmdUpdateNewsLetter.CommandTimeout = 0
cmdUpdateNewsLetter.Prepared = true
cmdUpdateNewsLetter.Execute()

Response.Redirect "home_newsletter.asp"

rsMembersEmails.Close()
Set rsMembersEmails = Nothing
%>
Atención: Estás leyendo un tema que no tiene actividad desde hace más de 6 MESES, te recomendamos abrir un Nuevo tema en lugar de responder al actual.
Respuesta




La zona horaria es GMT -6. Ahora son las 16:07.