📄 get_ok.asp

📁 实现一个用JSP、Servlet技术实现的小型物流网站系统。实现功能如下：管理员通过登录该系统
💻 ASP
字号:
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<% data_path="../../" 'ACC连接数据库路径，对SQL无效 %>
<!--#include file="../../conn/conn.asp"-->
<!--#include file="../../inc/safe.asp"-->
  <!--#include file="../checkrole.asp"-->
 <%
     call checkuser("ly")
 %>
   <!--#include file="../../inc/head.asp"-->
 <title><%=webname%></title>
 <BODY> 
 <br>   
 <br>
 
      <TABLE cellSpacing=0 cellPadding=1 width=778 bgColor=#FFFFFF border=0 align="center">
    <TBODY> 
    <TR vAlign=top>
    <TD>
  <%
    Response.Write "<table width=""778""  border=""0"" cellspacing=""0"" cellpadding=""0"" align='center'>" & vbCrLf
    Response.Write "  <tr>" & vbCrLf
    Response.Write "    <td bgcolor=""fff5d8"" class=""lh15 C"" style=""border:#ff7300 1px solid; padding-left:25px; padding-top:8px; padding-bottom:8px;""><strong>    </strong>" & vbCrLf
    Response.Write "     <table width=""96%""  border=""0"" cellspacing=""0"" cellpadding=""3"">" & vbCrLf
    Response.Write "        <tr>" & vbCrLf
    Response.Write "          <td width=""4%"" height=""86"" valign=""top"" class=""lh15"">" & vbCrLf
    Response.Write "            <img height=""19"" src="""&HOPE_InstallDir&"images/icon_point.gif"" width=""18"" align=""top""></td>" & vbCrLf
    Response.Write "          <td width=""96%"" style=""line-height:100%"">" & vbCrLf
    Response.Write "" & Chr(9) & "" & Chr(9) & "" & Chr(9) & "<strong>您的询价和联系信息已发送给买家！</strong>" & vbCrLf
    Response.Write "" & Chr(9) & "" & Chr(9) & "" & Chr(9) & "<p>如果对您的留言感兴趣，买家将与您联系。</p>" & vbCrLf
    Response.Write "" & Chr(9) & "" & Chr(9) & "" & Chr(9) & "<p>关注客户给您的反馈，请经常登录商务助手查看您的留言箱<img src="""&HOPE_InstallDir&"images/indexpoint.gif"" width=""5"" height=""9"">  。</p>" & vbCrLf
    Response.Write "" & Chr(9) & "" & Chr(9) & "" & Chr(9) & ""
     Response.Write "</td>" & vbCrLf
    Response.Write "        </tr>" & vbCrLf
    Response.Write "      </table>     " & vbCrLf
    Response.Write "     <br>" & vbCrLf
    Response.Write "     <table width=""96%""  border=""0"" cellspacing=""0"" cellpadding=""3"">" & vbCrLf
    Response.Write "       <tr>" & vbCrLf
    Response.Write "         <td width=""4%"" valign=""top"" class=""lh15""><img height=""19"" src="""&HOPE_InstallDir&"images/icon_point.gif"" width=""18"" align=""top""></td>" & vbCrLf
    Response.Write "         <td width=""96%"" class=""lh15""><strong>想更多客户找到你？建议您发布供求信息！</strong><span id=""small4button""><strong><font id=""small4buttonword""><a href="""&HOPE_InstallDir&"member/""><font color=""cc3300"">点此进入我的商务管理中心去发布</font></a></font></strong></span></td>" & vbCrLf
    Response.Write "       </tr>" & vbCrLf
    Response.Write "     </table>" & vbCrLf
    Response.Write "</td>" & vbCrLf
    Response.Write "  </tr>" & vbCrLf
    Response.Write "</table>" & vbCrLf
%></TD>
    </TR></TBODY></TABLE></td>
  </tr>
</table><br><br>
 <!--#include file="../../inc/end.asp"-->
⌨️ 快捷键说明

复制代码 Ctrl + C
搜索代码 Ctrl + F
全屏模式 F11
切换主题 Ctrl + Shift + D
显示快捷键 ?
增大字号 Ctrl + =
减小字号 Ctrl + -