<%sub titlen(i) tlen=rs_1("title") if len(tlen)>i then tlen=left(tlen,i)&"..." else tlen=tlen end if end sub%>
  设为首页 | | 联系我们
   
  <% set rs=server.createobject("adodb.recordset") sql="select top 1 * from [jsconst] order by jsid desc" rs.open sql,conn,1,1 news_num = rs("headnum") if news_num = "" or isnull(news_num) then news_num = 0 set rs_1 = server.CreateObject ("adodb.recordset") sql_1 = "select top "&news_num&" id,boardid,title,fpath,fname,ifshow,addtime from article where cdflag=0 and boardid=3502 and ifshow=1 and netwebid=1 order by ifhead desc,seq desc" rs_1.Open sql_1,conn,1,1 if not rs_1.eof then set rs_2 = server.CreateObject ("adodb.recordset") sql_2 = "select * from board where netwebid=1 and boardid = 3502 order by boardid desc" rs_2.Open sql_2,conn,1,1 str = "" do while not rs_1.EOF temptime =month(rs_1("addtime")) & "月" & day(rs_1("addtime")) & "日" call titlen(rs_2("zishu")\2) 'response.write(tlen) if rs("headtime")=1 then str = str&rs("headsign")&" "& rs_1("title")& "("& temptime & ") " else str = str&rs("headsign")&" "& rs_1("title")&" " end if rs_1.movenext loop response.write(str) rs_2.Close set rs_2=nothing end if rs_1.Close set rs_1=nothing rs.Close set rs=nothing %>  
<% dim conn set conn=server.createobject("ADODB.connection") conn.ConnectionString ="Provider=SQLOLEDB.1;Password=ccedweb;Persist Security Info=True;User ID=sa;Initial Catalog=cced;Data Source=(Local)" conn.Open %> <% Const PAGESIZE=20 Const PARTSIZE=10 Const AboutSize=8 Const listlen=30 'list文件代码 Const syspath="News" %>
 
 
 
亚泰名车超市
时间:2007年6月29日14:59


  

  亚泰名车超市位于共和国汽车工业的摇篮--吉林省长春市,是迄今为止东北三省规模最大、品种最全、最具发展潜力的汽车经销市场,可谓集汽车展示中心、汽车营销中心、汽车信贷中心、汽车信息中心和汽车文化中心为一体的汽车营销平台。
  亚泰名车超市主体为框架结构,占地面积30000多平方米,临街展面长达400米,并拥有万米广场,堪称现代化、复合型、多功能的汽车消费集散地。
  亚泰名车超市以成熟的市场运营模式、先进的市场管理理念、卓越的市场管理水平、完备的市场功能、优质的服务水准享誉东北,尤其是东北首家实行的一站式办公、直客式服务,真正实现了消费者购车一条龙,充分发挥了国际领先的汽车营销业态--汽车超市方便、快捷的特性,深受业内好评。

 

 


 
 
 
版本所有:长春市二道区人民政府 Copyright 2006
后台技术支持:倚天软件有限公司