Also mit der Version eigendlich nicht.
<%
Bild = "0.gif"
set ObjFo = CreateObject("Scripting.FileSystemObject")
set Verz = ObjFo.GetFolder(Server.MapPath("/Bilder"))
set Ordner = Verz.Files
for each Inh in Ordner
if inh.name = GesuchtesBild then
Bild = inh.name
end if
next
%>
<img border="0" src="<% = Bild %>">
| 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