quote: Originally posted by philsbbs
Theres over 1000 lines of code and im not running any mods.
Could you please help pin point for me.
My topic.asp has 1200+ lines, but there are quite a few mods in there. OK, follow the steps :
Step 1.
Find :
strSql = strSql & ", R.R_LAST_EDITBY, R.R_SIG, R.R_STATUS, R.R_DATE, M.M_DATE"
if CanShowSignature = 1 then
strSql = strSql & ", M.M_SIG"
end if
and change to :
strSql = strSql & ", R.R_LAST_EDITBY, R.R_SIG, R.R_STATUS, R.R_DATE, M.M_DATE"
if CanShowSignature = 1 then
strSql = strSql & ", M.M_SIG"
end if
Step 2 :
Find :
rR_STATUS = 22
rR_DATE = 23
rM_MDATE = 24
if CanShowSignature = 1 then
rM_SIG = 25
end if
and change to (WATCH THE NUMBERS !!!!!) :
rR_STATUS = 22
rR_DATE = 23
rM_MDATE = 24
rM_LNEWS = 25
if CanShowSignature = 1 then
rM_SIG = 26
end if
Step 3 :
Find :
if CanShowSignature = 1 then
Reply_MemberSig = trim(arrReplyData(rM_SIG, iForum))
end if
and change to :
if CanShowSignature = 1 then
Reply_MemberSig = trim(arrReplyData(rM_SIG, iForum))
end if
Reply_LNews = arrReplyData(rM_LNEWS, iForum)
Step 4 (bit different here .... ) :
Find :
if strCountry = "1" and trim(Reply_MemberCountry) <> "" then
3 lines down should be a Response.Write, mine looks like :
Response.Write " <font color=""" & strForumFontColor & """ face=""" & strDefaultFontFace & """ size=""" & strFooterFontSize & """><small>" & Reply_MemberPosts & " Posts<br><nobr>joined " & Replace(Replace(ChkDate(Join_Date, " : " ,false), " 20", " "), " "," ") & "</nobr><br>" & Reply_LNews & "</small></font></p></td>" & vbNewLine & _
You only need the red bit.
Do that bit, I'm just working on getting the first post to do the same |