Hej!
Sitter och skall gö ett menysystem till en sida, men blev lite förvånad när det inte funkade som jag ville...
Tänkte om ni kanske kan se om det är nåt jag har missat:
<%
Dim strCat
strCat = Request.QueryString("cat")
If Trim(strCat) <> "" Then
Set Obj = CreateObject("Scripting.FileSystemObject")
If Obj.FileExists(Server.MapPath("../verbalium/" & strCat & ".asp")) Then
Server.Execute(Server.MapPath("../verbalium/" & strCat & ".asp"))
Else
Server.Execute("start.asp")
End if
Set obj = Nothing
Else
Server.Execute("start.asp")
End if
%>
Skriv ut sökvägen och kontrollera att det är rätt sökväg.
Och, nej, du kan inte ange sökvägen till filer med server.mappath när du ska köra server.execute().
Jajjamensan=)
tar jag bort den raden så funkar det, men jag vill ha kvar den för att jag skall kunna kolla i fall filen finns, annars skall man komma in på start.asp :e
/ Mikul
Så här löste jag det:
Men det mesta bestod av en liten felplacering av vissa mappar/filer på servern. Hehe :e
[RED]
<%
Dim strCat
strCat = Request.QueryString("cat")
If Trim(strCat) <> "" Then
Set Obj = CreateObject("Scripting.FileSystemObject")
If Obj.FileExists(Server.MapPath(strCat & ".asp")) Then
Server.Execute(strCat & ".asp")
Else
Server.Execute("start.asp")
End if
Set obj = Nothing
Else
Server.Execute("start.asp")
End if
%>
/ Mikul
[/RED]
345 ms totalt · 4 externa anrop · v20260731065814-full.a51de22e
