| Author |
 Topic  |
|
n8pbm
Junior Member
USA
212 Posts |
 Posted - 04 October 2003 : 20:55:37
|
I have updated this mod so it will now work with the recurring events mod. See the first post for the updates and changes.
One thing that is not in the readme is this code:
for recuuring events mod:
pop_delete.asp
Find Line 264:
'## Forum_SQL - Delete any dates related to this topic
strSql = "DELETE FROM " & strTablePrefix & "CAL_EVENTS "
strSql = strSql & " WHERE TOPIC_ID = " & cLng(delAr(i))
my_Conn.Execute (strSql),,adCmdText + adExecuteNoRecords
Add below it:
'## Forum_SQL - Delete any signup list related to this topic
strSql = "DELETE FROM " & strTablePrefix & "SIGNUP "
strSql = strSql & " WHERE E_TOPIC_ID = " & cLng(delAr(i))
my_Conn.Execute (strSql),,adCmdText + adExecuteNoRecords
I'll update the readme with this change soon. |
Mike
Great Lakes Pop Up Club Camping |
 |
|
|
Baroudeur
Starting Member
25 Posts |
Posted - 15 October 2003 : 07:55:56
|
When i go to admin page i have this message
Type d'erreur :
Microsoft JET Database Engine (0x80040E10)
No value given for one or more required parameters.
/forumaargh/admin_signup.asp, line 49
I use french date is it the problem ?
And in the Readmerecurent.txt it is said
Line 855 find this code:
strSQL = strSQL & "," & IsEvent
strSql = strSql & ")"
Add below it: #########################Change to "strSQL = strSQL & "," & Request.Form("Elist")
'######################## Signup Mod #############################
If Request.Form("Elist")="1" then
strSql = strSql & ", " & 1
else
strSql = strSql & ", " & 0
end if
I think the red line should be placed after the end if no ? |
This account was hacked into by Image, a very honest guy as you all can see! Stealing people's passwords is his pasttime. Beware of this, before you register at his forums! |
Edited by - Baroudeur on 15 October 2003 10:46:21 |
|
|
|
n8pbm
Junior Member
USA
212 Posts |
Posted - 15 October 2003 : 20:48:30
|
Yes it should. Sorry, it was a typo.
YOu are correct on the admin page. I did not update it to include the correct tables. I will try to correct my mistakes and get out the updated admin page before Friday.
Thanks for letting me know. |
Mike
Great Lakes Pop Up Club Camping |
|
|
|
molitar
Starting Member
2 Posts |
Posted - 17 October 2003 : 02:03:23
|
Ok here is the fixed code. Was simple to find the typo's and correct them.
CHANGES INDICATED IN RED
--------------------Admin_Signup.asp---------------------------
REPLACE CODE
strSQL = "SELECT FORUM_ID, TOPIC_ID, T_EVENT_DATE, T_SUBJECT "
strSQL = strSQL & "FROM " & strMemberTablePrefix & "TOPICS "
strSQL = strSQL & "WHERE T_ISEVENT = 1 "
strSQL = strSQL & "AND T_EVENT_DATE < '" & datetostr(DateValue(strForumTimeAdjust)) & "' "
strSQL = strSQL & "ORDER BY T_EVENT_DATE"
WITH CODE
strSQL = "SELECT FORUM_ID, TOPIC_ID, T_DATE, T_SUBJECT "
strSQL = strSQL & "FROM " & strMemberTablePrefix & "TOPICS "
strSQL = strSQL & "WHERE T_ISEVENT = 1 "
strSQL = strSQL & "AND T_DATE < '" & datetostr(DateValue(strForumTimeAdjust)) & "' "
strSQL = strSQL & "ORDER BY T_DATE"
REPLACE THIS LINE
"<td width=""40%"" bgcolor=" & strForumCellColor & "><font size=" & strDefaultFontSize &" color=" & strDefaultFontColor & ">" & FormatDateTime(StrToDate(rsSQL("T_EVENT_DATE")), vbLongDate) & "</font></td>" & vbNewLine
TO THIS
"<td width=""40%"" bgcolor=" & strForumCellColor & "><font size=" & strDefaultFontSize &" color=" & strDefaultFontColor & ">" & FormatDateTime(StrToDate(rsSQL("T_DATE")), vbLongDate) & "</font></td>" & vbNewLine
----------------TOPICS.ASP-------------------------------------
CHANGE IN THIS LINE WHERE IT SAYS EVENTLIST.ASP TO YOUR OWN FOLDER
" <td valign=""bottom""><hr noshade size=""" & strFooterFontSize & """><font color=""" & strForumFontColor & """ face=""" & strDefaultFontFace & """ size=""" & strDefaultFontSize & """><span class=""spnMessageText"">To sign up for this event or to see who it attending click below:<br><a href=""" & strForumURL & "eventlist.asp?Event=" & TopicID & "&B1=Submit"">" & strForumURL & "eventlist.asp?Event=" & TopicID & "&B1=Submit</a> </span></font></td>" & vbNewLine & _
" <td valign=""bottom""><hr noshade size=""" & strFooterFontSize & """><font color=""" & strForumFontColor & """ face=""" & strDefaultFontFace & """ size=""" & strDefaultFontSize & """><span class=""spnMessageText"">To sign up for this event or to see who it attending click below:<br><a href=""" & strForumURL & "forums/eventlist.asp?Event=" & TopicID & "&B1=Submit"">" & strForumURL & "forums/eventlist.asp?Event=" & TopicID & "&B1=Submit</a> </span></font></td>" & vbNewLine & _
NOTE: where I added the subfolder forums/ before eventlist.asp
Ok make them changes and you will be up and running.
|
|
|
|
Red01Z06
Starting Member
18 Posts |
Posted - 07 November 2003 : 14:56:54
|
| Is there anyway to get it to save list in a text file? |
|
|
|
n8pbm
Junior Member
USA
212 Posts |
Posted - 07 November 2003 : 20:27:30
|
Sorry I have been away from this for a while.
Molitar - You should not have to add forum/ to topic.asp because the strForumURL should include that unless you put the mod in a different folder besides your forum. However if it works then don't change it.
I have updated most of the admin_signup.asp page. I was working on the ability to change some of the configurations of the eventlist into that admin screen. But I will throw up a fix for the current recurring signup mod this weekend.
Red01Z06 - Currently there is no option to export the list to a text file. I think it could be done but why not just copy and paste into a document?
Any interest in a mod that will add the option of what forum you can post events in on the forum property page instead of the cal_constants.asp file? I was going to add it to the signup mod but it might be better on it's own.. |
Mike
Great Lakes Pop Up Club Camping |
|
|
|
Davio
Development Team Member
Jamaica
12217 Posts |
Posted - 08 November 2003 : 10:13:45
|
n8pbm, great mod!! Thanks for updating it to work with recurring dates. 
One thing I noticed in your code though. You were including the inc_func_common.asp file, along with the inc_header.asp file in the same page. You need to remove the inc_func_common.asp include, because it is already included in the inc_header.asp page already. |
Support Snitz Forums
|
|
|
|
n8pbm
Junior Member
USA
212 Posts |
Posted - 09 November 2003 : 10:19:00
|
I have updated the mod to fix the admin_signup.asp file for the recurring events. Just upload the admin_signup.asp file if you are running Version 1.7.
I also removed inc_func_common.asp. Thanks Davio.
Link is on the first post. |
Mike
Great Lakes Pop Up Club Camping |
|
|
|
DavidRhodes
Senior Member
United Kingdom
1222 Posts |
Posted - 20 November 2003 : 15:34:48
|
n8pbm,
I've just come back to this mod, not changed it since the first release so trying to get back on track.
I've added the extra column to the TOPICS table (T_LIST_INCLUDE), replaced eventslist.asp with your new version and added admin_signup.asp and all seems to be working fine. I haven't yet added the extra code neede to make T_LIST_INCLUDE work, does this column just act as true/false whether the event should/shouldn't have a sign-up list?
By the way, i've experienced the same problem as previously mentioned whereby the link doesn't show up all the time on topic.asp, i fixed it by using if isevent then instead of if isevent = "1" although I see you have tried fixing this by using is_event? |
The UK MkIVs Forum |
|
|
|
n8pbm
Junior Member
USA
212 Posts |
Posted - 20 November 2003 : 17:53:16
|
DavidRhodes - Correct, The T_List_Include acts as a yes or no to show the link at the bottom of the event post. This is contolled by a checkmark when you add or edit a event.
The is_event was my attempt to fix the link not shown up once in a while. It seemed to work when I tested it. Did it not work for you? |
Mike
Great Lakes Pop Up Club Camping |
|
|
|
DavidRhodes
Senior Member
United Kingdom
1222 Posts |
Posted - 20 November 2003 : 18:20:18
|
| I didn't try the is_event, the value from the databse id boolean (true/false) so I just used if ievent then to check for true |
The UK MkIVs Forum |
|
|
|
JMT
Starting Member
17 Posts |
Posted - 22 November 2003 : 22:28:23
|
I use mySQL and Recurring dates and seem to be stumped with the reason for continuous errors please see below:
Microsoft OLE DB Provider for ODBC Drivers error '80040e14'
[MySQL][ODBC 3.51 Driver][mysqld-4.0.15-nt]You have an error in your SQL syntax. Check the manual that corresponds to your MySQL server version for the right syntax to use near ' '20031122000000')' at line 1
/cgi-bin/fsi-dallas-board/cal_post_info2.asp, line 66
Line 66 reads:
my_Conn.Execute (strSql),,adCmdText + adExecuteNoRecords
Any help appresiated. I know squat about ASP &/or SQL... |
|
|
|
RichardE
Starting Member
United Kingdom
20 Posts |
Posted - 30 November 2003 : 03:03:20
|
Mike
Sign up MOD is really great - thank you!
But I get a problem when I modify post_info.asp
I have 34.03 with the recurring event MOD and sign up 1.8B.
When I try to post there is an error -
Syntax error in INSERT INTO statement.
/snitz/post_info.asp, line 869
The sql is -
INSERT INTO FORUM_TOPICS (FORUM_ID, CAT_ID, T_SUBJECT, T_MESSAGE, T_AUTHOR, T_LAST_POST, T_LAST_POST_AUTHOR, T_LAST_POST_REPLY_ID, T_DATE, T_STATUS, T_IP, T_STICKY, T_SIG, T_ARCHIVE_FLAG, T_REPLIES, T_UREPLIES, T_ISEVENT, T_LIST_INCLUDE) VALUES (1, 1, 'xx', 'xx', 2, '20031130080222', 2, 0 , '20031130080222', 1 , '192.168.0.1', 0 , 0 , 1 , 0 , 0 ,, 0)
My modified code at is -
strSQL = strSQL & "," & Request.Form("Elist")
'########### Signup Mod #############################
If Request.Form("Elist")="1" then
strSql = strSql & ", " & 1
else
strSql = strSql & ", " & 0
end if
strSql = strSql & ")"
Can anyone advise?
Thanks in advance |
|
|
|
n8pbm
Junior Member
USA
212 Posts |
Posted - 30 November 2003 : 10:29:52
|
I have a mistake in the readme that I though I corrected. Make sure your code around line 855 looks like this:
if Request.Form("sig") = "yes" and strDSignatures = "1" then
strSql = strSql & ", 1 "
else
strSql = strSql & ", 0 "
end if
strSql = strSql & ", 1 "
strSQL = strSQL & ", 0 "
strSQL = strSQL & ", 0 "
strSQL = strSQL & "," & IsEvent
'######################## Signup Mod #############################
If Request.Form("Elist")="1" then
strSql = strSql & ", " & 1
else
strSql = strSql & ", " & 0
end if
strSql = strSql & ")"
You should have strSQL = strSQL & "," & IsEvent before the added code in the readme.
Sorry about the mistake. I will update the file with the correct readme. |
Mike
Great Lakes Pop Up Club Camping |
|
|
|
n8pbm
Junior Member
USA
212 Posts |
Posted - 30 November 2003 : 10:38:12
|
| JMT - Do you get this error after you installed the signup mod? the signup mod does not use cal_post_info2.asp. |
Mike
Great Lakes Pop Up Club Camping |
|
|
|
Topic |
|
Topic Locked
