javascript - 使用 javascript 的 Response.Write() 无法正常工作

Question

我的代码有问题:

Protected Sub Page_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Load

    clave = Request.QueryString("cve")

    If clave = Nothing Then
        Response.Write("<script language='javascript'>alert('Querystring is empty');window.close();</script>")
        Return
    End If

    Dim valid As Boolean
    valid = Regex.Match(clave, "\b\d{3}\-\d{3}\-\d{3}\b").Success

    If valid = False Then
        Response.Write("<script language='javascript'>alert('Wrong format');window.close();</script>")
        Return
    End If

'More Code
End Sub

问题是，第一个 if 语句工作正常，并且“javascript”显示警报并关闭窗口，但在第二个 if 语句中，javascript 显示消息但不关闭窗口。

你们知道如何解决这个问题吗？

Answer 1

代码看起来不错。

尝试改用 Client.RegisterScriptBlock。