| Author |
 Topic  |
|
@tomic
Senior Member
USA
1790 Posts |
 Posted - 29 August 2002 : 02:52:22
|
To bring the formatting up to 3.4.01 stndards add this at line 110 of privatesend.asp:
Response.Write " <script language=""JavaScript"" type=""text/javascript"" src=""inc_code.js""></script>" & vbNewLine & _
" <script language=""JavaScript"" type=""text/javascript"" src=""selectbox.js""></script>" & vbNewLine
Then add this to line 184:
onselect=""storeCaret(this);"" onclick=""storeCaret(this);"" onkeyup=""storeCaret(this);"" onchange=""storeCaret(this);""
The entire line should look like this when you are done:
" <td bgColor=""" & strPopUpTableColor & """><textarea cols=""45"" name=""Message"" rows=""8"" wrap=""VIRTUAL"" onselect=""storeCaret(this);"" onclick=""storeCaret(this);"" onkeyup=""storeCaret(this);"" onchange=""storeCaret(this);"">" & Trim(CleanCode(TxtMsg)) & "</textarea></td>" & vbNewLine & _
This will wrap forum code around the text you highlight before clicking a format button.
@tomic |
SportsBettingAcumen.com |
Edited by - @tomic on 29 August 2002 11:51:09 |
 |
|
|
vasanthm
Starting Member
35 Posts |
Posted - 29 August 2002 : 03:30:47
|
I added a feature to this mod.. Now in my forum if any one get a PM a java script box pops up saying thay have a message and wheather they want to read it.. below is the code
add this to pages such as default.asp , post.asp, forum.asp etc.. but not header.asp since it will call the script in an loop...
Place this in pages you would like the user to know he has received a PM when he visits the page.. (The PM mod needs to be installed for this to work...)
Demo at www.izer.tk
register yourself and send yourself a PM and again visit any of the pages you will get a pop up sayin u have got a message.. and ok button whcih takes u to the message...
<%
if MemberID > 0 then
if strDBNTUserName <> "" then
' Get Private Message count for display on Default.asp
if strDBType = "access" then
strSqL = "SELECT count(M_TO) as [pmcount] "
else
strSqL = "SELECT count(M_TO) as pmcount "
end if
strSql = strSql & " FROM " & strMemberTablePrefix & "MEMBERS , " & strTablePrefix & "PM "
strSql = strSql & " WHERE " & strMemberTablePrefix & "MEMBERS.M_NAME = '" & strDBNTUserName & "'"
strSql = strSql & " AND " & strMemberTablePrefix & "MEMBERS.MEMBER_ID = " & strTablePrefix & "PM.M_TO "
strSql = strSql & " AND " & strTablePrefix & "PM.M_READ = 0 "
Set rsPM = my_Conn.Execute(strSql)
pmcount = rsPM("pmcount")
rsPM.close
set rsPM = nothing
if(pmcount>0) then
response.write " <script language=""JavaScript""> { input_box=confirm(""You have a new private message. Click OK to view it, or cancel to hide this prompt.""); if (input_box==true) { second_box=confirm(""Open in new window?\n\n(Press cancel to open your Inbox in the current window.)""); if (second_box==true) { window.open('pm_view.asp?s=','pmnew','width=600,height=500,menubar=yes,scrollbars=yes,toolbar=yes,location=yes,directories=yes,resizable=yes,top=50,left=50'); } else { window.location=""pm_view.asp?s=""; }} else { }} // </script>"
end if
end if
end if
%> |
|
|
|
Ez4arab
Junior Member
479 Posts |
|
|
lir
New Member
USA
67 Posts |
Posted - 29 August 2002 : 10:57:34
|
quote:
add this to pages such as default.asp , post.asp, forum.asp etc.. but not header.asp since it will call the script in an loop...
Place this in pages you would like the user to know he has received a PM when he visits the page.. (The PM mod needs to be installed for this to work...)
|
lir |
|
|
|
ErEf
New Member
Netherlands
74 Posts |
Posted - 29 August 2002 : 11:37:52
|
How can I solve this error?
Error Type:
Microsoft VBScript runtime (0x800A000D)
Type mismatch: 'strArray'
/forum/inc_func_common.asp, line 1447
Browser Type:
Mozilla/4.0 (compatible; MSIE 6.0; Windows NT 5.1)
Page:
GET /forum/Default.asp
This is the code in inc_function_common.asp:
function InArray(strArray,strValue)
if strArray <> "" and strArray <> 0 then
if (instr("," & strArray & "," ,"," & strValue & ",") > 0) then
InArray = True
exit function
end if
InArray = False
end if
end function
when i place commentsigns in front of the code in the function. de default.asp shows, but i cannot see possibilty to send an PM to someone. |
If you think you can or you think you cannot, you are right. - Henry Ford |
|
|
|
@tomic
Senior Member
USA
1790 Posts |
Posted - 29 August 2002 : 11:43:44
|
I don't think this is related to Private Messages. Have you installed any other MODs?
@tomic |
SportsBettingAcumen.com |
|
|
|
CodeName
Junior Member
296 Posts |
Posted - 29 August 2002 : 12:03:15
|
@tomic, Private Messages 3.4.1 is working ok without AnyBugs and Erros ? And How we can use this code ?
"
<%
if MemberID > 0 then
if strDBNTUserName <> "" then
' Get Private Message count for display on Default.asp
if strDBType = "access" then
strSqL = "SELECT count(M_TO) as [pmcount] "
else
strSqL = "SELECT count(M_TO) as pmcount "
end if
strSql = strSql & " FROM " & strMemberTablePrefix & "MEMBERS , " & strTablePrefix & "PM "
strSql = strSql & " WHERE " & strMemberTablePrefix & "MEMBERS.M_NAME = '" & strDBNTUserName & "'"
strSql = strSql & " AND " & strMemberTablePrefix & "MEMBERS.MEMBER_ID = " & strTablePrefix & "PM.M_TO "
strSql = strSql & " AND " & strTablePrefix & "PM.M_READ = 0 "
Set rsPM = my_Conn.Execute(strSql)
pmcount = rsPM("pmcount")
rsPM.close
set rsPM = nothing
if(pmcount>0) then
response.write " <script language=""JavaScript""> { input_box=confirm(""You have a new private message. Click OK to view it, or cancel to hide this prompt.""); if (input_box==true) { second_box=confirm(""Open in new window?\n\n(Press cancel to open your Inbox in the current window.)""); if (second_box==true) { window.open('pm_view.asp?s=','pmnew','width=600,height=500,menubar=yes,scrollbars=yes,toolbar=yes,location=yes,directories=yes,resizable=yes,top=50,left=50'); } else { window.location=""pm_view.asp?s=""; }} else { }} // </script>"
end if
end if
end if
%>
"
At which Pages we have to add this ? All ? Or Only default.asp ?
Because I didnt understand here 
"add this to pages such as default.asp , post.asp, forum.asp etc.. but not header.asp since it will call the script in an loop..." |
|
|
|
vasanthm
Starting Member
35 Posts |
Posted - 29 August 2002 : 13:39:45
|
Ok let me clear your doubts about the code i posted..
Now consider this.. A user receives a PM but never sees the bottom og the page so he does not know that he has got a PM.. now if my code in inserted in post.asp.. When ever a user posts if he has any Private message.. then a dialog pops up saying he has got a message... and takes him to the message if he clicks ok...
So if you want to notify the user when he reads any topin on the forum then add the code in forum.asp..
See the demo at www.izer.tk just register and send a PM to yourself and just clik all forums.. You will immediately get a pop up..
Any doubts... |
|
|
|
CodeName
Junior Member
296 Posts |
Posted - 29 August 2002 : 13:53:45
|
| And Somebody Can Put pop_delete.asp File For Private Messages 3.4.1 please ? Because I cannot Add the codes for Private Messages to pop_delete.asp file ... |
|
|
|
CodeName
Junior Member
296 Posts |
Posted - 29 August 2002 : 14:10:19
|
Man I cant login to Your forum .. I Registered Username but when ý want to login your forum , after loggining its making logout directly ..
And Only forum.asp We have to add that code ? |
|
|
|
ErEf
New Member
Netherlands
74 Posts |
Posted - 29 August 2002 : 16:08:06
|
You're right. I just saw it after installing the mod. It is the only mod installed know after upgrading to 3.4.01.
The problem is only there after I log in as Admin, not when i log in as user
But still I do not have te poss. to send PM's
|
If you think you can or you think you cannot, you are right. - Henry Ford |
|
|
|
CodeName
Junior Member
296 Posts |
Posted - 29 August 2002 : 17:32:35
|
Nobody can put here pop_delete.asp for Private Messages 3.4.1 !??  |
|
|
|
CodeName
Junior Member
296 Posts |
Posted - 29 August 2002 : 17:37:43
|
And How can I remove in Private Messages 3.4.1 "Send To All Users This Message" This checkbox .. how I remove it ?(checkbox and text)
And Please dont forget the put pop_delete.asp for Private Messages 3.4.1 ( ready file )  "Please" .. |
|
|
|
@tomic
Senior Member
USA
1790 Posts |
Posted - 29 August 2002 : 17:38:33
|
quote:
Nobody can put here pop_delete.asp for Private Messages 3.4.1 !??
I will do it in a few hours. Check back and I will have it. Just be patient.
@tomic |
SportsBettingAcumen.com |
|
|
|
CodeName
Junior Member
296 Posts |
Posted - 29 August 2002 : 17:49:52
|
I checked but I didnt see For This I did want it from here
And How can I disable that "send to all users" checkbox and text ?
I'm waiting
Thanks |
|
|
|
Topic |
|
Topic Locked
