---
title: "skicka olika personer beroende på vilken sida man befinner sig"
type: "forum-thread"
url: "https://www.webforum.nu/amne/asp/92466-skicka-olika-personer-beroende-på-vilken-sida-man-befinner-sig"
topic: "ASP"
topic_url: "https://www.webforum.nu/amne/asp"
author: "MizzK"
published: "2003-12-11T23:33:34.000Z"
updated: "2003-12-12T00:19:59.000Z"
replies: 2
views: 234
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/92466-skicka-olika-personer-beroende-på-vilken-sida-man-befinner-sig"
---

# skicka olika personer beroende på vilken sida man befinner sig

## #1 — MizzK, 2003-12-11T23:33Z

håller på att göra ett kontaktformulär och vill att det "skicka.asp" skall känna av vilken sidan formuläret är på och sedan skicka till rätt mail adress och min fråga är hur jag gör detta? 

gjorde så här men det fungerade inte

```
Set objMail = Server.CreateObject("JMail.Message")
objMail.From = "info@foretag.se"
objMail.FromName = "Kontakt forumuläret"
	If Request.QueryString("admin") = "" Or Request.QueryString("admin") = "0" Then
		objMail.AddRecipient "mail1@foretag.se"
	ElseIf Request.QueryString("admin") = "1" Then            	
		objMail.AddRecipient "mail2@foretag.se"
	ElseIf Request.QueryString("admin") = "2" Then
		objMail.AddRecipient "mail3@foretag.se"
	End If
objMail.Subject ="Kontakta mig"
```

 

en ex adress till en av sidorna som formuläret är includerat i är: kontakt.asp?avd=1&admin=2

dvs den skall känna av om det är inne på admin 1, 2 osv och skicka därefter till den mottageren

ngn?

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

## #2 — LR^evil.sid, 2003-12-12T00:06Z

Vart skickas mailet och vad säger querystringen när koden exekveras?

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

## #3 — MizzK, 2003-12-12T00:19Z

hela scriptet 

```
<%
If Request.Form("namn") = "" OR Request.Form("epost") = "" OR Request.Form("meddelande") = "" Then
  Response.Redirect("../../../kontakt.asp?avd=1&admin=2")
End If

Set objConn = Server.CreateObject("ADODB.Connection")
objConn.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & Server.MapPath("databas.mdb")
strSQL = "INSERT INTO pers_meddelanden (namn, foretag, tele, epost, rubrik, meddelande) VALUES ('" & Replace(Request.Form("namn"), "'", "''") & "', '" & Replace(Request.Form("foretag"), "'", "''") & "', '" & Replace(Request.Form("tele"), "'", "''")& "', '" & Replace(Request.Form("epost"), "'", "''")& "', '" & Replace(Request.Form("rubrik"), "'", "''") & "', '" & Replace(Request.Form("meddelande"), "'", "''") & "')"
objConn.Execute(strSQL)
objConn.Close : Set objConn = Nothing

Set objMail = Server.CreateObject("JMail.Message")
objMail.From = "info@foretag.se"
objMail.FromName = "Kontakt forumuläret"
	If Request.QueryString("admin") = "" Or Request.QueryString("admin") = "0" Then
		objMail.AddRecipient "mail1@foretag.se"
	ElseIf Request.QueryString("admin") = "1" Then            	
		objMail.AddRecipient "mail2@foretag.se"
	ElseIf Request.QueryString("admin") = "2" Then
		objMail.AddRecipient "mail3@foretag.se"
	End If
objMail.Subject ="Kontakta mig"

objMail.AppendHTML "<font face=verdana size=1> <b> Meddelande via hemsidan </b> <br>------------------------------------------<br><b>Skickades:</b>  " & Now & "<br> <b>Namn: </b> " & Request.Form("namn") & "<br><b>Företag: </b> "& Request.Form("foretag") &"<br><b>Telefon: </b> "& Request.Form("tele") &"<br><b>E-mail: </b> "& Request.Form("epost") & "<br><b>Ärende: </b> " & Request.Form("rubrik") &" <br>------------------------------------------<br>"& Request.Form("meddelande") &"<br></font>"

If objMail.Send("mail.server.se") Then
  Response.Write("Ditt meddelande är skickat!")
Else
  Response.Write("Något stämde inte riktigt där...")
End If

Set objMail = Nothing
%>
```

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

---

Tråden på webben: https://www.webforum.nu/amne/asp/92466-skicka-olika-personer-beroende-på-vilken-sida-man-befinner-sig