C# と VB.NET の質問掲示板

ASP.NET、C++/CLI、Java 何でもどうぞ

C# と VB.NET の入門サイト

Re[1]: vb.netにおけるソケット通信


(過去ログ 106 を表示中)

[トピック内 2 記事 (1 - 2 表示)]  << 0 >>

■63346 / inTopicNo.1)  vb.netにおけるソケット通信
  
□投稿者/ ma-3 (1回)-(2012/08/17(Fri) 18:23:01)

分類:[VB.NET/VB2005 以降] 

vb.net2005を使用しています。

サイトを参考にTCPクライアント・サーバープログラムを作成しています。
ローカルネットワーク内ではサーバとクライアントともに正常に動作しますが、ローカルでなくなると正常に動作しません。

---サーバ側---
http://homepage2.nifty.com/nonnon/SoftSample/CS.NET/SampleTcpIpSvr.html
上記のサイトを参考にプログラムを作成
ポート80,10000を開放
グローバルIPアドレスでドメイン名を取得

サーバ側のアプリケーションを稼働した後、ネット上のポート確認ツールなどにて、ポートが正常に解放されていることを確認。
また、ping確認も正常。
---クライアント側---
http://homepage2.nifty.com/nonnon/SoftSample/CS.NET/SampleTcpIp.html
上記のサイトを参考にプログラムを作成
サーバプログラムがあるネットワークには所属していない外部のクライアントです。
Try
'//クライアントのソケットを用意
client = New System.Net.Sockets.TcpClient("ドメイン名", Int32.Parse("10000"))
'//サーバからのデータを受信するループをスレッドで処理
threadClient = New Thread(New ThreadStart(AddressOf ClientListen))
threadClient.Start()
Listbox1.Items.Add("サーバに接続しました:")
Return True
Catch ex As Exception
Listbox1.Items.Add("クライアント接続エラー:" + ex.Message.ToString())
Return False
End Try
実行すると、「対象のコンピュータによって拒否されたため接続できませんでした」と表示されエラーになります。
 また、ポート番号を80にして接続を試みたところ、正常に接続ができました。
 ルータの設定による10000ポートの割り振りやファイヤーオールの設定は行いましたが解決できません。

 解決策やアドバイスがありましたら、どうかご教授ください。
引用返信 編集キー/
■63347 / inTopicNo.2)  Re[1]: vb.netにおけるソケット通信
□投稿者/ ma-3 (2回)-(2012/08/17(Fri) 21:52:40)
No63346 (ma-3 さん) に返信
> vb.net2005を使用しています。
>
> サイトを参考にTCPクライアント・サーバープログラムを作成しています。
> ローカルネットワーク内ではサーバとクライアントともに正常に動作しますが、ローカルでなくなると正常に動作しません。
>
> ---サーバ側---
> http://homepage2.nifty.com/nonnon/SoftSample/CS.NET/SampleTcpIpSvr.html
> 上記のサイトを参考にプログラムを作成
> ポート80,10000を開放
> グローバルIPアドレスでドメイン名を取得
>
> サーバ側のアプリケーションを稼働した後、ネット上のポート確認ツールなどにて、ポートが正常に解放されていることを確認。
> また、ping確認も正常。
> ---クライアント側---
> http://homepage2.nifty.com/nonnon/SoftSample/CS.NET/SampleTcpIp.html
> 上記のサイトを参考にプログラムを作成
> サーバプログラムがあるネットワークには所属していない外部のクライアントです。
> Try
> '//クライアントのソケットを用意
> client = New System.Net.Sockets.TcpClient("ドメイン名", Int32.Parse("10000"))
> '//サーバからのデータを受信するループをスレッドで処理
> threadClient = New Thread(New ThreadStart(AddressOf ClientListen))
> threadClient.Start()
> Listbox1.Items.Add("サーバに接続しました:")
> Return True
> Catch ex As Exception
> Listbox1.Items.Add("クライアント接続エラー:" + ex.Message.ToString())
> Return False
> End Try
> 実行すると、「対象のコンピュータによって拒否されたため接続できませんでした」と表示されエラーになります。
>  また、ポート番号を80にして接続を試みたところ、正常に接続ができました。
>  ルータの設定による10000ポートの割り振りやファイヤーオールの設定は行いましたが解決できません。
>
>  解決策やアドバイスがありましたら、どうかご教授ください。
解決済み
引用返信 編集キー/


トピック内ページ移動 / << 0 >>

このトピックに書きこむ

過去ログには書き込み不可

管理者用

- Child Tree -