split streng mellem tekst og tal

Du kan bruge:
strTxt = "MH kasse 1"
arrTxt = Split(strTxt)

Og så kan du så begynde at køre det igennem med en forløkke fx. og så spørge på om IsNumeric() osv. og på den måde sortere det ud som du vil ha' det...

//>Rune

skal lige ha lidt mere hjælp... noget færdigt kode ville være rart...

Kan du ikke prøve at skitsere resultatet med et eksempel for det er lidt svært helt præcis at tyde hvad du vil opnå...?

jeg har f.eks følgende fra en databasefeltet nummer (hver sin række):
MH kasse 1
MH1
SC1
SC kasse 1
MH kasse 2

så vil jeg gerne have det splittet op i 2 array, som vist her under...:

TEKST                              TAL
MH Kasse                            1
MH                                  1
SC                                  1
SC kasse                            1
MH kasse                            2

håber det hjalp lidt

Meget :)

Jeg går ud fra at der ikke kan forekomme bogstaver efter et tal i den samme værdi og at de tal der kan forekomme er heltal...?

I så fald kan du bruge flg. løkke til at søge igennem hver streng:

for i = 1 to len(strTekst)
  if instr(numbers, mid(strTekst,i,1)) > 0 then
    ' så er dette et tal, hvilket betyder at løkken skal stoppes
    ' og tallet skal trækkes ud af den resterende streng
    tallet = mid(strTekst, i)
    exit for
  else
    teksten = teksten & mid(strTekst,i,1)
  end if
next

Faktisk betyder det ikke noget om det er heltal eller ej, bare der ikke forekommer bogstaver efter det første tal i strengen :)

kan ikke få det til at virke...
hvis jeg laver en response.write på "tallet" for jeg ingenting, og på "teksten" for jeg bare det samme som strTekst...

Jeg kan se at jeg lige mangler at definere numbers- Jeg undskylder forglemmelsen.

numbers = "0123456789"
for i = 1 to len(strTekst)
  if instr(numbers, mid(strTekst,i,1)) > 0 then
    ' så er dette et tal, hvilket betyder at løkken skal stoppes
    ' og tallet skal trækkes ud af den resterende streng
    tallet = mid(strTekst, i)
    exit for
  else
    teksten = teksten & mid(strTekst,i,1)
  end if
next

super så virkede det!
tusind tak!

arg det var til den forkerte...
opretter lige et spørgsmål til dig softspot..

softspot: opret venligst svar i http://www.eksperten.dk/spm/691904

Takker for point :)