Källkoden för /anders.enges/vb/vbtips10.asp

---

<!--#include file="../inc/navstuff.asp" -->
Söker fram delsträngar tex. SpanIncluding ("ACCESS.EXE", ".") ger "ACCESS."<br>
<div class=code>
Function SpanIncluding (S, sSökSträng)<br>
   If Len(S) = 0 Then<br>
      SpanIncluding = ""<br>
   Else<br>
      SpanIncluding = Left(S, InStr(1, S, sSökSträng) - 1)<br>
   End If<br>
End Function</div>
<!--#include file="../inc/footer.asp" -->