로그인프로그램 질문이요.
리카
Dim WinHttp As New WinHttp.WinHttpRequest
Private Sub btn4_Click()Dim temp As String
WinHttp.Open POST, http://wr.mugeta.com/form.jsp
WinHttp.SetRequestHeader Content-Type, application/x-www-form-urlencoded
WinHttp.Send szUserID= + Text1 + &szUserPassword1= + Text2 + &WR_HIDDEN=pdgnPMIggC-F2QLgihsNM:drFhZ%25afDQhMZp2Ph4IZPGjKlkn-hfn7NkiQfpr&PAGEKEY=QSpUPZMywhRXAukhqfFighmigrq1epMmljiN6ighMSSKLtigGpMhWXamZYKbpYh2ua6Lre2sZCVVm3LUTiLoN6SNMqnmTCYJXTMpihPbWShleigfujHGlthU-DlGKS3sP+fQW/IoAm3MMnJg4DmPmHflKbAHNPJh
temp = StrConv(WinHttp.ResponseBody, vbUnicode)
If InStr(temp, http://wr.mugeta.com/?PAGEKEY=RRAKDZMywhRXAukhqfFighmigrq1epMmljiN6ighMSSKLtigrSBhWXamZYKbpYh2ua6Lrl2sZCVVm3NGinjNDZrp2U2eZ_dfpIS3sMKRVprz2eF5uk.OHhQl6u9M%2F7E6oOj4hqQ6UI3bLdGb%2525byEJbeqh6UVZpcOjzwCFCFSneg3ZhLfikog9beUniyop2eaCIPCqiDigRA%3Ay1%3A%2525bLNImKGg5CoTjqfhG3fkNgmfg) Then
If Text1.Text = vbString Then
MsgBox 한글은 안됨ㅋ
Else
MsgBox 로그인 성공!
End If
Else
MsgBox 로그인 실패!
End If
End Sub
위 소스 붉은 색에서 구문 오류가 나오는데 어떡게 해결해야돼죠???
-(하이픈)때문에 드는 것 같은데 하이픈을 지울 수가 없어서요.
| 번호 | 제 목 | 글쓴이 | 날짜 |
|---|---|---|---|
| 2698939 | 메세지박스 줄띄우는법 | 누리별 | 2025-06-21 |
| 2698910 | 런타임 424 질문 | 야미 | 2025-06-21 |
| 2698883 | 배열에 관련하여 (1) | 민트맛캔디 | 2025-06-21 |
| 2698856 | 빤짝거리는 내 툴의 재목 !? | 초롱꽃 | 2025-06-20 |
| 2698830 | 리스트 인덱스 질문 (2) | 말글 | 2025-06-20 |
| 2698803 | 리스트 뷰 질문이요. (2) | 딸기향 | 2025-06-20 |
| 2698750 | 헐 웹브앙대요 | 꺆잉 | 2025-06-19 |
| 2698694 | 모듈의 핸들 | 렁찬 | 2025-06-19 |
| 2698674 | VB 고수분들 봐주세요 (6) | 세이 | 2025-06-19 |
| 2698617 | 윈속.ocx다운받는곳좀여 | 안토니 | 2025-06-18 |
| 2698588 | 자 나를 즐겁게 해봐요 | 다흰 | 2025-06-18 |
| 2698529 | 이거 저작권 상,고,명인데 점부탇드림 (3) | 서향 | 2025-06-17 |
| 2698503 | 오늘도~윈속질문이요~ | 텐시 | 2025-06-17 |
| 2698478 | 비베6에서 exe파일만들때 자동링커되려면 | 달달한캔디 | 2025-06-17 |
| 2698431 | 파일 주소 숨기고 다운로드 하게 하는 방법! (질문임..) (1) | 비마중 | 2025-06-16 |
| 2698405 | 어떤 dll 이 제 보안프로그램 메모리를 자꾸 변조하는데. (2) | 귀염포텐 | 2025-06-16 |
| 2698372 | 웹브라우저 특정부분 보여주기 | 보물선 | 2025-06-16 |
| 2698343 | 위도우 8 - 비주얼베이직 6.0 설치 오류..(Heple...Me..ㅠ_ㅠ) (2) | 접시 | 2025-06-16 |
| 2698319 | 하다가 도중에 오류가떠서 특정부분으로 가게하는건어떻게하나요? | 연하늘 | 2025-06-15 |
| 2698292 | 밑 질문에 이어서 하나 더 질문합니다. | 단화한 | 2025-06-15 |