---
title: "Webhostme:s asp-emailfunktion?"
type: "forum-thread"
url: "https://www.webforum.nu/amne/asp/5455-webhostme-s-asp-emailfunktion"
topic: "ASP"
topic_url: "https://www.webforum.nu/amne/asp"
author: "Mattias"
published: "2000-03-12T23:38:00.000Z"
updated: "2000-03-13T21:41:00.000Z"
replies: 7
views: 476
page: 1
pages: 1
language: "sv-SE"
site: "webForum — webforum.nu"
rights: "Upphovsrätten till varje inlägg tillhör dess författare."
attribution: "Citera som: webForum, https://www.webforum.nu/amne/asp/5455-webhostme-s-asp-emailfunktion"
---

# Webhostme:s asp-emailfunktion?

## #1 — Mattias, 2000-03-12T23:38Z

Är det någon som har använt webhostme:s funktion för att skicka formulärdata till ens epostadress?

Jag greppar nämligen inte riktigt hur man skall gå tillväga. Kodexemplet på nedanstående sida är inte heller så upplysande. Är det någon som kan hjälpa mig?
 <http://www.webhostme.com/emailObject.asp> 

// Mattias

Permalänk: https://www.webforum.nu/p/5455

## #2 — Bire, 2000-03-12T23:44Z

Det är som i kodexemplet på den sidan du angav:

\<%
Set SMTPObj = CreateObject("WebHostMeMail.SMTP")
SMTPObj.SMTPServer = "Mail.webhostme.com"
SMTPObj.ToAdd = "testing@webhostme.com,support@webhostme.com"
SMTPObj.FromAdd = "yourfriend@webhostme.com"
SMTPObj.Subject = "greeting"
SMTPObj.Body = "Testing"
SMTPObj.Connect
result = SMTPObj.EMail
Response.write "Sent " & result
SMTPObj.Quit
%\>

Det ska gå...

Permalänk: https://www.webforum.nu/p/238850

## #3 — Mattias, 2000-03-13T01:16Z

Har nu försökt att få rätt på koden, men möts av ett meddelande när formuläret skickats. Det låter som följer:

error '800401f7' 
Some error in application program 

/kontakt.asp, line 10 

Någon mer som varit med om detta felmeddelande vid användning av webhostme:s asp-email-tjänst?

//Mattias

Permalänk: https://www.webforum.nu/p/238851

## #4 — a, 2000-03-13T10:27Z

Skicka med koden på den asp-sida där du använt cdonts för att skicka formulärdata, så skriver jag om den för dig till den nya komponenten och lägger upp här.

Permalänk: https://www.webforum.nu/p/238852

## #5 — Mattias, 2000-03-13T11:45Z

\<% On Error Resume Next

Dim oMail, strFrom

strFrom = Request.Form("Email")
If strFrom="" then 
	strFrom="ingen@email.se"
End If

Set oMail = Server.CreateObject("CDONTS.NewMail")

oMail.Send strFrom, "smurf@smurf.se", "Kontakt" + chr(10) + chr(10) + "Detta mail skickades från hemsidan" + chr(10) + chr(10) + "Namn:  " + Request.Form("Namn") + chr(10)  + chr(10) + "Epost: " +  Request.Form("Email") + chr(10) + chr(10) + "Övrigt:  " +  Request.Form("Ovrigt") + chr(10) + chr(10)  + chr(10)

%\>

Tack på förhand!

// Mattias

Permalänk: https://www.webforum.nu/p/238853

## #6 — a, 2000-03-13T20:52Z

Såhär borde det funka:
\<%
'---Skicka formuläret---
On Error Resume Next
Dim oMail, strFrom

strFrom = Request.Form("Email")
If strFrom="" then 
strFrom="ingen@email.se"
End If

Set oMail = CreateObject("WebHostMeMail.SMTP")

 oMail.SMTPServer = "Mail.webhostme.com" 'Mailservern som du skall skicka mailet ifrån
 oMail.FromAdd = strFrom 'Adressen som besökaren fyllt i
 oMail.ToAdd = "smurf@smurf.se" 'Adressen mailet skickas till
 oMail.Subject ="Mail från hemsidan" 'Mailets ärenderad (subject)
 oMail.Body = "Kontakt" + chr(10) + chr(10)\_ 'Mailets innehåll
 \+ "Detta mail skickades från hemsidan" + chr(10) + chr(10)\_
 \+ "Namn: " + Request.Form("Namn") + chr(10) + chr(10) +\_
 "Epost: " + Request.Form("Email") + chr(10) + chr(10) +\_
 "Övrigt: " + Request.Form("Ovrigt") + chr(10) + chr(10) + chr(10)
 oMail.Connect 'Kontakta mailservern
 oMail.EMail 'Skicka mailet
 oMail.Quit 'Stäng förbindelsen
'---Formuläret skickat---
%\>

Permalänk: https://www.webforum.nu/p/238854

## #7 — bohlin, 2000-03-13T21:18Z

hur kommer det sig att folk använder char(10) när det finns en "konstant" i vbscript...vbCrLf.

Permalänk: https://www.webforum.nu/p/238855

## #8 — a, 2000-03-13T21:41Z

Ja det kan man undra förstås, vet faktiskt inte blir ganska fult

Permalänk: https://www.webforum.nu/p/238856

---

Tråden på webben: https://www.webforum.nu/amne/asp/5455-webhostme-s-asp-emailfunktion