cdosys

[nicolal]

Vero ... mi ero dimenticato di caricare la pagina giusta per il form che spedisce l'indirizzo email

ma ora mi restitusice questo errore

error '8004020f'
line 151

e la linea 151 è questa:

' Invia l'email
objMail.Send()

[nicolal]

Sul sito di MSDN dice:

IDS_FAILURE_INITTOKEN 8004020F Failure in obtaining user token.

ma che vuol dire?

[Mems]

Ora vediamo cosa dice Goooooogle.

[Mems]

In tetesken: http://www.google.it/search?hl=it&rl...er+token&meta=

[nicolal]

in tatesken non mi metto nemmeno a leggerlo già nn ci capisco na mazza in italiano :maLOL:

[Mems]

kvinti non kapise una mazzen nemmeno in italien?
These cooks!

[nicolal]

ma vieniiiiiiiiiiiiiiiiiiiiiiiiiiiii

questo script non da errori:
Set Config = Server.CreateObject("CDO.Configuration")
Set Fields = Config.Fields
Fields.Item("http://schemas.microsoft.com/cdo/configuration/sendusing") = 2 ' cdoSendUsingPort
Fields.Item("http://schemas.microsoft.com/cdo/configuration/smtpserver") = serv
Fields.Update

Do While Not RS.eof
Set MailObj = Server.CreateObject("CDO.Message")
MailObj.From = "emai@domini.it"
MailObj.To = "destinatario"
MailObj.Subject = Request("oggetto")
MailObj.HTMLBody = Request("testo")
MailObj.Send()

Set Config = Nothing
Set Fields = Nothing
Set MailObj = Nothing

[Mems]

serv sarebbe la tua variabile che contiene l'indirizzo del server SMTP?

[nicolal]

si mems

problemino di apici nel corpo della mail, non riesco a sistemare gli apici in modo corretto
uff ma che fatica:

MailObj.HTMLBody = "<font face=""Verdana"" size=""1"">Grazie per esserti iscritto alle Newsletter , per completare la tua iscrizione clicca sul link seguente</font>

http://www.link.asp?q=4&numero='"& nemail &"'>conferma</a>"



nemail è un valore che estraggo prima di inviare la mail
mi ci dai un okkio

[Mems]

MailObj.HTMLBody = "<font face=""Verdana"" size=""1"">Grazie per esserti iscritto alle Newsletter , per completare la tua iscrizione clicca sul link seguente

conferma</font>"