Kan man finde navnet på aktuelle side

http://www.w3schools.com/asp/asp_ref_filesystem.asp

et eks.

<%
Set fs=Server.CreateObject("Scripting.FileSystemObject")

Response.Write("The file name of the last component is: ")
Response.Write(fs.GetFileName("c:\winnt\cursors\3dgarro.cur"))
set fs=nothing
%>

Det hjælper mig da ikke !

Jeg skal finde navnet på den .asp fil som er loadet i det øjeblik jeg kalder min logfunktion.

Dette giver dig en oversigt over samtlige filer der findes i dit bib.

<% dim fs,fo,x

set fs=Server.CreateObject("Scripting.FileSystemObject")
set fo=fs.GetFolder("c:\test\")for each x in fo.files

  Response.write(x.Name & "<br />")

nextset fo=nothing

set fs=nothing %>

Dette giver dig tidspunktet for hvornår den enkelte fil sidste er tilgået

<% dim fs, f

set fs=Server.CreateObject("Scripting.FileSystemObject")
set f=fs.GetFile(Server.MapPath("testread.txt"))

Response.Write("Sidst tilgået d.: " & f.DateLastAccessed)

set f=nothing
set fs=nothing %>

Hvis du skriver de to ting sammen skulle du ha hvad du søger.

/Kovalt

Det hjælper mig stadig ikke.

Jeg er kun interesseret i at vide hvilken fil jeg i øjeblikket har loadet i min browser.
Hvis jeg står i default.asp, skal resultatet være default.asp

ja....

hvis du itererer ved hjælp af ovenstående - så må den aktuelle fil være den samme som den sidst tilgåede

/Kovalt

Mener du at DateLastAccessed også opdateres når man 'bare' læser filen ?

I så fald har du nok ret i dit forslag.

Jeg prøver lige om jeg kan få noget strikket sammen.

det vil jeg mene. Der findes nemlig også en der hedder DateLastModfied

/Kovalt

Desværre så giver det samme resultat for alle filer i det directory jeg tester på :-(

det kan ikke være fordi du glemmer at gå videre til næste item

må jeg prøve at se hvad du har strikket sammen?

/Kovalt

Det har en tastefejl :-)
Nu skal jeg lige have fundet ud af at ændre så det er det directory hvor filen ligger at der checkes på. (Server.MapPath lignede)

Nu har jeg

<%@ LANGUAGE=VBScript %>

<%
Dim fs,fo,x

Set fs = Server.CreateObject("Scripting.FileSystemObject")
Set fo = fs.GetFolder("c:\temp\")

For Each X In fo.Files
    Response.Write(X.Name)
    Response.Write "<br>"
    Response.Write("Sidst tilgået d.: " & X.DateLastAccessed)
    Response.Write "<br>"
    If Session("SSS_Filedate") < X.DateLastAccessed Then
        Session("SSS_Filedate") = X.DateLastAccessed
        Session("SSS_Filename") = X.Name
    End If
Next

Response.Write "<br>"
Response.Write "<br>"
Response.Write "Resultat"
Response.Write "<br>"

Response.Write Session("SSS_Filedate")
Response.Write "<br>"
Response.Write Session("SSS_Filename")
Response.Write "<br>"

Set fo = Nothing
Set fs = Nothing

%>

Hvordan får jeg Set fo = fs.GetFolder("c:\temp\") ændret til at bruge det directory hvor .asp filen er loadet fra ?

Server.Mappath(".") - giver stien

Jeg får nu en meget fin liste med filer, men jeg får ikke at vide at min test.asp er den der sidst er loadet.

dvs. listen er OK?

men af den returnerer samme dato for alle filer?

/Kovalt

Nej den returnerer fint forskellige tidspunkter i listen, men da jeg åbner filen test.asp for at vise listen, er det jo den der skal være den sidst tilgåede og det er det ikke.

hmmmmm.... kan du gennemskue hvad det er for tidspunkter den returnerer

Hvis jeg går ind og retter i en af filerne og gemmer den igen, så er det den aktuelle fil der vises som den sidste tilgåede, så det er ikke det tidspunkt hvor filen er åbnet.  Hvis jeg bare åbner en fil i min editor uden at gemme sker der intet på listen.

Det her fandt jeg på et link:

Read-only.Returns the date and time the folder was last accessed(opened).
 
Example 1
<%
'***************** DateLastAccessed
Set fso = CreateObject("Scripting.FileSystemObject")
Set folderObject = fso.GetFolder(Server.MapPath("\fso\"))

Response.Write folderObject.DateLastAccessed

Set folderObject = Nothing
Set fso = Nothing

' Output:
' 11/01/01 22:33:26
%>


det burde virke :-/

/Kovalt

Beklager - samme negative resultat

Den ligger i server variabeles:

response.write Request.ServerVariables("PATH_INFO")

//akj

Se nu begynder det at ligne det jeg skal bruge. Jeg skal bare lige have pillet den sidste lille bid af stinavnet fra, så er den der.

Kovalt> du fik lidt af point for dine forsøg, som desværre ikke gav det helt rigtige resultat, men alligevel............

Tak for det :-)