home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
66.142.0.142
/
66.142.0.142.tar
/
66.142.0.142
/
tblTypesdelete.aspx
< prev
next >
Wrap
Text File
|
2010-08-24
|
3KB
|
94 lines
<%@ Page Language="VB" MasterPageFile="masterpage.master" AutoEventWireup="false" CodeFile="tblTypesdelete.aspx.vb" Inherits="tblTypesdelete" CodeFileBaseClass="AspNetMaker7_tfpssnet" %>
<asp:Content ID="Content" ContentPlaceHolderID="Content" runat="server">
<script type="text/javascript">
<!--
// Create page object
var tblTypes_delete = new ew_Page("tblTypes_delete");
// page properties
tblTypes_delete.PageID = "delete"; // page ID
var EW_PAGE_ID = tblTypes_delete.PageID; // for backward compatibility
<% If EW_CLIENT_VALIDATE Then %>
tblTypes_delete.ValidateRequired = true; // uses JavaScript validation
<% Else %>
tblTypes_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 = tblTypes_delete.LoadRecordset()
If tblTypes_delete.lTotalRecs <= 0 Then ' No record found, exit
Rs.Close()
Rs.Dispose()
tblTypes_delete.Page_Terminate("tblTypeslist.aspx") ' Return to list
End If
%>
<p><span class="aspnetmaker">Delete From TABLE: Types<br /><br />
<a href="<%= tblTypes.ReturnUrl %>">Go Back</a></span></p>
<% tblTypes_delete.ShowMessage() %>
<form method="post">
<p />
<input type="hidden" name="t" id="t" value="tblTypes" />
<input type="hidden" name="a_delete" id="a_delete" value="D" />
<% For i As Integer = 0 to tblTypes_delete.arRecKeys.GetUpperBound(0) %>
<input type="hidden" name="key_m" id="key_m" value="<%= Server.HtmlEncode(Convert.ToString(tblTypes_delete.arRecKeys(i))) %>" />
<% Next %>
<table class="ewGrid"><tr><td class="ewGridContent">
<div class="ewGridMiddlePanel">
<table cellspacing="0" class="ewTable ewTableSeparate">
<%= tblTypes.TableCustomInnerHTML %>
<thead>
<tr class="ewTableHeader">
<td valign="top">Description</td>
</tr>
</thead>
<tbody>
<%
tblTypes_delete.lRecCnt = 0
Do While Rs.Read()
tblTypes_delete.lRecCnt = tblTypes_delete.lRecCnt + 1
' Set row properties
tblTypes.CssClass = ""
tblTypes.CssStyle = ""
tblTypes.RowType = EW_ROWTYPE_VIEW ' view
' Get the field contents
tblTypes_delete.LoadRowValues(Rs)
' Render row
tblTypes_delete.RenderRow()
%>
<tr<%= tblTypes.RowAttributes %>>
<td<%= tblTypes.typDescription.CellAttributes %>>
<div<%= tblTypes.typDescription.ViewAttributes %>><%= tblTypes.typDescription.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>