ASP开发技巧集锦(4)

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>"

[1]     

原文转自：http://www.ltesting.net