Hej!

Har ett stort problem med att få CDONTS att skicka mail till en fördefinierad mailadress. Jag har ett formulär på en sida och svarssidan ser ut så här:

<%

Dim Foretag, Fornamn, Efternamn, Adress, Postnr, Ort, Telefon, Fax, Epost

Foretag = Request.Form("Foretag")
Fornamn = Request.Form("Fornamn")
Efternamn = Request.Form("Efternamn")
Adress = Request.Form("Adress")
Postnr = Request.Form("Postnr")
Ort = Request.Form("Ort")
Telefon = Request.Form("Telefon")
Fax = Request.Form("Fax")
Epost = Request.Form("Epost")

Dim send_Mail
SET send_Mail = Server.CreateObject("CDONTS.NewMail")
send_Mail.To = "jnilsson81@hotmail.com"
send_Mail.Subject = "Bekräftelse på formulär"
send_Mail.Body = strBody
send_Mail.Send
SET send_Mail = Nothing

Dim strBody
strBody = "Foretag: " & Foretag & Chr(10)
strBody = strBody + "Fornamn: " & Fornamn & Chr(10)
strBody = strBody + "Efternamn: " & Efternamn & Chr(10)
strBody = strBody + "Adress: " & Adress & Chr(10)
strBody = strBody + "Postnr: " & Postnr & Chr(10)
strBody = strBody + "Ort: " & Ort & Chr(10)
strBody = strBody + "Telefon: " & Telefon & Chr(10)
strBody = strBody + "Fax: " & Fax & Chr(10)
strBody = strBody + "Epost: " & Epost



Response.Write (Foretag) & "<br>"
Response.Write (Fornamn) & "&nbsp;"
Response.Write (Efternamn) & "<br>"
Response.Write (Adress) & "<br>"
Response.Write (Postnr)
Response.Write (Ort) & "<br>"
Response.Write (Telefon) & "<br>"
Response.Write (Fax) & "<br>"
Response.Write (Epost) & "<br>"

%>

Jag har en webbserver stående men har rotkatalogen i D:\Webb och inte i C:\Inetpub\wwwroot

Mailen skickas inte till den adressen jag vill utan lägger sig i C:\Inetpub\mailroot\Badmail

Där läggs tre filer för varje skickat mail:

fil 1: 002271610110309200100000004.BAD

X-Receiver: jnilsson81@hotmail.com
To: <jnilsson81@hotmail.com>
Subject: Bekräftelse på formulär
Date: Thu, 21 Mar 2002 08:50:49 +0100
X-MimeOLE: Produced By Microsoft MimeOLE V5.50.4522.1200

fil 2: 002271610110309200100000004.BDP


vCMM
` vGPT    ÿÿÿÿvLPTÿÿÿÿˆ  \ ÿÿÿÿvMPTÿÿÿÿè   € 3c84c19fd5b83e9468c2f2dd562108f900.00000004.eml vPFSÿÿÿÿ` 0 0  ˜ N P 0 è   2 ì #    ! $  
 8
 D
& P   ' X   ( p  œ   ' ¤   ( ¼  Ü   ) à 2 4   = @ / T                        $    ,    4    :~›`ÉѪ^ ÀO£[‚C:\Inetpub\mailroot\Queue\NTFS_1e74028001c1d0ad00000017.EML 0 hs <jnilsson81@hotmail.com> Bekräftelse på formulär domän.se 127.0.0.1 7.127.0.0.1 S8CHS8 ersVersion: 5.0.2195.2966 ,Thu, 21 Mar 2002 08:50:50 +0100 127.0.0.1 CHS8 RPTVersion: 5.0.2195.2966 ÿFri, 15 Mar 2002 12:36:00 +0100
<CHS8qr7iVKBHWiW32dH00000012@CHS

fil 3: 002271610110309200100000004.BDR

U n a b l e t o d e l i v e r t h i s m e s s a g e b e c a u s e t h e f o l l o w e r r o r w a s e n c o u n t e r e d : " E r r o r i s p r o c e s s i n g f i l e i n p i c k u p d i r e c t o r y . " .



T h e s p e c i f i c e r r o r c o d e w a s 0 x C 0 0 4 0 2 C E .

Hoppas det är någon som kan hjälpa mig, jag har försökt allt!

Tack på förhand!

Har du gjort följande?
http://www.pellesoft.nu/login/articles/other/iis_smtp.asp

/Pelle

Vet inte om det är detta som orsakar felet, men du tilldelar strBody värde efter att du har skickat mailet, testa såhär istället:

<code>
Dim strBody
strBody = "Foretag: " & Foretag & Chr(10)
strBody = strBody + "Fornamn: " & Fornamn & Chr(10)
strBody = strBody + "Efternamn: " & Efternamn & Chr(10)
strBody = strBody + "Adress: " & Adress & Chr(10)
strBody = strBody + "Postnr: " & Postnr & Chr(10)
strBody = strBody + "Ort: " & Ort & Chr(10)
strBody = strBody + "Telefon: " & Telefon & Chr(10)
strBody = strBody + "Fax: " & Fax & Chr(10)
strBody = strBody + "Epost: " & Epost

Dim send_Mail
SET send_Mail = Server.CreateObject("CDONTS.NewMail")
send_Mail.To = "jnilsson81@hotmail.com"
send_Mail.Subject = "Bekräftelse på formulär"
send_Mail.Body = strBody
send_Mail.Send
SET send_Mail = Nothing
</code>

/Johan

det har jag testat att skifta plats på dem, men det hjälper inte