---
title: "Hur lägger man till denna funktion..."
type: "forum-thread"
url: "https://www.webforum.nu/amne/asp/12106-hur-lägger-man-till-denna-funktion"
topic: "ASP"
topic_url: "https://www.webforum.nu/amne/asp"
author: "Rinaldo"
published: "2001-10-11T14:28:00.000Z"
updated: "2001-10-15T13:49:00.000Z"
replies: 7
views: 257
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/12106-hur-lägger-man-till-denna-funktion"
---

# Hur lägger man till denna funktion...

## #1 — Rinaldo, 2001-10-11T14:28Z

```
Function Shorter(strText)
	arrText = Split(strText, " ")
	
	For counter = 0 To uBound(arrText)
		If Len(arrText(counter)) > 50 then
			If newText <> "" then
				newText = newText & " " & Left(arrText(counter), 50) & " " & Right(arrText(counter), Len(arrText(counter))-50)
			Else
				newText = Left(arrText(counter), 50) & " " & Right(arrText(counter), Len(arrText(counter))-50)
			End If
		Else
			If newText <> "" then
				newText = newText & " " & arrText(counter)
			Else
				newText = arrText(counter)
			End If
		End If
	Next
	
	Shorter = newText
End Function
```

av spin till Emissions WF kod. vill få den i samma tag som som allt ligger i...

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

## #2 — jorgen, 2001-10-11T15:44Z

Hej!

Ursäkta, jag är allmänt trög det vet jag, men jag förstår inte frågan.

Vad vill du göra?

mvh Jörgen :)

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

## #3 — Rinaldo, 2001-10-11T15:58Z

Jag vill göra så att WF koden även förkortar ord som är längre än 50 tecken och då lägga till dem i : wfParser.Parse.

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

## #4 — Rinaldo, 2001-10-12T18:16Z

någon?

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

## #5 — Rinaldo, 2001-10-14T17:25Z

Är det verkligen inte någon som kan hjälpa mig med detta ?

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

## #6 — emission, 2001-10-14T21:11Z

Om du vill lägga in din funktion som en del av parsern så är det bara att lägga in den i parser-classen och lägga in ett anrop till den i slutet av Parse-metoden.

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

## #7 — Rinaldo, 2001-10-15T13:27Z

I parser classen...?
såhär?

```
Function PareseLength(strText)
arrText = Split(strText, " ")

For counter = 0 To uBound(arrText)
If Len(arrText(counter)) > 50 then
If newText <> "" then
newText = newText & " " & Left(arrText(counter), 50) & " " & Right(arrText(counter), Len(arrText(counter))-50)
Else
newText = Left(arrText(counter), 50) & " " & Right(arrText(counter), Len(arrText(counter))-50)
End If
Else
If newText <> "" then
newText = newText & " " & arrText(counter)
Else
newText = arrText(counter)
End If
End If
Next

ParseLengt = newText
End Function
```

Hur och var ska jag anropa den?

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

## #8 — emission, 2001-10-15T13:49Z

Läs min kod, så hittar du både parser-classen (EMarkupParser) och dess Parse-metod.

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

---

Tråden på webben: https://www.webforum.nu/amne/asp/12106-hur-lägger-man-till-denna-funktion