日期:2014-05-16 浏览次数:21037 次
<%@LANGUAGE="VBSCRIPT" CODEPAGE="936"%>
<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd">
<html xmlns="http://www.w3.org/1999/xhtml">
<head>
<meta http-equiv="Content-Type" content="text/html; charset=utf-8" />
<title>无标题文档</title>
</head>
<body>
<!-- 表单部分-->
<form method="post" name="userform">
姓名:<input type="text" name="realname" />
<input type="submit" value="查询" />
</form>
<%
'请求中是否有数据
Dim name
name = Request.Form("realname")
if name <> "" then
'查询数据库
'
%>
<!-- 显示用户信息区域-->
<div></div>
<% end if %>
</body>
</html>