theresponse.aspx

来自「用VB实现」· ASPX 代码 · 共 42 行

ASPX
42
字号
<%@ Page Language="VB" ContentType="text/html"%>
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN" "http://www.w3.org/TR/html4/loose.dtd">
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<title>无标题文档</title>
</head>
<body>
<form name="form1"  method="post" action="">
<table width="467" border="0">
  <tr>
    <td width="4">&nbsp;</td>
    <td width="168">&nbsp;</td>
    <td width="4"><input name="textfield" type="text" size="80">
    </td>
    <td width="263">&nbsp;</td>
  </tr>
  <tr>
    <td>&nbsp;</td>
    <td>&nbsp;</td>
    <td><input name="file" type="file" size="80"></td>
    <td><input type="submit" name="Submit" value="提交"></td>
  </tr>
  <tr>
    <td>&nbsp;</td>
    <td colspan="3"><hr>
	<%
	If Len(Request.Form("textfield") )>0 Then
	   Response.write(Request.Form("textfield") & "<br>")	 
	End If	
	%>
	  <%
	If Len(Request.Form("file") )>0 Then
	   Response.writeFile(Request.Form("file"))	 
	End If	
	%>	</td>
    </tr>
</table>
</form>
</body>
</html>

⌨️ 快捷键说明

复制代码Ctrl + C
搜索代码Ctrl + F
全屏模式F11
增大字号Ctrl + =
减小字号Ctrl + -
显示快捷键?