|
| » Market Data » Historical Data |
|
Market Data » Historical Data (MEX Futures Products)
|
|
|
| |
| |
<%set dbconn=getDB()
Set rsdatedisp=Server.CreateObject("ADODB.Recordset")
rsdatedisp.cursortype=3
strSqldatedisp="select convert(varchar(11),max(hist_date),113) as dispdate from historical_data_new where viewstatus=1"
rsdatedisp.Open strSqldatedisp,dbconn
%>
| <% if rsdatedisp.recordcount<>0 then%>
<%=rsdatedisp("dispdate")%>
<%end if%> |
| Item |
Open |
High |
Low |
Close |
<%
Set rs=Server.CreateObject("ADODB.Recordset")
rs.cursortype=3
strSqllist="select * from historical_data_new where hist_date='"& rsdatedisp("dispdate") &"' and viewstatus=1 order by item_name asc,item_date asc"
rs.Open strSqllist,dbconn
if rs.recordcount<>0 then
bgcol=1
while not rs.eof%>
| <%=rs("item_name")%><%=itemdateformat(rs("item_date"))%> |
<%=rs("open_val")%> |
<%=rs("high_val")%> |
<%=rs("low_val")%> |
<%=rs("close_val")%> |
<%bgcol=bgcol+1
rs.movenext
Wend
else
%>
No Historical data found
|
<%end if %>
|
| |
| |
| |
|
|
|
|
|