% bigid=request("bigid") if request("action")="modify" then Set rsshow= Server.CreateObject("ADODB.Recordset") sql="select * from message where id=" & bigid & "" rsshow.open sql,conn,1,3 rsshow("reply")=trim(request("reply")) rsshow.update rsshow.close set rsshow=nothing end if Set rsshow= Server.CreateObject("ADODB.Recordset") sql="select * from message where id=" & bigid & "" rsshow.open sql,conn,1,1 %>
| 信息显示 | |
| 姓 名: | <%=rsshow("username")%> |
| 机构名称: | <%=rsshow("CompanyName")%> |
| 职务/头衔: | <%=rsshow("CompanyFax")%> |
| 办公电话: | <%=rsshow("Phone")%> |
| 手机号码: | <%=rsshow("Mobilephone")%> |
| Email: | <%=rsshow("Email")%> |
| 类 型: | <%=rsshow("ddltype")%> |
| 留言标题: | <%=rsshow("Title")%> |
| 留言内容: | <%=rsshow("Content")%> |
| 【返回】 | |