TimeOuts        := [0       ; ResolveTimeout
                   ,60000   ; ConnectTimeout
                   ,30000   ; SendTimeout
                   ,120000] ; ReceiveTimeout - Random.org recommends a long timeout.

DAUMURL  := "http://air21.daum.net/air21/widget/sendMessage.daum?"  ; 수신 URL

SENDER := "ME" ; 보낸 사람
MYPEOPLEKEY := "z4*****************"  ; 마이피플의 키

 

 

HttpGetRequest("안녕하세요")

 

 

 

 

 

HttpGetRequest(MSG){
 global Timeouts
 global DAUMURL, SENDER, MYPEOPLEKEY

 SENDMSG := DAUMURL
  . "key="
  . MYPEOPLEKEY
  . "&from="
  . SENDER
  . "&content="
  . MSG

 HTTP := ComObjCreate("WinHttp.WinHttpRequest.5.1")
 HTTP.Open("GET", SENDMSG, False)
 HTTP.SetRequestHeader("User-Agent", "Internet Explorer 9")
HTTP.SetTimeouts(Timeouts*)
 HTTP.Send()
 if (HTTP.Status != 200)
  return OnError(HTTP.Status, HTTP.ResponseText)
 return HTTP.ResponseText
}
 
OnError(Status, String){
 MsgBox % String
 return ""
}