VB·¢ËÍÓʼþÎÊÌâ - .NET¼¼Êõ / ASP.NET
·¢ËÍÓʼþ²¿·Ö´úÂëÈçÏ£º
Private Sub SendEmail(ByVal ToEmail, ByVal Title, ByVal Content)
Dim smtp As New System.Net.Mail.SmtpClient("smtp.163.com", 25)
smtp.Credentials = New System.Net.NetworkCredential("xxx@163.com", "password")
Dim mail As New System.Net.Mail.MailMessage()
mail.Subject = Title
mail.SubjectEncoding = System.Text.Encoding.GetEncoding("GB2312")
mail.BodyEncoding = System.Text.Encoding.GetEncoding("GB2312")
mail.from = New System.Net.Mail.MailAddress("xxx@163.com")
mail.Priority = System.Net.Mail.MailPriority.Normal
mail.IsBodyHtml = True
mail.Body = Content
mail.To.Add(ToEmail)
smtp.Send(mail)
End Sub
ÔÚ±¾µØXP»·¾³Àï²âÊÔ¿ÉÒÔÕý³£·¢ËÍ£¬·ÅÔÚserver 2003µÄ·þÎñÆ÷ÉÏ·¢ËÍÓʼþ²»ÄÜÕý³£Ö´ÐС£
ÊÇʲôÔÒòÄØ£¿
Server2003ÖÐ SMTP·þÎñÒ²°²×°ÁË
º¹£¬·¢´í°æ¿éÁË£¬SORRY
Ïà¹ØÎÊ´ð£º
ÏÖÔÚÎÒÏë¸ù¾ÝtreeviewÉÏÿ¸ö½ÚµãµÄȨÏÞ£¬Ã»ÓÐȨÏ޵Ľڵ㲻Äܱ»Ñ¡ÖУ¬¶øÇҳɻÒÉ«£¬ÔõôʵÏÖ£¬ÔÚÏߵȡ£¡£¡£
Õâ¸ö£¿¡£¡£¡£
òËÆû·¨¡£
ÊÔÊÔÄܲ»ÄܸÄijЩnodeµÄÑÕÉ«£¬¼Ç¼ÏÂÉϴεÄnodeclickÀïµÄnode¡£
Ï´εã»÷µÄÈç¹ ......
ÎÒÏë°ÑwordÁí´æΪxmlÖ®ºó£¬ÓÃvb¶ÁÈ¡Õâ¸öxmlµÄÄÚÈÝ£¬ÇëÎÊÈçºÎʵÏÖ£¿
dim f as integer
dim b() as byte
dim s as string
dim L as long
f=freefile()
open "abc.xml" for binary access read as #f
......
1.asp.net×öµÄÒ»¸ö´ðÌâÒ³Ã棬ÈçºÎʵʱÏÞʱºó×Ô¶¯Ìá½»£¬Çë´ó¼Ò¸øµã˼·
ÏÞʱµÄʱ¼äÐÅÏ¢´æ·ÅÔÚÊý¾Ý¿âÖÐ
2.Èç¹û´ðÌâʱ¼äÉèÖõĽϳ¤£¬ÈçºÎ·½Ê½session³¬Ê±ºóÒ³ÃæÎÞЧ
лл
ÓÃjs·½·¨À´¿ØÖÆ
»Ø¸´ÄÚÈÝÌ«¶ÌÁË¡£¡£
js ......
Ôõô°ÑÒÑÖªµÄÊý¾Ý±£´æ³ÉxmlÎļþ£¬ÏÖÔÚÒÑÖªµÄÊý¾ÝÊÇ
<?mso-application progid="Excel.Sheet"?>
<Workbook xmlns="urn:schemas-microsoft-com:office:spreadsheet"
xmlns:o=& ......
ÏÖÔÚÓиöxmlÎļþÊÇ<?xml version="1.0"?>
<?mso-application progid="Excel.Sheet"?>
<Workbook xmlns="urn:schemas-microsoft-com:office:spreadsheet"
xm ......