VB 윈속 관련 ㅜㅜ Senddata , Getdata
튼싹
서버Dim ip As String
Private Sub Command1_Click()
Winsock1.Listen
End Sub
Private Sub Winsock1_DataArrival(ByVal bytesTotal As Long)
MsgBox 메세지옴
Winsock1.GetData (ip)
MsgBox ip
List1.AddItem ip
End Sub
Private Sub Winsock1_Close()
Winsock.Close
Winsock.Listen
End Sub
Private Sub Winsock1_ConnectionRequest(ByVal requestID As Long)
Winsock1.Close
Winsock1.Accept requestID
End Sub
Private Sub Winsock1_Error(ByVal Number As Integer, Description As String, ByVal Scode As Long, ByVal Source As String, ByVal HelpFile As String, ByVal HelpContext As Long, CancelDisplay As Boolean)
Winsock.Close
Winsock.Listen
End Sub클라이언트
Private Sub Command1_Click()
Winsock1.Close
Winsock1.Connect aten.vip.sh, 2011
End Sub
Private Sub Command2_Click()
ip = Text1.Text
Winsock1.SendData ipEnd SubPrivate Sub Winsock1_Connect()Dim ip As StringMsgBox 성공, , 예스
End SubPrivate Sub Winsock1_Error(ByVal Number As Integer, Description As String, ByVal Scode As Long, ByVal Source As String, ByVal HelpFile As String, ByVal HelpContext As Long, CancelDisplay As Boolean)
Winsock.Close
MsgBox 실패, , 오우 ㅜㅜ
End Sub
-
지우개
음 질문이 뭐죠?
번호 | 제 목 | 글쓴이 | 날짜 |
---|---|---|---|
2652720 | 리스트 박스... (2) | 중독적 | 2024-04-25 |
2652693 | 프린터 인쇄방향 질문입니다. (4) | 루리 | 2024-04-24 |
2652669 | 그 추가하는거만들떄?! (4) | 메이커 | 2024-04-24 |
2652642 | 파일 업데이트 질문 (1) | 유우 | 2024-04-24 |
2652614 | picturebox에 그림이 없을 경우에 메시지창이 뜨도록 하려면 어떻게 하나요 | 발랄한그1녀 | 2024-04-24 |
2652587 | 레지스트리 키 목록과 값목록 구하는 방법 없을 까요? | 아연 | 2024-04-23 |
2652530 | 네이버 로그인 질문드립니다. (1) | 달콤이 | 2024-04-23 |
2652472 | 오류가 뜨네요...... (2) | 감추어왔던 | 2024-04-22 |
2652445 | 어떤 날짜로 부터 몇일 지났는지 | 유키 | 2024-04-22 |
2652286 | 폼 복사하기 | 눈 | 2024-04-21 |
2652254 | 마케팅프로그램들 가격질문 .. | 범한 | 2024-04-20 |
2652227 | 지정프로세스이외에모든프로세스를종료 | 조심해 | 2024-04-20 |
2652199 | list1.list 내용 모두 txt 파일로 저장하기 | 여우비 | 2024-04-20 |
2652169 | 체크 박스 | 꽃바라기슬아 | 2024-04-20 |
2652138 | 맨밑에 오른쪽버튼 누르면 나오는거 어떻게해요? | 동생몬 | 2024-04-19 |
2652085 | FindWindow 질문할게요 | 빵야 | 2024-04-19 |
2652059 | 질문이요 ~!!!! | by풀잎 | 2024-04-19 |
2652032 | 웹 브라우저 에 대하여 질문좀.. - 수정 | 콩알녀 | 2024-04-18 |
2652004 | 프로세스 클리너를 만드려는데요... | 핫블루 | 2024-04-18 |
2651956 | 텍스트에 숫자질문요. | 도손 | 2024-04-18 |