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

📄 info.aspx

📁 ASP_NET程序设计教程 源代码 冶金工业出版社 肖金秀 冯沃辉 陈少涌
💻 ASPX
字号:
<% @ Import Namespace="Packaging" %>
<% @ Import Namespace="System.Data" %>
<% @ Import Namespace="System.Globalization" %>
<html>

<head>
<meta http-equiv="Content-Language" content="zh-cn">
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<meta name="GENERATOR" content="Microsoft FrontPage 4.0">
<meta name="ProgId" content="FrontPage.Editor.Document">
<title>个人资料显示</title>
<style>
td {
	font-family : Verdana, Geneva, Arial, Helvetica, sans-serif;
	font-size : 10pt;
}
.td1 {
	color:white;
}
</style>
</head>

<body topmargin="0" leftmargin="1" bgcolor=#eaeaea>

<asp:Repeater id="myinfo" runat="server">
<ItemTemplate>
<table border="0" cellpadding="0" cellspacing="1" width="100%" height="90" bgcolor="#006699">
  <tr bgcolor="#99CC00"> 
    <td width="100%" colspan="4" height="43" align="center"> 
      <%#DataBinder.Eval(Container.DataItem, "UserAccount") %>
      的资料</td>
  </tr>
  <tr bgcolor="#CCFF99"> 
    <td width="19%" height="18" bgcolor="#CCFF99" align="center" class="td1"><font color="#000000">真名</font></td>
    <td width="31%" height="18">&nbsp; 
      <%#DataBinder.Eval(Container.DataItem, "UserName") %>
    </td>
    <td width="19%" height="18" align="center" class="td1"><font color="#000000">性别</font></td>
    <td width="31%" height="18" align="center"> 
      <%#ChkGender(Container.DataItem("UserGender") )%>
    </td>
  </tr>
  <tr bgcolor="#CCFF99"> 
    <td width="19%" height="18" bgcolor="#CCFF99" align="center" class="td1"><font color="#000000">生日</font></td>
    <td width="31%" height="18">&nbsp; 
      <%#ChkBirth(Container.DataItem("UserBirthday"))%>
    </td>
    <td width="19%" height="18" align="center" class="td1"><font color="#000000">QQ</font></td>
    <td width="31%" height="18" align="center">&nbsp; 
      <%#DataBinder.Eval(Container.DataItem, "UserQQ") %>
    </td>
  </tr>
  <tr bgcolor="#CCFF99"> 
    <td width="19%" height="18" bgcolor="#CCFF99" align="center" class="td1"><font color="#000000">Email</font></td>
    <td width="81%" height="18" colspan="3">&nbsp;<a href="mailto:<%#DataBinder.Eval(Container.DataItem, "UserEmail") %>"> 
      <%#DataBinder.Eval(Container.DataItem, "UserEmail") %>
      </a></td>
  </tr>
  <tr bgcolor="#CCFF99"> 
    <td width="19%" height="18" bgcolor="#CCFF99" align="center" class="td1"><font color="#000000">MSN</font></td>
    <td width="81%" height="18" colspan="3">&nbsp; 
      <%#DataBinder.Eval(Container.DataItem, "UserMSN") %>
    </td>
  </tr>
  <tr bgcolor="#CCFF99"> 
    <td width="19%" height="18" bgcolor="#CCFF99" align="center" class="td1"><font color="#000000">个人主页</font></td>
    <td width="81%" height="18" colspan="3">&nbsp;<a href="<%#DataBinder.Eval(Container.DataItem, "UserHomepage") %>" target="_blank"> 
      <%#DataBinder.Eval(Container.DataItem, "UserHomepage") %>
      </a></td>
  </tr>
  <tr bgcolor="#CCFF99"> 
    <td width="19%" height="18" bgcolor="#CCFF99" align="center" class="td1"><font color="#000000">个人简介</font></td>
    <td width="81%" height="18" colspan="3">&nbsp; 
      <%#DataBinder.Eval(Container.DataItem, "UserDesc") %>
    </td>
  </tr>
  <tr bgcolor="#CCFF99"> 
    <td width="19%" height="18" bgcolor="#CCFF99" align="center" class="td1"><font color="#000000">注册时间</font></td>
    <td width="81%" height="18" colspan="3">&nbsp; 
      <%#DataBinder.Eval(Container.DataItem, "UserRegTime") %>
    </td>
  </tr>
  <tr bgcolor="#CCFF99"> 
    <td width="19%" height="18" bgcolor="#CCFF99" align="center" class="td1"><font color="#000000">上次访问</font></td>
    <td width="81%" height="18" colspan="3">&nbsp; 
      <%#DataBinder.Eval(Container.DataItem, "UserLastAccess") %>
    </td>
  </tr>
  <tr bgcolor="#CCFF99"> 
    <td width="19%" height="18" bgcolor="#CCFF99" align="center" class="td1"><font color="#000000">在线状态</font></td>
    <td width="81%" height="18" colspan="3">&nbsp; 
      <%#ChkOnline(Container.DataItem("UserOnline")) %>
    </td>
  </tr>
  <tr bgcolor="#CCFF99"> 
    <td width="19%" height="18" bgcolor="#CCFF99" align="center" class="td1"><font color="#000000">活动状态</font></td>
    <td width="81%" height="18" colspan="3">&nbsp; 
      <%#ChkLocked(Container.DataItem("UserLocked")) %>
    </td>
  </tr>
  <tr bgcolor="#99CC00"> 
    <td width="100%" align="right" colspan="4"><a href="javascript:window.close()"><font color="#FFFFFF">关闭窗口</font></a></td>
  </tr>
</table>
</ItemTemplate>
</asp:Repeater>

</body>

</html>

<script language="VB" runat="server">

	Sub Page_Load(Sender As Object, e As EventArgs)
		Dim MyUser As UserDB=New UserDB()
		Dim account As String=Request("name")

		If account<>"" Then
			MyInfo.DataSource=MyUser.GetUserInfo(account)
			MyInfo.DataBind()
		Else
			MyInfo.Visible=False
		End If
	End Sub

	Function ChkGender(g As String) As String
		If g="女" Then
			Return("女生")
		Else
			Return("男生")
		End If
	End Function

	Function ChkBirth(b As Object) As String
		Try
			Dim bb As DateTime=CDate(b)
			Return(bb.ToString("yyyy-M-d",DateTimeFormatInfo.InvariantInfo))
		Catch
			Return(" ")
		End Try
	End Function

	Function ChkOnline(b As Boolean) As String
		If b Then
			Return("在线")
		Else
			Return("离线")
		End If
	End Function

	Function ChkLocked(b As Boolean) As String
		If Not b Then
			Return("活动")
		Else
			Return("<font color=red>锁定</font>")
		End If
	End Function

</script>

⌨️ 快捷键说明

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