Sostituzione caratteri in un record

[iadream]

Salve amici,

ho dei record da cui vorrei eliminare determinati caratteri, ovvero numeri ed il trattino... come posso fare?

Es.

00100 - Roma -> Roma
07658498 - Bassano -> Bassano

Con replace come devo fare?

[Lak3d]

se quello che devi ottenere partendo da questo:

00100 - Roma -> Roma
07658498 - Bassano -> Bassano

è questo...

Roma -> Roma
Bassano -> Bassano

e la struttura dei dati è sempre numeri da eliminare SEGUITI dal trattino da eliminare fai così:

<%
str1="00100 - Roma -> Roma"
str2="07658498 - Bassano -> Bassano"
str_replaced=Mid(str1,Instr(str,"-")+1)
str_replaced=Mid(str2,Instr(str,"-")+1)
%>

Ovviamente poi se il tutto viene da un database, puoi benissimo farti un'array o una matrice e scrivere un ciclo for.

[iadream]

Allora io ho i record che non sono tutti uguali, ovvero a volte potrebbe anche non esserci il numero con il trattino!

4353644576 - Monte mario

oppure

Località Varese

Ovviamente dove trovo il numero (potrei controllare anche se esiste il trattino)
devo levare i numeri ed il trattino, e mi deve risultare:

Monte mario

[iadream]

Navigando ho trovato che una soluzione potrebbe venire dall'uso delle regexp:

Function TogliTAG(Stringa)
Dim RegEx, Temp
Stringa = (Recordset1.Fields.Item("CITY").Value)
Temp = Stringa
Set RegEx = New RegExp
RegEx.Pattern = "\d{5}"
RegEx.Global = True
RegEx.IgnoreCase = True
Temp = RegEx.Replace(Temp, "")
Set RegEx = Nothing

TogliTAG = Temp
Response.write(Temp&"
")
End Function

però non so come ciclare, perchè se metto il ciclo prima di function mi restituisce errore!

[optime]

fa' uno split sul trattino

[Lak3d]

esatto. O splitti sul trattino o fai come ho detto io prima, verificando prima se esiste.

If Instr(str, "-")<>0 then
   str_rep=Mid(str, Instr(str, "-")+1))
End if

oppure

If Instr(str, "-")<>0 then
   str_rep=Split(str, "-")
   str=str_rep(1)
End if