Returnera det egna filnamnet

5 svar · 258 visningar · startad av mattiasnordin 4 jan. 2002

mattiasnordinMedlem sedan maj 20012 080 inlägg

Frågan4 jan. 2002 10:49#1

Jag har använt mig av ett asp skript som hämtar alla filnamn i en viss katalog så jag tycker att det här borde vara möjligt.

Vad är det enklaste sättet att få ett asp skript att veta sitt eget filnamn?
tex: default.asp
Min tanke är att jag inte ska behöva ange några sökvägar utan att det ska gå att flytta VBskriptet med Cut n paste till andra asp sidor. Är det möjligt?

------------------
http://www.absolut.nu

jorgenMedlem sedan feb. 20012 412 inlägg

4 jan. 2002 11:05#2

Request.ServerVariables("SCRIPT_NAME")

------------------
.: Det är jag som ger svaren och det är Ni som ställer frågorna :.

mattiasnordinMedlem sedan maj 20012 080 inlägg

4 jan. 2002 11:39#3

Sorry. Jag sökte dåligt. Hittade en annan tråd. Intressant. Nu åkte jag på att försöka förstå mig på split.

<%
testtest = Request.ServerVariables("SCRIPT_NAME")
MyArray = split (testtest, "/", -1)
Response.Write "Filnamn + sökväg = <b>" &testtest &"</b><br>"
Response.Write MyArray(0) &" (split #1)<br>"
Response.Write MyArray(1) &" (split #2)<br>"
Response.Write MyArray(2) &" (split #3)<br>"
MyFilename = MyArray(2)
Response.Write "<p><font color=red>" &MyFilename &" </font><br>"
%>

Resultatet av körd kod:

Filnamn + sökväg = /tab_offices/offices_start.asp
(split #1)
tab_offices (split #2)
offices_start.asp (split #3)

offices_start.asp

Hur kan man göra för att få ut enbart det som är efter det sista "/"? Får ut en array men den är ju olika lång beroende på hur djupt sidan ligger i mitt filarkiv. Vill altså enbart ha loss filnamnet oavsätt hur lång sökvägen är.

------------------
http://www.absolut.nu

jorgenMedlem sedan feb. 20012 412 inlägg

4 jan. 2002 12:10#4

Kolla lite på funktionerna mid() och right()

mvh Jörgen :)

------------------
.: Det är jag som ger svaren och det är Ni som ställer frågorna :.

icaaqMedlem sedan okt. 20005 273 inlägg

4 jan. 2002 12:15#5

strPath = Request.ServerVariables("SCRIPT_NAME")
intRevPos = instrRev(strPath, "/")
strFile = Right(strPath, intRevPos + 1)

jag har bara tagit detta ur huvudet så jag vet inte om det funkar....

------------------
kolung.....det tål att tänkas på!

[Redigerat av icaaq den 04 jan 2002]

mattiasnordinMedlem sedan maj 20012 080 inlägg

4 jan. 2002 12:25#6

Tack för svaret. Jag löste det så här efter att ha sökt på MSDN. Kul när man lyckas lösa det själv...

<%
MyPathNfile = Request.ServerVariables("SCRIPT_NAME")
MyPos = InStrRev(MyPathNfile, "/")
' Räknar till den första / bakifrån
MyLen = len (MyPathNfile)
' Längden på hela sökvägen
CutHere = MyLen - MyPos
MyStr = Right(MyPathNfile, CutHere)
response.Write MyStr &"<p>"
%>

------------------
http://www.absolut.nu