Hej NG
Jeg har fået fat i et asp-mailscript - cdosys - som angiveligt skulle kunne
køre på servere, der ikke understøtter cdonts.
Scriptet fungerer upåklageligt, når jeg sender fra min egen maskine. Men
hvis siden ligger på nettet, får jeg fejl:
CDO.Message.1 error '80040220'
The "SendUsing" configuration value is invalid.
/scripts/cdosys.asp, line 32
_______________
Scriptet ser sådan ud:
<% @LANGUAGE = VBScript %>
<% Option Explicit %>
<header her>
<body>
<%
Dim strName, strEmail, strQuery, strSubj
strName = Trim(Request.Form("ClientName"))
strEmail = Trim(Request.Form("ClientEmail"))
strSubj = Trim(Request.Form("ClientEmne"))
strQuery = Trim(Request.Form("ClientQry"))
If (strName <> "" And strEmail <> "" And strSubj <> "" And strQuery <> "")
Then
Dim objMail, aRecipients
Set objMail = Server.CreateObject("CDO.Message")
objMail.From = strName & " <" & strEmail & ">"
objMail.To = strEmail
objMail.Subject = strSubj
aRecipients = Array("erik@donotspammmeplease.invalid")
objMail.BCC = Join(aRecipients, ";")
objMail.TextBody = strQuery
objMail.Send
Response.Write "<h3>Mail afsendt</h3>"
Response.Write "<p>Tak for din henvendelse. Jeg vender tilbage så hurtigt
som muligt.</p>"
Set objMail = Nothing
Else
%>
<form action="<%=Request.ServerVariables("cdosys.asp")%>" method=post>
<Resten af formularen her>
<% End If %>
</body>
_____________
Linje 32 er denne: objMail.Send
--
Med venlig hilsen
Erik Ginnerskov
http://hjemmesideskolen.dk -
http://ginnerskov.dk
http://html-faq.dk/