| Author |
 Topic  |
|
amir
Junior Member
Pakistan
168 Posts |
 Posted - 04 September 2002 : 16:21:15
|
Hi ,
i m running the Snitz 3.4.2 on my personal web server
today i installed the 4 mods..it all wass successfull...
first add the Hot key mod.then i checked it .it was ok...
then i install the News Mod...i checked this it was ok.....
then i installed the Active Users Mod..i checked this it wass ok...
then i install the avtaar mod it was ok...every thing is going fine but whern i try to open the anytopic from anyforum i got the error
===================================================
Microsoft VBScript compilation error '800a03ea'
Syntax error
/iissamples/snitz342/topic.asp, line 585
end if
^
===================================================
what is this error and how i fix this 
what is that error
but remember everything is fine in the forums but only i can't open the tpoic .......
plz help me someone  |
Peace & Love
a.m.i.r. |
|
|
amir
Junior Member
Pakistan
168 Posts |
Posted - 04 September 2002 : 18:17:59
|
| Plz Mr Richard Kinser...you always help me but today where r u |
Peace & Love
a.m.i.r. |
 |
|
|
amir
Junior Member
Pakistan
168 Posts |
Posted - 04 September 2002 : 18:59:53
|
| plz help me........ |
Peace & Love
a.m.i.r. |
|
|
|
Nikkol
Forum Moderator
USA
6907 Posts |
|
|
amir
Junior Member
Pakistan
168 Posts |
Posted - 04 September 2002 : 19:13:42
|
'## Forum_SQL
strSql = "UPDATE " & strActivePrefix & "TOPICS "
strSql = strSql & " SET T_VIEW_COUNT = (T_VIEW_COUNT + 1) "
strSql = strSql & " WHERE (TOPIC_ID = " & Topic_ID & ")"
my_conn.Execute (strSql),,adCmdText + adExecuteNoRecords
if iReplyCount = "" then '## No replies found in DB
' Nothing
else
intI = 0
rM_NAME = 0
rM_RECEIVE_EMAIL = 1
rM_AIM = 2
rM_ICQ = 3
rM_MSN = 4
rM_YAHOO = 5
rM_TITLE = 6
rMEMBER_ID = 7
rM_HOMEPAGE = 8
rM_LEVEL = 9
rM_POSTS = 10
rM_COUNTRY = 11
rM_Avatar = 12
rREPLY_ID = 13
rFORUM_ID = 14
rR_AUTHOR = 15
rTOPIC_ID = 16
rR_MESSAGE = 17
rR_LAST_EDIT = 18
rR_LAST_EDITBY = 19
rR_SIG = 20
rR_STATUS = 21
rR_DATE = 22
if CanShowSignature = 1 then
rM_SIG = 23
end if
for iForum = 0 to iReplyCount
Reply_MemberName = arrReplyData(rM_NAME, iForum)
Reply_MemberReceiveEmail = arrReplyData(rM_RECEIVE_EMAIL, iForum)
Reply_MemberAIM = arrReplyData(rM_AIM, iForum)
Reply_MemberICQ = arrReplyData(rM_ICQ, iForum)
Reply_MemberMSN = arrReplyData(rM_MSN, iForum)
Reply_MemberYAHOO = arrReplyData(rM_YAHOO, iForum)
Reply_MemberTitle = arrReplyData(rM_TITLE, iForum)
Reply_MemberID = arrReplyData(rMEMBER_ID, iForum)
Reply_MemberHomepage = arrReplyData(rM_HOMEPAGE, iForum)
Reply_MemberLevel = arrReplyData(rM_LEVEL, iForum)
Reply_MemberPosts = arrReplyData(rM_POSTS, iForum)
Reply_MemberCountry = arrReplyData(rM_COUNTRY, iForum)
Reply_MemberAvatar = arrReplyData(rM_Avatar, iForum)
Reply_ReplyID = arrReplyData(rREPLY_ID, iForum)
Reply_ForumID = arrReplyData(rFORUM_ID, iForum)
Reply_Author = arrReplyData(rR_AUTHOR, iForum)
Reply_TopicID = arrReplyData(rTOPIC_ID, iForum)
Reply_Content = arrReplyData(rR_MESSAGE, iForum)
Reply_LastEdit = arrReplyData(rR_LAST_EDIT, iForum)
Reply_LastEditBy = arrReplyData(rR_LAST_EDITBY, iForum)
Reply_Sig = arrReplyData(rR_SIG, iForum)
Reply_Status = arrReplyData(rR_STATUS, iForum)
Reply_Date = arrReplyData(rR_DATE, iForum)
if CanShowSignature = 1 then
Reply_MemberSig = trim(arrReplyData(rM_SIG, iForum))
end if
if intI = 0 then
CColor = strAltForumCellColor
else
CColor = strForumCellColor
end if
|
Peace & Love
a.m.i.r. |
|
|
|
amir
Junior Member
Pakistan
168 Posts |
Posted - 04 September 2002 : 19:15:18
|
these lines from tpoic.asp about link 450 to 650
|
Peace & Love
a.m.i.r. |
|
|
|
Nikkol
Forum Moderator
USA
6907 Posts |
Posted - 04 September 2002 : 19:18:52
|
| Can you please post a link to a text version of topic.asp placed on your own server somewhere? It's very difficult to tell which line is the correct line the way you have it now. Plus, I can't see and indents this way. |
Nikkol ~ Help Us Help You | ReadMe | 3.4.03 fixes | security fixes ~ |
|
|
|
Nikkol
Forum Moderator
USA
6907 Posts |
Posted - 04 September 2002 : 19:23:14
|
You need to review the MOD installation instructions because you are missing an end if. I've color coded the code below to show you...
if iReplyCount = "" then '## No replies found in DB
' Nothing
else
intI = 0
rM_NAME = 0
rM_RECEIVE_EMAIL = 1
rM_AIM = 2
rM_ICQ = 3
rM_MSN = 4
rM_YAHOO = 5
rM_TITLE = 6
rMEMBER_ID = 7
rM_HOMEPAGE = 8
rM_LEVEL = 9
rM_POSTS = 10
rM_COUNTRY = 11
rM_Avatar = 12
rREPLY_ID = 13
rFORUM_ID = 14
rR_AUTHOR = 15
rTOPIC_ID = 16
rR_MESSAGE = 17
rR_LAST_EDIT = 18
rR_LAST_EDITBY = 19
rR_SIG = 20
rR_STATUS = 21
rR_DATE = 22
if CanShowSignature = 1 then
rM_SIG = 23
end if
Notice you are missing an end if for the red part. It might be part of code that you did not paste; I don't know. If you post a link I can maybe tell that, but I think it's just best if you double check that you did not forget an end if somewhere. |
Nikkol ~ Help Us Help You | ReadMe | 3.4.03 fixes | security fixes ~ |
|
|
|
amir
Junior Member
Pakistan
168 Posts |
Posted - 04 September 2002 : 19:23:56
|
| what about if i send u a txt file |
Peace & Love
a.m.i.r. |
|
|
|
Nikkol
Forum Moderator
USA
6907 Posts |
|
|
amir
Junior Member
Pakistan
168 Posts |
Posted - 04 September 2002 : 19:35:51
|
if iReplyCount = "" then '## No replies found in DB
' Nothing
else
intI = 0
rM_NAME = 0
rM_RECEIVE_EMAIL = 1
rM_AIM = 2
rM_ICQ = 3
rM_MSN = 4
rM_YAHOO = 5
rM_TITLE = 6
rMEMBER_ID = 7
rM_HOMEPAGE = 8
rM_LEVEL = 9
rM_POSTS = 10
rM_COUNTRY = 11
rM_Avatar = 12
rREPLY_ID = 13
rFORUM_ID = 14
rR_AUTHOR = 15
rTOPIC_ID = 16
rR_MESSAGE = 17
rR_LAST_EDIT = 18
rR_LAST_EDITBY = 19
rR_SIG = 20
rR_STATUS = 21
rR_DATE = 22
if CanShowSignature = 1 then
rM_SIG = 23
end if
here is my current configuration i think its same same.....????? |
Peace & Love
a.m.i.r. |
|
|
|
Nikkol
Forum Moderator
USA
6907 Posts |
Posted - 04 September 2002 : 20:00:52
|
| like I said, the error could be in a part that you are not showing me. I thought you were going to email? |
Nikkol ~ Help Us Help You | ReadMe | 3.4.03 fixes | security fixes ~ |
Edited by - Nikkol on 04 September 2002 20:01:34 |
|
|
|
amir
Junior Member
Pakistan
168 Posts |
Posted - 04 September 2002 : 20:21:19
|
sorry Nikkol.....
i late...i was disconnect so ican't connecting.....therefore i m late...so i have uploaded the zip fil.......and here is the lin...
http://junoon.netfirms.com/topic.zip
|
Peace & Love
a.m.i.r. |
Edited by - amir on 04 September 2002 20:22:47 |
|
|
|
amir
Junior Member
Pakistan
168 Posts |
Posted - 04 September 2002 : 20:27:03
|
now there is a one more error
when i was tryinf open a topic in anyforum i got the syntax error which i have tell in my last posts.....but syntax i was getting on my personal web server.....
but after uploading all files to my 7host account...i m getting HTTP 500 -Internel server error
so what is this.......?????? |
Peace & Love
a.m.i.r. |
|
|
|
Nikkol
Forum Moderator
USA
6907 Posts |
Posted - 04 September 2002 : 20:35:03
|
Okay, well first the lines you posted actually ended at line 572, so it did not include the line given the error. Here is the bit of code giving the error:
if Reply_MemberAvatar <> "noavatar.gif" then
response.write" <img src=""" & Reply_MemberAvatar & """ width=""" & intAvatarWidth & """ height=""" & intAvatarHeight & """ border=""" & intAvatarBorder & """>"
end if
response.write " <p><font color=""" & strForumFontColor & """ face=""" & strDefaultFontFace & """ size=""" & strFooterFontSize & """><small>" & Reply_MemberCountry & "</small></font><br />" & vbNewLine & _
end if
if strShowRank = 2 or strShowRank = 3 then
Response.Write " " & getStar_Level(Reply_MemberLevel, Reply_MemberPosts) & "<br />" & vbNewLine
end if
The red end if is on line 585. Notice how there is no if statement for that red piece of code. You need to look at the MOD instructions and see what the if statement should be. It might also be that you just need to delete those two red lines. Those lines refer to the Country, which should be printed anyhow a little further down in the code. |
Nikkol ~ Help Us Help You | ReadMe | 3.4.03 fixes | security fixes ~ |
|
|
|
amir
Junior Member
Pakistan
168 Posts |
Posted - 04 September 2002 : 21:00:50
|
readme file statement
Look for this code arond line 584
Response.Write " </p>" & vbNewLine & _
" <p><font color=""" & strForumFontColor & """ face=""" & strDefaultFontFace & """ size=""" & strFooterFontSize & """><small>" & Reply_MemberCountry & "</small></font><br />" & vbNewLine & _
---------------------------------------------------
Replace that with the following code
Response.Write " </p>" & vbNewLine
if Reply_MemberAvatar <> "noavatar.gif" then
response.write" <img src=""" & Reply_MemberAvatar & """ width=""" & intAvatarWidth & """ height=""" & intAvatarHeight & """ border=""" & intAvatarBorder & """>"
end if
response.write " <p><font color=""" & strForumFontColor & """ face=""" & strDefaultFontFace & """ size=""" & strFooterFontSize & """><small>" & Reply_MemberCountry & "</small></font><br />" & vbNewLine & _
--------------------------------------------------------------- |
Peace & Love
a.m.i.r. |
|
|
|
Topic |
|
Topic Locked
