31. 確認操作
function ConfirmDel()
{
if(confirm("確定要刪除嗎？一旦刪除將不能恢復！"))
return true;
else
return false;
}
<form name="del" method="Post" action="Del.asp" onsubmit="return ConfirmDel();">
==============================================================
我自己用的一個。
function ConfirmReset()
{
if(confirm("確定取消操作嗎？一旦取消操作將不能恢復！"))
window.form1.reset();
// return true;
}
<a href="javascript:ConfirmReset();"><img src="button_cance.gif"></a>
32. indexOf() 用法
<字符串對象>.indexOf(<另一個字符串對象>[, <起始位置>])；
該方法從<字符串對象>中查找<另一個字符串對象>（如果給出<起始位置>就忽略之前的位置），如果找到了，就返回它的位置，沒有找到就返回“-1”。所有的“位置”都是從零開始的。
eg. Str.indexOf(“AP”)>-1 說明str中存在”AP”字符串
33. 生成流水號
<%
if request.form("Modf") <> "" then
Dim rs
Dim sql
Dim BugID
dim today
today=date()
toyear=year(today)
toyear=toyear*10000
tomonth= month(today)
tomonth=tomonth*100
tonow=day(today)
Serialnum = toyear + tomonth + tonow
Serialnum = Serialnum*10000+1
set rs = Server.CreateObject("ADODB.recordset")
sql = "select top 1 * from buglist order by SubmitDate desc"
rs.open sql,conn,1,3
if not rs.eof then
Dim OldSerialnum
OldSerialnum = Rs("BugID")
OldSerialnum = right(OldSerialnum,12)
Serial = right(Serialnum,12)
if OldSerialnum - Serial >= 0 then
Serialnum = OldSerialnum + 1
end if
end if
BugID = "ES"&request("ProductVersion")&Serialnum
34. 響應回車
function getdata(what,whatid)
{
if (event.keyCode==13)
……
<input name="SerialNum<%=i%>" type="text" onKeyDown="getdata(window.form1.SerialNum<%=i%>.value,<%=i%>)">
35. 關閉窗口前刷新父頁面
response.write "<script language = javascript>"
response.write "javascript:opener.location.reload(); "
response.write "javasript:window.close();</script>"
36. JS事件
事件 / 描述
onblur 事件 發生在窗口失去焦點的時候。
onchange 事件 發生在文本輸入區的內容被更改，然后焦點從文本輸入區移走之后。
onclick 事件 發生在對象被單擊的時候。
onerror 事件 發生在錯誤發生的時候。
onfocus 事件 發生在窗口得到焦點的時候。
onload 事件 發生在文檔全部下載完畢的時候。
onmousedown 事件 發生在用戶把鼠標放在對象上按下鼠標鍵的時候。參考 onmouseup 事件。
onmouseout 事件 發生在鼠標離開對象的時候。參考 onmouseover 事件。
onmouseover 事件 發生在鼠標進入對象范圍的時候。
onmouseup 事件 發生在用戶把鼠標放在對象上鼠標鍵被按下的情況下，放開鼠標鍵的時候。
onreset 事件 發生在表單的“重置”按鈕被單擊（按下并放開）的時候。
onresize 事件 發生在窗口被調整大小的時候。
onsubmit 事件 發生在表單的“提交”按鈕被單擊（按下并放開）的時候。
onunload 事件 發生在用戶退出文檔（或者關閉窗口，或者到另一個頁面去）的時候。
onSelect 當Text或Textarea對象中的文字被加亮后，引發該事件。
onFocus 當用戶單擊Text或textarea以及select對象時，產生該事件。
onBlur 當text對象或textarea對象以及select對象不再擁有焦點、而退到后臺時，引發該文件.
onDragDrog 拖放時發生
onLoseCapture
onDblClick 鼠標雙擊事件
onKeyPress 當鍵盤上的某個鍵被按下并且釋放時觸發的事件.[注意:頁面內必須有被聚焦的對象]
onKeyDown 當鍵盤上某個按鍵被按下時觸發的事件[注意:頁面內必須有被聚焦的對象]
onKeyUp 當鍵盤上某個按鍵被按放開時觸發的事件[注意:頁面內必須有被聚焦的對象]
onAbort 圖片在下載時被用戶中斷
onBeforeUnload 當前頁面的內容將要被改變時觸發的事件
onMove 瀏覽器的窗口被移動時觸發的事件
37. 自動最大化
function window_onload()
{
window.moveTo(-2,-2);
window.resizeTo(screen.availWidth, screen.availHeight);
}
<body onload="window_onload()">
38. 幾個SQL技巧
Select Area,Territory,username,sum(dealqty) DealQty,count(Projectnum) ProjectQty,sum(TotalAmount) TotalAmountQty,sum(TotalPowerRT) TotalPowerRT FROM VW_PreviewTerritory where username = '段龍義' group by area,Territory,username
只要把不需要統計的東西分組就可以了。
select area,count(projectnum) TotalProjectQty,sum(DealQty) TotalDealQty,sum(TotalAmount) TotalAmountQty,sum(TotalPowerRT) TotalPowerRTQty from vw_previewProject where username = 'admin' group by area
這個也是一樣，記住：count() 只是計數，不管這個字段值是多少。sum()是求和，把所有加在一起。
39. Eval用法
eval("ProducingArea"+i+".style.display = 'none' ;");
單引號不影響
eval("if((window.form1.ProductBaseType"+i+".value!='' && window.form1.ProductBaseType"+(i+1)+".value =='')==true);");
//錯誤！
if(eval("window.form1.ProductBaseType"+i+".value!='' && window.form1.ProductBaseType"+(i+1)+".value ==''")==true)
//以后記得凡是有if判斷的，把eval("")寫在里面，就比較好！
if(confirm(eval("'確信要在'+window.form1.ProductBaseType"+(i)+".value+'后添加子類？'")))
40. 窗口關閉之前
function window_onbeforeunload(Projectnum)
{
if (event.clientX > document.body.clientWidth && event.clientY < 0 )
{
var oXMLHTTP = new ActiveXObject("Microsoft.XMLHTTP");
oXMLHTTP.open("POST","CheckProjectDeal.asp?Projectnum="+Projectnum,false);
oXMLHTTP.send();
Str=unescape(oXMLHTTP.responseText);
if (unescape(oXMLHTTP.responseText)!="YES")
{
window.event.returnValue="項目至少需要一個銷售機會！";
}
}
}
41. 標準表格
***************
* 這個是標題
***************
<table cellspacing=0 cellpadding=0 width="100%" border=0>
<tr>
<td class=title nowrap align=left>
<%response.write Application("LProductManage"&session("LanguageId"))%>
</td>
</tr>
</table>
***************
* 這個是橫線
***************
<table cellspacing=0 cellpadding=0 width="100%" border=0>
<tbody>
<tr>
<td>
</td>
</tr>
<tr class="linecolor">
<td height="2"></td>
</tr>
<tr>
<td class="tdcolor" align=left height=15> </td>
</tr>
</tbody>
</table>
***************
* 這個是表格
***************
<table border=0 cellpadding=0 cellspacing=1 width=100% bgcolor="#d0d090">
<tbody>
<th align="middle" class=light2><b><%=application("Lstatus"&session("languageid"))%></b></th>
<th align="middle" class=light2><b><%=application("LSaleStage"&session("languageid"))%></b></th>
<tr bgColor="white">
<td align="middle"> </td>
<td align="middle"> </td>
</tr>
</tbody>
</table>
邊框\填充 = 0
間隔 ＝ 1
底色 = #d0d090
42. 這也行
for i=2 to num
BaseTypeAllPArr = request("BaseType"&i&"P"&jLoop)&":"&BaseTypeAllPArr
response.Write " OOOO "&request("BaseType"&i&"P"&jLoop)&" OOOO <br>"
next
43. 標準注釋頭
'' ******************************************************************
'' 文件名:
'' Copyright (c) 2001-2005 ××信息技術公司軟件部
'' 功能描述:產品編輯
'' 參數
'' 牽涉數據表，視圖，存儲過程：自定義函數dbo.GetSubTreeinfo
'' 包含的文件:
'' 調用的公用函數，類，方法
'' 創建人:Kokey YU
'' 日 期: 2005-8-9
'' 修改人:
'' 日 期:
'' 修改說明:
'' 版 本:
'' ******************************************************************/
44. title換行
<a href="javascript:;" title="這是一行這是另一行！">把鼠標放上來</a>