[ClassicASP] DAUM(다음) 뉴스검색제휴 xml 파일 만들기 > 기술자료 | 해피정닷컴

[ClassicASP] DAUM(다음) 뉴스검색제휴 xml 파일 만들기 > 기술자료

본문 바로가기

사이트 내 전체검색

[ClassicASP] DAUM(다음) 뉴스검색제휴 xml 파일 만들기 > 기술자료

XML [ClassicASP] DAUM(다음) 뉴스검색제휴 xml 파일 만들기

페이지 정보


본문

*.xml 파일 만들기는 https://www.happyjung.com/lecture/1424 를 보세요

DAUM(다음) 뉴스검색제휴 xml 파일 만들기

송고 기사 URL : https://www.happyjung.com/view.asp?seq=5083
송고기사 XML URL : https://www.happyjung.com/view_xml.asp?seq=5083&channel=book


<!--#include virtual="/db_connection.asp"-->
<% Response.ContentType = "application/xml; charset=utf-8" %>
<%
Session.CodePage = 65001
dim seq : seq = request("seq")

Sql = "select * from board where seq= '"& seq &"'"
'response.write Sql&"<br>"
Set Rs = Con.Execute(Sql)

Dim BD_NAME     : BD_NAME    = Rs("BD_NAME")
Dim email    : email   = Rs("email")
Dim subject  : subject  = Rs("subject")
Dim content : content  = Rs("content")
Dim InputDate   : InputDate   = DateValue(Rs("BD_INPUTDATE"))
Dim InputTime   : InputTime   = right(Rs("BD_INPUTDATE"), 8)
'response.write INPUTDATE &"<br>"
Dim GetBD_FROM  : GetBD_FROM  = Rs("BD_FROM")

Dim InputDate1  : InputDate1  = left(InputDate,4) & mid(InputDate,6,2) & right(InputDate,2)
'response.write INPUTDATE1

Dim InputDate2  : InputDate2  = split(InputTime,":")
'response.write int(InputDate2(0)) & InputDate2(1) & InputDate2(2)

Dim Getdate4    : Getdate4    = mid(INPUTDATE,12,4)

if Getdate4 = "오전" then
  if int(InputDate2(0)) < 10 then
    GetTime3 = "0" & int(InputDate2(0)) & InputDate2(1) & InputDate2(2)
  end if
else
  GetTime3 = (int(InputDate2(0)) + 12) & InputDate2(1) & InputDate2(2)
end if

'response.write INPUTDATE1 & GetTime3&"<br>"
Rs.close
%><?xml version="1.0" encoding="utf-8"?>
<NEWS ver="1.1" act="C" orgid="">
    <DATETIME><% response.write INPUTDATE1 & GetTime3 %></DATETIME>
    <WRITER_LIST>
        <WRITER>
            <NAME><![CDATA[<% response.write BD_NAME %>]]></NAME>
            <EMAIL><% response.write email %></EMAIL>
        </WRITER>
    </WRITER_LIST>
    <CATEGORY_LIST>
        <CODE>soccer</CODE>
    </CATEGORY_LIST>
    <TITLE><![CDATA[<% response.write subject %>]]></TITLE>
    <TEXT>
        <![CDATA[<% response.write content %>]]>
    </TEXT>
    <EXT>
        <OUTLINK><![CDATA[https://www.happyjung.com/view.asp?seq=<%=seq%>]]></OUTLINK>
        <COPYRIGHT><![CDATA[<% response.write GetBD_FROM %>]]></COPYRIGHT>
    </EXT>
</NEWS>

댓글목록

등록된 댓글이 없습니다.


Total 2,641건 64 페이지
  • RSS
기술자료 목록
1381
WindowsServer   13245  2013-05-14 15:07  
1380
WindowsServer   12332  2013-05-14 15:06  
1379
HTML   20145  2013-05-12 23:43 ~ 2017-11-30 05:49  
1378
PHP   17525  2013-05-11 21:40  
1377
MySQL   24304  2013-05-11 18:26 ~ 2023-01-11 13:42  
1376
그누보드   12696  2013-05-10 02:15  
1375
일반   201947  2013-05-10 00:29  
1374
일반   27287  2013-05-10 00:11  
1373
일반   63174  2013-05-10 00:04 ~ 2016-03-30 00:00  
1372
HTML   19320  2013-05-08 11:11  
1371
일반   30959  2013-05-08 00:45 ~ 2015-01-22 00:00  
1370
JavaScript   56922  2013-05-07 01:05 ~ 2013-05-09 00:00  
1369
Adobe   14223  2013-05-06 15:05  
1368
일반   40722  2013-05-06 14:39  
1367
JavaScript   33410  2013-05-04 19:16 ~ 2019-12-16 11:47  
1366
MSSQL   14196  2013-05-03 17:55 ~ 2016-02-13 00:00  
1365
그누보드   18459  2013-05-03 16:09  
열람
XML   14118  2013-05-02 05:59 ~ 2018-02-07 06:16  
1363
HTML   25264  2013-05-01 15:22 ~ 2021-10-26 16:46  
1362
ClassicASP   18158  2013-04-26 09:13  

검색

해피정닷컴 정보

회사소개 회사연혁 협력사 오시는길 서비스 이용약관 개인정보 처리방침

회사명: 해피정닷컴   대표: 정창용   전화: 070-7600-3500   팩스: 042-670-8272
주소: (34368) 대전시 대덕구 대화로 160 대전산업용재유통단지 1동 222호
개인정보보호책임자: 정창용   사업자번호: 119-05-36414
통신판매업신고: 제2024-대전대덕-0405호 [사업자등록확인]  
Copyright 2001~2024 해피정닷컴. All Rights Reserved.