<% 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-10-25
第26届房产会•吴中地产  2006-10-24
吴中地产，引领山水地产概念  2006-10-10
吴中温馨大家庭,明月天涯共此时  2006-10-10
吴中区房展会演讲比赛获奖喜报  2006-10-10
太湖胥香园参展新区房交会  2006-9-29
胥香园·东院打造庭院经典  2006-9-29
石湖之韵、太湖胥香园获奖喜报  2006-9-29
“迎国庆、盼中秋”朗诵、歌咏比赛圆满结束  2006-9-27
彭总荣获 “十大杰出创业青年”称号  2006-9-26
多位京沪苏文化名家择居“石湖之韵”  2006-9-22
石湖华城申报“全国优秀示范小区”专家评议会  2006-9-20
太湖洋房，上演新一轮抢购热潮  2006-9-18
石湖之韵教师节业主联谊活动火热举行  2006-9-12
“澄湖水岸”别墅项目奠基仪式隆重举行  2006-9-1
太湖•胥香园业主活动  2006-8-30
太湖•胥香园杯少儿书画大赛顺利结束  2006-8-18
胥香园举办大型业主纳凉晚会  2006-8-24
敬请关注8.26苏州少儿书画大赛颁奖  2006-8-23
石湖华城即将开幕  2006-8-15

上一页　下一页
　
江苏吴中集团 版权所有