Denso Power Net Terminal BHT-103 Dokumentacja Strona 458

  • Pobierz
  • Dodaj do moich podręczników
  • Drukuj
  • Strona
    / 577
  • Spis treści
  • BOOKMARKI
  • Oceniono. / 5. Na podstawie oceny klientów
Przeglądanie stron 457
450
TCP.STTS% = 2
Disconnect TCP/IP communications pathway
CALL "SOCKET.FN3" .fcTDiscnn INTERFACE%
TCP.STTS% = 1
Close IrDA communications device
CLOSE #1
TCP.STTS% = 0
ON ERROR GOTO 0
RETURN
************************************************
Error-handling routine *
************************************************
TCP.ERR:
WERR = ERR
RESUME ERRSUB
ERRSUB:
ON ERROR GOTO 0
ON ERROR GOTO ERRSUB2
IF TCP.STTS% > 2 THEN
CALL "SOCKET.FN3" .fcClose SOCKFD% Close socket
END IF
IF TCP.STTS% > 1 THEN
CALL "SOCKET.FN3" .fcTDiscnn INTERFACE% Disconnect TCP/IP communications
pathway
END IF
IF TCP.STTS% > 0 THEN
CLOSE #1 Close IrDA communications device
END IF
ON ERROR GOTO 0
WAIT 0,1: W$ = INKEY$
IF WERR = &h105 THEN If power-off error, retry
ON ERROR GOTO TCP.ERR
GOTO TCP.OPEN
ELSE
RETURN
END IF
ERRSUB2:
RESUME NEXT
Przeglądanie stron 457
1 2 ... 453 454 455 456 457 458 459 460 461 462 463 ... 576 577

Komentarze do niniejszej Instrukcji

Brak uwag