Author |
Topic |
|
RonTampaBay
New Member
USA
59 Posts |
Posted - 01 October 2003 : 13:43:04
|
Hi - I moved the member_spotlight.asp to my forum folder but have seen no change on my forums page. I do have FrontPage News and Featured Poll activated. Is there any conflict here? |
|
|
richfed
Average Member
United States
999 Posts |
Posted - 01 October 2003 : 18:42:17
|
You'll need to make a change to default.asp, as well. I forget the code on this, but check the Read Me that comes with the Member Spotlight MOD. |
|
|
RonTampaBay
New Member
USA
59 Posts |
Posted - 02 October 2003 : 16:25:16
|
Hi Rich, There was no install doc in the mod download. Just one asp file. Maybe it's corrupted. Anyone have a copy of this doc? |
|
Edited by - RonTampaBay on 02 October 2003 19:04:03 |
|
|
RonTampaBay
New Member
USA
59 Posts |
Posted - 07 October 2003 : 13:25:58
|
Does anyone have this documentation? |
|
|
|
cripto9t
Average Member
USA
881 Posts |
Posted - 08 October 2003 : 08:29:57
|
quote: Originally posted by RonTampaBay
Does anyone have this documentation?
Hi Ron, this readme is not for the original member spotlight it's the member spotlight with avatars. Not much in there, just to use it as an include and it seems to me that I had to use it as an include before it would work. Hope it helps Heres the readme
Read Me for Member Spotlight with Avatars:
1.) You MUST have the Avatar Mod installed. 2.) Just include this file anywhere on your site that you want the spotlight included. You will have to do some readjusting with the tables to make it look like your site, but I found it is a lot easier to use with Avatars than with pics. Most people don't use pictures in the forums.
<!--#INCLUDE FILE="member_spotlight.asp"-->
Maybe something like this, but like it says above you'll probably have to play with the table structure to get it to look right.
Find these lines in "default.asp" near the bottom and add part in red
end if
Response.Write "</td>" & vbNewline
Response.Write " </tr>" & vbNewline
end if ' ##### Added as part of Minimize Category Mod #####
else
blnHiddenForums = true
end if ' ChkDisplayForum()
end if
next '## Next Forum
end if
next '## Next Category
end if
if strShowStatistics = "1" then
WriteStatistics
end if
Response.Write " </table>" & vbNewline & _
" </td>" & vbNewline & _
" </tr>" & vbNewline & _
" <tr>" & vbNewline & _
" <td>" & vbNewline & _
%>
<!--#include file="member_spotlight.asp"-->
<%
" <table width=""100%"">" & vbNewline & _ |
_-/Cripto9t\-_ |
Edited by - cripto9t on 08 October 2003 08:47:08 |
|
|
RonTampaBay
New Member
USA
59 Posts |
Posted - 08 October 2003 : 13:19:30
|
Hi Brian! Thanks for this info. But when I added it - I received the following error, which makes me believe that there is a syntax error in the member_spotlight.asp. Any thoughts?
Microsoft VBScript compilation error '800a0401' Expected end of statement /forum/member_spotlight.asp, line 2 Response.write "<table width=""150"" border=""0"" cellspacing=""0"" cellpadding=""0"" bgcolor=" & strHeadCellColor & ">" & vbCrLf & _ ---------------^
|
|
Edited by - RonTampaBay on 08 October 2003 13:20:16 |
|
|
RonTampaBay
New Member
USA
59 Posts |
Posted - 08 October 2003 : 13:37:05
|
I thought it would be helpful if I added the text of the member_spotlight.asp that I am using.... this relates to the problem in my previous post.
<% Response.write "<table width=""150"" border=""0"" cellspacing=""0"" cellpadding=""0"" bgcolor=" & strHeadCellColor & ">" & vbCrLf & _ " <tr>" & vbCrLf & _ " <td align=""left"" valign=""top"">" & vbCrLf & _ " <table BORDER=""0"" bordercolor=""#000099"" cellspacing=""1"" cellpadding=""0"" width=""100%"">" & vbCrLf & _ " <tr>" & vbCrLf & _ " <td valign=""top"">" & vbCrLf & _ " <table border=""0"" cellspacing=""0"" cellpadding=""0"" width=""100%"">" & vbCrLf & _ " <tr>" & vbCrLf & _ " <td align=""center"" bgcolor=" & strHeadCellColor & ">" & vbCrLf & _ " <table width=""100%"" cellpadding=""2"">" & vbCrLf & _ " <tr>" & vbCrLf & _ " <td valign=""top"" align=""center""><font class=""HeaderFont"">Member Spotlight</font></td>" & vbCrLf & _ " </tr>" & vbCrLf & _ " </table>" & vbCrLf & _ " </td>" & vbCrLf & _ " </tr>" & vbCrLf & _ " <tr>" & vbCrLf & _ " <td bgcolor=" & strForumCellColor & ">" & vbCrLf & _ " <table border=""0"" width=""100%"" cellspacing=""0"" cellpadding=""2"">"
'START MEMBER IN SPOTLITE SCRIPT function MemInSpot set rsMemInSpot = Server.CreateObject("ADODB.Recordset") strSql = "SELECT " & strTablePrefix & "MEMBERS.MEMBER_ID, " & strTablePrefix & "MEMBERS.M_PHOTO_URL, " & strTablePrefix & "MEMBERS.M_NAME, " strSql = strSql & strTablePrefix & "MEMBERS.M_FIRSTNAME, " & strTablePrefix & "MEMBERS.M_LASTNAME, " & strTablePrefix & "MEMBERS.M_AGE" strSql = strSql & " FROM " & strTablePrefix & "MEMBERS" strSql = strSql & " WHERE FORUM_MEMBERS.M_PHOTO_URL <> ''" rsMemInSpot.Open strSql, my_Conn,3,,adCmdText Dim intRnd Randomize Timer intRnd = (Int(RND * rsMemInSpot.RecordCount)) rsMemInSpot.Move intRnd strMemInSpot = rsMemInSpot("M_PHOTO_URL") Response.Write " <tr><td align=center bgcolor=""" & strForumCellColor & """>" & vbCrLf & _ " <a href=""" & strForumURL & "pop_profile.asp?mode=display&id="& rsMemInSpot("member_id") & """><font class=""DefaultFont""><b>" & rsMemInSpot("M_NAME") & "</b></font></A><br>" & vbCrLf if Trim(rsMemInSpot("M_PHOTO_URL")) <> "" and lcase(rsMemInSpot("M_PHOTO_URL")) <> "http://" then if lcase(left(strMemInSpot,7)) = "http://" then Response.write " <a href=" & ChkString(rsMemInSpot("M_PHOTO_URL"), "display")& ">" & vbCrLf & _ " <img src=" & ChkString(rsMemInSpot("M_PHOTO_URL"), "display") & vbCrLf elseif lcase(left(strMemInSpot,7)) <> "http://" then Response.write " <a href=" & strForumURL & "images/" & ChkString(rsMemInSpot("M_PHOTO_URL"), "display")& ">" & vbCrLf & _ " <img src=" & strForumURL & "images/" & ChkString(rsMemInSpot("M_PHOTO_URL"), "display")& vbCrLf end if Response.write " alt=" & ChkString(rsMemInSpot("M_NAME"),"display")& vbCrLf & _ " width=""120"" height=""120"" border=""0"" hspace=""0"" vspace=""4""></a><br>" & vbCrLf else Response.Write " <img src=/forum/no_photo.gif alt=""no photo available"" width=""150"" height=""150"" border=""0"" hspace=""0"" vspace=""4""><br>" & vbCrLf _ end if Response.Write " <a href=""" & strForumURL & "pop_profile.asp?mode=display&id="& rsMemInSpot("member_id") & """><font class=""SmallFont"">" & rsMemInSpot("M_NAME") & "#039;s Profile</font></A><br>" & vbCrLf Response.Write " </td></tr>" rsMemInSpot.Close Set rsMemInSpot = Nothing end function 'END MEMBER IN SPOTLITE SCRIPT
call MemInSpot
Response.Write " </td>" & vbCrLf & _ " </tr>" & vbCrLf & _ " </table>" & vbCrLf & _ " </td>" & vbCrLf & _ " </tr>" & vbCrLf & _ "</table>" & vbCrLf & _ "</td>" & vbCrLf & _ "</tr>" & vbCrLf & _ "</table>" & vbCrLf & _ "</td>" & vbCrLf & _ "</tr>" & vbCrLf & _ "</table>" %>
|
|
|
|
cripto9t
Average Member
USA
881 Posts |
Posted - 09 October 2003 : 08:30:22
|
quote: I received the following error, which makes me believe that there is a syntax error in the member_spotlight.asp. Any thoughts?
Yea my error though Remove the part in red and add the part in green:
end if
if strShowStatistics = "1" then
WriteStatistics
end if
Response.Write " </table>" & vbNewline & _
" </td>" & vbNewline & _
" </tr>" & vbNewline & _
" <tr>" & vbNewline & _
" <td>" & vbNewline & _
%>
<!--#include file="member_spotlight.asp"-->
<%
Response.Write " </td></tr>" & vbNewLine & _
" <tr><td>" & vbNewLine & _
" <table width=""100%"">" & vbNewline & _
Sorry about that . I hope this fixes it for you Again This is just thrown in there, you will have to decide where you think it looks best. |
_-/Cripto9t\-_ |
Edited by - cripto9t on 09 October 2003 08:44:47 |
|
|
RonTampaBay
New Member
USA
59 Posts |
Posted - 09 October 2003 : 09:05:08
|
Hi Brian -
Thanks, That worked!!!! I really appreciate all your help!!!
One final question... it is on the bottom left of the page. What lines of code do I tweak to adjust the vertical/horizontal position on the page?
Thanks! You have been a great help! |
|
Edited by - RonTampaBay on 09 October 2003 13:21:27 |
|
|
Gremlin
General Help Moderator
New Zealand
7528 Posts |
Posted - 09 October 2003 : 23:33:52
|
Just play with the TD tag above it Ron,
" <td>" & vbNewline & _
For instance <td align=""center""> should hopefully centre it on the page, if you want it to appear higher then you'll actually need to change the positioning within the code of the <!--#include line. |
Kiwihosting.Net - The Forum Hosting Specialists
|
|
|
RonTampaBay
New Member
USA
59 Posts |
Posted - 11 October 2003 : 00:31:10
|
Thanks Brangwyn!! |
|
|
|
Gremlin
General Help Moderator
New Zealand
7528 Posts |
Posted - 11 October 2003 : 02:04:59
|
Your welcome :) If you need a hand editing/changing it just flick me an email. |
Kiwihosting.Net - The Forum Hosting Specialists
|
|
|
|
Topic |
|