导读：call per.getPermition(news,0) Dim title,sql,rs title = Lib.safeRequest(/,0) sql = select Id From [ cfg.TablePrefix news] where title = \ title ' rs = dbo.Query(sql) If isEmpty(rs) Or isNull(rs) Then Response.Write(0) Else Response.Write(1)...
call per.getPermition("news",0)
Dim title,sql,rs
title = Lib.safeRequest("/",0)
sql = "select Id From [" & cfg.TablePrefix & "news] where title = "\" & title & "'"
rs = dbo.Query(sql)
If isEmpty(rs) Or isNull(rs) Then
Response.Write(0)
Else
Response.Write(1)
End If
Set Lib = Nothing : Set Dbo = Nothing
