LotusScript获得在线用户

转载 2007年09月17日 14:07:00

作者:xqdak

原帖地址:http://blog.csdn.net/xqdak/archive/2006/02/23/606730.aspx

利用notessession的SendConsoleCommand方法向服务器控制台发送“show inetusers”命令,并返回一个结果(字符窜),用户与用户之间是回车换行符分隔,用户的相关信息用Chr(9)字符窜分隔。把返回得到的字符窜再根据这一规则,即可取得所要的内容。

 Set session = New NotesSession
 Set cdb = session.CurrentDatabase  
commandStr$="show inetusers"
 onlineUsers$ = session.SendConsoleCommand(cdb.Server,commandStr$)
 onlineUsersArray = Split(onlineUsers$,Chr(13)&Chr(10))
 usersStr = ""
 For i =0 To Ubound(onlineUsersArray)
      If onlineUsersArray(i) <> "" Then
           If usersStr = "" Then
                  usersStr = Lcase(Strleft(onlineUsersArray(i),Chr(9)))
           Else
                  usersStr = usersStr & ";" & Lcase(Strleft(onlineUsersArray(i),Chr(9)))
           End If
       End If
 Next

 

Django 获得在线用户

参考:stackoverflow from django.contrib.auth.models import User from django.contrib.sessions.model...
  • lrz4119
  • lrz4119
  • 2015年01月13日 14:19
  • 290

33. 面向对象的LotusScript(六)之为自定义对象模拟事件

(这是一篇我几年前发表在IBM developerWorks上的文章,在此转帖,构成面向对象的LotusScript的系列文章之一篇,并为后续的讨论做准备。) 前言 事件是面向对象语言普遍支持和使用的...
  • starrow
  • starrow
  • 2013年07月02日 11:39
  • 7600

LotusScript 调用WSDL 并解析Json字符串

Use "OffApiConSumer_LS" Use "com.lslib" Use "ls.snapps.JSONReader" Use "ls.snapps.JSONArray" Sub Ini...
  • dl6045
  • dl6045
  • 2017年07月07日 10:16
  • 191

37. 面向对象的LotusScript(九)之导出Excel(一)

上一篇文章说到在LotusScript编写类时采用继承有两类情况,接下来的几篇文章介绍的就是其中的一种:为了重用代码。将Notes数据导出到Excel就是展现这类继承的一个很好场合。 微软的Excel...
  • starrow
  • starrow
  • 2013年07月07日 16:47
  • 3951

35. 面向对象的LotusScript(七)之导入Excel

Microsoft Office是应用最广泛的办公软件,绝大多数公司的必备软件。其中的Excel操作直观方便,很多公司都有大量数据以Excel文件的格式保存。一个LotusNotes应用在很多情况下都...
  • starrow
  • starrow
  • 2013年07月04日 22:43
  • 4266

java web 监听系统在线用户人数(tomcat session的创建时机)

spring mvc架构,tomcat运行的web项目,需要统计系统在线用户人数。在网上找的资料,很多都是使用HttpSessionListener监听session的创建和销毁来实现,session...
  • u010295735
  • u010295735
  • 2017年08月21日 10:56
  • 185

LotusScript 一段对字符串前后做修改的程序

出于一个数据库的需要,写了一段程序用来处理不同条件下字符串的组合和修改,使用中觉得还算灵活,当然由此想到一些新的需求可以丰富这个程序功能。如下,有兴趣的可以提建议。灵感来自于正则表达式Function...
  • shulia
  • shulia
  • 2008年05月13日 13:11
  • 515

获取当前系统的在线用户数

目前大部分系统都会显示当前系统的在线用户信息,本人做了一个拦截器实现 1、定义拦截器 拦截 session失效 2、用户登录把用户信息保存在内存(map《sessionID,user》) 1...
  • lixhongwu
  • lixhongwu
  • 2015年08月13日 14:38
  • 782

LotusScript基本语法知识……变量和数据类型

1.声明变量    Dim Variablename as type    dim是dimension的缩写,为变量的值在内存中创建一个空间。    Variablename 是变量的名称,一个变量的...
  • zoika
  • zoika
  • 2009年06月19日 09:03
  • 1857

如何在 LotusScript 中处理组

本文来自IBM developerWorks 中国网站http://www-900.ibm.com/developerworks/cn/lotus/ls-groups/index.shtml级别: 中...
  • cutebab0888
  • cutebab0888
  • 2005年04月07日 09:52
  • 1037
内容举报
返回顶部
收藏助手
不良信息举报
您举报文章:LotusScript获得在线用户
举报原因:
原因补充:

(最多只允许输入30个字)