掲示板システム
ホーム
アクセス解析
カテゴリ
ログアウト
Winsockでサーバーを作成 (ID:115335)
名前
ホームページ(ブログ、Twitterなど)のURL (省略可)
本文
考え方は大体それでいいと思いますが、12346とするかは微妙です。 プログラム中で空きポート番号の一覧を管理するならできそうですが、大概は 面倒なのでLocalPortに0を入れて空いている適当なポートを勝手に割り当てさ せます。 一例としてサンプル(VB6)を(考えかただけ読んでください。) Private Sub Wsock_ConnectionRequest(Index As Integer, ByVal requestID As Long) 'Wsock - WinSockコントロール 'Index = 0 受け付け用(特定ポートを開いて待ち受ける) 'Index = 1 〜 n 通信用 Dim NewIndex As Integer '待ち受け用以外でリクエストが来ても無視する。 If Index <> 0 Then Exit Sub NewIndex = Wsock.UBound + 1 '通信で使用するためのWinSockコントロールをロードする Load Wsock(NewIndex) '空きポートを適当に割り当てる Wsock(NewIndex).LocalPort = 0 'ロードしたコントロールでaccept処理 Wsock(NewIndex).Accept requestID End Sub
←解決時は質問者本人がここをチェックしてください。
戻る
掲示板システム
Copyright 2021 Takeshi Okamoto All Rights Reserved.