구글로그인어떻게하나여 아무것도몰라서집어넣기만했는데 ㅜㅜ
예린
Private Sub Command1_Click()
winhttp.Open POST, https://accounts.google.com/ServiceLogin?hl=ko&continue=https://www.google.co.kr/
winhttp.SetRequestHeader https://accounts.google.com/ServiceLogin?hl=ko&continue=https://www.google.co.kr/
winhttp.SetRequestHeader Content-Type, application/x-www-form-urlencoded
winhttp.Send continue=https%3A%2F%2Fwww.google.co.kr%2F&dsh=1196780749829071769&hl=ko&GALX=Xvvs9aasytk&pstMsg=1&dnConn=&checkConnection=youtube%3A131%3A1&checkedDomains=youtube&timeStmp=&secTok=&Email=& 아이디 &%40gmail.com&Passwd=& 비번 &&signIn=%EB%A1%9C%EA%B7%B8%EC%9D%B8&PersistentCookie=yes&rmShown=1
DoEvents
If InStr(winhttp.ResponseText, https://www.google.co.kr/) Then
msgbox 로그인성공
당연히안되는거압니다
알려주세여 ㅜㅜ
-
딥핑크 2024-06-15
winhttp 선언이 없네요
맨 위에다가
Dim WinHttp As New WinHttp.WinHttpRequest
집어넣으시구요
무슨프로그램 만드시는...?