顯示具有 ASP 標籤的文章。 顯示所有文章
顯示具有 ASP 標籤的文章。 顯示所有文章

2009年3月26日 星期四

ASP 幾秒後自動轉頁

有些網站在註冊會員、填完表單後,會在幾秒後轉頁到所指定的網頁..
這裡介紹ASP 如何幾秒後自動轉頁的方法..code如下


System.Threading.Thread.Sleep(2000); //等待2秒
Response.Rederict(url);

2009年3月2日 星期一

ASP防隱碼攻擊

隱碼攻擊是由SQL接字串時所引發的安全性問題
在沒有防隱碼攻擊的一些網站可介由任何一個input輸入
' or '1' = '1
以達到入侵的需求,最慘的是還可以下一些SQL DELETE FROM的語法

在這裡介紹如何用Replace簡單的過濾字串,以防止隱碼攻擊


UserName=Replace(Request("UserName"),"'","'+chr(34)+'")
Password=Replace(Request("Password"),"'","'+chr(34)+'")

2008年12月20日 星期六

ASP 郵寄元件

最近突然USER反應電子報無法寄件,於是前後換了CDONTS & CDO & JMail去測試
雖然,最後的結果很令人噴飯,不過還是整理了在ASP裡可用的郵寄元件分享一下..
PS.電子報請自動加入迴圈執行

[CDONTS]
Set mail = Server.CreateObject( "CDONTS.NewMail" )
mail.To = RS.Fields("EMail").Value
mail.From = CMail
mail.Subject = Upload("Tit")
mail.BodyFormat = 0
mail.MailFormat = 0
mail.Body = Content
mail.Send

[CDO]
Set objEmail = CreateObject("CDO.Message")
objEmail.Configuration.Fields.Item("http://schemas.microsoft.com/cdo/configuration/sendusing") = 2
objEmail.Configuration.Fields.Item("http://schemas.microsoft.com/cdo/configuration/smtpserver") = "msa.hinet.net"
objEmail.Configuration.Fields.Item("http://schemas.microsoft.com/cdo/configuration/sendusername") = "xx"
objEmail.Configuration.Fields.Item("http://schemas.microsoft.com/cdo/configuration/sendpassword") = "xx"
objEmail.Configuration.Fields.Item("http://schemas.microsoft.com/cdo/configuration/smtpserverport") = 25
objEmail.From = CMail
objEmail.To = RS.Fields("EMail").Value
objEmail.Subject = Upload("Tit")
objEmail.HTMLbody = Content
objEmail.Configuration.Fields.Update
objEmail.Send
Set objEmail=Nothing

[JMail]
Set JMail = Server.CreateObject("JMail.Message")
JMail.Subject = Upload("Tit")
JMail.ContentType = "text/html"
JMail.Charset = "big5"
JMail.Encoding = "base64"
JMail.ISOEncodeHeaders = False
JMail.Priority = 3
JMail.From = CMail
JMail.AddRecipient RS.Fields("EMail").Value
JMail.silent = true
JMail.Body = Content
JMail.Send("msa.hinet.net")
set JMail = nothing

##EasyReadMore##