以下示例无法在5秒后延迟页面重定向。 -标头更新似乎无效。是否有纯VB解决方案是报头是唯一的解决方法?想到只是运行一个计时器来延迟下一行执行?
尝试过也注释掉了部分-仍然没有触发标题更改。
Dim TF As String = ResetNewPassword(uName, pAnwser, newPassword)
Dim dateUpdated As Boolean = UpdateLastLoginDate(uName)
If TF Then
uEmail = u.Email
Label2.Text = "Users password has been updated"
Training.xMail(uEmail, Label2.Text, "Password Changed")
Response.AppendHeader("REFRESH", "5;URL=Default.aspx")
'Dim meta As New HtmlMeta()
'meta.HttpEquiv = "Refresh"
'meta.Content = "5;url=Page2.aspx"
'Me.Page.Controls.Add(meta)
PassQuestion1.Text = "You will now be redirected in 5 seconds"
Else
Label2.Text = "Users password failed to update please try again!!!"
Training.Mail("mail_user_acct", Label2.Text, "Password Failed - resetPassword")
End If