度量快速开发平台中集成登录CS程序的思路设想

 大家知道，度量快速开发平台中，集成登录其他BS系统，是已经提供好了集成接口。可以参考“度量第三方Web系统集成登录实现“这一篇文章。如果使用单位还想集成登录现有单位的客户端程序，该怎么办呢？度量快速开发平台中，提供了一个打开本地文件的方法：

使用示例：

OpenFile("C:\Windows\notepad.exe")
如果要集成进来的第三方CS程序，安装的目录都在同一个位置，直接把OpenFile里面的文件路径换成确定的即可。总所周知，客户端文件有个很大的特点，即各个电脑安装的客户端文件可能在不同的目录。比如QQ程序，我可以在我的机器上安装到C 盘，其他人可能安装到D盘，E盘等。所以OpenFile里面的路径，不同的人打开，那就需要设置每个电脑上自己安装程序的位置，也就是每个人在度量快速开发平台中，点击了这个”打开XX程序“时候，调用了OpenFIle这个方法，都需要打开的不同。
因此，我们可能需要建立一张电脑对应程序地址表。例如：

计算机名

  

程序地址

DELIT.CN01

C:\Program Files\qq\Bin\QQ.exe

DELIT.CN02

D:\Program Files\qq\Bin\QQ.exe

DELIT.CN03

C:\Tencent\QQ.exe

DELIT.CN04

E:\Program Files\qq\Bin\QQ.exe

那么，我们可以通过使用人是那一台电脑，就能打开哪一个地址下的文件。

dim computer_name = System.Environment.MachineName
dim program_path=executescalar("select program_path from table where computer_name='"+computer_name+"'")
if program_path<>"" then
    OpenFile(program_path)
end if

那如何向被集成的CS程序传递需要的数据过去呢？
可以直接在路径后面跟上指定的参数。
  比如：
  OpenFile("D:\Program Files\qq\Bin\QQ.exe  参数1 参数2 参数3 ")

当然，如果真要集成其他客户端程序，还不用登陆，直接进入到对方的系统中。还需要度量开发平台的登录用户名与被集成系统有一个账号对应关系，通过度量快速开发平台打开的被集成程序，自动传递登录的相关信息过去，被集成程序需要根据传递过去的信息，做相应的处理才行。

原文地址:http://plat.delit.cn/thread-185-1-1.html

转载请注明出处;

撰写人:度量科技http://www.delit.cn