掲示板システム
ホーム
アクセス解析
カテゴリ
ログアウト
Winsockでファイル送信できるには？ (ID：75509)
名前
ホームページ(ブログ、Twitterなど)のURL (省略可)
本文
まず、FreeFileの戻り値は残しておきましょう。 ファイルを開いているのならLOF関数を使ってファイルサイズが 取得できます。 Dim GetFileByte() As Byte Dim FileNumber As Integer FileNumber = FreeFile() Open filename For Binary As FileNumber ReDim GetFileByte(0 to LOF(FileNumber) - 1) Get FileNumber , , GetFileByte() Close FileNumber tcpClient.SendData GetFileByte() こんな感じになると思います。
←解決時は質問者本人がここをチェックしてください。
戻る
掲示板システム
Copyright 2021 Takeshi Okamoto All Rights Reserved.