Array o semplice mid?

[Fichico]

ho una stringa di 64 caratteri

so che ogni 4 caratteri è identificato un relativo valore

come posso fare in modo di scomporre tale stringa di 4 in 4 caratteri per recuperare il relativo valore?

Ovvero devo usare il mid oppure posso trattarla come se fosse un array? però in questo caso è possibile fare uno split di 4 in 4 caratteri?

[rixx]

right o left non va bene?

[optime]

la mid va benissimo

[99eros9]

La funzione Split(), dato un separatore, suddivide una stringa in un array di stringhe. Credo sia quello adatto a te.

Edito:
vedo che non c'ho capito nada!

[Baol74]

Function SplitStringEvery(strIn,n)
Dim index,ar()
index=-1
while len(strIn)>n
	index=index+1
	redim preserve ar(index)
	ar(index) = Mid(strIn,1,n)
	strIn=Mid(strIn,n+1)
Wend
if Len(StrIn)>0 then 
	redim preserve ar(index+1)
	ar(index+1)=StrIn
End if	
SplitStringEvery=ar
End Function
	
Dim Ar,Elm	
Ar = SplitStringEvery("CIAOTEST1234",4)
for each elm in ar
	Response.Write "-" & Elm & "
"
next

Oppure, con l'eleganza delle regExp:

Function SplitStringEvery(strIn,n)
Dim Re,Matches,ar(),i,e
	Set Re = New RegExp
	Re.Global = True 
	Re.Pattern = "([\w\W]{1," & n & "})"
	Set Matches = Re.Execute(StrIn)
	e = Matches.Count-1
	Redim ar(e)
	For i=0 to e
		ar(i) = Matches.Item(i).Value
	Next
	SplitStringEvery = ar
	Set Re = Nothing
End Function