<%
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='Yes' 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 Unlock Article
<% Server.Execute("inc_style.asp") %>
<% Server.Execute("inc_header.asp") %>
Are you SURE you want to unlock this KB Article? Doing so will mean that
all users may search for this file.
Yes,
unlock this article.
No, return me to the main page.
<% Server.Execute("inc_footer.asp") %>
<% ElseIf validateID(aID) = False Then %>
<%=pageTitle%> - Knowledge Base Search - Unlock 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 - Unlock 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 - Unlock 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 %>