---
title: "VBScript runtime error '800a0046'"
type: "forum-thread"
url: "https://www.webforum.nu/amne/asp/107035-vbscript-runtime-error-800a0046"
topic: "ASP"
topic_url: "https://www.webforum.nu/amne/asp"
author: "nedde"
published: "2004-07-10T15:31:55.000Z"
updated: "2004-07-10T15:39:37.000Z"
replies: 1
views: 291
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/107035-vbscript-runtime-error-800a0046"
---

# VBScript runtime error '800a0046'

## #1 — nedde, 2004-07-10T15:31Z

Har problem med ett script. Jag får hela tiden svaret:

\-------------------------------
Microsoft VBScript runtime error '800a0046' 

Permission denied 

/index.asp, line 94 
\-------------------------------

Fast användaren har full rättighet och även IUSR.
Vad kan det vara för fel på koden? rad 94 är den första raden
i koden. Har klistrat in en del av själva koden. Någon som vet hur jag ska fixa felet?

```
<%

if bolIndexCheck = False then
	filesystem.CreateTextFile filepath & "indexed",true
	set indexFile = filesystem.OpenTextFile(filepath & "\indexed",2 )
	For Each file in filecollection
	    if  cstr(left(file.name,8)) <> cstr("!tcache_") and lcase(right(file.name,3)) = "jpg" THEN
			indexFile.writeline file.name					
		end if
	next
	indexFile.close
	set indexFile = nothing
end if

' close file system stuff
set filesystem=nothing
set folder=nothing
set filecollection=nothing
%>
```

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

## #2 — solbulle, 2004-07-10T15:39Z

Vad innehåller egentligen filepath?

Är du helt 100% på att sökvägen är riktig?

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

---

Tråden på webben: https://www.webforum.nu/amne/asp/107035-vbscript-runtime-error-800a0046