| |
|
|
 |
|
<%
sql="select content from article where articleid=120"
rs.open sql,conn,1,1
if rs.eof then
content="没有相关信息！"
else
content=rs("content")
end if
content=clearhtml(content)
if text.strlen(content)>530 then content=text.strleft(content,530)
response.Write(content)
rs.close
%> |
|
|
|
|
 |
|
| <%call script_pic1(209,180,5000)%> |
<%
sub script_pic1(img_w,img_h,img_time)
%>
<%
end sub
%>
|
|
|
|
| 产品展示 |
<%
sql="select top 5 * from product where elite=true order by orderid asc"
rs.open sql,conn,1,1
if not rs.eof then
do while not rs.eof
title=text.dvtextcode(rs("title"))
if text.strlen(title)>12 then title=text.strleft(title,12)
response.Write(" | "&title&" | ")
rs.movenext
if rs.eof then exit do
loop
end if
rs.close
%>
|
 |
|
|
<%
sql="select * from product where elite=true order by orderid asc"
rs.open sql,conn,1,1
if rs.eof then
response.Write("| 没有相关产品！ | ")
else
do while not rs.eof
response.Write(" | ")
rs.movenext
if rs.eof then exit do
loop
end if
rs.close
%>
| |
|
|
|
|
|
|