如何以编程方式拒绝 4d v17 上的新连接?

how to programmatically reject new connections on 4d v17?

是否有类似于 WEB STOP SERVERSTOP SQL SERVER 的命令,但拒绝我的 4d 服务器上的新连接?

我发现通过使用 On Server Open Connection Database Method ,我可以通过 returning 一个不同于 0 的值来拒绝新连接,如在文档

If you do not return a value in [=11=], thereby leaving the variable undefined or initialized to zero, 4D Server assumes that the database method accepts the connection. If you do not accept the connection, you return a non-null value in [=11=].

所以我只是在我需要的条件下更改 return 值 $0

If(*some conditions*)
  [=10=]:1
End If