Birthday MOD - Automatically send email on B-Day?

Snitz™ Forums 2000
https://forum.snitz.com/forumTopic/Posts/62449?pagenum=1
05 November 2025, 04:04

Topic


JBaldwin
Birthday MOD - Automatically send email on B-Day?
30 July 2006, 07:40


How simple(?) would it be to implement into the birthday mod, this idea? If it is a members birthday, I would like to have the forum automatically send a "Happy Birthday" Email or PM, possibly integrated into the admin_pop_mail.asp (Email All Users Mod).<

 

Replies ...


JBaldwin
31 July 2006, 13:32


Ok. I have kind of been looking into this a little bit. I am trying to implement an add-on to the "Email All Users Mod". I have added selections to this mod before so I know how to do it, but this one is throwing a wrench in the works for me. Here is where I have gotten so far.
In the table "FORUM_MEMBERS" the field "M_DOB" looks like it is stored as a string in the form of "yyyymmdd". To admin_pop_mail.asp ("Email All Users") I have added the following to my SQL statement:

Code:

	if Err_Msg = "" then

'FORMAT TODAYS DATE TO MATCH THE DATABASE STRING (M_DOB)
Dim today
today = Left(DateToStr(strForumTimeAdjust),8)
'END DATE FUNCTION

strSql = "SELECT M_NAME, M_EMAIL, M_LEVEL, M_DOB"

......
Case 4
strSql = strSql & " AND M_DOB = " & today

I added a response.write strSql above the :

Code:

		rsMail.Open strSql, my_Conn, 0, 1, &H0001

, to ensure it was converting the date correctly to a string and in the same format as it is stored in DB (Access). However, when I try to send an email to the "Case 4" Members (test), I get this error:

Code:

SELECT M_NAME, M_EMAIL, M_LEVEL, M_DOB
FROM FORUM_MEMBERS WHERE M_STATUS = 1
AND M_RECEIVE_EMAIL = 1 AND M_DOB = 20060731
Microsoft JET Database Engine error '80040e07'

Data type mismatch in criteria expression.

/forum/forum2/admin_pop_mail.asp, line 157

Any ideas here? The SQL looks good and the output of the Response.Write looks good too? What else could it be really? Knowing me, something small and stupid that I overlooked again. LOL.
<
AnonJr
31 July 2006, 14:48


Since the date is stored as a string, you'll need to put single quotes around it - otherwise it thinks you are sending it a number.<
JBaldwin
31 July 2006, 15:33


Now I do not get any errors. Thanks very much. But now it s saying "No Members Found" ??? I set up two dummy accounts, "Test" and "Demo" and set their birthdays to today to try it out and it tells me "No Members Found". Odd.<
AnonJr
01 August 2006, 07:41


Hmm. Not sure about that one. You double-checked the value in the database?<
JBaldwin
01 August 2006, 10:32


yeah...very odd, right?<
Shaggy
01 August 2006, 10:37


Code:
"SELECT [FIELDS] FROM MEMBERS WHERE M_DOB LIKE '%"&mid(datetostr(strforumtimeadjust),5,4)&"'"
Unless any of your members were born today, which I ver much doubt, you're not going to get any members doing it the way you currently are. wink
<
JBaldwin
01 August 2006, 12:40


LMAO. Oh my!!! Yeah, I guess you are correct with that observation. LOL Thanks Shaggy. LOL<
AnonJr
01 August 2006, 13:28


whoops.. missed that one myself! blush
Guess that takes care of it. tongue<
Shaggy
02 August 2006, 05:28


You're welcome smile
<
tribaliztic
05 January 2007, 03:21


Is there a mod released for this one? =)
<
© 2000-2021 Snitz™ Communications