Original de duas aplicações para interceptação de string ASP

1. Strings de interceptação pura

A cópia do código é a seguinte:

functionCutstr (theST1, strlen)

DIML, T, c

l = len (theST1)

IFL <1ThenexitFunction

t = 0

fordxy1 = 1tol

C = ABS (ASC (MID (TheST1, DXY1,1)))))

IFC> 255THEN

t = t+2

outro

t = t+1

endif

ift> = strlenthen

thev = MID (theST1,1, dxy1)

exitfor

outro

thev = theST1

endif

próximo

cutstr = thev

Função final

2. Intercepte a corda, use espaços para preenchê -la

A cópia do código é a seguinte:

functionCutstr (theSt, strlen)

DIML, T, c

L = Len (theST)

t = 0

fordxy = 1tol

C = ABS (ASC (MID (TheST, DXY, 1)))))

IFC> 255THEN

t = t+2

outro

t = t+1

endif

ift> = strlenthen

thev = esquerda (test, dxy)

exitfor

outro

bu = strlen-t

Forbui = 1Tobu

strbu = ""

strbuall = strbuall & strbu

próximo

thev = theSt & strbull

strbu = ""

strbuall = ""

endif

próximo

cutstr = thev

Função final

Artigos que podem ser de interesse para você:

Implement the function of intercepting specific part of the string under asp string intercepting function GetBody asp implements the code to intercept string using asp to intercept the specified format string asp function intercepting N characters with HTML from the string asp intercepting the specified English-Chinese mixed string_supports Chinese ASP.NET string intercepting asp CutStrX string intercepting function (filters all HTML tags) asp implements the Função de string intercepta