<% DBPath = Server.MapPath("news.mdb") Set dbs = Server.CreateObject("ADODB.Connection") Set rs = Server.CreateObject("ADODB.Recordset") dbs.Open "provider=microsoft.jet.oledb.4.0;" & "Jet OLEDB:Database Password=maxtrust;" & "Data Source=" & DBPath rs.open "SELECT * FROM mainControl WHERE mainControlID=813", dbs, 1, 1 tmpchooseDate = rs("newsDate") tmpFutureMonth = rs("futureMonth") tmpFutureWeek = rs("futureWeek") rs.close %>

<% if (weekday(tmpchooseDate) = 6) THEN tempDate = tmpchooseDate + 3 else tempDate = tmpchooseDate + 1 end if response.write (year(tempDate) & "年" & month(tempDate) & "月" & day(tempDate) & "日") %>

<% '協理 -盤勢分析 rs.open "SELECT * FROM newsAnalysisManager WHERE newsAnalysisDate = #" & tmpchooseDate & "#", dbs, 1, 1 if not rs.eof then response.write ("

<% '昨日盤勢 rs.open "SELECT * FROM futureValue WHERE futureValueDate = #" & tmpchooseDate & "#", dbs, 1, 1 if rs.eof then tmpFutureTW = "-" tmpFutureTE = "-" tmpFutureTF = "-" tmpFutureSTW = "-" tmpFutureTWOI = "-" tmpFutureTEOI = "-" tmpFutureTFOI = "-" tmpFutureSTWOI = "-" else tmpFutureTW = rs("futureTW") tmpFutureTE = rs("futureTE") tmpFutureTF = rs("futureTF") tmpFutureSTW = rs("futureSTW") tmpFutureTWOI = rs("futureTWOI") tmpFutureTEOI = rs("futureTEOI") tmpFutureTFOI = rs("futureTFOI") tmpFutureSTWOI = rs("futureSTWOI") end if rs.close %> 週<%=tmpFutureWeek%>收盤價 未平倉量 台指期 <%=tmpFutureTW %> <%=tmpFutureTWOI %> 電子期 <%=tmpFutureTE %> <%=tmpFutureTEOI %> 金融期 <%=tmpFutureTF %> <%=tmpFutureTFOI %> 摩台期 <%=tmpFutureSTW %> <%=tmpFutureSTWOI %>

<% '近期課程 rs.open "SELECT * FROM fastMessage WHERE fastMsgDate = #" & tmpchooseDate & "#", dbs, 1, 1 %> 近期課程 <%=rs("fastMsgContext")%> <% rs.close %>

") response.write ("") do while not rs.eof if rs("existPicture") = 1 then response.write ("") end if response.write ("") rs.movenext loop response.write ("

廖朝正盤勢分析

") response.write ("") ' response.write ("") response.write ("") ' response.write ("") ' else ' response.write ("撰稿： " & rs("name") & "") ' end if response.write ("   " & rs("title") & " ") response.write rs("context") response.write (" ") ' if rs("existPhoto") = 1 then ' response.write ("   撰稿：" & rs("name") & "

") end if rs.close %> <% '投顧老師 -盤勢分析 rs.open "SELECT * FROM newsAnalysis WHERE newsAnalysisDate = #" & tmpchooseDate & "# ORDER BY orderLine", dbs, 1, 1 if not rs.eof then response.write ("") response.write ("") do while not rs.eof response.write ("") rs.movenext loop response.write ("

投資顧問看盤

") response.write ("") response.write ("") response.write ("") else response.write ("撰稿： " & rs("name") & "") end if response.write ("") if rs("existPicture") = 1 then response.write ("") end if response.write ("   " & rs("title") & " ") if rs("existPhoto") = 1 then response.write ("   撰稿：" & rs("name") & " ") response.write rs("context") response.write ("

") end if rs.close %> <% '笑傲期指 rs.open "SELECT * FROM trade001 WHERE registerDate= #" & tmpchooseDate & "#", dbs, 1, 1 if not rs.eof then response.write ("") response.write ("") do while not rs.eof response.write ("") rs.movenext loop response.write ("

波段 笑傲期指

") if rs("txpath") <> "" then response.write (" ") end if response.write ("

") response.write ("") response.write ("") response.write ("") response.write ("") response.write ("") response.write (" 笑傲期指 在倉部位 未平倉損益 一年總損益 轉折點(註) 台指期 "& rs("txNow") & " "& rs("txSum") & " "& rs("txTotalSum") & " "& rs("txChange") & " 電子期 "& rs("teNow") & " "& rs("teSum") & " "& rs("teTotalSum") & " "& rs("teChange") & " 金融期 "& rs("tfNow") & " "& rs("tfSum") & " "& rs("tfTotalSum") & " "& rs("tfChange") & " ") response.write ("轉折點詳細說明 ") response.write ("

") end if rs.close %> <% '飛毛腿 rs.open "SELECT * FROM trade002 WHERE registerDate= #" & tmpchooseDate & "#", dbs, 1, 1 if not rs.eof then response.write ("") response.write ("") do while not rs.eof response.write ("") rs.movenext loop response.write ("

短線 飛毛腿

") if rs("txpath") <> "" then response.write (" ") end if response.write ("

") response.write ("") response.write ("") response.write ("") response.write ("") response.write ("") response.write (" 飛毛腿 在倉部位 未平倉損益 單月總損益 轉折點(註) 台指期 "& rs("txNow") & " "& rs("txSum") & " "& rs("txTotalSum") & " "& rs("txChange") & " 電子期 "& rs("teNow") & " "& rs("teSum") & " "& rs("teTotalSum") & " "& rs("teChange") & " 金融期 "& rs("tfNow") & " "& rs("tfSum") & " "& rs("tfTotalSum") & " "& rs("tfChange") & " ") response.write ("轉折點詳細說明 ") response.write ("

") end if rs.close %> <% '洪守傑選擇權 rs.open "SELECT * FROM trade003 WHERE newsAnalysisDate = #" & tmpchooseDate & "#", dbs, 1, 1 if not rs.eof then response.write ("") response.write ("") do while not rs.eof response.write ("") rs.movenext loop response.write ("

投顧期權操作
") if rs("existPicture") = 1 then response.write (" ") end if response.write ("	") response.write ("") response.write ("") response.write ("") response.write (" 目前在倉部位 未平倉損益 單月總損益 "& rs("context") & " "& rs("total") & " "& rs("totalSum") & " ") 'response.write ("績效說明 ") response.write ("

") end if rs.close %> <% '研究自營部選擇權 rs.open "SELECT * FROM newsAnalysisSelf WHERE newsAnalysisDate = #" & tmpchooseDate & "#", dbs, 1, 1 if not rs.eof then response.write ("") response.write ("") do while not rs.eof response.write ("") rs.movenext loop response.write ("

") response.write ("") response.write ("") if rs("existPicture") = 1 then response.write ("") end if response.write (" ") response.write ("" & rs("title") & " ") response.write rs("context") response.write ("

") end if rs.close %> <% '媒體時間表 rs.open "SELECT * FROM mediaMsg WHERE mediaMsgDate = #" & tmpchooseDate & "#", dbs, 1, 1 if not rs.eof then response.write ("") response.write ("") response.write ("") response.write ("

媒體時間表

" & rs("mediaMsgContext") & "

") end if rs.close %> <% Set rs = Nothing dbs.close Set dbs = Nothing %>

※本資料內容僅供參考,本公司恕不負任何法律責任,亦不作任何保証
94年金管期總字第041號
住址: 台北市東興路8號B1	服務專線: (02) 3766-3850	傳真: (02) 2748-8778