发表于:2007-03-06 13:57:00
楼主
在IFIX中如何显示用户信息
在FIX32产品中,FIX内含一系列系统变量,存储当前系统信息,包括当前用户的注册信息,如#GS_LOGIN.NAME。在IFIX中可通过VBA代码,实现显示或获得用户的注册信息。代码如下:
Dim sUserID As String
Dim sUserName As String
Dim sGroupName As String
System.FixGetUserInfo sUserID, sUserName, sGroupName
Text1.Caption = sUserName
可以得到用户ID 用户名 用户组名
怎样使用按钮进行用户登录?
提示: 使用iFIX 的LOGIN 程序
在画面中插入一个按钮,按钮后加入如下VBA命令:
Dim strPath As String
strPath = System.BasePath
'此 shell 函数将运行可执行文件Login.exe
Shell strPath & "\Login.exe -m", 1
Private Sub CFixPicture_Initialize()
ComboBox1.Text = "cao"
TextBox1.Text = "123"
User.Username.CurrentValue = ComboBox1.Text
User.Userpas.CurrentValue = TextBox1.Text
End Sub
Private Sub CommandButton1_Click()
Dim cao As String
Dim pas As String
cao = User.Username.CurrentValue
pas = User.Userpas.CurrentValue
System.FixLogin cao, pas
MsgBox "登陆成功"
End Sub
顺便处理一个IFIX3.5的并口狗,以前做工程留下的,便宜处理的 有要的可以留下联系方式啊 MSN QQ都可以