⭐ 欢迎来到虫虫下载站! | 📦 资源下载 📁 资源专辑 ℹ️ 关于我们
⭐ 虫虫下载站

📄 pusershow.asp

📁 我同学的毕业设计源代码
💻 ASP
字号:
<%@LANGUAGE="VBSCRIPT"%> 
<!--#include file="conn.asp"--> 
<%
 
set rs=server.createobject("adodb.recordset")

sql="select * from puser where id = "&request("id")
rs.open sql,conn,1,1 
fdat=(rs.Fields.Item("data").Value)
Num1=Cstr(year(fdat))
Num2=Cstr(month(fdat))
Num3= Cstr(day(fdat))
%> 
<html>
<head>
<title>房源详细信息</title>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<style type="text/css">
<!--
body {
	background-color: #FFFFFF;
}
-->
</style></head>
<SCRIPT language=JavaScript1.2> 
var bookmarkurl=<% =url %>
var bookmarktitle=<% =name %>
function addbookmark(){
if (document.all)
window.external.AddFavorite(bookmarkurl,bookmarktitle)
} 
</SCRIPT>
<LINK 
href="images/css.css" type=text/css rel=stylesheet>
<META content="MSHTML 6.00.2800.1106" name=GENERATOR></HEAD>
<BODY text=#000000 leftMargin=0 topMargin=0>
<TABLE cellSpacing=0 cellPadding=0 width=300 align=center border=0>
  <TBODY>
    <TR> 
      <TD height="20" bgColor=#ffb600><font color="#FFFFFF"> &nbsp;&nbsp;</font>会员详细信息</TD>
    </TR>
    <TR>
      <TD bgColor=#ffb600><img src="images/5x5.gif" width="5" height="5"></TD>
    </TR>
    <TR> 
      <TD bgColor=#ffffff height=5></TD>
    </TR>
  </TBODY>
</TABLE>
<TABLE cellSpacing=1 borderColorDark=#ffffff cellPadding=0 width=300 
align=center bgColor=#bcbe78 border=0>
  <TBODY>
    
    
    <TR bgColor=#ffffff> 
      <TD align=right width=80 height=18>会员账号:</TD>
      <TD height=18><font color="#FF0000"><%=(rs.Fields.Item("uid").Value)%></font></TD>
    </TR>
    <TR bgColor=#ffffff> 
      <TD align=right width=80 height=18>会员昵称:</TD>
      <TD height=18><%=(rs.Fields.Item("uname").Value)%></TD>
    </TR>
    <TR bgColor=#ffffff> 
      <TD align=right width=80 height=18>性别:</TD>
      <TD height=18><%=(rs.Fields.Item("xb").Value)%></TD>
    </TR>
	<TR bgColor=#ffffff> 
      <TD align=right width=80 height=18>身份证号码:</TD>
      <TD height=18><%=(rs.Fields.Item("sfz").Value)%></TD>
    </TR>
    
	
    <TR bgColor=#ffffff> 
      <TD align=right width=80 height=18>email:</TD>
      <TD height=18><font size="2"><%=(rs.Fields.Item("email").Value)%></font></TD>
    </TR>
    <TR bgColor=#ffffff> 
      <TD align=right width=80 height=18>注册时间:</TD>
      <TD height=18><font size="2"> 
        <% =Num1 %>
        <font color="#000000">年</font> 
        <% =Num2 %>
        <font color="#000000">月</font> 
        <% =Num3 %>
        <font color="#000000">日</font> </TD>
    </TR>
    
    <TR bgColor=#ffffff> 
      <TD align=right width=80 height=18>联系电话:</TD>
      <TD height=18><font color="#FF0000"><%=(rs.Fields.Item("tel").Value)%></font></TD>
    </TR>
    <TR bgColor=#ffffff> 
      <TD align=right width=80 height=18>E_mail:</TD>
      <TD height=18><font color="#FF0000"><%=(rs.Fields.Item("email").Value)%></font></TD>
    </TR>
    
	<tr bgcolor=#ffffff>
  <TD align=middle colSpan=2 height=18>[<A 
      href="javascript:window.close();">关闭窗口</A>]</TD>
    </TR>
  </TBODY>
  <% 
		rs.close
		set rs=nothing
		 %>
</TABLE>
<TABLE cellSpacing=0 cellPadding=0 width=300 align=center border=0>
  <TBODY>
  
  <TR >
      <TD align=middle height=20><FONT 
      face="Arial, Helvetica, sans-serif">E_mail:<A 
      href="mailto:webmaster@etaodu.com">xx@xxxx.com</A></FONT></TD>
</TR></TBODY></TABLE></BODY></HTML>

⌨️ 快捷键说明

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