<%
Ytd=LCase(Request("Tid"))
Yid=LCase(Request("Pl"))
Dtime=Trim(replace(Request("Dtime"),"?",""))
SUrl=Trim(Request.QueryString)
if len(SUrl)<=10 and len(SUrl)>=6 then Dtime=SUrl
if Not Dtime="" then Strl="?"&Dtime
STid="/Estimate"
if Trim(Request("Ad"))="up" then
YAd="up"
SAd="down"
else
YAd="down"
SAd="up"
end if
set rs=server.CreateObject("ADODB.RecordSet")
rs.open "select top 1 DateTime,Dateline,CjTime from [Fund_Estime] order by CjTime desc",conn,1,1
if Not (rs.eof and rs.bof) then
DateTime=TimeStr(rs(0),"yymmdd","-")
Dateline=rs(1)
CjTime=rs(2)
end if
rs.close
set rs=Nothing
if DateDiff("d",Dateline,date)=0 then
UTime=replace(time,":","")
if UTime<=114000 and UTime>=90000 then Cj="yes"
if UTime<=151000 and UTime>=130000 then Cj="yes"
end if
%>
开放式基金估值-第一基金网
<%
if Cj="yes" then%>
'"><%
end if%>