---
title: "Namnet har omdefinierats."
type: "forum-thread"
url: "https://www.webforum.nu/amne/asp/126326-namnet-har-omdefinierats"
topic: "ASP"
topic_url: "https://www.webforum.nu/amne/asp"
author: "Hulth"
published: "2005-04-13T15:57:26.000Z"
updated: "2005-04-13T16:19:16.000Z"
replies: 4
views: 269
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/126326-namnet-har-omdefinierats"
---

# Namnet har omdefinierats.

## #1 — Hulth, 2005-04-13T15:57Z

> Kompileringsfel i Microsoft VBScript (0x800A0411)
> Namnet har omdefinierats.
> /wwwroot/system.asp, line 71, column 9
> Function FormatTime(strTimeToFormat)
> \--------^

```
Function FormatTime(strTimeToFormat)
	strFormatTimeLeft = Left(strTimeToFormat,2)
	strFormatTimeRight = Right(strTimeToFormat,2)
	FormatTime = strFormatTimeLeft & ":" & strFormatTimeRight
End Function
```

Funktionen anropas såhär:
FormatTime(objRecSet1("time"))
(fältet i  databasen innehåller "0714" tex)

Har sökt, men hittar ingenting av värde. Kan tilläggas att jag kör med Option Explict på sidan.

Tacksam för hjälp

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

## #2 — LarsG, 2005-04-13T16:06Z

Har du lagt funktionsdefinitionen inuti en loop kanske?

Varför har du då inte 

```
DIM strFormatTimeLeft,strFormatTimeRight
```

i din funktion?

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

## #3 — Hulth, 2005-04-13T16:13Z

Funktionen anropas ifrån en loop som körs ca 4000ggr per sida.

```
Dim FormatTime, strTimeToFormat, strFormatTimeLeft, strFormatTimeRight
```

ligger bland mina övriga dim:ar längst upp på sidan.

för med funktionsdefinition menar du loop?

Ska jag lägga Dim:arna i funktionen menar du?

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

## #4 — LarsG, 2005-04-13T16:15Z

Du skall inte ha någon dim för funkionsnamnet.
Dom lokala variabler som du använder inom funktionen skall dimmas i funktionen.

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

## #5 — Hulth, 2005-04-13T16:19Z

```
Function FormatTime(strTimeToFormat)
	Dim strFormatTimeLeft, strFormatTimeRight
	strFormatTimeLeft = Left(strTimeToFormat,2)
	strFormatTimeRight = Right(strTimeToFormat,2)
	FormatTime = strFormatTimeLeft & ":" & strFormatTimeRight
End Function
```

Gjorde så, och tog bort övriga dimmar som berörde den funktionen.

Tack för hjälpen ;)

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

---

Tråden på webben: https://www.webforum.nu/amne/asp/126326-namnet-har-omdefinierats