hej alla här på webforum.nun!
det var nu mkmt läne sedan jag var här senast:)
men nu har jag börjat skriva lite asp igen!!
detta är mitt problem:
jag har skrivit denna: den verkar vara mkt bra!
<%
val = Request.QueryString("op")
Select Case val
Case "s", ""
sida = "<!--#include file=s.asp-->"
titel = "Start"
Case "i"
sida = "<!--#include file=i.asp-->"
titel = "Info"
Case "m"
sida = "<!--#include file=m.asp-->"
titel = "Medlemmar"
Case "m2"
sida = "<!--#include file=m2.asp-->"
titel = "Matcher"
Case "d"
sida = "<!--#include file=d.asp-->"
titel = "Downloads"
Case "g"
sida = "<!--#include file=g.asp-->"
titel = "Gästbok"
Case "admin"
sida = "<!--#include file=admin/admin.asp-->"
titel = "Admin"
End Select
%>
sen till problemet:
jag försöker skriva ut stringen sida med denna kod:
<% =sida%>
men nej den skriver inte ut vad stringen sida innehåller!
Innehåller val nå¨got vettigt då? Du bör också ha en case else.
<%
val = Request.QueryString("op")
response.write "Debug: ** " & val & "**"
Select Case val
Case "s", ""
sida = "<!--#include file=s.asp-->"
titel = "Start"
Case "i"
sida = "<!--#include file=i.asp-->"
titel = "Info"
Case "m"
sida = "<!--#include file=m.asp-->"
titel = "Medlemmar"
Case "m2"
sida = "<!--#include file=m2.asp-->"
titel = "Matcher"
Case "d"
sida = "<!--#include file=d.asp-->"
titel = "Downloads"
Case "g"
sida = "<!--#include file=g.asp-->"
titel = "Gästbok"
Case "admin"
sida = "<!--#include file=admin/admin.asp-->"
titel = "Admin"
Case else
sida = "tomt"
End Select
Jag bara undrar vad du tänkte använda sida till sedan?
ok tack allihopa det har fixat sig nu (typ)
jag vet att inte ssi körs innan asp för det har funkat innan...
men nu till et problem till:
<%
If Request.QueryString("op") = 1 Then
%><!--#include file=s.asp--><%
ElseIf Request.QueryString("op") = 2 Then
%><!--#include file=i.asp--><%
ElseIf Request.QueryString("op") = 3 Then
%><!--#include file=m.asp--><%
ElseIf Request.QueryString("op") = 4 Then
%><!--#include file=m2.asp--><%
ElseIf Request.QueryString("op") = 5 Then
%><!--#include file=d.asp--><%
ElseIf Request.QueryString("op") = 6 Then
%><!--#include file=g.asp--><%
ElseIf Request.QueryString("op") = 7 Then
%><!--#include file=admin/admin.asp--><%
Else Response.Write("Sidan kan inte hittas!")
End If
%>
val = Request.QueryString("op")
Select Case val
Case "s", ""
Server.Execute("s.asp")
titel = "Start"
Case "i"
Server.Execute("i.asp")
titel = "Info"
Case "m"
Server.Execute("m.asp")
titel = "Medlemmar"
Case "m2"
Server.Execute("m2.asp")
titel = "Matcher"
Case "d"
Server.Execute("d.asp")
titel = "Downloads"
Case "g"
Server.Execute("g.asp")
titel = "Gästbok"
Case "admin"
Server.Execute("admin/admin.asp")
titel = "Admin"
End Select