mysteriumet med SSI....

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

------------------
Nu har du sjungit på sista refrängen
Jourhavande Vide

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

------------------
icaaq

man måste fråga för att lära sig något

---i suck ---

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?

------------------
Nu har du sjungit på sista refrängen
Jourhavande Vide

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....

------------------
icaaq

man måste fråga för att lära sig något

---i suck ---

... 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,

------------------
Private Function OutPut(ByRef sString)
OutPut = "Who gives ..." & sString
End Function