Jag har ett forum och vill bara veta hur man genom två bilder kan få sidan att visa new.gif om det är nya inlägg sen sitt senaste besök och old.gif om det inte är det.
Jag listar trådarna ju när man valt forum och brevid rubriken ska det vara denna lilla bild.
Hur gör man så att det blir rätt för varje inloggad person????? Datum fält höll jag på med lite och jämförde oså.... men fick inte det att bli rätt... någon?
Hur gör man så att det blir rätt för varje inloggad person
Det är ju det som är så smidigt med ASP. Spar senaste inloggningen i en databas eller i en kaka och sedan så jämför du med "datediff" (sök på datediff). Och sedan en liten if-sats. Klart
Spar i databasen eller i kakan när vererbörande besökte forumet sist.
sedan gör du något likanande:
skillnad = dateDiff("d",RecSet("lastvisit_date"),date())
If skillnad >= 0 Then
response.write "<img src='ny_bild.gif'>"
else
response.write "<img src='gammal_bild.gif'>"
End if
<%
sql = "Select * From add_forum WHERE orginal = 'Ja' AND forum_val = '" & request.querystring("forum") & "' ORDER BY datum DESC"
sql2 = "select * from medlemmar where moderator = 'Ja'"
set rs = Databas.execute(sql)
set rs2 = Databas.execute(sql2)
X = 0
response.write "<table width=370 cellspacing=3><tr><td width=200><b>Rubrik:</b></td><td width=50><b>Skribent:</b></td><td width=120><b>Datum:</b></td></tr></table>"
DO UNTIL X=25 OR rs.EOF
if bgcolor="#FFFFFF" then
bgcolor="#EFEFEF"
else
bgcolor="#FFFFFF"
end if
response.write "<table width=370 cellspacing=3 bgcolor="& bgcolor &" valign=top><tr><td width=200><a href=read.asp?id="& rs("id") &"&forum=" & request.querystring("forum") & ">"& rs("rubrik") &"</td><td width=50>"& rs("anvandarnamn") &"</td>" &_
"<td width=120>"& FormatDateTime(rs("datum"), 1) &"</td></tr></table>"
rs.movenext
loop
%>
<br>
<table width=370><tr><td>
<hr size=1 color=1 width=370>
<a href="new.asp?forum=<%=request.querystring("forum")%>">Skapa ny tråd</a> | <a href=sok.asp>Sök</a> | <a href=forum_val.asp>Välj forum</a><br><br>
<b>
Moderator inom detta forum:
<%
Y = 0
do until rs2.eof OR Y = 2
response.write "<font color=green>"& rs2("anvandarnamn") &"</font> "
rs2.movenext
loop
%>
ja, men om du använder det för detta så.. kvittar det ju om clienten inte stödjer det då fungerar det bara inte för honom...
givetvis fungerar det med databasen också.
'## -- Function: CheckNewPosts(ByVal LastHereDate, ByVal LastPostDate)
'## -- Description: Check after new posts since last visit --
'##
'## -- Author: PatrikBerggren
'## -- Contact: [email]mrwize@mrwize.nu[/email]
Function CheckNewPosts(ByVal LastHereDate, ByVal LastPostDate)
Dim strOutPut
If LastPostDate > "" Then
If CDate(LastHereDate) < CDate(LastPostDate) then
strOutPut = "<img src=""images/ico_new_posts.gif"" " & _
"alt=""" & NEW_TOPIC_ALT & """ border=""0"">"
Else
strOutPut = "<img src=""images/ico_old_posts.gif"" " & _
"alt=""" & OLD_TOPIC_ALT & """ border=0>"
End If
Else
strOutPut = "<img src=""images/ico_old_posts.gif"" " & _
"alt=""" & OLD_TOPIC_ALT & """ border=0>"
End If
CheckNewPosts = strOutPut
End Function
som jag vill föra in i min listning av trådar.... men jag vet ej hur jag ska göra...????
här är min kod för listning just nu:
<%
SQL1 = "SELECT Count(*) From add_forum Where forum_val = '" & Request.querystring("forum") & "'"
Set rs1 = Databas.Execute(SQL1)
%>
Här listas de 25 senaste trådarna. Om du klickar på rubriken för en tråd så kan du läsa
hela inlägget och svara på det också. Anser du att någon tråd skulle ligga i fel
forum eller om det inte håller sig till <a href=regler.asp>reglerna</a> så ber vi dig
rapportera det till någon av moderatorerna. För att skapa ett nytt ämne, scrolla längst
ner på sidan och klicka på "Skapa ny tråd".<br>
Håll forumet snyggt!<br>
Det är för närvarande <b><%=rs1.Fields(0) %></b> inlägg i forumet.
<br><br>
<!-- Skriv html/asp nedan -->
<%
sql = "Select * From add_forum WHERE orginal = 'Ja' AND forum_val = '" & request.querystring("forum") & "' ORDER BY datum DESC"
sql2 = "select * from medlemmar where moderator = 'Ja'"
set rs = Databas.execute(sql)
set rs2 = Databas.execute(sql2)
response.write "<table width=370 cellspacing=3><tr><td width=200><b>Rubrik:</b></td><td width=50><b>Skribent:</b></td><td width=120><b>Datum:</b></td></tr></table>"
DO UNTIL rs.EOF
if bgcolor="#FFFFFF" then
bgcolor="#EFEFEF"
else
bgcolor="#FFFFFF"
end if
response.write "<table width=370 cellspacing=3 bgcolor="& bgcolor &" valign=top><tr><td width=200><a href=read.asp?id="& rs("id") &"&forum=" & request.querystring("forum") & ">"& rs("rubrik") &"</td><td width=50>"& rs("anvandarnamn") &"</td>" &_
"<td width=120>"& FormatDateTime(rs("datum"), 1) &"</td></tr></table>"
rs.movenext
loop
%>
<br>
<table width=370><tr><td>
<hr size=1 color=1 width=370>
<a href="new.asp?forum=<%=request.querystring("forum")%>">Skapa ny tråd</a> | <a href=sok.asp>Sök</a> | <a href=forum_val.asp>Välj forum</a><br><br>
<b>
Moderator inom detta forum:
<%
do until rs2.eof
response.write "<font color=green>"& rs2("anvandarnamn") &"</font> "
rs2.movenext
loop
%>
</b>
</td></tr></table>
<%
rs.CLOSE
Databas.CLOSE
Set rs = nothing
Set Databas = nothing
%>
vore väldigt sjysst om någon skulle vilja kolla på detta hur jag ska gå till väga....
jag antar att man får jämföra med två olika datum...??? datumet då personen loggade in senast ligger i tabellen medlemmar, fältnamn: datum_nytt2, och datumet för när tråden skapades ligger i add_forum, fältnamn: datum...
