Von FindString() und StringField()

[AND51]

> NETZWERKGERÄTE KÖNNEN AUCH LEERZEICHEN ENTHALTEN
Schrei mal nich so rum. Grade als Mod. Hier hab ich was dagegen:

Code: Alles auswählen

tmp$ = "9  25   1500 disconnected Drahtlosnetzwerkverbindung"

Debug PeekS(@tmp$+FindString(tmp$, "connected", 1)+9*SizeOf(Character))

[al90]

Meinst du

Code: Alles auswählen

tmp$ = "9  25   1500 disconnected Drahtlosnetzwerkverbindung"

Text$ = StringField(tmp$, CountString(tmp$, Space(1)) + 1, Space(1))

Debug Text$ 

?

Vielleicht noch eine kleine ergänzung.

Code: Alles auswählen

tmp$ = "9  25   1500 disconnected Drahtlosnetzwerkverbindung"

Text$ = StringField(tmp$, CountString(Trim(tmp$), Space(1)) + 1, Space(1))

Debug Text$

[AND51]

Ach ja: Ich verlasse mich darauf, dass *connected gefunden wird. Kommt das auch immer vor? Bin zu faul, dieses netsh selbst zu testen.

@ al90:
Kleine Verbesserung, da sonst falsch gearbeitet wird:

Code: Alles auswählen

tmp$ = "9  25   1500 disconnected Drahtlosnetzwerkverbindung" 

Text$ = StringField(tmp$, CountString(RTrim(tmp$), Space(1)) + 1, Space(1)) 

Debug Text$ 

na, findste meine Verbesserung?

[bobobo]

sag ich ja auch nicht aber das Problem bleibt

wenn vor dem Netzgrätename immer was steht wie eaktiviert oder aktiviert dann nach den Inhalt NACH diesen de/aktiviert suchen


like that

Code: Alles auswählen

tmp$="habakuk ottokar aktiviert hugo Paul fred aktiviertes Gerät"
tmp$=Trim(Mid(tmp$,FindString(tmp$," aktiviert",0)+Len(" aktiviert"),256))
Debug tmp$

tmp$="habakuk ottokar deaktiviert hugo Paul fred deaktiviertes Grät"
tmp$=Trim(Mid(tmp$,FindString(tmp$," deaktiviert",0)+Len(" deaktiviert"),256))
Debug tmp$

[al90]

@ al90:
Kleine Verbesserung, da sonst falsch gearbeitet wird:

Wieso sollte denn bei Trim() falsch gearbeitet werden ? Meinst du vllt. falls
ein name mit SPACE beginnt ? Ist doch eher unwarscheinlich, oder ?

[al90]

like that

Code: Alles auswählen

tmp$="habakuk ottokar aktiviert hugo Paul fred aktiviertes Gerät"
tmp$=Trim(Mid(tmp$,FindString(tmp$," aktiviert",0)+Len(" aktiviert"),256))
Debug tmp$

Wäre es so nicht sicherer ?

Code: Alles auswählen

tmp$="habakuk ottokar aktiviert hugo Paul fred aktiviertes Gerät" 
tmp$=Trim(Mid(tmp$,FindString(LCase(tmp$)," aktiviert",0)+Len(" aktiviert"),256)) 
Debug tmp$ 

[AND51]

Genau. Habs getestet und manuell Spaces vorangestellt, dein Code arbeitete fehlerhaft.

> Ist doch eher unwarscheinlich, oder ?
Nun, wenn du das so siehst. Ich bin selbst kein Perfektionist (und möchte das auch nicht sein), aber ich finde, man sollte Fälle wie diesen mit abdecken.
Sagen wir's so: Ausgeschlossen ist es nicht, deshalb.

Trotzdem hat mein Code einen weiteren Vorteil: RTrim() ist schneller als Trim()
Wenn man verschiedene Befehle zur Verfügung hat, sollte man sie auch nehmen. Finde ich.

[al90]

Trotzdem hat mein Code einen weiteren Vorteil: RTrim() ist schneller als Trim()
Wenn man verschiedene Befehle zur Verfügung hat, sollte man sie auch nehmen. Finde ich.

Und dennoch hast du was wichtiges vergessen.: LCase()

[AND51]

Versteh ich nicht...? Du hast den Befehl LCase() doch auch nicht benutzt...?
Krieg ich grad was nicht mit?

[al90]

Versteh ich nicht...? Du hast den Befehl LCase() doch auch nicht benutzt...?
Krieg ich grad was nicht mit?

Ich meinte damit deinen hier vorgestellten code.

Besser wäre es also z.b. so:

Code: Alles auswählen

tmp$ = "9  25   1500 DiScoNneCteD Drahtlosnetzwerkverbindung" 

Debug PeekS(@tmp$+FindString(LCase(tmp$), "connected", 1)+9*SizeOf(Character))

Und die moral der geschicht ? Jeder macht Fehler.