📄 bodyr2.asp
字号:
<%end if%>
<%
if rs("lmflag6")="4" then '右一张图片,左多项标题值
%>
<div align="center">
<TABLE cellPadding=0 width="716" border=1 style="border-collapse: collapse" bordercolor=<%=rs("lmflag4")%>>
<TBODY>
<TR>
<TD width="716" colspan="2">
<TABLE cellSpacing=0 cellPadding=0 width="100%" align=center
border=0>
<TBODY>
<TR>
<TD width=716 background=<%=rs("lmflag1")%> height=30>
<table border="0" cellpadding="0" style="border-collapse: collapse" width="100%" id="table29" height="100%">
<tr>
<td width="620"></td>
<td width="95"><p align="center"><A href="showxm.asp?name=<%=rs("classname")%>"><span style="font-size: 10pt"><IMG src=<%=rs("lmflag5")%> alt="更多内容" border=0 align="absmiddle"></span></A></td>
</tr>
</table>
</TD></TR></TBODY>
</TABLE>
</TD>
</TR>
<TR>
<TD vAlign=top bgColor=<%=rs("lmflag2")%> width="50%" background=<%=rs("lmflag3")%>>
<TABLE cellPadding=2 width="716" border=0>
<TBODY>
<TR>
<%tempproductname=""
if not(rs1.bof and rs1.eof) then%>
<%
productid=rs1("productid")
classname=rs("classname")
smallPic=rs1("smallPic")
tempproductname=rs1("productname")
if len(tempproductname)>15 then tempproductname=left(tempproductname,15) &"..."
'rs1.movenext
end if%>
<TD width="446" valign="top" rowspan="2">
<TABLE cellSpacing=0 cellPadding=0 width="420" id="table30">
<TBODY>
<%
if rs1.bof and rs1.eof then
response.write "<TR>"
response.write "<TD width=10></TD>"
response.write "<TD>暂无信息</TD>"
response.write "<TD width=40></TD>"
response.write "</TR>"
end if
for i=1 to 9 %>
<TR>
<%
if rs1.eof then exit for
%>
<TD class="" vAlign=top width=10><span style="font-size: 10pt"><IMG src="body/Soft_common.gif"></span></TD>
<TD class="" height="20">
<A href ="showinfo.asp?id=<%=rs1("productid")%>&name=<%=rs("classname")%>">
<span style="font-size: 10pt">
<%if rs1("phflag")=1 then%>
<img border="0" src="body/news.gif">
<%end if%>
<%=rs1("productname")%>
</span></A></TD>
<TD class="" align=right width=40>
<span style="font-size: 10pt">
<% temp=datepart("m",rs1("ChangeDate")) &"-" & datepart("d",rs1("ChangeDate"))
if cint(right(temp,2))<10 then
temp1=left(temp,len(temp)-1) +"0"+right(temp,1)
else
temp1=temp
end if
if temp=datepart("m",date) &"-" & datepart("d",date) then
%>
<FONT color=red ;FONT-SIZE: 13pt><%=temp1%></FONT>
<% else %>
<FONT FONT-SIZE: 13pt><%=temp1%></FONT>
<%end if%>
</span>
</TD>
<% rs1.movenext%>
</TR>
<%next%>
</TBODY></TABLE></TD>
<%if not(rs1.bof and rs1.eof) then%>
<TD width="256" align=center>
<A href ="showinfo.asp?id=<%=productid%>&name=<%=classname%>">
<img border="0" src=<%="UpLoadFile\" &smallPic%> width="230"></a>
</TD>
<%end if%>
</TR>
<TR>
<TD width="256" align=center>
<b><font size="2" color="#FF00FF"><%=tempproductname%></font></b></TD>
</TR>
</TBODY></TABLE>
</TD>
<%rs1close()%>
</TR>
</TBODY>
</TABLE>
</div>
<%end if%>
<%
if rs("lmflag6")="5" then '右一张图片,左一项文章值
%>
<div align="center">
<TABLE cellPadding=0 width="716" border=1 style="border-collapse: collapse" bordercolor=<%=rs("lmflag4")%>>
<TBODY>
<TR>
<TD width="716" colspan="2">
<TABLE cellSpacing=0 cellPadding=0 width="100%" align=center
border=0>
<TBODY>
<TR>
<TD width=716 background=<%=rs("lmflag1")%> height=30>
<table border="0" cellpadding="0" style="border-collapse: collapse" width="100%" id="table29" height="100%">
<tr>
<td width="620"></td>
<td width="95"><p align="center"><A href="showxm.asp?name=<%=rs("classname")%>"><span style="font-size: 10pt"><IMG src=<%=rs("lmflag5")%> alt="更多内容" border=0 align="absmiddle"></span></A></td>
</tr>
</table>
</TD></TR></TBODY>
</TABLE>
</TD>
</TR>
<TR>
<TD vAlign=top bgColor=<%=rs("lmflag2")%> width="50%" background=<%=rs("lmflag3")%>>
<TABLE cellPadding=2 width="716" border=0>
<TBODY>
<TR>
<%if not(rs1.bof and rs1.eof) then%>
<TD width="449" valign="top" rowspan="2">
<TABLE cellSpacing=0 cellPadding=0 width="100%" id="table31">
<TBODY>
<TR>
<TD height="30" align="center">
<p align="center"><b><font size="3" color="#0000FF"><%=rs1("productname")%></font></b></TD>
</TR>
<TR>
<TD><font size="2"><%=rs1("content")%></font></TD>
</TR></TBODY></TABLE></TD>
<%else if rs1.bof and rs1.eof then
response.write "<TR>"
response.write "<TD width=10></TD>"
response.write "<TD>暂无信息</TD>"
response.write "<TD width=40></TD>"
response.write "</TR>"
end if
end if
if not(rs1.bof and rs1.eof) then
%>
<TD width="240" align=center>
<A href ="showinfo.asp?id=<%=rs1("productid")%>&name=<%=rs("classname")%>">
<img border="0" src=<%="UpLoadFile\" &rs1("smallPic")%> width="230"></a>
</TD>
<%end if%>
</TR></TBODY></TABLE>
</TD>
<%rs1close()%>
</TR>
</TBODY>
</TABLE>
</div>
<%end if%>
<%
if rs("lmflag6")="6" then '一项文章值
%>
<div align="center">
<TABLE cellPadding=0 width="716" border=1 style="border-collapse: collapse" bordercolor=<%=rs("lmflag4")%>>
<TBODY>
<TR>
<TD width="716" colspan="2">
<TABLE cellSpacing=0 cellPadding=0 width="100%" align=center
border=0>
<TBODY>
<TR>
<TD width=716 background=<%=rs("lmflag1")%> height=30>
<table border="0" cellpadding="0" style="border-collapse: collapse" width="100%" id="table29" height="100%">
<tr>
<td width="620"></td>
<td width="95"><p align="center"><A href="showxm.asp?name=<%=rs("classname")%>"><span style="font-size: 10pt"><IMG src=<%=rs("lmflag5")%> alt="更多内容" border=0 align="absmiddle"></span></A></td>
</tr>
</table>
</TD></TR></TBODY>
</TABLE>
</TD>
</TR>
<TR>
<TD vAlign=top bgColor=<%=rs("lmflag2")%> width="50%" background=<%=rs("lmflag3")%>>
<TABLE cellPadding=2 width="716" border=0>
<TBODY>
<TR>
<%if not(rs1.bof and rs1.eof) then%>
<TD width="700" valign="top" rowspan="2">
<TABLE cellSpacing=0 cellPadding=0 width="100%" id="table31">
<TBODY>
<TR>
<TD><font size="2"><%=rs1("content")%></font></TD>
</TR>
<TR>
<TD align=right><span style="font-size: 9pt">(<%=rs1("ProductName")%>)</span></TD>
</TR>
</TBODY>
</TABLE>
</TD>
<%else
response.write "<TR>"
response.write "<TD width=10></TD>"
response.write "<TD>暂无信息</TD>"
response.write "<TD width=40></TD>"
response.write "</TR>"
end if%>
</TR>
</TBODY>
</TABLE>
</TD>
<%rs1close()%>
</TR>
</TBODY>
</TABLE>
</div>
<%end if%>
<%
if rs("lmflag6")="1" then '三张图片
%>
<div align="center">
<TABLE cellPadding=0 width="716" border=1 style="border-collapse: collapse" bordercolor=<%=rs("lmflag4")%>>
<TBODY>
<TR>
<TD width="716" colspan="2">
<TABLE cellSpacing=0 cellPadding=0 width="100%" align=center
border=0>
<TBODY>
<TR>
<TD width=716 background=<%=rs("lmflag1")%> height=30>
<table border="0" cellpadding="0" style="border-collapse: collapse" width="100%" id="table29" height="100%">
<tr>
<td width="620"></td>
<td width="95"><p align="center"><A href="showxm.asp?name=<%=rs("classname")%>"><span style="font-size: 10pt"><IMG src=<%=rs("lmflag5")%> alt="更多内容" border=0 align="absmiddle"></span></A></td>
</tr>
</table>
</TD></TR></TBODY>
</TABLE>
</TD>
</TR>
<TR>
<TD vAlign=top bgColor=<%=rs("lmflag2")%> width="50%" background=<%=rs("lmflag3")%>>
<TABLE cellPadding=2 width="716" border=0>
<TBODY>
<%if not(rs1.bof and rs1.eof) then
dim productid2(3)
dim smallpic2(3)
dim okprname2(3)
for i=1 to 3
if rs1.eof then exit for
productid2(i)=rs1("productid")
smallpic2(i)=rs1("smallPic")
if len(rs1("ProductName"))>13 then
okprname2(i)=left(rs1("ProductName"),12) &"..."
else
okprname2(i)=rs1("ProductName")
end if
rs1.movenext
if rs1.eof then exit for
next
%>
<TR>
<TD width="233" valign="top">
<p align="center">
<%if smallpic2(1)<>empty then%>
<A href ="showinfo.asp?id=<%=productid2(1)%>&name=<%=rs("classname")%>"><img border="0" src=<%="UpLoadFile\" &smallpic2(1)%> height="125"></A></TD>
<%end if%>
<TD width="233" valign="top">
<p align="center">
<%if smallpic2(2)<>empty then%>
<A href ="showinfo.asp?id=<%=productid2(2)%>&name=<%=rs("classname")%>"><img border="0" src=<%="UpLoadFile\" &smallpic2(2)%> height="125"></A></TD>
<%end if%>
<TD width="233" valign="top">
<p align="center">
<%if smallpic2(3)<>empty then%>
<A href ="showinfo.asp?id=<%=productid2(3)%>&name=<%=rs("classname")%>"><img border="0" src=<%="UpLoadFile\" &smallpic2(3)%> height="125"></A></TD>
<%end if%>
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -