📄 makedatabase.aspx

📁 用VB.NET在VS.NET 2003下开发的完整的设备管理系统,后台数据库为SQL SERVER 2000,解压缩后请先阅读"说明"文件来部署此系统.
💻 ASPX
字号:
<%@ Page CodeBehind="makedatabase.aspx.vb" Language="vb" AutoEventWireup="false" Inherits="junjun.makedatabase" %>
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN" "http://www.w3.org/TR/html4/loose.dtd">
<HTML>
	<HEAD>
		<title>数据维护页面</title>
		<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
		<meta content="http://schemas.microsoft.com/intellisense/ie5" name="vs_targetSchema">
		<style type="text/css">.style1 {
	FONT-WEIGHT: bold; FONT-SIZE: 14px; COLOR: #ffffff
}
.style2 {
	COLOR: #ffffff
}
.style6 {
	FONT-SIZE: 12px
}
		</style>
		<script>
		<!--
		function delete_equipment(sender,e)
		{
			e.IsValid = false;
			if (document.form1.VerdictDeleteButton.value == "alldelete")
			{
				if (confirm("这将删除本查询中打勾的设备,要这样做吗?"))
				{
					if (confirm("请再次确认一边!"))
					{
						e.IsValid = true;
					}
				}
				window.document.form1.VerdictDeleteButton.value = "";
			}
			else if(document.form1.VerdictDeleteButton.value == "allalldelete")
			{
				if (confirm("这将删除以前所有打勾的设备,要这样做吗?"))
				{
					if (confirm("请再次确认一边!"))
					{
						e.IsValid = true;
					}
				}
				window.document.form1.VerdictDeleteButton.value = "";
			}
			else if (document.form1.VerdictDeleteButton.value == "updata")
			{
				e.IsValid = true;
			}
			else
			{
				if (confirm("是否真要删除此设备?"))
				{
					e.IsValid = true;
				}
			}
		}
		function add_equipment()
		{
			if (confirm("是否添加设备？"))
			{
				var operwin = window.open("addDatabase.aspx");
				operwin.focus();
			}
		}
		function updata(value)
		{
			var answer = window.showModalDialog("updataCardTemp.aspx?card_id=" + value , value);
			if (answer == "修改记录成功！")
			{
				document.form1.tempUpdataResult.value = answer;				//记录结果
			}
			else
			{
				document.form1.tempUpdataResult.value = "修改记录未遂！";
			}
		}
		-->
		</script>
	</HEAD>
	<body leftMargin="0" topMargin="0">
		<form id="form1" runat="server">
			<table style="POSITION: absolute" cellSpacing="0" cellPadding="0" width="98.5%" align="left"
				border="0">
				<tr bgColor="#5a8ede">
					<td align="center" colSpan="6" height="10"><span class="style1">数据维护</span>
					</td>
				</tr>
				<tr>
					<td colSpan="3" height="10"><IMG onclick="add_equipment();" alt="设备添加" src="../images/add.gif"></td>
					<td align="left" colSpan="2"><strong><asp:label id="info" runat="server"></asp:label></strong></td>
					<td align="right" colSpan="1"><asp:linkbutton id="selectAll" runat="server" Text="本页全选" CausesValidation="False" Font-Size="12px"></asp:linkbutton>&nbsp;
						<asp:linkbutton id="notSelectAll" runat="server" Text="本页不选" CausesValidation="False" Font-Size="12px"></asp:linkbutton><input id="btnRemove" title="删除本查询打勾的项" onclick="document.form1.VerdictDeleteButton.value='alldelete';"
							type="submit" value="删除" runat="server"> <input id="btnRemoveAll" title="删除以前所有打勾的项" onclick="document.form1.VerdictDeleteButton.value='allalldelete';"
							type="submit" value="删除" runat="server"></td>
				</tr>
				<tr>
					<td colSpan="6"><asp:datagrid id="mydatagrid" runat="server" Font-Size="8pt" width="100%" AllowPaging="True" PagerStyle-Mode="NumericPages"
							PagerStyle-ForeColor="#9999CC" PagerStyle-Font-Name="times new roman" BorderColor="#5A8EDE" AutoGenerateColumns="False"
							OnPageindexChanged="ChangePage">
							<Columns>
								<asp:TemplateColumn HeaderText="选择">
									<HeaderStyle Font-Bold="True" HorizontalAlign="Center" Width="5%"></HeaderStyle>
									<ItemStyle HorizontalAlign="Center" Width="30px"></ItemStyle>
									<ItemTemplate>
										<asp:CheckBox id=check_card runat="server" OnCheckedChanged="checkedChanged" AutoPostBack="True" CssClass='<%# DataBinder.Eval(Container, "DataItem.card_id") %>'>
										</asp:CheckBox>
									</ItemTemplate>
								</asp:TemplateColumn>
								<asp:BoundColumn DataField="设备名称" HeaderText="设备名称">
									<HeaderStyle Font-Bold="True" HorizontalAlign="Center" Width="16%"></HeaderStyle>
									<ItemStyle HorizontalAlign="Center"></ItemStyle>
								</asp:BoundColumn>
								<asp:BoundColumn DataField="生产厂家" HeaderText="生产厂家">
									<HeaderStyle Font-Bold="True" HorizontalAlign="Center" Width="16%"></HeaderStyle>
									<ItemStyle HorizontalAlign="Center"></ItemStyle>
								</asp:BoundColumn>
								<asp:BoundColumn DataField="设备编号" HeaderText="设备编号">
									<HeaderStyle Font-Bold="True" HorizontalAlign="Center" Width="16%"></HeaderStyle>
									<ItemStyle HorizontalAlign="Center"></ItemStyle>
								</asp:BoundColumn>
								<asp:BoundColumn DataField="单价" HeaderText="单价" DataFormatString="{0:c}">
									<HeaderStyle Font-Bold="True" HorizontalAlign="Center" Width="16%"></HeaderStyle>
									<ItemStyle HorizontalAlign="Center"></ItemStyle>
								</asp:BoundColumn>
								<asp:BoundColumn DataField="存放地点" HeaderText="存放地点">
									<HeaderStyle Font-Bold="True" HorizontalAlign="Center" Width="16%"></HeaderStyle>
									<ItemStyle HorizontalAlign="Center"></ItemStyle>
								</asp:BoundColumn>
								<asp:TemplateColumn HeaderText="修改">
									<HeaderStyle Font-Bold="True" HorizontalAlign="Center" Width="5%"></HeaderStyle>
									<ItemStyle HorizontalAlign="Center"></ItemStyle>
									<ItemTemplate>
										<INPUT onclick="document.form1.VerdictDeleteButton.value='updata';updata(value);" type="image" src="../images/edit.gif" value='<%# DataBinder.Eval(Container, "DataItem.card_id") %>' >
									</ItemTemplate>
								</asp:TemplateColumn>
								<asp:TemplateColumn HeaderText="删除">
									<HeaderStyle Font-Bold="True" HorizontalAlign="Center" Width="5%"></HeaderStyle>
									<ItemStyle HorizontalAlign="Center"></ItemStyle>
									<ItemTemplate>
										<asp:LinkButton id=LinkButton1 runat="server" CausesValidation="true" Text="<img src='..\IMAGES\del.gif' border='0'>" OnCommand="singleDelete" CommandName="Delete" CommandArgument='<%# DataBinder.Eval(Container.DataItem, "card_id") %>'>
											<img src='..\IMAGES\del.gif' border='0'></asp:LinkButton>
									</ItemTemplate>
								</asp:TemplateColumn>
								<asp:HyperLinkColumn Text="&lt;img src='../images/filenew.gif' border='0'&gt;" Target="_blank" DataNavigateUrlField="card_id"
									DataNavigateUrlFormatString="../dataquery/query_result.aspx?card_id={0}" HeaderText="详细">
									<HeaderStyle Font-Bold="True" HorizontalAlign="Center" Width="5%"></HeaderStyle>
									<ItemStyle HorizontalAlign="Center"></ItemStyle>
								</asp:HyperLinkColumn>
							</Columns>
							<PagerStyle Font-Names="times new roman" ForeColor="#9999CC" Mode="NumericPages"></PagerStyle>
						</asp:datagrid></td>
				</tr>
				<tr>
					<td colSpan="6" height="8"></td>
				</tr>
				<tr bgColor="#5a8ede">
					<td align="center" width="10%"><span class="style2"><font size="2">查询条件</font></span>
					</td>
					<td align="center" width="15%"><asp:dropdownlist id="conditiondropdownlist" runat="server"></asp:dropdownlist></td>
					<td align="center" width="15%"><span class="style2"><font size="2">查询范围</font></span>
					</td>
					<td align="center" width="20%"><asp:textbox id="rangetextbox" runat="server"></asp:textbox></td>
					<td align="center" width="10%"><asp:button id="query_Button" onclick="querybuttton_click" runat="server" Text="查询" CausesValidation="False"></asp:button></td>
					<td align="right" width="30%"><asp:button id="Button1" runat="server" Text="全部设备" CausesValidation="False"></asp:button></td>
				</tr>
			</table>
			<asp:customvalidator id="CustomValidator1" runat="server" ErrorMessage="" ClientValidationFunction="delete_equipment"></asp:customvalidator><INPUT id="Condition" type="hidden" runat="server"><INPUT id="RangeString" type="hidden" runat="server">
			<INPUT id="VerdictDeleteButton" type="hidden" runat="server"><INPUT id="tempUpdataResult" type="hidden" runat="server"></form>
	</body>
</HTML>
💿 文件大小 1090 K
👤 上传用户 yingyingyingyin
📂 所属分类其他
🏷️ 相关标签

#NET #SERVER #2003 #2000
⌨️ 快捷键说明

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