webForumDet fria alternativet

InStr?

10 svar · 269 visningar · startad av Asa

AsaMedlem sedan dec. 20011 860 inlägg
#1

Har ex denna länk: artiklar.asp?view=47&delete=24 och vill plocka ut allt före &delete=24.

Hur gör jag? Har sökt men inte hittat nåt som jag fattar.

ViktorMedlem sedan aug. 20021 752 inlägg
#2

http://www.w3schools.com/vbscript/func_instr.asp
Denna kod borde fungera

dim villha as string
dim lank as string
lank="artiklar.asp?view=47&delete=24"
villha=mid(lank,1,instr(lank,"&delete=24")

Kör efter "&delete=24", när det hittas så retuneras indexet där det finns i strängen.

/Viktor

AsaMedlem sedan dec. 20011 860 inlägg
#3

Ska bygga lite med den koden! Tack!

AsaMedlem sedan dec. 20011 860 inlägg
#4

Gjorde så här där man ska skickas tillbaka till den sida man var på. Kanske helt onödigt mycket kod men det funkar iallafall. Har nån tips på bättre kod som är jag tacksam.

If Request.QueryString("delete") <> "" Then
    Conn.Execute("Delete From temp Where idNr=" & Request.QueryString("delete") & " And sid=" & Session.SessionID)

    Page   = Request.ServerVariables("SCRIPT_NAME")
    Page2  = Request.ServerVariables("QUERY_STRING")
    Delete = Request.QueryString("delete")
    Url   = Mid(Page, InStrRev(Page, "/") + 1) & "?" & Page2
    If Left(Page2,6) = "delete" Then
      Url   = Mid(Url,1,InStr(Url,"?delete=" & Delete)-1)
    Else
      Url   = Replace(Mid(Url,1,InStr(Url,"&delete=" & Delete)-1),"&delete=" & Delete," ")
    End If

    Response.Redirect Url
End If
cyprysMedlem sedan dec. 20003 563 inlägg
#5

response.redirect(Request.ServerVariables("HTTP_REFERER")) ?

AsaMedlem sedan dec. 20011 860 inlägg
#6

Det var ju ett smidigt sätt :) Den hade jag helt glömt bort! Funkar den alltid?

cyprysMedlem sedan dec. 20003 563 inlägg
#7

Asa skrev:

Det var ju ett smidigt sätt :) FUnkar det alltid?

Inte på söndagar.. §e :e :e
tihi, skämt åsido...

Yupp, HTTP_REFERER är alltid sidan man kommer ifrån. Denna är blank om man skriver adressen direkt i adressfältet.

cyprysMedlem sedan dec. 20003 563 inlägg
#8

Här är annars en intressant kodsnutt du kan testa. Finns mycket smått och gött här.

Dim x
For each x in request.servervariables
response.write(x & " = " & request.servervariables(x) & "<br>")
next
AsaMedlem sedan dec. 20011 860 inlägg
#9

Ska testa!

LR^evil.sidMedlem sedan maj 2002560 inlägg
#10

Asa skrev:

Det var ju ett smidigt sätt :) Den hade jag helt glömt bort! Funkar den alltid?

request.servervariables("http_referer") fungerar bara när du surfar runt på din server. Om kommer från en annan tar inte med "?blopp=blablabla&topp=sniffsniff"

AsaMedlem sedan dec. 20011 860 inlägg
#11

SKa använda det i en shop så det är ju ett smidigt sätt. Hoppas jag iallafall!

131 ms totalt · 3 externa anrop · v20260731065814-full.86db40fa
0 ms — hämta forumlista (cache)
0 ms — hämta statistik (cache)
127 ms — hämta tråd, inlägg och bilagor (db)