编程社区 » asp编程 » 封装在dll中,response.end方法为何结束不了之后的程序！

封装在dll中,response.end方法为何结束不了之后的程序！

wlnh420

发表:

封装在dll中,response.end方法为何结束不了之后的程序！

第一个类中的某个方法
Public Function error2(str)
Response.Write ("<script>alert('" & str & "');history.back();</script>")
Response.End
End Function

第２个类中的某个
Public Sub step2()
Call startconn
Call check(2)　'这个方法已经调用了error2，却没有中止程序，反而运行了之后的数据库更新代码
conn.Execute (" update oa_table set jiluren='" & jiluren & "',jilutime='" & Now & "',state=2 where id=" & id)
Set conn = Nothing
End Sub
'pubobj是属于第一个类的对象
Public Sub check(num)
purview = getuserpurview()
If Not pubobj.isright(purview, num) Then pubobj.error2 "对不起，您没有该权限！"
End Sub

问题就是已经pubobj.error2 "对不起，您没有该权限！"这个方法 ,那么为何运行了之后的数据库更新代码

wlnh420

回复:

ding yi xia

wlnh420

回复:

dingding

aspgreener

回复:

在vb里不支持Response.End
关于要停止运行后面的代码，要先定义一直自定义的错误，然后通过处理相应的错误而终止程序的运行。
建议你找一下asp风火轮的将asp代码转换成dll封装，来看具体怎样替换Response.End的功能的。

wlnh420

回复:

烽火轮给了这样的处理！
On Error GoTo Err
Response.End: Err.Raise -13572468: Exit Sub
Exit Sub
Err:
If Err.Number = -13572468 Then Exit Sub
Resume Next