メニュー

IF文
FOR文
Usingステートメント

ArrayListを利用
IEnumerableを実装
Dictionaryを利用
StringDictionaryを利用
Stack(スタック)
Queue(キュー)
Generic List

小文字⇔大文字の変換
文字列をある文字列で分割

日付関係
現在日付と時刻の取得
明日、来月の日付の取得
月末の日付の取得
日付チェック

ファイル関係
ファイル選択ダイアログ
ファイル読み込み
CSVファイル読み込み
XmlSerializerを利用
GZip圧縮
ファイル情報の取得
フォルダ配下のファイル情報取得

MySQLに接続
ADO.NetでSQLServerに接続

スレッドを作成
ManagementObjectSearcherを利用

ドライブ情報を取得
Webリクエスト送信

フォーム関係
チェックボックス
メニューバーの作成
DataGridViewのDataSourceに配置
Timerコントロール
タスクバーにアイコンを表示
プログレスバーを表示
閉じるボタンの処理
透過度の変更
ListBoxにドラック&ドロップ
WebBrowserコントロール
コントロールをマウスで移動
MDIアプリケーション
フォームに線を引く

正規表現
「^」について
「$」について
「+」について
「*」について
「.」について
「|」について
「{n}」について
「{n,m}」について
「[]」について

トップ
E-Mail
xml

ASP.Netのお勉強
ASP.Netで掲示板を作成しよう
Excel マクロ・VBAのお勉強
PHPのお勉強
AJAXのお勉強
Webデザインのお勉強
Javaのお勉強
連想書籍検索
世界の観光地検索
路線図
総合サイトCocoaLiz
GZip圧縮@VB.Net

GZip圧縮を行います。

圧縮したいファイルをByteで読み込みます。

GZipStreamを生成します。
FileStreamを渡して、インスタンスを生成します。

Writeメソッドで読み込んだByteの配列を書き込みます。
gzファイルが作成されます。

複数のファイルの場合は、tarで纏めるのでしょうね。
よく、***.tar.gzなるファイルがありますね。


Dim fileStream As FileStream

'FileStream生成
fileStream = New FileStream("C:\in.txt", FileMode.Open, FileAccess.Read, FileShare.Read)

'Byte読み込み
Dim buf(fileStream.Length - 1) As Byte
fileStream.Read(buf, 0, buf.Length)

'クローズ
fileStream.Close()

'GZipStream生成
Dim gZipStream As System.IO.Compression.GZipStream
gZipStream = New GZipStream(New FileStream("C:\out.gz", FileMode.Create, FileAccess.Write), CompressionMode.Compress, True)

'Byte配列を書き込み
gZipStream.Write(buf, 0, buf.Length)

'クローズ
gZipStream.Close()




Copyright (C) 2008 VB.Netのお勉強. All Rights Reserved.