Snitz Forums 2000
Snitz Forums 2000
Home | Profile | Register | Active Topics | Members | Search | FAQ
Username:
Password:
Save Password
Forgot your Password?

 All Forums
 Snitz Forums 2000 MOD-Group
 MOD Add-On Forum (W/Code)
 MOD: Avatar MOD (version 1.0)
 New Topic  Topic Locked
 Printer Friendly
Previous Page | Next Page
Author Previous Topic Topic Next Topic
Page: of 7

RichardKinser
Snitz Forums Admin

USA
16655 Posts

Posted - 05 March 2001 :  05:46:00  Show Profile
I resent the e-mail.
Go to Top of Page

rick7165
Senior Member

USA
1094 Posts

Posted - 05 March 2001 :  06:04:48  Show Profile  Visit rick7165's Homepage
ok.. uploaded on test site. Something is wrong tho.. After that Addon Mod of Rob's I can't get
into the registration of the site anymore.. It's locking up my servers and eating up 1 gig of ram

I've restored the files back to normal before I did the mod... Don't use the test site... until
I found out why that addon is crashing it... everytime I crashes I loose 150 web sites and over
1,000 users.. so I'm taking down Eastpasco until I find what's doing this from that code.




Test Site
www.eastpasco.com
Running on HuwR's SR4 release. Colors and Graphic scheme done by Richard Kinser.

Edited by - rick7165 on 05 March 2001 06:11:27
Go to Top of Page

rick7165
Senior Member

USA
1094 Posts

Posted - 05 March 2001 :  07:14:29  Show Profile  Visit rick7165's Homepage
Ok... Eastpasco is down for now, but I've got it running on another site...

The private avatars work Great, but now if you go register there are None
to pick from, but when I go manage the Avatars they show up in there.


Rick


Test Site
www.eastpasco.com
Running on HuwR's SR4 release. Colors and Graphic scheme done by Richard Kinser.
Go to Top of Page

Rob Poretti
Junior Member

Canada
435 Posts

Posted - 05 March 2001 :  08:05:44  Show Profile  Visit Rob Poretti's Homepage
Hi guys,

My flight to DC was canelled this mornin' 'cause of weather so... I'm back in the office until this afternoon...

Wow, Rick... I'm really sorry you had problems with my code... I can't understand what would cause this and I'm looking into right now... terribly sorry...

As soon as I find out anything, I'll post...

Bye for now...

Rob



Edited by - Rob Poretti on 05 March 2001 08:06:25
Go to Top of Page

rick7165
Senior Member

USA
1094 Posts

Posted - 05 March 2001 :  08:09:35  Show Profile  Visit rick7165's Homepage
No Problem Rob... It's not your fault. I even did a backup of the files.. then restored them and still
not working. Not sure what has happened, but I'm going to republish the site later
for some reason I can't get past the policy.asp file.. It just crashes

Test Site
www.eastpasco.com
Running on HuwR's SR4 release. Colors and Graphic scheme done by Richard Kinser.
Go to Top of Page

Rob Poretti
Junior Member

Canada
435 Posts

Posted - 05 March 2001 :  09:01:22  Show Profile  Visit Rob Poretti's Homepage
Hi Rick,

First I have to say again that I'm sorry for your trouble...

I'm stumped as to what the problem might be... escpecially the way it manifests itself... (memory problem)

Would you email me your pop_profile.asp file so I can look at it? It's either the place where the code was inserted or a problem between sr2 and sr4 that I couldn't forsee.

Has anyone else tried to implement my "enhancement"? (I feel weird calling it that!)

Cheers!

Rob



Go to Top of Page

Rob Poretti
Junior Member

Canada
435 Posts

Posted - 05 March 2001 :  09:15:34  Show Profile  Visit Rob Poretti's Homepage
A couple of of other little enhancements that I didn't post earlier...

To see Avatars in the Members Profile ("display" mode of the pop_profile.asp file)

Once again: THIS IS SR2 CODE BEWARE! (Richard, if you have a moment, please look at this for sr4 purposes.)

Look for this code under the "display" mode of the pop_profile.asp file (around line 300):


<% if strPicture = "1" then %>
<tr>
<td align="center" bgcolor="<% =strCategoryCellColor %>" colspan="2"><b><font face="<% =strDefaultFontFace %>" size="<% =strDefaultFontSize %>" color="<% =strHeadFontColor %>"> My Picture </font></b></td>
</tr>
<tr>
<td align="center" colspan="2">
<% if Trim(rs("M_PHOTO_URL")) <> "" and lcase(rs("M_PHOTO_URL")) <> "http://" then %>
<a href="<% =rs("M_PHOTO_URL") %>"><img src="<% =rs("M_PHOTO_URL") %>" alt="<% =rs("M_NAME") %>" width="150" height="150" border="0" hspace="2" vspace="2"></a><br><font face="<% =strDefaultFontFace %>" size="<% =strDefaultFontSize %>">Click image for full pic</font>
<% else %>
<img src="no_photo.gif" alt="No Photo Available" width="150" height="150" border="0" hspace="2" vspace="2"></a>
<% end if %>
</td>
</tr>
<% end if ' strPicture %>


ADD THIS RIGHT AFTER - REVISED VERSION!!! - :

<% ' AVATAR MOD ENHANCEMENT //////////////////////////////////
if ISNULL(strAvatar) or strAvatar = "" or strAvatar = "noavatar.gif" then
' do nothing %>
<% else %>
<tr>
<td align="center" bgcolor="<% =strCategoryCellColor %>" colspan="2"><b><font face="<% =strDefaultFontFace %>" size="<% =strDefaultFontSize %>" color="<% =strHeadFontColor %>"> My Avatar </font></b>
   <a href="JavaScript:openWindow3('pop_avatarlegend.asp')"><img src="icon_smile_question.gif" border="0"></td>
</tr>
<tr>
<td align="center" colspan="2">
<% if Trim(rs("M_AVATAR_URL")) <> "" and lcase(rs("M_AVATAR_URL")) <> "http://" then %>
<a href="<% =rs("M_AVATAR_URL") %>"><img src="<% =rs("M_AVATAR_URL") %>" alt="<% =rs("M_NAME") %>" width="72" height="96" border="0" hspace="2" vspace="2"></a><br><font face="<% =strDefaultFontFace %>" size="<% =strDefaultFontSize %>">Click image for full pic</font>
<% else %>
<img src="no_photo.gif" alt="No Avatar Assigned" width="150" height="150" border="0" hspace="2" vspace="2"></a>
<% end if %>
</td>
</tr>
<% end if
' AVATAR MOD ENHANCEMENT //////////////////////////////////%>


ONE other IMPORTANT change for pop_profile.asp. First, the recordset for the display mode has has to include the Avatar URL. Then the test for displaying the Avatar or not, is checking strAvatar. So this string has to be set sometime after the recordset is created. I put it where some other string variables are set...

Look for this code around line 215 and add the lines "commented" as AVATAR ENHANCEMENT:

case "display" '## Display Profile

'## Forum_SQL
strSql = "SELECT " & strMemberTablePrefix & "MEMBERS.MEMBER_ID, " & strMemberTablePrefix & "MEMBERS.M_NAME "
strSql = strSql & ", " & strMemberTablePrefix & "MEMBERS.M_USERNAME, " & strMemberTablePrefix & "MEMBERS.M_EMAIL "
strsql = strsql & ", " & strMemberTablePrefix & "MEMBERS.M_FIRSTNAME, " & strMemberTablePrefix & "MEMBERS.M_LASTNAME "
strSql = strSql & ", " & strMemberTablePrefix & "MEMBERS.M_TITLE"
strSql = strSql & ", " & strMemberTablePrefix & "MEMBERS.M_CUSTOMER_ID"
strSql = strSql & ", " & strMemberTablePrefix & "MEMBERS.M_PASSWORD"
strSql = strSql & ", " & strMemberTablePrefix & "MEMBERS.M_ICQ"
strSql = strSql & ", " & strMemberTablePrefix & "MEMBERS.M_YAHOO"
strSql = strSql & ", " & strMemberTablePrefix & "MEMBERS.M_AIM"
strSql = strSql & ", " & strMemberTablePrefix & "MEMBERS.M_COUNTRY "
strSql = strSql & ", " & strMemberTablePrefix & "MEMBERS.M_POSTS"
strsql = strsql & ", " & strMemberTablePrefix & "MEMBERS.M_CITY "
strsql = strsql & ", " & strMemberTablePrefix & "MEMBERS.M_STATE "
strsql = strsql & ", " & strMemberTablePrefix & "MEMBERS.M_COUNTRY "
strsql = strsql & ", " & strMemberTablePrefix & "MEMBERS.M_AVATAR_URL" ' ADD THIS FOR AVATAR ENHANCEMENT!!! //////////
strsql = strsql & ", " & strMemberTablePrefix & "MEMBERS.M_POSTS "
strsql = strsql & ", " & strMemberTablePrefix & "MEMBERS.M_HIDE_EMAIL "
strsql = strsql & ", " & strMemberTablePrefix & "MEMBERS.M_DATE "
strsql = strsql & ", " & strMemberTablePrefix & "MEMBERS.M_PHOTO_URL "
strSql = strSql & ", " & strMemberTablePrefix & "MEMBERS.M_HOMEPAGE"
strsql = strsql & ", " & strMemberTablePrefix & "MEMBERS.M_LINK1, " & strMemberTablePrefix & "MEMBERS.M_LINK2 "
strsql = strsql & ", " & strMemberTablePrefix & "MEMBERS.M_AGE, " & strMemberTablePrefix & "MEMBERS.M_MARSTATUS "
strsql = strsql & ", " & strMemberTablePrefix & "MEMBERS.M_SEX, " & strMemberTablePrefix & "MEMBERS.M_OCCUPATION "
strSql = strSql & ", " & strMemberTablePrefix & "MEMBERS.M_SIG"
strsql = strsql & ", " & strMemberTablePrefix & "MEMBERS.M_HOBBIES, " & strMemberTablePrefix & "MEMBERS.M_LNEWS "
strsql = strsql & ", " & strMemberTablePrefix & "MEMBERS.M_QUOTE, " & strMemberTablePrefix & "MEMBERS.M_BIO "
strSql = strSql & " FROM " & strMemberTablePrefix & "MEMBERS "
strSql = strSql & " WHERE MEMBER_ID=" & Request.QueryString("id")

set rs = my_Conn.Execute(strSql)

strMyHobbies = rs("M_HOBBIES")
strMyLNews = rs("M_LNEWS")
strMyQuote = rs("M_QUOTE")
strMyBio = rs("M_BIO")
strAvatar= rs("M_AVATAR_URL") ' ADD THIS FOR AVATAR ENHANCEMENT!!!!!





Edited by - Rob Poretti on 05 March 2001 10:22:35

Edited by - Rob Poretti on 05 March 2001 10:37:36

Edited by - Rob Poretti on 05 March 2001 10:38:15
Go to Top of Page

rick7165
Senior Member

USA
1094 Posts

Posted - 05 March 2001 :  09:18:09  Show Profile  Visit rick7165's Homepage
Richard...

I got it installed on my test site, But you put in a Avatar you can't go into Register...
but if there are No Avatars installed you can go into Register... This is a good one!!


Rob.. I removed that addon you had.. Richard built a Private Section into his MOD for me..
Just got a few things wrong with it right now...



Test Site
www.eastpasco.com
Running on HuwR's SR4 release. Colors and Graphic scheme done by Richard Kinser.
Go to Top of Page

Rob Poretti
Junior Member

Canada
435 Posts

Posted - 05 March 2001 :  09:30:20  Show Profile  Visit Rob Poretti's Homepage
quote:

No Problem Rob... It's not your fault. I even did a backup of the files.. then restored them and still
not working. Not sure what has happened, but I'm going to republish the site later
for some reason I can't get past the policy.asp file.. It just crashes

Test Site
www.eastpasco.com
Running on HuwR's SR4 release. Colors and Graphic scheme done by Richard Kinser.




Hmmm... there is something else going on...

I just checked the policy.asp file... there is NOT much going on there.

The standard include files are there (config, inc_top, inc_fucntions). There are NO recordsets created. Just a connection, reading session variables, etc...

It's more like an html page. Perhaps something else has gotten messed-up?

Let me know if I can be of any help...

Rob

Go to Top of Page

Rob Poretti
Junior Member

Canada
435 Posts

Posted - 05 March 2001 :  09:37:02  Show Profile  Visit Rob Poretti's Homepage
Ok...

I just tried to register a new member on mine and it was fine... so it must be an sr4 thing (which is kind of scary actually...)

I'm glad that you're back on line!

Cheers!!!

Rob

Go to Top of Page

Rob Poretti
Junior Member

Canada
435 Posts

Posted - 05 March 2001 :  10:25:22  Show Profile  Visit Rob Poretti's Homepage
Sorry people,

I just found a small problem with the pop_profile change that I posted a few minutes ago. I've fixed it and updated my that particular post - (see " - REVISED - ")

I was not checking for NULLs and "noavatar.gif" -- now I am...

Now the "display" profile will only show an Avatar when one has been assigned.

Cheers!

Rob

Go to Top of Page

Rob Poretti
Junior Member

Canada
435 Posts

Posted - 05 March 2001 :  10:50:20  Show Profile  Visit Rob Poretti's Homepage
Ok, last little enhancement -- this time with the pop_avatarlegend.asp file

This mod displays the member name that has the Avatar assigned to it under each of the Avatars. (or it displays (Available). That way, where ever the pop_avatarlegend is used, you can see who has what avatar. (Of course you can look at posts, but this might be totally impractical...)

In order to do this I had to change the recordset in '## Forum_SQL - Get Avatars from DB to the folllowing:
		'## Forum_SQL - Get Avatars from DB
strSql = "SELECT " & strTablePrefix & "AVATAR.A_ID"
strSql = strSql & ", " & strTablePrefix & "AVATAR.A_URL"
strSql = strSql & ", " & strTablePrefix & "AVATAR.A_NAME"
strSql = strSql & ", " & strTablePrefix & "AVATAR.A_MEMBER_ID"
strSql = strSql & ", " & strTablePrefix & "MEMBERS.M_NAME"
strSql = strSql & " FROM " & strTablePrefix & "MEMBERS RIGHT OUTER JOIN "
strSql = strSql & strTablePrefix & "AVATAR ON "
strSql = strSql & strTablePrefix & "MEMBERS.MEMBER_ID = " & strTablePrefix & "AVATAR.A_MEMBER_ID "
strSql = strSql & " ORDER BY " & strTablePrefix & "AVATAR.A_ID ASC;"


The modify the table that displays the Avatars to this code:

<table border="0" align="center">
<tr>
<td bgcolor="<% =strForumCellColor %>" align="center"><img src="<% =rs("A_URL") %>" height=<% =rsav("A_SIZE") %> width=<% =rsav("A_SIZE")*.75 %> border=<% =rsav("A_BORDER") %>><br>
<font face="<% =strDefaultFontFace %>" size="<% =strFooterFontSize %>" color="<% =strForumFontColor %>"><b><% =rs("A_NAME") %></b></font><br>
<% if rs("M_NAME") <> "" then %>
<font face="<% =strDefaultFontFace %>" size="<% =strFooterFontSize %>" color="<% =strForumFontColor %>">Member Name: <% =rs("M_NAME") %></font></td>
<% else %>
<font face="<% =strDefaultFontFace %>" size="<% =strFooterFontSize %>" color="<% =strForumFontColor %>"><i>(Available)</i></font></td>
<%end if %>
</tr>
</table>


Note: (I have my .75 multiplier in the width size -- remove it if you want.)
More Important Note: This also assumes that you have modified Richards original DB and added A_MEMBER_ID as in an earlier post...








Edited by - Rob Poretti on 05 March 2001 10:52:34

Edited by - Rob Poretti on 05 March 2001 10:54:26
Go to Top of Page

rick7165
Senior Member

USA
1094 Posts

Posted - 05 March 2001 :  11:48:13  Show Profile  Visit rick7165's Homepage
Richard....

I got what's going on...

If you add a Avatar and try to go into a profile or register it locks up my server..
Just eats up the resources. If I go back into admin and remove the avatar then
I can go into profiles and register without a problem...

Let me know what you think.

Thanks,
Rick


Test Site
www.eastpasco.com
Running on HuwR's SR4 release. Colors and Graphic scheme done by Richard Kinser.
Go to Top of Page

RichardKinser
Snitz Forums Admin

USA
16655 Posts

Posted - 05 March 2001 :  15:04:49  Show Profile
rick,

I am not experiencing this problem. I can add avatars and then Register a new person without problem. I have a mix of Avatars that everyone can choose and some that have a owner. The one's that everyone can use show up like they should and the ones that have an owner, only show up for the owner.
Go to Top of Page

RichardKinser
Snitz Forums Admin

USA
16655 Posts

Posted - 05 March 2001 :  15:11:37  Show Profile
rick,

I sent you an e-mail with some files to try out and see if they fix your problem.
Go to Top of Page
Page: of 7 Previous Topic Topic Next Topic  
Previous Page | Next Page
 New Topic  Topic Locked
 Printer Friendly
Jump To:
Snitz Forums 2000 © 2000-2021 Snitz™ Communications Go To Top Of Page
This page was generated in 0.17 seconds. Powered By: Snitz Forums 2000 Version 3.4.07