%
bigid=request("bigid")
if request("action")="modify" then
Set rsshow= Server.CreateObject("ADODB.Recordset")
sql="select * from minyi 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 minyi where id=" & bigid & ""
rsshow.open sql,conn,1,1
%>
| 信息显示 |
| 姓名: |
<%=rsshow("Name")%> |
| 联系地址或单位: |
<%=rsshow("address")%> |
| 联系电话: |
<%=rsshow("phone")%> |
| Email: |
<%=rsshow("email")%> |
| 主题: |
<%=rsshow("title")%> |
| 内容: |
<%=rsshow("Content")%> |
| 回复 |
|
| 返回 |
|
<%
call CloseConn()
%>