<%
dim u,b,v
set u=Request.ServerVariables("HTTP_USER_AGENT")
set b=new RegExp
set v=new RegExp
- Sep 12 Sat 2015 23:20
-
ASP 判斷手機
- Aug 27 Thu 2015 14:32
-
Javascript string
Javascript 字串處理 (String Operations)
尋找字串(search)
stringObject.search(searchstring)
stringObject.search(尋找的字串)
大小寫必須相符
- Aug 27 Thu 2015 14:29
-
VBS STRING
- Aug 09 Sun 2015 10:41
-
Javascript 文字click切換
<script language="javascript">
function go() {
x=document.getElementById("aaa")
if (x.innerHTML=='+')
{x.innerHTML='-'}
- Apr 19 Sat 2014 17:26
-
ASP 移除 HTML
- Apr 19 Sat 2014 16:43
-
Server.HTMLEncode
The following script:
<%
response.write(Server.HTMLEncode("The image tag: <img>"))
%>
Output:
- Apr 11 Fri 2014 18:44
-
判斷要求來源是否來自本地
<%''判断来源，禁止外部提交
dim server_v1,server_v2
server_v1=Cstr(Request.ServerVariables("HTTP_REFERER"))
server_v2=Cstr(Request.ServerVariables("SERVER_NAME"))
if server_v1="" or instr(server_v1,"发表页面名")<=0 or mid(server_v1,8,len(server_v2))<>server_v2 then
- Apr 11 Fri 2014 18:35
-
淡入淡出文字的javacode
Default text; this is the text that 3.x browsers will see. You can have lots of text here instead. Or, you can use a script to write in text only if it's Netscape 4 (you have to do that so that the layer gets some content or the written in text won't show correctly).
- Apr 11 Fri 2014 17:51
-
CSS 超簡單變圖語法
- Apr 11 Fri 2014 17:48
-
KINDEDIT 初始參數
- Apr 11 Fri 2014 17:46
-
使用 ASP 中透過外部 SMTP 發信
CDO (Collaboration Data Objects) 物件 ， 對應程式庫檔案 Cdosys.dll
提供自動 E-Mail 寄送使用；可應用於 VB, ASP, ASP.Net 等，是簡易的信件寄送方式。
<%
strYouEmail = "me@your.com.tw"
sch = "http://schemas.microsoft.com/cdo/configuration/"