Hämta namn på mapp

RED. Fel tänkt av mig. :)

Eller så kanske det var så här du menade?

strPath = Request.ServerVariables("SCRIPT_NAME")
Response.Write(Left(strPath, InStrRev(strPath, "/") - 1))

Ok tack för svaret sebbe!

Just nu returnerar Request.ServerVariables("SCRIPT_NAME")

/mapp/undermapp/fil.asp

och din kod

Response.Write(Left(strPath, InStrRev(strPath, "/") - 1))

/mapp/undermapp

Det jag skulle vilja är att ha namnet på mappen och undermappen i två variabler. Dvs. Man får splitta och greja, men hur gör man det smidigast?

folder = mapp
subfolder = undermapp

Liam skrev:

Ok tack för svaret sebbe!

Just nu returnerar Request.ServerVariables("SCRIPT_NAME")

/mapp/undermapp/fil.asp

och din kod

Response.Write(Left(strPath, InStrRev(strPath, "/") - 1))

/mapp/undermapp

Det jag skulle vilja är att ha namnet på mappen och undermappen i två variabler. Dvs. Man får splitta och greja, men hur gör man det smidigast?

folder = mapp
subfolder = undermapp

Du kan ju använda en array, men då bli antalet helt plötsligt dynamiskt och inte lika pålitligt som strukturen förändras.

Dim folderArray
folderArray = Split(strPath,"/")

response.write "mapp: " & folderArray(0) & "<br>"
response.write "submapp: " & folderArray(1) & "<br>"
response.write "fil: " & folderArray(2) & "<br>"

Ytterligare lite kod, för att minska dynamikproblemen, som loopar igenom din array, samt kollar vad som är filnamn/mappnamn.

for i = lbound(folderArray) to ubound(folderArray)
   if i = ubound(folderArray)
      response.write "Filnamn: " & folderArray(i) & "<br>"
   else
      response.write "Mapp" & i & ": " & folderArray(i) & "<br>"
   end if
next

Tack OveRRidE, fungerar perfekt!