弹出窗口的关闭

[sinfield]

'response.Write("++++++++"&myid&"+++++++"& txt_checkbox &"++++++++++"& txt_score_bdx &"++++++++++++")
'response.End()

strJS="<script language=""javascript"">" & vbcrlf
strJS=strJS & "window.opener.document.tp_form_2.e_as_bdx_"&myid&".value="""& txt_checkbox &""";" & vbcrlf
strJS=strJS & "window.opener.document.tp_form_2.e_as_bdx_score_"&myid&".value="""& txt_score_bdx &""";" & vbcrlf
strJS=strJS & "</script>" & vbcrlf
response.write strJS

'关闭弹出的窗口
response.write("<script language=""javascript"">window.close();<script>")
response.End()

这是一个弹出窗口里的代码，我就是想用户在弹出里提交一个表单并提交给本页面处理，处理完后自动关闭本页面，为什么它处理完后并不关闭呢？这句话之前的代码是确定应该执行了的。

[lixiccgccyuan]

window.close();

[aibhmss]

response.write "<script language=javascript>alert('表单提交成功！');window.location.href='';</script>"
response.End

[sinfield]

上面的回答毫无用处，下面请人继续哦

[Msxindl_Com]

做个测试看看:

一、index.asp

<input type="button" value="打开新窗口" onclick="window.open('test.asp')">
<form name="tp_form_2">
<input type="text" name="e_as_bdx_1" />
<input type="text" name="e_as_bdx_score_1" />
</form>

二、test.asp

<%
dim myid,txt_checkbox,txt_score_bdx,strJS
myid="1"
txt_checkbox="txt_checkbox"
txt_score_bdx="txt_score_dbx"
strJS="<script language='javascript'>" & vbcrlf
strJS=strJS & "window.opener.document.tp_form_2.e_as_bdx_"&myid&".value='"& txt_checkbox &"';" & vbcrlf
strJS=strJS & "window.opener.document.tp_form_2.e_as_bdx_score_"&myid&".value='"& txt_score_bdx &"';" & vbcrlf
strJS=strJS & "window.close();" & vbcrlf
strJS=strJS & "</script>" & vbcrlf
response.write strJS
response.end
%>