로그인 실패라는 문구
캐릭터
2023.04.01
Private Sub CmdLogin_Click()
If txtID.Text = vbNullString Or txtPW.Text = vbNullString Then Exit Sub
If nexon_com(txtID.Text, txtPW.Text) Then
MsgBox 로그인 성공.
Else
MsgBox 로그인 실패
End If
End Sub
-------------------------------------------------------------------------
모듈
Dim Winhttp As New WinHttpRequest
Public Function nexon_com(ID As String, pW As String) As Boolean
Winhttp.Open GET, http://login.nexon.com/login/page/nx.aspx?url=login/login&n4ErrorCode=1&redirect=http%3a%2f%2fwww.nexon.com%2fmain%2fpage%2fnx.aspx
Winhttp.Send
If InStr(StrConv(Winhttp.ResponseBody, vbUnicode), 로그인 실패) Then
nexon_com = False
Else
nexon_com = True
End If
End Function
여기에서요로그인실패라는 문구를 어디넣어야 되나요 ?
| 번호 | 제 목 | 글쓴이 | 날짜 |
|---|---|---|---|
| 2694070 | vb_vbnet님의 사이트댓글자동작성기인데 이것을요. | 가시 | 2025-05-07 |
| 2694041 | 모듈은 무었인가요? | 하람 | 2025-05-07 |
| 2694013 | 비쥬얼베이직 책 추천좀요^^... | 초코맛캔디 | 2025-05-07 |
| 2693985 | 리소스문제데요...ㅋㅋ (1) | 아리에스 | 2025-05-07 |
| 2693929 | 했는데 ㅠㅠ | 볼수록중독 | 2025-05-06 |
| 2693870 | 수정좀요 ^^;; (2) | 차오름 | 2025-05-06 |
| 2693812 | ※고구마는 보아라 (6) | 솔길 | 2025-05-05 |
| 2693789 | 마우스가있는곳의 좌표 보기 | 하예진 | 2025-05-05 |
| 2693759 | 실시간으로 서버 열렸는지 닫혔는지 확인하는법좀 | 참이 | 2025-05-05 |
| 2693728 | 로그인 유지 관련 제발 성실답변좀요 | 에녹 | 2025-05-04 |
| 2693705 | 아 재질문합니다 (5) | 모아 | 2025-05-04 |
| 2693677 | Dim a (1 to 11) AS Long에서 11을 K로 놓는 방법 질문 | 진주 | 2025-05-04 |
| 2693648 | 55런타임오류..... | 가론 | 2025-05-04 |
| 2693620 | 수다님 꺼처럼 하는방법좀요 | PinkPearl | 2025-05-03 |
| 2693564 | ir creator 에대해서 질문드립니당.. | 글고운 | 2025-05-03 |
| 2693540 | 배열 간 이동시키기 | 악당 | 2025-05-03 |
| 2693518 | 비베 WebBrowser1 오류 도움구합니다 | 수예 | 2025-05-02 |
| 2693491 | 블로그스크랩기 , 사이트 글가져오기 질문합니다. | Addicted | 2025-05-02 |
| 2693437 | 폼 에대해서요 ㅜ_ㅜ | 돌삥 | 2025-05-02 |
| 2693412 | 컴파일 오류떠여 ㅠㅠ | 꺆잉 | 2025-05-01 |