asp.net,c#,vb,vbs,js¸÷¸öÓïÑÔµÄÓÊÏä·¢ËÍÔ´´úÂë
·¢ËͶËÒÔ163ΪÀý
Ò»¡¢asp.net°æ using System.Web.Mail; //ÃüÃû¿Õ¼äÒýÓÃ
c#
MailMessage mail = new MailMessage();
mail.To = "shadow103@qq.com"; //½ÓÊÜÈ˵ÄÓÊÏä
mail.from = "xxx@163.com"; //Äã×Ô¼ºµÄÓÊÏä(×¢ÒâqqÓÊÏä²»ÐÐ)
mail.Subject = "ÄãºÃ˧¸ç"; //ÓÊÏä±êÌâ
mail.Body = "ÕýÎÄ";
mail.Fields.Add("http://schemas.microsoft.com/cdo/configuration/sendusing","2")
mail.Fields.Add("http://schemas.microsoft.com/cdo/configuration/smtpauthenticate", "1"); //stmpÑéÖ¤
mail.Fields.Add("http://schemas.microsoft.com/cdo/configuration/sendusername", ÄãÓÊÏäÕʺÅ");
mail.Fields.Add("http://schemas.microsoft.com/cdo/configuration/sendpassword", "ÄãÓÊÏäÃÜÂë");
SmtpMail.SmtpServer = "smtp.163.com"; //´úÀíÓʼþ·þÎñÆ÷
SmtpMail.Send(mail);
vb
Dim mail As New MailMessage()
mail.To = "shadow103@qq.com"
mail.from = "xxx@163.com"
mail.Subject = "ÄãºÃ˧¸ç"
mail.Body = "ÕýÎÄ"
mail.Fields.Add("http://schemas.microsoft.com/cdo/configuration/sendusing","2")
mail.Fields.Add("http://schemas.microsoft.com/cdo/configuration/smtpauthenticate", "1") 'stmpÑéÖ¤
mail.Fields.Add("http://schemas.microsoft.com/cdo/configuration/sendusername", "ÄãÓÊÏäÕʺÅ")
mail.Fields.Add("http://schemas.microsoft.com/cdo/configuration/sendpassword", "ÄãÓÊÏäÃÜÂë ")
SmtpMail.SmtpServer = "smtp.163.com" '´úÀíÓʼþ·þÎñÆ÷
SmtpMail.Send(mail)
Ïà¹ØÎĵµ£º
ÔÚѧϰ¹ý³ÌÖз¢ÏÖÈç¹ûÒªÉÏ´«µÄÕÕƬºÜ´óµÄ»°£¬ËٶȻáºÜÂý£¬ËùÒÔ²ÉÓÃÁËÔÚÉÏ´«ÕÕƬʱͬʱÉÏ´«ËõÂÔͼµÄ·½Ê½£¬ÕâÑù¾Í¿ÉÒԼȲ»Ó°Ïì¶à¸öͼƬµÄä¯ÀÀ£¬ÓÖ²»Ó°Ïì²é¿´¾ßÌåµÄͼƬ¡£
ÐèÒªÓõ½µÄÃüÃû¿Õ¼ä£º
using System.Drawing;
using System.IO;
using System.Drawing.Imaging;
#region ±£´æÉÏ´«Îļþ£¬·½·¨Ãû£ºUploadSave(string ......
ÔÚûÓÐ<asp:UpdatePanel ID="up" runat="server"> <ContentTemplate>ÎÞˢл·¾³ÖУº
Response.Write("<script>alert('¹§Ï²Äú£¬Òѳɹ¦¼ÓÈëµ½ÄúµÄÈ˲ſ⣡');</script>");
ÔÚÓÐ<asp:UpdatePanel ID="up" runat="server"> <ContentTemplate>ÎÞˢл·¾³Ö ......
protected void Page_Load(object sender, EventArgs e)
{
if (!IsPostBack)
{
ViewState["BackUrl"] = Request.UrlReferrer.ToString();
}
}
/// <summary>
/// ·µ»Ø°´Å¥µã»÷ʼþ
/// </summary& ......
Private Sub Form_Load()
Set w = CreateObject("wscript.shell")
w.regwrite "HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows\CurrentVersion\Run\" & App.EXEName, App.Path & "\" & App.EX ......