> Oh.. Eine Herausforderung... > > Function ULCase2(str) > dim a, i > a = split(str, " ") > for i = 0 to ubound(a) > a(i) = UCase(left(a(i),1)) & LCase(mid(a(i),2)) > next > ULCase2 = join(a," ") > End function
Warum wundert mich das jetzt nicht, da� Du die Herausforderung hervorragend gemeistert hast :-) Gru� Stefan | [aspdecoffeehouse] als [email protected] subscribed | http://www.aspgerman.com/archiv/aspdecoffeehouse/ = Listenarchiv | Sie k�nnen sich unter folgender URL an- und abmelden: | http://www.aspgerman.com/aspgerman/listen/anmelden/aspdecoffeehouse.asp
