CDONTS win 2003server

7 svar · 279 visningar · startad av da97enla 31 okt. 2004

da97enlaMedlem sedan dec. 2001343 inlägg

Frågan31 okt. 2004 10:16#1

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 967 inlägg

31 okt. 2004 10:22#2

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

31 okt. 2004 10:32#3

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 967 inlägg

31 okt. 2004 10:34#4

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

31 okt. 2004 10:48#5

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 967 inlägg

31 okt. 2004 10:50#6

Får du fortfarande samma felmeddelande, eller på vilket sätt fungerar det inte?

da97enlaMedlem sedan dec. 2001343 inlägg

31 okt. 2004 10:56#7

Ja, precis, får exakt samma felmeddelande. Måste jag använda CDOSYS på något sätt istället?

@ndersMedlem sedan juni 200032 967 inlägg

31 okt. 2004 11:00#8

Prova att lägga till konfigurationsraderna i Palles exempel.