Split VBScript

[Cesar]

Salve a tutti.

allora,
io ho un url di questo tipo:

provaprovaprova_provafinale.html

come faccio a recuperare soltanto “provafinale” ?
Grazie!

[willybit]

visto che il titolo del thread è "Split VBScript" ti faccio un esempio con 2 Split

url = "provaprovaprova_provafinale.html"
arr1 = Split(url,"_")
arr2 = Split(arr1(1),".")
Response.Write arr2(0)

[longline]

StringaIniziale = "provaprovaprova_provafinale.html"

PosizioneUnderscore = Instr(StringaIniziale, "_")
StringaFinale = Mid(StringaIniziale, PosizioneUnderscore)

Guida Funzione InStr()
Guida Funzione Mid()

[willybit]

sei off-topic! Qui si parlava di Split ( scherzo)
però permettimi di correggere

StringaIniziale = "provaprovaprova_provafinale.html"
PosizioneUnderscore = InStr(StringaIniziale, "_")
PosizionePunto = InStrRev(StringaIniziale, ".")
StringaFinale = Mid(StringaIniziale, PosizioneUnderscore+1,PosizionePunto-PosizioneUnderscore-1)

lui vuole solo "provafinale"

[longline]

Hai ragione stasera sono un po' stanchino, grazie per le correzioni

[willybit]

Visto che ormai siamo andati off-topic col titolo e visto che a me piacciono tanto le regular expressions propongo un'altra soluzione...

StringaIniziale = "provaprovaprova_provafinale.html"
set re = Server.CreateObject("VBScript.RegExp")
re.Pattern="([^\._]+)\."
re.Global=true
set Matches = re.Execute(StringaIniziale)
if Matches.Count>0 then
  Response.Write Matches(0).SubMatches(0)
end if

[Cesar]

vi ringrazio ragazzi.