---
title: "Jag och functioner"
type: "forum-thread"
url: "https://www.webforum.nu/amne/asp/9552-jag-och-functioner"
topic: "ASP"
topic_url: "https://www.webforum.nu/amne/asp"
author: "star"
published: "2001-05-16T19:31:00.000Z"
updated: "2001-05-17T10:35:00.000Z"
replies: 4
views: 221
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/9552-jag-och-functioner"
---

# Jag och functioner

## #1 — star, 2001-05-16T19:31Z

Hejsan alla vänliga aspnördar, världen är grym. Av någon anledning skrivs inte textsträngen ut och jag kan inte förstå varför. Användningsområdet är naturligtvis inte att man ska skriva ut strängen på sidan, jag ville bara pröva principen. Så fungerar det inte. Buhaha!
Pliiiis tell me whåtts rång.

\<%
'FUNKTION FÖR ATT SKAPA SQLSATSER
'\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*
function makeSQL(objekt)

Dim SQL
Dim strOrder
Dim strTabell

Select Case objekt
	Case "users"
	strTabell = "user"
	strOrder = "name"

	Case "menu"
	strOrder = "position"
	strTabell = "english"

	Case "content"
	strOrder = "name"
	strTabell = "english"

End Select

SQL = "SELECT \* FROM " & strTabell & " ORDER BY " & strOrder & " "

end function

call makeSQL("user")
Response.Write("SQL = " & SQL & "") 

%\>

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

## #2 — @nders, 2001-05-16T19:45Z

eftersom du dimmat SQL inne i funktionen kan du inte anropa den utanför.

jag är lite orolig för dina fältnamn, ett par av dem (user och name) kan vara reserverade av access, så därför bör du nog klamra dem.

varför inte returnera sql-frågan?

```
<%
'FUNKTION FÖR ATT SKAPA SQLSATSER
'***************************************
function makeSQL(objekt)

Dim SQL
Dim strOrder
Dim strTabell

Select Case objekt
Case "users"
strTabell = "[user]"
strOrder = "[name]"

Case "menu"
strOrder = "position"
strTabell = "english"

Case "content"
strOrder = "[name]"
strTabell = "english"

End Select

SQL = "SELECT * FROM " & strTabell & " ORDER BY " & strOrder & " "
makeSQL = SQL
end function

SQL = makeSQL("user")
Response.Write("SQL = " & SQL & "") 

%>
```

mvh,

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

## #3 — LarsG, 2001-05-16T20:25Z

du skriver 

case "users"

men i ditt anrop så har du 

call makeSQL("user")

så det är ingen gren i din select case som uppfylls.

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

## #4 — star, 2001-05-17T10:20Z

Tack!

Som vanligt löser ni alla mina problem. Nja, för andra gången i alla fall. Nu vet jag hur man returnerar variabler korrekt i vbscript. Halelulja!

Ehhh, som sagt. Stort tack till er båda, det fungerar.

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

## #5 — erka, 2001-05-17T10:35Z

som vanligt, 4:a inlägg.. ;) välkommen till webforum...även om inte jag hjälpte dig..

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

---

Tråden på webben: https://www.webforum.nu/amne/asp/9552-jag-och-functioner