uploadfile.aspx

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

ASPX
27
字号
<%@ Page Language="VB" ContentType="text/html" ResponseEncoding="gb2312" %>
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN" "http://www.w3.org/TR/html4/loose.dtd">
<script runat ="server">
Sub btnUP_Click(sender as Object,e as EventArgs)
   UFile.PostedFile.SaveAs(Server.MapPath(txtFile.text) )
End Sub 
</script>

<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<title>文件上传</title>
</head>
<body>
<form runat="server">
  <div align="center">
    <input name ="UFile" id="UFile"  type="file"  runat="server">
    <hr>
    <BR>
  上传存储文件名:
  <asp:TextBox ID="txtFile" runat="server" />
  <asp:Button ID="btnUp" runat="server" Text="文件上传" OnClick = "btnUP_Click" />
  </div>
</form>
</body>
</html>

⌨️ 快捷键说明

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