28,409
社区成员




<%
Dim inputBoxContent:inputBoxContent=trim(Request.QueryString("ibc")&"")
If inputBoxContent<>"" Then'传递了inputbox的值,则下面代码为你保存数据库的代码
Response.write "<script>alert('inputBox内容为:\n"&inputBoxContent&"');</script>"
Response.End
End If
%>
<html>
<head>
<meta http-equiv="Content-Type" content="text/html;charset=gb2312;">
<title></title>
</head>
<body>
<!---隐藏的iframe---->
<iframe src="about:blank" id="MyIf" style="display:none"></iframe>
<script language="vbscript">
Dim ibc
ibc=trim(InputBox("请输入内容","输入内容",""))
If ibc="" Then
MsgBox "请输入内容"
Else
document.getElementById("MyIf").src="test.asp?ibc="&ibc'================
End If
</script>
</body>
</html>