Estrarre numeri da una stringa

[Luca1317]

ho delle stringhe:

8865-adsd-asdasd
34-dfs-sdfdsf
3432-5-dfdf


vorrei mettere in una variabile tutti i numeri prima del primo trattino e cioè:

8865
34
3432

potreste darmi una mano

[Luca1317]

ho provato questa funzione che estrae solo numeri dalla stringa:

Function estraiNumero(strIn)
  dim strOut, strTemp
  strOut = ""
  strTemp = ""
  For i = 1 To Len(strIn)
    strTemp = Mid(strIn, i, 1)
    If isNumeric(strTemp) Then
      strOut = strOut & strTemp
    End If
  Next
  estraiNumero = strOut
End Function

e ho cercato di prendere solo i numeri a sinistra del simbolo - con instr:

var1="ccc567-556hhg6"
Response.Write(estraiNumero(instr(var1, "-")))

ma mi restituisce solo un numero a sinistra del -

[EnSa]

Penso che ti convenga utilizzare la funzione Split

[alessio_1976]

esatto....se la stringa è comunque sempre composta dai numeri poi il trattino e poi il resto, fai uno split con il trattino, ricordandoti sempre che il primo valore quando richiami i dati splittati è lo 0...

[Luca1317]

penso che la strada che stavo usando fosse quella giusta anche perchè se uso split mi vad a complicare la vita:

devo pescare ad es i numeri 128 e 134 dalle stringhe 128-d-4-3 e 134-dfd-df-2 e se uso split e la funziona che mi pesca solo numeri pescherei anche il resto dei numeri a destra del simbolo -


non so proprio come fare...eppure ci ero andato vicino

[Luca1317]

come non detto...risolto solo utilizzando split...grazie a tutti