수다닷컴

오류에 대하여 질문하신다면, 어느 부분에서 어떤 내용의 오류가 나는지를 써주세요.


IfStr(winhttp.ResponseText, http://static.nid.naver.com/sso/cross-domain.nhn?sid=) Then

이게 네이버 로그인 중에 있던데
이걸로 로그인 성공과 실패를 메박으로 뛰우던데

이건 어떻게 구한거죠?

지금 구한 소스

Dim a As New Winhttp.WinHttpRequest
Private Sub Command1_Click()
a.Open POST, http://www.djdonghwa.es.kr/icons/app/auth/local_auth.php
a.SetRequestHeader Referer, http://www.djdonghwa.es.kr/smain.html
a.SetRequestHeader Content-Type, application/x-www-form-urlencoded
a.Send &UID= & Text1 & &PASSWD= & Text2

If Text1.Text = vbNullString And Text2.Text = vbNullString Then
MsgBox 아이디와 비밀번호를 적어주세요., ,
ElseIf Text1.Text = vbNullString Then
MsgBox 아이디를 적어주세요., ,
ElseIf Text2.Text = vbNullString Then
MsgBox 비밀번호를 적어주세요., ,
End If

End Sub

지금 제가 이만큼 짯는데 여기에서 확인, 실패 구별을 어떻게 하는지좀...
초등학교 사이트예요..

신청하기