asp換算unix time為台灣時間

DateAdd("s",unix time+8*3600), "01/01/1970 00:00:00")

使用ASP讀取JSON

就是工作需要，所以廢話就不多說了。

環境: windows 7 + iis7

上網找了不少資訊，ASP讀取JSON有兩種做法，最常找到的方法為使用Server.CreateObject("MSScriptControl.ScriptControl")，但是呢...

近日有感

近來又開始反覆的聽張雨生的歌曲，一方面與張雨生的音樂共舞，另一方面也是想念雨生。

想念雨生的同時，找了youtube的相關影音來看，看看這位充滿才氣的音樂魔法師純真自然的演出、不絕於耳的笑聲，也意外的發現前陣子買的一本書 - 生活的藝術，也剛好是張雨生曾經推薦過的書，找時間該把這本書完整的看完才是。

我期待

就是張雨生唱的我期待。

C+偵探進階後的B+

一直很期待C+偵探的續集，郭富城在C+偵探的表現可以說是將演技發揮到剛剛好，不過份矯情，力道也拿捏恰好，將不怎麼精明的偵探味道表演出來，又努力的從瑣碎線索中找出關鍵。

ASP日期補零

要得到現在的時間，只要now()或者date()，如果要指定格式，那就要下一點點功夫：
今年 - year(now())
這個月 - month(now())
今日 - day(now())

這三個函數結合起來:

year(now())&month(now())&day(now())

可以看到：
201113

這樣不好看懂，為了能夠做更有效的計算或分辨，可以想辦法補個零

防 sql injection的asp語法

用來記錄用。

response.Charset="utf-8"
' 防SQL 非法注入
dim sql_injdata1
SQL_injdata = "'|and|exec|insert|select|delete|update|count|*|%|chr|mid|master|truncate|char|declare"
SQL_inj = split(SQL_Injdata,"|")
'過濾get
If Request.QueryString<>"" Then
For Each SQL_Get In Request.QueryString
For SQL_Data=0 To Ubound(SQL_inj)
if instr(Request.QueryString(SQL_Get),Sql_Inj(Sql_DATA))>0 Then
Response.Write "<script language=JavaScript>alert('error! 齁~~~抓到了喔! 不要亂測試啦，拜託');history.back(-1)</Script>"
Response.end
end if
next
Next
End If
' 防SQL 非法注入 ，過濾post
If Request.Form<>"" Then
For Each Sql_Post In Request.Form
For SQL_Data=0 To Ubound(SQL_inj)
if instr(Request.Form(Sql_Post),Sql_Inj(Sql_DATA))>0 Then
Response.Write "<script language=JavaScript>alert('error! 齁~~~抓到了喔! 不要亂測試啦，拜託');history.back(-1)</Script>"
Response.end
end if
next
next
end if