Sub FixCamManager()
        DeleteIfExists("c:\iris\ini\CamManager.INI")
        Dim CamManagerIni As New PrivateIniFile("c:\iris\ini\CamManager.INI")
        CamManagerIni.WriteString("CamManager", "LogLevel", "1")
        CamManagerIni.WriteString("CamManager", "Port", "9659")
        '****************************************************************************
        'Paul E. 8/18/2021
        ' After the temp change Patrick made, we discuss it and added a aux key to the POSConfig files
        '  The rule is empty key/value will default to old URL "PictureCatch.cgi?;username=admin&password=WHBAlcom12230&channel=1"
        '              Currently the only other expected UR is "images/snapshot.jpg"
        CamManagerIni.WriteString("Camera1", "url", "http://" & PosMaint.StoreIP & ".18/" & PosMaint.GeovisionCaptureURL)
        CamManagerIni.WriteString("Camera2", "url", "http://" & PosMaint.StoreIP & ".19/" & PosMaint.GeovisionCaptureURL)


        'Old Code, can be removed after some time.
        'This was a change for the GV-TDR2700 cameras. PCROMIE 8/12/2021
        'The camera config has the HTTP protocol turned off which means it will not ask for Authentication. Might need to revisit
        'CamManagerIni.WriteString("Camera1", "url", "http://" & PosMaint.StoreIP & ".18/images/snapshot.jpg?;username=admin&password=WHBAlcom12230&channel=1")
        'CamManagerIni.WriteString("Camera2", "url", "http://" & PosMaint.StoreIP & ".19/images/snapshot.jpg?;username=admin&password=WHBAlcom12230&channel=1")
        'CamManagerIni.WriteString("Camera1", "url", "http://" & PosMaint.StoreIP & ".18/PictureCatch.cgi?;username=admin&password=WHBAlcom12230&channel=1")
        'CamManagerIni.WriteString("Camera2", "url", "http://" & PosMaint.StoreIP & ".19/PictureCatch.cgi?;username=admin&password=WHBAlcom12230&channel=1")

        '****************************************************************************

        CamManagerIni = Nothing
        CopyINIToRegInfo("CamManager.ini")
    End Sub