Dim openUrl As String Dim url As String openUrl = "<script languge=javascript>top.location='" & "asdf.aspx" & " ';</script>" If (Not IsClientScriptBlockRegistered("clientScript")) Then RegisterClientScriptBlock("clientScript", openUrl) End If
Response.Write("<script>alert('注册成功')</script>")
还可以将脚本写到任何一个label中。
openUrl = "<script languge=javascript>alert('注册成功')</script>" If (Not IsClientScriptBlockRegistered("clientScript")) Then RegisterClientScriptBlock("clientScript", openUrl) End If
Dim url As String openUrl = "<script languge=javascript>top.location='" & "asdf.aspx" & " ';</script>" If (Not IsClientScriptBlockRegistered("clientScript")) Then
RegisterClientScriptBlock("clientScript", openUrl)
End If
If (Not IsClientScriptBlockRegistered("clientScript")) Then
RegisterClientScriptBlock("clientScript", openUrl)
End If