62,046
社区成员
发帖
与我相关
我的任务
分享
Public Event Finished(ByVal retType As ReturnType)
Public sub TransformFile()
''''你的代码
'''你要跳转的地方
RaiseEvent Finished(retVal)
End Sub
'你的页面new 你的类
Private WithEvents routines As New EncryptionRoutines
'你的页面完成这方法
Private Sub routines_Finished(ByVal retType As EncryptionRoutines.ReturnType) Handles routines.Finished
response.Redirect("a.aspx")
End sub
var p_EBV=null;
function openfull(url, param)
{
if( window.navigator.appName=="Microsoft Internet Explorer"
&& window.navigator.appVersion.substring(
window.navigator.appVersion.indexOf("MSIE")+5,
window.navigator.appVersion.indexOf("MSIE")+8) >= 6.0 )
{
var featureStr = 'fullscreen=no,toolbar=no,location=no,directories=no,status=no,menubar=no,scrollbars=no,resizable=no,copyhistory=no,left=0,top=0,width='+ (window.screen.width-10) +',height='+ (window.screen.height-44);
p_EBV = window.open( url, '_WebBookView', featureStr );
}
else
{
document.location = url;
}
}