| Author |
 Topic  |
|
kycable
New Member
USA
82 Posts |
 Posted - 07 January 2001 : 20:48:09
|
Huwr and myself have designed this little code to throw in your register.asp file.
What it does is send a customizable private message to a new member.
This is just a rought draft until I add the admin options page. There will be more updates to this. For right now you can customize this manually until then.
Open your register.asp file and go directly to here:
BTW: This does require the private message mod.
http://www.webzonecomplete.com/mods/zips/new_member_pm.txt
Hope you enjoy, if you have a problem let me know.
Jeff Brown
Web Zone Complete
<Snitz with many addons> |
|
|
kycable
New Member
USA
82 Posts |
Posted - 07 January 2001 : 20:52:24
|
look for these and add them to your register.asp file:
<pre id=code><font face=courier size=2 id=code>
'########################### PM NEW MEMBER #####################
strSql = strSql & " VALUES ("
<b>strSql = strSql & "'Welcome to Web Zone Complete'"</b> <font color=red><--- THIS IS THE SUBJECT LINE</font id=red>
<b>strSql = strSql & ", " & "'5'"</b> <font color=red><--- Admins UserID (Default is 1</font id=red>
strSql = strSql & ", " & "'" & GetMemberID( Request.Form("Name")) & "'"
strSql = strSql & ", " & "'" & DateToStr(strForumTimeAdjust) & "'"
[b]strSql = strSql & ", " & "'<center><b><font color=red>Thank you<font color=red><--- Your personal message</font id=red>
strSql = strSql & ", " & "'0'"
strSql = strSql & ", " & "'0'"
if request.cookies("paging")("outbox") = "double" or request.cookies("paging")("outbox") = "single" then
strSql = strSql & ", " & 1 & ")"
else
strSql = strSql & ", " & 0 & ")"
end if
</font id=code></pre id=code>
Jeff Brown
Web Zone Complete
<Snitz with many addons>
Edited by - KYCable on 07 January 2001 22:13:24 |
 |
|
|
RichardKinser
Snitz Forums Admin
USA
16655 Posts |
Posted - 07 January 2001 : 21:00:48
|
This part can probably be changed:
<font size=1><pre id=code><font face=courier size=2 id=code> if request.cookies("paging")("outbox") = "double" or request.cookies("paging")("outbox") = "single" then
strSql = strSql & ", " & 1 & ")"
else
strSql = strSql & ", " & 0 & ")"
end if</font id=code></pre id=code></font id=size1>
depending on which version of the PM mod you have the cookies may be different, but since this is going to be sent automatically by the forum and be from the Admin, not the user (and the user won't have the paging cookie anyway).
if you want to have the message put in the Admin's outbox replace the code above with:
<font size=1><pre id=code><font face=courier size=2 id=code> strSql = strSql & ", " & 1 & ")"</font id=code></pre id=code></font id=size1>
if you don't want to have the message put in the Admin's outbox replace the code above with:
<font size=1><pre id=code><font face=courier size=2 id=code> strSql = strSql & ", " & 0 & ")"</font id=code></pre id=code></font id=size1>
btw, Excellent addition for the PM mod. If you've got Da_Stimulator's E-Mail mod, then it could probably easily be modified to administer this also.
Edited by - Richard Kinser on 07 January 2001 21:07:16 |
|
|
|
kycable
New Member
USA
82 Posts |
|
|
kycable
New Member
USA
82 Posts |
Posted - 09 January 2001 : 07:46:00
|
Well the admin interface is now complete, you are now able to modify your message, turn it on or off, modify your subject line and who it is from (incase you are not using admin as your username)
I would like to publically thank HuwR for the help with this mod.
This link should work until my new server is set up:
http://webzonecomplete.brinkster.net/mods/zips/new_mem_pm.zip
After the new server it will be http://www.webzonecomplete.com/mods/zips/new_mem_pm.zip
You can see an example at those addresses. (without the /mods/zips)
Hope you enjoy,
If you have any problems let me know.
Jeff Brown
Web Zone Complete
<Snitz with many addons> |
|
|
|
Metric
Starting Member
7 Posts |
Posted - 09 January 2001 : 12:58:35
|
i keep getting the following. All ive done is up the files and edit my existing register.asp and stuck in the bit of code you mentioned.
Microsoft JET Database Engine error '80040e37'
The Microsoft Jet database engine cannot find the input table or query 'FORUM_MODS'. Make sure it exists and that its name is spelled correctly.
/admin_new_mem_pm.asp, line 20
Im using a modified script i think its richards above, the url is www.dvdforum.co.uk
Thanks
Mike
|
|
|
|
kycable
New Member
USA
82 Posts |
Posted - 09 January 2001 : 13:17:21
|
quote:
i keep getting the following. All ive done is up the files and edit my existing register.asp and stuck in the bit of code you mentioned.
Microsoft JET Database Engine error '80040e37'
The Microsoft Jet database engine cannot find the input table or query 'FORUM_MODS'. Make sure it exists and that its name is spelled correctly.
/admin_new_mem_pm.asp, line 20
Im using a modified script i think its richards above, the url is www.dvdforum.co.uk
Thanks
Mike
Do you have the Mod Commander installed?
There should be a Table in your database called FORUM_MODS
Inside that table should be:
M_NAME, M_CODE, M_VALUE
M_NAME Should have a Text Data Type
M_CODE Should have a Text Data Type
M_VALUE I changed to a Memo Data Type
(So I could have more then 255 chars)
Jeff Brown
www.webzonecomplete.com" target="_blank">Web Zone Complete
<Snitz with many addons> |
|
|
|
wedont
Junior Member
Canada
344 Posts |
Posted - 09 January 2001 : 17:04:33
|
Installed on v3.1sr2, access2k+ mod commander+Pm...
Got the following error;
Microsoft OLE DB Provider for ODBC Drivers error '80040e14'
[Microsoft][ODBC Microsoft Access Driver] Syntax error (missing operator) in query expression ...
forum/admin_new_mem_pm.asp, line 46
Line 46 is:
my_Conn.Execute (strSql)
Any Clues?
Wedont
snitz ver3.1 sr2
Edited by - wedont on 09 January 2001 17:07:20 |
|
|
|
kycable
New Member
USA
82 Posts |
Posted - 09 January 2001 : 17:34:09
|
quote:
Installed on v3.1sr2, access2k+ mod commander+Pm...
Got the following error;
Microsoft OLE DB Provider for ODBC Drivers error '80040e14'
[Microsoft][ODBC Microsoft Access Driver] Syntax error (missing operator) in query expression ...
forum/admin_new_mem_pm.asp, line 46
Line 46 is:
my_Conn.Execute (strSql)
Any Clues?
Wedont
snitz ver3.1 sr2
Edited by - wedont on 09 January 2001 17:07:20
I will write a setup utility. See if it can write the fields it needs. Be back shortly
Jeff Brown
Web Zone Complete
<Snitz with many addons> |
|
|
|
kycable
New Member
USA
82 Posts |
Posted - 09 January 2001 : 17:55:51
|
quote:
I will write a setup utility. See if it can write the fields it needs. Be back shortly
Jeff Brown
Web Zone Complete
<Snitz with many addons>
I have modified HuwR's code to setup/modify the database.
Here is the download http://webzonecomplete.brinkster.net/mods/mem_pm_setup.zip
This should work properly. As for the zip file above I have also updated it as well.
Jeff Brown
Web Zone Complete
<Snitz with many addons>
Edited by - KYCable on 09 January 2001 18:39:26 |
|
|
|
wedont
Junior Member
Canada
344 Posts |
Posted - 09 January 2001 : 18:30:53
|
Hi Jeff,
The problem seems to be with the lenght of the text. Eventhough I did change "M_VALUE" to MEMO. I checked twice and it still wont accept more then a couple lines!
Wedont
snitz ver3.1 sr2
Jeff the link you just posted, not sure it's the right one. LOL
Edited by - wedont on 09 January 2001 18:35:47 |
|
|
|
kycable
New Member
USA
82 Posts |
Posted - 09 January 2001 : 18:46:27
|
quote:
Hi Jeff,
The problem seems to be with the lenght of the text. Eventhough I did change "M_VALUE" to MEMO. I checked twice and it still wont accept more then a couple lines!
Wedont
snitz ver3.1 sr2
Jeff the link you just posted, not sure it's the right one. LOL
Edited by - wedont on 09 January 2001 18:35:47
You don't know how bad I am kicking myself right now.... All I can say it ****, that sucks I had a really long letter setup and BTW thanks for updating my DB and erasing all of it. 
God I just can't believe I did that. I am just sitting here laughing at my own stupidity.
Anyways about this problem... I am not sure. I can not figure that out. If the database is set as memo then then it should allow a large number of chars in the field. hmmmm... I am looking at it now.
Jeff Brown
Web Zone Complete
<Snitz with many addons> |
|
|
|
HuwR
Forum Admin
United Kingdom
20584 Posts |
Posted - 09 January 2001 : 18:57:57
|
Ooops
'Resistance is futile' |
|
|
|
wedont
Junior Member
Canada
344 Posts |
Posted - 09 January 2001 : 19:01:39
|
F---en Hope you dont mean that by clicking on your link, your DB got erased?
Wedont
snitz ver3.1 sr2 |
|
|
|
kycable
New Member
USA
82 Posts |
Posted - 09 January 2001 : 19:08:00
|
quote:
F---en Hope you dont mean that by clicking on your link, your DB got erased?
Wedont
snitz ver3.1 sr2
Oh no, I was just laughing at myself, yes it did erase my NewMemPM fields... that is all. No big deal I had it saved on my other site.
Ever done something so stupid that all you can do is laugh about it? That is all I did.
No biggy, its fixed.
Jeff Brown
Web Zone Complete
<Snitz with many addons> |
|
|
|
wedont
Junior Member
Canada
344 Posts |
Posted - 09 January 2001 : 19:12:14
|
Glad to hear it!
(felt quite embarrassed)
I guess I will back up my DB before running the set-up? :)
Wedont
snitz ver3.1 sr2 |
|
|
|
Topic |
|
Topic Locked
