Hi,
1. Split(MeineVariable," ") erzeugt ein Array mit den W�rtern
2. Vorschlag:
'Leerzeichen am Anfang und am Ende l�schen:
MeineVariable = trim(MeineVariable)
woLeer = InStr(MeineVariable, " ")
If woLeer>0 then
einwort = left(MeineVariable, woLeer-1)
' "m�ll bla"
' 12345
' => 5. Stelle ist das Leerzeichen; also 4 Stellen Wort davor!
Else
einwort = MeineVariable
End if
3. Tabulator etc?
woLeer = InStr(MeineVariable, " ")
Puffer = InStr(MeineVariable, vbTab)
If Puffer>0 and woLeer>Puffer then woLeer = Puffer
Puffer = InStr(MeineVariable, vbCr)
If Puffer>0 and woLeer>Puffer then woLeer = Puffer
Puffer = InStr(MeineVariable, vbLf)
If Puffer>0 and woLeer>Puffer then woLeer = Puffer
...
Gru�
Heiko Richler
Systemingenieur
Georg-Simon-Ohm-Fachhochschule N�rnberg
Fachbereich Informatik
http://web1.informatik.fh-nuernberg.de/heiko.richler/
> -----Urspr�ngliche Nachricht-----
> Von: Stefan Koller - (asp) [mailto:[EMAIL PROTECTED]]
> Gesendet: Montag, 29. April 2002 10:05
> An: ASP Diskussionsliste fuer Anfaenger
> Betreff: [aspdebeginners] string op. leerzeichen?[Scanned]
>
>
> Hallo!
>
> w�rde gerne, wenn in einem formular 2 w�rter eingegeben werden
> das erste wort herausfiltern:
> mein code:
>
> laenge=len(MeineVariable)
> woleer=InStr(MeineVariable," ")
> einwort=left(MeineVariable,laenge-woleer)
> response.write einwort
>
>
> leider funktioniert das nicht ganz, bekomme immer ein zeichen
> mehr oder
> weniger zurr�ckgeschrieben...
> kommt auf die eingabe drauf an..
>
> pls help :)
> thx
>
>
> | 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/anme> lden/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