Installazione icona
Installazione Icone
Installare la seguente icona (nome send.gif) comporta inogni pagina due operazioni, ovvero l'inserimento delcodice in due parti.
I riferimenti in queste pagine e i numeri delle righe sono inbase alle pagine scaricate da questa sezione.
Pagina active.asp
Alla riga 53, dopo il seguente codice:
<!--#INCLUDE FILE="config.asp" --><!--#INCLUDE FILE="inc_functions.asp" -->
inserire il codice javascript che permette di aprire lafinestra per inviare il messaggio:
<script>function open_window(url){mywin = window.open(url,"window" ,'toolbar=0,location=0, directories=0,status=0,menubar=0, scrollbars=1,resizable=1,width=540,height=320');}</script>
Infine si deve inserire l'icona a fianco ad ogni utenteper inviargli il messaggio, alla riga 297, ovvero a fianco alcodice:
<td bgcolor="<% =strForumCellColor %>" valign="center" align="center"><font face="<% =strDefaultFontFace %>" size="<% =strDefaultFontSize %>" color="<% =strForumFontColor %>"><% =ChkString(rs("M_NAME"),"display") %></font>
Inserire il seguente codice:
<br><a href="javascript:open_window('messenger_invia.asp?nome=<%=rs("M_NAME")%>')"><img src="images/send.gif" border=0 hspace="0" alt="Scrivi Un Messaggio Privato"></a>
Questo codice, per una migliore comprensione, deve essereseguito da </td> che è già presente nellapagina.
Come notiamo l'icona send.gif si trova nella cartellaimages e quindi attenzione: non mettere l'immaginesend.gif nella cartella principale del forum, ma nellasottocartella images.
Pagina members.asp
Lo stesso codice analizzato prima, quellojavascript,
<script>function open_window(url){mywin = window.open(url,"window" ,'toolbar=0,location=0,directories=0, status=0,menubar=0,scrollbars=1,resizable=1, width=540,height=320');}</script>
va inserito alla riga 54, dopo il seguente codice:
<!--#INCLUDE FILE="config.asp" --><!--#INCLUDE FILE="inc_functions.asp" --><!--#INCLUDE FILE="inc_top.asp" -->
Mentre il codice per visualizzare l'icona... questo:
<br><a href="javascript:open_window('messenger_invia.asp?nome=<%=rs("M_NAME")%>')"><img src="images/send.gif" border=0 hspace="0" alt="Scrivi Un Messaggio Privato"></a>
va inserito alla riga 236 dopo il codice:
<img src="images/icon_profile.gif" alt="Visualizza profilo" height=15 width=15 border=0 hspace="0"><%end if%>
e prima del codice:
<% if strICQ = "1" and Trim(rs("M_ICQ")) <> "" then %>
Pagina topic.asp
Inserire il codice javascript alla riga 58 dopo ilcodice:
<!--#INCLUDE FILE="config.asp" --><!--#INCLUDE FILE="inc_functions.asp" -->
Mentre il codice per visualizzare l'icona va inseritoalla riga 345 dopo la riga di codice:
<td bgcolor="<% =CColor %>" <% if (AdminAllowed = 1) then %>colspan="3" valign="top" <% else %>colspan="2" <% end if %>><img src="images/icon_posticon.gif" border="0" hspace="3"><font color="<% =strForumFontColor %>" face="<% =strDefaultFontFace %>" size="<% =strFooterFontSize %>">Inserito il - <% =ChkDate(rs("R_DATE")) %> : <% =ChkTime(rs("R_DATE")) %></font>
e prima del codice:
<% if strUseExtendedProfile then %>
Pagina forum.asp
Inserire il codice javascript alla riga 58 dopo ilcodice:
<!--#INCLUDE FILE="config.asp" --><!--#INCLUDE FILE="inc_functions.asp" -->
e il codice per visualizzare l'email alla riga 311 dopoil codice:
<td bgcolor="<% =strForumCellColor %>" valign="center" align="center"><font face="<% =strDefaultFontFace %>" size="<% =strDefaultFontSize %>" color="<% =strForumFontColor %>"><% =ChkString(rs("M_NAME"),"display") %></font>
e prima del codice:
</td><td bgcolor="<% =strForumCellColor %>" valign="center" align="center"><font face="<% =strDefaultFontFace %>" size="<% =strDefaultFontSize %>" color="<% =strForumFontColor %>"><% =rs("T_REPLIES") %></font></td>