% Session.LCID=1040 %> <% if Session("admin")<>"Yes" Then Response.redirect("index.asp") End If %>
Message Deletion | |||
<%
messageNo=Request.QueryString("MessageNo")
threadID=Request.QueryString("threadID")
If MessageNo=1 Then
MySql = "DELETE DistinctRow threads.threadID From threads Where threads.threadID =" & threadID & ";"
deltyp="thread"
Else
MySql = "DELETE DistinctRow messages.messageNo From messages Where (messages.threadID =" & threadID & ") And messages.MessageNo=" & messageNo & ";"
deltyp="message"
End If
my_Conn.Execute MySql
my_Conn.close
Set my_Conn = Nothing
%>
The requested <%=deltyp%> has been deleted.
|
|||
Copyright 2000. Ourline Forums |