繁體中文当前位置: 首页 > 图文教程 > 网络编程 > ASP > 利用ASP.NET设计FTP文件上传(下)
- ASP
- 分享一段代码show.asp?id=26变成show/?26的形式
- 多域名一网站时如果返回最原来的域名
- [原创]完美解决ASP 不能更新。数据库或对象为只读。
- 5天学会asp
- TSYS中生成静态页时溢出: ''CInt''
- 对象标记具有无效的 ''MSWC.MyInfo'' ProgID
- [原创]随机增加网站点击的一个不错的方法
- Microsoft JET Database Engine 错误 ''80004005'' 未指定的错误的完美解决方法
- 反SPAM新思路—换Z-BLOG的验证码！
- 七步倒┈→专用asp后门
- asp下实现代码的“运行代码”“复制代码”“保存代码”功能源码
- 使用ASP实现网站的“目录树”管理的代码
- ShowPage 显示“上一页 下一页”等信息的封装代码
- [原创]站长感慨asp编程究竟何去何从
- 响应对象 错误 ''ASP 0185 : 80020003'' 缺少默认属性
- [原创]asp下用实现模板加载的的几种方法总结
- [原创]asp获取URL参数的几种方法分析总结
- Access数据库中“所有记录中均未找到搜索关键字”的解决方法
- ASP程序中输出Excel文件实例一则
- ASP应用中如何限制同一表单被多次提交
利用ASP.NET设计FTP文件上传(下)
出处:互联网 整理: 软晨网（RuanChen.com） 发布: 2009-11-03 浏览: 167 ::
收藏到网摘: n/a
＜% @ Import Namespace=" System.IO " %＞
＜html ＞
＜BODY ＞
＜SCRIPT LANGUAGE = "VB" RUNAT = "SERVER" ＞
Sub UploadFile_Clicked ( Sender as Object, e as EventArgs )
Dim lstrFileName as string
Dim lstrFileNamePath as string
Dim lstrFileFolder as string
' 如果上传目录为空，就使用" c:\ "作为缺省上传目录
' 获得上传到服务器的目录名称
if dir.value ＜＞ "" then
lstrFileFolder = dir.value
else
lstrFileFolder = "c:\"
end if
' 获得文件名称
lstrFileName = loFile.PostedFile.FileName
' 注： loFile.PostedFile.FileName 返回的是
通过文件对话框选择的文件名，这之中包含了文件的目录信息
lstrFileName = Path.GetFileName ( lstrFileName )
' 去掉目录信息，返回文件名称
' 判断上传目录是否存在，不存在就建立
If ( not Directory.Exists ( lstrFileFolder ) ) Then
Directory.CreateDirectory ( lstrFileFolder )
End If
'上传文件到服务器
lstrFileNamePath = lstrFileFolder & lstrFileName
' 得到上传目录及文件名称
loFile.PostedFile.SaveAs ( lstrFileNamePath )
' 获得并显示上传文件的属性
FileName.Text = lstrFileName
' 获得文件名称
FileType.Text = loFile.PostedFile.ContentType
' 获得文件类型
FileLength.Text = cStr ( loFile.PostedFile.ContentLength )
' 获得文件长度
FileUploadForm.visible = false
AnswerMsg.visible = true
' 显示上传文件属性
End sub
＜/SCRIPT ＞
＜ASP:panel id = "FileUploadForm" visible = " true " runat = "server" ＞
＜form method = "post" enctype = "multipart/form-data" runat = "server" ＞
＜h1 ＞ 欢迎使用ASP.NET页面实现文件上传 ＜/h1 ＞
请选择上传到服务器的文件名称：
＜input id = "loFile" type = "file" runat = "server" ＞ ＜br ＞
请输入上传到服务器的目录名称：
＜input id = "dir" type = "text" runat = "server" ＞ ＜br ＞
＜input type = "submit" value = "开始上传" OnServerClick = "
UploadFile_Clicked" runat = "server" ＞
＜br ＞
＜/form ＞
＜/ASP:panel ＞
＜ASP:panel id = "AnswerMsg" visible = " false " runat = "server" ＞
谢谢使用ASP.NET页面实现文件上传 ＜br ＞
成功上传 ＜ASP:label id = "FileName" runat = "server" /＞ ＜br ＞
文件大小 ＜ASP:label id = "FileLength" runat = "server" /＞ 字节 ＜br ＞ 文件类型 ＜ASP:label id = "FileType " runat = "server" /＞ ＜br ＞
＜/ASP:panel ＞
＜/BODY ＞
＜/HTML ＞
五． 总结
至此我们就完成了一个比较完善的FTP文件上传软件的全部工作，由此可见ASP.NET的功能还是比较强大的。通过本例子，我们也看到要想灵活运用ASP.NET，还要深入掌握微软公司为.NET FRAMEWORK开发的软件开发包（SDK BETA 2）,只有掌握了.NET FRAMEWORK开发的软件开发包，才可能用ASP.NET开发出功能更强大，生命力更大的软件。
评论 (0) All
