ASP开发技巧集锦四
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("Pr