.NET2.0壓縮文件
来源:互联网 发布:秀才权限管理系统源码 编辑:程序博客网 时间:2024/05/25 19:57
Public Function AddZipFile(ByVal srcFileName As String, ByVal zipFileName As String, ByRef ERRORStr As String) As Boolean
ERRORStr = ""
If Not File.Exists(srcFileName) Then
ERRORStr = "WARN|原文件[" + srcFileName + "]路徑不正確,請查正。"
Return False
End If
Dim result As Boolean = False
Dim fs As FileStream = Nothing
Dim output As FileStream = Nothing
Dim zipStream As GZipStream = Nothing
Try
fs = New FileStream(srcFileName, FileMode.Open, FileAccess.Read)
Dim buffer As Byte() = New Byte(fs.Length) {}
fs.Read(buffer, 0, buffer.Length)
fs.Close()
If File.Exists(zipFileName) Then
Try
File.Delete(zipFileName)
Catch ex As Exception
ERRORStr = "WARN|壓縮檔[" + zipFileName + "]已存在且刪除失敗,請查正。"
Return False
End Try
End If
output = File.Create(zipFileName)
zipStream = New GZipStream(output, CompressionMode.Compress, False)
zipStream.Write(buffer, 0, buffer.Length)
result = True
Catch ex As Exception
ERRORStr = "ERROR|系統在函數[AddZipFile]中發生錯誤:" + ex.ToString
result = False
Finally
If Not zipStream Is Nothing Then
zipStream.Flush()
zipStream.Close()
End If
End Try
Return result
End Function
- .NET2.0壓縮文件
- .NET2.0解壓縮文件
- .net2.0写入文件出错
- asp.net2.0上传文件
- asp.net2.0上传文件
- asp.net2.0 多文件压缩上传
- ASP.NET2.0文件图片处理
- ASP.NET2.0文件图片处理
- ASP.NET2.0打通文件图片处理
- ASP.NET2.0文件图片上传C#
- .NET2.0对Config文件的操作
- ASP.NET2.0打通文件图片处理
- ASP.NET2.0打通文件图片处理
- .net2.0中读取xml文件方法
- ASP.NET2.0文件图片处理
- 关于.NET2.0下的脱机文件App_Offline.htm文件
- ASP.NET2.0中FileUpload控件的使用(即ASP.NET2.0中如何上传文件)
- ASP.NET2.0中FileUpload控件的使用(即ASP.NET2.0中如何上传文件)
- 申请org.ua域名(教程)
- 一个小时知道答案就是天才
- 使用C#在应用程序间发送消息
- C# 中如何自定义事件?
- CommonDialog中同时打开多个文件实现(转)
- .NET2.0壓縮文件
- 晨雨初露
- .NET2.0解壓縮文件
- ArcView GIS 应用与开发技术(13)-定制ArcView
- 项目软件过程的迭代设计作业(案例设计)
- 从VB6 到VB.net 2005(一)
- 学习.Net的经典网站
- Facebook App 的5种盈利建议
- ubuntu source.list