Find filer i Virtuel path
Jeg har følgende kode:i IIS har jeg lavet en virtuel directory med navnet SysDoc2. Hvis jeg prøver at finde filerne lokal på maskinen (Kopiere nogle af filerne over på webserveren) så virker det. Men hvis jeg skal hente dem fra File serveren kan jeg ikke. Er der noget jeg mangler for at kunne få adgang til et virtuel dir??
Root = "/SysDoc2/"
Navn = objRst.Fields("navn")
Set fso = CreateObject("Scripting.FileSystemObject")
set f = fso.GetFolder(Root)
Set FolderCollection = f.SubFolders
For Each Folder in FolderCollection
If Mid(Folder.name, 1, 1) <> "_" Then
AntalKataloger = AntalKataloger + 1
Set CurrentFolder = fso.GetFolder(Root & Folder.name & "\")
Set FileCollection = CurrentFolder.Files
For Each File in FileCollection
Dokument = Root & Navn & "/" & File.Name
IF InStr(1, File.Name, "_Aktuel") > 0 then
Lenght = len(File.Name)
Lenght = Lenght - 11
FilNavn = left(File.Name, Lenght)
Response.Write "<a href = '" & Dokument & "' target=_blank> " & FilNavn & " </a> "
Response.Write "<br>"
end if
Next
End if
Next
