主题：打开其它系统

以下是引用muhua在2012-9-27 10:27:00的发言：

明白了，需要增加个变量：

 

Public _UserPassword As String   

 

需要在登陆的时候设置    _UserPassword = e.Form.Controls("PassWord").Value

 

传递的时候使用的是：Syscmd.Project.Open(fl,_UserName,_UserPassword)

 

这样才有效。

 

 

呵呵，我就觉得奇怪了，怎么一直做都不行，原来是参数传递错了， 之前给你的只是个例子，你没把_UserRole 改为_UserPassword

 

密码传递不正确，当然出现登陆窗口了。

以下是引用muhua在2012-9-27 10:27:00的发言：

明白了，需要增加个变量：

 

Public _UserPassword As String   

 

需要在登陆的时候设置    _UserPassword = e.Form.Controls("PassWord").Value

 

传递的时候使用的是：Syscmd.Project.Open(fl,_UserName,_UserPassword)

 

这样才有效。

 

 

呵呵，我就觉得奇怪了，怎么一直做都不行，原来是参数传递错了， 之前给你的只是个例子，你没把_UserRole 改为_UserPassword

 

密码传递不正确，当然出现登陆窗口了。

以下是引用muhua在2012-9-27 14:45:00的发言：

下载信息  [文件大小：676.4 KB  下载次数：0]

点击浏览该文件:cableerp.zip

 

 

我测试过了，可行。

 

菜单里面的原材料仓，产成品仓，的路径和参数需要准确，产成品仓你没设置参数。

 

项目属性的AfterOpenProject也要增加一个参数的传递设置         _UserPassWord = dr("Password")

用户登陆的窗口也需要设置这个         _UserPassWord = dr("Password")