<%@ Language=VBScript %>
<% Updated = Request.QueryString("Updated") %>
<% PageTitle = "SiteManager - Delete Inquiry" %>
<% PageID=1302 %>
<% Header %>
<% Menu PageID %>
<%' Main body of page goes here ^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^ %>
<%InquiryDeleteConfirm%>
<%' End Of Main body ^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^ %>
<% Footer %>
<% Sub InquiryDeleteConfirm%>
<%= FormatDateTime(Date,1) %>
<%
RequestID = Request.QueryString("RID")
SEL="SELECT txtName FROM Requests WHERE RequestID =" & RequestID
Set rs=Server.CreateObject("ADODB.Recordset")
OpenConnection1
rs.Open SEL,DB,1,3
txtName=rs("txtName")
rs.Close
%>
Are you sure you want to permanently remove
<%=txtName%>
from the Inquiry Archive?
YES
NO
<%End Sub %>