%
bigid=request("bigid")
if request("action")="modify" then
Set rsshow= Server.CreateObject("ADODB.Recordset")
sql="select * from shenbao 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 shenbao where id=" & bigid & ""
rsshow.open sql,conn,1,1
%>
| 信息显示 |
| 申报单位全称: |
<%=rsshow("Name")%> |
| 申报单位组织机构代码 |
<%=rsshow("daima")%> |
| 申报内容主题* |
<%=rsshow("Content")%> |
| 申报单位法人* |
<%=rsshow("faren")%> |
| 申报单位地址:* |
<%=rsshow("address")%> |
| 申报人* |
<%=rsshow("shenbaoren")%> |
| 固定电话:* |
<%=rsshow("phone")%> |
| 手机: |
<%=rsshow("tel")%> |
| 返回 |
|
<%
call CloseConn()
%>