컴파일오류좀;
나샘
Dim winhttp As New winhttp.WinHttpRequestPrivate Sub Command1_Click()
List1.Clear
winhttp.Open POST, http://www.ipaddresslocation.org/ip-address-locator.php
winhttp.SetRequestHeader Referer, http://www.ipaddresslocation.org/ip-address-locator.php
winhttp.SetRequestHeader Content-Type, application/x-www-form-urlencoded
winhttp.Send ip= & Text1
Call Parsing2(winhttp.ResponseText, ip += , ;, List1)
End SubPrivate Sub Command2_Click()
Dim i&
For i = 0 To List1.ListCount
Label1 = Split(List1.List(1), :)(0)
Label2 = Split(List1.List(2), img)(0)
Next i
End SubFunction Parsing2(A$, B$, C$, List As ListBox)
Do While InStr(A, B)
A = Mid$(A, InStr(1, A, B) + Len(B))
List.AddItem Replace(Mid$(A, 1, InStr(1, A, C) - 1), : br /, vbNullString)
Loop
Call Command2_Click
End Function컴파일오류나는데;;뭐가문제인거죠?ㅜ사용자 정의형식이 정의되지않앗습니다. 뜸 ㅠ
| 번호 | 제 목 | 글쓴이 | 날짜 |
|---|---|---|---|
| 2696825 | 메이플스토리로그인(접속기) 소스오류, 해결바랍니다! | 키다리 | 2025-06-02 |
| 2696800 | 그누보드 multipart 게시글작성 (3) | HotPink | 2025-06-02 |
| 2696640 | 이 소스의 모듈좀 주세용 ;; | 파이팅 | 2025-05-31 |
| 2696591 | 다운프로그램 넣는법?? | 아놀드 | 2025-05-31 |
| 2696566 | 수정해도 그래요 ㅜㅜ 다시한번 제발 이것좀 해결해주세요 ㅜ | 하늘빛눈망울 | 2025-05-30 |
| 2696513 | 텍스트 활성 방법 좀... | 힘찬 | 2025-05-30 |
| 2696466 | ExitWindow함수로 컴퓨터 끄는 방법좀요 | 가장 | 2025-05-29 |
| 2696441 | 기억이안나서그런데 ㅠㅠ | 란새 | 2025-05-29 |
| 2696412 | 리스트뷰 에 체크 할수 있게 하는법좀요;;;ㅠ. | PinkPearl | 2025-05-29 |
| 2696380 | 질문이요 제발 답변좀요 ㅠㅠ | 은G | 2025-05-29 |
| 2696355 | 자동적용Q&A | 지음 | 2025-05-28 |
| 2696327 | 리스트 삭제 질문 | 힘찬 | 2025-05-28 |
| 2696300 | IF 문 질문합니다. | 볼1매그녀 | 2025-05-28 |
| 2696272 | 65535 크기의 배열에서 특정 부분만 읽는법 (1) | 소녀틳향기 | 2025-05-28 |
| 2696241 | winhttp 질문! 고수분들답변부탁드려요^ㅆ^ 주석달아주실수있는분! 오류해결 | 뿡뿡 | 2025-05-27 |
| 2696189 | 스크린샷에 글씨쓰기 (1) | 푸른마을 | 2025-05-27 |
| 2696159 | 다중 챗방에 대해 질문합니다 ! | 놓아줄게요 | 2025-05-27 |
| 2696131 | 저기요 핫키질문인데 ;;좀봐주세요^^!!!!!!!! | 영빈이 | 2025-05-26 |
| 2696104 | 2번째 질문;; | 사이 | 2025-05-26 |
| 2695993 | VMPROTECT 마지막 질문, | LO | 2025-05-25 |