Hallo!
Ich habe hier n Script, das mir alle Dateien in einem gewissen Ordner z�hlen
und dann ein dementsprechendes Paging erstellen sollte. Das mit dem Z�hlen
funktioniert. Das Paging an und f�r sich funktioniert auch. Es funktioniert
leider nur nicht, da� ich die Anzahl der Dateien ins Paging bekomme.
Hier das FSO:
Function CountFiles(Path)
Dim strAnzahl
Set fso = CreateObject("Scripting.FileSystemObject")
Set dir = fso.GetFolder(Path)
Set files = dir.Files
Set subfolder = dir.SubFolders
strAnzahl = files.Count
Response.Write "Anzahl: " & strAnzahl & "<BR>"
End Function
CountFiles Server.MapPath("/test/paging/bilder")
und hier das Paging (die ganze Funktion schicke ich nicht mit):
Dim intPage
intPage = 1
if Not IsEmpty(Request("page")) Then
if IsNumeric(Request("page")) Then
intPage = CLng(Request("page"))
End if
End if
Response.Write "<CENTER><P>" & Paging(intPage, 20, 200) & "</P>"
Response.Write "<IMG SRC='bilder/" & intPage & ".jpg'><BR>Bild: " &
intPage & ".jpg"
"Paging(intPage, 20, 200)" hei�t, da� 20 Seiten erstellt werden sollen. Ich
m�chte jetzt aber statt dem "20" die Anzahl der Dateien drinnenstehen haben.
Wie bekomm ich die Anzahl aus der Funktion raus. Sobald ich versuche, mir
die Variable strAnzahl ausserhalb der Funktion anzeigen zu lassen, ist der
Wert leer. Warum?
Danke
Stefan
| Oft Gefragtes: http://www.aspgerman.com/aspgerman/faq/
| [aspdebeginners] als [email protected] subscribed
| http://www.aspgerman.com/archiv/aspdebeginners/ = Listenarchiv
| Sie knnen sich unter folgender URL an- und abmelden:
| http://www.aspgerman.com/aspgerman/listen/anmelden/aspdebeginners.asp
