Case

ASP

6 svar · 233 visningar · startad av fundrusse 19 dec. 2002

fundrusseMedlem sedan jan. 2002286 inlägg

Trådstart19 dec. 2002 15:06#1

Jag har en lång jävla case satts.

Går det att loopa igenom den o skriva ut alla värdena på nått sätt?.

PeeerMedlem sedan mars 20025 907 inlägg

19 dec. 2002 15:09#2

lite kod kanske inte skadar?

fundrusseMedlem sedan jan. 2002286 inlägg

19 dec. 2002 15:11#3

kod...

asså det är bara en case satts..
och jag behöver alla väderna på en sida

så jag behöver loopa ut allt

VideMedlem sedan dec. 19998 577 inlägg

19 dec. 2002 15:17#4

Något sådant sätt finns inte i Case.

Engine^Medlem sedan dec. 20003 887 inlägg

19 dec. 2002 15:47#5

Alla värdena har du ju i koden redan om du har skrivit din långa case-sats... du får väl använda papper och penna eller något...

Värde på Case... klingar konstigt i mina öron det.

Nexus86Medlem sedan okt. 20023 030 inlägg

19 dec. 2002 16:29#6

Tog mej friheten att göra ett program som listar just Case:or.
Tog ett tag. Men det listar inte i vilka subbar/funktioner dom
ligger.

EDIT // En STOR bugg!! orkar inte fixa eftersom att jag inte sparade filen..

VideMedlem sedan dec. 19998 577 inlägg

19 dec. 2002 17:49#7

Helt otestat:

Set objFSO = Server.CreateObject("Scripting.FileSystemObject")
Set objTextStream = objFSO.OpenTextFile( server.mappath( "texten.asp", 1 )
strText =  objTextStream.ReadAll

set oRegExp = new regexp
oRegExp.global=true
oRegExp.ignorecase = true
oRegExp.pattern = "case (.+?)\n"

Set myMatches = oRegExp.Execute( strText )

for each match in myMatches
  response.write trim( replace( match.Value, "case", "" ) ) & "<br>"
next