da97enlaMedlem sedan dec. 2001343 inlägg Hej
Jag vet att CDONTS inte fungerar på win2003 server, har sökt här på forumet och ser att man ska skriva CDO endast. Får dock inte det att fungera heller. Har varit i kontakt med webbhotellet och de säger jag ska använda CDOSYS, men jag får samma felmeddelande hela tiden. Så här ser koden ut:
' ## ...Skicka order
Set CDOMail = Server.CreateObject("CDO.NewMail")
CDOMail.From = sender
CDOMail.BCC = "webform@ewd.se"
CDOMail.Subject = subject
CDOMail.Body = body
CDOMail.Send
Set CDOMail = Nothing
Får felmeddelande:
Internal Server Error
The server encountered an internal error or misconfiguration and was unable to complete your request.
Please contact the server administrator to inform of the time the error occurred and of anything you might have done that may have caused the error.
More information about this error may be available in the server error log.
Webbhotellet är http://www.epsab.com/
Vad är felet?
mvh
Enla
@ndersMedlem sedan juni 200032 969 inlägg Man använder inte CDO.NewMail, utan CDO.Message.
Dessutom vill jag minnas att man ska använda TextBody eller HTMLBody istället för bara body.
Men allt det här hittade du säkert när du sökte? ;)
da97enlaMedlem sedan dec. 2001343 inlägg TAck @nders, du menar:
CDOMail.HTMLBody = body ? Får fortfarande samma fel, men det kanske beror på att jag också måste skriva cdoMessage.From mm eller?
Eller ska det bara vara såhär:
Set Mail = Server.CreateObject("CDO.Message")
@ndersMedlem sedan juni 200032 969 inlägg
CDOMail.HTMLBody = body
Jao.
men det kanske beror på att jag också måste skriva cdoMessage.From mm eller?
Nej, det spelar ingen roll vad ditt objekt heter, bara det är rätt sorts objekt.
mvh
da97enlaMedlem sedan dec. 2001343 inlägg Men varför fungerar inte detta? :( :(
subject ="Intresseanmälan"
'## Avsändare
sender = "webmaster@ewd.se"
' ## ...skicka order
body = body & "Intresseanmälan: " & vbCRLF _
& vbCRLF _
& "E-post: " &vbTAB &vbTAB &vbTAB & mail & vbCRLF _
& "Tel.bostad:" &vbTAB &vbTAB & hphone & vbCRLF _
Set CDOMail = Server.CreateObject("CDO.Message")
CDOMail.From = sender
CDOMail.To = "info@ewd.se"
CDOMail.Subject = subject
CDOMail.HTMLBody = body
CDOMail.Send
Set CDOMail = Nothing
/enla
@ndersMedlem sedan juni 200032 969 inlägg Får du fortfarande samma felmeddelande, eller på vilket sätt fungerar det inte?
da97enlaMedlem sedan dec. 2001343 inlägg Ja, precis, får exakt samma felmeddelande. Måste jag använda CDOSYS på något sätt istället?
@ndersMedlem sedan juni 200032 969 inlägg Prova att lägga till konfigurationsraderna i Palles exempel.
