WriteFile()함수에서 쓸수 없다는 에러가 아마 나올겁니다.
소스에 보면 일단 WriteFile()함수가 정상적으로 실행 되었을 떄
포트상에 나타나는 에러만 잡게 되어있구요.

님이 보신 에러는 그전에 나타나는 에러
다시말해서
WriteFile()함수를 실행하려다가 생긴 에러인듯 합니다.
쓸수 없다는 에러..

이런건 포트가 정상적으로 열리지 않아 생깁니다.

이 에러부분을 좀더 매끄럽게 에러표시를 할려면
그부분에 예외처리를 해주세요....
책이 혹시 정모씨가 쓴"볼랜드 C++빌더 정복 4.0"인가요...
그 책에는 예외처리부분은 안나왔네요.

그리고 이 에러를 근본적으로 해결 할려면 포트 검색부분을 달아주세요.




이승윤 님이 쓰신 글 :
: 가남사 빌더정복 4 이라는 책 중에서 232통신 프로그램을 작성해서 test 해 보고있는데...수신은 되는데...송신이 문제가 있어서 메일 드립니다.
: 환경은 win 2000이고 빌더 6을 사용합니다.
:
: 확인을 해본결과 NetWriteString함수에서 WriteFile함수에서 그냥 죽는거 같습니다.
: 
: 혹시 아시는분 답장좀 부탁드립니다.
:
: int __fastcall TForm1::NetWriteString(char *pszString, int cbString)
: {
:         int        i;
:         LONG lrc;
:
:         for (i = 0; i < cbString; i++) {
:                 char Ch = pszString[i];
:                         if (!WriteFile(hComm, (LPBYTE)&Ch, 1, (LPDWORD)&lrc, NULL)) {
:                                 CommError(GetLastError ());
:                         }
:         }
:         return cbString;
: }