<%
if request.Form("submit") <> "" then
  '处理提交,保存到数据库
  newid = request.Form("newid")
  ... ...
  response.redirect "a.asp?id=" + newid
end ifif request.Querystring("id") <> "" then
  '访问数据库,取id对应信息的内容%>
//显示信息
<%
else
%>
//显示表单
<form action="a.asp" method="post">
<input name="newid" type="text" value="">
... ...<input name="submit" type="submit" value="提交">
</form>
<%
end if
%>