mysteriumet med SSI....

Att nånting inte fungerar är ett väldigt vitt begrepp... vad är det som inte funkar?

om jag säger så här "senaste nytt"visas inte på gästboks sidan.....men på alla andra sidor gör den det...kolla själv... http://www.icaaq.com/default.asp

okej, då vet vi symptomen... nu till problemet: vad är det som skiljer sig, i kod, mellan två sidor, en som funkar, och en som inte funkar?

det är det som är frågan....det jag har i include filen är detta

<%

Set con = Server.CreateObject("ADODB.Connection") 
con.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source="&Server.MapPath("/data/gaster.mdb")
con.open
%>
<%

strSQL = "SELECT * FROM nyhet ORDER BY ID DESC"
				Set rs = con.Execute(strSQL)
				
				Do While Z < 3

					If rs.EOF Then 
					Exit Do
					End If %>
					
					<font color="#FF0000"><%=rs("datum")%></font><br>
 					<%=rs("nyhet")%><br><br>
					<%
					Z = Z + 1
					rs.Movenext
					Loop
					%>
					
					<%
					rs.Close
					con.Close
					%>

kan det vara nått i gästboken som stör??

här är koden till den

strSQL = "SELECT * FROM gaster ORDER BY ID DESC"
				Set rs = con.Execute(strSQL)
					rs.Move Steg
					Do While Z < 5

					If rs.EOF Then 
					Exit Do
					End If %>
                  <font color="#FF0000">Namn:</font> 
                  <% =rs("av") %>
                  <br>
                  <font color="#FF0000">Datum:</font> 
                  <% =rs("Datum") %>
                  <br>
                  <font color="#FF0000">Tid:</font> 
                  <% =rs("Tid")%>
                  <br>
                  <font color="#FF0000">Inlägg:</font><br>
                  <% =rs("text")%>
                  <br>
                  </font> 
                  <hr noshade size="1" color="black" align="left">
                  <div align="left"><font face="Verdana, Arial, Helvetica, sans-serif" size="1"> 
                    <%	rs.MoveNext

	Z = Z + 1

	Loop 
	End If %>
                    <% If Request.QueryString("next") = "" Then %>
                    <% ElseIf Request.QueryString("next") = "0" Then %>
                    <% Else %>
                    <% Bak = Nasta - 2 %>
                    <a href="gastbok.asp?next=<% =Bak %>">Bakåt</a> &#0124; 
                    <% End If %>
                    <%	If rs.EOF Then %>
                    <font color="gray">Nästa</font> 
                    <% Else %>
                    <a href="gastbok.asp?next=<% =Nasta %>">Nästa 5</a> 
                    <% End If 
					rs.Close
					con.Close
					Set con = nothing				%>

det är säkert inte den ultimata koden men den funkar....

... i gästboks koden så återkommer Z = Z + 1 ....

Körs denna kod före själva nyhets koden så har Z redan blivit större än 3 och då visar den således ej heller ngn nyhet.

Det du kan göra i nyhets scriptet är att ändra i sql-uttrycket:

strSQL = "SELECT TOP 3, * FROM nyhet ORDER BY ID DESC"

Ändra sedan detta:

Do While Z < 3

till

Do Until rs.EOF

Kom ihåg att plocka bort Z = Z + 1 i nyhets-script koden.

cya,