 |
Adobe Reader Download
 |
|
|
 |
| Subject |
Date |
Download |
<%
''//列出最近的５筆 20060825
iPage=FiNull(Request("Page"))
sToday=Cstr(Year(Now)) & "/" & Cstr(Month(Now)) & "/" & Cstr(Day(Now))
''//Status: 0,下線/1,測試/2,上線
''//Lang : 1,中文/2,英文
''//Kind : 1,一般調查/2,民心指數
if Trim(Request.ServerVariables("REMOTE_ADDR"))="202.3.167.67" then
sSQL="Select Top 5 Sid,PdfPath,WordPath,Subject,PublishDate From gvsrc where Lang='2' and ( Status='1' or Status='2') and Kind='1' and PublishDate<='" & sToday & "' order by PublishDate desc"
else
sSQL="Select Top 5 Sid,PdfPath,WordPath,Subject,PublishDate From gvsrc where Lang='2' and Status='2' and Kind='1' and PublishDate<='" & sToday & "' order by PublishDate desc"
end if
dim oCn,oRS,iCount,sSid,sSubject,sPublishDate,sPdfPath,sDownLoad,sColor
set oCn=Server.CreateObject("ADODB.Connection")
set oRs=Server.CreateObject("ADODB.Recordset")
oCn.Open "Driver={SQL Server};Server=server08;UID=user_web;PWD=724;Database=gvm"
oRS.Open sSQL, oCn, 3
While Not oRS.Eof
iCount=iCount+1
if (iCount mod 2 )=1 then
sColor="#D5E9FF"
else
sColor="#C9DBF0"
end if
sSid = FsNull(oRs("Sid"))
sSubject = FsNull(oRs("Subject"))
sPublishDate = datevalue(oRs("PublishDate"))
sPdfPath = "http://www.gvm.com.tw/gvsrc/" & FsNull(oRs("PdfPath"))
sDownLoad = "![]() "
%>
| <%=sSubject%> |
<%=sPublishDate%> |
<%=sDownLoad%> |
<%
oRS.MoveNext
Wend
oRS.close
%>
|
|
|
|
 |
 |
| Subject |
Date |
Download |
<%
''//列出最近的2筆 20060825
sToday=Cstr(Year(Now)) & "/" & Cstr(Month(Now)) & "/" & Cstr(Day(Now))
''//Status: 0,下線/1,測試/2,上線
''//Lang : 1,中文/2,英文
''//Kind : 1,一般調查/2,民心指數
if Trim(Request.ServerVariables("REMOTE_ADDR"))="202.3.167.67" then
sSQL="Select Top 2 Sid,PdfPath,WordPath,Subject,PublishDate From gvsrc where Lang='2' and ( Status='1' or Status='2') and Kind='2' and PublishDate<='" & sToday & "' order by PublishDate desc"
else
sSQL="Select Top 2 Sid,PdfPath,WordPath,Subject,PublishDate From gvsrc where Lang='2' and Status='2' and Kind='2' and PublishDate<='" & sToday & "' order by PublishDate desc"
end if
oRS.Open sSQL, oCn, 3
iCount=0
While Not oRS.Eof
iCount=iCount+1
if (iCount mod 2 )=1 then
sColor="#D5E9FF"
else
sColor="#C9DBF0"
end if
sSid = FsNull(oRs("Sid"))
sSubject = FsNull(oRs("Subject"))
sPublishDate = datevalue(oRs("PublishDate"))
sPdfPath = "http://www.gvm.com.tw/gvsrc/" & FsNull(oRs("PdfPath"))
sDownLoad = "![]() "
%>
| <%=sSubject%> |
<%=sPublishDate%> |
<%=sDownLoad%> |
<%
oRS.MoveNext
Wend
oRS.close
oCn.close
set oRS=nothing
set oCn=nothing
%>
|
|
|
|
| |
|
| |
 |
Taiwan Public Mood Index (TPMI) for July 2011 =42.5（0.7↓）
|
| |
| Political Confidence Index (PCI) =45.6 |
Economic Confidence Index (ECI) =39.3 |
| Ruling Side Trust Index (RSTI) =42.9 |
Current Economic Situation Index(CESI)=33.8 |
| Trust Index for President Ma Ying-jeou |
45.0 |
Current Domestic Economy Index |
|
| Trust Index for Premier Wu Den-yih
|
|
Current Personal Finance Index |
37.1 |
| Trust Index for the Kuomintang (KMT) |
42.2 |
Economic Optimism Index (EOI) =44.8 |
| Political Optimism Index (POI) =49.7 |
Domestic Economic Improvement Index |
|
| Domestic Political Stability Outlook Index |
39.3 |
Personal Financial Improvement Index |
44.1 |
| Cross-Strait Relations Alleviation Outlook Index |
60.2 |
|
| （The following items are not included in PCI） |
| Opposition Side Trust Index (OSTI) =44.9 |
| Trust Index for Democratic Progressive Party (DPP) chairperson Tsai Ing-Wen |
47.7 |
| Trust Index for the DPP |
42.1 |
|
|
| |
|
|
| |
|
|
|
|
