Probleme ASP
Bonjour, j'ai vraiment besoin d'aide voila, je suis actuellement en train de migrer un site (asp-access) vers un autres hébergeur (Asp Serveur) cependant ma copie du site chez ce nouvel hébergeur, possède une erreur,
Ma page qui reprend l'email précédemment entré par l'utilisateur demande à ce dernier de choisir son mot de passe, lorsque l'on clique sur OK ce message s'affiche (pourtant ça insert bien dans la bdd) :
Objet Server error 'ASP 0177 : 800401f3'
Échec de Server.CreateObject
/includes/functions.asp, line 99
ProgID non valide Pour de plus amples informations relatives à ce message, veuillez visitez le site du Support technique en ligne Microsoft sur : http://www.microsoft.com/contentredirect.asp.
la ligne 99 de functions.asp est la suivante :
99 Set Mailer = Server.CreateObject("SMTPsvg.Mailer")
100 Mailer.RemoteHost = mailserver
Mailer.ContentType = "text/html"
Mailer.FromName = fromname
Mailer.FromAddress = fromaddress
Mailer.AddRecipient toaddress, toaddress
Mailer.Subject = subjecttext
Mailer.BodyText = bodytext
If not Mailer.SendMail then
'response.write "Mail non envoyé!!!" & "<br>"
'response.write mailserver & "<br>"
'response.write fromname & "<br>"
'response.write fromaddress & "<br>"
'response.write toaddress & "<br>"
'response.write subjecttext & "<br>"
'response.write bodytext & "<br>"
'response.end
end if
set Mailer = NOTHING
Je débute en Asp, c'est très urgent , merci pour votre aide, s'il vous plait MERCI à TOUS, si cela vous parait trop vague demander moi des informations.
Ma page qui reprend l'email précédemment entré par l'utilisateur demande à ce dernier de choisir son mot de passe, lorsque l'on clique sur OK ce message s'affiche (pourtant ça insert bien dans la bdd) :
Objet Server error 'ASP 0177 : 800401f3'
Échec de Server.CreateObject
/includes/functions.asp, line 99
ProgID non valide Pour de plus amples informations relatives à ce message, veuillez visitez le site du Support technique en ligne Microsoft sur : http://www.microsoft.com/contentredirect.asp.
la ligne 99 de functions.asp est la suivante :
99 Set Mailer = Server.CreateObject("SMTPsvg.Mailer")
100 Mailer.RemoteHost = mailserver
Mailer.ContentType = "text/html"
Mailer.FromName = fromname
Mailer.FromAddress = fromaddress
Mailer.AddRecipient toaddress, toaddress
Mailer.Subject = subjecttext
Mailer.BodyText = bodytext
If not Mailer.SendMail then
'response.write "Mail non envoyé!!!" & "<br>"
'response.write mailserver & "<br>"
'response.write fromname & "<br>"
'response.write fromaddress & "<br>"
'response.write toaddress & "<br>"
'response.write subjecttext & "<br>"
'response.write bodytext & "<br>"
'response.end
end if
set Mailer = NOTHING
Je débute en Asp, c'est très urgent , merci pour votre aide, s'il vous plait MERCI à TOUS, si cela vous parait trop vague demander moi des informations.
4 réponses
-
nouvelle installation sur server windows 2000 (DEC. 2007) et impossible résoudre
Objet Server error 'ASP 0177 : 800401f3'
sur Server.createObject("Mswc.Tools / JMAIL.SmtpMail / W3.Upload")
J' ai MDAC 2.8 SP2
Merci pour l'aide -
La réponse pourtant indiquée : Échec de Server.CreateObject
Cela veut dire que vous essayez d'utiliser un composant qui n'est pas déclaré chez ASPSERVEUR et c'est bien le cas !
En réalité l'objet SMTPsvg.Mailer ne peut pas être crée car vous utilisez un composant non standard.
Vous pouvez utiliser chez ASPSERVEUR les composant d'envoi de mail suivants : CDONT, JMAIL PRO
Nous pouvons inscrire d'autres composants, il suffit de nous le demander plutôt que de poster un message sur un forum il aurait été plus rapide de passer un coup de fil (ou d'ouvrir un ticket) auprès de notre support (support@aspserveur.com), le délai moyen de réponse est de 5 minutes !
Site Aspserveur.com
Page du support technique d'Aspserveur.com
-
En espérant ne pas faire d'erreur, si le serveur est en NT/2000
Dim MonSendMail
Set MonSendMail = Server.CreateObject("CDONTS.NewMail")
MonSendMail.To = Destination
MonSendMail.From = Source
MonSendMail.Subject=Objet
MonSendMail.Body = Message
MonSendMail.MailFormat = 0
MonSendMail.BodyFormat = BodyFormat
MonSendMail.Send
Set MonSendMail = Nothing
----------------------------------------------------------------------------
Sinon en 2003
Dim iMsg
Dim iConf
Dim Flds
Const cdoSendUsingPickup = 1
'For CDOSYS, the pickup directory is located at c:\inetpub\mailroot\pickup
Const strPickup = "c:\inetpub\mailroot\pickup"
'Create the message object
Set iMsg = CreateObject("CDO.Message")
'Create the configuration object
Set iConf = iMsg.Configuration
With iConf.Fields
.item( "http://schemas.microsoft.com/cdo/configuration/sendusing") = cdoSendUsingPickup
.item("http://schemas.microsoft.com/cdo/configuration/smtpserverpickupdirectory") = strPickup
.Update
End With
With iMsg
.From=Source
.To=Destination
.Subject=Objet
.TextBody=Message
.BodyFormat = BodyFormat
'On Error Resume Next
.Send
End With -
De l'aide s'il vous plait j'en ai vraiment besoin, merci.
