掲示板システム
ホーム
アクセス解析
カテゴリ
ログアウト
VBでTELNETに接続したい (ID:101180)
名前
ホームページ(ブログ、Twitterなど)のURL (省略可)
本文
色々とありがとうございます。 いなさん（かわいさん）のものを参考に以下を作ってみましたが どうしてもうまくいきません。 （メッセージボックスが表示されません） 間違いを指摘していただけると助かります。 ステップ実行ではCommand1_Click関数が最後まで処理されている事が確認できています。 【作業】 １、ローカルマシンのTELNETサービスを起動し、コマンドプロンプトから起動の確認をする ２、VB6を起動し、標準Exeプロジェクトを選択して開く ３、Microsoft Winsck conpornent 6.0を導入する ４、フォームにコマンドボタン１個を配置する ５、Sinsockコントロールをフォームに配置する ６、フォームモジュールに以下のコードを書く ７、F5キーにて開始する ８、コマンドボタンを押す 【コード】 Private Sub Command1_Click() With Winsock1 If .State = sckClosed Then .RemoteHost = "localhost" ' 接続ホスト名 .RemotePort = "1001" ' 接続ポート番号 .Protocol = sckTCPProtocol ' 接続プロトコル .Connect End If End With End Sub Private Sub Winsock1_Connect() MsgBox "接続しました" & vbCrLf & _ Winsock1.RemoteHost & vbCrLf & _ Winsock1.RemotePort End End Sub
←解決時は質問者本人がここをチェックしてください。
更新する
戻る
掲示板システム
Copyright 2021 Takeshi Okamoto All Rights Reserved.