GetPosForStrAtIndex                              (XAPI2000)

Deklaration VB 6.0
Sub GetPosForStrAtIndex (ByVal sDataRow As String, ByVal sSep As String, ByVal Index As Long, ByRef iPos As Long, ByRef iLen As Long)

Deklaration VB.NET
Sub GetPosForStrAtIndex Lib (ByVal sDataRow As String, ByVal sSep As String, ByVal Index As Integer, ByRef iPos As Integer, ByRef iLen As Integer)

Beskrivning
Erhåller position för ett fält vid specificerat index i en rad med fältdata. Raden med fältdata specificeras via parametern sDataRow. Fälten i raden ska vara separerade med ett separatortecken (tex semikolon eller tabbtecken) som anges via parametern sSep. Index för fältet anges via parametern Index. Positionen för fältet (teckenposition för första tecknet i fältet) returneras via parametern iPos och längden på fältet returneras via parametern iLen.

Index till det första fältet i en rad, som anges via parametern Index, är alltid 1. Position för det första tecknet i en rad, som returneras via iPos, är alltid 1. Vid fel returnerar dock iPos värdet 0. Även iLen sätts till 0 vid del.

En rad med fältdata kan se ut så här (i exemplet nedan är fälten separerade med semikolon):

mail@samlogic.com;Anna Svensson;SamLogic

Så om exempelvis parametern Index sätts till 2 kommer funktionen att returnera positionen för Anna Svensson, som är 19, via iPos och längden på fältet, som är 13, via iLen.

 
Exempel

Dim sDataRow As String
Dim sFieldSeparator As String
Dim Index As Integer
Dim iPos As Long
Dim iLen As Long
 
sDataRow = "mail@samlogic.com;Anna Svensson;SamLogic"
sFieldSeparator = ";"
Index = 2
GetPosForStrAtIndex sDataRow, sFieldSeparator, Index, iPos, iLen ' Returnerar iPos=19, iLen=13

    
  
SamLogic