温州市浩莱斯机械有限公司,排水板包边机,无纺布制袋机
作者:admin 日期:2012-06-24
温州市浩莱斯机械有限公司成立于2008年,专业生产各种排水板包边机,塑料软包装机械,并集研发、生产、销售、服务于一体的制造商及供应商。公司致力于生产各类排水板包边机,制袋机,印刷机,企业视质量为生命,以科技求发展提高企业管理水平及员工素质为中心。“用心去服务,赢得天下客”的理念在不断积累和创新。力求以高品质、高信誉的产品开拓国内外市场。我公司产品远销中东、南美、非洲、亚洲等国家地区,并在泰国、委内瑞拉、巴西、哥伦比亚、伊朗马来西亚、南非等设立销售和售后服务机构。深受广大客户的信赖和好评。
原文链接地址:http://www.duing.cn/article/Ablog/HaoLaiSiJiXie.html
<转%3c,escape,unescape的使用和在ASP中调用js里的编码函数
作者:admin 日期:2012-06-24
经过几番周折,终于是写好了
< %set rs=server.createobject("adodb.recordset")
sql="select top 6 * from [News] where BigClassID=5 order by ID desc"
rs.open sql,conn,1,1
if rs.eof then
response.write "No information!"
else
cnewstxt="< table cellspacing='0' cellpadding='0' width='100%' align='center'>< tbody>"
j=0
do while not rs.eof
if j>0 and j >= 6 then
exit do
end if
cnewstxt=cnewstxt&"< tr>< td align=left height=20>< img src='../images/news_icon.jpg' /> < a href='NewsShow"&rs("ID")&".html' title='"&rs("Title")&"'>"&cutstr(rs("Title"),15)&"< /a>< /td>< td align=right>2012-6-16< /td>< /tr>"% >
< %j=j+1
rs.movenext
loop
cnewstxt=cnewstxt&"< /tbody>< /table>"
end if
rs.close
set rs=nothing
% >
< script language="javascript" type="text/javascript" runat="server">
function JSAngelEncode(sStr)
{
return escape(sStr);
}
< /script>
< %
Function aspEncode(sStr)
aspEncode= JSAngelEncode(sStr)
End Function
cnewstxt=aspEncode(cnewstxt)
response.Write cnewstxt
% >
< %set rs=server.createobject("adodb.recordset")
sql="select top 6 * from [News] where BigClassID=5 order by ID desc"
rs.open sql,conn,1,1
if rs.eof then
response.write "No information!"
else
cnewstxt="< table cellspacing='0' cellpadding='0' width='100%' align='center'>< tbody>"
j=0
do while not rs.eof
if j>0 and j >= 6 then
exit do
end if
cnewstxt=cnewstxt&"< tr>< td align=left height=20>< img src='../images/news_icon.jpg' /> < a href='NewsShow"&rs("ID")&".html' title='"&rs("Title")&"'>"&cutstr(rs("Title"),15)&"< /a>< /td>< td align=right>2012-6-16< /td>< /tr>"% >
< %j=j+1
rs.movenext
loop
cnewstxt=cnewstxt&"< /tbody>< /table>"
end if
rs.close
set rs=nothing
% >
< script language="javascript" type="text/javascript" runat="server">
function JSAngelEncode(sStr)
{
return escape(sStr);
}
< /script>
< %
Function aspEncode(sStr)
aspEncode= JSAngelEncode(sStr)
End Function
cnewstxt=aspEncode(cnewstxt)
response.Write cnewstxt
% >