這幾天一直忙於站點改版的工作,昨天剛剛用asp寫好的表結構生成檔案createstruct.asp,在操作過程中很有可能會再次重新整理此頁面,而導致錯誤.為了有乙個正確易讀的反饋資訊,我對err做了檢測判斷.
要求:
防止重新整理表結構生成檔案,繼續向a表新增記錄
思路:
生成一資料表a,又向這a表中新增了一條記錄.為了防止繼續在已存在的表中進行操作,有乙個良好的錯誤反饋.我檢測error物件是否有報錯,來判斷是輸出正確還是錯誤的資訊提示.然而已存在的表a再繼續執行建立a表的操作會為錯誤提示,而向已存在的表a中新增記錄則不會有錯誤提示.所以我想到了檢測a表中是否存在了記錄來輸出提示資訊.檢測a表中是否已存在記錄,使用語句rs.eof and rs.bof ,為真則新增記錄,為假則建立錯誤資訊
**:
sql="
select * from ["&
p_prefixname&"
notdownload]
"setrs
=server.createobject(
"adodb.recordset")
rs.open sql,conn,1,
3ifrs.eof
andrs.bof
then
rs.addnew
rs("notdownload
"asc("
<
"))
&chrb(
asc("%
")))
rs.update
else
err=true
err.description="
表 'px_notdownload' 已存在記錄
"endif
rs.close:
setrs
=nothing
call
outjudge(""
) '判斷是否存在錯誤資訊,做出不同的輸出樣式
'*****************************
'呼叫錯誤資訊輸出過程
'*****************************
suboutjudge(byval tipcont)
iferr.number
<>
0then
resultstr
=replace
(resultstr,""
,""&
tipcont&"
失敗 "
)response.write resultstr
response.write ""
&err.description&"
"response.flush
err.clear
else
resultstr
=replace
(resultstr,""
,""&
tipcont&"
成功 "
)response.write resultstr
response.flush
endif
end sub
ASP的ERR和ERROR物件
err物件 err物件使用的時候不需要建立例項,就是說用的時候隨便拿來使用,就像session一樣,不需要像adodb物件使用的時候要先用set conn server.createobject adodb.connection 語句來建立例項。它返回乙個錯誤 但是err err.number。可以...
Asp中err和error物件的屬性詳解及用法示例
一 err物件 err物件使用的時候不需要建立例項,就是說你要用的時候隨便拿來使用,就像session一樣。不需要像adodb物件使用的時候set conn server.createobject adodb.connection 來建立例項,它返回乙個錯誤 但是err err.number,可以用...
ASP之物件總結
ado物件 connection command recordset record stream asp支援的物件很多,可以自己編寫com元件,下面是我們經常使用的 關於sql server的 createobject sqldmo.sqlserver createobject sqldmo.log...