Operação com strings

[thiago.serra 0]

Como faço para remover o início de uma string?

[Neco 0]

Como assim?!

[thiago.serra 0]

Por exemplo, cadeia = "/site/home.asp"(como transformar isso em simplesmente "home"?)

[Neco 0]

Se esse /site for padrão pra todas as strings...da um Replace...

[thiago.serra 0]

como é que é?

[*Marcinha* 0]

cadeia = Replace(cadeia,"/site/","")onde:cadeia = nome da variável"/site/" = a parte da variavel que deverá ser substituida"" = o que você quer colocar no lugar.

[rockbilly 0]

fiz uma gambi aqui e deve te ajudar:

Function arquivo(expr)

pos = InStrRev(expr,"/")

  For i = pos+1 to Len(expr)

  cade = Mid(expr,pos+1,i)

  Next

  pos2 = InStr(cade,".")

For j = 0 to pos2-1

  checka = Mid(cade,1,j)

Next

 

  arquivo = checka

End Function

 

caminho = "/site/homerr.asp"

Response.Write arquivo(caminho)

boa sorte!