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
 Poll MOD behavior in pop_poll.asp
 New Topic  Topic Locked
 Printer Friendly
Previous Page
Author Previous Topic Topic Next Topic
Page: of 2

leatherlips
Senior Member

USA
1838 Posts

Posted - 30 July 2006 :  08:25:46  Show Profile  Visit leatherlips's Homepage
thermal_seeker, I have tried to recreate your problem on my forum but do not get any errors. It just says New Topic Posted...

Perhaps you made in error in the placement of the code somewhere? Davio will know for sure.

Mangione Magic Forum - The Music of Chuck Mangione

My Mods: Googiespell MOD | Link To Reply MOD | Petition MOD | Contact Page MOD | Share This Topic MOD | MP3 MOD | PageEar MOD | Google Viewer MOD
Go to Top of Page

thermal_seeker
Junior Member

United Kingdom
430 Posts

Posted - 30 July 2006 :  08:53:38  Show Profile
I have just found the problem area .. but dont know how to correct it
I think the problem is line 824 of post_info.

if I comment out the "end if" on 824 I get the error above. if I remove the comment I get an error, "expected statement line 824"

this is the txt file
http://www.kazzys-cavies.co.uk/textfiles/post_info.txt

Dave

further to this I notice it happens everytime anything is posted,

No good at coding, but I can plough a field !!

Edited by - thermal_seeker on 30 July 2006 09:51:27
Go to Top of Page

Davio
Development Team Member

Jamaica
12217 Posts

Posted - 30 July 2006 :  18:07:12  Show Profile
thermal_seeker, you are missing the following code from your post_info.asp file:
	if Err_Msg = "" then
		'##Get Status of this Topic
		strSql = "SELECT T_STATUS, T_UREPLIES"
		strSql = Strsql & " FROM " & strTablePrefix & "TOPICS "
		strSql = strSql & " WHERE TOPIC_ID = " & Topic_ID

		set rsTopicStatusCheck = my_Conn.Execute (strSql)

		Topic_Status = rsTopicStatusCheck("T_STATUS")
		Topic_UReplies = rsTopicStatusCheck("T_UREPLIES")

		rsTopicStatusCheck.Close
		set rsTopicStatusCheck = nothing
This code goes after line 496 in your file. You probably overwrote it when adding in the poll mod code. After you add that back in, make sure to uncomment the end if, that you commented out earlier.

Support Snitz Forums
Go to Top of Page

thermal_seeker
Junior Member

United Kingdom
430 Posts

Posted - 30 July 2006 :  18:26:51  Show Profile
Thanks Davio
will try it next weekend, busy at work for the rest of the week
I will let you know how it went.

Thanks for your time and trouble

Dave

No good at coding, but I can plough a field !!
Go to Top of Page

thermal_seeker
Junior Member

United Kingdom
430 Posts

Posted - 03 August 2006 :  08:55:50  Show Profile
oops !! I have another problem now..
I'm logged in as admin, I create a new forum, allow admin/moderators to create, and when finished "post new forum".
I get an error message:

Microsoft VBScript compilation error '800a03f6'

Expected 'End'

/forum/post_info.asp, line 2504

Line 2504 is:
'## Subscribe checkbox end ##

This line hasn't been changed ???

link to the latest file: http://www.kazzys-cavies.co.uk/textfiles/post_info.txt


Dave

No good at coding, but I can plough a field !!
Go to Top of Page

Davio
Development Team Member

Jamaica
12217 Posts

Posted - 03 August 2006 :  11:16:12  Show Profile
You added the split topic mod and overwrote some of the existing code. You need to be more careful when adding code to your files. You're missing the following code from your file, after line 1104:
		Go_Result err_Msg, 1
		Response.End
	end if	
end if
Here is the before and after code:
		if Moderation = "No" then
			'## Subscribe checkbox ##
			if request.form("TNotify") <> "" then
				if request.form("TNotify") = "1" then
					AddSubscription "TOPIC", rs("MEMBER_ID"), Cat_ID, Forum_ID, NewTopicID
				elseif request.form("TNotify") = "0" then
					DeleteSubscription "TOPIC", MemberID, Cat_ID, Forum_ID, NewTopicID
				end if
			end if
			'## Subscribe checkbox end ##
		end if

		Go_Result err_Msg, 1
		Response.End
	end if	
end if

'#################### Split Topic Mod ###################
if MethodType = "SplitTopic" then
	lngMember = cLng(ChkUser(strDBNTUserName, strPassword,-1))
	select case lngMember
		case 0 '## Invalid Pword
			Go_Result "Invalid Password or UserName", 0
			Response.End
		case 1 '## Author of Post
			'## Do Nothing
And please start a new topic if you have a problem. This has nothing to do with the poll mod.

Support Snitz Forums
Go to Top of Page

thermal_seeker
Junior Member

United Kingdom
430 Posts

Posted - 03 August 2006 :  13:33:49  Show Profile
Davio, please accept my apologies. as the poll mod was the last to go on I thought that was the problem, the events mod was working ok.

I have just added the piece of code in but I don't seem to have the "create poll icon". I have just checked through all of the code and can't for the life of me see a mistake.

Dave

No good at coding, but I can plough a field !!
Go to Top of Page

leatherlips
Senior Member

USA
1838 Posts

Posted - 03 August 2006 :  14:16:29  Show Profile  Visit leatherlips's Homepage
Did you upload you poll icon to your images folder? Also, did you remember to add the code to your inc_icons.asp file? Do you have a URL for your forum?

Do you see a red x where the icon should be? If so, right click on it and choose properties. It will show you where it thinks the icon should be.

Mangione Magic Forum - The Music of Chuck Mangione

My Mods: Googiespell MOD | Link To Reply MOD | Petition MOD | Contact Page MOD | Share This Topic MOD | MP3 MOD | PageEar MOD | Google Viewer MOD
Go to Top of Page

thermal_seeker
Junior Member

United Kingdom
430 Posts

Posted - 03 August 2006 :  14:58:33  Show Profile
Hi leatherlips
yes to the icon, yes to the code,
http://www.kazzys-cavies.co.uk/forum/

no to the red x

think I might have it sorted
will post later

Dave

No good at coding, but I can plough a field !!

Edited by - thermal_seeker on 03 August 2006 15:26:34
Go to Top of Page
Page: of 2 Previous Topic Topic Next Topic  
Previous 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.39 seconds. Powered By: Snitz Forums 2000 Version 3.4.07