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

📄 see_user.asp

📁 新手第一次做系统
💻 ASP
字号:
<!-- #include file="conn.asp" -->
<body bgcolor="">
<style>
	table tr{text-align:center}
</style>
<TABLE border="1" bordercolor="#0000000">
<TR>
	<TD width="80" height="35">用户编号</TD>
	<TD width="160">用户名</TD>
	<TD width="200">用户单位</TD>
	<TD width="200">借书数量</TD>
	<TD width="150">备注</TD>
</TR>
<%
	Dim str,State,temp
	str="select * from [User]"
	Set rec=conn.execute(str)
	Do While Not rec.eof
		If rec(3)<>0 Then 
			temp=rec(3) & "本"
		Else
			temp="<FONT COLOR=""#FF0066"">没有借书</FONT>"
		End If 

		If rec(4)<>"" Then 
			State=rec(4)
		else
			State="<FONT COLOR=""#FF0066"">暂时无备注</FONT>"
		End If
%>
<TR>
	<TD height="35"><%=rec(0)%></TD>
	<TD><%=rec(1)%></TD>
	<TD><%=rec(2)%></TD>
	<TD><%=temp%></TD>
	<TD><%=State%></TD>
	
</TR>
<%
	rec.movenext
	Loop
%>
</TABLE>
</body>

⌨️ 快捷键说明

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