snitz forum

[weppos]

sql += "SELECT TOP 5* FROM snitz_forum";
sql += "FORUM_MESS.Intestazione_ID, ";
sql += "FORUM_MESS.Data, ";
sql += "FORUM_MESS.Oggetto, ";
sql += "FORUM_MESS.Risposte, ";

E' la query che non capisco.
La tabella è snitz_forum o FORUM_MESS ?

[giangarotto]

ho fatto qualche errore, ma la tabella è FORUM_MESS

[weppos]

Originariamente inviato da giangarotto
ho fatto qualche errore, ma la tabella è FORUM_MESS

Allora

sql = "SELECT TOP 5* FROM FORUM_MESS"

[giangarotto]

Ho fatto questo

<%
strConnString = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" &
Server.MapPath("/mdb-database/snitz_forum.mdb")
function getlast_topics(numdays)
set tConn= Server.CreateObject("ADODB.Connection")
tConn.Open ConnString
strSql = "SELECT TOP "&numdays&" T_AUTHOR,T_LAST_POST,ys&" T_AUTHOR,T_LAST_POST,T_LAST_POSTER,T_DATE,
T_SUBJECT,TOPIC_ID,FORUM_ID,CAT_ID from FORUM_TOPICS order by T_LAST_POST
DESC"
CColor=strForumCellColor
set rss = tConn.Execute (strSql)
do until rss.eof
tID=rss("TOPIC_ID")
tPOSTER=rss("T_LAST_POSTER")
tDATE=rss("T_DATE")
tSUBJECT=rss("T_SUBJECT")
strlast =strlast&"<tr><td onMouseOver=""this.style.background='#00FF7F';""
onMouseOut=""this.style.background='#AFEEEE';"" style=""cursor: hand""
bgcolor=""#AFEEEE""
onClick=""parent.window.location.href='/forum/link.asp?TOPIC_ID="&tID&"'""
height=""18"" class=""button"">" &vbcrlf
strlast =strlast&"<div align=""left"" class=""button (unavailable)""><font
face=""Veranda, Arial, Helvetica, san-serif"" size=""1"">"&tSUBJECT&"</font></div>"&vbcrlf
strlast =strlast&"</td></tr>"&vbcrlf
rss.movenext
loop
rss.close
set rss=nothing
tConn.close
set tConn=nothing
getlast_topics=strlast
end function
%>


e con questo li richiamo

<table width="110%" cellspacing="2" cellpadding="0" border="0"
bgcolor="#0000FF">
<% =getlast_topics(5) %>
</table>


ma non funzione

[giangarotto]

Ciao come vedi, purtroppo per te ( weppos ), mi rifaccio vivo.
Ho risolto, però ho un altro problema le discussioni vengono visualizzate nella home, ma visto che il forum è in un frame quando clicco sul link, non si apre nel frame.
Scusami della non chiarezza

<%
ConnString = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & Server.MapPath("/mdb-database/snitz_forum.mdb")
function getlast_topics(numdays)
set tConn= Server.CreateObject("ADODB.Connection")
tConn.Open ConnString

strSql = "SELECT TOP "&numdays&" T_AUTHOR,T_LAST_POST,T_LAST_POSTER,T_DATE,T_SUBJECT,TOPIC_ID,FORUM_ID,CAT_ID from FORUM_TOPICS order by T_LAST_POST DESC"
CColor=strForumCellColor
set rss = tConn.Execute (strSql)

do until rss.eof
tFORUMID=rss("FORUM_ID")
if tFORUMID <> "6" then 
tID=rss("TOPIC_ID")
tPOSTER=rss("T_LAST_POSTER")
tDATE=rss("T_DATE")
tSUBJECT=rss("T_SUBJECT")
strlast =strlast&"<tr><td width=""100%"">&nbsp" &nbsp &"<font size=""2"" face=""Arial""><a class=stile10 href=""/f/link.asp?TOPIC_ID="&tID &"""</a>"&tSUBJECT&"</font></td></tr>"&vbcrlf
End if

rss.movenext
loop

rss.close
set rss=nothing
tConn.close
set tConn=nothing
getlast_topics=strlast
end function
%>

Come si far in modo di fr aprire le discussioni nella home page, nel frame dov'è il forum

[weppos]

Originariamente inviato da giangarotto
Come si far in modo di fr aprire le discussioni nella home page, nel frame dov'è il forum

Piazza lo script nella pagina del frame dove ti interessa venga eseguita.