---
title: "Vill använda kod på flera sidor."
type: "forum-thread"
url: "https://www.webforum.nu/amne/asp/130773-vill-använda-kod-på-flera-sidor"
topic: "ASP"
topic_url: "https://www.webforum.nu/amne/asp"
author: "ConnyFox"
published: "2005-06-29T23:52:15.000Z"
updated: "2005-06-30T11:59:45.000Z"
replies: 3
views: 284
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/130773-vill-använda-kod-på-flera-sidor"
---

# Vill använda kod på flera sidor.

## #1 — ConnyFox, 2005-06-29T23:52Z

jag har en kodbit där jag hämtar en massa information från databaser och lägger sedan in informationen formaterat i en sträng som är utformad som en html sida.

På vissa sidor vill jag skriva ut denna sträng och på vissa sidor vill jag använda denna sträng för att t.ex skicka ett html mail.

Nu är det så att om jag använder denna kod på 4st sidor och vill ändra något så känns det fruktansvärt dumt att behöva ändra på 4 sidor.

har testat både med att inkludera, skapa sub och funktion men får inte till det.

Det viktiga är att jag på sidorna som jag inkluderar koden på kan använda strängar som specificeras i Koden.

såhär kan sidan jag vill inkludera se ut

```
*hämtar massa data*

HTML = "<table><tr><td>" & rs("falt1") & "</td><td>" & rs("falt2") & "</td></tr></table>"

StrEmail = rs("falt3")
```

och sidan där jag vill hämta infon på kan se ut såhär t.ex

```
response.write html
response.write strEmail

cdoMessage.From = "aa@aa.com"
cdoMessage.To = strEmail
cdoMessage.Subject = "Orderbekräftelse" 
cdoMessage.HTMLBody = HTML
cdoMessage.Send
```

har testat massa olika och lyckats skriva ut det med response.write men inte lyckats få iväg mailet.

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

## #2 — @nders, 2005-06-30T03:36Z

1) Se till att dimma variablerna globalt på sidorna. Kan göras överst i includefilen.

```
dim HTML, strEmail
```

2) Gör en subrutin dit du skickar in värdena som ska användas.

```
sub vettigtnamn(sValue1, sValue2, sValue3)
    HTML = "<table><tr><td>" & sValue1 & "</td><td>" & sValue2 & "</td></tr></table>"

    StrEmail = sValue3
end sub
```

3) Kalla på subrutinen

```
vettigtnamn rs("falt1"), rs("falt2"), rs("falt3")
```

Ett annat alternativ istället för att dimma variablerna globalt är att du skickar in byref-parametrar i subrutinen istället.

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

## #3 — ConnyFox, 2005-06-30T11:56Z

ok och detta kommer även funka för o skcika email? vet inte varför det inte skulle öra det, men det gjorde inte det när jag testade iaf trots att jag kunde skriva ut den med response.write ;D aja jag skall testa. tack!

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

## #4 — @nders, 2005-06-30T11:59Z

Ja, om man gör rätt kommer det att funka, såklart. :)

Så länge du ser till att variabler som sätts inne i subrutinen är dimmade utanför densamma, så de är globala, så ska det inte vara några problem.

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

---

Tråden på webben: https://www.webforum.nu/amne/asp/130773-vill-använda-kod-på-flera-sidor