pgp.asp

来自「上传文件的asp程序,好不好用自己用了才知道」· ASP 代码 · 共 55 行

ASP

55 行

<%@LANGUAGE="VBSCRIPT" %>
<HTML>
<BODY>
<%

'*************************************************
'*                                               *
'*   Produced by Dimac                           *
'*                                               *
'*   More examples can be found at 				 *
'*   http://tech.dimac.net                       *
'*                                               *
'*   Support is available at our helpdesk        *
'*   http://support.dimac.net                    *
'*                                               *
'*   Our main website is located at              *
'*   http://www.dimac.net                        *
'*                                               *
'*************************************************

	' PGP encryption
	' The message is set up as usual...
	set msg = Server.CreateObject( "JMail.Message" )

	msg.From = "myEmail@mydomain.com"
	msg.Subject = "For your eyes only"
	msg.Body = "Top secret stuff for you."

	' Set logging to true to ease any potential debugging
	' And set silent to true as we wish to handle our errors ourself
	msg.Logging = true
	msg.silent = true

	' An encryption key can be set as the third parameter to AddRecipient.
	' This can be a comma separated string containing email addresses and
	' hexadecimal key id's if more than one key are going to be used.
	' The third parameter is optional and will default to the same value
	' as the recipients email address, which in most cases are quite sufficient.

	' msg.AddRecipient("myFriend@hisdomain.com", "A Name", "anEmail@mydomain.com, 0xFD43CD12, anotherEmail@mydomain.com" )

	msg.AddRecipient "myRecipient@hisdomain.com", "A Name"

	' With PGPEncrypt set to true the email will be encrypted upon Send()
	msg.PGPEncrypt = true
	
	' To capture any errors which might occur, we wrap the call in an IF statement
	if not msg.Send( "mail.myDomain.net" ) then
		Response.write "<pre>" & msg.log & "</pre>"
	else
		Response.write "Message sent succesfully and encrypted!"
	end if
%>
</BODY>
</HTML>

pgp.asp - 源码说明

本页面展示了「上传文件的asp程序,好不好用自己用了才知道」中的 pgp.asp 源码文件，采用 ASP 编程语言编写，共 55 行代码。您可以在线阅读完整代码内容，也可以返回资源详情页下载完整源码包进行本地学习和开发。

虫虫开发者社区收录了大量与ASP相关的技术资源，包括源代码、技术文档、电路图等，是电子工程师和嵌入式开发者的专业学习平台。

⌨️ 快捷键说明

复制代码Ctrl + C

搜索代码Ctrl + F

全屏模式F11

增大字号Ctrl + =

减小字号Ctrl + -

显示快捷键?