| Author |
 Topic  |
|
|
asp_storm
Average Member
USA
787 Posts |
 Posted - 25 July 2001 : 23:43:24
|
why do i keep getting this error, i am using The EastPasco Version of The Script:
--------------------------------------------------------------------------------
error '8002801d'
Library not registered.
/brd/inc_functions.asp, line 631
--------------------------------------------------------------------------------
thx,
asp_newbie
[|||_____-asp_newbie-_____||||||]
(__Webmaster__)
[-Newschoolskiing.com-] |
|
|
asp_storm
Average Member
USA
787 Posts |
|
|
HuwR
Forum Admin
United Kingdom
20584 Posts |
Posted - 26 July 2001 : 20:39:04
|
what is on line 631 of your inc_functions ?
|
 |
|
|
asp_storm
Average Member
USA
787 Posts |
Posted - 26 July 2001 : 20:40:44
|
quote:
what is on line 631 of your inc_functions ?
this:
*******************************************************************************
Set regEx = New RegExp ' Create regular expression.
********************************************************************************
[|||_____-asp_newbie-_____||||||]
(__Webmaster__)
[-Newschoolskiing.com-] |
|
|
|
HuwR
Forum Admin
United Kingdom
20584 Posts |
Posted - 26 July 2001 : 21:01:13
|
replace your chkBadwords function with this
function chkBadWords(pString)
fString = trim(pString)
if fString = "" or IsNull(fString) then fString = " "
bwords = split(strBadWords, "|")
for i = 0 to ubound(bwords)
fString = Replace(fString, bwords(i), string(len(bwords(i)),"*"), 1,-1,1)
next
chkBadWords = fString
end function
|
|
|
|
asp_storm
Average Member
USA
787 Posts |
Posted - 26 July 2001 : 21:34:23
|
quote:
replace your chkBadwords function with this
function chkBadWords(pString)
fString = trim(pString)
if fString = "" or IsNull(fString) then fString = " "
bwords = split(strBadWords, "|")
for i = 0 to ubound(bwords)
fString = Replace(fString, bwords(i), string(len(bwords(i)),"*"), 1,-1,1)
next
chkBadWords = fString
end function
after i uploaded it like that i got:Microsoft VBScript compilation error '800a0401'
Expected end of statement
/board/inc_functions.asp, line 630
For i = 0 To UBound(bwords) fString = Replace(fString, bwords(i), String(len(bwords(i)),"*"), 1,-1,1)
-----------------------------^
[|||_____-asp_newbie-_____||||||]
(__Webmaster__)
[-Newschoolskiing.com-] |
|
|
|
HuwR
Forum Admin
United Kingdom
20584 Posts |
Posted - 26 July 2001 : 21:57:22
|
I think some of your lines are missing the end of line, when you copied and pasted, it doesn't copy any eol markers.
If you want to copy code someone has pasted, and still keep the formatting, hit the reply with quote button, and then copy the code from inside the edit box, it will keep the formatting.
|
|
|
|
asp_storm
Average Member
USA
787 Posts |
Posted - 26 July 2001 : 22:05:37
|
quote:
I think some of your lines are missing the end of line, when you copied and pasted, it doesn't copy any eol markers.
If you want to copy code someone has pasted, and still keep the formatting, hit the reply with quote button, and then copy the code from inside the edit box, it will keep the formatting.
k, thanks, trying
[|||_____-asp_newbie-_____||||||]
(__Webmaster__)
[-Newschoolskiing.com-] |
|
|
|
asp_storm
Average Member
USA
787 Posts |
Posted - 26 July 2001 : 22:09:38
|
quote:
quote:
I think some of your lines are missing the end of line, when you copied and pasted, it doesn't copy any eol markers.
If you want to copy code someone has pasted, and still keep the formatting, hit the reply with quote button, and then copy the code from inside the edit box, it will keep the formatting.
k, thanks, trying
[|||_____-asp_newbie-_____||||||]
(__Webmaster__)
[-Newschoolskiing.com-]
working great now, thx ALOT HuwR! You R Da Bomb!
[|||_____-asp_newbie-_____||||||]
(__Webmaster__)
[-Newschoolskiing.com-] |
|
|
| |
Topic |
|
Topic Locked
