asp.net技术内幕的书配源码

				
								Dim objMailMessage As MailMessage
				Dim objMailAttachment As MailAttachment
				
				' Create the Mail Attachment
				objMailAttachment = New MailAttachment( "c:\BizPlan.doc" )
				
				' Create the Mail Message
				objMailMessage = New MailMessage
				objMailMessage.From = "you@somewhere.com"
				objMailMessage.To = "joe@somewhere.com"
				objMailMessage.Subject = "Secret Business Plan"
				objMailMessage.Body = "Here's the plan (don't show it to anyone!)"
				objMailMessage.Attachments.Add( objMailAttachment )
				
				' Send the Mail Message
				SmtpMail.Send( objMailMessage )
				%>
				
				BizPlan Sent!