2018年
- Jan
<%
newslist = newslist & "" & _
" "
%>
<%
newslist = newslist & ""
newstime = "00:00:00"
if "00:00:00" = "00:00:00" or "00:00:00" = "" then
newstime = "10:52:24"
end if
' check if editor has put in a date, if not display creation date
If "2018-07-25" = "" Then
newsdate = "2018-07-27 " & newstime
listTimeOffset = formatDateOffsetCreated
else
newsdate = "2018-07-25 " & newstime
listTimeOffset = ""
End If
newstimestamp = formatDate("%U%", newsdate, listTimeOffset, "")
newsdate = formatDate("%Y%/%m%/%d%", newsdate, listTimeOffset, "")
newslist = newslist & "ドイツ銀行、2018年第2四半期において4億100万ユーロの純利益を計上、自己資本比率およびレバレッジ比率が上昇" & _
"/jp/content/6633_6770.html" & _
"ドイツ銀行、2018年第2四半期において4億100万ユーロの純利益を計上、自己資本比率およびレバレッジ比率が上昇" & _
"" & newsdate & "" & _
"" & newstimestamp & "" & _
"" & _
"" & _
"jp" & _
"" & _
"" & _
"" & _
"HeadlinesJP" & _
"en" & _
"" & _
"" & _
"" & _
"" & _
"" & _
"" & _
"" & _
"" & _
"" & _
"" & _
"" & _
"" & _
""
newstime = "00:00:00"
if "00:00:00" = "00:00:00" or "00:00:00" = "" then
newstime = "03:21:23"
end if
' check if editor has put in a date, if not display creation date
If "2018-07-16" = "" Then
newsdate = "2018-07-19 " & newstime
listTimeOffset = formatDateOffsetCreated
else
newsdate = "2018-07-16 " & newstime
listTimeOffset = ""
End If
newstimestamp = formatDate("%U%", newsdate, listTimeOffset, "")
newsdate = formatDate("%Y%/%m%/%d%", newsdate, listTimeOffset, "")
newslist = newslist & "ドイツ銀行、2018年第2四半期についてコンセンサス予想を上回る暫定業績を発表" & _
"/jp/content/6633_6769.html" & _
"ドイツ銀行、2018年第2四半期についてコンセンサス予想を上回る暫定業績を発表" & _
"" & newsdate & "" & _
"" & newstimestamp & "" & _
"" & _
"" & _
"jp" & _
"" & _
"" & _
"" & _
"HeadlinesJP" & _
"en" & _
"" & _
"" & _
"" & _
"" & _
"" & _
"" & _
"" & _
"" & _
"" & _
"" & _
"" & _
"" & _
""
newstime = "00:00:00"
if "00:00:00" = "00:00:00" or "00:00:00" = "" then
newstime = "09:26:59"
end if
' check if editor has put in a date, if not display creation date
If "2018-06-28" = "" Then
newsdate = "2018-07-02 " & newstime
listTimeOffset = formatDateOffsetCreated
else
newsdate = "2018-06-28 " & newstime
listTimeOffset = ""
End If
newstimestamp = formatDate("%U%", newsdate, listTimeOffset, "")
newsdate = formatDate("%Y%/%m%/%d%", newsdate, listTimeOffset, "")
newslist = newslist & "DB USAコーポレーション：連邦準備制度理事会の2018年の包括的資本分析検査の結果" & _
"/jp/content/6633_6768.html" & _
"DB USAコーポレーション：連邦準備制度理事会の2018年の包括的資本分析検査の結果" & _
"" & newsdate & "" & _
"" & newstimestamp & "" & _
"" & _
"" & _
"jp" & _
"" & _
"" & _
"" & _
"HeadlinesJP" & _
"en" & _
"" & _
"" & _
"" & _
"" & _
"" & _
"" & _
"" & _
"" & _
"" & _
"" & _
"" & _
"" & _
""
newslist = newslist & " "
If listId = "HeadlinesJP" and output="true" Then
%>
<%
End If
%>- Feb
- Mar
- Apr
- May
- Jun
- Jul
- Aug
- Sep
- Oct
- Nov
- Dec
