Jag har strängen StatusBox som innehåller text. i vbscript finns funktionerna instr(), len(), left(), mid() och right() Detta kanske är till hjälp:Sträng hantering
Det jag vill är att klippa bort det som finns i början så att bara 11 rader i slutet finns med, radbrytning görs med <br>, alltså räknat bakifrån så ska all text efter 12 <br> finnas kvar och resten tas bort.
Ex/
Strängen innehåller:
1<br>
2<br>
3<br>
4<br>
5<br>
6<br>
7<br>
8<br>
9<br>
10<br>
11<br>
12<br>
13<br>
14<br>
Efter bortklippningen så ska endast detta vara kvar:
4<br>
5<br>
6<br>
7<br>
8<br>
9<br>
10<br>
11<br>
12<br>
13<br>
14<br>
Vore jättetacksam för hjälp!
/EmPaSv: Sträng hantering
instr returnerar positionen för eftersökt sträng, vilket i ditt fall är "12\<br\>"
därefter är det bara att köra en right() som klipper strängen från höger det antal tecken du anger.... vilket skulle i ditt fall vara hela längden minus (startpositionen för eftersöktsträng + 6 tecken(eftersöktsträng))
thats it...
Något om ständigt men det funkar.Sv: Sträng hantering
<code>
Dim Pos
Dim Index
Dim StatusBox
StatusBox = "1<br>2<br>3<br>4<br>5<br>6<br>7<br>8<br>9<br>10<br>11<br>12<br>13<br>14<br>"
Pos = InStrRev(StatusBox, "<br>", , vbTextCompare)
Do While Pos > 1 And Index < 11
Index = Index + 1
Pos = InStrRev(StatusBox, "<br>", Pos, vbTextCompare)
Loop
If Pos Then
Result = Mid(StatusBox, Pos + 4)
Else
Result = StatusBox
End If
</code>