在LotusScript Agent中,如何获取当前服务器的名称？

在LotusScript Agent中，要获取当前服务器的名称，可以使用以下代码：

Dim session As NotesSession
Dim serverName As String

Set session = New NotesSession
serverName = session.GetEnvironmentString("ServerName", True)

MsgBox "当前服务器名称为：" & serverName

这段代码中，我们使用了NotesSession类的GetEnvironmentString方法来获取当前服务器的名称。该方法的第一个参数为"ServerName"，表示要获取的环境变量名称，第二个参数为True，表示要获取的是本地服务器的名称。最后，我们将获取到的服务器名称显示在消息框中。

需要注意的是，这段代码只能在LotusScript Agent中使用，不能在其他编程语言中使用。