[ClassicASP] 소셜 미디어(SNS)로 웹페이지 링크보내기 > 기술자료

<%

 

'/////////////////////////////////////////////////////////////////////////////////////////////

'// 공통사용

'/////////////////////////////////////////////////////////////////////////////////////////////

Dim sns_title, sns_content, sns_url

Dim sns_twitter_url, sns_face_url, sns_face_subject, sns_me2_subject, sns_me2_url_text, sns_me2_url, sns_me2_tag, sns_yozm_url, sns_yozm_subject

sns_title = "홈페이지이름"

sns_content = strip_tags1("<table><tr><td>소셜 미디어로 코멘트보내기</td></tr></table>")

sns_content = "["& sns_title &"] " & sns_content 

'sns_content = iconv('euc-kr', 'utf-8',sns_content)  ' euc-kr 일때 --> utf-8 설정후 전송

'/////////////////////////////////////////////////////////////////////////////////////////////

' 현재 페이지 주소 추출

sns_url = "http://"& request.ServerVariables("http_host") & request.servervariables("http_url")

 

'/////////////////////////////////////////////////////////////////////////////////////////////

'// 트위터

'/////////////////////////////////////////////////////////////////////////////////////////////

sns_twitter_url = sns_content &"   "& sns_url  ' URL붙이기 // 일부 시스템에서만 사용

sns_twitter_url = Server.urlencode(sns_twitter_url)  '인코딩

 

'/////////////////////////////////////////////////////////////////////////////////////////////

'// 페이스북

'/////////////////////////////////////////////////////////////////////////////////////////////

sns_face_url = Server.urlencode(sns_url)

sns_face_subject = Server.urlencode(sns_content)

 

'/////////////////////////////////////////////////////////////////////////////////////////////

'// 미투데이

'/////////////////////////////////////////////////////////////////////////////////////////////

sns_me2_url = Server.urlencode(sns_url)

sns_me2_subject = Server.urlencode(sns_content)

'sns_me2_url_text = iconv('euc-kr', 'utf-8', sns_me2_subject) ' euc-kr 일때 --> utf-8 변경후 전송

sns_me2_url_text = Server.urlencode(sns_title) ' 인코딩

'sns_me2_tag = iconv('euc-kr', 'utf-8',sns_title) ' euc-kr 일때 --> utf-8 변경후 전송

sns_me2_tag = Server.urlencode(sns_me2_tag) ' 인코딩

 

'/////////////////////////////////////////////////////////////////////////////////////////////

'// 요즘

'/////////////////////////////////////////////////////////////////////////////////////////////

sns_yozm_url = Server.urlencode(sns_url)

sns_yozm_subject = Server.urlencode(sns_content)

'/////////////////////////////////////////////////////////////////////////////////////////////

%>

<a href="http://twitter.com/home/?status=<% Response.write sns_twitter_url %>" target="_blank"><img src="../img/sns/twitter_c.png" border="0" alt="이 코멘트를 내 twitter로 보내기" title="이 코멘트를 내 twitter로 보내기" /></a>

<a href="http://www.facebook.com/sharer.php?u=<% Response.write sns_face_url %>&t=<% Response.write sns_face_subject %>" target="_blank"><img src="../img/sns/facebook_c.png" border="0" alt="이 코멘트를 내 facebook으로 보내기" title="이 코멘트를 내 facebook으로 보내기" /></a>

<a href='http://me2day.net/posts/new?new_post[body]=<% Response.write sns_me2_subject %>+++++++["<% Response.write sns_me2_url_text %>":<% Response.write sns_me2_url %>+]&new_post[tags]=<% Response.write sns_me2_tag %>'  target="_blank"><img src="../img/sns/Me2Day_c.png" border="0" alt="이 코멘트를 내 Me2Day로 보내기" title="이 코멘트를 내 Me2Day로 보내기" /></a>

<a href="http://yozm.daum.net/api/popup/prePost?sourceid=41&link=<% Response.write sns_yozm_url %>&prefix=<% Response.write sns_yozm_subject %>" target="_blank"><img src="../img/sns/yozm_c.png" alt="이 코멘트를 내 요즘으로 보내기" title="이 코멘트를 내 요즘으로 보내기" border="0" /></a>

<% '소셜 미디어로 코멘트보내기 %>


참고자료
http://dualist.tistory.com/115