<%
If validateID(aID) = True AND Session("adminLoggedIn") = True Then
If Request.QueryString("step") = "2" AND Session("adminLoggedIn") = True Then
Set rsArticleLock = Server.CreateObject("ADODB.RecordSet")
adoCon.Open cString
lockSQL="UPDATE tbl_KbIndex SET articleIndexed='No' WHERE ID=" & aID
adoCon.Execute(lockSQL)
adoCon.Close
'rsDeleteArticle.Close
'Set rsDeleteArticle = Nothing
Response.Redirect("search.asp?mode=" & pageMode& "&searchQ=" & searchQ)
ElseIf validateID(aID) = True AND Session("adminLoggedIn") = True Then
%>
<%=pageTitle%> - Knowledge Base Search - Confirm Lock Article
<% Server.Execute("inc_style.asp") %>
<% Server.Execute("inc_header.asp") %>
Are you SURE you want to lock this KB Article? Doing so will mean that
users cannot search for this file.
Yes,
lock this article.
No, return me to the main page.
<% Server.Execute("inc_footer.asp") %>
<% ElseIf validateID(aID) = False Then %>
<%=pageTitle%> - Knowledge Base Search - Lock an article: Error
<% Server.Execute("inc_style.asp") %>
<% Server.Execute("inc_header.asp") %>
Sorry, the article ID (aID) you entered is not valid! Please go back and try again.
<% Server.Execute("inc_footer.asp") %>
<%
Else
%>
<%=pageTitle%> - Knowledge Base Search - Lock an article: Error
<% Server.Execute("inc_style.asp") %>
<% Server.Execute("inc_header.asp") %>
Sorry, you are not authorized to access this page. You may go back and search the Knowledge Base.
<% Server.Execute("inc_footer.asp") %>
<%
End If
%>
<% Else %>
<%=pageTitle%> - Knowledge Base Search - Lock an article: Error
<% Server.Execute("inc_style.asp") %>
<% Server.Execute("inc_header.asp") %>
Sorry, you are not authorized to access this page. You may go back and search the Knowledge Base.
<% Server.Execute("inc_footer.asp") %>
<% End If %>