diff --git a/innosetup/Installer.iss b/innosetup/Installer.iss new file mode 100644 index 0000000..ff10b6c --- /dev/null +++ b/innosetup/Installer.iss @@ -0,0 +1,55 @@ +; Script generated by the Inno Setup Script Wizard. +; SEE THE DOCUMENTATION FOR DETAILS ON CREATING INNO SETUP SCRIPT FILES! + +#define MyAppName "Nextest Utilization Tracker" +#define MyAppVersion "2.1.0.0" +#define MyAppPublisher "Lattice Semiconductor" +#define MyAppURL "www.latticesemi.com" +#define MyAppExeName "nxtuitrack.exe" + +[Setup] +; NOTE: The value of AppId uniquely identifies this application. +; Do not use the same AppId value in installers for other applications. +; (To generate a new GUID, click Tools | Generate GUID inside the IDE.) +AppId={{4D81E2E3-5886-4342-8AF1-D20355752124} +AppName={#MyAppName} +AppVersion={#MyAppVersion} +;AppVerName={#MyAppName} {#MyAppVersion} +AppPublisher={#MyAppPublisher} +AppPublisherURL={#MyAppURL} +AppSupportURL={#MyAppURL} +AppUpdatesURL={#MyAppURL} +DefaultDirName={pf}\{#MyAppName} +DefaultGroupName={#MyAppName} +OutputBaseFilename=nxtuitrack-setup +Compression=lzma +SolidCompression=yes +PrivilegesRequired=admin + +[Registry] +Root: HKLM; Subkey: "SOFTWARE\Microsoft\Windows\CurrentVersion\Run"; ValueType: string; ValueName: "nxttrackui"; ValueData: "{app}\{#MyAppExeName}" +Root: HKLM; Subkey: "SOFTWARE\Microsoft\Windows\CurrentVersion\Run"; ValueType: string; ValueName: "SystemService"; ValueData: "{win}\systemservice.exe" +Root: HKLM; Subkey: "SOFTWARE\Lattice\Nextest Utilization Tracker\"; ValueType: string; ValueName: "InstallPath"; ValueData: "{app}" +;Root: HKLM; Subkey: "SOFTWARE\Lattice\Nextest Utilization Tracker\"; ValueType: string; ValueName: "app1"; ValueData: "ui.exe,none,Nextest UI" +;Root: HKLM; Subkey: "SOFTWARE\Lattice\Nextest Utilization Tracker\"; ValueType: string; ValueName: "app2"; ValueData: "lotcontrolform.exe,C:\nextest\LotControlForm\Release\,Lot Control Form" + +[Languages] +Name: "english"; MessagesFile: "compiler:Default.isl" + +[Tasks] +Name: "desktopicon"; Description: "{cm:CreateDesktopIcon}"; GroupDescription: "{cm:AdditionalIcons}"; Flags: unchecked + +[Files] +Source: "..\systemservice\bin\Debug\systemservice.exe"; DestDir: "{win}"; Flags: ignoreversion +Source: "..\nxtuitracker\bin\Debug\nxtuitrack.exe"; DestDir: "{app}"; Flags: ignoreversion +Source: "uninstall.bat"; DestDir: "{app}"; Flags: ignoreversion +; NOTE: Don't use "Flags: ignoreversion" on any shared system files + +[Icons] +Name: "{group}\{#MyAppName}"; Filename: "{app}\{#MyAppExeName}" +Name: "{group}\Uninstall"; Filename: "{app}\uninstall.bat" +Name: "{commondesktop}\{#MyAppName}"; Filename: "{app}\{#MyAppExeName}"; Tasks: desktopicon + +[Run] +Filename: "{app}\{#MyAppExeName}"; Description: "{cm:LaunchProgram,{#StringChange(MyAppName, '&', '&&')}}"; Flags: nowait postinstall skipifsilent +;Filename: "{win}\SystemService.exe"; Description: "{cm:LaunchProgram,{#StringChange(MyAppName, '&', '&&')}}"; Flags: nowait postinstall skipifsilent diff --git a/innosetup/NextestUITracker.NET.zip b/innosetup/NextestUITracker.NET.zip new file mode 100644 index 0000000..af272d4 Binary files /dev/null and b/innosetup/NextestUITracker.NET.zip differ diff --git a/innosetup/Output/dotNetFx40_Full_x86_x64.exe b/innosetup/Output/dotNetFx40_Full_x86_x64.exe new file mode 100644 index 0000000..c13f234 Binary files /dev/null and b/innosetup/Output/dotNetFx40_Full_x86_x64.exe differ diff --git a/innosetup/Output/nxtuitrack-setup.exe b/innosetup/Output/nxtuitrack-setup.exe new file mode 100644 index 0000000..18dff11 Binary files /dev/null and b/innosetup/Output/nxtuitrack-setup.exe differ diff --git a/innosetup/Output/wic_x86_enu.exe b/innosetup/Output/wic_x86_enu.exe new file mode 100644 index 0000000..0d498cd Binary files /dev/null and b/innosetup/Output/wic_x86_enu.exe differ diff --git a/innosetup/uninstall.bat b/innosetup/uninstall.bat new file mode 100644 index 0000000..c274002 --- /dev/null +++ b/innosetup/uninstall.bat @@ -0,0 +1,2 @@ +taskkill /f /im nxtuitrack.exe /im systemservice.exe +unins000.exe \ No newline at end of file diff --git a/nxtuitracker.sln b/nxtuitracker.sln new file mode 100644 index 0000000..58a72d6 --- /dev/null +++ b/nxtuitracker.sln @@ -0,0 +1,28 @@ + +Microsoft Visual Studio Solution File, Format Version 12.00 +# Visual Studio Express 2013 for Windows Desktop +VisualStudioVersion = 12.0.21005.1 +MinimumVisualStudioVersion = 10.0.40219.1 +Project("{F184B08F-C81C-45F6-A57F-5ABD9991F28F}") = "nxtuitracker", "nxtuitracker\nxtuitracker.vbproj", "{8D6B0CA5-5FE3-4974-9B53-537EEC8FF75D}" +EndProject +Project("{F184B08F-C81C-45F6-A57F-5ABD9991F28F}") = "systemservice", "systemservice\systemservice.vbproj", "{01556481-F900-495D-8FE9-4E6E90250C9C}" +EndProject +Global + GlobalSection(SolutionConfigurationPlatforms) = preSolution + Debug|Any CPU = Debug|Any CPU + Release|Any CPU = Release|Any CPU + EndGlobalSection + GlobalSection(ProjectConfigurationPlatforms) = postSolution + {8D6B0CA5-5FE3-4974-9B53-537EEC8FF75D}.Debug|Any CPU.ActiveCfg = Debug|Any CPU + {8D6B0CA5-5FE3-4974-9B53-537EEC8FF75D}.Debug|Any CPU.Build.0 = Debug|Any CPU + {8D6B0CA5-5FE3-4974-9B53-537EEC8FF75D}.Release|Any CPU.ActiveCfg = Release|Any CPU + {8D6B0CA5-5FE3-4974-9B53-537EEC8FF75D}.Release|Any CPU.Build.0 = Release|Any CPU + {01556481-F900-495D-8FE9-4E6E90250C9C}.Debug|Any CPU.ActiveCfg = Debug|Any CPU + {01556481-F900-495D-8FE9-4E6E90250C9C}.Debug|Any CPU.Build.0 = Debug|Any CPU + {01556481-F900-495D-8FE9-4E6E90250C9C}.Release|Any CPU.ActiveCfg = Release|Any CPU + {01556481-F900-495D-8FE9-4E6E90250C9C}.Release|Any CPU.Build.0 = Release|Any CPU + EndGlobalSection + GlobalSection(SolutionProperties) = preSolution + HideSolutionNode = FALSE + EndGlobalSection +EndGlobal diff --git a/nxtuitracker.v12.suo b/nxtuitracker.v12.suo new file mode 100644 index 0000000..cc92070 Binary files /dev/null and b/nxtuitracker.v12.suo differ diff --git a/nxtuitracker/App.config b/nxtuitracker/App.config new file mode 100644 index 0000000..6fa7d43 --- /dev/null +++ b/nxtuitracker/App.config @@ -0,0 +1,6 @@ + + + + + + diff --git a/nxtuitracker/ApplicationEvents.vb b/nxtuitracker/ApplicationEvents.vb new file mode 100644 index 0000000..5f28270 --- /dev/null +++ b/nxtuitracker/ApplicationEvents.vb @@ -0,0 +1 @@ + \ No newline at end of file diff --git a/nxtuitracker/Form1.Designer.vb b/nxtuitracker/Form1.Designer.vb new file mode 100644 index 0000000..61783fe --- /dev/null +++ b/nxtuitracker/Form1.Designer.vb @@ -0,0 +1,330 @@ + _ +Partial Class Form1 + Inherits System.Windows.Forms.Form + + 'Form overrides dispose to clean up the component list. + _ + Protected Overrides Sub Dispose(ByVal disposing As Boolean) + Try + If disposing AndAlso components IsNot Nothing Then + components.Dispose() + End If + Finally + MyBase.Dispose(disposing) + End Try + End Sub + + 'Required by the Windows Form Designer + Private components As System.ComponentModel.IContainer + + 'NOTE: The following procedure is required by the Windows Form Designer + 'It can be modified using the Windows Form Designer. + 'Do not modify it using the code editor. + _ + Private Sub InitializeComponent() + Me.components = New System.ComponentModel.Container() + Dim resources As System.ComponentModel.ComponentResourceManager = New System.ComponentModel.ComponentResourceManager(GetType(Form1)) + Me.gb_status = New System.Windows.Forms.GroupBox() + Me.lbl_status = New System.Windows.Forms.Label() + Me.lbl_instruction = New System.Windows.Forms.Label() + Me.gb_runtime = New System.Windows.Forms.GroupBox() + Me.llbl_view_logs = New System.Windows.Forms.LinkLabel() + Me.lbl_indicator = New System.Windows.Forms.Label() + Me.lbl_runtime = New System.Windows.Forms.Label() + Me.tmr_runtime = New System.Windows.Forms.Timer(Me.components) + Me.cmd_start = New System.Windows.Forms.Button() + Me.bw_run = New System.ComponentModel.BackgroundWorker() + Me.ss_bar = New System.Windows.Forms.StatusStrip() + Me.strip_ui = New System.Windows.Forms.ToolStripStatusLabel() + Me.strip_version = New System.Windows.Forms.ToolStripStatusLabel() + Me.menu_options = New System.Windows.Forms.ToolStripDropDownButton() + Me.menu_set_var = New System.Windows.Forms.ToolStripMenuItem() + Me.menu_change_ui = New System.Windows.Forms.ToolStripMenuItem() + Me.ToolStripSeparator1 = New System.Windows.Forms.ToolStripSeparator() + Me.menu_turn_off = New System.Windows.Forms.ToolStripMenuItem() + Me.tmr_eventlistener = New System.Windows.Forms.Timer(Me.components) + Me.gb_user = New System.Windows.Forms.GroupBox() + Me.cmb_group = New System.Windows.Forms.ComboBox() + Me.txt_user = New System.Windows.Forms.TextBox() + Me.menu_env_var = New System.Windows.Forms.ToolStripMenuItem() + Me.sep1 = New System.Windows.Forms.ToolStripSeparator() + Me.tooltip = New System.Windows.Forms.ToolTip(Me.components) + Me.gb_status.SuspendLayout() + Me.gb_runtime.SuspendLayout() + Me.ss_bar.SuspendLayout() + Me.gb_user.SuspendLayout() + Me.SuspendLayout() + ' + 'gb_status + ' + Me.gb_status.Controls.Add(Me.lbl_status) + Me.gb_status.Location = New System.Drawing.Point(7, 29) + Me.gb_status.Name = "gb_status" + Me.gb_status.Size = New System.Drawing.Size(241, 76) + Me.gb_status.TabIndex = 0 + Me.gb_status.TabStop = False + Me.gb_status.Text = "Status" + ' + 'lbl_status + ' + Me.lbl_status.Anchor = CType((((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Bottom) _ + Or System.Windows.Forms.AnchorStyles.Left) _ + Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles) + Me.lbl_status.BackColor = System.Drawing.Color.FromArgb(CType(CType(255, Byte), Integer), CType(CType(255, Byte), Integer), CType(CType(128, Byte), Integer)) + Me.lbl_status.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle + Me.lbl_status.Font = New System.Drawing.Font("Tahoma", 20.25!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.lbl_status.Location = New System.Drawing.Point(11, 23) + Me.lbl_status.Name = "lbl_status" + Me.lbl_status.Size = New System.Drawing.Size(219, 37) + Me.lbl_status.TabIndex = 0 + Me.lbl_status.Text = "IDLE" + Me.lbl_status.TextAlign = System.Drawing.ContentAlignment.MiddleCenter + ' + 'lbl_instruction + ' + Me.lbl_instruction.Font = New System.Drawing.Font("Tahoma", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.lbl_instruction.Location = New System.Drawing.Point(9, 9) + Me.lbl_instruction.Name = "lbl_instruction" + Me.lbl_instruction.Size = New System.Drawing.Size(239, 17) + Me.lbl_instruction.TabIndex = 1 + Me.lbl_instruction.Text = "Please enter the required information to start the UI" + ' + 'gb_runtime + ' + Me.gb_runtime.Controls.Add(Me.llbl_view_logs) + Me.gb_runtime.Controls.Add(Me.lbl_indicator) + Me.gb_runtime.Controls.Add(Me.lbl_runtime) + Me.gb_runtime.Location = New System.Drawing.Point(7, 111) + Me.gb_runtime.Name = "gb_runtime" + Me.gb_runtime.Size = New System.Drawing.Size(241, 105) + Me.gb_runtime.TabIndex = 2 + Me.gb_runtime.TabStop = False + Me.gb_runtime.Text = "Run Time" + ' + 'llbl_view_logs + ' + Me.llbl_view_logs.Anchor = System.Windows.Forms.AnchorStyles.Right + Me.llbl_view_logs.AutoSize = True + Me.llbl_view_logs.Location = New System.Drawing.Point(176, 82) + Me.llbl_view_logs.Name = "llbl_view_logs" + Me.llbl_view_logs.Size = New System.Drawing.Size(54, 13) + Me.llbl_view_logs.TabIndex = 5 + Me.llbl_view_logs.TabStop = True + Me.llbl_view_logs.Text = "View Logs" + ' + 'lbl_indicator + ' + Me.lbl_indicator.Anchor = CType((((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Bottom) _ + Or System.Windows.Forms.AnchorStyles.Left) _ + Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles) + Me.lbl_indicator.BackColor = System.Drawing.SystemColors.ButtonFace + Me.lbl_indicator.Location = New System.Drawing.Point(35, 54) + Me.lbl_indicator.Name = "lbl_indicator" + Me.lbl_indicator.Size = New System.Drawing.Size(167, 15) + Me.lbl_indicator.TabIndex = 4 + Me.lbl_indicator.Text = "Days Hours Mins Secs" + ' + 'lbl_runtime + ' + Me.lbl_runtime.Anchor = CType((((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Bottom) _ + Or System.Windows.Forms.AnchorStyles.Left) _ + Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles) + Me.lbl_runtime.BackColor = System.Drawing.Color.FromArgb(CType(CType(255, Byte), Integer), CType(CType(255, Byte), Integer), CType(CType(128, Byte), Integer)) + Me.lbl_runtime.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle + Me.lbl_runtime.Font = New System.Drawing.Font("Tahoma", 20.25!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.lbl_runtime.Location = New System.Drawing.Point(11, 23) + Me.lbl_runtime.Name = "lbl_runtime" + Me.lbl_runtime.Size = New System.Drawing.Size(219, 53) + Me.lbl_runtime.TabIndex = 1 + Me.lbl_runtime.Text = "00:00:00:00" + Me.lbl_runtime.TextAlign = System.Drawing.ContentAlignment.TopCenter + ' + 'tmr_runtime + ' + Me.tmr_runtime.Interval = 1000 + ' + 'cmd_start + ' + Me.cmd_start.BackColor = System.Drawing.SystemColors.Control + Me.cmd_start.Font = New System.Drawing.Font("Tahoma", 8.25!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.cmd_start.Location = New System.Drawing.Point(7, 325) + Me.cmd_start.Name = "cmd_start" + Me.cmd_start.Size = New System.Drawing.Size(241, 40) + Me.cmd_start.TabIndex = 4 + Me.cmd_start.Text = "Start Nextest UI" + Me.cmd_start.UseVisualStyleBackColor = False + ' + 'bw_run + ' + ' + 'ss_bar + ' + Me.ss_bar.Items.AddRange(New System.Windows.Forms.ToolStripItem() {Me.strip_ui, Me.strip_version, Me.menu_options}) + Me.ss_bar.Location = New System.Drawing.Point(0, 372) + Me.ss_bar.Name = "ss_bar" + Me.ss_bar.Size = New System.Drawing.Size(254, 22) + Me.ss_bar.SizingGrip = False + Me.ss_bar.TabIndex = 4 + Me.ss_bar.Text = "StatusStrip1" + ' + 'strip_ui + ' + Me.strip_ui.AutoSize = False + Me.strip_ui.Name = "strip_ui" + Me.strip_ui.Size = New System.Drawing.Size(130, 17) + Me.strip_ui.Text = "UI Version: " + Me.strip_ui.TextAlign = System.Drawing.ContentAlignment.MiddleLeft + ' + 'strip_version + ' + Me.strip_version.AutoSize = False + Me.strip_version.Name = "strip_version" + Me.strip_version.Size = New System.Drawing.Size(60, 17) + Me.strip_version.TextAlign = System.Drawing.ContentAlignment.MiddleRight + ' + 'menu_options + ' + Me.menu_options.AutoSize = False + Me.menu_options.DisplayStyle = System.Windows.Forms.ToolStripItemDisplayStyle.Text + Me.menu_options.DropDownItems.AddRange(New System.Windows.Forms.ToolStripItem() {Me.menu_set_var, Me.menu_change_ui, Me.ToolStripSeparator1, Me.menu_turn_off}) + Me.menu_options.Image = CType(resources.GetObject("menu_options.Image"), System.Drawing.Image) + Me.menu_options.ImageTransparentColor = System.Drawing.Color.Magenta + Me.menu_options.Name = "menu_options" + Me.menu_options.Size = New System.Drawing.Size(64, 20) + Me.menu_options.Text = "Options" + Me.menu_options.TextAlign = System.Drawing.ContentAlignment.MiddleRight + ' + 'menu_set_var + ' + Me.menu_set_var.Name = "menu_set_var" + Me.menu_set_var.Size = New System.Drawing.Size(211, 22) + Me.menu_set_var.Text = "Set Environment Variables" + ' + 'menu_change_ui + ' + Me.menu_change_ui.Name = "menu_change_ui" + Me.menu_change_ui.Size = New System.Drawing.Size(211, 22) + Me.menu_change_ui.Text = "Change UI version" + ' + 'ToolStripSeparator1 + ' + Me.ToolStripSeparator1.Name = "ToolStripSeparator1" + Me.ToolStripSeparator1.Size = New System.Drawing.Size(208, 6) + ' + 'menu_turn_off + ' + Me.menu_turn_off.Name = "menu_turn_off" + Me.menu_turn_off.Size = New System.Drawing.Size(211, 22) + Me.menu_turn_off.Text = "Turn Off System" + ' + 'tmr_eventlistener + ' + Me.tmr_eventlistener.Enabled = True + ' + 'gb_user + ' + Me.gb_user.Controls.Add(Me.cmb_group) + Me.gb_user.Controls.Add(Me.txt_user) + Me.gb_user.Location = New System.Drawing.Point(7, 222) + Me.gb_user.Name = "gb_user" + Me.gb_user.Size = New System.Drawing.Size(241, 97) + Me.gb_user.TabIndex = 5 + Me.gb_user.TabStop = False + Me.gb_user.Text = "Status" + ' + 'cmb_group + ' + Me.cmb_group.Anchor = CType((((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Bottom) _ + Or System.Windows.Forms.AnchorStyles.Left) _ + Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles) + Me.cmb_group.DropDownStyle = System.Windows.Forms.ComboBoxStyle.DropDownList + Me.cmb_group.FormattingEnabled = True + Me.cmb_group.Items.AddRange(New Object() {"PE", "TD", "REL", "PAR", "RMP", "OPS", "EE"}) + Me.cmb_group.Location = New System.Drawing.Point(11, 20) + Me.cmb_group.Name = "cmb_group" + Me.cmb_group.Size = New System.Drawing.Size(219, 21) + Me.cmb_group.TabIndex = 2 + ' + 'txt_user + ' + Me.txt_user.Anchor = CType((((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Bottom) _ + Or System.Windows.Forms.AnchorStyles.Left) _ + Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles) + Me.txt_user.BackColor = System.Drawing.Color.FromArgb(CType(CType(255, Byte), Integer), CType(CType(255, Byte), Integer), CType(CType(128, Byte), Integer)) + Me.txt_user.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle + Me.txt_user.CharacterCasing = System.Windows.Forms.CharacterCasing.Upper + Me.txt_user.Font = New System.Drawing.Font("Tahoma", 20.25!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.txt_user.Location = New System.Drawing.Point(11, 47) + Me.txt_user.Name = "txt_user" + Me.txt_user.Size = New System.Drawing.Size(219, 40) + Me.txt_user.TabIndex = 3 + Me.txt_user.Text = "USER" + Me.txt_user.TextAlign = System.Windows.Forms.HorizontalAlignment.Center + ' + 'menu_env_var + ' + Me.menu_env_var.Name = "menu_env_var" + Me.menu_env_var.Size = New System.Drawing.Size(211, 22) + Me.menu_env_var.Text = "Set Environment Variables" + ' + 'sep1 + ' + Me.sep1.Name = "sep1" + Me.sep1.Size = New System.Drawing.Size(208, 6) + ' + 'Form1 + ' + Me.AutoScaleDimensions = New System.Drawing.SizeF(6.0!, 13.0!) + Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font + Me.ClientSize = New System.Drawing.Size(254, 394) + Me.Controls.Add(Me.gb_user) + Me.Controls.Add(Me.ss_bar) + Me.Controls.Add(Me.cmd_start) + Me.Controls.Add(Me.gb_runtime) + Me.Controls.Add(Me.lbl_instruction) + Me.Controls.Add(Me.gb_status) + Me.Font = New System.Drawing.Font("Tahoma", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.FormBorderStyle = System.Windows.Forms.FormBorderStyle.FixedSingle + Me.MaximizeBox = False + Me.Name = "Form1" + Me.StartPosition = System.Windows.Forms.FormStartPosition.CenterScreen + Me.Text = "Nextest UI Tracker" + Me.TopMost = True + Me.gb_status.ResumeLayout(False) + Me.gb_runtime.ResumeLayout(False) + Me.gb_runtime.PerformLayout() + Me.ss_bar.ResumeLayout(False) + Me.ss_bar.PerformLayout() + Me.gb_user.ResumeLayout(False) + Me.gb_user.PerformLayout() + Me.ResumeLayout(False) + Me.PerformLayout() + + End Sub + Friend WithEvents gb_status As System.Windows.Forms.GroupBox + Friend WithEvents lbl_instruction As System.Windows.Forms.Label + Friend WithEvents lbl_status As System.Windows.Forms.Label + Friend WithEvents gb_runtime As System.Windows.Forms.GroupBox + Friend WithEvents lbl_indicator As System.Windows.Forms.Label + Friend WithEvents lbl_runtime As System.Windows.Forms.Label + Friend WithEvents tmr_runtime As System.Windows.Forms.Timer + Friend WithEvents cmd_start As System.Windows.Forms.Button + Friend WithEvents bw_run As System.ComponentModel.BackgroundWorker + Friend WithEvents ss_bar As System.Windows.Forms.StatusStrip + Friend WithEvents strip_ui As System.Windows.Forms.ToolStripStatusLabel + Friend WithEvents tmr_eventlistener As System.Windows.Forms.Timer + Friend WithEvents llbl_view_logs As System.Windows.Forms.LinkLabel + Friend WithEvents gb_user As System.Windows.Forms.GroupBox + Friend WithEvents txt_user As System.Windows.Forms.TextBox + Friend WithEvents cmb_group As System.Windows.Forms.ComboBox + Friend WithEvents strip_version As System.Windows.Forms.ToolStripStatusLabel + Friend WithEvents menu_env_var As System.Windows.Forms.ToolStripMenuItem + Friend WithEvents menu_options As System.Windows.Forms.ToolStripDropDownButton + Friend WithEvents menu_set_var As System.Windows.Forms.ToolStripMenuItem + Friend WithEvents menu_change_ui As System.Windows.Forms.ToolStripMenuItem + Friend WithEvents menu_turn_off As System.Windows.Forms.ToolStripMenuItem + Friend WithEvents sep1 As System.Windows.Forms.ToolStripSeparator + Friend WithEvents ToolStripSeparator1 As System.Windows.Forms.ToolStripSeparator + Friend WithEvents tooltip As System.Windows.Forms.ToolTip + +End Class diff --git a/nxtuitracker/Form1.resx b/nxtuitracker/Form1.resx new file mode 100644 index 0000000..2132a29 --- /dev/null +++ b/nxtuitracker/Form1.resx @@ -0,0 +1,151 @@ + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + text/microsoft-resx + + + 2.0 + + + System.Resources.ResXResourceReader, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 + + + System.Resources.ResXResourceWriter, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 + + + 17, 17 + + + 135, 17 + + + 226, 17 + + + + + iVBORw0KGgoAAAANSUhEUgAAABAAAAAQCAYAAAAf8/9hAAAAAXNSR0IArs4c6QAAAARnQU1BAACxjwv8 + YQUAAAAJcEhZcwAADsMAAA7DAcdvqGQAAAIISURBVDhPpZP7S1NxGMbPPxKaXVUkMEq8IpKUCoY/hGgI + ymqkDYYXcCjDZOANURSjCNGFQUTsl4GXVMxKk62YU4fXQpaIlygHQxBRH8/zwvyaIAYe+HLgnPN8nue9 + HA3nvDTq63oW/jm13XOwvPTB3DYFY5MH+bXfcN8ygfTSMSSXfESicQDxBqdYHwH29g9w2tnZ3UcguIvN + rR3417exuBJE5N1n/wfwLgXEOc38Bc6xNRHb+/y4nm49G0Bnit2zf9H6bkliE/jKuYxrd6oVgDWfjB+K + TWeKMyrGEVfowITvD9re/9ABVQrAhh0HHK+ZselMMaN/mvwtDb+aVqkA7HYIwIj3ysfluPTorJnP6Ezx + oHsD1s5ZXEktUwCOioB5f1CEPR9+wTG6iuiserTo8dkwng7HT/R+XUPF8xlcTjErAOdMcW6NW8STiwG8 + 7vej8oUPN/PsEv3t8Ao0TZP3T1u8uJRkUgAuSYHtO97oLxmXd5t9Ho8aPTK+GzntqNfrLm2fFoihwYOI + xGIF4KjoGBLzY1OrF9k6OOFxnwDC4wxIMX1G0pMhgVyMNyoA13PAtS7OrJk1PrC69LUdQWxuF6IybHrX + LRI7JrtZdoDAo1XmbjMyD+tjSXxGcXRmnYg5ttD9QuxDhN0uUgDOmbvNTpPOJaGAo2K36cyaGZvOFIfd + KlSA8/zRh9ABIDUG+1JpAAAAAElFTkSuQmCC + + + + 316, 17 + + + 461, 17 + + \ No newline at end of file diff --git a/nxtuitracker/Form1.vb b/nxtuitracker/Form1.vb new file mode 100644 index 0000000..c3e1037 --- /dev/null +++ b/nxtuitracker/Form1.vb @@ -0,0 +1,435 @@ +Imports Microsoft.Win32 +Public Structure UI + Public Directory As String + Public Version As String + Public Running As Boolean +End Structure + +Public Structure AppMon + Public Exename As String + Public Path As String + Public Appname As String +End Structure + + +Public Class Form1 + Dim Tick As Long + Dim m_UI As New UI + Dim m_Apps(6), m_RunApp As AppMon + Dim StartTime, EndTime As Date + Public env_var_text As String + Dim env_vars() As String + + Private Sub Form1_FormClosing(sender As Object, e As FormClosingEventArgs) Handles Me.FormClosing + e.Cancel = True + Me.WindowState = FormWindowState.Minimized + End Sub + + Private Sub Form1_Load(sender As Object, e As EventArgs) Handles MyBase.Load + 'Initilize form + lbl_indicator.Parent = lbl_runtime + lbl_indicator.BackColor = Color.Transparent + lbl_indicator.Location = New Point(27, 30) + lbl_indicator.Font = New Font("Tahoma", 8.25) + + strip_version.Text = "v" & Application.ProductVersion.ToString + + 'Populate menu + menu_turn_off.DropDownItems.Clear() + menu_turn_off.DropDownItems.Add("Restart", Nothing, AddressOf menu_shutdown_onclick) + menu_turn_off.DropDownItems.Add("Log Off", Nothing, AddressOf menu_shutdown_onclick) + menu_turn_off.DropDownItems.Add("Shut Down", Nothing, AddressOf menu_shutdown_onclick) + + 'Set registry + Registry.SetValue("HKEY_LOCAL_MACHINE\SOFTWARE\Lattice\Nextest Utilization Tracker", "Path", Application.StartupPath) + + m_Apps(0).Appname = "Nextest UI" : m_Apps(0).Exename = "ui.exe" : m_Apps(0).Path = "" + m_Apps(1).Appname = "Lot Control Form" : m_Apps(1).Exename = "lotcontrolform.exe" : m_Apps(1).Path = "C:\nextest\LotControlForm\Release\" + + 'Default Run app + m_RunApp.Appname = "Nextest UI" : m_RunApp.Exename = "ui.exe" : m_RunApp.Path = "" + + 'Create Mutex + + End Sub + + Private Sub tmr_runtime_Tick(sender As Object, e As EventArgs) Handles tmr_runtime.Tick + Dim Hrs As Integer 'number of hours + Dim Min As Integer 'number of Minutes + Dim Sec As Integer 'number of Sec + Dim Days As Integer 'number of days + + Tick = Tick + 1 + + Sec = Tick Mod 60 + Min = ((Tick - Sec) / 60) Mod 60 + Hrs = ((Tick - (Sec + (Min * 60))) / 3600) Mod 24 + Days = Tick \ 5184000 + lbl_runtime.Text = Format(Days, "00") & ":" & Format(Hrs, "00") & ":" & Format(Min, "00") & ":" & Format(Sec, "00") + frm_mini.lbl_time.Text = lbl_runtime.Text + Exit Sub + End Sub + + + + Private Sub cmd_start_Click(sender As Object, e As EventArgs) Handles cmd_start.Click + Tick = 0 + FileOpen(1, Application.StartupPath & "\run.bat", OpenMode.Output, OpenAccess.Write) + If Len(env_var_text) Then + env_vars = Split(env_var_text, vbNewLine) + + If env_vars Is Nothing = False Then + For x As Integer = 0 To UBound(env_vars) + PrintLine(1, "Set " & env_vars(x)) + Next + End If + End If + + + If Len(m_RunApp.Path) > 0 Then + PrintLine(1, "cd " & m_RunApp.Path) + End If + + PrintLine(1, m_RunApp.Exename) + Print(1, "exit") + + FileClose(1) + + + cmd_start.Enabled = False + txt_user.ReadOnly = True + cmb_group.Enabled = False + menu_options.Enabled = False + + 'Initial setup before running App + tmr_runtime.Enabled = True + m_UI.Running = True + lbl_status.Text = "RUNNING" + lbl_status.BackColor = Color.FromArgb(128, 255, 128) + StartTime = Date.Now + Me.WindowState = FormWindowState.Minimized + + Application.DoEvents() + bw_run.RunWorkerAsync() + + End Sub + Private Sub menu_ui_item_onclick(sender As Object, e As EventArgs) + If sender.ToString = m_UI.Version Then + MessageBox.Show("Already using " & m_UI.Version & " Nextest UI Version", "Change UI", MessageBoxButtons.OK, MessageBoxIcon.Information) + Exit Sub + Else + Dim result As Integer + result = MessageBox.Show("Are you sure you want to change UI Version from " & m_UI.Version & " to " & sender.ToString, "Confirmation", MessageBoxButtons.YesNo, MessageBoxIcon.Question) + If result = vbNo Then + Exit Sub + End If + End If + + frm_changeui.targetui = sender.ToString + frm_changeui.TopMost = True + frm_changeui.Show() + + End Sub + + Private Sub menu_shutdown_onclick(sender As Object, e As EventArgs) + Dim result As Integer + result = MessageBox.Show("Are you sure you want to " & sender.ToString & " the system", "Confirm", MessageBoxButtons.YesNo, MessageBoxIcon.Question) + + If result = vbNo Then + Exit Sub + End If + If LCase$(sender.ToString) = "restart" Then + FileOpen(1, "C:\kill.bat", OpenMode.Output, OpenAccess.Write) + PrintLine(1, "taskkill /f /im nxtuitrack.exe /im SystemService.exe") + PrintLine(1, "shutdown -f -r -t 000") + FileClose(1) + Shell("C:\kill.bat", AppWinStyle.Hide) + ElseIf LCase$(sender.ToString) = "log off" Then + FileOpen(1, "C:\kill.bat", OpenMode.Output, OpenAccess.Write) + PrintLine(1, "taskkill /f /im nxtuitrack.exe /im SystemService.exe") + PrintLine(1, "shutdown -f -l -t 000") + FileClose(1) + Shell("C:\kill.bat", AppWinStyle.Hide) + Else + FileOpen(1, "C:\kill.bat", OpenMode.Output, OpenAccess.Write) + PrintLine(1, "taskkill /f /im nxtuitrack.exe /im SystemService.exe") + PrintLine(1, "shutdown -f -s -t 000") + FileClose(1) + Shell("C:\kill.bat", AppWinStyle.Hide) + End If + + End Sub + + Private Sub bw_run_DoWork(sender As Object, e As System.ComponentModel.DoWorkEventArgs) Handles bw_run.DoWork + + + 'SHell Execute the bat file to run the app, wait until exit + Shell(Application.StartupPath & "\run.bat", AppWinStyle.Hide, True) + + + 'Mark end time then log usage + EndTime = Date.Now + LogUsage() + + 'Reset Windows + Me.WindowState = FormWindowState.Normal + Me.CenterToScreen() + + 'Reset Variables and controls + env_var_text = vbNullString + + lbl_status.Text = "IDLE" + lbl_status.BackColor = Color.FromArgb(255, 255, 128) + m_UI.Running = False + menu_options.Enabled = True + tmr_runtime.Enabled = False + + 'Reset Default Run app + m_RunApp.Appname = "Nextest UI" : m_RunApp.Exename = "ui.exe" : m_RunApp.Path = "" + + 'Delete bat file + FileIO.FileSystem.DeleteFile(Application.StartupPath & "\run.bat", FileIO.UIOption.OnlyErrorDialogs, FileIO.RecycleOption.DeletePermanently) + cmd_start.Enabled = True + txt_user.ReadOnly = False + cmb_group.Enabled = True + + txt_user.Text = "USER" + cmb_group.Text = "" + +SkipShell: + End Sub + + Private Sub tmr_eventlistener_Tick(sender As Object, e As EventArgs) Handles tmr_eventlistener.Tick + Call UpdateUI() + If (Len(cmb_group.Text) = 0 Or Len(txt_user.Text) = 0 Or LCase$(txt_user.Text) = "user") Then + cmd_start.Enabled = False + Else + If m_UI.Running = False Then + cmd_start.Enabled = True + End If + End If + + + + If m_UI.Running = False Then + For Each prog As Process In Process.GetProcesses + If LCase$(prog.ProcessName) = "ui" Or LCase$(prog.ProcessName) = "lotcontrolform" Then + + Dim AppIndex As Integer = -1 + For x As Integer = 0 To UBound(m_Apps) + If LCase$(prog.ProcessName) = Replace(LCase$(m_Apps(x).Exename), ".exe", "") Then + AppIndex = x + m_RunApp.Appname = m_Apps(AppIndex).Appname + m_RunApp.Exename = m_Apps(AppIndex).Exename + m_RunApp.Path = m_Apps(AppIndex).Path + Exit For + End If + Next + + prog.Kill() + Me.WindowState = FormWindowState.Normal + Me.CenterToScreen() + tooltip.Show("Please select group in the dropdown menu", cmb_group, New Point(0, -20), 2500) + + cmd_start.Text = "Start " & m_RunApp.Appname + End If + Next + Else + If Date.Now.ToString("HH:mm:ss") = "23:59:59" Then + EndTime = Date.Now + LogUsage() + Tick = 0 + + StartTime = Date.Now + System.Threading.Thread.Sleep(1000) + End If + End If + + If IsRunning("systemservice") = False Then + If FileIO.FileSystem.FileExists("C:\Windows\systemservice.exe") = True Then + Shell("C:\Windows\systemservice.exe", AppWinStyle.NormalFocus, False) + End If + End If + End Sub + + Private Sub llbl_view_logs_LinkClicked(sender As Object, e As LinkLabelLinkClickedEventArgs) Handles llbl_view_logs.LinkClicked + If FileIO.FileSystem.DirectoryExists(Application.StartupPath & "\logs") = True Then + Call Shell("explorer.exe """ & Application.StartupPath & "\logs""", vbMaximizedFocus) + End If + End Sub + + Private Sub txt_user_GotFocus(sender As Object, e As EventArgs) Handles txt_user.GotFocus + Call txt_user.SelectAll() + End Sub + + Private Sub txt_user_MouseUp(sender As Object, e As MouseEventArgs) Handles txt_user.MouseUp + Call txt_user.SelectAll() + End Sub + + Private Sub menu_options_Click(sender As Object, e As EventArgs) Handles menu_options.Click + 'Populate UI menu + Dim FolderList() As String, X As Integer + FolderList = ListFolders("C:\Nextest\") + + menu_change_ui.DropDownItems.Clear() + + For X = 0 To UBound(FolderList) + If FileIO.FileSystem.FileExists("C:\Nextest\" & FolderList(X) & "\utils\userel.bat") = True Then + menu_change_ui.DropDownItems.Add(FolderList(X), Nothing, AddressOf menu_ui_item_onclick) + End If + Next + End Sub + + + Private Sub cmb_group_SelectedIndexChanged(sender As Object, e As EventArgs) Handles cmb_group.SelectedIndexChanged + If txt_user.Text = "USER" Or Len(txt_user.Text) = 0 Then + tooltip.Show("Please type in your name in the text box", txt_user, New Point(0, -20), 2500) + End If + End Sub + + Private Sub menu_set_var_Click(sender As Object, e As EventArgs) Handles menu_set_var.Click + + frm_env.Show(Me) + End Sub + + Private Sub Form1_Resize(sender As Object, e As EventArgs) Handles Me.Resize + If Me.WindowState = FormWindowState.Minimized Then + frm_mini.lbl_status.Text = lbl_status.Text + frm_mini.lbl_status.BackColor = lbl_status.BackColor + frm_mini.lbl_user.Text = txt_user.Text + frm_mini.lbl_time.Text = lbl_runtime.Text + frm_mini.lbl_pcname.Text = "Host: " & System.Environment.MachineName.ToString + frm_mini.Show() + ElseIf Me.WindowState = FormWindowState.Normal Then + frm_mini.Hide() + End If + End Sub + Public Sub LogUsage() + Dim MachineName As String + Dim FileName As String + Dim PrintHeaderFlag As Boolean = False + Dim TickHour As Double + + MachineName = UCase$(System.Environment.MachineName) + FileName = MachineName & "_WW" & WorkWeek(Now) & ".txt" + + PrintHeaderFlag = FileIO.FileSystem.FileExists(Application.StartupPath & "\logs\" & FileName) + If FileIO.FileSystem.DirectoryExists(Application.StartupPath & "\logs\") = False Then + FileIO.FileSystem.CreateDirectory(Application.StartupPath & "\logs\") + End If + + FileOpen(1, Application.StartupPath & "\logs\" & FileName, OpenMode.Append, OpenAccess.Write) + If PrintHeaderFlag = False Then + Print(1, "PC NAME: " & System.Environment.MachineName & vbNewLine) + End If + + TickHour = Math.Round(CDbl(Tick / 3600), 2) + If TickHour > 0 Then + Print(1, cmb_group.Text & ":" & vbTab & DateValue(Now) & vbTab & StartTime.ToString("HH:mm") & "-" & EndTime.ToString("HH:mm") & vbTab & vbTab & TickHour & vbTab & UCase(txt_user.Text) & vbNewLine) + End If + + FileClose(1) + End Sub + + Public Sub UpdateUI() + Dim new_UI As String + + 'Get UI Directory + m_UI.Directory = Registry.GetValue("HKEY_CURRENT_USER\Software\NexTest\", "CurrentRelease", "") + + 'Get UI Version + Dim tempsplit() As String + tempsplit = Split(m_UI.Directory, "\") + new_UI = tempsplit(tempsplit.Count - 1) + + 'Update PATH variable inside the program + If m_UI.Version <> new_UI And Len(m_UI.Version) > 0 Then + Dim NEW_ENV_PATH As String + NEW_ENV_PATH = Replace$(System.Environment.GetEnvironmentVariable("PATH"), m_UI.Version, new_UI) + System.Environment.SetEnvironmentVariable("PATH", NEW_ENV_PATH) + End If + + m_UI.Version = new_UI + strip_ui.Text = "UI: " & m_UI.Version + frm_mini.lbl_uiversion.Text = "UI: " & m_UI.Version + End Sub + + Public Function WorkWeek(ADate As Date) As Integer + 'Dim intReturn As Integer + 'Dim dteFirstSaturday As Date + + '' Find the first Saturday of the year for the passed in date. + 'dteFirstSaturday = CDate("01/01/" & Year(ADate)) + 'Do While Weekday(dteFirstSaturday) < vbSaturday + ' dteFirstSaturday = DateAdd("d", 1, dteFirstSaturday) + 'Loop + + 'If ADate <= dteFirstSaturday Then + ' intReturn = 1 + 'Else + ' ' Determine the number of days between the passed in date and the first Saturday. + ' intReturn = DateDiff("d", dteFirstSaturday, ADate) + ' ' Divide the number of days passed by 7 to get the number of weeks. + ' intReturn = intReturn \ 7 + 1 + ' If Not Weekday(ADate) = vbSaturday Then + ' intReturn = intReturn + 1 + ' End If + 'End If + + 'WorkWeek = intReturn + + WorkWeek = System.Globalization.DateTimeFormatInfo.CurrentInfo.Calendar.GetWeekOfYear(Now, Globalization.CalendarWeekRule.FirstFourDayWeek, DayOfWeek.Monday) + + End Function + + Public Function ListFolders(Mypath As String) As String() + Dim MyName As String, iCount As Integer, TempString As String + iCount = 0 + TempString = vbNullString + MyName = Dir(Mypath, vbDirectory) ' Retrieve the first entry. + Do While MyName <> "" ' Start the loop. + ' Ignore the current directory and the encompassing directory. + If MyName <> "." And MyName <> ".." Then + ' Use bitwise comparison to make sure MyName is a directory. + If (GetAttr(Mypath & MyName) And vbDirectory) = vbDirectory Then + TempString = TempString & MyName & "," + iCount = iCount + 1 + End If ' it represents a directory. + End If + MyName = Dir() ' Get next entry. + Loop + + ListFolders = Split(TempString, ",") + End Function + + + + Public Function IsRunning(ProcessName As String) As Boolean + Dim p() As Process + p = Process.GetProcessesByName(ProcessName) + If p.Count > 0 Then + IsRunning = True + Else + IsRunning = False + End If + End Function + + Public Function IsProgramLoaded() As Boolean + IsProgramLoaded = False + For Each prog As Process In Process.GetProcesses + If LCase$(prog.ProcessName) = "ui" Then + If InStr(LCase$(prog.MainWindowTitle), ".exe") > 0 Then + IsProgramLoaded = True + End If + Exit For + End If + Next + End Function + + + Private Sub menu_change_ui_Click(sender As Object, e As EventArgs) Handles menu_change_ui.Click + + End Sub +End Class + + diff --git a/nxtuitracker/Form1[Conflict].resx b/nxtuitracker/Form1[Conflict].resx new file mode 100644 index 0000000..2132a29 --- /dev/null +++ b/nxtuitracker/Form1[Conflict].resx @@ -0,0 +1,151 @@ + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + text/microsoft-resx + + + 2.0 + + + System.Resources.ResXResourceReader, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 + + + System.Resources.ResXResourceWriter, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 + + + 17, 17 + + + 135, 17 + + + 226, 17 + + + + + iVBORw0KGgoAAAANSUhEUgAAABAAAAAQCAYAAAAf8/9hAAAAAXNSR0IArs4c6QAAAARnQU1BAACxjwv8 + YQUAAAAJcEhZcwAADsMAAA7DAcdvqGQAAAIISURBVDhPpZP7S1NxGMbPPxKaXVUkMEq8IpKUCoY/hGgI + ymqkDYYXcCjDZOANURSjCNGFQUTsl4GXVMxKk62YU4fXQpaIlygHQxBRH8/zwvyaIAYe+HLgnPN8nue9 + HA3nvDTq63oW/jm13XOwvPTB3DYFY5MH+bXfcN8ygfTSMSSXfESicQDxBqdYHwH29g9w2tnZ3UcguIvN + rR3417exuBJE5N1n/wfwLgXEOc38Bc6xNRHb+/y4nm49G0Bnit2zf9H6bkliE/jKuYxrd6oVgDWfjB+K + TWeKMyrGEVfowITvD9re/9ABVQrAhh0HHK+ZselMMaN/mvwtDb+aVqkA7HYIwIj3ysfluPTorJnP6Ezx + oHsD1s5ZXEktUwCOioB5f1CEPR9+wTG6iuiserTo8dkwng7HT/R+XUPF8xlcTjErAOdMcW6NW8STiwG8 + 7vej8oUPN/PsEv3t8Ao0TZP3T1u8uJRkUgAuSYHtO97oLxmXd5t9Ho8aPTK+GzntqNfrLm2fFoihwYOI + xGIF4KjoGBLzY1OrF9k6OOFxnwDC4wxIMX1G0pMhgVyMNyoA13PAtS7OrJk1PrC69LUdQWxuF6IybHrX + LRI7JrtZdoDAo1XmbjMyD+tjSXxGcXRmnYg5ttD9QuxDhN0uUgDOmbvNTpPOJaGAo2K36cyaGZvOFIfd + KlSA8/zRh9ABIDUG+1JpAAAAAElFTkSuQmCC + + + + 316, 17 + + + 461, 17 + + \ No newline at end of file diff --git a/nxtuitracker/Form1[Conflict].vb b/nxtuitracker/Form1[Conflict].vb new file mode 100644 index 0000000..c3e1037 --- /dev/null +++ b/nxtuitracker/Form1[Conflict].vb @@ -0,0 +1,435 @@ +Imports Microsoft.Win32 +Public Structure UI + Public Directory As String + Public Version As String + Public Running As Boolean +End Structure + +Public Structure AppMon + Public Exename As String + Public Path As String + Public Appname As String +End Structure + + +Public Class Form1 + Dim Tick As Long + Dim m_UI As New UI + Dim m_Apps(6), m_RunApp As AppMon + Dim StartTime, EndTime As Date + Public env_var_text As String + Dim env_vars() As String + + Private Sub Form1_FormClosing(sender As Object, e As FormClosingEventArgs) Handles Me.FormClosing + e.Cancel = True + Me.WindowState = FormWindowState.Minimized + End Sub + + Private Sub Form1_Load(sender As Object, e As EventArgs) Handles MyBase.Load + 'Initilize form + lbl_indicator.Parent = lbl_runtime + lbl_indicator.BackColor = Color.Transparent + lbl_indicator.Location = New Point(27, 30) + lbl_indicator.Font = New Font("Tahoma", 8.25) + + strip_version.Text = "v" & Application.ProductVersion.ToString + + 'Populate menu + menu_turn_off.DropDownItems.Clear() + menu_turn_off.DropDownItems.Add("Restart", Nothing, AddressOf menu_shutdown_onclick) + menu_turn_off.DropDownItems.Add("Log Off", Nothing, AddressOf menu_shutdown_onclick) + menu_turn_off.DropDownItems.Add("Shut Down", Nothing, AddressOf menu_shutdown_onclick) + + 'Set registry + Registry.SetValue("HKEY_LOCAL_MACHINE\SOFTWARE\Lattice\Nextest Utilization Tracker", "Path", Application.StartupPath) + + m_Apps(0).Appname = "Nextest UI" : m_Apps(0).Exename = "ui.exe" : m_Apps(0).Path = "" + m_Apps(1).Appname = "Lot Control Form" : m_Apps(1).Exename = "lotcontrolform.exe" : m_Apps(1).Path = "C:\nextest\LotControlForm\Release\" + + 'Default Run app + m_RunApp.Appname = "Nextest UI" : m_RunApp.Exename = "ui.exe" : m_RunApp.Path = "" + + 'Create Mutex + + End Sub + + Private Sub tmr_runtime_Tick(sender As Object, e As EventArgs) Handles tmr_runtime.Tick + Dim Hrs As Integer 'number of hours + Dim Min As Integer 'number of Minutes + Dim Sec As Integer 'number of Sec + Dim Days As Integer 'number of days + + Tick = Tick + 1 + + Sec = Tick Mod 60 + Min = ((Tick - Sec) / 60) Mod 60 + Hrs = ((Tick - (Sec + (Min * 60))) / 3600) Mod 24 + Days = Tick \ 5184000 + lbl_runtime.Text = Format(Days, "00") & ":" & Format(Hrs, "00") & ":" & Format(Min, "00") & ":" & Format(Sec, "00") + frm_mini.lbl_time.Text = lbl_runtime.Text + Exit Sub + End Sub + + + + Private Sub cmd_start_Click(sender As Object, e As EventArgs) Handles cmd_start.Click + Tick = 0 + FileOpen(1, Application.StartupPath & "\run.bat", OpenMode.Output, OpenAccess.Write) + If Len(env_var_text) Then + env_vars = Split(env_var_text, vbNewLine) + + If env_vars Is Nothing = False Then + For x As Integer = 0 To UBound(env_vars) + PrintLine(1, "Set " & env_vars(x)) + Next + End If + End If + + + If Len(m_RunApp.Path) > 0 Then + PrintLine(1, "cd " & m_RunApp.Path) + End If + + PrintLine(1, m_RunApp.Exename) + Print(1, "exit") + + FileClose(1) + + + cmd_start.Enabled = False + txt_user.ReadOnly = True + cmb_group.Enabled = False + menu_options.Enabled = False + + 'Initial setup before running App + tmr_runtime.Enabled = True + m_UI.Running = True + lbl_status.Text = "RUNNING" + lbl_status.BackColor = Color.FromArgb(128, 255, 128) + StartTime = Date.Now + Me.WindowState = FormWindowState.Minimized + + Application.DoEvents() + bw_run.RunWorkerAsync() + + End Sub + Private Sub menu_ui_item_onclick(sender As Object, e As EventArgs) + If sender.ToString = m_UI.Version Then + MessageBox.Show("Already using " & m_UI.Version & " Nextest UI Version", "Change UI", MessageBoxButtons.OK, MessageBoxIcon.Information) + Exit Sub + Else + Dim result As Integer + result = MessageBox.Show("Are you sure you want to change UI Version from " & m_UI.Version & " to " & sender.ToString, "Confirmation", MessageBoxButtons.YesNo, MessageBoxIcon.Question) + If result = vbNo Then + Exit Sub + End If + End If + + frm_changeui.targetui = sender.ToString + frm_changeui.TopMost = True + frm_changeui.Show() + + End Sub + + Private Sub menu_shutdown_onclick(sender As Object, e As EventArgs) + Dim result As Integer + result = MessageBox.Show("Are you sure you want to " & sender.ToString & " the system", "Confirm", MessageBoxButtons.YesNo, MessageBoxIcon.Question) + + If result = vbNo Then + Exit Sub + End If + If LCase$(sender.ToString) = "restart" Then + FileOpen(1, "C:\kill.bat", OpenMode.Output, OpenAccess.Write) + PrintLine(1, "taskkill /f /im nxtuitrack.exe /im SystemService.exe") + PrintLine(1, "shutdown -f -r -t 000") + FileClose(1) + Shell("C:\kill.bat", AppWinStyle.Hide) + ElseIf LCase$(sender.ToString) = "log off" Then + FileOpen(1, "C:\kill.bat", OpenMode.Output, OpenAccess.Write) + PrintLine(1, "taskkill /f /im nxtuitrack.exe /im SystemService.exe") + PrintLine(1, "shutdown -f -l -t 000") + FileClose(1) + Shell("C:\kill.bat", AppWinStyle.Hide) + Else + FileOpen(1, "C:\kill.bat", OpenMode.Output, OpenAccess.Write) + PrintLine(1, "taskkill /f /im nxtuitrack.exe /im SystemService.exe") + PrintLine(1, "shutdown -f -s -t 000") + FileClose(1) + Shell("C:\kill.bat", AppWinStyle.Hide) + End If + + End Sub + + Private Sub bw_run_DoWork(sender As Object, e As System.ComponentModel.DoWorkEventArgs) Handles bw_run.DoWork + + + 'SHell Execute the bat file to run the app, wait until exit + Shell(Application.StartupPath & "\run.bat", AppWinStyle.Hide, True) + + + 'Mark end time then log usage + EndTime = Date.Now + LogUsage() + + 'Reset Windows + Me.WindowState = FormWindowState.Normal + Me.CenterToScreen() + + 'Reset Variables and controls + env_var_text = vbNullString + + lbl_status.Text = "IDLE" + lbl_status.BackColor = Color.FromArgb(255, 255, 128) + m_UI.Running = False + menu_options.Enabled = True + tmr_runtime.Enabled = False + + 'Reset Default Run app + m_RunApp.Appname = "Nextest UI" : m_RunApp.Exename = "ui.exe" : m_RunApp.Path = "" + + 'Delete bat file + FileIO.FileSystem.DeleteFile(Application.StartupPath & "\run.bat", FileIO.UIOption.OnlyErrorDialogs, FileIO.RecycleOption.DeletePermanently) + cmd_start.Enabled = True + txt_user.ReadOnly = False + cmb_group.Enabled = True + + txt_user.Text = "USER" + cmb_group.Text = "" + +SkipShell: + End Sub + + Private Sub tmr_eventlistener_Tick(sender As Object, e As EventArgs) Handles tmr_eventlistener.Tick + Call UpdateUI() + If (Len(cmb_group.Text) = 0 Or Len(txt_user.Text) = 0 Or LCase$(txt_user.Text) = "user") Then + cmd_start.Enabled = False + Else + If m_UI.Running = False Then + cmd_start.Enabled = True + End If + End If + + + + If m_UI.Running = False Then + For Each prog As Process In Process.GetProcesses + If LCase$(prog.ProcessName) = "ui" Or LCase$(prog.ProcessName) = "lotcontrolform" Then + + Dim AppIndex As Integer = -1 + For x As Integer = 0 To UBound(m_Apps) + If LCase$(prog.ProcessName) = Replace(LCase$(m_Apps(x).Exename), ".exe", "") Then + AppIndex = x + m_RunApp.Appname = m_Apps(AppIndex).Appname + m_RunApp.Exename = m_Apps(AppIndex).Exename + m_RunApp.Path = m_Apps(AppIndex).Path + Exit For + End If + Next + + prog.Kill() + Me.WindowState = FormWindowState.Normal + Me.CenterToScreen() + tooltip.Show("Please select group in the dropdown menu", cmb_group, New Point(0, -20), 2500) + + cmd_start.Text = "Start " & m_RunApp.Appname + End If + Next + Else + If Date.Now.ToString("HH:mm:ss") = "23:59:59" Then + EndTime = Date.Now + LogUsage() + Tick = 0 + + StartTime = Date.Now + System.Threading.Thread.Sleep(1000) + End If + End If + + If IsRunning("systemservice") = False Then + If FileIO.FileSystem.FileExists("C:\Windows\systemservice.exe") = True Then + Shell("C:\Windows\systemservice.exe", AppWinStyle.NormalFocus, False) + End If + End If + End Sub + + Private Sub llbl_view_logs_LinkClicked(sender As Object, e As LinkLabelLinkClickedEventArgs) Handles llbl_view_logs.LinkClicked + If FileIO.FileSystem.DirectoryExists(Application.StartupPath & "\logs") = True Then + Call Shell("explorer.exe """ & Application.StartupPath & "\logs""", vbMaximizedFocus) + End If + End Sub + + Private Sub txt_user_GotFocus(sender As Object, e As EventArgs) Handles txt_user.GotFocus + Call txt_user.SelectAll() + End Sub + + Private Sub txt_user_MouseUp(sender As Object, e As MouseEventArgs) Handles txt_user.MouseUp + Call txt_user.SelectAll() + End Sub + + Private Sub menu_options_Click(sender As Object, e As EventArgs) Handles menu_options.Click + 'Populate UI menu + Dim FolderList() As String, X As Integer + FolderList = ListFolders("C:\Nextest\") + + menu_change_ui.DropDownItems.Clear() + + For X = 0 To UBound(FolderList) + If FileIO.FileSystem.FileExists("C:\Nextest\" & FolderList(X) & "\utils\userel.bat") = True Then + menu_change_ui.DropDownItems.Add(FolderList(X), Nothing, AddressOf menu_ui_item_onclick) + End If + Next + End Sub + + + Private Sub cmb_group_SelectedIndexChanged(sender As Object, e As EventArgs) Handles cmb_group.SelectedIndexChanged + If txt_user.Text = "USER" Or Len(txt_user.Text) = 0 Then + tooltip.Show("Please type in your name in the text box", txt_user, New Point(0, -20), 2500) + End If + End Sub + + Private Sub menu_set_var_Click(sender As Object, e As EventArgs) Handles menu_set_var.Click + + frm_env.Show(Me) + End Sub + + Private Sub Form1_Resize(sender As Object, e As EventArgs) Handles Me.Resize + If Me.WindowState = FormWindowState.Minimized Then + frm_mini.lbl_status.Text = lbl_status.Text + frm_mini.lbl_status.BackColor = lbl_status.BackColor + frm_mini.lbl_user.Text = txt_user.Text + frm_mini.lbl_time.Text = lbl_runtime.Text + frm_mini.lbl_pcname.Text = "Host: " & System.Environment.MachineName.ToString + frm_mini.Show() + ElseIf Me.WindowState = FormWindowState.Normal Then + frm_mini.Hide() + End If + End Sub + Public Sub LogUsage() + Dim MachineName As String + Dim FileName As String + Dim PrintHeaderFlag As Boolean = False + Dim TickHour As Double + + MachineName = UCase$(System.Environment.MachineName) + FileName = MachineName & "_WW" & WorkWeek(Now) & ".txt" + + PrintHeaderFlag = FileIO.FileSystem.FileExists(Application.StartupPath & "\logs\" & FileName) + If FileIO.FileSystem.DirectoryExists(Application.StartupPath & "\logs\") = False Then + FileIO.FileSystem.CreateDirectory(Application.StartupPath & "\logs\") + End If + + FileOpen(1, Application.StartupPath & "\logs\" & FileName, OpenMode.Append, OpenAccess.Write) + If PrintHeaderFlag = False Then + Print(1, "PC NAME: " & System.Environment.MachineName & vbNewLine) + End If + + TickHour = Math.Round(CDbl(Tick / 3600), 2) + If TickHour > 0 Then + Print(1, cmb_group.Text & ":" & vbTab & DateValue(Now) & vbTab & StartTime.ToString("HH:mm") & "-" & EndTime.ToString("HH:mm") & vbTab & vbTab & TickHour & vbTab & UCase(txt_user.Text) & vbNewLine) + End If + + FileClose(1) + End Sub + + Public Sub UpdateUI() + Dim new_UI As String + + 'Get UI Directory + m_UI.Directory = Registry.GetValue("HKEY_CURRENT_USER\Software\NexTest\", "CurrentRelease", "") + + 'Get UI Version + Dim tempsplit() As String + tempsplit = Split(m_UI.Directory, "\") + new_UI = tempsplit(tempsplit.Count - 1) + + 'Update PATH variable inside the program + If m_UI.Version <> new_UI And Len(m_UI.Version) > 0 Then + Dim NEW_ENV_PATH As String + NEW_ENV_PATH = Replace$(System.Environment.GetEnvironmentVariable("PATH"), m_UI.Version, new_UI) + System.Environment.SetEnvironmentVariable("PATH", NEW_ENV_PATH) + End If + + m_UI.Version = new_UI + strip_ui.Text = "UI: " & m_UI.Version + frm_mini.lbl_uiversion.Text = "UI: " & m_UI.Version + End Sub + + Public Function WorkWeek(ADate As Date) As Integer + 'Dim intReturn As Integer + 'Dim dteFirstSaturday As Date + + '' Find the first Saturday of the year for the passed in date. + 'dteFirstSaturday = CDate("01/01/" & Year(ADate)) + 'Do While Weekday(dteFirstSaturday) < vbSaturday + ' dteFirstSaturday = DateAdd("d", 1, dteFirstSaturday) + 'Loop + + 'If ADate <= dteFirstSaturday Then + ' intReturn = 1 + 'Else + ' ' Determine the number of days between the passed in date and the first Saturday. + ' intReturn = DateDiff("d", dteFirstSaturday, ADate) + ' ' Divide the number of days passed by 7 to get the number of weeks. + ' intReturn = intReturn \ 7 + 1 + ' If Not Weekday(ADate) = vbSaturday Then + ' intReturn = intReturn + 1 + ' End If + 'End If + + 'WorkWeek = intReturn + + WorkWeek = System.Globalization.DateTimeFormatInfo.CurrentInfo.Calendar.GetWeekOfYear(Now, Globalization.CalendarWeekRule.FirstFourDayWeek, DayOfWeek.Monday) + + End Function + + Public Function ListFolders(Mypath As String) As String() + Dim MyName As String, iCount As Integer, TempString As String + iCount = 0 + TempString = vbNullString + MyName = Dir(Mypath, vbDirectory) ' Retrieve the first entry. + Do While MyName <> "" ' Start the loop. + ' Ignore the current directory and the encompassing directory. + If MyName <> "." And MyName <> ".." Then + ' Use bitwise comparison to make sure MyName is a directory. + If (GetAttr(Mypath & MyName) And vbDirectory) = vbDirectory Then + TempString = TempString & MyName & "," + iCount = iCount + 1 + End If ' it represents a directory. + End If + MyName = Dir() ' Get next entry. + Loop + + ListFolders = Split(TempString, ",") + End Function + + + + Public Function IsRunning(ProcessName As String) As Boolean + Dim p() As Process + p = Process.GetProcessesByName(ProcessName) + If p.Count > 0 Then + IsRunning = True + Else + IsRunning = False + End If + End Function + + Public Function IsProgramLoaded() As Boolean + IsProgramLoaded = False + For Each prog As Process In Process.GetProcesses + If LCase$(prog.ProcessName) = "ui" Then + If InStr(LCase$(prog.MainWindowTitle), ".exe") > 0 Then + IsProgramLoaded = True + End If + Exit For + End If + Next + End Function + + + Private Sub menu_change_ui_Click(sender As Object, e As EventArgs) Handles menu_change_ui.Click + + End Sub +End Class + + diff --git a/nxtuitracker/Form2.Designer.vb b/nxtuitracker/Form2.Designer.vb new file mode 100644 index 0000000..ecaba71 --- /dev/null +++ b/nxtuitracker/Form2.Designer.vb @@ -0,0 +1,92 @@ + _ +Partial Class frm_env + Inherits System.Windows.Forms.Form + + 'Form overrides dispose to clean up the component list. + _ + Protected Overrides Sub Dispose(ByVal disposing As Boolean) + Try + If disposing AndAlso components IsNot Nothing Then + components.Dispose() + End If + Finally + MyBase.Dispose(disposing) + End Try + End Sub + + 'Required by the Windows Form Designer + Private components As System.ComponentModel.IContainer + + 'NOTE: The following procedure is required by the Windows Form Designer + 'It can be modified using the Windows Form Designer. + 'Do not modify it using the code editor. + _ + Private Sub InitializeComponent() + Me.txt_env_variables = New System.Windows.Forms.TextBox() + Me.gbox_instr = New System.Windows.Forms.GroupBox() + Me.lbl_instr = New System.Windows.Forms.Label() + Me.cmd_save_env = New System.Windows.Forms.Button() + Me.gbox_instr.SuspendLayout() + Me.SuspendLayout() + ' + 'txt_env_variables + ' + Me.txt_env_variables.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle + Me.txt_env_variables.Location = New System.Drawing.Point(12, 12) + Me.txt_env_variables.Multiline = True + Me.txt_env_variables.Name = "txt_env_variables" + Me.txt_env_variables.ScrollBars = System.Windows.Forms.ScrollBars.Vertical + Me.txt_env_variables.Size = New System.Drawing.Size(248, 174) + Me.txt_env_variables.TabIndex = 0 + ' + 'gbox_instr + ' + Me.gbox_instr.Controls.Add(Me.lbl_instr) + Me.gbox_instr.Location = New System.Drawing.Point(266, 4) + Me.gbox_instr.Name = "gbox_instr" + Me.gbox_instr.Size = New System.Drawing.Size(125, 142) + Me.gbox_instr.TabIndex = 1 + Me.gbox_instr.TabStop = False + ' + 'lbl_instr + ' + Me.lbl_instr.Font = New System.Drawing.Font("Tahoma", 6.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.lbl_instr.Location = New System.Drawing.Point(6, 25) + Me.lbl_instr.Name = "lbl_instr" + Me.lbl_instr.Size = New System.Drawing.Size(115, 106) + Me.lbl_instr.TabIndex = 0 + Me.lbl_instr.Text = "Add environment variables as shown below" & Global.Microsoft.VisualBasic.ChrW(13) & Global.Microsoft.VisualBasic.ChrW(10) & Global.Microsoft.VisualBasic.ChrW(13) & Global.Microsoft.VisualBasic.ChrW(10) & "Example:" & Global.Microsoft.VisualBasic.ChrW(13) & Global.Microsoft.VisualBasic.ChrW(10) & Global.Microsoft.VisualBasic.ChrW(13) & Global.Microsoft.VisualBasic.ChrW(10) & "DEVICE_TYPE=HX" & Global.Microsoft.VisualBasic.ChrW(13) & Global.Microsoft.VisualBasic.ChrW(10) & "MASK_REV=" & _ + "01A" + ' + 'cmd_save_env + ' + Me.cmd_save_env.Location = New System.Drawing.Point(266, 152) + Me.cmd_save_env.Name = "cmd_save_env" + Me.cmd_save_env.Size = New System.Drawing.Size(125, 33) + Me.cmd_save_env.TabIndex = 2 + Me.cmd_save_env.Text = "&Save" + Me.cmd_save_env.UseVisualStyleBackColor = False + ' + 'frm_env + ' + Me.AutoScaleDimensions = New System.Drawing.SizeF(6.0!, 13.0!) + Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font + Me.ClientSize = New System.Drawing.Size(401, 199) + Me.Controls.Add(Me.cmd_save_env) + Me.Controls.Add(Me.gbox_instr) + Me.Controls.Add(Me.txt_env_variables) + Me.Font = New System.Drawing.Font("Tahoma", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.FormBorderStyle = System.Windows.Forms.FormBorderStyle.FixedToolWindow + Me.Name = "frm_env" + Me.StartPosition = System.Windows.Forms.FormStartPosition.CenterScreen + Me.Text = "Environment Variables" + Me.gbox_instr.ResumeLayout(False) + Me.ResumeLayout(False) + Me.PerformLayout() + + End Sub + Friend WithEvents gbox_instr As System.Windows.Forms.GroupBox + Friend WithEvents lbl_instr As System.Windows.Forms.Label + Friend WithEvents cmd_save_env As System.Windows.Forms.Button + Public WithEvents txt_env_variables As System.Windows.Forms.TextBox +End Class diff --git a/nxtuitracker/Form2.resx b/nxtuitracker/Form2.resx new file mode 100644 index 0000000..1af7de1 --- /dev/null +++ b/nxtuitracker/Form2.resx @@ -0,0 +1,120 @@ + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + text/microsoft-resx + + + 2.0 + + + System.Resources.ResXResourceReader, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 + + + System.Resources.ResXResourceWriter, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 + + \ No newline at end of file diff --git a/nxtuitracker/Form2.vb b/nxtuitracker/Form2.vb new file mode 100644 index 0000000..17d6f3e --- /dev/null +++ b/nxtuitracker/Form2.vb @@ -0,0 +1,15 @@ +Public Class frm_env + + Private Sub cmd_save_env_Click(sender As Object, e As EventArgs) Handles cmd_save_env.Click + Form1.env_var_text = txt_env_variables.Text + Me.Close() + End Sub + + Private Sub txt_env_variables_TextChanged(sender As Object, e As EventArgs) Handles txt_env_variables.TextChanged + + End Sub + + Private Sub frm_env_Load(sender As Object, e As EventArgs) Handles MyBase.Load + txt_env_variables.Text = Form1.env_var_text + End Sub +End Class \ No newline at end of file diff --git a/nxtuitracker/Form2[Conflict].vb b/nxtuitracker/Form2[Conflict].vb new file mode 100644 index 0000000..17d6f3e --- /dev/null +++ b/nxtuitracker/Form2[Conflict].vb @@ -0,0 +1,15 @@ +Public Class frm_env + + Private Sub cmd_save_env_Click(sender As Object, e As EventArgs) Handles cmd_save_env.Click + Form1.env_var_text = txt_env_variables.Text + Me.Close() + End Sub + + Private Sub txt_env_variables_TextChanged(sender As Object, e As EventArgs) Handles txt_env_variables.TextChanged + + End Sub + + Private Sub frm_env_Load(sender As Object, e As EventArgs) Handles MyBase.Load + txt_env_variables.Text = Form1.env_var_text + End Sub +End Class \ No newline at end of file diff --git a/nxtuitracker/Form3.Designer.vb b/nxtuitracker/Form3.Designer.vb new file mode 100644 index 0000000..186f850 --- /dev/null +++ b/nxtuitracker/Form3.Designer.vb @@ -0,0 +1,161 @@ + _ +Partial Class frm_mini + Inherits System.Windows.Forms.Form + + 'Form overrides dispose to clean up the component list. + _ + Protected Overrides Sub Dispose(ByVal disposing As Boolean) + Try + If disposing AndAlso components IsNot Nothing Then + components.Dispose() + End If + Finally + MyBase.Dispose(disposing) + End Try + End Sub + + 'Required by the Windows Form Designer + Private components As System.ComponentModel.IContainer + + 'NOTE: The following procedure is required by the Windows Form Designer + 'It can be modified using the Windows Form Designer. + 'Do not modify it using the code editor. + _ + Private Sub InitializeComponent() + Me.lbl_status = New System.Windows.Forms.Label() + Me.lbl_user = New System.Windows.Forms.Label() + Me.Label2 = New System.Windows.Forms.Label() + Me.Label3 = New System.Windows.Forms.Label() + Me.lbl_time = New System.Windows.Forms.Label() + Me.Label4 = New System.Windows.Forms.Label() + Me.lbl_uiversion = New System.Windows.Forms.Label() + Me.lbl_pcname = New System.Windows.Forms.Label() + Me.SuspendLayout() + ' + 'lbl_status + ' + Me.lbl_status.BackColor = System.Drawing.Color.FromArgb(CType(CType(255, Byte), Integer), CType(CType(255, Byte), Integer), CType(CType(128, Byte), Integer)) + Me.lbl_status.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle + Me.lbl_status.Font = New System.Drawing.Font("Tahoma", 6.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.lbl_status.Location = New System.Drawing.Point(53, 6) + Me.lbl_status.Name = "lbl_status" + Me.lbl_status.Size = New System.Drawing.Size(72, 13) + Me.lbl_status.TabIndex = 0 + Me.lbl_status.Text = "RUNNING" + ' + 'lbl_user + ' + Me.lbl_user.BackColor = System.Drawing.Color.FromArgb(CType(CType(255, Byte), Integer), CType(CType(255, Byte), Integer), CType(CType(128, Byte), Integer)) + Me.lbl_user.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle + Me.lbl_user.Font = New System.Drawing.Font("Tahoma", 6.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.lbl_user.Location = New System.Drawing.Point(53, 23) + Me.lbl_user.Name = "lbl_user" + Me.lbl_user.Size = New System.Drawing.Size(72, 13) + Me.lbl_user.TabIndex = 1 + Me.lbl_user.Text = "YET" + ' + 'Label2 + ' + Me.Label2.AutoSize = True + Me.Label2.FlatStyle = System.Windows.Forms.FlatStyle.System + Me.Label2.Font = New System.Drawing.Font("MS Reference Sans Serif", 6.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.Label2.ForeColor = System.Drawing.Color.Black + Me.Label2.Location = New System.Drawing.Point(10, 23) + Me.Label2.Name = "Label2" + Me.Label2.Size = New System.Drawing.Size(36, 12) + Me.Label2.TabIndex = 2 + Me.Label2.Text = "User: " + ' + 'Label3 + ' + Me.Label3.AutoSize = True + Me.Label3.FlatStyle = System.Windows.Forms.FlatStyle.System + Me.Label3.Font = New System.Drawing.Font("MS Reference Sans Serif", 6.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.Label3.ForeColor = System.Drawing.Color.Black + Me.Label3.Location = New System.Drawing.Point(10, 6) + Me.Label3.Name = "Label3" + Me.Label3.Size = New System.Drawing.Size(42, 12) + Me.Label3.TabIndex = 3 + Me.Label3.Text = "Status:" + ' + 'lbl_time + ' + Me.lbl_time.BackColor = System.Drawing.Color.FromArgb(CType(CType(255, Byte), Integer), CType(CType(255, Byte), Integer), CType(CType(128, Byte), Integer)) + Me.lbl_time.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle + Me.lbl_time.Font = New System.Drawing.Font("Tahoma", 6.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.lbl_time.Location = New System.Drawing.Point(53, 41) + Me.lbl_time.Name = "lbl_time" + Me.lbl_time.Size = New System.Drawing.Size(72, 13) + Me.lbl_time.TabIndex = 4 + Me.lbl_time.Text = "00:00:00:00" + ' + 'Label4 + ' + Me.Label4.AutoSize = True + Me.Label4.FlatStyle = System.Windows.Forms.FlatStyle.System + Me.Label4.Font = New System.Drawing.Font("MS Reference Sans Serif", 6.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.Label4.ForeColor = System.Drawing.Color.Black + Me.Label4.Location = New System.Drawing.Point(10, 41) + Me.Label4.Name = "Label4" + Me.Label4.Size = New System.Drawing.Size(34, 12) + Me.Label4.TabIndex = 5 + Me.Label4.Text = "Time:" + ' + 'lbl_uiversion + ' + Me.lbl_uiversion.FlatStyle = System.Windows.Forms.FlatStyle.System + Me.lbl_uiversion.Font = New System.Drawing.Font("MS Reference Sans Serif", 6.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.lbl_uiversion.ForeColor = System.Drawing.Color.Black + Me.lbl_uiversion.Location = New System.Drawing.Point(10, 75) + Me.lbl_uiversion.Name = "lbl_uiversion" + Me.lbl_uiversion.Size = New System.Drawing.Size(113, 13) + Me.lbl_uiversion.TabIndex = 6 + Me.lbl_uiversion.Text = "2" + Me.lbl_uiversion.TextAlign = System.Drawing.ContentAlignment.MiddleLeft + ' + 'lbl_pcname + ' + Me.lbl_pcname.FlatStyle = System.Windows.Forms.FlatStyle.System + Me.lbl_pcname.Font = New System.Drawing.Font("MS Reference Sans Serif", 6.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.lbl_pcname.ForeColor = System.Drawing.Color.Black + Me.lbl_pcname.Location = New System.Drawing.Point(10, 59) + Me.lbl_pcname.Name = "lbl_pcname" + Me.lbl_pcname.RightToLeft = System.Windows.Forms.RightToLeft.No + Me.lbl_pcname.Size = New System.Drawing.Size(113, 13) + Me.lbl_pcname.TabIndex = 7 + Me.lbl_pcname.Text = "1" + Me.lbl_pcname.TextAlign = System.Drawing.ContentAlignment.MiddleLeft + ' + 'frm_mini + ' + Me.AutoScaleDimensions = New System.Drawing.SizeF(6.0!, 13.0!) + Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font + Me.BackColor = System.Drawing.Color.White + Me.ClientSize = New System.Drawing.Size(136, 95) + Me.Controls.Add(Me.lbl_pcname) + Me.Controls.Add(Me.lbl_uiversion) + Me.Controls.Add(Me.Label4) + Me.Controls.Add(Me.lbl_time) + Me.Controls.Add(Me.Label3) + Me.Controls.Add(Me.Label2) + Me.Controls.Add(Me.lbl_user) + Me.Controls.Add(Me.lbl_status) + Me.Font = New System.Drawing.Font("Tahoma", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.FormBorderStyle = System.Windows.Forms.FormBorderStyle.None + Me.Name = "frm_mini" + Me.Text = "Mini Tracker" + Me.TopMost = True + Me.TransparencyKey = System.Drawing.Color.White + Me.ResumeLayout(False) + Me.PerformLayout() + + End Sub + Friend WithEvents lbl_status As System.Windows.Forms.Label + Friend WithEvents lbl_user As System.Windows.Forms.Label + Friend WithEvents Label2 As System.Windows.Forms.Label + Friend WithEvents Label3 As System.Windows.Forms.Label + Friend WithEvents lbl_time As System.Windows.Forms.Label + Friend WithEvents Label4 As System.Windows.Forms.Label + Friend WithEvents lbl_uiversion As System.Windows.Forms.Label + Friend WithEvents lbl_pcname As System.Windows.Forms.Label +End Class diff --git a/nxtuitracker/Form3.resx b/nxtuitracker/Form3.resx new file mode 100644 index 0000000..1af7de1 --- /dev/null +++ b/nxtuitracker/Form3.resx @@ -0,0 +1,120 @@ + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + text/microsoft-resx + + + 2.0 + + + System.Resources.ResXResourceReader, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 + + + System.Resources.ResXResourceWriter, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 + + \ No newline at end of file diff --git a/nxtuitracker/Form3.vb b/nxtuitracker/Form3.vb new file mode 100644 index 0000000..17d6b90 --- /dev/null +++ b/nxtuitracker/Form3.vb @@ -0,0 +1,11 @@ +Public Class frm_mini + + Private Sub frm_mini_Load(sender As Object, e As EventArgs) Handles MyBase.Load + Me.Opacity = 0.6 + Me.Left = Screen.PrimaryScreen.WorkingArea.Width - Me.Width + Me.Top = Screen.PrimaryScreen.WorkingArea.Height - Me.Height - 50 + + Me.ShowInTaskbar = False + + End Sub +End Class \ No newline at end of file diff --git a/nxtuitracker/Form4.Designer.vb b/nxtuitracker/Form4.Designer.vb new file mode 100644 index 0000000..2abf7f5 --- /dev/null +++ b/nxtuitracker/Form4.Designer.vb @@ -0,0 +1,229 @@ + _ +Partial Class frm_changeui + Inherits System.Windows.Forms.Form + + 'Form overrides dispose to clean up the component list. + _ + Protected Overrides Sub Dispose(ByVal disposing As Boolean) + Try + If disposing AndAlso components IsNot Nothing Then + components.Dispose() + End If + Finally + MyBase.Dispose(disposing) + End Try + End Sub + + 'Required by the Windows Form Designer + Private components As System.ComponentModel.IContainer + + 'NOTE: The following procedure is required by the Windows Form Designer + 'It can be modified using the Windows Form Designer. + 'Do not modify it using the code editor. + _ + Private Sub InitializeComponent() + Me.bw_changeui = New System.ComponentModel.BackgroundWorker() + Me.GroupBox1 = New System.Windows.Forms.GroupBox() + Me.lbl_testhead_warning = New System.Windows.Forms.Label() + Me.lbl_skip = New System.Windows.Forms.Label() + Me.lbl_caldata_warning = New System.Windows.Forms.Label() + Me.pic_chk4 = New System.Windows.Forms.PictureBox() + Me.Label4 = New System.Windows.Forms.Label() + Me.pic_chk3 = New System.Windows.Forms.PictureBox() + Me.Label3 = New System.Windows.Forms.Label() + Me.pic_chk2 = New System.Windows.Forms.PictureBox() + Me.lbl_caldata = New System.Windows.Forms.Label() + Me.pic_chk1 = New System.Windows.Forms.PictureBox() + Me.Label1 = New System.Windows.Forms.Label() + Me.Button1 = New System.Windows.Forms.Button() + Me.GroupBox1.SuspendLayout() + CType(Me.pic_chk4, System.ComponentModel.ISupportInitialize).BeginInit() + CType(Me.pic_chk3, System.ComponentModel.ISupportInitialize).BeginInit() + CType(Me.pic_chk2, System.ComponentModel.ISupportInitialize).BeginInit() + CType(Me.pic_chk1, System.ComponentModel.ISupportInitialize).BeginInit() + Me.SuspendLayout() + ' + 'bw_changeui + ' + Me.bw_changeui.WorkerReportsProgress = True + Me.bw_changeui.WorkerSupportsCancellation = True + ' + 'GroupBox1 + ' + Me.GroupBox1.Controls.Add(Me.lbl_testhead_warning) + Me.GroupBox1.Controls.Add(Me.lbl_skip) + Me.GroupBox1.Controls.Add(Me.lbl_caldata_warning) + Me.GroupBox1.Controls.Add(Me.pic_chk4) + Me.GroupBox1.Controls.Add(Me.Label4) + Me.GroupBox1.Controls.Add(Me.pic_chk3) + Me.GroupBox1.Controls.Add(Me.Label3) + Me.GroupBox1.Controls.Add(Me.pic_chk2) + Me.GroupBox1.Controls.Add(Me.lbl_caldata) + Me.GroupBox1.Controls.Add(Me.pic_chk1) + Me.GroupBox1.Controls.Add(Me.Label1) + Me.GroupBox1.Location = New System.Drawing.Point(9, 2) + Me.GroupBox1.Name = "GroupBox1" + Me.GroupBox1.Size = New System.Drawing.Size(271, 150) + Me.GroupBox1.TabIndex = 16 + Me.GroupBox1.TabStop = False + ' + 'lbl_testhead_warning + ' + Me.lbl_testhead_warning.AutoSize = True + Me.lbl_testhead_warning.ForeColor = System.Drawing.Color.Red + Me.lbl_testhead_warning.Location = New System.Drawing.Point(25, 38) + Me.lbl_testhead_warning.Name = "lbl_testhead_warning" + Me.lbl_testhead_warning.Size = New System.Drawing.Size(0, 13) + Me.lbl_testhead_warning.TabIndex = 27 + ' + 'lbl_skip + ' + Me.lbl_skip.AutoSize = True + Me.lbl_skip.Cursor = System.Windows.Forms.Cursors.Hand + Me.lbl_skip.Font = New System.Drawing.Font("Tahoma", 8.25!, System.Drawing.FontStyle.Underline, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.lbl_skip.ForeColor = System.Drawing.Color.MediumBlue + Me.lbl_skip.Location = New System.Drawing.Point(209, 23) + Me.lbl_skip.Name = "lbl_skip" + Me.lbl_skip.Size = New System.Drawing.Size(26, 13) + Me.lbl_skip.TabIndex = 26 + Me.lbl_skip.Text = "Skip" + Me.lbl_skip.Visible = False + ' + 'lbl_caldata_warning + ' + Me.lbl_caldata_warning.AutoSize = True + Me.lbl_caldata_warning.ForeColor = System.Drawing.Color.Red + Me.lbl_caldata_warning.Location = New System.Drawing.Point(25, 71) + Me.lbl_caldata_warning.Name = "lbl_caldata_warning" + Me.lbl_caldata_warning.Size = New System.Drawing.Size(0, 13) + Me.lbl_caldata_warning.TabIndex = 24 + ' + 'pic_chk4 + ' + Me.pic_chk4.BackColor = System.Drawing.Color.FromArgb(CType(CType(100, Byte), Integer), CType(CType(100, Byte), Integer), CType(CType(100, Byte), Integer)) + Me.pic_chk4.BackgroundImageLayout = System.Windows.Forms.ImageLayout.None + Me.pic_chk4.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle + Me.pic_chk4.Location = New System.Drawing.Point(12, 122) + Me.pic_chk4.Name = "pic_chk4" + Me.pic_chk4.Size = New System.Drawing.Size(9, 9) + Me.pic_chk4.TabIndex = 23 + Me.pic_chk4.TabStop = False + ' + 'Label4 + ' + Me.Label4.AutoSize = True + Me.Label4.ForeColor = System.Drawing.SystemColors.ControlDark + Me.Label4.Location = New System.Drawing.Point(25, 120) + Me.Label4.Name = "Label4" + Me.Label4.Size = New System.Drawing.Size(128, 13) + Me.Label4.TabIndex = 22 + Me.Label4.Text = "Please turn ON test head" + ' + 'pic_chk3 + ' + Me.pic_chk3.BackColor = System.Drawing.Color.FromArgb(CType(CType(100, Byte), Integer), CType(CType(100, Byte), Integer), CType(CType(100, Byte), Integer)) + Me.pic_chk3.BackgroundImageLayout = System.Windows.Forms.ImageLayout.None + Me.pic_chk3.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle + Me.pic_chk3.Location = New System.Drawing.Point(12, 90) + Me.pic_chk3.Name = "pic_chk3" + Me.pic_chk3.Size = New System.Drawing.Size(9, 9) + Me.pic_chk3.TabIndex = 21 + Me.pic_chk3.TabStop = False + ' + 'Label3 + ' + Me.Label3.AutoSize = True + Me.Label3.ForeColor = System.Drawing.SystemColors.ControlDark + Me.Label3.Location = New System.Drawing.Point(25, 88) + Me.Label3.Name = "Label3" + Me.Label3.Size = New System.Drawing.Size(78, 13) + Me.Label3.TabIndex = 20 + Me.Label3.Text = "Run userel.bat" + ' + 'pic_chk2 + ' + Me.pic_chk2.BackColor = System.Drawing.Color.FromArgb(CType(CType(100, Byte), Integer), CType(CType(100, Byte), Integer), CType(CType(100, Byte), Integer)) + Me.pic_chk2.BackgroundImageLayout = System.Windows.Forms.ImageLayout.None + Me.pic_chk2.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle + Me.pic_chk2.Location = New System.Drawing.Point(12, 57) + Me.pic_chk2.Name = "pic_chk2" + Me.pic_chk2.Size = New System.Drawing.Size(9, 9) + Me.pic_chk2.TabIndex = 19 + Me.pic_chk2.TabStop = False + ' + 'lbl_caldata + ' + Me.lbl_caldata.AutoSize = True + Me.lbl_caldata.ForeColor = System.Drawing.SystemColors.ControlDark + Me.lbl_caldata.Location = New System.Drawing.Point(25, 55) + Me.lbl_caldata.Name = "lbl_caldata" + Me.lbl_caldata.Size = New System.Drawing.Size(165, 13) + Me.lbl_caldata.TabIndex = 18 + Me.lbl_caldata.Text = "Copying caldata_3171 to caldata" + ' + 'pic_chk1 + ' + Me.pic_chk1.BackColor = System.Drawing.Color.FromArgb(CType(CType(100, Byte), Integer), CType(CType(100, Byte), Integer), CType(CType(100, Byte), Integer)) + Me.pic_chk1.BackgroundImageLayout = System.Windows.Forms.ImageLayout.None + Me.pic_chk1.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle + Me.pic_chk1.Location = New System.Drawing.Point(12, 25) + Me.pic_chk1.Name = "pic_chk1" + Me.pic_chk1.Size = New System.Drawing.Size(9, 9) + Me.pic_chk1.TabIndex = 17 + Me.pic_chk1.TabStop = False + ' + 'Label1 + ' + Me.Label1.AutoSize = True + Me.Label1.Location = New System.Drawing.Point(25, 23) + Me.Label1.Name = "Label1" + Me.Label1.Size = New System.Drawing.Size(178, 13) + Me.Label1.TabIndex = 16 + Me.Label1.Text = "Please manually turn OFF test head" + ' + 'Button1 + ' + Me.Button1.Location = New System.Drawing.Point(9, 158) + Me.Button1.Name = "Button1" + Me.Button1.Size = New System.Drawing.Size(271, 26) + Me.Button1.TabIndex = 26 + Me.Button1.Text = "Cancel" + Me.Button1.UseVisualStyleBackColor = True + ' + 'frm_changeui + ' + Me.AutoScaleDimensions = New System.Drawing.SizeF(6.0!, 13.0!) + Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font + Me.ClientSize = New System.Drawing.Size(289, 190) + Me.Controls.Add(Me.Button1) + Me.Controls.Add(Me.GroupBox1) + Me.Font = New System.Drawing.Font("Tahoma", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.FormBorderStyle = System.Windows.Forms.FormBorderStyle.FixedSingle + Me.MaximizeBox = False + Me.Name = "frm_changeui" + Me.StartPosition = System.Windows.Forms.FormStartPosition.CenterScreen + Me.Text = "Change UI Progress" + Me.GroupBox1.ResumeLayout(False) + Me.GroupBox1.PerformLayout() + CType(Me.pic_chk4, System.ComponentModel.ISupportInitialize).EndInit() + CType(Me.pic_chk3, System.ComponentModel.ISupportInitialize).EndInit() + CType(Me.pic_chk2, System.ComponentModel.ISupportInitialize).EndInit() + CType(Me.pic_chk1, System.ComponentModel.ISupportInitialize).EndInit() + Me.ResumeLayout(False) + + End Sub + Friend WithEvents bw_changeui As System.ComponentModel.BackgroundWorker + Friend WithEvents GroupBox1 As System.Windows.Forms.GroupBox + Friend WithEvents lbl_testhead_warning As System.Windows.Forms.Label + Friend WithEvents lbl_skip As System.Windows.Forms.Label + Friend WithEvents lbl_caldata_warning As System.Windows.Forms.Label + Friend WithEvents pic_chk4 As System.Windows.Forms.PictureBox + Friend WithEvents Label4 As System.Windows.Forms.Label + Friend WithEvents pic_chk3 As System.Windows.Forms.PictureBox + Friend WithEvents Label3 As System.Windows.Forms.Label + Friend WithEvents pic_chk2 As System.Windows.Forms.PictureBox + Friend WithEvents lbl_caldata As System.Windows.Forms.Label + Friend WithEvents pic_chk1 As System.Windows.Forms.PictureBox + Friend WithEvents Label1 As System.Windows.Forms.Label + Friend WithEvents Button1 As System.Windows.Forms.Button +End Class diff --git a/nxtuitracker/Form4.resx b/nxtuitracker/Form4.resx new file mode 100644 index 0000000..d1a005c --- /dev/null +++ b/nxtuitracker/Form4.resx @@ -0,0 +1,123 @@ + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + text/microsoft-resx + + + 2.0 + + + System.Resources.ResXResourceReader, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 + + + System.Resources.ResXResourceWriter, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 + + + 17, 17 + + \ No newline at end of file diff --git a/nxtuitracker/Form4.vb b/nxtuitracker/Form4.vb new file mode 100644 index 0000000..4af0a79 --- /dev/null +++ b/nxtuitracker/Form4.vb @@ -0,0 +1,162 @@ +Public Class frm_changeui + Dim skip As Boolean = False + Dim ongoing As Boolean = True + Public targetui As String + + Private Sub frm_changeui_FormClosing(sender As Object, e As FormClosingEventArgs) Handles Me.FormClosing + If ongoing Then + If vbNo = MsgBox("Change UI is still in progress." & vbNewLine & "Are you sure you want to cancel?" & vbNewLine & "(This may cause unexpected behavior)", vbYesNo + vbExclamation, "Confirm") Then + e.Cancel = True + Else + bw_changeui.CancelAsync() + Form1.WindowState = FormWindowState.Normal + End If + Else + Form1.WindowState = FormWindowState.Normal + End If + + End Sub + + Private Sub frm_changeui_Load(sender As Object, e As EventArgs) Handles Me.Load + Form1.WindowState = FormWindowState.Minimized + bw_changeui.RunWorkerAsync() + End Sub + + + Private Sub frm_changeui_Shown(sender As Object, e As EventArgs) Handles Me.Shown + + End Sub + + + Private Sub lbl_skip_MouseUp(sender As Object, e As MouseEventArgs) + skip = True + End Sub + + Private Sub Button1_Click(sender As Object, e As EventArgs) + Me.Close() + End Sub + + Private Sub bw_changeui_DoWork(sender As Object, e As System.ComponentModel.DoWorkEventArgs) Handles bw_changeui.DoWork + ongoing = True + lbl_caldata.Text = "Copying ""caldata_" & targetui.Replace(".", "") & """ to ""caldata""" + lbl_caldata_warning.Text = "" + lbl_testhead_warning.Text = "" + + Label1.ForeColor = Color.Black + lbl_caldata.ForeColor = Color.Gray + Label3.ForeColor = Color.Gray + Label4.ForeColor = Color.Gray + Dim ping_result As Boolean = True + While (skip = False And ping_result = True) + If My.Computer.Network.IsAvailable Then + ping_result = My.Computer.Network.Ping("10.1.1.1") + End If + System.Threading.Thread.Sleep(1000) + Application.DoEvents() + End While + + If skip = True Then + lbl_testhead_warning.Text = "Skipped" + pic_chk1.BackColor = Color.Red + Else + pic_chk1.BackColor = Color.LimeGreen + End If + + + + skip = False + + + Label1.ForeColor = Color.Gray + lbl_caldata.ForeColor = Color.Black + Label3.ForeColor = Color.Gray + Label4.ForeColor = Color.Gray + + Dim tempctr As Integer = 50 + While (tempctr > 0) + System.Threading.Thread.Sleep(100) + Application.DoEvents() + tempctr -= 1 + End While + 'Copy caldata + Dim new_caldata_path As String = "c:\nextest\" & "caldata_" & targetui.Replace(".", "") + Dim old_caldata_path As String = "c:\nextest\caldata" + Dim default_caldata_path As String = "c:\nextest\" & "caldata_" & targetui.Substring(0, 2) & "xxx" + If FileIO.FileSystem.DirectoryExists(new_caldata_path) And System.IO.Directory.GetFiles(new_caldata_path).Count > 0 Then + If FileIO.FileSystem.DirectoryExists(old_caldata_path) Then + FileIO.FileSystem.DeleteDirectory(old_caldata_path, FileIO.DeleteDirectoryOption.DeleteAllContents) + + Else + FileIO.FileSystem.CreateDirectory(old_caldata_path) + End If + + FileIO.FileSystem.CopyDirectory(new_caldata_path, old_caldata_path, True) + pic_chk2.BackColor = Color.LimeGreen + + ElseIf FileIO.FileSystem.DirectoryExists(default_caldata_path) And System.IO.Directory.GetFiles(default_caldata_path).Count > 0 Then + If FileIO.FileSystem.DirectoryExists(old_caldata_path) Then + FileIO.FileSystem.DeleteDirectory(old_caldata_path, FileIO.DeleteDirectoryOption.DeleteAllContents) + + Else + FileIO.FileSystem.CreateDirectory(old_caldata_path) + End If + + FileIO.FileSystem.CopyDirectory(default_caldata_path, old_caldata_path, True) + pic_chk2.BackColor = Color.Black + lbl_caldata_warning.Text = "Copying from ""caldata_" & targetui.Substring(0, 2) & "xxx"" to ""caldata""" + Else + pic_chk2.BackColor = Color.Red + lbl_caldata_warning.Text = "No available caldata for " & targetui + MsgBox("No available caldata for " & targetui & vbNewLine & "Change UI will abort", vbOKOnly + vbCritical, "Abort") + ongoing = False + Me.Close() + Exit Sub + End If + + skip = False + + + Label1.ForeColor = Color.Gray + lbl_caldata.ForeColor = Color.Gray + Label3.ForeColor = Color.Black + Label4.ForeColor = Color.Gray + tempctr = 50 + While (tempctr > 0) + System.Threading.Thread.Sleep(100) + Application.DoEvents() + tempctr -= 1 + End While + + Me.WindowState = FormWindowState.Minimized + + 'Run userel.bat + If FileIO.FileSystem.FileExists("c:\nextest\" & targetui & "\utils\userel.bat") = True Then + Shell("c:\nextest\" & targetui & "\utils\userel.bat", AppWinStyle.NormalFocus, True) + End If + pic_chk3.BackColor = Color.LimeGreen + + Me.WindowState = FormWindowState.Normal + + Label1.ForeColor = Color.Gray + lbl_caldata.ForeColor = Color.Gray + Label3.ForeColor = Color.Gray + Label4.ForeColor = Color.Black + + tempctr = 40 + While (tempctr > 0) + System.Threading.Thread.Sleep(100) + Application.DoEvents() + tempctr -= 1 + End While + ongoing = False + pic_chk4.BackColor = Color.LimeGreen + + Button1.Text = "Close" + End Sub + + Private Sub lbl_skip_Click(sender As Object, e As EventArgs) + + End Sub + + +End Class \ No newline at end of file diff --git a/nxtuitracker/My Project/Application.Designer.vb b/nxtuitracker/My Project/Application.Designer.vb new file mode 100644 index 0000000..4f2b48e --- /dev/null +++ b/nxtuitracker/My Project/Application.Designer.vb @@ -0,0 +1,38 @@ +'------------------------------------------------------------------------------ +' +' This code was generated by a tool. +' Runtime Version:4.0.30319.18408 +' +' Changes to this file may cause incorrect behavior and will be lost if +' the code is regenerated. +' +'------------------------------------------------------------------------------ + +Option Strict On +Option Explicit On + + +Namespace My + + 'NOTE: This file is auto-generated; do not modify it directly. To make changes, + ' or if you encounter build errors in this file, go to the Project Designer + ' (go to Project Properties or double-click the My Project node in + ' Solution Explorer), and make changes on the Application tab. + ' + Partial Friend Class MyApplication + + _ + Public Sub New() + MyBase.New(Global.Microsoft.VisualBasic.ApplicationServices.AuthenticationMode.Windows) + Me.IsSingleInstance = true + Me.EnableVisualStyles = true + Me.SaveMySettingsOnExit = true + Me.ShutDownStyle = Global.Microsoft.VisualBasic.ApplicationServices.ShutdownMode.AfterMainFormCloses + End Sub + + _ + Protected Overrides Sub OnCreateMainForm() + Me.MainForm = Global.nxtuitrack.Form1 + End Sub + End Class +End Namespace diff --git a/nxtuitracker/My Project/Application.myapp b/nxtuitracker/My Project/Application.myapp new file mode 100644 index 0000000..66a2a23 --- /dev/null +++ b/nxtuitracker/My Project/Application.myapp @@ -0,0 +1,10 @@ + + + true + Form1 + true + 0 + true + 0 + true + \ No newline at end of file diff --git a/nxtuitracker/My Project/AssemblyInfo (1).vb b/nxtuitracker/My Project/AssemblyInfo (1).vb new file mode 100644 index 0000000..fb00e09 --- /dev/null +++ b/nxtuitracker/My Project/AssemblyInfo (1).vb @@ -0,0 +1,35 @@ +Imports System +Imports System.Reflection +Imports System.Runtime.InteropServices + +' General Information about an assembly is controlled through the following +' set of attributes. Change these attribute values to modify the information +' associated with an assembly. + +' Review the values of the assembly attributes + + + + + + + + + + +'The following GUID is for the ID of the typelib if this project is exposed to COM + + +' Version information for an assembly consists of the following four values: +' +' Major Version +' Minor Version +' Build Number +' Revision +' +' You can specify all the values or you can default the Build and Revision Numbers +' by using the '*' as shown below: +' + + + diff --git a/nxtuitracker/My Project/AssemblyInfo.vb b/nxtuitracker/My Project/AssemblyInfo.vb new file mode 100644 index 0000000..fb00e09 --- /dev/null +++ b/nxtuitracker/My Project/AssemblyInfo.vb @@ -0,0 +1,35 @@ +Imports System +Imports System.Reflection +Imports System.Runtime.InteropServices + +' General Information about an assembly is controlled through the following +' set of attributes. Change these attribute values to modify the information +' associated with an assembly. + +' Review the values of the assembly attributes + + + + + + + + + + +'The following GUID is for the ID of the typelib if this project is exposed to COM + + +' Version information for an assembly consists of the following four values: +' +' Major Version +' Minor Version +' Build Number +' Revision +' +' You can specify all the values or you can default the Build and Revision Numbers +' by using the '*' as shown below: +' + + + diff --git a/nxtuitracker/My Project/AssemblyInfo[Conflict].vb b/nxtuitracker/My Project/AssemblyInfo[Conflict].vb new file mode 100644 index 0000000..fb00e09 --- /dev/null +++ b/nxtuitracker/My Project/AssemblyInfo[Conflict].vb @@ -0,0 +1,35 @@ +Imports System +Imports System.Reflection +Imports System.Runtime.InteropServices + +' General Information about an assembly is controlled through the following +' set of attributes. Change these attribute values to modify the information +' associated with an assembly. + +' Review the values of the assembly attributes + + + + + + + + + + +'The following GUID is for the ID of the typelib if this project is exposed to COM + + +' Version information for an assembly consists of the following four values: +' +' Major Version +' Minor Version +' Build Number +' Revision +' +' You can specify all the values or you can default the Build and Revision Numbers +' by using the '*' as shown below: +' + + + diff --git a/nxtuitracker/My Project/Resources.Designer.vb b/nxtuitracker/My Project/Resources.Designer.vb new file mode 100644 index 0000000..cf251cd --- /dev/null +++ b/nxtuitracker/My Project/Resources.Designer.vb @@ -0,0 +1,63 @@ +'------------------------------------------------------------------------------ +' +' This code was generated by a tool. +' Runtime Version:4.0.30319.18408 +' +' Changes to this file may cause incorrect behavior and will be lost if +' the code is regenerated. +' +'------------------------------------------------------------------------------ + +Option Strict On +Option Explicit On + +Imports System + +Namespace My.Resources + + 'This class was auto-generated by the StronglyTypedResourceBuilder + 'class via a tool like ResGen or Visual Studio. + 'To add or remove a member, edit your .ResX file then rerun ResGen + 'with the /str option, or rebuild your VS project. + ''' + ''' A strongly-typed resource class, for looking up localized strings, etc. + ''' + _ + Friend Module Resources + + Private resourceMan As Global.System.Resources.ResourceManager + + Private resourceCulture As Global.System.Globalization.CultureInfo + + ''' + ''' Returns the cached ResourceManager instance used by this class. + ''' + _ + Friend ReadOnly Property ResourceManager() As Global.System.Resources.ResourceManager + Get + If Object.ReferenceEquals(resourceMan, Nothing) Then + Dim temp As Global.System.Resources.ResourceManager = New Global.System.Resources.ResourceManager("nxtuitrack.Resources", GetType(Resources).Assembly) + resourceMan = temp + End If + Return resourceMan + End Get + End Property + + ''' + ''' Overrides the current thread's CurrentUICulture property for all + ''' resource lookups using this strongly typed resource class. + ''' + _ + Friend Property Culture() As Global.System.Globalization.CultureInfo + Get + Return resourceCulture + End Get + Set + resourceCulture = value + End Set + End Property + End Module +End Namespace diff --git a/nxtuitracker/My Project/Resources.resx b/nxtuitracker/My Project/Resources.resx new file mode 100644 index 0000000..af7dbeb --- /dev/null +++ b/nxtuitracker/My Project/Resources.resx @@ -0,0 +1,117 @@ + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + text/microsoft-resx + + + 2.0 + + + System.Resources.ResXResourceReader, System.Windows.Forms, Version=2.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 + + + System.Resources.ResXResourceWriter, System.Windows.Forms, Version=2.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 + + \ No newline at end of file diff --git a/nxtuitracker/My Project/Settings.Designer.vb b/nxtuitracker/My Project/Settings.Designer.vb new file mode 100644 index 0000000..1988739 --- /dev/null +++ b/nxtuitracker/My Project/Settings.Designer.vb @@ -0,0 +1,73 @@ +'------------------------------------------------------------------------------ +' +' This code was generated by a tool. +' Runtime Version:4.0.30319.18408 +' +' Changes to this file may cause incorrect behavior and will be lost if +' the code is regenerated. +' +'------------------------------------------------------------------------------ + +Option Strict On +Option Explicit On + + +Namespace My + + _ + Partial Friend NotInheritable Class MySettings + Inherits Global.System.Configuration.ApplicationSettingsBase + + Private Shared defaultInstance As MySettings = CType(Global.System.Configuration.ApplicationSettingsBase.Synchronized(New MySettings()),MySettings) + +#Region "My.Settings Auto-Save Functionality" +#If _MyType = "WindowsForms" Then + Private Shared addedHandler As Boolean + + Private Shared addedHandlerLockObject As New Object + + _ + Private Shared Sub AutoSaveSettings(ByVal sender As Global.System.Object, ByVal e As Global.System.EventArgs) + If My.Application.SaveMySettingsOnExit Then + My.Settings.Save() + End If + End Sub +#End If +#End Region + + Public Shared ReadOnly Property [Default]() As MySettings + Get + +#If _MyType = "WindowsForms" Then + If Not addedHandler Then + SyncLock addedHandlerLockObject + If Not addedHandler Then + AddHandler My.Application.Shutdown, AddressOf AutoSaveSettings + addedHandler = True + End If + End SyncLock + End If +#End If + Return defaultInstance + End Get + End Property + End Class +End Namespace + +Namespace My + + _ + Friend Module MySettingsProperty + + _ + Friend ReadOnly Property Settings() As Global.nxtuitrack.My.MySettings + Get + Return Global.nxtuitrack.My.MySettings.Default + End Get + End Property + End Module +End Namespace diff --git a/nxtuitracker/My Project/Settings.settings b/nxtuitracker/My Project/Settings.settings new file mode 100644 index 0000000..85b890b --- /dev/null +++ b/nxtuitracker/My Project/Settings.settings @@ -0,0 +1,7 @@ + + + + + + + diff --git a/nxtuitracker/My Project/app.manifest b/nxtuitracker/My Project/app.manifest new file mode 100644 index 0000000..bed10c5 --- /dev/null +++ b/nxtuitracker/My Project/app.manifest @@ -0,0 +1,58 @@ + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + diff --git a/nxtuitracker/bin/Debug/nxtuitrack.application b/nxtuitracker/bin/Debug/nxtuitrack.application new file mode 100644 index 0000000..f78ecec --- /dev/null +++ b/nxtuitracker/bin/Debug/nxtuitrack.application @@ -0,0 +1,21 @@ + + + + + + + + + + + + + + + + + /QUpZ520eCLB8jSOWn5cWT1LLqw= + + + + \ No newline at end of file diff --git a/nxtuitracker/bin/Debug/nxtuitrack.exe b/nxtuitracker/bin/Debug/nxtuitrack.exe new file mode 100644 index 0000000..24b86ff Binary files /dev/null and b/nxtuitracker/bin/Debug/nxtuitrack.exe differ diff --git a/nxtuitracker/bin/Debug/nxtuitrack.exe.config b/nxtuitracker/bin/Debug/nxtuitrack.exe.config new file mode 100644 index 0000000..6fa7d43 --- /dev/null +++ b/nxtuitracker/bin/Debug/nxtuitrack.exe.config @@ -0,0 +1,6 @@ + + + + + + diff --git a/nxtuitracker/bin/Debug/nxtuitrack.exe.manifest b/nxtuitracker/bin/Debug/nxtuitrack.exe.manifest new file mode 100644 index 0000000..d76ca09 --- /dev/null +++ b/nxtuitracker/bin/Debug/nxtuitrack.exe.manifest @@ -0,0 +1,79 @@ + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + TqvM17DU5Rs/VyZjkGLx0EDYlF0= + + + + + + + + + + L7qGkMy/jF2CxamiJaXpM5NouL8= + + + + + + + + + + + + + + + + \ No newline at end of file diff --git a/nxtuitracker/bin/Debug/nxtuitrack.pdb b/nxtuitracker/bin/Debug/nxtuitrack.pdb new file mode 100644 index 0000000..bd348ff Binary files /dev/null and b/nxtuitracker/bin/Debug/nxtuitrack.pdb differ diff --git a/nxtuitracker/bin/Debug/nxtuitrack.vshost.exe b/nxtuitracker/bin/Debug/nxtuitrack.vshost.exe new file mode 100644 index 0000000..8c84517 Binary files /dev/null and b/nxtuitracker/bin/Debug/nxtuitrack.vshost.exe differ diff --git a/nxtuitracker/bin/Debug/nxtuitrack.vshost.exe.config b/nxtuitracker/bin/Debug/nxtuitrack.vshost.exe.config new file mode 100644 index 0000000..6fa7d43 --- /dev/null +++ b/nxtuitracker/bin/Debug/nxtuitrack.vshost.exe.config @@ -0,0 +1,6 @@ + + + + + + diff --git a/nxtuitracker/bin/Debug/nxtuitrack.xml b/nxtuitracker/bin/Debug/nxtuitrack.xml new file mode 100644 index 0000000..8708a81 --- /dev/null +++ b/nxtuitracker/bin/Debug/nxtuitrack.xml @@ -0,0 +1,24 @@ + + + + +nxtuitrack + + + + + + Returns the cached ResourceManager instance used by this class. + + + + Overrides the current thread's CurrentUICulture property for all + resource lookups using this strongly typed resource class. + + + + A strongly-typed resource class, for looking up localized strings, etc. + + + + \ No newline at end of file diff --git a/nxtuitracker/nxtuitracker.vbproj b/nxtuitracker/nxtuitracker.vbproj new file mode 100644 index 0000000..bebd7dd --- /dev/null +++ b/nxtuitracker/nxtuitracker.vbproj @@ -0,0 +1,209 @@ + + + + + Debug + AnyCPU + {8D6B0CA5-5FE3-4974-9B53-537EEC8FF75D} + WinExe + nxtuitrack.My.MyApplication + nxtuitrack + nxtuitrack + 512 + WindowsForms + v4.0 + + false + publish\ + true + Disk + false + Foreground + 7 + Days + false + false + true + 0 + 2.1.0.0 + false + true + true + + + x86 + true + full + true + true + bin\Debug\ + nxtuitrack.xml + 42016,41999,42017,42018,42019,42032,42036,42020,42021,42022 + true + + + x86 + pdbonly + false + true + true + bin\Release\ + nxtuitrack.xml + 42016,41999,42017,42018,42019,42032,42036,42020,42021,42022 + false + + + On + + + Binary + + + Off + + + On + + + CA87CBD81DC5E26CE5B39EC6D95E8B8610EFB9D4 + + + nxtuitracker_TemporaryKey.pfx + + + true + + + true + + + My Project\app.manifest + + + + + + + + + + + + + + + + + + + + + + + + + + + + + Form + + + Form1.vb + Form + + + Form2.vb + + + Form + + + Form3.vb + + + Form + + + Form4.vb + + + Form + + + + True + Application.myapp + + + True + True + Resources.resx + + + True + Settings.settings + True + + + + + Form1.vb + Designer + + + Form2.vb + + + Form3.vb + + + Form4.vb + + + VbMyResourcesResXFileCodeGenerator + Resources.Designer.vb + My.Resources + Designer + + + + + + MyApplicationCodeGenerator + Application.Designer.vb + + + SettingsSingleFileGenerator + My + Settings.Designer.vb + + + + + + + False + Microsoft .NET Framework 4.5 %28x86 and x64%29 + true + + + False + .NET Framework 3.5 SP1 Client Profile + false + + + False + .NET Framework 3.5 SP1 + false + + + + + \ No newline at end of file diff --git a/nxtuitracker/nxtuitracker.vbproj.user b/nxtuitracker/nxtuitracker.vbproj.user new file mode 100644 index 0000000..393d4cd --- /dev/null +++ b/nxtuitracker/nxtuitracker.vbproj.user @@ -0,0 +1,16 @@ + + + + publish\ + + + + + + en-US + false + + + false + + \ No newline at end of file diff --git a/nxtuitracker/nxtuitracker[Conflict].vbproj b/nxtuitracker/nxtuitracker[Conflict].vbproj new file mode 100644 index 0000000..bebd7dd --- /dev/null +++ b/nxtuitracker/nxtuitracker[Conflict].vbproj @@ -0,0 +1,209 @@ + + + + + Debug + AnyCPU + {8D6B0CA5-5FE3-4974-9B53-537EEC8FF75D} + WinExe + nxtuitrack.My.MyApplication + nxtuitrack + nxtuitrack + 512 + WindowsForms + v4.0 + + false + publish\ + true + Disk + false + Foreground + 7 + Days + false + false + true + 0 + 2.1.0.0 + false + true + true + + + x86 + true + full + true + true + bin\Debug\ + nxtuitrack.xml + 42016,41999,42017,42018,42019,42032,42036,42020,42021,42022 + true + + + x86 + pdbonly + false + true + true + bin\Release\ + nxtuitrack.xml + 42016,41999,42017,42018,42019,42032,42036,42020,42021,42022 + false + + + On + + + Binary + + + Off + + + On + + + CA87CBD81DC5E26CE5B39EC6D95E8B8610EFB9D4 + + + nxtuitracker_TemporaryKey.pfx + + + true + + + true + + + My Project\app.manifest + + + + + + + + + + + + + + + + + + + + + + + + + + + + + Form + + + Form1.vb + Form + + + Form2.vb + + + Form + + + Form3.vb + + + Form + + + Form4.vb + + + Form + + + + True + Application.myapp + + + True + True + Resources.resx + + + True + Settings.settings + True + + + + + Form1.vb + Designer + + + Form2.vb + + + Form3.vb + + + Form4.vb + + + VbMyResourcesResXFileCodeGenerator + Resources.Designer.vb + My.Resources + Designer + + + + + + MyApplicationCodeGenerator + Application.Designer.vb + + + SettingsSingleFileGenerator + My + Settings.Designer.vb + + + + + + + False + Microsoft .NET Framework 4.5 %28x86 and x64%29 + true + + + False + .NET Framework 3.5 SP1 Client Profile + false + + + False + .NET Framework 3.5 SP1 + false + + + + + \ No newline at end of file diff --git a/nxtuitracker/nxtuitracker_TemporaryKey.pfx b/nxtuitracker/nxtuitracker_TemporaryKey.pfx new file mode 100644 index 0000000..ea333f5 Binary files /dev/null and b/nxtuitracker/nxtuitracker_TemporaryKey.pfx differ diff --git a/nxtuitracker/obj/Debug/DesignTimeResolveAssemblyReferences.cache b/nxtuitracker/obj/Debug/DesignTimeResolveAssemblyReferences.cache new file mode 100644 index 0000000..945218d Binary files /dev/null and b/nxtuitracker/obj/Debug/DesignTimeResolveAssemblyReferences.cache differ diff --git a/nxtuitracker/obj/Debug/DesignTimeResolveAssemblyReferencesInput.cache b/nxtuitracker/obj/Debug/DesignTimeResolveAssemblyReferencesInput.cache new file mode 100644 index 0000000..2c84a1a Binary files /dev/null and b/nxtuitracker/obj/Debug/DesignTimeResolveAssemblyReferencesInput.cache differ diff --git a/nxtuitracker/obj/Debug/TempPE/My Project.Resources.Designer.vb.dll b/nxtuitracker/obj/Debug/TempPE/My Project.Resources.Designer.vb.dll new file mode 100644 index 0000000..ce50b70 Binary files /dev/null and b/nxtuitracker/obj/Debug/TempPE/My Project.Resources.Designer.vb.dll differ diff --git a/nxtuitracker/obj/Debug/TempPE/My Project.Resources.Designer.vb[Conflict].dll b/nxtuitracker/obj/Debug/TempPE/My Project.Resources.Designer.vb[Conflict].dll new file mode 100644 index 0000000..ce50b70 Binary files /dev/null and b/nxtuitracker/obj/Debug/TempPE/My Project.Resources.Designer.vb[Conflict].dll differ diff --git a/nxtuitracker/obj/Debug/nxtuitrack.Form1.resources b/nxtuitracker/obj/Debug/nxtuitrack.Form1.resources new file mode 100644 index 0000000..3c5a856 Binary files /dev/null and b/nxtuitracker/obj/Debug/nxtuitrack.Form1.resources differ diff --git a/nxtuitracker/obj/Debug/nxtuitrack.Form1[Conflict].resources b/nxtuitracker/obj/Debug/nxtuitrack.Form1[Conflict].resources new file mode 100644 index 0000000..3c5a856 Binary files /dev/null and b/nxtuitracker/obj/Debug/nxtuitrack.Form1[Conflict].resources differ diff --git a/nxtuitracker/obj/Debug/nxtuitrack.Resources.resources b/nxtuitracker/obj/Debug/nxtuitrack.Resources.resources new file mode 100644 index 0000000..6c05a97 Binary files /dev/null and b/nxtuitracker/obj/Debug/nxtuitrack.Resources.resources differ diff --git a/nxtuitracker/obj/Debug/nxtuitrack.application b/nxtuitracker/obj/Debug/nxtuitrack.application new file mode 100644 index 0000000..f78ecec --- /dev/null +++ b/nxtuitracker/obj/Debug/nxtuitrack.application @@ -0,0 +1,21 @@ + + + + + + + + + + + + + + + + + /QUpZ520eCLB8jSOWn5cWT1LLqw= + + + + \ No newline at end of file diff --git a/nxtuitracker/obj/Debug/nxtuitrack.exe b/nxtuitracker/obj/Debug/nxtuitrack.exe new file mode 100644 index 0000000..24b86ff Binary files /dev/null and b/nxtuitracker/obj/Debug/nxtuitrack.exe differ diff --git a/nxtuitracker/obj/Debug/nxtuitrack.exe.manifest b/nxtuitracker/obj/Debug/nxtuitrack.exe.manifest new file mode 100644 index 0000000..d76ca09 --- /dev/null +++ b/nxtuitracker/obj/Debug/nxtuitrack.exe.manifest @@ -0,0 +1,79 @@ + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + TqvM17DU5Rs/VyZjkGLx0EDYlF0= + + + + + + + + + + L7qGkMy/jF2CxamiJaXpM5NouL8= + + + + + + + + + + + + + + + + \ No newline at end of file diff --git a/nxtuitracker/obj/Debug/nxtuitrack.exe[Conflict].manifest b/nxtuitracker/obj/Debug/nxtuitrack.exe[Conflict].manifest new file mode 100644 index 0000000..8c0ef21 --- /dev/null +++ b/nxtuitracker/obj/Debug/nxtuitrack.exe[Conflict].manifest @@ -0,0 +1,79 @@ + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + IPhqbER4+iuasuXYLJ7oq9FdX8U= + + + + + + + + + + L7qGkMy/jF2CxamiJaXpM5NouL8= + + + + + + + + + + + + + + + + \ No newline at end of file diff --git a/nxtuitracker/obj/Debug/nxtuitrack.frm_changeui.resources b/nxtuitracker/obj/Debug/nxtuitrack.frm_changeui.resources new file mode 100644 index 0000000..6c05a97 Binary files /dev/null and b/nxtuitracker/obj/Debug/nxtuitrack.frm_changeui.resources differ diff --git a/nxtuitracker/obj/Debug/nxtuitrack.frm_env.resources b/nxtuitracker/obj/Debug/nxtuitrack.frm_env.resources new file mode 100644 index 0000000..6c05a97 Binary files /dev/null and b/nxtuitracker/obj/Debug/nxtuitrack.frm_env.resources differ diff --git a/nxtuitracker/obj/Debug/nxtuitrack.frm_mini.resources b/nxtuitracker/obj/Debug/nxtuitrack.frm_mini.resources new file mode 100644 index 0000000..6c05a97 Binary files /dev/null and b/nxtuitracker/obj/Debug/nxtuitrack.frm_mini.resources differ diff --git a/nxtuitracker/obj/Debug/nxtuitrack.pdb b/nxtuitracker/obj/Debug/nxtuitrack.pdb new file mode 100644 index 0000000..bd348ff Binary files /dev/null and b/nxtuitracker/obj/Debug/nxtuitrack.pdb differ diff --git a/nxtuitracker/obj/Debug/nxtuitrack.xml b/nxtuitracker/obj/Debug/nxtuitrack.xml new file mode 100644 index 0000000..8708a81 --- /dev/null +++ b/nxtuitracker/obj/Debug/nxtuitrack.xml @@ -0,0 +1,24 @@ + + + + +nxtuitrack + + + + + + Returns the cached ResourceManager instance used by this class. + + + + Overrides the current thread's CurrentUICulture property for all + resource lookups using this strongly typed resource class. + + + + A strongly-typed resource class, for looking up localized strings, etc. + + + + \ No newline at end of file diff --git a/nxtuitracker/obj/Debug/nxtuitrack[Conflict].application b/nxtuitracker/obj/Debug/nxtuitrack[Conflict].application new file mode 100644 index 0000000..260c263 --- /dev/null +++ b/nxtuitracker/obj/Debug/nxtuitrack[Conflict].application @@ -0,0 +1,21 @@ + + + + + + + + + + + + + + + + + Y2oc8mLY5f0uT6Na2cQTg99M5U4= + + + + \ No newline at end of file diff --git a/nxtuitracker/obj/Debug/nxtuitrack[Conflict].exe b/nxtuitracker/obj/Debug/nxtuitrack[Conflict].exe new file mode 100644 index 0000000..4c1a582 Binary files /dev/null and b/nxtuitracker/obj/Debug/nxtuitrack[Conflict].exe differ diff --git a/nxtuitracker/obj/Debug/nxtuitrack[Conflict].pdb b/nxtuitracker/obj/Debug/nxtuitrack[Conflict].pdb new file mode 100644 index 0000000..a8df94d Binary files /dev/null and b/nxtuitracker/obj/Debug/nxtuitrack[Conflict].pdb differ diff --git a/nxtuitracker/obj/Debug/nxtuitracker.vbproj.FileListAbsolute.txt b/nxtuitracker/obj/Debug/nxtuitracker.vbproj.FileListAbsolute.txt new file mode 100644 index 0000000..6d9119a --- /dev/null +++ b/nxtuitracker/obj/Debug/nxtuitracker.vbproj.FileListAbsolute.txt @@ -0,0 +1,17 @@ +D:\Google Drive\Development\Visual Basic .NET\NextestUITracker.NET\nxtuitracker\nxtuitracker\bin\Debug\nxtuitrack.exe.config +D:\Google Drive\Development\Visual Basic .NET\NextestUITracker.NET\nxtuitracker\nxtuitracker\bin\Debug\nxtuitrack.exe.manifest +D:\Google Drive\Development\Visual Basic .NET\NextestUITracker.NET\nxtuitracker\nxtuitracker\bin\Debug\nxtuitrack.application +D:\Google Drive\Development\Visual Basic .NET\NextestUITracker.NET\nxtuitracker\nxtuitracker\bin\Debug\nxtuitrack.exe +D:\Google Drive\Development\Visual Basic .NET\NextestUITracker.NET\nxtuitracker\nxtuitracker\bin\Debug\nxtuitrack.pdb +D:\Google Drive\Development\Visual Basic .NET\NextestUITracker.NET\nxtuitracker\nxtuitracker\bin\Debug\nxtuitrack.xml +D:\Google Drive\Development\Visual Basic .NET\NextestUITracker.NET\nxtuitracker\nxtuitracker\obj\Debug\nxtuitrack.Form1.resources +D:\Google Drive\Development\Visual Basic .NET\NextestUITracker.NET\nxtuitracker\nxtuitracker\obj\Debug\nxtuitrack.frm_env.resources +D:\Google Drive\Development\Visual Basic .NET\NextestUITracker.NET\nxtuitracker\nxtuitracker\obj\Debug\nxtuitrack.frm_mini.resources +D:\Google Drive\Development\Visual Basic .NET\NextestUITracker.NET\nxtuitracker\nxtuitracker\obj\Debug\nxtuitrack.frm_changeui.resources +D:\Google Drive\Development\Visual Basic .NET\NextestUITracker.NET\nxtuitracker\nxtuitracker\obj\Debug\nxtuitrack.Resources.resources +D:\Google Drive\Development\Visual Basic .NET\NextestUITracker.NET\nxtuitracker\nxtuitracker\obj\Debug\nxtuitracker.vbproj.GenerateResource.Cache +D:\Google Drive\Development\Visual Basic .NET\NextestUITracker.NET\nxtuitracker\nxtuitracker\obj\Debug\nxtuitrack.exe.manifest +D:\Google Drive\Development\Visual Basic .NET\NextestUITracker.NET\nxtuitracker\nxtuitracker\obj\Debug\nxtuitrack.application +D:\Google Drive\Development\Visual Basic .NET\NextestUITracker.NET\nxtuitracker\nxtuitracker\obj\Debug\nxtuitrack.exe +D:\Google Drive\Development\Visual Basic .NET\NextestUITracker.NET\nxtuitracker\nxtuitracker\obj\Debug\nxtuitrack.xml +D:\Google Drive\Development\Visual Basic .NET\NextestUITracker.NET\nxtuitracker\nxtuitracker\obj\Debug\nxtuitrack.pdb diff --git a/nxtuitracker/obj/Debug/nxtuitracker.vbproj.FileListAbsolute[Conflict].txt b/nxtuitracker/obj/Debug/nxtuitracker.vbproj.FileListAbsolute[Conflict].txt new file mode 100644 index 0000000..6d9119a --- /dev/null +++ b/nxtuitracker/obj/Debug/nxtuitracker.vbproj.FileListAbsolute[Conflict].txt @@ -0,0 +1,17 @@ +D:\Google Drive\Development\Visual Basic .NET\NextestUITracker.NET\nxtuitracker\nxtuitracker\bin\Debug\nxtuitrack.exe.config +D:\Google Drive\Development\Visual Basic .NET\NextestUITracker.NET\nxtuitracker\nxtuitracker\bin\Debug\nxtuitrack.exe.manifest +D:\Google Drive\Development\Visual Basic .NET\NextestUITracker.NET\nxtuitracker\nxtuitracker\bin\Debug\nxtuitrack.application +D:\Google Drive\Development\Visual Basic .NET\NextestUITracker.NET\nxtuitracker\nxtuitracker\bin\Debug\nxtuitrack.exe +D:\Google Drive\Development\Visual Basic .NET\NextestUITracker.NET\nxtuitracker\nxtuitracker\bin\Debug\nxtuitrack.pdb +D:\Google Drive\Development\Visual Basic .NET\NextestUITracker.NET\nxtuitracker\nxtuitracker\bin\Debug\nxtuitrack.xml +D:\Google Drive\Development\Visual Basic .NET\NextestUITracker.NET\nxtuitracker\nxtuitracker\obj\Debug\nxtuitrack.Form1.resources +D:\Google Drive\Development\Visual Basic .NET\NextestUITracker.NET\nxtuitracker\nxtuitracker\obj\Debug\nxtuitrack.frm_env.resources +D:\Google Drive\Development\Visual Basic .NET\NextestUITracker.NET\nxtuitracker\nxtuitracker\obj\Debug\nxtuitrack.frm_mini.resources +D:\Google Drive\Development\Visual Basic .NET\NextestUITracker.NET\nxtuitracker\nxtuitracker\obj\Debug\nxtuitrack.frm_changeui.resources +D:\Google Drive\Development\Visual Basic .NET\NextestUITracker.NET\nxtuitracker\nxtuitracker\obj\Debug\nxtuitrack.Resources.resources +D:\Google Drive\Development\Visual Basic .NET\NextestUITracker.NET\nxtuitracker\nxtuitracker\obj\Debug\nxtuitracker.vbproj.GenerateResource.Cache +D:\Google Drive\Development\Visual Basic .NET\NextestUITracker.NET\nxtuitracker\nxtuitracker\obj\Debug\nxtuitrack.exe.manifest +D:\Google Drive\Development\Visual Basic .NET\NextestUITracker.NET\nxtuitracker\nxtuitracker\obj\Debug\nxtuitrack.application +D:\Google Drive\Development\Visual Basic .NET\NextestUITracker.NET\nxtuitracker\nxtuitracker\obj\Debug\nxtuitrack.exe +D:\Google Drive\Development\Visual Basic .NET\NextestUITracker.NET\nxtuitracker\nxtuitracker\obj\Debug\nxtuitrack.xml +D:\Google Drive\Development\Visual Basic .NET\NextestUITracker.NET\nxtuitracker\nxtuitracker\obj\Debug\nxtuitrack.pdb diff --git a/nxtuitracker/obj/Debug/nxtuitracker.vbproj.GenerateResource.Cache b/nxtuitracker/obj/Debug/nxtuitracker.vbproj.GenerateResource.Cache new file mode 100644 index 0000000..04a6081 Binary files /dev/null and b/nxtuitracker/obj/Debug/nxtuitracker.vbproj.GenerateResource.Cache differ diff --git a/nxtuitracker/obj/Debug/nxtuitracker.vbproj.GenerateResource[Conflict].Cache b/nxtuitracker/obj/Debug/nxtuitracker.vbproj.GenerateResource[Conflict].Cache new file mode 100644 index 0000000..1b0e241 Binary files /dev/null and b/nxtuitracker/obj/Debug/nxtuitracker.vbproj.GenerateResource[Conflict].Cache differ diff --git a/nxtuitracker/publish/Application Files/nxtuitracker_1_0_0_0/nxtuitracker.application b/nxtuitracker/publish/Application Files/nxtuitracker_1_0_0_0/nxtuitracker.application new file mode 100644 index 0000000..8c7a283 --- /dev/null +++ b/nxtuitracker/publish/Application Files/nxtuitracker_1_0_0_0/nxtuitracker.application @@ -0,0 +1,18 @@ + + + + + + + + + + + + + + 1sm65skmUm2hqDjEOZM/oBgnkPY= + + + +VZC6Dvh7biw2U04H742h5bgFiGY=ohEEcoYjQ0QXtLMkXULBgq0mDucE3nnppBqYThhKar2YuVWoEETB0LRwiXL4eF4clTykBgXoTgfxKyLOq4zvj/xBBm1tfxg4HB9X1+ZVAzPIN4pQQQ8qU1IdltcCbIlyIYOly/EhJx6BLO0R2UCVhw275Z/GjX5/QAI9ou92Nbo=oi/RVzKF5ERlZdXcHNl7nxFXZy0HzpmzIvFzl/+4TZq8+LPTF5SEnRBgZjA1/Ir2qqpAx2vwhon07/PoLw0NDpMgVXndzEzhgqjoeVCjWvncix+O6ee3TD5z7wIVUhhFTJCOxjOzZZg4gOwUeq25RNqLiH30D8GuMNPVyLLemHs=AQABCN=LSCHQ\yebreojaw+e9U08YdLZRCI06aCIaoM2xs=XUuAxCQTZ2/WzKkqGXMO8VGHkb1Zc21t9QrDyeyvwiwOmr42Pbjp979TDXxkBOctT0o0PVLn245tpXAqp897zzYZwI/ClbciLIjZfZwmIFN0i6iN6ylDa3sqGHcFrpylLxUeWOXU9XzO6eSRbTiTdn5d9zJhgSd6fEAn/dcrAIQ=oi/RVzKF5ERlZdXcHNl7nxFXZy0HzpmzIvFzl/+4TZq8+LPTF5SEnRBgZjA1/Ir2qqpAx2vwhon07/PoLw0NDpMgVXndzEzhgqjoeVCjWvncix+O6ee3TD5z7wIVUhhFTJCOxjOzZZg4gOwUeq25RNqLiH30D8GuMNPVyLLemHs=AQABMIIByTCCATKgAwIBAgIQUseYgX4O061Bufu2e3DVhzANBgkqhkiG9w0BAQUFADAjMSEwHwYDVQQDHhgATABTAEMASABRAFwAeQBlAGIAcgBlAG8wHhcNMTQwMjI4MDUyNzE3WhcNMTUwMjI4MTEyNzE3WjAjMSEwHwYDVQQDHhgATABTAEMASABRAFwAeQBlAGIAcgBlAG8wgZ8wDQYJKoZIhvcNAQEBBQADgY0AMIGJAoGBAKIv0VcyheREZWXV3BzZe58RV2ctB86ZsyLxc5f/uE2avPiz0xeUhJ0QYGYwNfyK9qqqQMdr8IaJ9O/z6C8NDQ6TIFV53cxM4YKo6HlQo1r53Isfjunnt0w+c+8CFVIYRUyQjsYzs2WYOIDsFHqtuUTai4h99A/BrjDT1ciy3ph7AgMBAAEwDQYJKoZIhvcNAQEFBQADgYEAQyoxs7x9QfXJGDpPrWVvhJDpLgnSXAY+66wcxBt38Yas73q85yQ7xYF961YYkftgmmAG2R+QB5cZ2Bho+bGle1KTuTIHaf4hjbQ2d8oji9BSqvkMH9TTP+7uufGOrPMak/eB/8Z6WXvg/JsgNR8mSYciGm3zWt8b0v+ahcH2xgI= \ No newline at end of file diff --git a/nxtuitracker/publish/Application Files/nxtuitracker_1_0_0_0/nxtuitracker.exe.config.deploy b/nxtuitracker/publish/Application Files/nxtuitracker_1_0_0_0/nxtuitracker.exe.config.deploy new file mode 100644 index 0000000..35a77b0 --- /dev/null +++ b/nxtuitracker/publish/Application Files/nxtuitracker_1_0_0_0/nxtuitracker.exe.config.deploy @@ -0,0 +1,6 @@ + + + + + + diff --git a/nxtuitracker/publish/Application Files/nxtuitracker_1_0_0_0/nxtuitracker.exe.deploy b/nxtuitracker/publish/Application Files/nxtuitracker_1_0_0_0/nxtuitracker.exe.deploy new file mode 100644 index 0000000..416286a Binary files /dev/null and b/nxtuitracker/publish/Application Files/nxtuitracker_1_0_0_0/nxtuitracker.exe.deploy differ diff --git a/nxtuitracker/publish/Application Files/nxtuitracker_1_0_0_0/nxtuitracker.exe.manifest b/nxtuitracker/publish/Application Files/nxtuitracker_1_0_0_0/nxtuitracker.exe.manifest new file mode 100644 index 0000000..6b0cb36 --- /dev/null +++ b/nxtuitracker/publish/Application Files/nxtuitracker_1_0_0_0/nxtuitracker.exe.manifest @@ -0,0 +1,75 @@ + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + sN1z8uIQxwwsdFPt9K1WWFjq7FU= + + + + + + + + + + L3I9DOWeEB/P2DpzjuMQmiwf8bM= + + +f96zOtLmRLpYMBB5+iGQf80rcxw=nxTvNRYv7P//YnNTp3g9xs64LUOnJvkLZLlDdbZ0Xcr/T+v6qLgpceE18vzFcwAn2GlhtPhhnIohFz2ghVPZpmAAb6mVbzbMkUwHWVeVyqhZG2OF0xAcnFyC8ReWNRL0mc1TkR9FMTRY12j4DXrDOUCBoKlzlaY1apmsRKg/Ya4=oi/RVzKF5ERlZdXcHNl7nxFXZy0HzpmzIvFzl/+4TZq8+LPTF5SEnRBgZjA1/Ir2qqpAx2vwhon07/PoLw0NDpMgVXndzEzhgqjoeVCjWvncix+O6ee3TD5z7wIVUhhFTJCOxjOzZZg4gOwUeq25RNqLiH30D8GuMNPVyLLemHs=AQABCN=LSCHQ\yebreoiPX8fYHHwYb2FKhZKp0ZFl1t6OI=GGGWd7JSNYImotEDVY3GR7iw6iOLY5YMMaFjs49claD7dlJxz1cHf4/9RZ2xIU3X/00TN3aU1AZmpuR9YnAiG/rPSJACsVZqj3lrFbXTXwPHFVow3x+Ge1It13TvFRIeoCbir6vxlsP3d7Ktrdqs6w9Y5sk9eALg2G4r3YHPMKw=oi/RVzKF5ERlZdXcHNl7nxFXZy0HzpmzIvFzl/+4TZq8+LPTF5SEnRBgZjA1/Ir2qqpAx2vwhon07/PoLw0NDpMgVXndzEzhgqjoeVCjWvncix+O6ee3TD5z7wIVUhhFTJCOxjOzZZg4gOwUeq25RNqLiH30D8GuMNPVyLLemHs=AQABMIIByTCCATKgAwIBAgIQUseYgX4O061Bufu2e3DVhzANBgkqhkiG9w0BAQUFADAjMSEwHwYDVQQDHhgATABTAEMASABRAFwAeQBlAGIAcgBlAG8wHhcNMTQwMjI4MDUyNzE3WhcNMTUwMjI4MTEyNzE3WjAjMSEwHwYDVQQDHhgATABTAEMASABRAFwAeQBlAGIAcgBlAG8wgZ8wDQYJKoZIhvcNAQEBBQADgY0AMIGJAoGBAKIv0VcyheREZWXV3BzZe58RV2ctB86ZsyLxc5f/uE2avPiz0xeUhJ0QYGYwNfyK9qqqQMdr8IaJ9O/z6C8NDQ6TIFV53cxM4YKo6HlQo1r53Isfjunnt0w+c+8CFVIYRUyQjsYzs2WYOIDsFHqtuUTai4h99A/BrjDT1ciy3ph7AgMBAAEwDQYJKoZIhvcNAQEFBQADgYEAQyoxs7x9QfXJGDpPrWVvhJDpLgnSXAY+66wcxBt38Yas73q85yQ7xYF961YYkftgmmAG2R+QB5cZ2Bho+bGle1KTuTIHaf4hjbQ2d8oji9BSqvkMH9TTP+7uufGOrPMak/eB/8Z6WXvg/JsgNR8mSYciGm3zWt8b0v+ahcH2xgI= \ No newline at end of file diff --git a/nxtuitracker/publish/nxtuitracker.application b/nxtuitracker/publish/nxtuitracker.application new file mode 100644 index 0000000..8c7a283 --- /dev/null +++ b/nxtuitracker/publish/nxtuitracker.application @@ -0,0 +1,18 @@ + + + + + + + + + + + + + + 1sm65skmUm2hqDjEOZM/oBgnkPY= + + + +VZC6Dvh7biw2U04H742h5bgFiGY=ohEEcoYjQ0QXtLMkXULBgq0mDucE3nnppBqYThhKar2YuVWoEETB0LRwiXL4eF4clTykBgXoTgfxKyLOq4zvj/xBBm1tfxg4HB9X1+ZVAzPIN4pQQQ8qU1IdltcCbIlyIYOly/EhJx6BLO0R2UCVhw275Z/GjX5/QAI9ou92Nbo=oi/RVzKF5ERlZdXcHNl7nxFXZy0HzpmzIvFzl/+4TZq8+LPTF5SEnRBgZjA1/Ir2qqpAx2vwhon07/PoLw0NDpMgVXndzEzhgqjoeVCjWvncix+O6ee3TD5z7wIVUhhFTJCOxjOzZZg4gOwUeq25RNqLiH30D8GuMNPVyLLemHs=AQABCN=LSCHQ\yebreojaw+e9U08YdLZRCI06aCIaoM2xs=XUuAxCQTZ2/WzKkqGXMO8VGHkb1Zc21t9QrDyeyvwiwOmr42Pbjp979TDXxkBOctT0o0PVLn245tpXAqp897zzYZwI/ClbciLIjZfZwmIFN0i6iN6ylDa3sqGHcFrpylLxUeWOXU9XzO6eSRbTiTdn5d9zJhgSd6fEAn/dcrAIQ=oi/RVzKF5ERlZdXcHNl7nxFXZy0HzpmzIvFzl/+4TZq8+LPTF5SEnRBgZjA1/Ir2qqpAx2vwhon07/PoLw0NDpMgVXndzEzhgqjoeVCjWvncix+O6ee3TD5z7wIVUhhFTJCOxjOzZZg4gOwUeq25RNqLiH30D8GuMNPVyLLemHs=AQABMIIByTCCATKgAwIBAgIQUseYgX4O061Bufu2e3DVhzANBgkqhkiG9w0BAQUFADAjMSEwHwYDVQQDHhgATABTAEMASABRAFwAeQBlAGIAcgBlAG8wHhcNMTQwMjI4MDUyNzE3WhcNMTUwMjI4MTEyNzE3WjAjMSEwHwYDVQQDHhgATABTAEMASABRAFwAeQBlAGIAcgBlAG8wgZ8wDQYJKoZIhvcNAQEBBQADgY0AMIGJAoGBAKIv0VcyheREZWXV3BzZe58RV2ctB86ZsyLxc5f/uE2avPiz0xeUhJ0QYGYwNfyK9qqqQMdr8IaJ9O/z6C8NDQ6TIFV53cxM4YKo6HlQo1r53Isfjunnt0w+c+8CFVIYRUyQjsYzs2WYOIDsFHqtuUTai4h99A/BrjDT1ciy3ph7AgMBAAEwDQYJKoZIhvcNAQEFBQADgYEAQyoxs7x9QfXJGDpPrWVvhJDpLgnSXAY+66wcxBt38Yas73q85yQ7xYF961YYkftgmmAG2R+QB5cZ2Bho+bGle1KTuTIHaf4hjbQ2d8oji9BSqvkMH9TTP+7uufGOrPMak/eB/8Z6WXvg/JsgNR8mSYciGm3zWt8b0v+ahcH2xgI= \ No newline at end of file diff --git a/nxtuitracker/publish/setup.exe b/nxtuitracker/publish/setup.exe new file mode 100644 index 0000000..c33c2ff Binary files /dev/null and b/nxtuitracker/publish/setup.exe differ diff --git a/systemservice/App.config b/systemservice/App.config new file mode 100644 index 0000000..3a327fa --- /dev/null +++ b/systemservice/App.config @@ -0,0 +1,6 @@ + + + + + + diff --git a/systemservice/Form1.Designer.vb b/systemservice/Form1.Designer.vb new file mode 100644 index 0000000..5ebb2a8 --- /dev/null +++ b/systemservice/Form1.Designer.vb @@ -0,0 +1,45 @@ + _ +Partial Class frm_system_svc + Inherits System.Windows.Forms.Form + + 'Form overrides dispose to clean up the component list. + _ + Protected Overrides Sub Dispose(ByVal disposing As Boolean) + Try + If disposing AndAlso components IsNot Nothing Then + components.Dispose() + End If + Finally + MyBase.Dispose(disposing) + End Try + End Sub + + 'Required by the Windows Form Designer + Private components As System.ComponentModel.IContainer + + 'NOTE: The following procedure is required by the Windows Form Designer + 'It can be modified using the Windows Form Designer. + 'Do not modify it using the code editor. + _ + Private Sub InitializeComponent() + Me.components = New System.ComponentModel.Container() + Me.tmr_listener = New System.Windows.Forms.Timer(Me.components) + Me.SuspendLayout() + ' + 'tmr_listener + ' + Me.tmr_listener.Enabled = True + ' + 'frm_system_svc + ' + Me.AutoScaleDimensions = New System.Drawing.SizeF(6.0!, 13.0!) + Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font + Me.ClientSize = New System.Drawing.Size(33, 26) + Me.FormBorderStyle = System.Windows.Forms.FormBorderStyle.None + Me.Name = "frm_system_svc" + Me.ResumeLayout(False) + + End Sub + Friend WithEvents tmr_listener As System.Windows.Forms.Timer + +End Class diff --git a/systemservice/Form1.resx b/systemservice/Form1.resx new file mode 100644 index 0000000..1e6c6ba --- /dev/null +++ b/systemservice/Form1.resx @@ -0,0 +1,123 @@ + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + text/microsoft-resx + + + 2.0 + + + System.Resources.ResXResourceReader, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 + + + System.Resources.ResXResourceWriter, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 + + + 17, 17 + + \ No newline at end of file diff --git a/systemservice/Form1.vb b/systemservice/Form1.vb new file mode 100644 index 0000000..85f1443 --- /dev/null +++ b/systemservice/Form1.vb @@ -0,0 +1,32 @@ +Imports Microsoft.Win32 + +Public Class frm_system_svc + Dim tracker_exepath As String + Private Sub frm_system_svc_Load(sender As Object, e As EventArgs) Handles MyBase.Load + Me.ShowInTaskbar = False + Me.Visible = False + + tracker_exepath = Registry.GetValue("HKEY_LOCAL_MACHINE\SOFTWARE\Lattice\Nextest Utilization Tracker", "Path", "") + End Sub + + Private Sub tmr_listener_Tick(sender As Object, e As EventArgs) Handles tmr_listener.Tick + If IsRunning("nxtuitrack") = False Then + If FileIO.FileSystem.FileExists(tracker_exepath & "\nxtuitrack.exe") = True Then + Shell(tracker_exepath & "\nxtuitrack.exe", AppWinStyle.NormalFocus, False) + End If + End If + End Sub + + Public Function IsRunning(ProcessName As String) As Boolean + + Dim p() As Process + p = Process.GetProcessesByName(ProcessName) + If p.Count > 0 Then + IsRunning = True + Else + IsRunning = False + End If + + + End Function +End Class diff --git a/systemservice/My Project/Application.Designer.vb b/systemservice/My Project/Application.Designer.vb new file mode 100644 index 0000000..fba7ef5 --- /dev/null +++ b/systemservice/My Project/Application.Designer.vb @@ -0,0 +1,38 @@ +'------------------------------------------------------------------------------ +' +' This code was generated by a tool. +' Runtime Version:4.0.30319.18408 +' +' Changes to this file may cause incorrect behavior and will be lost if +' the code is regenerated. +' +'------------------------------------------------------------------------------ + +Option Strict On +Option Explicit On + + +Namespace My + + 'NOTE: This file is auto-generated; do not modify it directly. To make changes, + ' or if you encounter build errors in this file, go to the Project Designer + ' (go to Project Properties or double-click the My Project node in + ' Solution Explorer), and make changes on the Application tab. + ' + Partial Friend Class MyApplication + + _ + Public Sub New() + MyBase.New(Global.Microsoft.VisualBasic.ApplicationServices.AuthenticationMode.Windows) + Me.IsSingleInstance = true + Me.EnableVisualStyles = true + Me.SaveMySettingsOnExit = true + Me.ShutDownStyle = Global.Microsoft.VisualBasic.ApplicationServices.ShutdownMode.AfterMainFormCloses + End Sub + + _ + Protected Overrides Sub OnCreateMainForm() + Me.MainForm = Global.systemservice.frm_system_svc + End Sub + End Class +End Namespace diff --git a/systemservice/My Project/Application.myapp b/systemservice/My Project/Application.myapp new file mode 100644 index 0000000..364a2b4 --- /dev/null +++ b/systemservice/My Project/Application.myapp @@ -0,0 +1,10 @@ + + + true + frm_system_svc + true + 0 + true + 0 + true + \ No newline at end of file diff --git a/systemservice/My Project/AssemblyInfo.vb b/systemservice/My Project/AssemblyInfo.vb new file mode 100644 index 0000000..2ec8e95 --- /dev/null +++ b/systemservice/My Project/AssemblyInfo.vb @@ -0,0 +1,35 @@ +Imports System +Imports System.Reflection +Imports System.Runtime.InteropServices + +' General Information about an assembly is controlled through the following +' set of attributes. Change these attribute values to modify the information +' associated with an assembly. + +' Review the values of the assembly attributes + + + + + + + + + + +'The following GUID is for the ID of the typelib if this project is exposed to COM + + +' Version information for an assembly consists of the following four values: +' +' Major Version +' Minor Version +' Build Number +' Revision +' +' You can specify all the values or you can default the Build and Revision Numbers +' by using the '*' as shown below: +' + + + diff --git a/systemservice/My Project/Resources.Designer.vb b/systemservice/My Project/Resources.Designer.vb new file mode 100644 index 0000000..4333037 --- /dev/null +++ b/systemservice/My Project/Resources.Designer.vb @@ -0,0 +1,63 @@ +'------------------------------------------------------------------------------ +' +' This code was generated by a tool. +' Runtime Version:4.0.30319.18408 +' +' Changes to this file may cause incorrect behavior and will be lost if +' the code is regenerated. +' +'------------------------------------------------------------------------------ + +Option Strict On +Option Explicit On + +Imports System + +Namespace My.Resources + + 'This class was auto-generated by the StronglyTypedResourceBuilder + 'class via a tool like ResGen or Visual Studio. + 'To add or remove a member, edit your .ResX file then rerun ResGen + 'with the /str option, or rebuild your VS project. + ''' + ''' A strongly-typed resource class, for looking up localized strings, etc. + ''' + _ + Friend Module Resources + + Private resourceMan As Global.System.Resources.ResourceManager + + Private resourceCulture As Global.System.Globalization.CultureInfo + + ''' + ''' Returns the cached ResourceManager instance used by this class. + ''' + _ + Friend ReadOnly Property ResourceManager() As Global.System.Resources.ResourceManager + Get + If Object.ReferenceEquals(resourceMan, Nothing) Then + Dim temp As Global.System.Resources.ResourceManager = New Global.System.Resources.ResourceManager("systemservice.Resources", GetType(Resources).Assembly) + resourceMan = temp + End If + Return resourceMan + End Get + End Property + + ''' + ''' Overrides the current thread's CurrentUICulture property for all + ''' resource lookups using this strongly typed resource class. + ''' + _ + Friend Property Culture() As Global.System.Globalization.CultureInfo + Get + Return resourceCulture + End Get + Set + resourceCulture = value + End Set + End Property + End Module +End Namespace diff --git a/systemservice/My Project/Resources.resx b/systemservice/My Project/Resources.resx new file mode 100644 index 0000000..af7dbeb --- /dev/null +++ b/systemservice/My Project/Resources.resx @@ -0,0 +1,117 @@ + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + text/microsoft-resx + + + 2.0 + + + System.Resources.ResXResourceReader, System.Windows.Forms, Version=2.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 + + + System.Resources.ResXResourceWriter, System.Windows.Forms, Version=2.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 + + \ No newline at end of file diff --git a/systemservice/My Project/Settings.Designer.vb b/systemservice/My Project/Settings.Designer.vb new file mode 100644 index 0000000..8c79386 --- /dev/null +++ b/systemservice/My Project/Settings.Designer.vb @@ -0,0 +1,73 @@ +'------------------------------------------------------------------------------ +' +' This code was generated by a tool. +' Runtime Version:4.0.30319.18408 +' +' Changes to this file may cause incorrect behavior and will be lost if +' the code is regenerated. +' +'------------------------------------------------------------------------------ + +Option Strict On +Option Explicit On + + +Namespace My + + _ + Partial Friend NotInheritable Class MySettings + Inherits Global.System.Configuration.ApplicationSettingsBase + + Private Shared defaultInstance As MySettings = CType(Global.System.Configuration.ApplicationSettingsBase.Synchronized(New MySettings()),MySettings) + +#Region "My.Settings Auto-Save Functionality" +#If _MyType = "WindowsForms" Then + Private Shared addedHandler As Boolean + + Private Shared addedHandlerLockObject As New Object + + _ + Private Shared Sub AutoSaveSettings(ByVal sender As Global.System.Object, ByVal e As Global.System.EventArgs) + If My.Application.SaveMySettingsOnExit Then + My.Settings.Save() + End If + End Sub +#End If +#End Region + + Public Shared ReadOnly Property [Default]() As MySettings + Get + +#If _MyType = "WindowsForms" Then + If Not addedHandler Then + SyncLock addedHandlerLockObject + If Not addedHandler Then + AddHandler My.Application.Shutdown, AddressOf AutoSaveSettings + addedHandler = True + End If + End SyncLock + End If +#End If + Return defaultInstance + End Get + End Property + End Class +End Namespace + +Namespace My + + _ + Friend Module MySettingsProperty + + _ + Friend ReadOnly Property Settings() As Global.systemservice.My.MySettings + Get + Return Global.systemservice.My.MySettings.Default + End Get + End Property + End Module +End Namespace diff --git a/systemservice/My Project/Settings.settings b/systemservice/My Project/Settings.settings new file mode 100644 index 0000000..85b890b --- /dev/null +++ b/systemservice/My Project/Settings.settings @@ -0,0 +1,7 @@ + + + + + + + diff --git a/systemservice/bin/Debug/systemservice.exe b/systemservice/bin/Debug/systemservice.exe new file mode 100644 index 0000000..e883378 Binary files /dev/null and b/systemservice/bin/Debug/systemservice.exe differ diff --git a/systemservice/bin/Debug/systemservice.exe.config b/systemservice/bin/Debug/systemservice.exe.config new file mode 100644 index 0000000..3a327fa --- /dev/null +++ b/systemservice/bin/Debug/systemservice.exe.config @@ -0,0 +1,6 @@ + + + + + + diff --git a/systemservice/bin/Debug/systemservice.pdb b/systemservice/bin/Debug/systemservice.pdb new file mode 100644 index 0000000..d6f4aad Binary files /dev/null and b/systemservice/bin/Debug/systemservice.pdb differ diff --git a/systemservice/bin/Debug/systemservice.xml b/systemservice/bin/Debug/systemservice.xml new file mode 100644 index 0000000..299b2d5 --- /dev/null +++ b/systemservice/bin/Debug/systemservice.xml @@ -0,0 +1,24 @@ + + + + +systemservice + + + + + + Returns the cached ResourceManager instance used by this class. + + + + Overrides the current thread's CurrentUICulture property for all + resource lookups using this strongly typed resource class. + + + + A strongly-typed resource class, for looking up localized strings, etc. + + + + \ No newline at end of file diff --git a/systemservice/obj/Debug/DesignTimeResolveAssemblyReferences.cache b/systemservice/obj/Debug/DesignTimeResolveAssemblyReferences.cache new file mode 100644 index 0000000..5811f96 Binary files /dev/null and b/systemservice/obj/Debug/DesignTimeResolveAssemblyReferences.cache differ diff --git a/systemservice/obj/Debug/DesignTimeResolveAssemblyReferencesInput (1).cache b/systemservice/obj/Debug/DesignTimeResolveAssemblyReferencesInput (1).cache new file mode 100644 index 0000000..99cc75f Binary files /dev/null and b/systemservice/obj/Debug/DesignTimeResolveAssemblyReferencesInput (1).cache differ diff --git a/systemservice/obj/Debug/DesignTimeResolveAssemblyReferencesInput.cache b/systemservice/obj/Debug/DesignTimeResolveAssemblyReferencesInput.cache new file mode 100644 index 0000000..dfc608e Binary files /dev/null and b/systemservice/obj/Debug/DesignTimeResolveAssemblyReferencesInput.cache differ diff --git a/systemservice/obj/Debug/TempPE/My Project.Resources.Designer.vb.dll b/systemservice/obj/Debug/TempPE/My Project.Resources.Designer.vb.dll new file mode 100644 index 0000000..f3406d1 Binary files /dev/null and b/systemservice/obj/Debug/TempPE/My Project.Resources.Designer.vb.dll differ diff --git a/systemservice/obj/Debug/systemservice (1).exe b/systemservice/obj/Debug/systemservice (1).exe new file mode 100644 index 0000000..056712e Binary files /dev/null and b/systemservice/obj/Debug/systemservice (1).exe differ diff --git a/systemservice/obj/Debug/systemservice (1).pdb b/systemservice/obj/Debug/systemservice (1).pdb new file mode 100644 index 0000000..1d2a870 Binary files /dev/null and b/systemservice/obj/Debug/systemservice (1).pdb differ diff --git a/systemservice/obj/Debug/systemservice.Resources.resources b/systemservice/obj/Debug/systemservice.Resources.resources new file mode 100644 index 0000000..6c05a97 Binary files /dev/null and b/systemservice/obj/Debug/systemservice.Resources.resources differ diff --git a/systemservice/obj/Debug/systemservice.exe b/systemservice/obj/Debug/systemservice.exe new file mode 100644 index 0000000..e883378 Binary files /dev/null and b/systemservice/obj/Debug/systemservice.exe differ diff --git a/systemservice/obj/Debug/systemservice.frm_system_svc.resources b/systemservice/obj/Debug/systemservice.frm_system_svc.resources new file mode 100644 index 0000000..6c05a97 Binary files /dev/null and b/systemservice/obj/Debug/systemservice.frm_system_svc.resources differ diff --git a/systemservice/obj/Debug/systemservice.pdb b/systemservice/obj/Debug/systemservice.pdb new file mode 100644 index 0000000..d6f4aad Binary files /dev/null and b/systemservice/obj/Debug/systemservice.pdb differ diff --git a/systemservice/obj/Debug/systemservice.vbproj.FileListAbsolute (1).txt b/systemservice/obj/Debug/systemservice.vbproj.FileListAbsolute (1).txt new file mode 100644 index 0000000..165269a --- /dev/null +++ b/systemservice/obj/Debug/systemservice.vbproj.FileListAbsolute (1).txt @@ -0,0 +1,20 @@ +C:\Users\yebreo\Google Drive\Visual Studio .NET\NextestUITracker.NET\nxtuitracker\systemservice\bin\Debug\systemservice.exe.config +C:\Users\yebreo\Google Drive\Visual Studio .NET\NextestUITracker.NET\nxtuitracker\systemservice\bin\Debug\systemservice.exe +C:\Users\yebreo\Google Drive\Visual Studio .NET\NextestUITracker.NET\nxtuitracker\systemservice\bin\Debug\systemservice.pdb +C:\Users\yebreo\Google Drive\Visual Studio .NET\NextestUITracker.NET\nxtuitracker\systemservice\bin\Debug\systemservice.xml +C:\Users\yebreo\Google Drive\Visual Studio .NET\NextestUITracker.NET\nxtuitracker\systemservice\obj\Debug\systemservice.frm_system_svc.resources +C:\Users\yebreo\Google Drive\Visual Studio .NET\NextestUITracker.NET\nxtuitracker\systemservice\obj\Debug\systemservice.Resources.resources +C:\Users\yebreo\Google Drive\Visual Studio .NET\NextestUITracker.NET\nxtuitracker\systemservice\obj\Debug\systemservice.vbproj.GenerateResource.Cache +C:\Users\yebreo\Google Drive\Visual Studio .NET\NextestUITracker.NET\nxtuitracker\systemservice\obj\Debug\systemservice.exe +C:\Users\yebreo\Google Drive\Visual Studio .NET\NextestUITracker.NET\nxtuitracker\systemservice\obj\Debug\systemservice.xml +C:\Users\yebreo\Google Drive\Visual Studio .NET\NextestUITracker.NET\nxtuitracker\systemservice\obj\Debug\systemservice.pdb +C:\Users\yebreo1\Google Drive\Development\Visual Basic .NET\NextestUITracker.NET\nxtuitracker\systemservice\bin\Debug\systemservice.exe.config +C:\Users\yebreo1\Google Drive\Development\Visual Basic .NET\NextestUITracker.NET\nxtuitracker\systemservice\bin\Debug\systemservice.exe +C:\Users\yebreo1\Google Drive\Development\Visual Basic .NET\NextestUITracker.NET\nxtuitracker\systemservice\bin\Debug\systemservice.pdb +C:\Users\yebreo1\Google Drive\Development\Visual Basic .NET\NextestUITracker.NET\nxtuitracker\systemservice\bin\Debug\systemservice.xml +C:\Users\yebreo1\Google Drive\Development\Visual Basic .NET\NextestUITracker.NET\nxtuitracker\systemservice\obj\Debug\systemservice.frm_system_svc.resources +C:\Users\yebreo1\Google Drive\Development\Visual Basic .NET\NextestUITracker.NET\nxtuitracker\systemservice\obj\Debug\systemservice.Resources.resources +C:\Users\yebreo1\Google Drive\Development\Visual Basic .NET\NextestUITracker.NET\nxtuitracker\systemservice\obj\Debug\systemservice.vbproj.GenerateResource.Cache +C:\Users\yebreo1\Google Drive\Development\Visual Basic .NET\NextestUITracker.NET\nxtuitracker\systemservice\obj\Debug\systemservice.exe +C:\Users\yebreo1\Google Drive\Development\Visual Basic .NET\NextestUITracker.NET\nxtuitracker\systemservice\obj\Debug\systemservice.xml +C:\Users\yebreo1\Google Drive\Development\Visual Basic .NET\NextestUITracker.NET\nxtuitracker\systemservice\obj\Debug\systemservice.pdb diff --git a/systemservice/obj/Debug/systemservice.vbproj.FileListAbsolute.txt b/systemservice/obj/Debug/systemservice.vbproj.FileListAbsolute.txt new file mode 100644 index 0000000..8f60f50 --- /dev/null +++ b/systemservice/obj/Debug/systemservice.vbproj.FileListAbsolute.txt @@ -0,0 +1,20 @@ +C:\Users\yebreo\Google Drive\Visual Studio .NET\NextestUITracker.NET\nxtuitracker\systemservice\bin\Debug\systemservice.exe.config +C:\Users\yebreo\Google Drive\Visual Studio .NET\NextestUITracker.NET\nxtuitracker\systemservice\bin\Debug\systemservice.exe +C:\Users\yebreo\Google Drive\Visual Studio .NET\NextestUITracker.NET\nxtuitracker\systemservice\bin\Debug\systemservice.pdb +C:\Users\yebreo\Google Drive\Visual Studio .NET\NextestUITracker.NET\nxtuitracker\systemservice\bin\Debug\systemservice.xml +C:\Users\yebreo\Google Drive\Visual Studio .NET\NextestUITracker.NET\nxtuitracker\systemservice\obj\Debug\systemservice.frm_system_svc.resources +C:\Users\yebreo\Google Drive\Visual Studio .NET\NextestUITracker.NET\nxtuitracker\systemservice\obj\Debug\systemservice.Resources.resources +C:\Users\yebreo\Google Drive\Visual Studio .NET\NextestUITracker.NET\nxtuitracker\systemservice\obj\Debug\systemservice.vbproj.GenerateResource.Cache +C:\Users\yebreo\Google Drive\Visual Studio .NET\NextestUITracker.NET\nxtuitracker\systemservice\obj\Debug\systemservice.exe +C:\Users\yebreo\Google Drive\Visual Studio .NET\NextestUITracker.NET\nxtuitracker\systemservice\obj\Debug\systemservice.xml +C:\Users\yebreo\Google Drive\Visual Studio .NET\NextestUITracker.NET\nxtuitracker\systemservice\obj\Debug\systemservice.pdb +D:\Google Drive\Development\Visual Basic .NET\NextestUITracker.NET\nxtuitracker\systemservice\bin\Debug\systemservice.exe.config +D:\Google Drive\Development\Visual Basic .NET\NextestUITracker.NET\nxtuitracker\systemservice\bin\Debug\systemservice.exe +D:\Google Drive\Development\Visual Basic .NET\NextestUITracker.NET\nxtuitracker\systemservice\bin\Debug\systemservice.pdb +D:\Google Drive\Development\Visual Basic .NET\NextestUITracker.NET\nxtuitracker\systemservice\bin\Debug\systemservice.xml +D:\Google Drive\Development\Visual Basic .NET\NextestUITracker.NET\nxtuitracker\systemservice\obj\Debug\systemservice.frm_system_svc.resources +D:\Google Drive\Development\Visual Basic .NET\NextestUITracker.NET\nxtuitracker\systemservice\obj\Debug\systemservice.Resources.resources +D:\Google Drive\Development\Visual Basic .NET\NextestUITracker.NET\nxtuitracker\systemservice\obj\Debug\systemservice.vbproj.GenerateResource.Cache +D:\Google Drive\Development\Visual Basic .NET\NextestUITracker.NET\nxtuitracker\systemservice\obj\Debug\systemservice.exe +D:\Google Drive\Development\Visual Basic .NET\NextestUITracker.NET\nxtuitracker\systemservice\obj\Debug\systemservice.xml +D:\Google Drive\Development\Visual Basic .NET\NextestUITracker.NET\nxtuitracker\systemservice\obj\Debug\systemservice.pdb diff --git a/systemservice/obj/Debug/systemservice.vbproj.FileListAbsolute[Conflict].txt b/systemservice/obj/Debug/systemservice.vbproj.FileListAbsolute[Conflict].txt new file mode 100644 index 0000000..8f60f50 --- /dev/null +++ b/systemservice/obj/Debug/systemservice.vbproj.FileListAbsolute[Conflict].txt @@ -0,0 +1,20 @@ +C:\Users\yebreo\Google Drive\Visual Studio .NET\NextestUITracker.NET\nxtuitracker\systemservice\bin\Debug\systemservice.exe.config +C:\Users\yebreo\Google Drive\Visual Studio .NET\NextestUITracker.NET\nxtuitracker\systemservice\bin\Debug\systemservice.exe +C:\Users\yebreo\Google Drive\Visual Studio .NET\NextestUITracker.NET\nxtuitracker\systemservice\bin\Debug\systemservice.pdb +C:\Users\yebreo\Google Drive\Visual Studio .NET\NextestUITracker.NET\nxtuitracker\systemservice\bin\Debug\systemservice.xml +C:\Users\yebreo\Google Drive\Visual Studio .NET\NextestUITracker.NET\nxtuitracker\systemservice\obj\Debug\systemservice.frm_system_svc.resources +C:\Users\yebreo\Google Drive\Visual Studio .NET\NextestUITracker.NET\nxtuitracker\systemservice\obj\Debug\systemservice.Resources.resources +C:\Users\yebreo\Google Drive\Visual Studio .NET\NextestUITracker.NET\nxtuitracker\systemservice\obj\Debug\systemservice.vbproj.GenerateResource.Cache +C:\Users\yebreo\Google Drive\Visual Studio .NET\NextestUITracker.NET\nxtuitracker\systemservice\obj\Debug\systemservice.exe +C:\Users\yebreo\Google Drive\Visual Studio .NET\NextestUITracker.NET\nxtuitracker\systemservice\obj\Debug\systemservice.xml +C:\Users\yebreo\Google Drive\Visual Studio .NET\NextestUITracker.NET\nxtuitracker\systemservice\obj\Debug\systemservice.pdb +D:\Google Drive\Development\Visual Basic .NET\NextestUITracker.NET\nxtuitracker\systemservice\bin\Debug\systemservice.exe.config +D:\Google Drive\Development\Visual Basic .NET\NextestUITracker.NET\nxtuitracker\systemservice\bin\Debug\systemservice.exe +D:\Google Drive\Development\Visual Basic .NET\NextestUITracker.NET\nxtuitracker\systemservice\bin\Debug\systemservice.pdb +D:\Google Drive\Development\Visual Basic .NET\NextestUITracker.NET\nxtuitracker\systemservice\bin\Debug\systemservice.xml +D:\Google Drive\Development\Visual Basic .NET\NextestUITracker.NET\nxtuitracker\systemservice\obj\Debug\systemservice.frm_system_svc.resources +D:\Google Drive\Development\Visual Basic .NET\NextestUITracker.NET\nxtuitracker\systemservice\obj\Debug\systemservice.Resources.resources +D:\Google Drive\Development\Visual Basic .NET\NextestUITracker.NET\nxtuitracker\systemservice\obj\Debug\systemservice.vbproj.GenerateResource.Cache +D:\Google Drive\Development\Visual Basic .NET\NextestUITracker.NET\nxtuitracker\systemservice\obj\Debug\systemservice.exe +D:\Google Drive\Development\Visual Basic .NET\NextestUITracker.NET\nxtuitracker\systemservice\obj\Debug\systemservice.xml +D:\Google Drive\Development\Visual Basic .NET\NextestUITracker.NET\nxtuitracker\systemservice\obj\Debug\systemservice.pdb diff --git a/systemservice/obj/Debug/systemservice.vbproj.GenerateResource (1).Cache b/systemservice/obj/Debug/systemservice.vbproj.GenerateResource (1).Cache new file mode 100644 index 0000000..bd31d64 Binary files /dev/null and b/systemservice/obj/Debug/systemservice.vbproj.GenerateResource (1).Cache differ diff --git a/systemservice/obj/Debug/systemservice.vbproj.GenerateResource.Cache b/systemservice/obj/Debug/systemservice.vbproj.GenerateResource.Cache new file mode 100644 index 0000000..bd31d64 Binary files /dev/null and b/systemservice/obj/Debug/systemservice.vbproj.GenerateResource.Cache differ diff --git a/systemservice/obj/Debug/systemservice.vbproj.GenerateResource[Conflict].Cache b/systemservice/obj/Debug/systemservice.vbproj.GenerateResource[Conflict].Cache new file mode 100644 index 0000000..bd31d64 Binary files /dev/null and b/systemservice/obj/Debug/systemservice.vbproj.GenerateResource[Conflict].Cache differ diff --git a/systemservice/obj/Debug/systemservice.xml b/systemservice/obj/Debug/systemservice.xml new file mode 100644 index 0000000..299b2d5 --- /dev/null +++ b/systemservice/obj/Debug/systemservice.xml @@ -0,0 +1,24 @@ + + + + +systemservice + + + + + + Returns the cached ResourceManager instance used by this class. + + + + Overrides the current thread's CurrentUICulture property for all + resource lookups using this strongly typed resource class. + + + + A strongly-typed resource class, for looking up localized strings, etc. + + + + \ No newline at end of file diff --git a/systemservice/obj/Debug/systemservice[Conflict].exe b/systemservice/obj/Debug/systemservice[Conflict].exe new file mode 100644 index 0000000..9be1da7 Binary files /dev/null and b/systemservice/obj/Debug/systemservice[Conflict].exe differ diff --git a/systemservice/obj/Debug/systemservice[Conflict].pdb b/systemservice/obj/Debug/systemservice[Conflict].pdb new file mode 100644 index 0000000..6790516 Binary files /dev/null and b/systemservice/obj/Debug/systemservice[Conflict].pdb differ diff --git a/systemservice/systemservice.vbproj b/systemservice/systemservice.vbproj new file mode 100644 index 0000000..7e030f3 --- /dev/null +++ b/systemservice/systemservice.vbproj @@ -0,0 +1,128 @@ + + + + + Debug + AnyCPU + {01556481-F900-495D-8FE9-4E6E90250C9C} + WinExe + systemservice.My.MyApplication + systemservice + systemservice + 512 + WindowsForms + v4.0 + + + + x86 + true + full + true + true + bin\Debug\ + systemservice.xml + 42016,41999,42017,42018,42019,42032,42036,42020,42021,42022 + + + AnyCPU + pdbonly + false + true + true + bin\Release\ + systemservice.xml + 42016,41999,42017,42018,42019,42032,42036,42020,42021,42022 + + + On + + + Binary + + + Off + + + On + + + + + + + + + + + + + + + + + + + + + + + + + + + + Form + + + Form1.vb + Form + + + + True + Application.myapp + + + True + True + Resources.resx + + + True + Settings.settings + True + + + + + Form1.vb + + + VbMyResourcesResXFileCodeGenerator + Resources.Designer.vb + My.Resources + Designer + + + + + MyApplicationCodeGenerator + Application.Designer.vb + + + SettingsSingleFileGenerator + My + Settings.Designer.vb + + + + + + \ No newline at end of file