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

わんくま同盟

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

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


(過去ログ 29 を表示中)
■13620 / )  Re[1]: 接続エラーの原因及び処置方法
□投稿者/ 七曜 (64回)-(2008/01/31(Thu) 23:19:23)
No13607 (NORTH さん) に返信
> 販売管理システムの起動で最初ログイン画面を表示するのですが、20回に1回ぐらい
> の割合で接続エラーになります。
> プログラムは下記の通りです。
> 原因はたまたまタイミングが悪いからなんでしょうか?
> LAN環境はVPN接続(ルータ有)と社内LAN(ルータ無し)の2種類ですが
> VPN接続環境で時々エラーが出るようです。
> 原因がわかれば教えて下さい。

例外の中身を見てみないとなんとも・・・。

> また、わからない場合は2回程リトライしようと思っているのですが、下記の
> Openメッソッドでループ処理をしたいのですが、書き方がわかりません。

        Const RETRY_MAX As Integer = 2

        Dim open As Boolean = False
        Dim retry As Integer = 0

        While ((Not (open)) And (retry < RETRY_MAX))
            Try
                '   処理が成功したらフラグを立てる(ここではリトライさせるのでコメントアウトしておきます。)
                '   open = True
                '   サンプルなので強制的に例外を発生させます。
                Throw New ApplicationException("サンプル例外")

            Catch ex As Exception
                If (retry < RETRY_MAX) Then
                    retry += 1
                    '   リトライ時にしておきたい処理
                    MessageBox.Show(String.Format("{0}回目", retry))
                Else
                    '   リトライ回数を超えた時にしておきたい処理
                End If
            End Try
        End While

返信 編集キー/


管理者用

- Child Tree -