Author |
Topic |
ki5ck
New Member
69 Posts |
Posted - 28 April 2001 : 23:05:18
|
Is there any way to get this mod to display ALL the announcements, instead of just the first one?
Paul Wood SLT Webmaster |
|
RichardKinser
Snitz Forums Admin
USA
16655 Posts |
|
ki5ck
New Member
69 Posts |
Posted - 29 April 2001 : 09:25:18
|
Something exactly like that. Can you post a text copy of the mod so I can see what changes are necessary to do that?
Thanks!
Paul Wood SLT Webmaster |
|
|
RichardKinser
Snitz Forums Admin
USA
16655 Posts |
Posted - 30 April 2001 : 00:40:14
|
If you want you can just e-mail me your default.asp and inc_top.asp files and I'll add the code for you.
I'll also e-mail you back the updated inc_announce.asp and view_announcements.asp files. |
|
|
rick7165
Senior Member
USA
1094 Posts |
Posted - 30 April 2001 : 00:42:23
|
Richard... Any way to get this mod from you?
Thanks, Rick
Test Site www.eastpasco.com HuwR's SR4 release. Colors and Graphic scheme done by Richard Kinser. |
|
|
RichardKinser
Snitz Forums Admin
USA
16655 Posts |
Posted - 30 April 2001 : 00:56:59
|
You mean the Announcements MOD, or the MOD to the Announcements MOD? |
|
|
rick7165
Senior Member
USA
1094 Posts |
Posted - 30 April 2001 : 02:00:58
|
The one you have setup on your site listed above.
Test Site www.eastpasco.com HuwR's SR4 release. Colors and Graphic scheme done by Richard Kinser. |
|
|
RichardKinser
Snitz Forums Admin
USA
16655 Posts |
|
rick7165
Senior Member
USA
1094 Posts |
Posted - 30 April 2001 : 03:29:10
|
Worked Great! Thanks...
How do I add the Colorstripe into that mod?
Response.Write "<table border=0 width=""100%"" align=""center"">" & vbCrLf & _ " <tr valign=""center"">" & vbCrLf & _ " <td>" & _ " <font face=""" & strDefaultFontFace & """ size=""" & strDefaultFontSize & """><img src=""images/icon_announce.gif"" height=32 width=32 border=""0"" align=""middle"" alt=""Announcements""> <a href=""javascript:openAnnounceWindow('view_announcements.asp')"">" & rsAnnounce("A_SUBJECT") & "</a></font></td>" & vbCrLf & _ " </tr>" & vbCrLf & _ "</table>" & vbCrLf
Test Site www.eastpasco.com HuwR's SR4 release. Colors and Graphic scheme done by Richard Kinser. |
|
|
RichardKinser
Snitz Forums Admin
USA
16655 Posts |
Posted - 30 April 2001 : 03:32:44
|
Can you redownload inc_announce2.txt ? I fixed a few things on it.
In inc_announce2.asp on line #60
change this:
" <td bgcolor=""" & strCategoryCellColor & """ colspan="""
to this:
" <td background=""images/colorstripe.gif"" bgcolor=""" & strCategoryCellColor & """ colspan=""" |
|
|
rick7165
Senior Member
USA
1094 Posts |
Posted - 30 April 2001 : 03:38:35
|
Didn't work...
" <tr valign=""center"">" & vbCrLf & _ " <td background=""images/colorstripe.gif"">" & _ " <font face=""" & strDefaultFontFace & """ size=""" & strDefaultFontSize & """><img src=""images/icon_announce.gif"" height=32 width=32 border=""0"" align=""middle"" alt=""Announcements""> <a href=""javascript:openAnnounceWindow('view_announcements.asp')"">" & rsAnnounce("A_SUBJECT") & "</a></font></td>" & vbCrLf & _ " </tr>" & vbCrLf & _ "</table>" & vbCrLf
Test Site www.eastpasco.com HuwR's SR4 release. Colors and Graphic scheme done by Richard Kinser. |
|
|
RichardKinser
Snitz Forums Admin
USA
16655 Posts |
Posted - 30 April 2001 : 03:43:46
|
I updated the post above... |
|
|
rick7165
Senior Member
USA
1094 Posts |
Posted - 30 April 2001 : 03:54:54
|
LOL... It works.. Thanks
We must of been posting at the same time...
Thanks Again Richard!
Rick
Test Site www.eastpasco.com HuwR's SR4 release. Colors and Graphic scheme done by Richard Kinser. |
|
|
RichardKinser
Snitz Forums Admin
USA
16655 Posts |
Posted - 30 April 2001 : 04:03:24
|
You're welcome |
|
|
ki5ck
New Member
69 Posts |
Posted - 03 May 2001 : 11:57:32
|
Sorry, Richard, I've been out of town. I followed your directions and it works just fine! Exactly what I wanted.
Thanks!
Paul Wood SLT Webmaster |
|
|
ki5ck
New Member
69 Posts |
Posted - 03 May 2001 : 14:50:52
|
quote:
In your inc_top_short.asp add the following just before the closing %> that is right before <html>:
mLev = cint(ChkUser2(strDBNTUserName, Request.Cookies(strUniqueID & "User")("Pword")))
ACK! I thought it worked. But when I was adding a reply to a topic, I clicked on the smiley icon to add a smiley, and got the following error:
Microsoft VBScript runtime error '800a000d'
Type mismatch: 'ChkUser2'
/forum/inc_top_short.asp, line 49
Line 49 is the one I added to inc_top_short.asp. It's the same as your post above, and I put it exactly where you said.
Help?
Paul Wood SLT Webmaster |
|
|
Topic |
|