This MOD adds a MySpace icon just like AIM. This is a beta version and my first MOD, so any suggestions would be helpful.
This is version .99b (beta) Updated version .99-2b (beta)
(Updated on January 27, 2008, thanks to Sean Sounds for bug report)

Click Here to download

Lon<

Thank you Lon for your contribution!
I am looking forward to seeing how it works!
Cheers,

Etymon
<

Hello Lon. Your instructions lists the pop_messengers.asp file as one that needs to be modified but you gave no instructions for this file. Was this file thrown in by accident or should there be instructions. Looking forward to installing this. <

Works great.
Installed on Snitz 3.4.03 and 3.4.06 with MSSQL

All Admin section changes working fine

• Members Detail Configuration Page ok
• Members List Displays Icon ok
• MySpace Field In User's Profile ok
• MySpace Icon Displays On Posts ok

Cleaned the icon_myspace.jpg file up a little to work with my black background.
Only one thing I noticed for the topic.asp instructions.
Missing 2 "End If" statements I added below in red.
------------look for this at line 636:


if strYAHOO = "1" then
if Trim(Reply_MemberYAHOO) <> "" then
Response.Write "  <a href=""http://edit.yahoo.com/config/send_webmesg?.target=" & ChkString(Reply_MemberYAHOO, "urlpath") & "&.src=pg"" target=""_blank"">" & getCurrentIcon(strIconYahoo,"Send " & ChkString(Reply_MemberName,"display") & " a Yahoo! Message","align=""absmiddle"" hspace=""6""") & "</a>" & vbNewLine
end if
end if



-----------add this below:



if strMYSPACE = "1" then
if Trim(Reply_MemberMYSPACE) <> "" then
Response.Write "  <a href=""JavaScript:var newWin=window.open('http://www.myspace.com/" & Reply_MemberMYSPACE & "')"">" & getCurrentIcon(strIconMYSPACE,"myspace" & "","align=""absmiddle"" hspace=""6""") & "</a>" & vbNewLine
end if
end if


------------look for this at line 844:


if (strYAHOO = "1") then
if Trim(Member_YAHOO) <> "" then
Response.Write "  <a href=""http://edit.yahoo.com/config/send_webmesg?.target=" & ChkString(Member_YAHOO, "urlpath") & "&.src=pg"" target=""_blank"">" & getCurrentIcon(strIconYahoo,"Send " & ChkString(Member_Name,"display") & " a Yahoo! Message","align=""absmiddle"" hspace=""6""") & "</a>" & vbNewLine
end if
end if

-----------add this below:

if (strMYSPACE = "1") then
if Trim(Member_MYSPACE) <> "" then
Response.Write "  <a href=""JavaScript:var newWin=window.open('http://www.myspace.com/" & Member_MYSPACE & "')"">" & getCurrentIcon(strIconMYSPACE,"myspace" & "","align=""absmiddle"" hspace=""6""") & "</a>" & vbNewLine
end if
end if
Great Mod Lon. Create my first MySpace page just last week so this was right on time. Thanks. <

Thanks Sean Sounds for the great feedback. I have made the changed to the instructions in the download.

If anyone has a clean install, please let me know if the line numbers should be changed.

Lon<

Great mod. Just here to point out its further potential though incase anyone else has similar things running in their sites/forums.

When im finished the rest of my site [lot to go lol] members can have their own pages with a lot of their own stuff on and info on all content etc contributed in site. articles, blogs, social networking stuff, etc. Too much to list but a community area really...come their own home page in site.
This mod will work great for linking people straight to their insite space just by changing the urls and icon etc. These links were not going to be half as prominant as they will be using this mod.[^]<