asp數據庫查詢代碼

 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