|
|
<%
sql="select top 1 * from article where Columnsid=4 and TypeID=30 order by [isTop] asc,[index] desc"
set rs =mydb.ExecR(sql)
if not rs.eof then
%>
<%
end if %>
<%
sql="select top 1 * from article where Columnsid=4 and TypeID=31 order by [isTop] asc,[index] desc"
set rs =mydb.ExecR(sql)
if not rs.eof then
%>
<%
end if %>
<%
sql="select top 1 * from article where Columnsid=4 and TypeID=32 order by [isTop] asc,[index] desc"
set rs =mydb.ExecR(sql)
if not rs.eof then
%>
<%
end if %>
|
|
 |
|
|
|
<% JID = 26
Timg = mydb.ExecS("select top 1 pic from article where Columnsid=22 and TypeID="& JID &" and pic<>'' order by [istop] asc,[index] desc")
sql="select top 3 * from article where columnsid=24 and TypeID="& JID &" order by [istop] asc,[index] desc,[id] desc"
set rs = mydb.ExecR(sql)
%>
<% if Timg<>"" then %>
<% end if %> |
|
<% JID = 27
Timg = mydb.ExecS("select top 1 pic from article where Columnsid=22 and TypeID="& JID &" and pic<>'' order by [istop] asc,[index] desc")
sql="select top 3 * from article where columnsid=24 and TypeID="& JID &" order by [istop] asc,[index] desc,[id] desc"
set rs = mydb.ExecR(sql)
%>
<% if Timg<>"" then %>
<% end if %> |
|
<% JID = 28
Timg = mydb.ExecS("select top 1 pic from article where Columnsid=22 and TypeID="& JID &" and pic<>'' order by [istop] asc,[index] desc")
sql="select top 3 * from article where columnsid=24 and TypeID="& JID &" order by [istop] asc,[index] desc,[id] desc"
set rs = mydb.ExecR(sql)
%>
<% if Timg<>"" then %>
<% end if %> |
|
<% JID = 29
Timg = mydb.ExecS("select top 1 pic from article where Columnsid=22 and TypeID="& JID &" and pic<>'' order by [istop] asc,[index] desc")
sql="select top 3 * from article where columnsid=24 and TypeID="& JID &" order by [istop] asc,[index] desc,[id] desc"
set rs = mydb.ExecR(sql)
%>
<% if Timg<>"" then %>
<% end if %> |
|
<% JID = 104
Timg = mydb.ExecS("select top 1 pic from article where Columnsid=22 and TypeID="& JID &" and pic<>'' order by [istop] asc,[index] desc")
sql="select top 3 * from article where columnsid=24 and TypeID="& JID &" order by [istop] asc,[index] desc,[id] desc"
set rs = mydb.ExecR(sql)
%>
<% if Timg<>"" then %>
<% end if %> |
|
|
|
 |
|
|