Yo!
Använder mig av ID för att navigera runt på sidorna.
Nu är det så att när man kommer in på sidan så är querystringen tom och det blir fel. Jag testade med att läga in en If satts.
If trim(Request.Querystring("page")) = " " Then
Request.Querystring = "1"
Ett försök för att få den att hämta ID 1´s text men den hämtade igen text fast navigeringen funkade. Hur löser jag det?
Koden jag använder...
navigering
<%
Set Connect = Server.CreateObject("ADODB.Connection")
Connect.Open "driver={Microsoft Access Driver (*.mdb)};dbq=" & Server.Mappath("info.mdb")
%>
<form name="innehall">
<select name="innehall" onChange="linkselect (this.options[this.selectedIndex].value)">
<option>Innehåll >></option>
<option></option>
<%
strSQL = "SELECT * FROM pages ORDER by id ASC"
Set rs = Connect.Execute( strSQL )
Do until rs.EOF
%>
<option value="info.asp?page=<%=rs("id")%>"><%=rs("page")%></option>
<%
rs.MoveNext
Loop
Connect.Close
%>
hämtar texten
<%
Dim Connect
Set Connect = Server.CreateObject("ADODB.Connection")
Connect.Open "driver={Microsoft Access Driver (*.mdb)};dbq=" & Server.Mappath("info.mdb")
strSQL = "SELECT * FROM pages WHERE ID = " & Request.Querystring("page")
Set rs = Connect.Execute( strSQL )
Do until rs.EOF
%>
<%=rs("pagetext")%>
<%
rs.Movenext
Loop
Connect.close
%>
------------------
Forumledare, webForum