|
 |
 |
| |
<%
Set cn_gvm=Server.CreateObject("ADODB.Connection")
cn_gvm.Open("Driver={SQL Server};Server=Server08;UID=user_web;PWD=724;Database=gvm")
sql_top = "SELECT TOP 10 * FROM taiwan_trip_20080718 WHERE Candidate LIKE 'F%' ORDER BY Candidate_Count DESC"
Set rs_top = cn_gvm.execute(sql_top)
i = 0
Do While not rs_top.eof
i = i+1
%>
<% if i = 1 then %> <% end if %> |
<%=i%> |
<%
if rs_top("Candidate") = "F01" then Response.Write("台北縣") end if
if rs_top("Candidate") = "F02" then Response.Write("台北市") end if
if rs_top("Candidate") = "F03" then Response.Write("桃園縣") end if
if rs_top("Candidate") = "F04" then Response.Write("新竹縣") end if
if rs_top("Candidate") = "F05" then Response.Write("新竹市") end if
if rs_top("Candidate") = "F06" then Response.Write("苗栗縣") end if
if rs_top("Candidate") = "F07" then Response.Write("臺中縣") end if
if rs_top("Candidate") = "F08" then Response.Write("臺中市") end if
if rs_top("Candidate") = "F09" then Response.Write("彰化縣") end if
if rs_top("Candidate") = "F10" then Response.Write("南投縣") end if
if rs_top("Candidate") = "F11" then Response.Write("嘉義縣") end if
if rs_top("Candidate") = "F12" then Response.Write("臺南縣") end if
if rs_top("Candidate") = "F13" then Response.Write("雲林縣") end if
if rs_top("Candidate") = "F14" then Response.Write("嘉義市") end if
if rs_top("Candidate") = "F15" then Response.Write("臺南市") end if
if rs_top("Candidate") = "F16" then Response.Write("高雄縣") end if
if rs_top("Candidate") = "F17" then Response.Write("高雄市") end if
if rs_top("Candidate") = "F18" then Response.Write("屏東縣") end if
if rs_top("Candidate") = "F19" then Response.Write("宜蘭縣") end if
if rs_top("Candidate") = "F20" then Response.Write("花蓮縣") end if
if rs_top("Candidate") = "F21" then Response.Write("臺東縣") end if
if rs_top("Candidate") = "F22" then Response.Write("澎湖縣") end if
if rs_top("Candidate") = "F23" then Response.Write("金門縣") end if
if rs_top("Candidate") = "F24" then Response.Write("連江縣") end if
if rs_top("Candidate") = "F25" then Response.Write("基隆市") end if
%>
|
<%=rs_top("Candidate_Count")%>票 |
|
 |
<%
rs_top.movenext
loop
rs_top.close()
set rs_top = nothing
cn_gvm.close()
set cn_gvm = nothing
%>
 |
|
|
|
|
|
 |
| |
| |
 |
定價：198元
特價：129元
|
|
|
|
|
|
 |
