Hi,
nunja, der Feiertag, keine Antwort... aber ich habe es wie folgt gel�st.
Es funktioniert zwar, bin mir allerdings nicht sicher, ob es nicht noch eine
bessere L�sung gibt.

<%
Response.write"<select name=""MeineListe"" size=""10"" multiple>"
strEins="a,b,d,g"
a = split(strEins,",")
strAlles="a,b,c,d,e,f,g"
b = split(strAlles,",")
      dim i, k
           for k = 0 to ubound(b)
           Response.write "<option value=""" & b(k) & """"
              for i = 0 to ubound(a)
                if instr(b(k),a(i)) >0 then
                strsel = "selected"
                else
                strsel = ""
                end if
              Response.write strsel
              next
           Response.write ">" & b(k) & "</option>"
           next
Response.write"</select>"
%>

Herzliche Gr��e, Gudula

> -----Urspr�ngliche Nachricht-----
> Von: Gudula Schwingenheuer (PTS R. Schnettler)
> [mailto:[EMAIL PROTECTED]]
> Gesendet: Freitag, 4. Oktober 2002 08:36
> An: ASP Diskussionsliste fuer Anfaenger
> Betreff: [aspdebeginners] Werte 2er Strings vergleichen
>
>
> Hallo und Guten Morgen,
>
> ich habe mal eine Frage bez�glich des Vergleichens von Werten 2er Strings.
> Ist es m�glich, anhand der �bereinstimmenden Werte der beiden Strings in
> einer dyn. Liste mir Mehrfachauswahl die Werte, die �bereinstimmen, auf
> selected zu setzen.
>
> Folgendes funktioniert, wenn die Werte die gleiche Anzahl haben.
>
> dim strEins, a, b, strAlles
>  strEins="a, ,c, ,e, , "
>  a = split(strEins,",")
>  strAlles="a,b,c,d,e,f,g"
>  b = split(strAlles,",")
>          '
>  dim k, strsel
>  for k = 0 to ubound(b)
>  if b(k) = a(k) then
>  strsel = "selected"
>  else
>  strsel = ""
>  end if
>
> Response.write "<option value=""" & b(k) & """" & strsel & ">" & b(k) &
> "</option>"
> next
>
> Leider kommen die Werte im strEins nicht so r�ber, wie oben dargestellt.
> Sondern so:
>
> strEins "a,c,e"
>
> Hat jemand eine Idee, wie ich die Werte a,c,e in der Liste selectiert
> bekomme?
>
> Herzliche Gr��e, Gudula
>
>
> | 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