tagCANDY CGI VBレスキュー(花ちゃん)の Visual Basic 6.0用 掲示板
VBレスキュー(花ちゃん)の Visual Basic 6.0用 掲示板
[ツリー表示へ]  [ワード検索]  [Home]

タイトル バイナリデータの取り出し
投稿日: 2010/09/10(Fri) 23:51
投稿者ニール
VB6初心者です。
環境はVB6 Windows7です。よろしくお願いいたします

バイナリデータを取り出し、
ファイルとして保存するということをやりたいです。
ファイルは2GBなどのファイルを扱うことがあります
まず取り出しの処理の前に
以下のコードでファイルを開いて保存するような動作から作ってみたのですが
2GBのファイルのせいかReDimの行で「メモリが不足しています。」というエラーになりました
どなたか解決方法を教えていただけませんでしょうか?
お願いします

Dim bytArray() As Byte
Open "test.bin" For Binary As #1
ReDim bytArray(FileLen("test.bin") - 1)
Get #1, , bytArray
Open "Res.txt" For Binary Access Write As #2
Put #2, , bytArray
Close #2
Close #1

- 関連一覧ツリー をクリックするとツリー全体を一括表示します)

古いスレッドにレスはつけられません。