How do I get a variable to work within double quotes in ASP-classic?

问题

The following code is part of a function that is being called for each file the program finds during it's search through a directory.

set searchname = objFSO.OpenTextFile(server.mappath(filename),1, true)
do until searchname.AtEndOfStream
lineData = lcase(searchname.ReadLine())
if instr(lineData,s)>0 then
instances = instances + 1
end if
Loop

This the part of my code I'm confused with. This code worked perfectly yesterday. I made a few edits but mostly with HTML and CSS. When I pulled this code out today to optimize it better, I just keep getting a permission denied error with this line.

set searchname = objFSO.OpenTextFile(server.mappath(filename),1, true)

The problem is that the folder the code scans through contains some files that have more than one word. So it's essential that I get the "filename" variable within double quotes. I've been looking everywhere for a solution and none of them have been helpful yet. Is this even possible or is there a workaround?

Any help would be much appreciated here.

EDIT: As requested here's the code that gets the filename. Although no idea how it pertains to my question.

Function filesearch(name)

ext = instr(name,".txt")
vdirectoryvalue = instr(name,"Files\")+6
idname = mid(name,vdirectoryvalue,ext)
vdirectory = len(idname) - 4
filename = left(idname,vdirectory)
instances = 0

set searchname = objFSO.OpenTextFile(server.mappath(idname), 1, true)
do until searchname.AtEndOfStream
lineData = lcase(searchname.ReadLine())
if instr(lineData,s)>0 then
instances = instances + 1
end if
Loop
End Function

来源：https://stackoverflow.com/questions/24608117/how-do-i-get-a-variable-to-work-within-double-quotes-in-asp-classic

标签

variables

asp-classic