vb Code:
Private Sub frmMain_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Load
Try
Me.Text = vString
TimeCounter = CULng(GetSetting(AppName, Section, "TimeCounter", "0"))
Number = CULng(GetSetting(AppName, Section, "Number", "1"))
LastFound = CULng(GetSetting(AppName, Section, "LastFound", "0"))
Counter = CULng(GetSetting(AppName, Section, "Counter", "0"))
Found = CULng(GetSetting(AppName, Section, "Found", "0"))
LastNameUsed = CShort(GetSetting(AppName, Section, "LastNameUsed", "0"))
Iteration = CShort(GetSetting(AppName, Section, "Iteration", "0"))
IterCount = Iteration
TotalTime = TimeCounter / 3600
UpdateDisplay()
Me.shp1.FillColor = Color.Red
FilePath = Command() & "\"
Catch ex As Exception
Msgbox(ex.ToString)
End Try
End Sub
Run that on the target machine and see if anything helpful pops up.