Adding signatures to private messages

The Forum has been Updated

The code has been upgraded to the latest .NET core version. Please check instructions in the Community Announcements about migrating your account.

Adding signatures to private messages - Posted 11 Apr 2008 09:51 (2515 Views)

philsbbs

Member Locked

Posts: 397

397

Hi,

I want to have the option to include profile signatures in private messages.
So far I've coded :-

Response.Write " </font></td>" & vbNewLine & _
" </tr>" & vbNewLine & _
" </table>" & vbNewLine & _
" </font></td>" & vbNewLine & _
" <td bgColor=""" & strPopUpTableColor & """><textarea cols=""45"" name=""Message"" rows=""10"" wrap=""VIRTUAL""

onselect=""storeCaret(this);"" onclick=""storeCaret(this);"" onkeyup=""storeCaret(this);"" onchange=""storeCaret(this);"">" & Trim(CleanCode(TxtMsg)) &

"</textarea><hr><font face=""" & strDefaultFontFace & """ size=""" & strDefaultFontSize & """><input name=""Sig"" id=""Sig"" type=""checkbox"" value=""yes""

checked><label for=""Sig"">Check here to include your profile signature.</label></td>" & vbNewLine & _ " </tr>" & vbNewLine & _
" <tr>" & vbNewLine & _

In privatesend.asp

What do I add next.
<

Phil

Posted 11 Apr 2008 19:57

cripto9t

Average Member

Posts: 881

881

I don't have pm running but I do have a copy, so I'm guessing at this.
Open privatesend_info.asp

find this

Code:

		txtMessage = ChkString(Request.Form("Message"),"message")
		txtSubject = ChkString(Request.Form("Subject"),"SQLString")

Add this after it

Code:

		if strSignatures = "1" and strDSignatures <> "1" then
			if Request.Form("sig") = "yes" and GetSig(strDBNTUserName) <> " " then
				txtMessage = txtMessage & vbNewline & vbNewline & ChkString(GetSig(strDBNTUserName), "signature" )
			end if
		end if

find this

Code:

		txtMessage = ChkString(Request.Form("Message"),"message")
		txtSubject = ChkString(strPMSubject,"SQLString")
		txtSubject = Replace(txtSubject, "RE: ", "")
		txtSubject = Replace(txtSubject, "FWD: ", "")

And add the same code as above under it

I think that will work

ps: this won't work for dynamic sigs. You'll have to make changes in another file for that. Search for "sig" in "topic.asp" to see how it's done there.<

_-/Cripto9t\-_

Posted 12 Apr 2008 15:43

philsbbs

Member Locked

Posts: 397

397

got dynamic signatures turned off

tired this and no luck

any more ideas ?<

Phil

Posted 12 Apr 2008 17:07

MaD2ko0l

Senior Member

Posts: 1053

1053

u need dynamic sigs turned on for that bit of code to work

if strSignatures = "1" and strDSignatures <> "1" then
that line is saying that if sigs and dynamic sigs are on then get the sig<

Posted 13 Apr 2008 01:25

philsbbs

Member Locked

Posts: 397

397

turn it on and still does not work, can i send the two files to someone to double check.
thanks in advance.<

Phil

Posted 13 Apr 2008 13:27

cripto9t

Average Member

Posts: 881

881

You should be getting an error saying it can't find the GetSig() function :)
Add in_func_members.asp to the includes

Code:

%>
<!--#INCLUDE FILE="config.asp" -->
<!--#INCLUDE FILE="inc_func_common.asp" -->
<!--#INCLUDE FILE="inc_header.asp" -->
<!--#INCLUDE FILE="inc_func_member.asp" -->
<%

If that doesn't work, post a link to a txt file and I'll look at them. <

_-/Cripto9t\-_