📄 sendimage.aspx
字号:
<%@ Import Namespace="System.Web.Mail" %>
<%@ Import Namespace="System.IO" %>
<%
Dim objMailMessage As MailMessage
Dim swHTMLBody As StringWriter
Dim twTextWriter As HtmlTextWriter
swHTMLBody = New StringWriter
twTextWriter = New HtmlTextWriter( swHTMLBody )
twTextWriter.RenderBeginTag( "html" )
twTextWriter.RenderBeginTag( "head" )
twTextWriter.RenderBeginTag( "title" )
twTextWriter.Write( "Thank You!" )
twTextWriter.RenderEndTag
twTextWriter.RenderEndTag
twTextWriter.AddAttribute( "bgcolor", "lightblue" )
twTextWriter.RenderBeginTag( "body" )
twTextWriter.AddAttribute( "src", "aspnet.gif" )
twTextWriter.RenderBeginTag( "img" )
twTextWriter.RenderEndTag
twTextWriter.RenderEndTag
twTextWriter.RenderEndTag
' Create the Mail Message
objMailMessage = New MailMessage
objMailMessage.From = "you@somewhere.com"
objMailMessage.To = "joe@somewhere.com"
objMailMessage.Subject = "Here's the image!"
objMailMessage.Body = swHTMLBody.ToString
objMailMessage.BodyFormat = MailFormat.HTML
objMailMessage.UrlContentLocation = "http://www.yourdomain.com/"
' Send the Mail Message
SmtpMail.Send( objMailMessage )
%>
Image Sent!
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -