---
title: "Fel på \"Mid\""
type: "forum-thread"
url: "https://www.webforum.nu/amne/asp/89450-fel-på-mid"
topic: "ASP"
topic_url: "https://www.webforum.nu/amne/asp"
author: "Danielkun"
published: "2003-11-02T03:13:35.000Z"
updated: "2003-11-02T17:00:05.000Z"
replies: 6
views: 287
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/89450-fel-på-mid"
---

# Fel på "Mid"

## #1 — Danielkun, 2003-11-02T03:13Z

Varför får jag detta fel på denna kod?

Körningsfel i Microsoft VBScript (0x800A0005)
Ogiltigt proceduranrop eller argument.: 'Mid'
/default.asp, line 97 (blir rad 3)

```
function Bild_Bokstav(strCompleteSentence)

For i = 0 to len(strCompleteSentence)
     strLetter = Mid(strCompleteSentence, i, 1)

     If LCase(strLetter) = strLetter Then

		Bild_Bokstav = Bild_Bokstav & "<img src=""" & "Alfabet-s/" & strLetter & ".gif" & """>"
       
     Else

		if strLetter = "" then
		Bild_Bokstav = Bild_Bokstav & "&nbsp;"
		else
		Bild_Bokstav = Bild_Bokstav & "<img src=""" & "Alfabet-l/" & strLetter & ".gif" & """>"
		end if

     End If

Next
end function
```

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

## #2 — @nders, 2003-11-02T05:47Z

Hur kallar du på funktionen?

 \- - - -

red: blah

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

## #3 — cyprys, 2003-11-02T06:46Z

Inom datavärlden börjar man alltid räkna med 0, inkl funktionen mid.
Byt ut mot detta så skall det nog lösa sig.

```
For i = 0 to len(strCompleteSentence) - 1
```

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

## #4 — Danielkun, 2003-11-02T11:23Z

Funkar inte med att lägga till -1 :(

Jag anropar den funktionen genom att skriva;

```
<%
text = "Hej på dig"
response.write Bild_Bokstav(text)
%>
```

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

## #5 — Erik Juhlin, 2003-11-02T11:32Z

VB är inte som resten av datavärlden. Kör med:

```
For i = 1 To Len(strCompleteSentence)
```

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

## #6 — Danielkun, 2003-11-02T15:23Z

Tack! Det funka!

Om det är nån annan som behöver samma sak så klistrar jag in det..

```
function Bild_Bokstav(strCompleteSentence)

For i = 1 to len(strCompleteSentence)
     strLetter = Mid(strCompleteSentence, i, 1)

     If LCase(strLetter) = strLetter Then

		if strLetter = " " then
		Bild_Bokstav = Bild_Bokstav & "&nbsp;"
		else
		Bild_Bokstav = Bild_Bokstav & "<img src=""" & "Alfabet-s/" & strLetter & ".gif" & """>"
		end if
       
     Else

		Bild_Bokstav = Bild_Bokstav & "<img src=""" & "Alfabet-l/" & strLetter & ".gif" & """>"

     End If

Next
end function
```

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

## #7 — cyprys, 2003-11-02T17:00Z

> **Erik Juhlin skrev:**
>
> VB är inte som resten av datavärlden. Kör med:
>
>
> ```
> For i = 1 To Len(strCompleteSentence)
> ```

Hehe. Sanning broder.  :bire

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

---

Tråden på webben: https://www.webforum.nu/amne/asp/89450-fel-på-mid