Snitz Forums 2000 - How do I make events recurring (cont.)

Snitz Forums 2000

Username:	Password:
Save Password
Forgot your Password?

All Forums

Snitz Forums 2000 MOD-Group

MOD Add-On Forum (W/O Code)

How do I make events recurring (cont.)

New Topic

Topic Locked

Printer Friendly

Previous Page | Next Page

Author

Topic

Page: of 5

macho
Junior Member

Denmark
150 Posts

Posted - 11 August 2002 : 12:10:00

I only have values in the new added events!

GauravBhabu
Advanced Member

4288 Posts

Posted - 11 August 2002 : 12:21:59

Which statement is giving you error? Can you put 0 value for all events where there is no value. And then check if you still getting the error.

CSS and HTML4.01 Compilant Snitz Forum . ForumSquare . Rakesh Jain

It is difficult to IMPROVE on Perfection, There is no harm in Keep Trying.

Prayer Of Forgiveness "I forgive all living beings. May all living beings forgive me!
I cherish the friendliness towards all and harbour enmity towards none." -- Aavashyaka Sutra(Translated)

macho
Junior Member

Denmark
150 Posts

Posted - 11 August 2002 : 12:31:04

This is the error I keep getting:


ADODB.Fields error '800a0cc1'
Unknown runtime error  
events_functions.asp, line 980

When trying to see page:
events.asp?view=day&date=11-08-2002

Line 980:


		Response.write "Repeat: " & Rs("Event_Repeat")

I just tried to put 0 value for all events without value, but is getting the same error.
I'm only getting the above mentioned error msg when trying to view a day that has an event. No error if the day has no events!

GauravBhabu
Advanced Member

4288 Posts

Posted - 11 August 2002 : 12:50:52

Hmmm! That is strange or may be I am missing something. Comment out the statement and let us see if the error goes away and tell post what it prints.

macho
Junior Member

Denmark
150 Posts

Posted - 11 August 2002 : 12:58:22

I just saw this other error msg at the buttom of the events page, no matter if it's day, week or

month view:


Microsoft VBScript runtime error '800a01c2' 

Wrong number of arguments or invalid property assignment: 'EventRepeat' 

events_functions.asp, line 46

Sorry, but I hardly ever look at the buttom for error msg's.

Line 46 is this:


Call EventRepeat(Event_Repeat, Event_Date)
if EventRepeat then                <----Line 46
   Rem -Display the Event
End if
Function EventRepeat(intRepeat, DateIn)
     EventRepeat = False
     Select Case intRepeat
        Case 0
           Rem -One Time Event
           if DateIn = Date then EventRepeat = True
        Case 1
           Rem -Repeat Every Year
           if Month(DateIn) = Month(Date) and Day(DateIn) = Day(Date) then
              EventRepeat = True
           end if
        Case 2
           Rem -Repeat Every Month
           if Day(DateIn) = Day(Date) then
              EventRepeat = True
           end if
        Case 3
           Rem -Repeat Every Week
           if WeekDay(DateIn) = WeekDay(Date) then
              EventRepeat = True
           end if        
        Case 4
           Rem -Repeat Every Day
           EventRepeat = True
    End select 
End Function

GauravBhabu
Advanced Member

4288 Posts

Posted - 11 August 2002 : 13:01:39

Remove this part. This was only to tell how to call the function and was posted incorrectly.

Call EventRepeat(Event_Repeat, Event_Date) 
if EventRepeat then   <----Line 46    
  Rem -Display the Event 
End if

Edited by - GauravBhabu on 11 August 2002 13:02:34

macho
Junior Member

Denmark
150 Posts

Posted - 11 August 2002 : 13:11:53

Okay, I removed the top part and after that the error msg at the buttom of the page is gone!

I commented out the statement that gave the other error msg:

Response.write "Repeat: " & Rs("Event_Repeat")

No error msg anymore but now I get this when trying to view event by day:

Start Date: 20020811000000

GauravBhabu
Advanced Member

4288 Posts

Posted - 11 August 2002 : 13:14:01

Let us uncomment the statement. What is the datatype of the Event_Repeat (That is what you named the field, right?) in the database.

macho
Junior Member

Denmark
150 Posts

Posted - 11 August 2002 : 13:22:06

It's now uncommented again. The datatype of the Event_Repeat (which I did call it) is "number".

GauravBhabu
Advanced Member

4288 Posts

Posted - 11 August 2002 : 13:28:01

Did you get the error again.

macho
Junior Member

Denmark
150 Posts

Posted - 11 August 2002 : 13:30:23

Yes I do!

GauravBhabu
Advanced Member

4288 Posts

Posted - 11 August 2002 : 13:41:30

Post a link to text version of your event_functions.asp. Remove the big statement from the posts above . It is causing the Horizontal scroll to appear.

macho
Junior Member

Denmark
150 Posts

Posted - 11 August 2002 : 14:00:37

Here's a text version of events_functions.asp:
http://www.staal-larsen.dk/snitz/events_functions.txt

I've removed the big statement from my earlier post as you suggested!

Edit: In the posted text version I had to remove some javascript that caused some problems with showing the page correctly, so now the line numbers changed some!

Edited by - macho on 11 August 2002 14:02:34

GauravBhabu
Advanced Member

4288 Posts

Posted - 11 August 2002 : 14:07:05

change this

Rs("Event_Repeat")

to this

Rs("event_repeat")

Notice the lowercase.

macho
Junior Member

Denmark
150 Posts

Posted - 11 August 2002 : 14:17:14

I changed it to lowercase, but getting the same error msg:


ADODB.Fields error '800a0cc1'
Unknown runtime error
events_functions.asp, line 942


	If NOT Rs.EOF Then
			Do While NOT Rs.EOF
		Response.write "Repeat: " & Rs("event_repeat")           <------- Line 942
		Response.write "Start Date: " & Rs("start_date")

Page: of 5

Topic

Previous Page | Next Page

New Topic

Topic Locked

Printer Friendly

Jump To:

Snitz Forums 2000

This page was generated in 0.2 seconds.