Web Wiz - Green Windows Web Hosting

  New Posts New Posts RSS Feed - Request : hide tag.
  FAQ FAQ  Forum Search   Events   Register Register  Login Login

Request : hide tag.

 Post Reply Post Reply
Author
zadax View Drop Down
Mod Builder Group
Mod Builder Group


Joined: 19 January 2003
Location: Israel
Status: Offline
Points: 433
Post Options Post Options   Thanks (0) Thanks(0)   Quote zadax Quote  Post ReplyReply Direct Link To This Post Topic: Request : hide tag.
    Posted: 28 July 2008 at 10:41pm
using it on my v7.

can anyone make a new mod for 9.5 ?

for new comers :
the Hide tag make everting between
You must be a registered member and post a reply in this topic to view the hidden content within this post!
shows text/pic instead its contect
contect will show only if user will replay...

so whos going to do it ? :)

Thanks button also will be great :)
Back to Top
zadax View Drop Down
Mod Builder Group
Mod Builder Group


Joined: 19 January 2003
Location: Israel
Status: Offline
Points: 433
Post Options Post Options   Thanks (0) Thanks(0)   Quote zadax Quote  Post ReplyReply Direct Link To This Post Posted: 30 July 2008 at 11:51am
here how i done it in ver 7


 if Str_Mem_Posted = "No" or intGroupID = 2 then
  if InStr(1, strMessage, "
You must be a registered member and post a reply in this topic to view the hidden content within this post!
", 1) > 0

  lngStarthidePos = InStr(1, strMessage, "
You must be a registered member and post a reply in this topic to view the hidden content within this post!
", 1)

  If lngEndhidePos - lngStarthidePos =< 0 Then lngEndhidePos = lngStarthidePos + Len(strhideAuthor)

  If lngEndhidePos > lngStarthidePos Then
   strhideMessage = Trim(Mid(strMessage, lngStarthidePos, lngEndhidePos-lngStarthidePos))
   strhideAuthor = Replace(strhideAuthor, """", "", 1, -1, 1)
   strBuildhide = strhideMessage
  End If

  lngStarthidePos = InStr(1, strMessage, "
You must be a registered member and post a reply in this topic to view the hidden content within this post!
", 1) + 7

  If lngEndhidePos - lngStarthidePos =< 5 Then lngEndhidePos = lngStarthidePos + Len(strhideAuthor) + 7

  strOriginalhide = Trim(Mid(strMessage, lngStarthidePos, lngEndhidePos-lngStarthidePos))

  If strBuildhide <> "" Then
   strMessage = Replace(strMessage, strOriginalhide, "<a href='#reply'><img src=hide2007.jpg border=0></a>", 1, -1, 1)
  Else
   strMessage = Replace(strMessage, strOriginalhide, Replace(strOriginalhide, "[", "&#91;", 1, -1, 1), 1, -1, 1)
  End If
 Loop

 End If
elseif Str_Mem_Posted = "Yes" then
  if InStr(1, strMessage, "
You must be a registered member and post a reply in this topic to view the hidden content within this post!
", "", 1, -1, 1)
  End If
End If

thats code in "forum_posts.asp" .

comon guys .. you know how the new v9 structure is i dont .. need asp pros for it to make it work with v9
Back to Top
 Post Reply Post Reply

Forum Jump Forum Permissions View Drop Down

Forum Software by Web Wiz Forums® version 12.08
Copyright ©2001-2026 Web Wiz Ltd.


Become a Fan on Facebook Follow us on X Connect with us on LinkedIn Web Wiz Blogs
About Web Wiz | Contact Web Wiz | Terms & Conditions | Cookies | Privacy Notice

Web Wiz is the trading name of Web Wiz Ltd. Company registration No. 05977755. Registered in England and Wales.
Registered office: Web Wiz Ltd, Unit 18, The Glenmore Centre, Fancy Road, Poole, Dorset, BH12 4FB, UK.

Prices exclude VAT at 20% unless otherwise stated. VAT No. GB988999105 - $, € prices shown as a guideline only.

Copyright ©2001-2026 Web Wiz Ltd. All rights reserved.