lista och visa textfiler på server?

2 svar · 220 visningar · startad av roady 19 mars 2002

roadyMedlem sedan jan. 2002473 inlägg

Frågan19 mars 2002 12:26#1

Har en liten fråga (kommer säkert fler senare om det går!)

Kan man göra som så att man lägger exempelvis 4 filer i en mapp, sedan ber jag ASP:n räkna hur många filer som finns i mappen,
Skriv ut själva filnamnet på dem och om jag klickar på filen så kommer jag till en sida där själva textfilen skrivs ut...

Kan man göra detta, vilken filändelse skall textfilen ha? *.txt / *.rtf ?

Glad för svar :D

PatrikBMedlem sedan mars 20002 836 inlägg

19 mars 2002 12:39#2

jepp, går alldeles utmärkt.
du kan ha vilken filändelse som helst.

Testa detta:


strFolderPath = "x:\wwwroot\folder\textfiles\"

Set objFSO = Server.CreateObject("Scripting.FileSystemObject")

	Set objFolder = objFSO.GetFolder(strFolderPath)

		Response.Write "ANTAL FILER: " & objFolder.Count & "<BR><BR>"

		For Each File IN objFolder.Files
			strFileExt = objFSO.GetExtensionName(File.Path)

			Select Case UCase(strFileExt)
				Case "TXT", "RTF"
				strFileName = File.Name
				Response.Write "<A href=""/folder/textfiles/" & strFileName & """>" & strFileName & "</A><BR>"
			End Select
		Next

	Set objFodler = Nothing

Set objFSO = Nothing

skriven rakt från "minnet" ... otestat.
Du måste byta ut de olika sökvägarna så att de stämmer för din server

cya,
PatrikB

roadyMedlem sedan jan. 2002473 inlägg

19 mars 2002 12:46#3

Va glad jag blev Patrik :bire

Skall helt klart testa, fast först skall jag formatera om datorn lite snabbt!