Hej
Jag har en kodsnutt som skriver ut filnamnen från en katalog.

Går det att skriva ut titeln på sidan istället för filnamnet och isåfall hur? Jag hittar inte något i mina böcker

Detta har jag:
<%
Dim objFSO, objFile, objFolder
Set objFSO=_
Server.CreateObject("Scripting.FileSystemObject")
Set objFolder=_
objFSO.GetFolder(Server.MapPath("..\dokument"))
Response.Write "<b>"&"Lista över nyhetsbrev" &"</b>" &"<P>"
'Response.Write objFolder.Path & "<P>"
For Each objFile in objFolder.Files
Response.Write objFile.Name & "<BR>"
Next
Set objFolder = Nothing
Set objFSO = Nothing
%>


Tacksam för tips

Jag valde att skriva ut filnamnet utan filmansändele istället

<%
'Listar alla filer utan ändelse i mappen nyhetsbrev
Dim objFSO, objFile, objFolder, strwebPath, strTest
strwebpath = "nyhetsbrev"
strTest = "http://www.vardnu.nu"
Set objFSO=_
Server.CreateObject("Scripting.FileSystemObject")
Set objFolder=_
objFSO.GetFolder(Server.MapPath("..\..\nyhetsbrev"))
Response.Write "<b>"&"Lista över nyhetsbrev" &"</b>" &"<P>"
For Each objFile in objFolder.Files
Dim filext: filext = Len(objFSO.GetExtensionName(objFile.name)) + 1
Dim fillangd: fillangd = Len(objFile.name)
Response.Write Left((objFile.name),fillangd-filext) & "<br>"
Next
Set objFolder = Nothing
Set objFSO = Nothing
%>