<%
on error resume next
dim conn
dim connstr
dim dbUser,dbPwd,dbDsn
connstr="Provider=MSDAORA.1;Password=dbPwd;User ID=dbUser;Data Source=dbDsn;Persist Security Info=True"
set conn=server.createobject("ADODB.CONNECTION")
conn.open connstr
conn.CursorLocation=3 ''<-这句至关重要,如果你想取得recordcount的话
if err=-2147467259 then
response.redirect "success.asp?messageid=reg011"
response.end
end if
%>