home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
66.142.0.142
/
66.142.0.142.tar
/
66.142.0.142
/
tblPartsdelete.aspx
< prev
next >
Wrap
Text File
|
2010-08-24
|
3KB
|
94 lines
<%@ Page Language="VB" MasterPageFile="masterpage.master" AutoEventWireup="false" CodeFile="tblPartsdelete.aspx.vb" Inherits="tblPartsdelete" CodeFileBaseClass="AspNetMaker7_tfpssnet" %>
<asp:Content ID="Content" ContentPlaceHolderID="Content" runat="server">
<script type="text/javascript">
<!--
// Create page object
var tblParts_delete = new ew_Page("tblParts_delete");
// page properties
tblParts_delete.PageID = "delete"; // page ID
var EW_PAGE_ID = tblParts_delete.PageID; // for backward compatibility
<% If EW_CLIENT_VALIDATE Then %>
tblParts_delete.ValidateRequired = true; // uses JavaScript validation
<% Else %>
tblParts_delete.ValidateRequired = false; // no JavaScript validation
<% End If %>
//-->
</script>
<script language="JavaScript" type="text/javascript">
<!--
// Write your client script here, no need to add script tags.
// To include another .js script, use:
// ew_ClientScriptInclude("my_javascript.js");
//-->
</script>
<%
' Load records for display
Rs = tblParts_delete.LoadRecordset()
If tblParts_delete.lTotalRecs <= 0 Then ' No record found, exit
Rs.Close()
Rs.Dispose()
tblParts_delete.Page_Terminate("tblPartslist.aspx") ' Return to list
End If
%>
<p><span class="aspnetmaker">Delete From TABLE: Parts<br /><br />
<a href="<%= tblParts.ReturnUrl %>">Go Back</a></span></p>
<% tblParts_delete.ShowMessage() %>
<form method="post">
<p />
<input type="hidden" name="t" id="t" value="tblParts" />
<input type="hidden" name="a_delete" id="a_delete" value="D" />
<% For i As Integer = 0 to tblParts_delete.arRecKeys.GetUpperBound(0) %>
<input type="hidden" name="key_m" id="key_m" value="<%= Server.HtmlEncode(Convert.ToString(tblParts_delete.arRecKeys(i))) %>" />
<% Next %>
<table class="ewGrid"><tr><td class="ewGridContent">
<div class="ewGridMiddlePanel">
<table cellspacing="0" class="ewTable ewTableSeparate">
<%= tblParts.TableCustomInnerHTML %>
<thead>
<tr class="ewTableHeader">
<td valign="top">Description</td>
</tr>
</thead>
<tbody>
<%
tblParts_delete.lRecCnt = 0
Do While Rs.Read()
tblParts_delete.lRecCnt = tblParts_delete.lRecCnt + 1
' Set row properties
tblParts.CssClass = ""
tblParts.CssStyle = ""
tblParts.RowType = EW_ROWTYPE_VIEW ' view
' Get the field contents
tblParts_delete.LoadRowValues(Rs)
' Render row
tblParts_delete.RenderRow()
%>
<tr<%= tblParts.RowAttributes %>>
<td<%= tblParts.prtDescription.CellAttributes %>>
<div<%= tblParts.prtDescription.ViewAttributes %>><%= tblParts.prtDescription.ListViewValue %></div>
</td>
</tr>
<%
Loop
Rs.Close()
Rs.Dispose()
%>
</tbody>
</table>
</div>
</td></tr></table>
<p />
<input type="submit" name="Action" id="Action" value="Confirm Delete" />
</form>
<script language="JavaScript" type="text/javascript">
<!--
// Write your table-specific startup script here
// document.write("page loaded");
//-->
</script>
</asp:Content>