Ah genau, das hat mir gefehlt.. Habe ich glatt vergessen... Vielen Dank
Das Men� ist aber leider immer noch lehr :-( Das File ligt in meinem Web im
Verzeichnis /scripts/swgroups.txt . Also der Pfad sollte doch stimmen ??
<%
Set fso = CreateObject("Scripting.FileSystemObject")
Set textStreamObject = fso.OpenTextFile(Server.Mappath("\scripts") &
"\swgroups.txt",1,false,0)
sSWgroups = textStreamObject.ReadAll
Response.Write "<select size='1' name='gruppe'>"
aMenu = split(sSWgroups,vbcr)
for I = 0 to unbound(aMenu) - 1
Response.Write "<option value='" & aMenu(i) & "'>" & (aMenu(i)) & "</option>"
next
Response.Write "</select>"
Set textStreamObject = Nothing
Set fso = Nothing
%>
Gruss Ramon
************************************************************************************
This e-mail message is intended only for the addressee(s) and contains
information which may be confidential. If you are not the intended
recipient please do not read, save, forward, disclose or copy the contents
of this e-mail. If this e-mail has been sent to you in error, please delete this
e-mail and any copies or links to this e-mail completely and immediately
from your system. We also like to inform you that communication via e-mail
over the Internet is insecure because third parties may have the possibility
to access and manipulate e-mails.
Any views expressed in this message are those of the individual sender,
except where the sender specifically states them to be the views of
The Swatch Group Ltd.
************************************************************************************
| 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
