Ciao ragazzi ho una domanda
ho questo listato che preleva i primi 400 caratteri di un db.
la mia domanda e' questa. vorrei che inserendo un codice html all'interno del listato che deve leggere lo script, venga visualizzato come html e non come testo... ovvero se metto una stringa html per inserimento immagine, vorrei che si visualizzasse l'immagine e non il testo tipo <img....... etc....
qualcuno sa dirmi come posso fare??
grazie ciauzzzz
<%
intPop = 1
strJOTW = cInt(strJokeOfTheWeek)
' mysql mod begin
If strDBType = "mysql" Then ' mysql mod
strSQL = "SELECT ARTICLE_ID, TITLE, HIT, mSHOW, SUMMARY, POST_DATE FROM ARTICLE WHERE mSHOW = 1 AND ARTICLE_ID <>" & strJOTW & " ORDER BY HIT DESC, POST_DATE DESC LIMIT 0," & intPop & ";" ' mysql mod
else ' mysql mod
strSQL = "SELECT TOP " & intPop & " ARTICLE_ID, TITLE, content, HIT, SHOW, SUMMARY, POST_DATE FROM ARTICLE WHERE SHOW = 1 AND ARTICLE_ID <>" & strJOTW & " ORDER BY POST_DATE DESC"
end if ' mysql mod
set rsPop = my_Conn.Execute (strSql)
if rsPop.EOF then%>
<tr>
<td width="100%" valign="top" bgcolor="#00000"><font face="Verdana, Arial, Helvetica, sans-serif" size="1" color="#000000">No
Articles Found!</font></td>
</tr>
<font color="#000000" size="1" face="Verdana, Arial, Helvetica, sans-serif">
<%else
Do While Not rsPop.EOF
strArticleTitle = rsPop("content")
strSummary = rsPop("Summary")
if len(strArticleTitle ) > 400 then
strArticleTitle = Left(strArticleTitle , 400) & " ..continua >>>>>>>>"
else
strArticleTitle = strArticleTitle
end if
intArticleID = rsPop("Article_ID")
strPostDate = strtodate(rsPop("POST_DATE"))
dateSince = DateDiff("d", strForumTimeAdjust, strPostDate)+7
Call DisplayArticle()
rsPop.MoveNext
Loop
end if
rsPop.Close
Set rsPop= Nothing
sub displayArticle
%>
</font>
</table>
<tr>
<td width="100%" valign="top"><img src=icon_star_orange.gif>
<font face="Verdana, Arial, Helvetica, sans-serif" size="1" color="#000000">
</font></td>
</tr>
![]()