textfil

varför funkar det inte?

<%
dim file 'och hur dimmar jag rätt?

file = Request.QueryString("file") 

if file = "" then
	thisFile = "files/default.txt"
else
	thisFile ="files/" & file & ".txt"
end if

if thisFile <> "" then
	
	Set fopen = Server.CreateObject("Scripting.FileSystemObject")
	[b]Set file = fopen.OpenTextFile(thisFile,1,false,0) '>>>>>>>rad22[/b]
	fread = file.ReadAll

	repThis = "[BREAK]" &_
			  "[BREAK]"
	string = Replace(fread,Chr(10),"[BREAK]")
	string = Replace(string,repThis,"<br><br>")
	string = Replace(string,"[BREAK]","")
	string = Replace(string,"[TITEL_START]","<span class=title>")
	string = Replace(string,"[TITEL_SLUT]","</span>")
end if
%>

<%=string%>

-----------------------------------------------------

<a href="default.asp?fil=filer">Länken</a>

Serverobjekt fel 'ASP 0177 : 800a004c'

Server.CreateObject misslyckades

del.asp, rad 22

00000000

Tack på förhand!

------------------

-- Çhørønzøñ II --

Du bör nog använda fysiska sökvägar när du jobbar med FSO. Prova därför server.mappath().

Set file = fopen.OpenTextFile([b]server.mappath(thisFile)[/b],1,false,0)

Mvh,

Tackar, Det funkade ju fint!

Om jag nu vill skicka med flera saker med länken, tex att i <a href"info.asp?id=ett"> samtidigt också skicka med ?file=files/file Hur skriver jag i länken då?

------------------

-- Çhørønzøñ II --

Glöm det sista, jag hittade svaret här istället. :)

------------------

-- Çhørønzøñ II --