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
 Can't get this content display mod to work
 New Topic  Topic Locked
 Printer Friendly
Author Previous Topic Topic Next Topic  

jojo77
Starting Member

15 Posts

Posted - 19 May 2003 :  15:15:43  Show Profile
http://forum.snitz.com/forum/topic.asp?TOPIC_ID=40300

Ok I followed all the instructions. Added this to my default.asp page that is one up from the 'forum' directory:

<%DisplayContent 1, 1, 2, 1, 0, 5, 200, 0, 0, 0, 1, 0, "Top News Stories", 450, "topic.asp"%>

I then see it pull the topics from that forum but under it an error:

Microsoft VBScript runtime error '800a0009'
Subscript out of range: '[number: 0]'
/forum/inc_contentdisplay.asp, line 412


what am I'm doing wrong? I never made any changes to the inc_contentdisplay.asp file

jojo77
Starting Member

15 Posts

Posted - 19 May 2003 :  15:20:40  Show Profile
Here is the function it's choking on in the inc_contentdisplay.asp file

Function stripALL(fString)

dim arysplit,i,j, strOutput
arysplit=split(fString,"<")

if len(arysplit(0))>0 then j=1 else j=0

for i=j to ubound(arysplit)
if instr(arysplit(i),">") then
arysplit(i)=mid(arysplit(i),instr(arysplit(i),">")+1)
else
arysplit(i)="<" & arysplit(i)
end if
next

strOutput = join(arysplit, "")
strOutput = mid(strOutput, 2-j)
strOutput = replace(strOutput,">",">")
strOutput = replace(strOutput,"<","<")

arysplit=split(strOutput,"[")

if len(arysplit(0))>0 then j=1 else j=0

for i=j to ubound(arysplit)
if instr(arysplit(i),"]") then
arysplit(i)=mid(arysplit(i),instr(arysplit(i),"]")+1)
else
arysplit(i)="[" & arysplit(i)
end if
next

strOutput = join(arysplit, "")
strOutput = mid(strOutput, 2-j)
strOutput = replace(strOutput,"]","]")
strOutput = replace(strOutput,"[","[")

stripALL = strOutput

End Function
Go to Top of Page

jojo77
Starting Member

15 Posts

Posted - 28 May 2003 :  14:03:07  Show Profile
up
Go to Top of Page
  Previous Topic Topic Next Topic  
 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.29 seconds. Powered By: Snitz Forums 2000 Version 3.4.07