FSO.GetFolder ("e:\wwwroot\site\images\galleri\") & mappesti

Her ændret FSO.GetFolder("e:\... til
Set Folder = FSO.GetFolder (Server.MapPath("/images/galleri/" & mappesti))

måske

Set DINFOLDER = FSO.GetFolder("e:\wwwroot\site\images\galleri\" & mappesti)

eller måske bare for langsom :)

Set Folder = FSO.GetFolder (Server.MapPath("/images/galleri/" & mappesti)) giver mig e:\wwwroot\site\images\galleri\" & mappesti men jeg vil gerne havde det i virual sti, altså /images/galleri/ & mappesti ???

Du kan få point hvis du kan hjælpe med dette.

Men der er vel ikke noget i vejen med den nuværende løsning - så længe du benytter server.mappath vil eventuelle drev-ændringer på serveren automatisk slå igennem for dig.

Men GetFolder acceptere både absolut og relativ sti så du burde - alt afhængig af hvilket sti-niveau du er på - bare kunne undlade din server.mappath, fx

Set DINFOLDER = FSO.GetFolder("dinsti" & mappesti)

Med GetFolder får jeg hvergang den absolutte sti, jeg har brug for den relative sti da den skal bruge til at vise de billeder som ligger i en given mappe, mappesti en variabel alt efter hvilket link der bliver klikket på.

Med andre ord jeg skal havde oversat den absolutte sti til en virtuel sti.

Du kan ikke få GetFolder til at returnere en anden værdi - og jeg mener ikke at der findes en metode til at returnere den virtuelle sti så du må selv regne den ud.

Men forstår jeg dig korrekt er det vel bare at gøre sådan;

VirtualPath = "/images/galleri/" & mappesti
Set Folder = FSO.GetFolder (Server.MapPath(VirtualPath))

Herefter kan du bruge variablen VirtualPath.

Jeg har bruget denne løsning:
url2 = Folder
MapURL = Replace(url2, "E:\wwwroot\site", "")
MapURL = Replace(MapURL,"\","/")

det vender det hele til virtuel.

Jeg har lige et spørgsmål mere.
Med dette henter den alle filer i en mappe, men jeg ønsker kun at hente 3 stk. og evt. 3 vilkårlige hver kan der klikkes på linket til siden med scriptet.

Set FSO = Server.CreateObject("Scripting.FileSystemObject")
Set Folder = FSO.GetFolder("e:\wwwroot\site\Galleri\billeder\")
For Each File In Folder.Files
    Response.Write "<a href='" & File.Name & "' target='_blank'><img src='" & File.Name & "' style='width:100px; height:75px;'></a>"
Next

Heller ikke dette er en mulighed der er indbygget i FSO så du er nødt til at finde på en alternativ løsning - en kunne være at lægge alle filer over i et fx et array og udvælge tilfældigt derfra og en anden kunne være at tælle antal filer i mappen

Set FileSet = Folder.Files
FileCount = FileSet.count

og herefter bruge randomize til at udvælge 3 tilfældige tal og, vha en counter i dit loop, kun udskrive dem der matcher tallene.

Alt afhængig af hvad du laver kunne mappe og fil styringen også foregå i en database - på den måde ville du opnå en større frihed til disse specielle ønsker.

OK, takker for din hjælp, lav et svar og du får de 100 point.

;o)
QuarkB

det kan jeg ikke når du allerede har svaret og accepteret.

OK, jeg laver lige et nyt sp. du kan lav et svar på.