<% Dim Uname,tel1,Uemail,where1,Utitle,Ucontent Uname = Trim(request.form("U_Name")) tel1 = Trim(request.form("tel2")) Uemail = Trim(request.form("U_Email")) where1 = Trim(request.form("where2")) Utitle = request.form("Title") Ucontent = request.form("Content") 'HTML支持 function htmlencode(str) htmlencode=server.htmlencode(str) htmlencode=replace(replace(htmlencode,chr(13),"
"),"'","’") end function set rs=server.createobject("adodb.recordset") sqltext="select * from GuestBook" rs.open sqltext,conn,3,3 if request.querystring="add" then '添加一条留言到数据库 rs.addnew rs("UserName")=Uname rs("tel")=tel1 if Uemail="" then rs("UserEmail")="@" else rs("UserEmail")=Uemail end if rs("where")=where1 rs("Title")=Utitle rs("Content")=htmlencode(Ucontent) rs("AddTime")=cstr(now()) rs.update rs.close conn.close Response.Redirect "ly.asp" End if %>

我公司参加全国一级房地产企业联络会
 日期：2006-12-26 17:29:07     来源:吴中地产   编辑： 


我公司参加全国一级房地产企业联络会

　　2006年12月23至25日，“2006年全国一级资质房地产开发企业信用档案联络员工作会议”在北京胜利召开。吴中地产作为全国一级资质房地产开发企业也参加了此次会议。此次会议表彰了2006年度信用档案管理先进企业和优秀信用档案联络员，并对档案管理员进行了培训和考试。
 
　
江苏吴中集团 版权所有