winsock 현재 상태를 나타내려고 하는데 작동이 안되네요
볼매
Private Sub Command1_Click()
Text1.Text = Winsock1.LocalIP
End Sub
Private Sub Command2_Click()
Winsock1.Close
End Sub
Private Sub Form_Load()
Command2.Enabled = False
Text1.Enabled = False
Text2.Enabled = False
Winsock1.Close
Winsock1.LocalPort = 6411
Winsock1.Listen
End Sub
Private Sub Timer1_Timer()
If winsockstate = sckClosed Then
Text3.Text =
Text3.Text = 닫혀있음
ElseIf winsockstate = sckOpen Then
Text3.Text =
Text3.Text = 열려있음
ElseIf winsockstate = sckListening Then
Text3.Text =
Text3.Text = 수신대기중
ElseIf winsockstate = sckConnectionPending Then
Text3.Text =
Text3.Text = 연결보류중
ElseIf winsockstate = sckResolvingHost Then
Text3.Text =
Text3.Text = 호스트고정중
ElseIf winsockstate = sckHostResolved Then
Text3.Text =
Text3.Text = 호스트고정완료
ElseIf winsockstate = sckConnecting Then
Text3.Text =
Text3.Text = 연결중
ElseIf winsockstate = sckConnected Then
Text3.Text =
Text3.Text = 연결완료
ElseIf winsockstate = sckClosing Then
Text3.Text =
Text3.Text = 피어가연결을닫고있음
ElseIf winsockstate = sckError Then
Text3.Text =
Text3.Text = 오류
Else
Winsock.SendData MsgBox(서버로부터응답이없습니다, vbOKOnly, 오류)
End If
End Sub
Private Sub Winsock1_Connect()
Command2.Enabled = True
End Sub
Private Sub Winsock1_ConnectionRequest(ByVal requestID As Long)
Winsock1.Close
Winsock1.Accept requestID
Command2.Enabled = True
End Sub
전체 소스(서버) 입니다 프로그램을 실행하면 text3에 닫혀있음 밖에 뜨지않습니다 연결이 되도 닫혀잇다고 나오네요
어떻게 해야할까요?
번호 | 제 목 | 글쓴이 | 날짜 |
---|---|---|---|
2676241 | 이거왜이래, 짜증나게 (4) | 각티슈 | 2024-11-25 |
2676213 | 네이버 글작성 도배기에 대한질문좀... (5) | Sona | 2024-11-25 |
2676183 | 후킹? (1) | 꼬꼬마 | 2024-11-24 |
2676153 | 아차! 음악링크좀 쓰게 올려주실분.. 많이있는곳으로! | 사이 | 2024-11-24 |
2676125 | Themida 패킹시 윈도우7은 호환 하지 못하나요? | 라 | 2024-11-24 |
2676093 | 현재프로그램 파일이름을 추출하는걸알고싶습니다 (1) | 도1도캣 | 2024-11-24 |
2676066 | exe를 소스로 만드는법좀.. (3) | 회전력 | 2024-11-23 |
2676034 | 이런 창은 어떻게 지우나요? | 수련 | 2024-11-23 |
2676006 | 질문하나더~ | 찬바리 | 2024-11-23 |
2675930 | 작업관리자 차단 | 별빛 | 2024-11-22 |
2675901 | 숫자를 제외한 문자를 어떻게 나타내야될까요? | 진나 | 2024-11-22 |
2675871 | 거의마지막질문인데요 | 아메 | 2024-11-22 |
2675846 | 제가 완성햇는데요 ㅎ; | 거늘 | 2024-11-21 |
2675824 | 타이머. 프로그래스바 코드 질문입니다. (10) | 빛글 | 2024-11-21 |
2675798 | 이걸 머라고해야 할지모르지만 질문합니다 (2) | 리라 | 2024-11-21 |
2675772 | 구구단 함수 질문이요~! (1) | 테이 | 2024-11-21 |
2675746 | exe저장시 런타임53 에러 | 아픔이보여 | 2024-11-20 |
2675718 | ocx 설치법 | 달달한캔디 | 2024-11-20 |
2675630 | ""안에 큰따음표 넣기. | 터전 | 2024-11-19 |
2675519 | 컴파일 오류 ?? | 슬아라 | 2024-11-18 |