File System Object(FSO)

dim sidstefil

for each objItem in files
response.write(objItem.Name)
sidstefil = objItem.Name
next

response.write "jeg ved at den sidste fil hedder " & sidstefil & "! :)"

Forklaring er:
For-Next loopen kører igennem alle navnene, og vil smide navnede ind i variablen "sidstefil".
Den smider faktisk det første navn ind i "sidstefil".. derefter navn nr 2, nr 3...
Når det sidste navn er smidt ind i "sidstefil", er der ikke flere navne, der kan overskrive indholdet af "sidstefil".

Derfor vil navnet på den sidste fil være i variablen "sidstefil" :)

Det er ikke umiddelbart en måde at se det er den sidste fil som man kan med recordset da det er for .. next som tager næste fil.
Vil du gøre noget bestemt når du er kommet til sidste fil??

øhh... det er jo ikke så smart... skal jo gerne lave noget der ligner

for each objItem in files
if files.eof = true then
response.write("No access")
else
response.write(objItem.Name)
end if
next

Ja er igang med at lave noget stifinder halløj og så skal jeg gerne bytte det sidste billede ud, da det ellers ser dumt ud.

Jeg havde ikke læst dit spm ordentligt..

Men hvad med?:
for ...
if objItem.Name <> "" then
' vis billede
else
' No Access
end if
next

Eller har jeg misforstået det?

Altså du vil havde den sidste fil ikke bliver udskrevet?

The surfer, jeg skal skifte billedet ligesom jeg når den sidste fil, derfor kan jeg ikke bruge det der.

Eagle eye, nej jeg vil blot have at jeg får et andet billede når jeg kommer til den sidste fil.

For Each Folder in Folders
' her vil jeg gerne have at når jeg kommer til den sidste fil, at billedet så skiftes til _folder_end.gif

response.write "<IMG SRC=""../images/_folder.gif"">&nbsp;<B>" & UCASE(folder.name) & "</b><br>"
next

Hvor sætte du ikke bare folder_end efter next linjen så?

men den måde du kan styre det på er ved at hendte antal filer. Så lave en tæller som du ved hvilken fil du er kommet til:

antalFiler = files.Count
i = 0
for each objItem in files
  i = i + 1
  if i = antalFiler then
    response.write("No access")
  else
    response.write(objItem.Name)
  end if
next

Alternativt kan du tjekke efter dit fo rnext:

for each objItem in files
response.write(objItem.Name)
next
if files.Count > 0 then
  response.write "<IMG SRC=""../images/_folder.gif"">&nbsp;<B>" & UCASE(folder.name) & "</b><br>"
end if

til 28/12-2003 01:30:17 så den kun billedet hvis der er filer i folderen.

Hmmm det samme var jeg kommet frem til, havde dog håbet på noget ala recordset :-) Men tak for hjælpen smid et svar

Ok ;)  nej der er ikke en recordset EOF..
Men jeg syntes selv det sidste eks svare lidt til EOF ;)