Capire se un campo contiene numeri

[iadream]

Salve amici,

ho un modulo per inserire dati che divide il testo incollato in un'area testo e lo ripartisce in diversi campi.
Uno di questi campi a volte potrebbe contenere un cap che io vorrei eliminare in automatico.

Esempio

00100 Roma, -> Roma
20304 Bergamo -> Bergamo
Località Brera -> Località Brera

ma non in tutti i casi (altrimenti basterebbe eliminare i primi 6 caratteri)...

Come posso fare il controllo e l'eliminazione?

[DarioN1]

fossi in te riorganizzerei il db . . .

così proprio non và . . .



Purtroppo non esistono script così intelligenti . . .

[artcava]

Se poi proprio non riesci a riorganizzare il db, puoi operare come segue:

Prima di tutto dividi il testo appoggiandolo in un array in questo modo:

tuoArray = Split(TestoNelDB)

Poi scorri l'array cercando il testo che rappresenta un numero:

string nuovoTesto
for i = 0 to Ubound(tuoArray)
  if not IsNumeric(tuoArray(i)) Then
    nuovoTesto = nuovoTesto + tuoArray(i) + " "
  end if
next

La variabile nuovoTesto a questo punto contiene il testo senza numeri...

Okkio ke se ci sono altri numeri a parte i cap questo codice toglierebbe anche quelli, inoltre se il cap fosse seguito ad esempio da un "-" (trattino) il testo verrebbe riportato integro di cap. Quindi comunque la vera soluzione al problema è quella suggerita da DarioN1...

Tieni in oltre presente che il codice qui riportato non è testato, l'ho scritto andando a naso...

[iadream]

E se utilizzasi una regexp? In pratica mi toccherebbe controllare se contine il CAP ed in quel caso eliminarlo!

Ma come faccio?

[artcava]

Il testo per verificare se una stringa contiene un CAP è il seguente...

'^\d{5}$'

Solo che io so utilizzarlo in .NET, con VBScript non saprei quali oggetti utilizzare, ma probabilmente facendo una ricerca il modo lo trovi...

[Lak3d]

se il cap (quando è presente) sta nelle prime sei cifre e, come ti hanno già detto, non contiene altri caratteri, si può fare, altrimenti non saprei, RegExp a parte (ma anche qua devi essere certo che non ci siano di mezzo altri caratteri credo)...