掲示板システム
ホーム
アクセス解析
カテゴリ
ログアウト
FileGetでデータを取得できない (ID:147810)
名前
ホームページ(ブログ、Twitterなど)のURL (省略可)
本文
ご回答ありがとうございます。 以下のようにバッファを確保しましたが、FileGetのところで同じメッセージが出てしまいます。 Dim wd() As Byte wd = System.Text.Encoding.GetEncoding(65001).GetBytes(StrDup(10000, "1")) dim spoint as long=8239 FileGet(fileno, wd, spoint) VB6では以下のようになっているプログラムをvb2010に移植したいのですが。。。 バッファ確保箇所も同じ結果になりませんが、現状影響ないので流してます。 Dim wd() As Byte dim spoint as long wd = String$(5000, "1") For i = 0 To 4999 wd(i) = 0 Next i spoint = 8239 Open FileName For Binary As #1 Get #1, spoint, wd
←解決時は質問者本人がここをチェックしてください。
戻る
掲示板システム
Copyright 2021 Takeshi Okamoto All Rights Reserved.