Path proplem, virtual path.

ok jeg har et problem med en txt fil som skal læses, dette script dur når at filen ligger i en mappe over den, men ikke sådan her.
<%

Set Conn = Server.CreateObject("ADODB.Connection")
DSN = "DRIVER={Microsoft Access Driver (*.mdb)}; "
DSN = DSN & "DBQ=" & Server.MapPath("login.mdb")
Conn.Open DSN


strSQL = "Select * from forum where emne = '" & post & "' "

Set rs = Conn.Execute(strSQL)

file = rs("file")
Dim fso, f, filespec
Set fso = CreateObject("Scripting.FileSystemObject")
filespec = Server.MapPath("d:/web/localuser/dragonsandslayers.dk/******/"&rs("file"))
'MEN DET DUR MED SÅDAN HER. Server.MapPath("****/"&rs("file"))
Set f = fso.OpenTextFile(filespec,1)

' Læs linie for linie indtil slutningen af filen
Do While not f.AtEndOfStream
  Response.write "<p>" & rs("navn") &": " & f.ReadLine & "</p>"
Loop

f.Close

Conn.Close
Set Conn = Nothing
%>
Fejl medelsen på min side bliver udskrevet sådan her, Server.MapPath() error 'ASP 0172 : 80004005'

Invalid Path

/un/showtopic.asp, line 43

The Path parameter for the MapPath method must be a virtual path. A physical path was used.
Jeg kan simpelthen ikke finde hovde og hale, har prøvet med GetAbsolutePathName men ak nej duer ikke.
Er der venligt nogle som vil hjælpe mig...
Mange tak, Martin Dalgaard