书格www.shuge.org
Read more
C# 自定义对话框_笔记
新建一个项目，添加Form2。 设置如下属性： this.ControlBox = false; this.FormBorderStyle = System.Windows.Forms.FormBorderStyle.FixedDialog; this.MaximizeBox = false; this.MinimizeBox =
Read more
iFIX 获取用户名和组名
获取用户名和组名的方法（调度的后台执行） 调度程序设置为后台执行，并且设定好刷新时间为1秒 Private Sub FixTimer3_OnTimeOut(ByVal lTimerId As Long) On Error GoTo errdata Dim sUserID As String Dim sUserName As
Read more
iFIX frm界面访问grf界面中的变量和对象
grf界面中可以定义公共变量，添加的控件也是公有属性，所以frm界面中都可以访问。 grf界面定义如下 frm界面定义如下 执行结果 徐大军
iFIX SQLServer数据库读写
‘数据库链接字符串 Const CONSTR = “Provider=SQLOLEDB.1;Integrated Security=SSPI;Persist Security Info=False;Initial Catalog=ceshiku;Data Source=WIN-M2JO4N9DQ4O” Dim Conn As ADODB.Connection Dim Rs As ADODB.Recordset Dim SQL As
Read more
iFIX时间获取，精确到毫秒
‘获取系统的精确时间，精确到毫秒 Private Function Msecond() As String ‘Get system time Dim t As Double Dim h, m, s As Integer Dim ss As String t = Timer h = Int(t / 3600) m = Int((t – 3600 * h) / 60) s = Int(t
Read more
退出iFIX系统代码
Private Sub Btn_Exit_Click() If MsgBox(“Want to exit the application? “, vbExclamation + vbYesNo, “Quit system”) = vbYes Then Dim hw As Long, cnt As Long hw = FindWindow(“iFix Startup”, vbNullString) If hw = 0
Read more
iFIX访问其它页面的控件？
示例在调度的脚本中访问画面上的对象的属性，访问时应保证被访问画面处于打开状态 Private Sub FixTimer3_OnTimeOut(ByVal lTimerId As Long) Dim WrkSpcApp As Object Set WrkSpcApp = GetObject(“”,
Read more
使用Excel获取Historian中的数据
有时候我们想看一下Historian中的数据，可以用Excel直接查看 暂时使用英文版的Excel吧，电脑中没有中文版的，不过系统是多语言的，现在设置成中文了，过程中会出现中文画面。 首先打开Excel软件 DATA菜单àFrom Other SourcesàFrom
Read more