<%@ Language=VBScript %>
<% Updated = Request.QueryString("Updated") %>
<% PageTitle = "SiteManager - Archive Inquiry" %>
<% PageID=1301 %>
<% Header %>
<% Menu PageID %>
<%' Main body of page goes here ^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^ %>
<%InquiryMoveConfirm%>
<%' End Of Main body ^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^ %>
<% Footer %>
<% Sub InquiryMoveConfirm%>
<%= 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 move the inquiry from <%=txtName%> to the Inquiry Archive?
YES
NO
<%End Sub %>