Your title should be at least 5 characters.

Your message should be at least 5 characters.

Your message has been inserted in the database. url was [url]?id=&t=.html[/url]

Create post

Title:

" />

Post Category:

" />

Message

Access denied

Sorry, but you aren't allowed to post a message .
"" then
blnChosen = true
if cint(request.Form("postid")) = -1 then blnChosen = false
set oConn = server.CreateObject("ADODB.CONNECTION")
oConn.Open(connstr)
if request.Form("oktodelete") = "on" then
oConn.Execute("DELETE FROM MESSAGES WHERE Id=" & cint(request.Form("postid")))
end if
set oRS = oConn.execute("SELECT * FROM MESSAGES WHERE Id=" & cint(request.Form("postid")))
if oRS.EOF then
contents = "The post has been deleted.Delete another one"
else
contents = oRS.Fields("Contents")
end if
oConn.Close()
end if
%>

Delete a post.

Post title:

" />Post id:

Post contents:

Check this check box if you're sure:

Access denied

Sorry, but you aren't allowed to delete a post.

Post editted.

"" then
blnChosen = true
set oRS = oConn.Execute("SELECT * FROM MESSAGES WHERE Id=" & cint(request.Form("postid")))
if oRS.EOF then
if cint(request.Form("postid")) = -1 then blnChosen = false
contents = "The message could not be retrieved, because I couldn't find it..."
strTitle = "Not found"
else
contents = oRS.Fields("Contents")
strTitle = oRS.Fields("Title")
strCategory = oRS.Fields("Category")
end if
end if
oConn.Close()
%>