<% if request("Submit")<>"" then if request("id")="" then Response.Write("无展会ID参数,请重新提交。") Response.end end if dim intexpoid,intstandardnum,intspacenum,intmeetnum,intbbsnum,intreguser dim company,linkman,email,tel,fax,address,postcode,content,remark,ip dim name1,name2,name3,sex1,sex2,sex3,department1,department2,department3,position1,position2,position3,intputup Dim objCMD,intID,mydirect,sql,rs,a if request("expoid") ="" then intexpoid=0 else intexpoid=cint(request("expoid")) if request("reguser") ="" then intreguser=0 else intreguser=request("reguser") if trim(request("company"))="" then response.write "" response.end else company=trim(request("company")) end if linkman=trim(request("linkman")) email=trim(request("email")) tel=trim(request("tel")) fax=trim(request("fax")) address=trim(request("address")) postcode=trim(request("postcode")) content=trim(request("content")) remark="" IP=request.servervariables("remote_addr") intexpoid=request("id") '展会论坛id号 if request("putup") ="" then intputup=0 else intputup=request("putup") set objCMD=server.createobject("adodb.command") with objCMD .activeconnection=conn .commandtext="apply_update" .commandtype=4 .parameters.append .createparameter("RetValue",adInteger,adParamReturnValue) .parameters.append .createparameter("@ID",adInteger,1, ,0) .parameters.append .createparameter("@expoid",adInteger,1, ,intexpoid) .parameters.append .createparameter("@company",adVarchar,1,128,company) .parameters.append .createparameter("@contact",adVarchar,1,20,linkman) .parameters.append .createparameter("@email",adVarchar,1,50,email) .parameters.append .createparameter("@tel",adVarchar,1,20,tel) .parameters.append .createparameter("@fax",adVarchar,1,20,fax) .parameters.append .createparameter("@address",adVarchar,1,100,address) .parameters.append .createparameter("@postcode",adVarchar,1,20,postcode) .parameters.append .createparameter("@content",adVarchar,1,500,content) .parameters.append .createparameter("@remark",adLongVarchar,1,5000,remark) .parameters.append .createparameter("@ip",adVarchar,1,50,ip) .parameters.append .createparameter("@putup",adInteger,1,,intputup) .execute intID=.parameters("RetValue") end with set objCMD=nothing if not isnull(request("memo")) and trim(request("memo"))<>"" then sql="update apply set remark='" &request("memo")&"', quantity='" &request("quantity")&"', area='" &request("area")&"' where applyid=" &intid conn.execute sql end if if vartype(session("apply_list"))=vbObject and typename(session("apply_list"))="Dictionary" then set mydirect=session("apply_list") sql="select * from forumjion where jionid='"&intID&"'" set rs=server.CreateObject("adodb.recordset") rs.open sql,conn,1,3 a = mydirect.items for each a in mydirect.items if a(0)<>"" then rs.addnew rs("applyid")=intID rs("name")=a(0) rs("sex")=a(1) rs("department")=a(2) rs("posit")=a(3) if a(4)<>"" then rs("reguser")=1 else rs("reguser")=0 rs("username")=a(4) rs.update end if next rs.close set rs=nothing session("apply_list")="" end if response.write "" end if%>
 

北京大学景观设计学研究院
 
 
 
 

体之杰体育公司—国内唯一的社区健身场地设施规划设计专家

北京亿力佳贸易有限公司

美国舒布洛克集团公司
南京优凝舒布洛克公司

中国天腾雾森国际有限公司
 

为您打开一扇交流之窗 共享优秀同仁的忧思高见与善美之作

陈为邦 
建设部原总规划师,教授级高工
中国城市规划学会副理事长、建设部科学技术委员会副主任
中国城市科学研究会副理事长、中国城市经济学会常务理事
 

俞孔坚
哈佛大学设计学博士
北京大学教授、博士生导师
北京大学景观设计学研究院院长
北京土人景观规划设计研究院首席设计师

 
李迪华
北京大学景观设计学研究院副院长
中国生态学会城市生态学专业委员会秘书长
中国城市规划学会城市生态建设专业委员会委员
  1989年6月获农学学士学位,1995年7月获北京大学理学硕士学位后留校任教,为研究生开设城市生态学课程,重点介绍生态学在城市研究、城市规划设计和建设管理中的应用。长期从事城市生态学研究、教学,竭力促进生态学在城市研究和规划设计中的实际应用,曾经在全国 11个城市的建设和规划部门的领导干部培训班或者学位班上讲述生态学。
 
高 志
加拿大宝佳国际建筑师有限公司中国代表处首席代表
美国Southern California University 博士
加拿大Memorial University 硕士
北京工业大学 学士
清华大学房地产EMBA客座教授
清华美院兼职教授
 
庞 伟
北京土人景观规划设计研究院 副院长
广州土人景观顾问有限公司 总经理 设计总监
北京大学景观设计研究院 客座副研究员
美国景观设计协会(ASLA)2002荣誉设计奖
 

吴 钢
德国维思平(WSP)建筑师事务所董事总经理、主设计师
1988 获同济大学风景设计专业学士学位
1992 获德国卡尔斯鲁厄大学建筑学硕士学位,同年成为该校博士生
1994 慕尼黑西门子房产管理公司建筑设计部设计主持人,亚洲项目主管
1997 慕尼黑WSP建筑师事务所合伙人
1998 北京WSP建筑师事务所,董事、总经理、主设计师之一

 
MICHAEL ERICKSON
美国易道公司(EDAW)北京总设计师
 
梁钦东
美国易道公司(EDAW)董事、北京分公司副总经理
 
韩西丽 
北京大学景观设计学研究院博士
 
宋志生
北京土人景观规划设计研究院设计师
2004中国园林滕头杯青年园林设计竞赛金奖获得者
 
中国建设报 中华建筑报
中国国土资源报
中国花卉报 中国环境报
《城乡建设》《建设科技》
《中国园林》《景观设计》
《中国地产》《新地产》
中国新闻社 光明日报
新华通讯社北京分社 竞报
南方周末 北京晚报 新京报
学习时报 科技日报
中国建筑工业出版社
中国环境科学出版社
中国电力出版社
中国房地产及住宅研究会人居环境委员会
......
·加拿大宝佳国际建筑师有限公司
·德国维思平(WSP)建筑设计咨询公司
·中国城市规划设计研究院风景园林规划研究所
·上海意格环境设计咨询有限公司北京分公司
·美国EDSA(亚洲)设计事务所
·美国EDAW公司北京分公司
·美国XWHO设计公司中国机构北京分公司
·北京北林地景园林规划设计院有限责任公司
·北京创新景观园林设计有限责任公司
·中国风景园林规划设计研究中心
·北京多义景观规划设计研究中心
·清华大学城市规划设计研究院园林景观所
·北京市园林古建设计研究院
·加拿大BDCL建筑设计有限公司
·英国阿特金斯顾问国际有限公司
·中国建筑设计研究院环艺院景观所
·加拿大阿奇贝斯设计有限公司
·优地联合(北京)建筑景观设计咨询有限公司
·瑞田(北京)景观规划设计有限公司
·北京品鑫景观建筑设计顾问中心
·北京冠伦地景景观设计有限公司
·优山美地景观设计有限公司
·山水堂(北京)国际景观工程设计有限公司
·北京东方蓝地建筑设计咨询有限公司
·北京雅美中嘉景观意思设计顾问有限公司
·北京东方利禾景观设计有限公司
·北京稷锋洲城市景观规划设计咨询有限责任公司
·株式会社奇兴声北京分公司
·北京世纪麦田园林设计有限责任公司
·轩艺景观设计事务所
·北京景观园林设计有限公司
·北京中佳政华设计咨询有限公司
·北京道勤元尚景观规划设计公司
·首创置业股份有限公司
·天津方正置业有限公司
·山东淄博顾泽房地产有限公司
......
Copyright © 2003-2005 Landscapecn.com Inc. All rights reserved.