Private Sub SendEmail()
Dim email As System.Web.Mail.MailMessage = New Mail.MailMessage
Dim emailsmtp As System.Web.Mail.SmtpMail
Dim emailattch As System.Web.Mail.MailAttachment
email.from = "mingl@appfinityasia.com"
email.To = "dongzhi@gmail.com"
email.Subject = "email test" & System.DateTime.Now.ToString
email.Body = "email body"
emailattch = New Mail.MailAttachment("e:\test.txt", System.Web.Mail.MailEncoding.Base64)
email.Attachments.Add(emailattch)
emailsmtp.Send(email)
End Sub
/// <summary>
/// 创建数据库。
/// </summary>
/// <param name="srvName">表� ......
1. 打开新的窗口并传送参数：
传送参数：
response.write("＜script＞window.open(’*.aspx?id="+this.DropDownList1.SelectIndex+"&id1="+...+"’)＜/script＞")
接收参数：
string a = Request.QueryString("id");
string b = Request.QueryString("id1");
2.为按钮添加对话框
Button1 ......
