Slettet bruger
04. maj 2006 - 22:01
Der er
2 kommentarer og 1 løsning
Klip i steng
Hej Jeg en del strenge jeg skal have klippet i stykker :o) F.eks. VK/VK.EXE /A /S /NL DK=%TEMP% UK=%VAR% VL/VL.EXE /A /S DDD=%EEEE% Jeg skal bruge en funktion er kan lave 3 strenge ud af hver linie. VK/VK.EXE /A /S /NL DK=%TEMP% UK=%VAR% skal være opdelt i "VK/VK.EXE" og "/A /S /NL" og "DK=%TEMP% UK=%VAR%" og VL/VL.EXE /A /S DDD=%EEEE% skal være opdelt i "VL/VL.EXE" og "/A /S" og "DDD=%EEEE%" Håber det er til at forstå... Takker på forhånd
Annonceindlæg fra Cepheo
Det kan garanteret gøres nemmere med RegExp, hvilket jeg ikke kan finde ud af.. :-) Så, her er mit forslag: dim a, b, c ' kommer til at indeholde de 3 dele sub klip(tekst) a = left(tekst, instr(tekst, " ") - 1) b = mid(tekst, instr(tekst, " ") + 1) b = left(b, instr(b, "=")) b = left(b, instrrev(b, " ") - 1) c = mid(tekst, instr(tekst, b) + len(b) + 1) end sub klip("VK/VK.EXE /A /S /NL DK=%TEMP% UK=%VAR%") msgbox "a: " & a & vbCrlf & "b: " & b & vbcrlf & "c: " & c klip("VL/VL.EXE /A /S DDD=%EEEE%") msgbox "a: " & a & vbCrlf & "b: " & b & vbcrlf & "c: " & c /theSurfer
Man kunne også smide værdierne "a,b,c" i en array, i en funktion, og derefter returnere arrayen.. /theSurfer