webForumDet fria alternativet

FSO fel med sökvag

ASP

1 svar · 242 visningar · startad av Addeladde

Medlem sedan jan. 20013 406 inlägg
Frågan#1

Hej
Jag har hittat ett script som jag tänkte använda för att hantera filer.

Men när man ska gå tillbaka i en katalog så funkar det inte. Vad kan vara fel.

Feltyp:
Körningsfel i Microsoft VBScript (0x800A004C)
Det går inte att hitta angiven sökväg.
/admin/index.asp, line 24

index.asp

		Dim objFS : dim objFolderRoot : dim colFolder : dim objFolder : dim strFolderRoot
	
		
		strFolder = request("strFolder")
		if strFolder = "" or strFolder="\" or InStr(strFolder,"\\") <> 0 or Instr(strFolder,".") <> 0 then
			strFolder = session("startFolder")
			session("activeFolder") = strFolder
		else
			session("activeFolder") = strFolder
		end if 
		
		set objFS = server.createObject("Scripting.FileSystemObject")
		

	[b][1][rad 24][/1][/b]	set objFolderRoot = objFS.getFolder(objFs.buildpath( session("driver"),objFS.buildPath(session("rootfolder"),strFolder) ))
		set colFolder = objFolderRoot.SubFolders
		set colFiles = objFolderRoot.Files

Global.asa

<script language="vbscript" Runat="server">
	sub session_onStart
		session("driver") = "C:"
		session("rootFolder") = "\inetpub\wwwroot"
		session("startFolder") = "\admintest"
		session("httpAdress") = "http://localhost/admintest"

		session("systemMsg") = ""
		session("activeFolder") = ""		
		session("activeSeekFolder") = ""		
		session("copyFolder") = ""
		session("moveFolder") = ""
		session("copyFile") = ""
		session("moveFile") = ""
		session("fileText") = ""
	end sub
</script>

Hela scriptet finns ASPSidan

Medlem sedan jan. 20013 406 inlägg
#2

Jag har löst detta problemet var att det blandades stora och små bokstäver i en replace funktion.

268 ms totalt · 4 externa anrop · v20260731065814-full.a51de22e
130 ms — deklarationer (db)
0 ms — hämta statistik (cache)
135 ms — hämta tråd, inlägg och bilagor (db)
129 ms — ändringar (db)