[VBScript] 다음(Daum) 자동로그인 스크립트 만들기

[VBScript] 다음(Daum) 자동로그인 스크립트 만들기


다음(Daum)에 자동로그인 하는 스크립트입니다.
네이버는 별도의 로그인화면을 사용하는 반면, 다음은 메인화면에서 로그인 오브젝트를 직접 참조할 수 있습니다.

사용되는 로그인화면 오브젝트
     id    : ID입력 텍스트 박스
     pw  : 비밀번호 입력  텍스트 박스
     loginSubmit : 로그인 버튼

' IE오브젝트 생성
Set objIE = CreateObject("InternetExplorer.Application") 

' 홈페이지 접속 
objIE.Navigate "http://www.daum.net"        ' 다음 홈페이지 접속 
objIE.Visible = True                                  ' 화면을 표시 
waitIE objIE                                             ' 화면 로딩이 끝날때까지 스크립트 정지 

With objIE.Document
     .all("id").Value = "아이디"                     ' ID입력
     .all("pw").Value = "비밀번호"                ' 비밀번호 입력
     .getElementByid("loginSubmit").Click     ' 로그인버튼 클릭 
End With 

' IE의 화면로딩이 끝날때까지 스크립트 정지 
Sub waitIE(objIE)
     Do While objIE.Busy = True Or objIE.ReadyState <> 4 
          WScript.Sleep 100 
     Loop
End Sub

※ 이미 로그인 된 상태에서 실행시키면 스크립트 오류가 발생하나 그냥 OK버튼 누르시면 됩니다.

【다운로드】

daum.vbs