Split all'interno di un ciclo for...next

[fraude]

Buongiorno.

Da una selectbox che preleva i dati da un dbase, passo con il valore scelto ad una seconda pagina asp, che li recupera con request.form e li registra nel campo "ciccio" di un dbase sql server.

Il valore selezionato dalla selectbox è del tipo "AAABBBCCC" ma nel campo "ciccio" del dbase dovrebbe essere registrato come "AAA,BBB,CCC".

Ho provato con questo split, ma passa sempre come "AAABBBCCC".

newVar = split(arr_dal_form,",")
for xx = 0 to Ubound(newVar)
response.write(trim(newVar(xx) &"
"))
next

che cosa sbaglio?
grazie.

[Gioba66]

lo split separa in base al separatore
tu gli hai messo come separatore una virgola
la variabile che passi allo split non contiene nessuna virgola


ecco spiegato l'arcano.

[fraude]

grazie, ho capito e come faccio a separare "AAABBBCCC"?

[optime]

tu come faresti se dovessi farlo a mano? una volta capito il meccanismo, si cerca di replicarlo via asp...

[salvodibella]

Ciao!
se quello che ricevi ha sempre la stessa lunghezza e devi delimitare ogni tre lettere con una virgola puoi semplicemente fare come segue:

arr_dal_form = "AAABBBCCC"
primeTre = mid(arr_dal_form,1,3)
secondeTre = mid(arr_dal_form,4,3)
terzeTre = mid(arr_dal_form,7,3)
response.write(primeTre & "," & secondeTre  & "," &  terzeTre)

Spero di essere stato d'aiuto.
Ti saluto

[fraude]

Originariamente inviato da salvodibella
Ciao!
se quello che ricevi ha sempre la stessa lunghezza e devi delimitare ogni tre lettere con una virgola puoi semplicemente fare come segue:

arr_dal_form = "AAABBBCCC"
primeTre = mid(arr_dal_form,1,3)
secondeTre = mid(arr_dal_form,4,3)
terzeTre = mid(arr_dal_form,7,3)
response.write(primeTre & "," & secondeTre  & "," &  terzeTre)

Spero di essere stato d'aiuto.
Ti saluto

Il mio era un esempio la lunghezza dei valori è sempre variabile...

[fraude]

Originariamente inviato da optime
tu come faresti se dovessi farlo a mano? una volta capito il meccanismo, si cerca di replicarlo via asp...

sto provando con un replace ma non riesco a farlo funzionare...

Messaggio = Replace(sigla, ", ", "#@", 1, -1, 1)
Messaggio = Replace(sigla, ",", "#@", 1, -1, 1)
Messaggio = Replace(sigla, "#@", ", ", 1, -1, 1)

[optime]

non hai risposto alla mia domanda, non posso aiutarti

[fraude]

Originariamente inviato da optime
non hai risposto alla mia domanda, non posso aiutarti

se lo dovessi fare a mano?
prenderei carta e penna e scriverei così:

AAA, BBB, CCC

[optime]

quindi divideresti a blocchi di tre?