开通博客赚积分
发布资源赚积分
分类

源码开发语言/平台
当前位置：首页 > 源码/资料 > 多媒体 > IP电话/视频会议 > 查看源码
user.asp
资源名称：NetPhone.rar　[点击查看]
上传用户：xxtaishan
上传日期：2022-01-02
资源大小：4063k
文件大小：6k
源码类别：

IP电话/视频会议

开发平台：

ASP/ASPX

user.asp：源码内容
  1. <%@LANGUAGE="VBSCRIPT" CODEPAGE="936"%>
  2. <!--#include file="inc/index_conn.asp" -->
  3. <!--#include file="inc/func.asp" -->
  4. <%
  5. if session("user_!@#")="" and session("user_!@#123")<>"ycbipnet" then
  6. if request("username")="" or request("password")="" then
  7. showerr("您是不是有什么没有填写！")
  8. end if
  10. Dim rs2
  11. set rs2=conn.execute("select * from info3 where title='"&request("username")&"' and pw='"&request("password")&"'")
  12. if rs2.bof and rs2.eof then
  13. showerr("用户名或密码错误！")
  14. else
  15. session("user_!@#")=rs2("id")
  16. session("user_!@#123")="ycbipnet"
  17. session("user")=rs2("title")
  19. end if
  20. end if
  24. %>
  25. <!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd">
  26. <html xmlns="http://www.w3.org/1999/xhtml">
  27. <head>
  28. <meta http-equiv="Content-Type" content="text/html; charset=gb2312" />
  29. <title>自由通::通讯设备有限公司</title>
  30. <style type="text/css">
  31. <!--
  32. body {
  33. margin-left: 0px;
  34. margin-top: 0px;
  35. margin-right: 0px;
  36. margin-bottom: 0px;
  37. background-image: url(image/index/bg.gif);
  38. }
  39. -->
  40. </style>
  41. <link href="css/css.css" rel="stylesheet" type="text/css" />
  42. </head>
  44. <body>
  45. <table width="858" border="0" align="center" cellpadding="0" cellspacing="0">
  46.   <tr>
  47.     <td><!--#include file="top.asp" --></td>
  48.   </tr>
  49. </table>
  50. <table width="858" border="0" align="center" cellpadding="0" cellspacing="0">
  51.   <tr>
  52.     <td width="11" height="151" rowspan="2" background="image/index/leftbg.gif">&nbsp;</td>
  53.     <td height="9" colspan="3" bgcolor="#FFFFFF"></td>
  54.     <td width="13" rowspan="2" background="image/index/rightbg.gif">&nbsp;</td>
  55.   </tr>
  56.   <tr>
  57.     <td width="226" height="293" valign="top" bgcolor="#FCFCFC"><table width="100%" border="0" cellspacing="0" cellpadding="0">
  58.       <tr>
  59.         <td><!--#include file="left.asp" --></td>
  60.       </tr>
  61.     </table></td>
  62.     <td width="6" valign="top" bgcolor="#FCFCFC"></td>
  63.     <td width="601" valign="top" bgcolor="#FCFCFC"><table width="94%" border="0" align="center" cellpadding="0" cellspacing="0">
  64.       <tr>
  65.         <td><img src="image/sub/center_account.gif" width="599" height="33" /></td>
  66.       </tr>
  67.       <tr>
  68.         <td height="30" class="style1"><div align="right">首页 &gt; 帐户中心 </div></td>
  69.       </tr>
  70.       <tr>
  71.         <td height="1" background="image/index/dot.gif"></td>
  72.       </tr>
  73.       <tr>
  74.         <td height="252" valign="top"><div align="center"><br />
  75.             <span class="style1">用户名：</span><span class="red"><%=session("user")%></span><span class="style1"> 
  76.             <br />
  77.             <br />
  78.             通话记录 </span>
  79.             <table width="50%" border="0" cellpadding="0" cellspacing="1" bgcolor="#CCCCCC">
  80.           <tr>
  81.             <td width="50%" height="25" bgcolor="#FFFFFF"><div align="center" class="style1">日 期 </div></td>
  82.             <td width="50%" bgcolor="#FFFFFF"><div align="center" class="style1">余 额</div></td>
  83.           </tr>
  84. <%
  86. sql=" select * from xf where user_id="&session("user_!@#")&" order by time1 desc "
  87. Set rs=Server.CreateObject("ADODB.RecordSet")
  88. rs.open sql,conn,1,1
  89. Dim page,i
  90. if request("page")="" then
  91. page=1
  92. else
  93. page=clng(request("page"))
  94. end if
  95. i=0
  96. rs.pagesize=15
  97. if page<1 then page=1
  98. if page>rs.pagecount then page=rs.pagecount 
  99. if rs.pagecount>0 then rs.absolutepage=page
  101. if rs.eof then
  102. response.write "<tr bgcolor='#FFFFFF'><td colspan='2'><font color='red'>系统中还没有录入相关任何信息！</font></td></tr>"
  103. else
  104. Do while not rs.eof and i<rs.pagesize
  105. %>   
  106.   
  107.           <tr>
  108.             <td height="25" bgcolor="#FFFFFF" class="style1"><div align="center" class="style1"><%=rs("time1")%></div></td>
  109.             <td bgcolor="#FFFFFF" class="style1"><div align="center" class="style1"><%=rs("money")%></div></td>
  110.           </tr>
  111. <%
  112. rs.MoveNext
  113. i=i+1
  114. Loop
  115. end if
  116. %>   
  117.         </table>
  119.             <span class="style1"><br />
  120.             </span>
  121.             <table width="86%" height="33"  border="0" align="center" cellpadding="0" cellspacing="0" class="font9">
  122.           <tr>
  123.             <td class="style1">共 <%=rs.recordcount%> 条  <%=page%>/<%=rs.pagecount%> 页 <a href="?PAGE=1"  class="main1">首 页</a>
  124.                   <%if rs.pagecount>1 then 
  125.      if page=1 then%>
  126.               | 上一页 | <a href="?PAGE=<%=(page+1)%>"  class="main2">下一页</a>
  127.               <%else
  128.       if page=rs.pagecount then%>
  129.               <a href="?PAGE=<%=(page-1)%>"  class="main2">上一页</a> | 下一页
  130.               <%else%>
  131.               | <a href="?PAGE=<%=(page-1)%>"  class="main2">上一页</a> | <a href="?PAGE=<%=(page+1)%>"  class="main2"> 下一页</a>
  132.               <%end if%>
  133.               <%end if%>
  134.               <%end if%>
  135.               | <a href="?PAGE=<%=rs.pagecount%>"  class="main2"> 尾 页</a> 第
  136.                 <select name="sel_page" class="mailarea" onchange="javascript:location=this.options[this.selectedIndex].value;">
  137.                   <%
  138.        for i = 1 to rs.PageCount
  139.        if i = page then%>
  140.                   <option value="?PAGE=<%=i%>" selected="selected"><%=i%></option>
  141.                   <%else%>
  142.                   <option value="?PAGE=<%=i%>"><%=i%></option>
  143.                   <%
  144.           end if
  145.         next
  146.         %>
  147.                 </select>
  148.                  页</td>
  149.           </tr>
  150.       </table>
  152.         </div></td>
  153.       </tr>
  154.     </table></td>
  155.   </tr>
  156. </table>
  157. <table width="858" border="0" align="center" cellpadding="0" cellspacing="0">
  158.   <tr>
  159.     <td><!--#include file="bottom.asp" --></td>
  160.   </tr>
  161. </table>
  162. </body>
  163. </html>