index.aspx

来自「asp做的新闻系统」· ASPX 代码 · 共 65 行

ASPX
65 行
字号 
<%@ Page Language="vb" AutoEventWireup="false" Codebehind="index.aspx.vb" Inherits="guest.index" %>
<HTML>
	<HEAD>
		<title>留言本</title>
		<meta content="False" name="vs_showGrid">
		<META http-equiv="Content-Type" content="text/html; charset=gb2312">
	</HEAD>
	<body bgColor="#9898ba" MS_POSITIONING="GridLayout">
		<TABLE height="704" cellSpacing="0" cellPadding="0" width="764" border="0" ms_2d_layout="TRUE">
			<TR vAlign="top">
				<TD width="10" height="15"></TD>
				<TD width="754"></TD>
			</TR>
			<TR vAlign="top">
				<TD height="689"></TD>
				<TD>
					<center>
						<TABLE height="685" cellSpacing="0" cellPadding="0" width="554" border="0" ms_2d_layout="TRUE">
							<TR vAlign="top">
								<TD width="548" height="508">
									<form id="Form1" method="post" runat="server">
										<FONT face="宋体">
											<P><asp:imagebutton id="imbgtn" tabIndex="2" runat="server" Height="44px" Width="145px" ImageUrl="new.bmp"></asp:imagebutton><asp:button id="firstPage" runat="server" EnableViewState="False" Text="首页"></asp:button><asp:button id="PreviousPage" runat="server" EnableViewState="False" Text="上一页"></asp:button><asp:button id="NextPage" runat="server" EnableViewState="False" Text="下一页"></asp:button><asp:button id="lastPage" runat="server" EnableViewState="False" Text="尾页"></asp:button><asp:label id="Label1" runat="server">选择分页：</asp:label><asp:dropdownlist id="dlPage" runat="server" AutoPostBack="True"></asp:dropdownlist></P>
											<P><asp:repeater id="repView" runat="server" EnableViewState="False">
													<ItemTemplate>
														<asp:Table Runat="server" ID="tblShow" style="WORD-BREAK: break-all" BorderStyle="Outset" GridLines="Both" CellPadding="10" CellSpacing="0" BorderWidth="1" BorderColor="Black" Width="751" Font-Size="10">
															<asp:TableRow>
																<asp:TableCell RowSpan="3" Font-Bold="true" HorizontalAlign="Center" VerticalAlign="Middle" BackColor="LightGrey" Width="25%">
																	<%#	"<img src=./img/" & databinder.Eval(Container,"dataitem(8)") & ".gif></img>" %>
																	<br>
																	<br>
																	<%#IIf( databinder.Eval(Container,"dataitem(0)") = "", "匆匆过客",databinder.Eval(Container,"dataitem(0)"))%>
																	<br>
																	<%# "来自-" & IIf(databinder.Eval(Container,"dataitem(1)") = "", "保密", databinder.Eval(Container,"dataitem(1)")) %>
																</asp:TableCell>
																<asp:TableCell BackColor="WhiteSmoke">
																	<%#	"<img src=oicq.gif>" & databinder.Eval(Container,"dataitem(2)") &"</img>" %>
																	<%#	"<img src=email.gif>" & databinder.Eval(Container,"dataitem(3)") &"</img>" %>
																	<%#	"<img src=http.gif>" & databinder.Eval(Container,"dataitem(4)") &"</img>" %>
																</asp:TableCell>
															</asp:TableRow>
															<asp:TableRow>
																<asp:TableCell style="WORD-WRAP: break-word" BackColor="WhiteSmoke">
																	<%#databinder.Eval(Container,"dataitem(5)")%>
																</asp:TableCell>
															</asp:TableRow>
															<asp:TableRow>
																<asp:TableCell HorizontalAlign="Right" BackColor="LightGrey"><img src="ip.gif"><%#getip(databinder.Eval(Container,"dataitem(7)"))%>&nbsp;&nbsp;&nbsp;&nbsp;留言时间:<%#databinder.Eval(Container,"dataitem(6)")%>&nbsp;</asp:TableCell>
															</asp:TableRow>
														</asp:Table>
													</ItemTemplate>
												</asp:repeater></P>
											<P><asp:label id="lblPageIndex" runat="server" Visible="False"></asp:label><asp:label id="lblRecordCount" runat="server" Width="129px" Visible="False">lblRecordCount</asp:label></P>
										</FONT>
									</form>
								</TD>
							</TR>
						</TABLE>
					</center>
				</TD>
			</TR>
		</TABLE>
	</body>
</HTML>

index.aspx - 源码说明

本页面展示了「asp做的新闻系统」中的 index.aspx 源码文件，采用 ASPX 编程语言编写，共 65 行代码。您可以在线阅读完整代码内容，也可以返回资源详情页下载完整源码包进行本地学习和开发。

虫虫下载站收录了大量与asp相关的技术资源，包括源代码、技术文档、电路图等，是电子工程师和嵌入式开发者的专业学习平台。

⌨️ 快捷键说明

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