The Forum has been Updated
The code has been upgraded to the latest .NET core version. Please check instructions in the Community Announcements about migrating your account.
I was wanting to try to add a feature that would only be seen by members only. For example, lets say I only wanted members to see the pictures in the post. The members would see the entire post as normal:
Duis blandit nulla amet ea quis volutpat suscipit exerci eros duis dolore feugiat, commodo, duis vero, velit suscipit enim sed autem odio. Vulputate zzril blandit eum eum facilisi vero feugait iriure, et consequat. Molestie, accumsan velit ipsum praesent accumsan dolore delenit in hendrerit, at enim dolor.
Ea qui ut commodo odio consequat consectetuer augue dignissim ea ut velit sed accumsan veniam. Ut nostrud vulputate, magna nulla exerci eu in illum luptatum autem commodo nibh nibh. Augue tation hendrerit suscipit, consequat nulla enim, suscipit ea velit nulla molestie. In autem, ut consequat, exerci blandit, esse, aliquip dolore, eros veniam aliquip duis, vel.
But a non member would see something like this:
Duis blandit nulla amet ea quis volutpat suscipit exerci eros duis dolore feugiat, commodo, duis vero, velit suscipit enim sed autem odio. Vulputate zzril blandit eum eum facilisi vero feugait iriure, et consequat. Molestie, accumsan velit ipsum praesent accumsan dolore delenit in hendrerit, at enim dolor.
[This picture is for members only]
Ea qui ut commodo odio consequat consectetuer augue dignissim ea ut velit sed accumsan veniam. Ut nostrud vulputate, magna nulla exerci eu in illum luptatum autem commodo nibh nibh. Augue tation hendrerit suscipit, consequat nulla enim, suscipit ea velit nulla molestie. In autem, ut consequat, exerci blandit, esse, aliquip dolore, eros veniam aliquip duis, vel.
If I can be shown how to do that, then I think I can figure out how to make it work with other forum tags.
Duis blandit nulla amet ea quis volutpat suscipit exerci eros duis dolore feugiat, commodo, duis vero, velit suscipit enim sed autem odio. Vulputate zzril blandit eum eum facilisi vero feugait iriure, et consequat. Molestie, accumsan velit ipsum praesent accumsan dolore delenit in hendrerit, at enim dolor.
Ea qui ut commodo odio consequat consectetuer augue dignissim ea ut velit sed accumsan veniam. Ut nostrud vulputate, magna nulla exerci eu in illum luptatum autem commodo nibh nibh. Augue tation hendrerit suscipit, consequat nulla enim, suscipit ea velit nulla molestie. In autem, ut consequat, exerci blandit, esse, aliquip dolore, eros veniam aliquip duis, vel.
But a non member would see something like this:
Duis blandit nulla amet ea quis volutpat suscipit exerci eros duis dolore feugiat, commodo, duis vero, velit suscipit enim sed autem odio. Vulputate zzril blandit eum eum facilisi vero feugait iriure, et consequat. Molestie, accumsan velit ipsum praesent accumsan dolore delenit in hendrerit, at enim dolor.
[This picture is for members only]
Ea qui ut commodo odio consequat consectetuer augue dignissim ea ut velit sed accumsan veniam. Ut nostrud vulputate, magna nulla exerci eu in illum luptatum autem commodo nibh nibh. Augue tation hendrerit suscipit, consequat nulla enim, suscipit ea velit nulla molestie. In autem, ut consequat, exerci blandit, esse, aliquip dolore, eros veniam aliquip duis, vel.
If I can be shown how to do that, then I think I can figure out how to make it work with other forum tags.
Posted
Thanks Carefree.
I'm getting this error:
Here is the whole section of code:
I'm getting this error:
Code:
Microsoft VBScript compilation error '800a0410'
Invalid 'for' loop control variable
/forum/inc_func_common.asp, line 2092
for i=1 to len(Request.ServerVariables("URL"))Here is the whole section of code:
Code:
if mLev=0 and inStr(fString,"[mp3") then
for i = 1 to len(fString)
if mid(fString,i,5)="[mp3]" then ij=i
if mid(fString,i,6)="[/mp3]" then
ik=i
if inStr(Request.ServerVariables("URL"),"/") then
for i=1 to len(Request.ServerVariables("URL"))
if mid(Request.ServerVariables("URL"),i,1)="/" then
strURL = mid(Request.ServerVariables("URL"),i+1)
end if
next
else
strURL = Request.ServerVariables("URL")
end if
left(fString,ij-1)+"<a href=""login.asp?target="& strURL &"""><img border=""0"" src=""images/members.bmp"" width=""350"" height=""56"" alt=""Members Only""></a>"+mid(fString,ik+6)
end if
next
strTempString=strTextString
end if
Posted
Originally posted by leatherlips
Thanks Carefree.
I'm getting this error:Code:Microsoft VBScript compilation error '800a0410'
Invalid 'for' loop control variable
/forum/inc_func_common.asp, line 2092
for i=1 to len(Request.ServerVariables("URL"))
Here is the whole section of code:Code:if mLev=0 and inStr(fString,"[mp3") then
for i = 1 to len(fString)
if mid(fString,i,5)="[mp3]" then ij=i
if mid(fString,i,6)="[/mp3]" then
ik=i
if inStr(Request.ServerVariables("URL"),"/") then
for ji=1 to len(Request.ServerVariables("URL")) if mid(Request.ServerVariables("URL"),ji,1)="/" then
strURL = mid(Request.ServerVariables("URL"),ji+1)
end if
next
else
strURL = Request.ServerVariables("URL")
end if
left(fString,ij-1)+"<a href=""login.asp?target="& strURL &"""><img border=""0"" src=""images/members.bmp"" width=""350"" height=""56"" alt=""Members Only""></a>"+mid(fString,ik+6)
end if
next
strTempString=strTextString
end if
Well, naturally. We are re-using/defining the variable "i" within a loop - can't do that. So simply change the second series of "i" variables to "ji" and the problem will go away.