|
分類:[VB6 以前]
開発環境:Windows XP /VB6.0 SP6
VB6にてPDQcomを使用、外部の複数のデバイスとの通信を検討しています。 外部機器との接続は Bluetooth ドングル + Bluetooth Stasck for Windows by Toshiba の構成です。 近距離通信等の好条件では問題なく動作しますが、外部機器の電源の入れ忘れ、通信距離範囲外等の ケースで通信が切れた時、PC側より再接続を行うと数十秒間フリーズしてしまいます。 一度、通信が途絶えたとき、自動で再接続処理を行い、通信可能条件になった時に再接続させたい のですがこの間、他の通信にフリーズ等で影響を与えないことが条件となります。 VB6での対応は可能でしょうか。対策ありましたら是非宜しくお願いします。
現行の接続は下記の通りです。
For i = 0 to 5 if Device_ON(i) = 1 Then if PDQComm1(i).PortOpen = False then
PDQComm1(i).PortOpen = True
end if end if
Next i
|