강좌에 대한 글은 모두 고구마S에서 펌을 한 것이므로 출처를 정확하게 밝힙니다. http://cafe.naver.com/gogoomas - 주소. 강좌 선생님 : 고구마, 에이리언님
제일먼저 프로젝트 - 구성요소에서 Winsock 를 추가합니다. 아래와 같은 내용으로 폼 에 추가합니다. Text1 - 채팅 내용 (속성에 MultiLine 을 True로 해줍니다.) Text2 - 닉네임 Text3 - 보낼 내용 Command1 - 전송 버튼 Winsock1 - 서로 주고 받는 매개체 아래는 서버의 소스 입니다. Dim 내용 As String '내용을 담을 문자 선언 'ㅡㅡㅡㅡㅡㅡㅡㅡㅡㅡㅡㅡㅡㅡㅡㅡㅡㅡㅡㅡㅡㅡㅡㅡㅡㅡㅡㅡㅡㅡㅡㅡㅡㅡㅡㅡㅡㅡㅡㅡㅡㅡㅡ Private Sub Form_Load() '폼이 열리면(서버 열기) Winsock1.Close '초기화(안해도됨) Winsock1.LocalPort = 1234 '포트 설정(숫자로 아무거나 , 80 빼고...) Winsock1.Listen '..
파일의 속성- 예를 들자면 숨김, 읽기 전용 등의 상태를 알 수 있어요. 다음과 같이 선언해요. Private Declare Function GetFileAttributes Lib "kernel32" Alias "GetFileAttributesA" _ (ByVal lpFileName As String) As Long 인수인 lpFileName에 파일의 경로를 입력하는 것이에요. 예를 들자면 이렇게- Dim Att as Long Att = GetFileAttributes("C:\Stalking\빗방울.avi") 그러면 변수 Att에 파일의 정보가 담기는 거에요. 단지 숫자에 불과한데 어떻게 사용하냐구요? 아주 간단해요! 상수를 이용한답니다! 다음은 파일 정보와 관련된 상수 리스트에요. Private Con..