| Author |
 Topic  |
|
richfed
Average Member
United States
999 Posts |
 Posted - 15 September 2002 : 11:16:23
|
Attempted to implement the Message Icon Mod last evening ... I encountered no installation errors, that I was aware of, which surprised me, because I couldn't simply cut & paste the code, because it was "entangled" with previously installed Poll & Sticky Topic mods ... so, I had to try and do some editing on my own ... always a dangerous proposition ...
Anyway, all appeared to be well ... as I say, no error messages, the icons appeared nicely, etc. The only weird thing was that on forum.asp the links to topics appeared, as normal, however, just next to that would be a plain text repetition of the topic name ... ???? ... So, I reverted to my old forum.asp, figuring to look that over again this AM [still can't find my error, by the way]. Meanwhile, the rest of the mod appeared to be ok. Folks posted [all replies, it turned out] without any problem.
This AM, I attempted to post a new topic ... received this error:
quote:
Microsoft JET Database error '80040e14'
Number of query values and destination fields are not the same.
/messageboard/post_info.asp, line 793
So, obviously, my editing left a lot to be desired  ... Can anyone assist me on this? I've since reverted all the MI-modded files back to their previous state, and all is working fine ... just, of course, no message icons!
MOHICAN BOARD |
Rich
[size=1]A Complete Idiot's Guide to MOD Implementation || On the Trail of the Last of the Mohicans[/size=1] |
|
|
Messick
Starting Member
USA
25 Posts |
Posted - 15 September 2002 : 16:52:42
|
I had the same problem...
I also had the same mods you discribed.
I worked with it for a few hours, but didn't get any were... I gave up. Maybe thoughs mods are not compatible with it?
Sorry I know thats not any help. |
 |
|
|
masterao
Senior Member
Sweden
1678 Posts |
Posted - 15 September 2002 : 19:11:54
|
Richfed,
Put a response.write strSql on line 792, so that the sql-query is printed. Copy and paste it here and I'll help you sort it through.
|
Jan
===========
FR Portal Forums | Active Users 4.0.20 Mod |
|
|
|
richfed
Average Member
United States
999 Posts |
|
|
masterao
Senior Member
Sweden
1678 Posts |
|
|
masterao
Senior Member
Sweden
1678 Posts |
Posted - 16 September 2002 : 14:04:35
|
richfed, move the code marked red to the location where it is green in the example below:
if strIPLogging <> "0" then
strSql = strSql & ", '" & Request.ServerVariables("REMOTE_ADDR") & "'"
end if
strSql = strSql & ", 1 "
strSql = strSql & ", " & Request.Form("strMessageIcon")
'################ Sticky Topic MOD ######################
if Request.Form("sticky") = 1 then
strSql = strSql & ", 1 "
strSql = strSql & ", 0 "
elseif Request.Form("sticky") = 2 then
strSql = strSql & ", 1 "
strSql = strSql & ", 999999 "
else
strSql = strSql & ", 0 "
strSql = strSql & ", 0 "
end if
'########################################################
strSql = strSql & ", " & Request.Form("strMessageIcon")
That will hopefully be the fix.
|
Jan
===========
FR Portal Forums | Active Users 4.0.20 Mod |
Edited by - masterao on 16 September 2002 14:05:16 |
|
|
|
richfed
Average Member
United States
999 Posts |
|
|
masterao
Senior Member
Sweden
1678 Posts |
Posted - 16 September 2002 : 20:04:51
|
Rich, could you provide a text-version of the post_info.asp which doesn't have the message icon mod code?
|
Jan
===========
FR Portal Forums | Active Users 4.0.20 Mod |
|
|
|
richfed
Average Member
United States
999 Posts |
|
|
masterao
Senior Member
Sweden
1678 Posts |
Posted - 17 September 2002 : 06:30:56
|
I think I found the problem now. Some of the values where messed up.
Replace lines 694-793 in your modded post_info.asp with the following:
'## Forum_SQL - Add new post to Topics Table
strSql = "INSERT INTO " & strTablePrefix & "TOPICS (FORUM_ID"
strSql = strSql & ", CAT_ID"
strSql = strSql & ", T_SUBJECT"
strSql = strSql & ", T_MESSAGE"
' ############# Poll Mod #############
strSql = strSql & ", answer1"
strSql = strSql & ", count1"
strSql = strSql & ", answer2"
strSql = strSql & ", count2"
strSql = strSql & ", answer3"
strSql = strSql & ", count3"
strSql = strSql & ", answer4"
strSql = strSql & ", count4"
strSql = strSql & ", answer5"
strSql = strSql & ", count5"
strSql = strSql & ", answer6"
strSql = strSql & ", count6"
strSql = strSql & ", answer7"
strSql = strSql & ", count7"
strSql = strSql & ", answer8"
strSql = strSql & ", count8"
strSql = strSql & ", T_ISPOLL"
' ###################################
strSql = strSql & ", T_AUTHOR"
strSql = strSql & ", T_LAST_VOTE"
strSql = strSql & ", T_LAST_POST"
strSql = strSql & ", T_LAST_POST_AUTHOR"
strSql = strSql & ", T_DATE"
strSql = strSql & ", T_STATUS"
if strIPLogging <> "0" then
strSql = strSql & ", T_IP"
end if
strSql = strSql & ", T_ARCHIVE_FLAG"
strSql = strSql & ", T_MSGICON"
'################ Sticky Topic MOD ######################
strSql = strSql & ", T_STICKY"
strSql = strSql & ", T_TOPSTICKY"
'########################################################
strSql = strSql & ") VALUES ("
strSql = strSql & Forum_ID
strSql = strSql & ", " & Cat_ID
strSql = strSql & ", '" & txtSubject & "'"
strSql = strSql & ", '" & txtMessage & "'"
' ################ Poll Mod ###############
strSql = strSql & ", '" & txtSub1 & "'"
strSql = strSql & ", " & 0
strSql = strSql & ", '" & txtSub2 & "'"
strSql = strSql & ", " & 0
strSql = strSql & ", '" & txtSub3 & "'"
strSql = strSql & ", " & 0
strSql = strSql & ", '" & txtSub4 & "'"
strSql = strSql & ", " & 0
strSql = strSql & ", '" & txtSub5 & "'"
strSql = strSql & ", " & 0
strSql = strSql & ", '" & txtSub6 & "'"
strSql = strSql & ", " & 0
strSql = strSql & ", '" & txtSub7 & "'"
strSql = strSql & ", " & 0
strSql = strSql & ", '" & txtSub8 & "'"
strSql = strSql & ", " & 0
if Request.Form("poll") = "1" then
strSql = strSql & ", " & 1
else
strSql = strSql & ", " & 0
end if
'##########################################
strSql = strSql & ", " & rs("MEMBER_ID")
strSql = strSql & ", '" & DateToStr(strForumTimeAdjust) & "'"
strSql = strSql & ", '" & DateToStr(strForumTimeAdjust) & "'"
strSql = strSql & ", " & rs("MEMBER_ID")
strSql = strSql & ", '" & DateToStr(strForumTimeAdjust) & "'"
if Request.Form("lock") = 1 then
strSql = strSql & ", 0 "
else
if Moderation = "Yes" then
strSql = strSql & ", 2 "
else
strSql = strSql & ", 1 "
end if
end if
if strIPLogging <> "0" then
strSql = strSql & ", '" & Request.ServerVariables("REMOTE_ADDR") & "'"
end if
strSql = strSql & ", 1 "
strSql = strSql & ", " & Request.Form("strMessageIcon")
'################ Sticky Topic MOD ######################
if Request.Form("sticky") = 1 then
strSql = strSql & ", 1 "
strSql = strSql & ", 0 "
elseif Request.Form("sticky") = 2 then
strSql = strSql & ", 1 "
strSql = strSql & ", 999999 "
else
strSql = strSql & ", 0 "
strSql = strSql & ", 0 "
end if
'########################################################
strSql = strSql & ")"
my_Conn.Execute (strSql)
I hope that this will work.
|
Jan
===========
FR Portal Forums | Active Users 4.0.20 Mod |
|
|
|
richfed
Average Member
United States
999 Posts |
|
|
masterao
Senior Member
Sweden
1678 Posts |
Posted - 17 September 2002 : 13:37:46
|
Im glad you got it working, Rich.
This double text you are getting, do you have an example of it? I visited your forum, but I couldn't see any link that also appeared as plain text on forum.asp.
|
Jan
===========
FR Portal Forums | Active Users 4.0.20 Mod |
|
|
|
richfed
Average Member
United States
999 Posts |
Posted - 17 September 2002 : 13:51:17
|
quote:
Originally posted by masterao
Im glad you got it working, Rich.
No, NO!!!! YOU got it working, and it is appreciated!
quote:
This double text you are getting, do you have an example of it? I visited your forum, but I couldn't see any link that also appeared as plain text on forum.asp.
That's because I reverted back on that file .... no message icon modification. The text link above, though, IS the MI modded file. I'll look it over tonight ... again ... and see if I can see what it is I did wrong. |
Rich
[size=1]A Complete Idiot's Guide to MOD Implementation || On the Trail of the Last of the Mohicans[/size=1] |
|
|
|
masterao
Senior Member
Sweden
1678 Posts |
Posted - 17 September 2002 : 15:13:39
|
quote:
Originally posted by richfed
quote:
Originally posted by masterao
Im glad you got it working, Rich.
No, NO!!!! YOU got it working, and it is appreciated!
Thanks. 
quote:
That's because I reverted back on that file .... no message icon modification. The text link above, though, IS the MI modded file. I'll look it over tonight ... again ... and see if I can see what it is I did wrong.
Exactly where does this repeting text appear in forum.asp? It would make it easier to locate, if I had something to go after.
|
Jan
===========
FR Portal Forums | Active Users 4.0.20 Mod |
|
|
|
richfed
Average Member
United States
999 Posts |
Posted - 17 September 2002 : 18:30:43
|
OK ...
On forum.asp, the first column is for the folder icon, the second column - in the case of a Message Icon-modded file - is for the message icon, the third column is for the topic. Within the cells of that third column is the link to the topic. Well, in my MI-modded forum.asp, that link appears, as is normal. BUT, immediately following, and within the same cell, is a plain text repetition of the topic link [only it's not a link]. It duplicates itself: once as a link - as it should - second as plain text - which it shouldn't.
Not sure I'm being clear ... |
Rich
[size=1]A Complete Idiot's Guide to MOD Implementation || On the Trail of the Last of the Mohicans[/size=1] |
|
|
|
masterao
Senior Member
Sweden
1678 Posts |
Posted - 17 September 2002 : 19:05:15
|
Find this on approx line 436-448 in forum.asp:
<td bgcolor="<% =strForumCellColor %>" valign="center" align="left"><font face="<% =strDefaultFontFace %>" size="<% =strDefaultFontSize %>"><a href="topic.asp?<%= ArchiveLink %>TOPIC_ID=<% =Topic_ID %>"><% =ChkString(left(rs("T_SUBJECT"), 50),"display") %></a> </font>
<%
'############### Sticky Topic Mod ###################
if Topic_Stick = 1 then %>
<img src="icon_sticky.gif" height=15 width=15 border=0 hspace=0 alt="Sticky Topic">
<% end if
'################ Sticky Topic Mod ##############
%>
<% =ChkString(left(rs("T_SUBJECT"), 50),"display") %></a> </font>
<%
if strShowPaging = "1" then
TopicPaging()
end if
Replace that with this:
<td bgcolor="<% =strForumCellColor %>" valign="center" align="left">
<%
'############### Sticky Topic Mod ###################
if Topic_Stick = 1 then %>
<img src="icon_sticky.gif" height=15 width=15 border=0 hspace=0 alt="Sticky Topic">
<% end if
'################ Sticky Topic Mod ##############
%>
<font face="<% =strDefaultFontFace %>" size="<% =strDefaultFontSize %>"><a href="topic.asp?<%= ArchiveLink %>TOPIC_ID=<% =Topic_ID %>"><% =ChkString(left(rs("T_SUBJECT"), 50),"display") %></a> </font>
<%
if strShowPaging = "1" then
TopicPaging()
end if
Then you will not have the topic subject appearing twice.
|
Jan
===========
FR Portal Forums | Active Users 4.0.20 Mod |
|
|
|
Topic |
|
|
|
Topic Locked
