[ 파워빌더.공통함수 - 네이버 Open Api 예제 ]

 

☞   

 

정말 초 간단하게 만든거구요.

네이버의 사진검색 Api 를 통해 검색하고 싶은것을 입력하고 검색 버튼을 누르면

그 검색어가 들어간 것의 정보를 가져와서 DW에 저장하여 뿌려줍니다(사진은 뺏습니다.추가해보세요^^;)

 

String ls_req_status, ls_file, ls_search
String ls_xml_request, ls_returnmsg
String ls_xml_response
Integer li_rtn
Boolean lb_rtn

//internetexception  inetException
ls_search = sle_1.text
gs_search = ls_search
ls_file = "http://openapi.naver.com/search?key="+"********"+"&target=image&query="+ls_search+"&display=100&start=1"
OleObject req
req = CREATE oleobject
li_rtn = req.ConnectToNewObject("Msxml2.XMLHTTP.3.0")
IF li_rtn < 0 THEN
 ls_returnmsg = "XMLHttpRequest Connect OLE Object : "
 lb_rtn = False
ELSE
 req.open (2, ls_file, false)
 req.send ()
 ls_req_status = Trim(req.StatusText)
 IF req.Status <> 200 THEN
  ls_returnmsg = "HTTP request failed : " + String(req.Status) + " : " + ls_req_status
  lb_rtn = False
 ELSE
  String ls_temp
  ls_temp = String(req.responseText)
  dw_1.reset()
  dw_1.importstring(XML!, ls_Temp)
  lb_rtn = True 
 END IF
END IF

req.DisconnectObject()
Destroy req

로직은 이렇구요. 저 위에 키 넣는 부분에 발급받으신 키를 넣으시면 됩니다.

importstring을 통해 XML! 형식으로 데이터윈도우에 집어 넣는 거구요.

데이터윈도우는 당연히 XML에 포맷에 맞게 구성을 하셔야 됩니다.

(데이터윈도우를 여시고 Layout->Default 보시면 XML 탭에서 구성한게 보이실 거에요^^)

 

그러면 테스트 해보시길...(PB 11버전입니다.)

Posted by 농부지기
,