<% Set fso=Server.CreateObject("Scripting.FileSystemObject") If fso.FileExists(Server.MapPath(""&SysRootDir&"NoInstall.txt")) Then response.Redirect "install.asp" End If set fso=Nothing Call SiteInfo If ISHTML = 1 Then Response.expires = 0 Response.expiresabsolute = Now() - 1 Response.addHeader "pragma", "no-cache" Response.addHeader "cache-control", "private" Response.CacheControl = "no-cache" End If %> 网站地图-山东泗水登峰面粉机械有限公司
  • 山东泗水登峰面粉机械有限公司
  • Shandong Sishui dengfeng Flour Machinery Co.,ltd
  • 登峰面粉机械
  • 销售网络
  • 公司荣誉
  • 信息反馈
  • 联系我们
  • 新闻中心
  • <%set rs1=server.CreateObject("adodb.recordset") rs1.open "select * from Qianbo_News order by id desc",conn,1,1 if not rs1.bof then rs1.movefirst end if do while not rs1.eof%>
  •   .html" title="<%=rs1("NewsName")%>"><%=rs1("NewsName")%>

  • <%rs1.movenext loop rs1.close%>
  • 产品展示
  • <%set rs=server.CreateObject("adodb.recordset") rs.open "select * from Qianbo_Products order by id desc",conn,1,1 if not rs.bof then rs.movefirst end if do while not rs.eof%>
  •   .html" title="<%=rs("ProductName")%>"><%=rs("ProductName")%>

  • <%rs.movenext loop rs.close%>