在asp中的Response.End不能结束问题,高分!
源码专家 2003-10-16 11:19:49 在asp中的Response.End不能结束问题,高分!
Response.End
是一个asp的结束程序.
Public sub ChkPost()
Dim Server_v1 As String
Dim Server_v2 As String
Server_v1 = CStr(Request.ServerVariables("HTTP_REFERER"))
Server_v2 = CStr(Request.ServerVariables("Server_NAME"))
If Mid(Server_v1, 8, Len(Server_v2)) <> Server_v2 Then
Response.Write "<script Language=Javascript>alert('提示:请不要在站外提交数据!');</script>"
Response.End
Response.Write "<script Language=Javascript>alert('提示:这里也执行了!');</script>"
End If
End sub
在这一段程序中在asp中
Response.End
后面程序是不会被执行的,不过封装到dll组件中就不一样了.后面的程序还是可以被执行.
这是什么原因??
在VB的dll 中是不可以用end 及unload结束程序的.
谁有办法.