This will add an icon in your topics page that will allow you to add a forum memeber directly to your ICQ list.
I'm not sure if there is already a mod out there so here it is.
Demo:http://www21.brinkster.com/pionzone/forum/topic.asp?TOPIC_ID=4&FORUM_ID=2&CAT_ID=1&Topic_Title=Add ICQ user mod&Forum_Title=Mods
Snag this icon to use:
Here are the text instructions if you prefer to download them.
http://www.pionzone.com/snitz/mods/Add_ICQ_user/Add_ICQ_user.txt
version 3.1 sr4
Add ICQ user from topic page
Add the graphic icon_add_icq.gif to your forum directory
######################################
# Approximately line #354 of Topic.asp
######################################
Find this line of code:
<a href="JavaScript:openWindow('pop_messengers.asp?mode=ICQ&ICQ=<% =ChkString(rs("M_ICQ"), "JSurlpath") %>&M_NAME=<% =ChkString(rs("M_NAME"),"JSurlpath") %>')"><img src="http://online.mirabilis.com/scripts/online.dll?icq=<% =ChkString(rs("M_ICQ"), "urlpath") %>&img=5" height=15 width=15 alt="Send <% = ChkString(rs("M_NAME"),"display") %> an ICQ Message" border="0" align="absmiddle" hspace="6"></a>
Directly below it add this line:
<a href="http://wwp.icq.com/scripts/search.dll?to=<% =ChkString(rs("M_ICQ"), "JSurlpath") %>"><img src="icon_icq_add.gif" height=16 width=16 alt="Add <% = ChkString(rs("M_NAME"),"display") %>" border="0" align="absmiddle" hspace="6"></a>
######################################
# Approximately line #506 of Topic.asp
######################################
Find this line of code:
<a href="JavaScript:openWindow('pop_messengers.asp?mode=ICQ&ICQ=<% =ChkString(rs("M_ICQ"), "JSurlpath") %>&M_NAME=<% =ChkString(rs("M_NAME"), "JSurlpath") %>')"><img src="http://online.mirabilis.com/scripts/online.dll?icq=<% =ChkString(rs("M_ICQ"), "urlpath") %>&img=5" height=15 width=15 alt="Send <% =ChkString(rs("M_NAME"),"display") %> an ICQ Message" border="0" align="absmiddle" hspace="6"></a>
Directly below it add this line:
<a href="http://wwp.icq.com/scripts/search.dll?to=<% =ChkString(rs("M_ICQ"), "JSurlpath") %>"><img src="icon_icq_add.gif" height=16 width=16 alt="Add <% = ChkString(rs("M_NAME"),"display") %>" border="0" align="absmiddle" hspace="6"></a>
Edited by - mvaughn on 27 May 2001 02:21:22
Topic Locked
Posted - 26 May 2001 : 15:24:30
