webForumDet fria alternativet

script_name

14 svar · 394 visningar · startad av jboy_87

jboy_87Medlem sedan aug. 20011 105 inlägg
#1

går det inte och göra det här på nått annat sätt istället för att skriva or or hela tiden?

<%if request.Servervariables("script_name") = "/default.asp" or request.Servervariables("script_name") = "/nyheter.asp" then%>
SPiNMedlem sedan mars 20005 832 inlägg
#2
Select Case Request.ServerVariables( "SCRIPT_NAME" )
     Case "/default.asp"
          ' Gör det här
     Case "/annan_sida.asp"
          ' Gör det här
     Case Else
          ' Gör det här, om inget alternativ matchade
End Select
jboy_87Medlem sedan aug. 20011 105 inlägg
#3

fa* tänkte inte på case men tack :)

jboy_87Medlem sedan aug. 20011 105 inlägg
#4

men om jag gör sådär måste jag kopiera html mellan alla case??

SPiNMedlem sedan mars 20005 832 inlägg
#5

Använd sub:ar eller funktioner! Mycket mer strukturerad kod. :)

jboy_87Medlem sedan aug. 20011 105 inlägg
#6

kan du visa lite kod?

SPiNMedlem sedan mars 20005 832 inlägg
#7
<%
Sub Printer( ByVal str )
     Response.Write str
End Sub

Function Checker( ByVal str )
     If str = "SPiN"
          Checker = True
     Else
          Checker = False
End Function

Dim myString
myString = "SPiN"

If Checker( myString ) Then
     Printer myString
Else
     Printer "Inte SPiN!"
End If

Printer "<br />"

myString = "jboy"

If Checker( myString ) Then
     Printer "SPiN!"
Else
     Printer "Inte SPiN, utan: " & myString
End If
%>

En sub är en sorts funktion som inte returnerar något, och som man inte anropar med parenteser, kan man säga. En funktion returnerar något, och kan ta emot information mellan parenteser. Nu är jag rätt trött, så jag orkar inte gå in längre i förklaringen. ;)

jboy_87Medlem sedan aug. 20011 105 inlägg
#8

okej men hur kopplar jag in script_name med det där?

solbulleMedlem sedan mars 20014 998 inlägg
#9

Typ:

Select Case Request.ServerVariables( "SCRIPT_NAME" )
     Case "/default.asp"
          Call Nisse
     Case "/annan_sida.asp"
          Call Kalle
     Case Else
          Call Pelle
End Select

Sub Nisse()
'I detta kodblock finns all kod som körs vid val av Nisse
' bumelibum
End Sub

Sub Kalle()
'I detta kodblock finns all kod som körs vid val av Kalle
End Sub

Sub Pelle()
'I detta kodblock finns all kod som körs vid val av Pelle
End Sub
jboy_87Medlem sedan aug. 20011 105 inlägg
#10

thanks nu fattar jag :)

jboy_87Medlem sedan aug. 20011 105 inlägg
#11

kan man inte göra så här

Case "/meddelanden.asp" and case "/meddelande.asp"
Call kompislista
Call snabbsok

@ndersMedlem sedan juni 200026 914 inlägg
#12

Nej.

Request.ServerVariables("SCRIPT_NAME") kan ju inte vara "/meddelanden.asp" och "/meddelande.asp" samtidigt.

cyprysMedlem sedan dec. 20003 105 inlägg
#13

Detta funkar annars.

case "/sida1", "/sida2", "/sida3"
call subfor1och2och3
case "/sida4", "/sida5"
call subfor4och5

jboy_87Medlem sedan aug. 20011 105 inlägg
#14

hur ska jag göra då eheheh

jboy_87Medlem sedan aug. 20011 105 inlägg
#15

ska testa :-) tackar

Genererad på 474 ms · cache AV · v20260730165559-full.f96bc7eb