showgbook.asp

采用asp+fso技术 傻瓜式的程序安装和调试 用户无需考虑系统的安装维护 美观、友好的展示铺面 设计中应用了多种网络安全技术 顾客可以方便的查询并订购商品 用户可以方便的定义各种商品信息

<!--#include file="conn.asp"-->
<!--#include file="webconfig.asp"-->
<title><%=webname%>--最新新闻</title>
<%dim messid
fkid=Request("id")
set rs=server.CreateObject("adodb.recordset")
rs.open "select * from shop_fk where fkid="&fkid&"",conn,1,3
%> 
<table width="400" border="0" align="center" cellpadding="0" cellspacing="0" class=table-zuoyou>
  <tr> 
    <td align="center" colspan="4" height="30" background="images/titlebg.gif"><b>查看留言</b></td>
  </tr>
  <tr height=25> 
    <td width="80" class=table-youxia style="PADDING-LEFT: 6px">留言类型：</td>
    <td width="120" class=table-youxia style="PADDING-LEFT: 6px">
      <% select case rs("fkleixing")
case "1"
response.write "普通留言"
case "2"
response.write "意见建议"
case "3"
response.write "缺货登记"
case "4"
response.write "合作意向"
case "5"
response.write "产品投诉"
case "6"
response.write "服务投诉"
end select %>
    </td>
    <td width="80" class=table-youxia style="PADDING-LEFT: 6px">来访 IP ：</td>
    <td width="120" class=table-xia style="PADDING-LEFT: 6px">
	<% if session("admin")="" then %>保密
	<% else %>
      <% = trim(rs("fkip")) %>
	  <% end if %>
    </td>
  </tr>
  <tr height=25> 
    <td class=table-youxia style="PADDING-LEFT: 6px">留言用户：</td>
    <td class=table-youxia style="PADDING-LEFT: 6px">
      <% = trim(rs("fkusername")) %>
    </td>
    <td class=table-youxia style="PADDING-LEFT: 6px">电子邮件：</td>
    <td class=table-xia style="PADDING-LEFT: 6px"><% if session("admin")="" then %>
      保密 
      <% else %> <a href=mailto:<% = trim(rs("fkemail"))%>> 
      <% = trim(rs("fkemail")) %>
      </a> <% end if %></td>
  </tr>
  <tr height=25> 
    <td class=table-youxia style="PADDING-LEFT: 6px">发表时间：</td>
    <td class=table-youxia style="PADDING-LEFT: 6px"><%=rs("fkdate")%> </td>
    <td class=table-youxia style="PADDING-LEFT: 6px">联系电话：</td>
    <td class=table-xia style="PADDING-LEFT: 6px"> 
	<% if session("admin")="" then %>保密
	<% else %>
      <% = trim(rs("fktel")) %>
	  <% end if %>
    </td>
  </tr>
  <tr height=25> 
    <td class=table-youxia style="PADDING-LEFT: 6px">留言主题：</td>
    <td colspan="3" class=table-youxia style="PADDING-LEFT: 6px"> <a href=mailto:<% = trim(rs("fkemail"))%>> 
      </a><%=trim(rs("fksubject"))%></td>
  </tr>
  <tr height=30> 
    <td style="PADDING-LEFT: 6px" valign="top" class=table-youxia>留言内容：</td>
    <td colspan="3" style="PADDING-LEFT: 6px" class=table-youxia><%=trim(rs("fkcontent"))%></td>
  </tr>
  <tr height=30> 
    <td valign="top" class=table-youxia style="PADDING-LEFT: 6px">回　　复：</td>
    <td colspan="3" class=table-xia style="PADDING-LEFT: 6px"><%=trim(rs("fklaizi"))%></td>
  </tr>
  <tr> 
    <td colspan="4" align="center" height="25"> <a href='javascript:window.close()'>点击关闭窗口</a></td>
  </tr>
</table>
<%rs.close
set rs=nothing
conn.close
set conn=nothing
%>