?? func.asp
字號:
<script language=Javascript>
function checkproform(form)
{
var flag=true;
if(form("seekword").value==""){alert("Please Input Keyword!");form("seekword").focus();return false};
return flag;
}
function load(sel) {
var url = sel.options[sel.selectedIndex].value;
if (url != ""){
if (typeof(sel.options[sel.selectedIndex].target)!="undefined"){
open(url, sel.options[sel.selectedIndex].target);
}else{
eval(sel.options[sel.selectedIndex].value)
}
sel.selectedIndex=0
}
else{
}
return false;
}
function product_order(keyno)
{
window.open("product_order.asp?productno="+keyno,"","scrollbars=yes,width=548,height=390")
}
</script>
<%
function checkstr(str)
dim re
Set re=new RegExp
re.IgnoreCase =true
re.Global=True
re.Pattern="(script)"
str=re.Replace(str,"sc ript")
re.Pattern="(>"+chr(13)+")"
str=re.Replace(str,">")
re.Pattern="(> "+chr(13)+")"
str=re.Replace(str,">")
re.Pattern="(> "+chr(13)+")"
str=re.Replace(str,">")
re.Pattern="("+chr(13)+")"
str=re.Replace(str,"<br> ")
if left(lcase(str),6)<>"<table" then
str=" "+str
end if
checkstr=str
end function
function checkstr2(str)
dim re
Set re=new RegExp
re.IgnoreCase =true
re.Global=True
re.Pattern="(script)"
str=re.Replace(str,"sc ript")
re.Pattern="(>"+chr(13)+")"
str=re.Replace(str,">")
re.Pattern="(> "+chr(13)+")"
str=re.Replace(str,">")
re.Pattern="(> "+chr(13)+")"
str=re.Replace(str,">")
re.Pattern="("+chr(13)+")"
str=re.Replace(str,"<br>")
checkstr2=str
end function
%>
?? 快捷鍵說明
復制代碼
Ctrl + C
搜索代碼
Ctrl + F
全屏模式
F11
切換主題
Ctrl + Shift + D
顯示快捷鍵
?
增大字號
Ctrl + =
減小字號
Ctrl + -