作者okwangwang23 ( )
看板Visual_Basic
标题[.NET] 上传的档案大小问题
时间Fri Oct 26 02:29:11 2007
有一个上传，
不过当我选择的file档案太大的时候，
本机电脑都会说找不到网页，
不过~如果档案小，他就会自动存进资料夹里面，
请问我该怎麽做阿?我需要上传空间大的~"~
程式码如下
<!-- 程式范例：ch11-5-3.aspx -->
<%@ Page Language="VB" %>
<%@ Import Namespace="System.IO" %>
<script Runat="server">
Sub UploadMultiFiles(Sender As Object, E As EventArgs)
'取得上传路径
Dim uploadPath As String = Server.MapPath("Side")
'取得HttpFileCollection物件
Dim objFileCollection As HttpFileCollection = _
Request.Files
Dim file As HttpPostedFile
Dim i, counter As Integer
counter = 0
'使用回圈取出每一个HttpPostFile物件
For i = 0 To objFileCollection.Count - 1
file = objFileCollection(i)
If file.ContentLength <> Nothing Then
'上传档案
file.SaveAs(uploadPath & "/" & _
Path.GetFileName(file.FileName))
counter = counter + 1
End If
Next i
msg.Text = "上传[" & counter & "]个档案成功.."
End Sub
</script>
<html>
<head><title>同时上传多个档案</title></head>
<body>
<form id="Form1" enctype="multipart/form-data" Runat="server">
<input type="File" Id="f" size="30" Runat="server"/><br/>
<input type="File" Id="f2" size="30" Runat="server"/><br/>
<asp:Button ID="Button1" OnClick="UploadMultiFiles"
Text="上传档案" Runat="server"/><br/>
<asp:Label Id="msg" ForeColor="blue" Runat="server"/>
</form>
</body>
</html>
--
※ 发信站: 批踢踢实业坊(ptt.cc)
◆ From: 140.127.186.3