%
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("porname")%> |
| 电话: |
<%=rsshow("txtTEL")%> |
| 邮箱: |
<%=rsshow("txtEmail")%> |
| 公司: |
<%=rsshow("txtUserName")%> |
| 行业: |
<%=rsshow("title")%> |
| 内容: |
<%=rsshow("txtCon")%> |
| 返回 |
|
<%
call CloseConn()
%>