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)
 No more Nested quotes
 New Topic  Reply to Topic
 Printer Friendly
Next Page
Author Previous Topic Topic Next Topic
Page: of 2

SiSL
Average Member

Turkey
671 Posts

Posted - 04 June 2008 :  19:00:49  Show Profile  Visit SiSL's Homepage  Reply with Quote
Ok been long time since I've had with the mods, here is my little mod (I'm not sure if it has been made before)

NMNQ MOD 1.0

This mod removes internal quotes of a quoted post. In other words, when you quote a message that has quoted another, you won't get previously quoted message inside, therefor removes cluttering chain quotes (ofcourse if done on purpose that's whole another reason)

Download: No More Nested Quotes

INSTALL

It is very simple process really. Two files modified.

inc_func_posting.asp

Find following line:
function CleanCode(fString)


around line 88 and above this line add following:

Function CleanQuotes(fString)
	if fString <> "" AND IsNull(fstring) = False Then
		set re = new RegExp
		re.pattern = "\[quote(?:(?!\[quote)([\s\S]))+?(\[/quote\]\n\r|\[/quote]\n|\[/quote])"
		re.ignorecase = true
		re.global = true

		set matches = re.execute(fstring) 
		totalMatches =  matches.count
		if totalMatches <> 0 Then
			Do While totalMatches <> 0
				For each match in matches
					fstring = re.Replace(fstring,"")
				Next
				if totalMatches = 0 Then
					Exit Do
				End If
				set matches = re.execute(fString)
				totalMatches =  matches.count 	
			Loop	
		End If
		set matches = nothing
		set re=nothing
	
		CleanQuotes = fstring
	Else
		CleanQuotes = fstring
	End If
End Function


Done with the inc_func_posting.asp...

post.asp

now open post.asp Find following line around Line 328:

TxtMsg = TxtMsg & "[br]" & rs("R_MESSAGE") & vbNewline


Replace it with following:

TxtMsg = TxtMsg & "[br]" & CleanQuotes(rs("R_MESSAGE")) & vbNewline



Following change is OPTIONAL. Generally topics are not quoted, but may be quote stuff inside, so you may not add it if you find it necessary or not. But here it goes: Find following line around line 355 :

TxtMsg = TxtMsg & "[br]" & rs("T_MESSAGE") & vbNewline


Replace it with following :

TxtMsg = TxtMsg & "[br]" & CleanQuotes(rs("T_MESSAGE")) & vbNewline



And voila ;) Now you won't get anymore annoying quote in quote in quote in quote over and over...

http://www.chip.com.tr/forum

Credits: Thanks to Carefree for taking risks to test this piece of code and preparing the file for download and MarcelG for all previous tries.<

CHIP Online Forum

My Mods
Select All Code | Fix a vulnerability for your private messages | Avatar Categories W/ Avatar Gallery Mod | Complaint Manager
Admin Level Revisited | Merge Forums | No More Nested Quotes Mod

Edited by - SiSL on 12 December 2008 01:22:04

AnonJr
Moderator

United States
5768 Posts

Posted - 04 June 2008 :  21:41:25  Show Profile  Visit AnonJr's Homepage  Reply with Quote
I do believe that I've seen it done around here before - or at least I've seen some discussion on it.

Having said that, your solution does appear to be a bit more elegant than what I remember seeing.<
Go to Top of Page

MarcelG
Retired Support Moderator

Netherlands
2625 Posts

Posted - 05 June 2008 :  02:10:25  Show Profile  Visit MarcelG's Homepage  Reply with Quote
Looks pretty clean and well documented! Nice work SiSL!
This certainly looks like one I should implemented on oxle!
<

portfolio - linkshrinker - oxle - twitter
Go to Top of Page

Carefree
Advanced Member

Philippines
4207 Posts

Posted - 05 June 2008 :  03:10:00  Show Profile  Reply with Quote
I like it. I always ended up having to manually delete 95% of the quotes (when it was necessary for me to quote someone) so the message stayed readable. Maybe you should have called it "No More Nested Quotes".<

Edited by - Carefree on 05 June 2008 03:10:54
Go to Top of Page

MarcelG
Retired Support Moderator

Netherlands
2625 Posts

Posted - 05 June 2008 :  06:26:05  Show Profile  Visit MarcelG's Homepage  Reply with Quote
SiSL, it doesn't seem to work as I expected.

Imagine a post like this, with multiple quotes in the post:
(between the *****'s)

*****
You said this:
quote:
blablabla

And then you said this:
quote:
other bla

Remember?
*****

If I hit the reply with quote button with this one, I still see this:

*****
quote:
You said this:
quote:
blablabla

And then you said this:
quote:
other bla

Remember?

*****
Eg. the quotes are not removed when there's more than one in R_MESSAGE...

Example: http://oxle.com/topic.asp?tid=5313 (demo/demo when prompted for a password)<

portfolio - linkshrinker - oxle - twitter

Edited by - MarcelG on 05 June 2008 06:40:03
Go to Top of Page

bobby131313
Senior Member

USA
1163 Posts

Posted - 05 June 2008 :  09:58:27  Show Profile  Visit bobby131313's Homepage  Reply with Quote
I removed the reply with quote icon looooong ago for this reason. Hell I had one member with over 250 posts or so and I couldn't find one of his post that didn't quote an entire post whether it already had multiples or not.<

Switch the order of your title tags
Go to Top of Page

MarcelG
Retired Support Moderator

Netherlands
2625 Posts

Posted - 05 June 2008 :  14:35:03  Show Profile  Visit MarcelG's Homepage  Reply with Quote
SiSL, I've been looking at it for a while now, but my understanding of RegExp's hasn't grown....it still looks jibberish to me.
Do you have any idea?<

portfolio - linkshrinker - oxle - twitter
Go to Top of Page

SiSL
Average Member

Turkey
671 Posts

Posted - 05 June 2008 :  23:29:51  Show Profile  Visit SiSL's Homepage  Reply with Quote
Yup, it does not work on multi quotes seperated by another thing sadly. RegEx can't parse in this way.

If Snitz used to seperate quotes such as [quote=2]...[/quote=2] or similiar to that, it could be done.

However, this only resolves such:

---
Qute
- Quote
-- Quote


text

stuff...

Ofcourse this could be done in some more extensive coding by manually adding quotes numbers and remove from there. Yet I may check more what I can do for such quotes<

CHIP Online Forum

My Mods
Select All Code | Fix a vulnerability for your private messages | Avatar Categories W/ Avatar Gallery Mod | Complaint Manager
Admin Level Revisited | Merge Forums | No More Nested Quotes Mod

Edited by - SiSL on 06 June 2008 00:15:03
Go to Top of Page

SiSL
Average Member

Turkey
671 Posts

Posted - 06 June 2008 :  00:19:50  Show Profile  Visit SiSL's Homepage  Reply with Quote
quote:
Originally posted by Carefree

Maybe you should have called it "No More Nested Quotes".



Good idea :p Changed it before it is too late<

CHIP Online Forum

My Mods
Select All Code | Fix a vulnerability for your private messages | Avatar Categories W/ Avatar Gallery Mod | Complaint Manager
Admin Level Revisited | Merge Forums | No More Nested Quotes Mod
Go to Top of Page

phy1729
Average Member

USA
589 Posts

Posted - 06 June 2008 :  00:25:13  Show Profile  Reply with Quote
Is the problem that when you have
text1
quote:
quote1
text2
quote:
quote2
text3
text2 is cut out also? If so you need to use lazy operators. I.e. \[quote\][.]*?\[\/quote\] would match
quote:
quote1
or
quote:
quote2
not
quote:
quote1
text2
quote:
quote2


Edit: Didn't mean for the quote tags to parse but I think the meaning is clear<

Edited by - phy1729 on 06 June 2008 00:26:13
Go to Top of Page

SiSL
Average Member

Turkey
671 Posts

Posted - 07 June 2008 :  19:15:01  Show Profile  Visit SiSL's Homepage  Reply with Quote
Fixed Function, can you retry Marcel?

I decided to replace quotes by double <br> and finally converting it back to vbNewLine<

CHIP Online Forum

My Mods
Select All Code | Fix a vulnerability for your private messages | Avatar Categories W/ Avatar Gallery Mod | Complaint Manager
Admin Level Revisited | Merge Forums | No More Nested Quotes Mod

Edited by - SiSL on 07 June 2008 19:18:02
Go to Top of Page

Carefree
Advanced Member

Philippines
4207 Posts

Posted - 08 June 2008 :  04:33:25  Show Profile  Reply with Quote
Still the same issue, SiSL.

quote:

quote:
--------------------------------------------------------------------------------
you said
quote:
--------------------------------------------------------------------------------
Originally posted by Administrator


quote:
--------------------------------------------------------------------------------
this is a test of nested quotes
--------------------------------------------------------------------------------



--------------------------------------------------------------------------------

and I said ....
--------------------------------------------------------------------------------

<
Go to Top of Page

MarcelG
Retired Support Moderator

Netherlands
2625 Posts

Posted - 08 June 2008 :  04:58:10  Show Profile  Visit MarcelG's Homepage  Reply with Quote
SiSL ; this updated version doesn't seem to work at all; even with just a single quote, the quote isn't replaced.
http://oxle.com/topic.asp?tid=5316 (demo/demo)

I've reverted to your previous version.<

portfolio - linkshrinker - oxle - twitter

Edited by - MarcelG on 08 June 2008 05:00:04
Go to Top of Page

SiSL
Average Member

Turkey
671 Posts

Posted - 08 June 2008 :  09:06:27  Show Profile  Visit SiSL's Homepage  Reply with Quote
Sorry guys, final change , please test it out this time... On my tests, it looks like I nailed it, but ofcourse, need your opinions.<

CHIP Online Forum

My Mods
Select All Code | Fix a vulnerability for your private messages | Avatar Categories W/ Avatar Gallery Mod | Complaint Manager
Admin Level Revisited | Merge Forums | No More Nested Quotes Mod

Edited by - SiSL on 08 June 2008 09:17:11
Go to Top of Page

MarcelG
Retired Support Moderator

Netherlands
2625 Posts

Posted - 08 June 2008 :  12:24:08  Show Profile  Visit MarcelG's Homepage  Reply with Quote
The two quotes part works now, but no longer if they're nested : when quoting a quote with one quote in it, the outer quote isn't replaced : http://oxle.com/topic.asp?tid=5316#44221
<

portfolio - linkshrinker - oxle - twitter
Go to Top of Page

SiSL
Average Member

Turkey
671 Posts

Posted - 08 June 2008 :  15:01:46  Show Profile  Visit SiSL's Homepage  Reply with Quote
Interestingly it works at me, not sure why it does at you, double checked here...<

CHIP Online Forum

My Mods
Select All Code | Fix a vulnerability for your private messages | Avatar Categories W/ Avatar Gallery Mod | Complaint Manager
Admin Level Revisited | Merge Forums | No More Nested Quotes Mod
Go to Top of Page
Page: of 2 Previous Topic Topic Next Topic  
Next Page
 New Topic  Reply to Topic
 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