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

 All Forums
 Help Groups for Snitz Forums 2000 Users
 Help: MOD Implementation
 Mod error (User Fields MOD		  New Topic  Topic Locked
 Printer Friendly
Author Previous Topic Topic Next Topic  

Warchild
Starting Member

USA
46 Posts
Posted - 03 April 2001 :  15:08:28  Show Profile  Visit Warchild's Homepage  Send Warchild an ICQ Message
Updating Forum Values..
DELETE FROM FORUM_MODS WHERE (M_NAME = 'HModEnable' AND M_CODE = 'UserFields')
13 | Type mismatch

Any suggestions?

www.bitterreign.com/forum

Warchild
Starting Member

USA
46 Posts
Posted - 03 April 2001 :  15:24:27  Show Profile  Visit Warchild's Homepage  Send Warchild an ICQ Message
Great!

Now what ever that was screwed up the whole forum..

ARGHHH
Go to Top of Page

Warchild
Starting Member

USA
46 Posts
Posted - 03 April 2001 :  16:09:57  Show Profile  Visit Warchild's Homepage  Send Warchild an ICQ Message
Okay fixed it...

but now i am getting this error

Microsoft VBScript compilation error '800a0401'

Expected end of statement

/forum/pop_profile.asp, line 484

"<b><font face=""" & strDefaultFontFace & """ size=""" & strDefaultFontSize """ color=""" & strHeadFontColor & """>"
----------------------------------------------------------------------------^


+++This is the section of code in question++
'Rem User Field Code #######################################
if (intUserFields = 1 ) then
Response.write "<tr>" &_
"<td align=center bgcolor=""" & strCategoryCellColor & """ colspan=""2"">" &_
"<b><font face=""" & strDefaultFontFace & """ size=""" & strDefaultFontSize """ color=""" & strHeadFontColor & """>"
"More About Me</font></b></td>"
Response.write "</tr>" &_
"<tr><td></td></tr>"
set rs2 = My_Conn.Execute("SELECT * FROM " & strMemberTablePrefix & "USERFIELDS ORDER BY USR_FIELD_ID")
do until rs2.EOF
Response.Write ("<tr><td valign=""top"" width=150 align=""right"" bgColor=" &strPopUpTableColor & "> <b><font face=""" & strDefaultFontFace & """ size=" & strDefaultFontSize & ">" & rs2("USR_LABEL") & ":</font></b></td>")
if rs2("USR_FIELDTYPE") = "C" then
Response.write "<td valign=""top"" bgColor=""" & strPopUpTableColor & """>" &_
"<font face=""" & strDefaultFontFace & """ size=""" & strDefaultFontSize """ >"
if getUserFieldValue(rs2("USR_FIELD_ID"),RS("MEMBER_ID")) = "1" then
response.write "Yes"
Else
response.write "No"
End If
response.write "</font></td>"
Else
response.write "<td valign=""top"" bgColor=""" & strPopUpTableColor & """>" &_
"<font face=""" & strDefaultFontFace & """ size=""" & strDefaultFontSize """ >" & getUserFieldValue(rs2("USR_FIELD_ID"),RS("MEMBER_ID")) & "</font></td>"
End If
Respone.write "</tr>"
rs2.MoveNext
loop
rs2.Close
end if
'Rem User Field Code #######################################

++From the readme file directly++

Help?!
Go to Top of Page

Warchild
Starting Member

USA
46 Posts
Posted - 03 April 2001 :  16:53:10  Show Profile  Visit Warchild's Homepage  Send Warchild an ICQ Message
Okay, after mucho hunting and poking around in the code I found the problem...

sorry about all that.... please close/delete this topic, thanks

For others having the same problem.. don't bother trying to edit pop_profile.asp and inc_profile.asp..

Just use the ones Huwr supplied

Great Mod as usual Big H
Go to Top of Page
  Previous Topic Topic Next Topic  
 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.23 seconds. Powered By: Snitz Forums 2000 Version 3.4.07