testupf.aspx
来自「用VB实现」· ASPX 代码 · 共 27 行
ASPX
27 行
<%@ Page Language="VB" ContentType="text/html" ResponseEncoding="gb2312" %>
<script runat ="server">
Sub btnUP_Click(sender as Object,e as EventArgs)
CUploadFile.PostedFile.SaveAs(Server.MapPath(SaveFileName.text) )
End Sub
</script>
<!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 runat="server">
<div align="center">
<input id="CUploadFile" type="file" runat="server">
<hr>
<BR>
上传保存文件名:
<asp:TextBox ID="SaveFileName" runat="server" />
<asp:Button ID="btnUp" runat="server" Text="文件上传" OnClick = "btnUP_Click" />
</div>
</form>
</body>
</html>
⌨️ 快捷键说明
复制代码Ctrl + C
搜索代码Ctrl + F
全屏模式F11
增大字号Ctrl + =
减小字号Ctrl + -
显示快捷键?