Du måste returnera värdet för att det ska fungera.
' Byt ut
Response.Write strPageText
' mot
FixText = strPageText
Edit:
Och
<% Call FixText("text att behandla") %>
mot
<% Response.Write FixText("text att behandla") %>
Frågan#1
Min funktion för att sätta stor bokstav på varje ord ser ut såhär:
Function FixText(ByVal strPageText)
sMyString = strPageText
vMyArray = Split(sMyString, " ")
For i = LBound(vMyArray) To UBound(vMyArray)
vMyArray(i) = UCase(Left(vMyArray(i), 1)) & Right(vMyArray(i), Len(vMyArray(i)) - 1)
Next
strPageText = Join(vMyArray, " ")
Response.Write strPageText
End Function
Funktionen ligger i en include-sida som är inlagd på alla sidor. Att anropa funktionen från en sida där include-filen är inlagd med <% Call FixText("text att behandla") %> går alldeles utmärkt.
Men när jag vill anropa funktionen för att göra något i själva include-filen (alltså där bla. funktionen finns) med tex. strText = FixText("text att behandla") så returneras inget..? Variabeln strText får inget värde. Varför?