<%
1. Dim strPage 'as string
2. strPage = Trim(Lcase(Request.QueryString("page")))
3. Select case strPage
4. case <> ""
5. Server.Execute strPage & ".asp"
6. case else
7. Server.Execute "start.asp"
8. End select
%>
Det verkar som att man kan använda den här till ngt meny system eller liknande, men jag har inte fått grep om kodningen riktigt, vad är det som görs på rad 2 då man läser in en querystring till strängen strPage men varifrån hämtar man värdet på querystringen???
sedan har jag inte förstått mig på d här med server.execute ?? vad är det den gör???
<%
1. Dim strPage 'as string
Här Dimmas variabeln strPage
2. strPage = Trim(Lcase(Request.QueryString("page")))
Här fylls variabeln strPage med värdet från en QueryString vid namn "page", Trim tar bort alla eventuella mellanslag framför och bakom värdet i "page", Lcase gör alla bokstäver till gemener.
3. Select case strPage
4. case <> ""
5. Server.Execute strPage & ".asp"
6. case else
7. Server.Execute "start.asp"
8. End select
Här körs en Select Case på värdet i strPage.
På rad 4 kollas det om det finns nåt värde överuvudtaget gör det de så körs koden på rad 5, den är ungefär som Response.redirect och resulterar i att "skickas" vidare till sidan som finns i strPage.
Annars körs case else på rad 6, och då "skickas man vidare till "start.asp".
okidoki, har blivit lite klokare, men hur ska man kunna använda den här koden?? och till vad kan den vara nyttig?? om man ska använda den till ett menysystem vilket jag förutspådde att den va till, vart ska man då klistra in koden??
294 ms totalt · 4 externa anrop · v20260731065814-full.86ec41c2