menu

<%set rs=server.createobject("ADODB.Recordset") sql="select * from yfclass" rs.open sql,conn,1,3 %>

<% if rs.recordcount>1 then for i=1 to rs.recordcount set rs1=server.createobject("ADODB.Recordset") sql1="select * from yfdet where yfc_id="&rs("yfc_id") rs1.open sql1,conn,1,3 %>

<%if rs1.recordcount>0 then%> <%else%> target=main> <%end if%>

<%=server.HTMLEncode(rs("name20"))%>

<% if rs1.recordcount>0 then %>

<% while not rs1.eof %>

&yfdet_id=<%=rs1("yfdet_id")%>" target="main"><%=server.HTMLEncode(rs1("name20"))%>
<% rs1.movenext wend %>

<% end if rs.movenext next end if %>

<% id=session("userid") count=1 if id<>"" then set rs9=server.createobject("ADODB.Recordset") sql9="select * from mystocks where userid="&id&" order by stockcode" rs9.open sql9,conn,1,3 if rs9.recordcount>0 then%> <% else count=0 end if else count=0 end if %> <% if (id="") or (count=0) then %>

<% else %>

个股论坛

<% while not rs9.eof %>

" target="main"><%=rs9("stockcode")%>
<% rs9.movenext wend rs9.close set rs9=nothing end if %>

注册改注册

<% rs.close rs1.close set rs=nothing set rs1=nothing 'if (id<>"") and (count<>0) then ' ' ' 'end if %>

法人股网集锦

SIITA论坛

天下财富信息

法人股投资网

中国龙投资网

大鹏三板信息及K线

大自然长白建北海国实中兴华凯水仙Ａ水仙Ｂ广建鹫峰科技

小草投资三板论坛