call pergetPermition("news")
Dim titlesqlrs
title = LibsafeRequest("/")
sql = "select Id From [" & cfgTablePrefix & "news] where title = " & title & ""
rs = dboQuery(sql)
If isEmpty(rs) Or isNull(rs) Then
ResponseWrite()
Else
ResponseWrite()
End If
Set Lib = Nothing : Set Dbo = Nothing