w3 upload组件实例应用1
日期：2012-03-30 浏览次数：20908 次
文件1 - Upload.asp
<html>
<head>
<title> w3 Upload </title>
</head>
<body>
用w3 upload组件上传
<form action="UploadProcess.asp" method="post" enctype="multipart/form-data">
<input type="file" name="thefile"><br>
Choose a name: <input type="text" name="name"><br>
<input type="submit" value="Transmit">
</form>
</body>
</html>
文件2 - UploadProcess.asp
<% @ LANGUAGE="VBSCRIPT" %>
<%
Set upload = Server.CreateObject( "w3.upload" )
actualName = upload.Form( "name" )
Set fileName = upload.Form( "thefile" )
if fileName.IsFile then
fileName.SaveToFile( Request.ServerVariables( "APPL_PHYSICAL_PATH" ) & "\\" & actualName )
end if
%>
<html>
<head>
<title> w3 Upload </title>
</head>
<body>
<br>
<br>
<center>
Finished!
</center>
<br>
<br>
<br>
</body>
</html>
<html>
<head>
<title> w3 Upload </title>
</head>
<body>
用w3 upload组件上传
<form action="UploadProcess.asp" method="post" enctype="multipart/form-data">
<input type="file" name="thefile"><br>
Choose a name: <input type="text" name="name"><br>
<input type="submit" value="Transmit">
</form>
</body>
</html>
文件2 - UploadProcess.asp
<% @ LANGUAGE="VBSCRIPT" %>
<%
Set upload = Server.CreateObject( "w3.upload" )
actualName = upload.Form( "name" )
Set fileName = upload.Form( "thefile" )
if fileName.IsFile then
fileName.SaveToFile( Request.ServerVariables( "APPL_PHYSICAL_PATH" ) & "\\" & actualName )
end if
%>
<html>
<head>
<title> w3 Upload </title>
</head>
<body>
<br>
<br>
<center>
Finished!
</center>
<br>
<br>
<br>
</body>
</html>
免责声明： 本文仅代表作者个人观点，与爱易网无关。其原创性以及文中陈述文字和内容未经本站证实，对本文以及其中全部或者部分内容、文字的真实性、完整性、及时性本站不作任何保证或承诺，请读者仅作参考，并请自行核实相关内容。
