#NoEnv
#SingleInstance force
Date = Company=효산EA&Name1=&sido=11&
Winhttp := ComObjCreate("WinHttp.WinHttpRequest.5.1")
WinHttp.Open("POST", "http://www.kosca.or.kr/member_info/member_declare_sigong_list.asp?area=00")
WinHttp.SetRequestHeader("Refere", "http://www.kosca.or.kr/member_info/member_declare_sigong.asp?area=00")
WinHttp.SetRequestheader("Conten-Type","application/x-www-form-urlencoded")
WinHttp.Send(Date)
WinHttp.WaitForResponse()
A := WinHttp.ResponseText
IfInstring, A, meta http-equiv="Content-Type" content="text/html; charset=euc-kr
{
MsgBox, 성공
FileAppend, %A%, Test.txt
}
Else
{
MsgBox, 실패
}
return
코드는 이 코드고요
전문건설협회에서 효산 이라는 회사를 검색해서 그 안에 있는
회사명, 대표, 주소 등을 가져오려고 합니다 (*이 회사는 저와 아무련관련이 없습니다)
하지만 가져온 값을 MsgBox로 보든 FileAppend로 받아서 보든
한글이 싹다 깨져서 나옵니다
인코딩문제 같긴한데.. 어떻게 인코딩을 하는지 몰라서 지금 손을 못 쓰고 있습니다 ㅠㅠ...
도움 좀 부탁드리겠습니다 ㅠ
0
-0