Hi,

>Von: Roman Pittroff [mailto:[EMAIL PROTECTED]]
>Nun wenn ich mir das auf die schnelle anschaue
>sehe ich nichts as etwas zureuckbringen sollte
>also ein response.write oder
>search_file = .....

ist aber drin ;)

mfg
Kai



>-----Original Message-----
>From: Kai [mailto:[EMAIL PROTECTED]]
>Sent: Tuesday, October 01, 2002 2:13 AM
>To: ASP Diskussionsliste fuer Anfaenger
>Subject: [aspdebeginners] Kein R�ckgabewert
>
>
>Hi,
>
>folgende Funktion m�chte mir einfach nix zur�ck geben, wieso
>??? Ich bin f�r jeden Tipp dankbar ;)
>---------------------[SNIPP]-----------------------------------
>-----------
>Function search_file(byVal suchbegriff,byVal dir)
>       Set verzeichnisse = fso.GetFolder(dir)
>       Set unterverzeichnisse = verzeichnisse.SubFolders
>
>       Set files = verzeichnisse.Files
>
>       if files.count > 0 then
>               For each file in Files
>                       if trim(File.Name) = trim(suchbegriff) then
>                               WScript.Echo dir
>                               search_file = dir
>                               Exit function
>                       End if
>               Next
>       End if
>       If unterverzeichnisse.Count > 0 then
>               For Each unter_unterverzeichniss In unterverzeichnisse
>                       unterverzeichnisse_pfad = dir &
>unter_unterverzeichniss.Name & "\"
>                       i = i + 1
>                       If i < unterverzeichnisse.Count then
>                               Call
>search_file(suchbegriff,unterverzeichnisse_pfad)
>                       else
>                               Call
>search_file(suchbegriff,unterverzeichnisse_pfad)
>                       End if
>               Next
>       End If
>End function
>---------------------[/SNIPP]----------------------------------
>------------
>
>mfg
>Kai
>
>
>| 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
>


| 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


| 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

Antwort per Email an