Snitz Forums 2000
Snitz Forums 2000
Home | Profile | Register | Active Topics | Members | Search | FAQ
Username:
 Password:
Save Password
Forgot your Password?

 All Forums
 Snitz Forums 2000 MOD-Group
 MOD Add-On Forum (W/Code)
 Mod Merge REQ: Events & Announcements (fader)		  New Topic  Topic Locked
 Printer Friendly
Author Previous Topic Topic Next Topic  

dayve
Forum Moderator

USA
5820 Posts
Posted - 03 July 2001 :  16:03:30  Show Profile  Visit dayve's Homepage
You read that right. I would like my announcements fader to read and display Upcoming Events. Whey they click on it they will be transported to the calendar where they can view the events topic. I think this would be a great combination of 2 mods. I am going on vacation so if no one can whip this out really quick like, I will do it myself but TIA for anyone that helps make this happen.



Dayve

bjlt
Senior Member

1144 Posts
Posted - 03 July 2001 :  23:06:20  Show Profile
I've got similar ideas. what I want to do is to integrate events with classifieds.

some of the classifieds are just like events. e.g. discount from july 1 to july 7, celebrating the anniversary. it's a piece of ad as well as a event for those days.

i need to add category to calendar first, then in classifieds, on can select if it's an event and the category of it, it approved, it should auto matically show in the calendar under that category.

i like the idea of annoucements, however, in my site, it would be too much a/n. that's why i want categories.

what's your idea on this? i know little about programming.
Go to Top of Page

GauravBhabu
Advanced Member

4288 Posts
Posted - 04 July 2001 :  11:31:26  Show Profile
Here just add this code to your inc_fader.asp after the staements shown in bold.

 

<%
		    rsAnnounce.MoveNext
		    intI  = intI + 1
		loop
	end if
				
%>



<%
	'## Forum_SQL
	strSql = "SELECT " & strTablePrefix & "EVENTS.EVENT_ID"
	strSql = strSql & ", " & strTablePrefix & "EVENTS.PRIVATE"
	strSql = strSql & ", " & strTablePrefix & "EVENTS.EVENT_TITLE"
	strSql = strSql & ", " & strTablePrefix & "EVENTS.EVENT_DETAILS"
	strSql = strSql & ", " & strTablePrefix & "EVENTS.START_DATE"
	strSql = strSql & ", " & strTablePrefix & "EVENTS.END_DATE"
	strSql = strSql & " FROM " & strTablePrefix & "EVENTS "
	if mLev < 4 then
		strSql = strSql & " WHERE " & strTablePrefix & "EVENTS.START_DATE <= " & "'" & DatetoStr(Now()) & "'"
		strSql = strSql & " AND " & strTablePrefix & "EVENTS.END_DATE > " & "'" & DatetoStr(Now()) & "'"
  end if
	strSql = strSql & " ORDER BY " & strTablePrefix & "EVENTS.START_DATE DESC"
	strSql = strSql & ", " & strTablePrefix & "EVENTS.EVENT_ID DESC;"

	set rsEvents = Server.CreateObject("ADODB.Recordset")
	rsEvents.cachesize = 20
	rsEvents.open  strSql, my_Conn, 3

	if not(rsEvents.EOF or rsEvents.BOF) then  '## Replies found in DB
		rsEvents.movefirst
		rsEvents.pagesize = strPageSize
		maxpages = cint(rsEvents.pagecount)
	end if
	if rsEvents.EOF or rsEvents.BOF then  '## No replies found in DB
		Response.Write ""
	else
		'rsEvents.movefirst
		'intI = intI
		do until rsEvents.EOF '**
			EventsSubject = rsEvents("Event_TITLE")
			EventsID = rsEvents("Event_ID")
			EventsLink = strForumURL & "pop_event.asp?Event_ID=" & EventsID
			'EventLink = "javascript:openEventWindow('EventsLink')"%>
	      <param name="text<% =intI %>" value="<% =EventsSubject %> (click)">
	      <param name="url<% =intI %>" value="<% =EventsLink %>">
	      <param name="font<% =intI %>" value="Verdana,PLAIN,16">
<%
		    rsEvents.MoveNext
		    intI  = intI + 1
		loop
	end if
%>






see here just a beginning...

gauravbhabu

There is only one miracle...That is LIFE!

Edited by - GauravBhabu on 04 July 2001 11:37:44
Go to Top of Page

dayve
Forum Moderator

USA
5820 Posts
Posted - 04 July 2001 :  17:53:20  Show Profile  Visit dayve's Homepage
this works on my local server but on my live forum I get an array error message in the status bar. I think it is because I have 2 topics in the calendar for one day... that is the only difference... going to do some more testing

Dayve
Go to Top of Page

GauravBhabu
Advanced Member

4288 Posts
Posted - 04 July 2001 :  18:09:27  Show Profile
quote:

this works on my local server but on my live forum I get an array error message in the status bar. I think it is because I have 2 topics in the calendar for one day... that is the only difference... going to do some more testing

Dayve


Nope. works fine. I have just added two events for the same day in the calender and they show up fine. check here just a beginning....

gauravbhabu

There is only one miracle...That is LIFE!
Go to Top of Page

dayve
Forum Moderator

USA
5820 Posts
Posted - 05 July 2001 :  10:49:09  Show Profile  Visit dayve's Homepage
send me your inc_fader.asp if you don't mind to webmaster@nineinchnailz.com or post a text version here... thanks again...

Dayve
Go to Top of Page

GauravBhabu
Advanced Member

4288 Posts
Posted - 05 July 2001 :  11:40:03  Show Profile
quote:

send me your inc_fader.asp if you don't mind to webmaster@nineinchnailz.com or post a text version here... thanks again...

Dayve


But what is the error you are getting? the array error can occur if you have removed the ' from the IntI

[code]
if rsEvents.EOF or rsEvents.BOF then '## No replies found in DB Response.Write ""
else
'rsEvents.movefirst
'intI = intI

gauravbhabu

There is only one miracle...That is LIFE!

Edited by - GauravBhabu on 05 July 2001 11:44:49
Go to Top of Page

dayve
Forum Moderator

USA
5820 Posts
Posted - 05 July 2001 :  12:58:37  Show Profile  Visit dayve's Homepage
since the error is with the java applet it only shows for a second in the status bar when I hover over the java container (gray area) I did not remove the comment lines. It is really strange because it works on my test forum on my Win2K machine at home but causes an error at my host site...

Dayve
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.16 seconds. Powered By: Snitz Forums 2000 Version 3.4.07