---
title: "Emailnot. av, på?"
type: "forum-thread"
url: "https://www.webforum.nu/amne/asp/9930-emailnot-av-på"
topic: "ASP"
topic_url: "https://www.webforum.nu/amne/asp"
author: "Bj"
published: "2001-06-07T20:54:00.000Z"
updated: "2001-06-08T06:01:00.000Z"
replies: 6
views: 219
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/9930-emailnot-av-på"
---

# Emailnot. av, på?

## #1 — Bj, 2001-06-07T20:54Z

Hej.
Som ni kan se nedan så är det ett script för att skicka ett aut. mail när någon t.ex skrivit i en gästbok.
Nu har jag "stängt" av funktionen genom att markera framför varje rad.
Finns det något smart sätt man kan göra i början av denna kod så man bara behöver ändra mellan "ja" och "nej"?

```
'Namn = Request.Form("namn")
'Email = Request.Form("email")
'Meddelande = Request.Form("meddelande")
'Ip = Request.ServerVariables("REMOTE_ADDR")

'sFrom = "min_email@domän.com"
'sTo= "min_email@domän.com"

'sSubject = "En meddelande har lagts till"
'sMessage = "Hej," & vbcrlf _
        '& "En meddelande har lagts till:" & vbcrlf _
		'& vbcrlf _
        '& "Meddelandet lyder:" & vbcrlf _
        '& vbcrlf _
		'& Meddelande  & vbcrlf _
        '& vbcrlf _
		'& "Det är inlagt av:" & vbcrlf _
		'& "Namn: " & Namn & vbcrlf _
		'& "Email: " & Email & vbcrlf _
		'& "Datum: " & Date
'Set objNewMail = CreateObject("CDONTS.NewMail")
'objNewMail.Send sFrom, sTo, sSubject, sMessage
'Set objNewMail = Nothing
```

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

## #2 — icaaq, 2001-06-07T21:03Z

lägg allt i en sub:

```
sub sendmail(Namn, Email, meddelande, ip)
sFrom = "min_email@domän.com"
sTo= "min_email@domän.com"

sSubject = "En meddelande har lagts till"
sMessage = "Hej," & vbcrlf _
& "En meddelande har lagts till:" & vbcrlf _
& vbcrlf _
& "Meddelandet lyder:" & vbcrlf _
& vbcrlf _
& Meddelande & vbcrlf _
& vbcrlf _
& "Det är inlagt av:" & vbcrlf _
& "Namn: " & Namn & vbcrlf _
& "Email: " & Email & vbcrlf _
& "Datum: " & Date
Set objNewMail = CreateObject("CDONTS.NewMail")
objNewMail.Send sFrom, sTo, sSubject, sMessage
Set objNewMail = Nothing
End Sub
```

sen om du vill skicka mailet

```
 
call sendmail(Namn, Email, meddelande, ip)
```

vill du inte skicka mail koménterar du bort den bara

```
'call sendmail(Namn, Email, meddelande, ip)
```

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

## #3 — slurken, 2001-06-07T21:11Z

varför anropar man sub:en med call?

kan man inte gör det utan call?

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

## #4 — icaaq, 2001-06-07T21:11Z

hur menar du ...??

att ändra mellan ja och nej? ska du du ha nån typ radiobutton i ett formulär?? :q ;)

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

## #5 — Bj, 2001-06-08T03:15Z

Ja, jag menar så att man som "admin" kan välja om man vill att ett aut. email skall skickas eller ej.

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

## #6 — @nders, 2001-06-08T04:32Z

jag brukar göra så här typ:

```
dim bolSendEmail
bolSendEmail = false

...

if bolSendEmail then
' din mailskickarkod
end if
```

så switchar du bara bolSendEmail mellan true och false.

mvh,

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

## #7 — icaaq, 2001-06-08T06:01Z

slurken\>\>
Enligt min uppfattning så genom att använda **call** så får man reda på att man "callar" på nått annat i koden .......utan att kommenentera så fattar man ju att man nått annat händer??

men som sagt det går ju att bara skriva

sendmail()

 :)

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

---

Tråden på webben: https://www.webforum.nu/amne/asp/9930-emailnot-av-på