📄 bodyr2.asp
字号:
</TR>
<TR>
<TD width="233" valign="top" align="center">
<A href ="showinfo.asp?id=<%=productid2(1)%>&name=<%=rs("classname")%>"><font size="2"><%=okprname2(1)%></font></A></TD>
<TD width="233" valign="top" align="center">
<A href ="showinfo.asp?id=<%=productid2(2)%>&name=<%=rs("classname")%>"><font size="2"><%=okprname2(2)%></font></A></TD>
<TD width="233" valign="top" align="center">
<A href ="showinfo.asp?id=<%=productid2(3)%>&name=<%=rs("classname")%>"><font size="2"><%=okprname2(3)%></font></A></TD>
</TR>
<%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%>
</TBODY>
</TABLE>
</TD>
<%rs1close()%>
</TR>
</TBODY>
</TABLE>
</div>
<%end if%>
<%
if rs("lmflag6")="7" 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>
<TD width="240" align=center>
<%
response.write "<script type=""text/javascript"">"&vbCrLf&""
i=1
do while not rs1.eof
if rs1("smallPic")<>empty then
response.write "imgUrl"&i&"=""UpLoadFile/"&rs1("smallPic")&""";"&vbCrLf&""
response.write "imgLink"&i&"=escape(""showinfo.asp?id=" &rs1("productid")&"&name="&rs("classname") &""");" &vbCrLf &""
i=i+1
end if
if i>6 then exit do
rs1.MoveNext
loop
if not(rs1.bof and rs1.eof) then rs1.movefirst
if i>1 then
response.write "var focus_width=230"&vbCrLf&""
response.write "var focus_height=155"&vbCrLf&""
response.write "var swf_height =focus_height"&vbCrLf&""
s=""
sss=""
for k=1 to i-1
if k=i-1 then
s=s&"imgUrl"&k
sss=sss&"imgLink"&k
else
s=s&"imgUrl"&k&"+""|""+"
sss=sss&"imgLink"&k&"+""|""+"
end if
next
response.write "var pics="&s&""&vbCrLf&""
response.write "var links="&sss&""&vbCrLf&""
response.write "document.write('<object classid=""clsid:d27cdb6e-ae6d-11cf-96b8-444553540000"" codebase=""http://fpdownload.macromedia.com/pub/shockwave/cabs/flash/swflash.cab#version=6,0,0,0"" width=""'+ focus_width +'"" height=""'+ swf_height +'"">');"&vbCrLf&""
response.write "document.write('<param name=""allowScriptAccess"" value=""sameDomain""><param name=""movie"" value=""focus/focus.swf""><param name=""quality"" value=""high""><param name=""bgcolor"" value=""#F0F0F0"">');"&vbCrLf&""
response.write "document.write('<param name=""menu"" value=""false""><param name=wmode value=""opaque"">');"&vbCrLf&""
response.write "document.write('<param name=""FlashVars"" value=""pics='+pics+'&links='+links+'&borderwidth='+focus_width+'&borderheight='+focus_height+'"">');"&vbCrLf&""
response.write "document.write('<embed src=""pixviewer.swf"" wmode=""opaque"" FlashVars=""pics='+pics+'&links='+links+'&borderwidth='+focus_width+'&borderheight='+focus_height+'"" menu=""false"" bgcolor=""#F0F0F0"" quality=""high"" width=""'+ focus_width +'"" height=""'+ focus_height +'"" allowScriptAccess=""sameDomain"" type=""application/x-shockwave-flash"" pluginspage=""http://www.macromedia.com/go/getflashplayer"" />'); document.write('</object>');"&vbCrLf&""
end if
response.write "</script>"&vbCrLf&""
%>
</TD>
<%
if not(rs1.bof and rs1.eof) then rs1.movefirst
%>
<TD width="449" valign="top" rowspan="2">
<TABLE cellSpacing=0 cellPadding=0 width="400" id="table31">
<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></TR>
</TBODY></TABLE>
</TD>
<%rs1close()%>
</TR>
</TBODY>
</TABLE>
</div>
<%end if%>
<%
if rs("lmflag6")="8" 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 border="0" cellpadding="0" style="border-collapse: collapse" width="716" id="table32">
<tr>
<TD width="449" valign="top" >
<TABLE cellSpacing=0 cellPadding=0 width="449" id="table31">
<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>
<td valign=center width ="240">
<%
if not(rs1.bof and rs1.eof) then
rs1.movefirst
response.write "<script type=""text/javascript"">"&vbCrLf&""
i=1
do while not rs1.eof
if rs1("smallPic")<>empty then
response.write "imgUrl"&i&"=""UpLoadFile/"&rs1("smallPic")&""";"&vbCrLf&""
response.write "imgLink"&i&"=escape(""showinfo.asp?id=" &rs1("productid")&"&name="&rs("classname") &""");" &vbCrLf &""
i=i+1
end if
if i>6 then exit do
rs1.MoveNext
loop
if i>1 then
response.write "var focus_width=230"&vbCrLf&""
response.write "var focus_height=155"&vbCrLf&""
response.write "var swf_height =focus_height"&vbCrLf&""
s=""
sss=""
for k=1 to i-1
if k=i-1 then
s=s&"imgUrl"&k
sss=sss&"imgLink"&k
else
s=s&"imgUrl"&k&"+""|""+"
sss=sss&"imgLink"&k&"+""|""+"
end if
next
response.write "var pics="&s&""&vbCrLf&""
response.write "var links="&sss&""&vbCrLf&""
response.write "document.write('<object classid=""clsid:d27cdb6e-ae6d-11cf-96b8-444553540000"" codebase=""http://fpdownload.macromedia.com/pub/shockwave/cabs/flash/swflash.cab#version=6,0,0,0"" width=""'+ focus_width +'"" height=""'+ swf_height +'"">');"&vbCrLf&""
response.write "document.write('<param name=""allowScriptAccess"" value=""sameDomain""><param name=""movie"" value=""focus/focus.swf""><param name=""quality"" value=""high""><param name=""bgcolor"" value=""#F0F0F0"">');"&vbCrLf&""
response.write "document.write('<param name=""menu"" value=""false""><param name=wmode value=""opaque"">');"&vbCrLf&""
response.write "document.write('<param name=""FlashVars"" value=""pics='+pics+'&links='+links+'&borderwidth='+focus_width+'&borderheight='+focus_height+'"">');"&vbCrLf&""
response.write "document.write('<embed src=""pixviewer.swf"" wmode=""opaque"" FlashVars=""pics='+pics+'&links='+links+'&borderwidth='+focus_width+'&borderheight='+focus_height+'"" menu=""false"" bgcolor=""#F0F0F0"" quality=""high"" width=""'+ focus_width +'"" height=""'+ focus_height +'"" allowScriptAccess=""sameDomain"" type=""application/x-shockwave-flash"" pluginspage=""http://www.macromedia.com/go/getflashplayer"" />'); document.write('</object>');"&vbCrLf&""
end if
response.write "</script>"&vbCrLf&""
end if
%>
</td>
</tr>
</table>
</TD>
<%rs1close()%>
</TR>
</TBODY>
</TABLE>
</div>
<%end if%>
<%
rs.movenext
loop
RsClose()
%>⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -