select case slutar med "else if"

6 svar · 539 visningar · startad av peppar 26 juli 2005

pepparMedlem sedan dec. 2001873 inlägg

Frågan26 juli 2005 19:54#1

Jag har en select case som ser ut så här...

script_name = lcase(Request.ServerVariables("script_name"))
select case script_name
   case "/default.asp" 
		pageName = "/default_default.asp"
   case "/informa.asp" 
		pageName = "/informa_default.asp"
end select

men om jag vill att selecten skall sluta sisåhär typ...

script_name = lcase(Request.ServerVariables("script_name"))
select case script_name
   case "/default.asp" 
		pageName = "/default_default.asp"
   case "/informa.asp" 
		pageName = "/informa_default.asp"
		
	[b]case else 
	pageName = scriptName[/b]
end select

Hur kan man göra det?

@ndersMedlem sedan juni 200032 967 inlägg

26 juli 2005 19:58#2

Du har inte testat ditt förslag antar jag?

http://www.devguru.com/technologies/wml/vbscript/quickref/selectcase.html

pepparMedlem sedan dec. 2001873 inlägg

26 juli 2005 20:11#3

jo, tyvärr... sjutton också... varför är då pageName tom i utskrift...?!

återkommer... måste skriva ut innehållet i ett gäng variabler för att felsöka...

@ndersMedlem sedan juni 200032 967 inlägg

27 juli 2005 18:09#4

Fick du ihop det?

KimGMedlem sedan apr. 2002105 inlägg

27 juli 2005 18:14#5

Öhm.. Varför har du två olika variablar?

Här ger du ju script_name ett värde:

script_name = lcase(Request.ServerVariables("script_name"))

Men variabeln med info du ska ge pageName heter scriptName, men den har du ju inte angivit något värde till, eller hur?

Så, ändra det sista till:

case else 
pageName = script_name

... så ska det nog fungera ;)

pepparMedlem sedan dec. 2001873 inlägg

27 juli 2005 18:28#6

KimG -> Helt rätt. Jag skrev fel... Men ovanstående var nog mer ett snabbexempel för att förtydliga min fråga om case else...

@nders -> Nja... jo min case else fungerar...

@ndersMedlem sedan juni 200032 967 inlägg

27 juli 2005 18:33#7

Great!

Det är dock bra att KimG har de ögon vi andra saknar... ;)