2020년 5월 15일 금요일

Classic ASP로 네이버 단축주소 개발하기..

언어가 오래되서리...

갈아타지도 못하고...

편하게 Java 쓰고 싶뜨아....

기존에 bitly 쓰다가, 이 쉐리들이 API를 v3에서 v4로 업그레이드 하면서

기존 서비스를 완전히 먹통이 되게 함... (뭐 요딴놈들이 다 있나 싶다.. 무료 사용자라 무시하냐!)

v4로 업그레이드 하려는데.. 잘 안됨...(뭐든 시작이 이렇구만..)

만사가 귀찮아진 나는.. 또 머리를 굴렸다!!!

네이버 단축 주소 쓰자.... (따...딱히 자본력에 굴복한게 아니라는!!!)

어차피 xml http 통신만 구현하면 되고

기존에 xml 기반이던 것을 json 통신 기반으로 변경하면 됨.

소스 요약...

  1. Function fnNaverShorten(longURL)
  2.     Response.ContentType = "application/json"
  3.     reqAPIUrl = "https://openapi.naver.com/v1/util/shorturl?url=" & longURL
  4.     set xmlhttp = CreateObject("MSXML2.ServerXMLHTTP")  
  5.     xmlhttp.open "POST", reqAPIUrl, false
  6.     xmlhttp.setRequestHeader "content-type","application/x-www-form-urlencoded; charset=UTF-8"
  7.     xmlhttp.setRequestHeader "X-Naver-Client-Id", naverShortenClientID
  8.     xmlhttp.setRequestHeader "X-Naver-Client-Secret", naverShortenClientSecret
  9.     xmlhttp.send
  10.     if Request.QueryString("dbug") = "T" then Response.Write(reqAPIUrl)
  11.     fnNaverShorten = xmlhttp.responseText
  12.     set xmlhttp = nothing
  13. End Function

해설...
0. 일단.. 네이버개발자 센터에서 사전 준비 사항을 챙긴다!! (이것저것 생성 및 ID / 비번)
1. 난 그냥.. 컨텐츠 유형은 당연히 "application/json"
2. 뭐 너무 평범한 Classic ASP용 xml 통신 소스라.. 설명이 필요한지...
3. 발급한 ClientID와 ClientSecret를 잘 넣기만 해라..
4. 받는 Page에서 json 파싱은 알아서 해라.
5. 설명 귀찮다.. 끗...







댓글 없음:

댓글 쓰기

[낯선] 2025.02.22 우대락 공연

2025.02.22 우대락 공연 Set List 1. Black Pumas - Colors Covered By 낯선 2. Gate Flowers - 예비역 Covered By 낯선 3. 하동균 - From Mark Covered By 낯선 4. 낯선 ...