Ошибка при исполнении макроса 1037 windows

Hi Jeff

Here is a bit of RoboHistory for you.

20 years ago when I started using RoboHelp, WinHelp was the output of the day. Windows 3.1 was dominant and the compiled help format was called WinHelp. Files existed in a format using a .HLP file extension.

In that format, help simply opened in a window. Often, the help author had do devise their own form of navigating the system. There was a Table of Contents, but you opened it separately.

eHelp Corporation (owners of RoboHelp at that time) came up with a new format that packaged the TOC together in a format that looks a lot like CHM output. That format was called WinHelp 2000 and it was achieved using special DLLs to implement the changes.

Additionally, only RoboHelp for Word was/is capable of creating this type of help. AFAIK it was never possible with RoboHelp HTML.

Cheers… Rick

  • Home
  • VBForums
  • Visual Basic
  • Visual Basic 6 and Earlier
  • [RESOLVED] Window 7 FIx to WinHelp Error [1037]

  1. Jun 26th, 2014, 10:36 PM


    #1

    dw85745 is offline

    Thread Starter


    PowerPoster


    Resolved [RESOLVED] Window 7 FIx to WinHelp Error [1037]

    With the installation of VB5 on Window 7 (32 bit) , Help did NOT work.
    Installed Microsoft’s recommended KB, which allowed VB Help to show, but Help examples were missing.
    Received Error: «There was a problem running the macro (1037).

    Finally found a fix using Regedit.

    1) Create Key: HKLM\Software\Microsoft\WinHelp
    2) Create a DWORD SubKey with name» «AllowProgrammaticMacros» ‘<<One word, and no quotes
    3) Give SubKey a value of «1» ‘<<no quotes

    Hope this help someone else.


  2. Dec 30th, 2018, 02:13 AM


    #2

    Re: [RESOLVED] Window 7 FIx to WinHelp Error [1037]

    The above will NOT work for Windows 7 64b Systems, where you have to use the following procedure using Regedit:

    1) Create Key: HKLM/SOFTWARE/Wow6432Node/Microsoft/WinHelp
    2) Create a DWORD SubKey with name» «AllowProgrammaticMacros» ‘<<One word, and no quotes
    3) Give SubKey a value of «1» ‘<<no quotes

    (Reference: https://answers.microsoft.com/en-us/…c-29e46b2923d1)

    After doing the above you may receive the following error when trying to open a .hlp extensions file:

    —————————
    Windows Help
    —————————
    Cannot find or load the file inetwh32.dll. This file should be copied to C:\Windows\system32 or a directory in your PATH.
    —————————
    OK
    —————————

    Meaning you will have to download the missing file �inetwh32.dll�

    ATTENTION: After downloading the above file do NOT copy it to:

    �C:\Windows\system32�, instead, copy it to:

    �C:\Windows\SysWOW64�

    That�s it, the error is now fixed for your Windows 7 64b System.


  • Home
  • VBForums
  • Visual Basic
  • Visual Basic 6 and Earlier
  • [RESOLVED] Window 7 FIx to WinHelp Error [1037]


Posting Permissions

  • You may not post new threads
  • You may not post replies
  • You may not post attachments
  • You may not edit your posts
  •  
  • BB code is On
  • Smilies are On
  • [IMG] code is On
  • [VIDEO] code is On
  • HTML code is Off

Forum Rules


Click Here to Expand Forum to Full Width

+ 1037.mst 5c6f8ebea7aa4787976099e8f285b8cb 20.00 KB
Софт Adobe Acrobat XI Pro 2012
Создано Adobe Systems Incorporated
Версия ОС Windows 10
Архитектура 64-разрядная (x64)
Размер 20480
MD5 5c6f8ebea7aa4787976099e8f285b8cb
Контрольная сумма SHA1 7fb098428291477cd9bf4078cc8219ba2910b050
CRC32: 1b5baeb1
каталог C:\Windows\System32\
+ 1037.mst fe71fe40665bbaeab61002d58ad48c52 28.00 KB
Софт HP DESIGNJET 2013
Создано Hewlett-Packard Development Company, L.P.
Версия ОС Windows 2003 Server
Архитектура 64-разрядная (x64)
Размер 28672
MD5 fe71fe40665bbaeab61002d58ad48c52
Контрольная сумма SHA1 afd25b5c20a949bea8b7bda09d054b8e50353d21
CRC32: e52390a9
каталог C:\Windows\System32\
+ 1037.mst da5501da1252e9a4854b3ccdd31f13d7 28.00 KB
Софт HP DESIGNJET 2013
Создано Hewlett-Packard Development Company, L.P.
Версия ОС Windows 2003 Server
Архитектура 64-разрядная (x64)
Размер 28672
MD5 da5501da1252e9a4854b3ccdd31f13d7
Контрольная сумма SHA1 271d85b0249b507cf8c95ecc53d7c8b88bdf2357
CRC32: adcda900
каталог C:\Windows\System32\
+ 1037.mst fe71fe40665bbaeab61002d58ad48c52 28.00 KB
Софт HP DESIGNJET 2013
Создано Hewlett-Packard Development Company, L.P.
Версия ОС Windows Server 2003
Архитектура 64-разрядная (x64)
Размер 28672
MD5 fe71fe40665bbaeab61002d58ad48c52
Контрольная сумма SHA1 afd25b5c20a949bea8b7bda09d054b8e50353d21
CRC32: e52390a9
каталог C:\Windows\System32\
+ 1037.mst da5501da1252e9a4854b3ccdd31f13d7 28.00 KB
Софт HP DESIGNJET 2013
Создано Hewlett-Packard Development Company, L.P.
Версия ОС Windows Server 2003
Архитектура 64-разрядная (x64)
Размер 28672
MD5 da5501da1252e9a4854b3ccdd31f13d7
Контрольная сумма SHA1 271d85b0249b507cf8c95ecc53d7c8b88bdf2357
CRC32: adcda900
каталог C:\Windows\System32\
+ 1037.mst fe71fe40665bbaeab61002d58ad48c52 28.00 KB
Софт HP DESIGNJET 2013
Создано Hewlett-Packard Development Company, L.P.
Версия ОС Windows 2000
Архитектура 64-разрядная (x64)
Размер 28672
MD5 fe71fe40665bbaeab61002d58ad48c52
Контрольная сумма SHA1 afd25b5c20a949bea8b7bda09d054b8e50353d21
CRC32: e52390a9
каталог C:\Windows\System32\
+ 1037.mst da5501da1252e9a4854b3ccdd31f13d7 28.00 KB
Софт HP DESIGNJET 2013
Создано Hewlett-Packard Development Company, L.P.
Версия ОС Windows 2000
Архитектура 64-разрядная (x64)
Размер 28672
MD5 da5501da1252e9a4854b3ccdd31f13d7
Контрольная сумма SHA1 271d85b0249b507cf8c95ecc53d7c8b88bdf2357
CRC32: adcda900
каталог C:\Windows\System32\
+ 1037.mst fe71fe40665bbaeab61002d58ad48c52 28.00 KB
Софт HP DESIGNJET 2013
Создано Hewlett-Packard Development Company, L.P.
Версия ОС Windows Vista
Архитектура 64-разрядная (x64)
Размер 28672
MD5 fe71fe40665bbaeab61002d58ad48c52
Контрольная сумма SHA1 afd25b5c20a949bea8b7bda09d054b8e50353d21
CRC32: e52390a9
каталог C:\Windows\System32\
+ 1037.mst da5501da1252e9a4854b3ccdd31f13d7 28.00 KB
Софт HP DESIGNJET 2013
Создано Hewlett-Packard Development Company, L.P.
Версия ОС Windows Vista
Архитектура 64-разрядная (x64)
Размер 28672
MD5 da5501da1252e9a4854b3ccdd31f13d7
Контрольная сумма SHA1 271d85b0249b507cf8c95ecc53d7c8b88bdf2357
CRC32: adcda900
каталог C:\Windows\System32\
+ 1037.mst fe71fe40665bbaeab61002d58ad48c52 28.00 KB
Софт HP DESIGNJET 2013
Создано Hewlett-Packard Development Company, L.P.
Версия ОС Windows XP
Архитектура 64-разрядная (x64)
Размер 28672
MD5 fe71fe40665bbaeab61002d58ad48c52
Контрольная сумма SHA1 afd25b5c20a949bea8b7bda09d054b8e50353d21
CRC32: e52390a9
каталог C:\Windows\System32\
+ 1037.mst da5501da1252e9a4854b3ccdd31f13d7 28.00 KB
Софт HP DESIGNJET 2013
Создано Hewlett-Packard Development Company, L.P.
Версия ОС Windows XP
Архитектура 64-разрядная (x64)
Размер 28672
MD5 da5501da1252e9a4854b3ccdd31f13d7
Контрольная сумма SHA1 271d85b0249b507cf8c95ecc53d7c8b88bdf2357
CRC32: adcda900
каталог C:\Windows\System32\
+ 1037.mst 088694dba3e71c7b5175a50bfe870432 109.00 KB
Софт HP DeskJet 6500 Series 2004
Создано Hewlett Packard
Версия ОС Mac OS 9.2
Архитектура 64-разрядная (x64)
Размер 111616
MD5 088694dba3e71c7b5175a50bfe870432
Контрольная сумма SHA1 411882baa14e19f76960029d95c245ed2ea9583c
CRC32: 5e63cfaf
+ 1037.mst 088694dba3e71c7b5175a50bfe870432 109.00 KB
Софт HP DeskJet 6500 Series 2004
Создано Hewlett Packard
Версия ОС Mac OS X 10.1.5
Архитектура 64-разрядная (x64)
Размер 111616
MD5 088694dba3e71c7b5175a50bfe870432
Контрольная сумма SHA1 411882baa14e19f76960029d95c245ed2ea9583c
CRC32: 5e63cfaf
+ 1037.mst 088694dba3e71c7b5175a50bfe870432 109.00 KB
Софт HP DeskJet 6500 Series 2004
Создано Hewlett Packard
Версия ОС Mac OS 9.1
Архитектура 64-разрядная (x64)
Размер 111616
MD5 088694dba3e71c7b5175a50bfe870432
Контрольная сумма SHA1 411882baa14e19f76960029d95c245ed2ea9583c
CRC32: 5e63cfaf
+ 1037.mst 088694dba3e71c7b5175a50bfe870432 109.00 KB
Софт HP DeskJet 6500 Series 2004
Создано Hewlett Packard
Версия ОС Windows 2000
Архитектура 64-разрядная (x64)
Размер 111616
MD5 088694dba3e71c7b5175a50bfe870432
Контрольная сумма SHA1 411882baa14e19f76960029d95c245ed2ea9583c
CRC32: 5e63cfaf
каталог C:\Windows\System32\
+ 1037.mst 088694dba3e71c7b5175a50bfe870432 109.00 KB
Софт HP DeskJet 6500 Series 2004
Создано Hewlett Packard
Версия ОС Windows 98
Архитектура 64-разрядная (x64)
Размер 111616
MD5 088694dba3e71c7b5175a50bfe870432
Контрольная сумма SHA1 411882baa14e19f76960029d95c245ed2ea9583c
CRC32: 5e63cfaf
каталог C:\Windows\System32\
+ 1037.mst 088694dba3e71c7b5175a50bfe870432 109.00 KB
Софт HP DeskJet 6500 Series 2004
Создано Hewlett Packard
Версия ОС Windows XP
Архитектура 64-разрядная (x64)
Размер 111616
MD5 088694dba3e71c7b5175a50bfe870432
Контрольная сумма SHA1 411882baa14e19f76960029d95c245ed2ea9583c
CRC32: 5e63cfaf
каталог C:\Windows\System32\
+ 1037.mst 088694dba3e71c7b5175a50bfe870432 109.00 KB
Софт HP DeskJet 6500 Series 2004
Создано Hewlett Packard
Версия ОС Windows ME
Архитектура 64-разрядная (x64)
Размер 111616
MD5 088694dba3e71c7b5175a50bfe870432
Контрольная сумма SHA1 411882baa14e19f76960029d95c245ed2ea9583c
CRC32: 5e63cfaf
каталог C:\Windows\System32\
+ 1037.mst 3ad653172c9cb9d67cd8c6542023c4b5 4.00 KB
Софт Cyberlink Media Suite 9 Ultra 2011
Создано Cyberlink
Версия ОС Windows 7
Архитектура 64-разрядная (x64)
Размер 4096
MD5 3ad653172c9cb9d67cd8c6542023c4b5
Контрольная сумма SHA1 62ceb70f5eb2353d5e03ca18320808be001d43ec
CRC32: 309b515e
каталог C:\Windows\System32\
+ 1037.mst 3ad653172c9cb9d67cd8c6542023c4b5 4.00 KB
Софт Cyberlink Media Suite 9 Ultra 2011
Создано Cyberlink
Версия ОС Windows Vista
Архитектура 64-разрядная (x64)
Размер 4096
MD5 3ad653172c9cb9d67cd8c6542023c4b5
Контрольная сумма SHA1 62ceb70f5eb2353d5e03ca18320808be001d43ec
CRC32: 309b515e
каталог C:\Windows\System32\
+ 1037.mst 3ad653172c9cb9d67cd8c6542023c4b5 4.00 KB
Софт Cyberlink Media Suite 9 Ultra 2011
Создано Cyberlink
Версия ОС Windows XP
Архитектура 64-разрядная (x64)
Размер 4096
MD5 3ad653172c9cb9d67cd8c6542023c4b5
Контрольная сумма SHA1 62ceb70f5eb2353d5e03ca18320808be001d43ec
CRC32: 309b515e
каталог C:\Windows\System32\
+ 1037.mst 4f05a67d4851cc65b8402c72109b4284 133.00 KB
Софт hp deskjet starter cd v 1.0
Создано Hewlett Packard
Версия ОС Windows 10
Архитектура 64-разрядная (x64)
Размер 136192
MD5 4f05a67d4851cc65b8402c72109b4284
Контрольная сумма SHA1 b82d4eeb0894d48202b18cffc8ff09ae5a818d09
CRC32: 4a35c9fa
каталог C:\Windows\System32\
+ 1037.mst a02f653c26b5d419c2e5226932b3ffdd 10.50 KB
Софт HP Deskjet 6900 series 2005
Создано Hewlett Packard
Версия ОС Mac OS X 10.2
Архитектура 64-разрядная (x64)
Размер 10752
MD5 a02f653c26b5d419c2e5226932b3ffdd
Контрольная сумма SHA1 fe29f6e4741200b85c844b50dd78299861ee9fc1
CRC32: ca67292b
+ 1037.mst c68e969ca52b449cb75f1b70ba591b40 21.00 KB
Софт HP Deskjet 6900 series 2005
Создано Hewlett Packard
Версия ОС Mac OS X 10.2
Архитектура 64-разрядная (x64)
Размер 21504
MD5 c68e969ca52b449cb75f1b70ba591b40
Контрольная сумма SHA1 68fe4d4f41159b8c83e97ddb365730367267fe58
CRC32: f0404edc
+ 1037.mst a02f653c26b5d419c2e5226932b3ffdd 10.50 KB
Софт HP Deskjet 6900 series 2005
Создано Hewlett Packard
Версия ОС Mac OS X 10.3
Архитектура 64-разрядная (x64)
Размер 10752
MD5 a02f653c26b5d419c2e5226932b3ffdd
Контрольная сумма SHA1 fe29f6e4741200b85c844b50dd78299861ee9fc1
CRC32: ca67292b
+ 1037.mst c68e969ca52b449cb75f1b70ba591b40 21.00 KB
Софт HP Deskjet 6900 series 2005
Создано Hewlett Packard
Версия ОС Mac OS X 10.3
Архитектура 64-разрядная (x64)
Размер 21504
MD5 c68e969ca52b449cb75f1b70ba591b40
Контрольная сумма SHA1 68fe4d4f41159b8c83e97ddb365730367267fe58
CRC32: f0404edc
+ 1037.mst a02f653c26b5d419c2e5226932b3ffdd 10.50 KB
Софт HP Deskjet 6900 series 2005
Создано Hewlett Packard
Версия ОС Windows 2000
Архитектура 64-разрядная (x64)
Размер 10752
MD5 a02f653c26b5d419c2e5226932b3ffdd
Контрольная сумма SHA1 fe29f6e4741200b85c844b50dd78299861ee9fc1
CRC32: ca67292b
каталог C:\Windows\System32\
+ 1037.mst c68e969ca52b449cb75f1b70ba591b40 21.00 KB
Софт HP Deskjet 6900 series 2005
Создано Hewlett Packard
Версия ОС Windows 2000
Архитектура 64-разрядная (x64)
Размер 21504
MD5 c68e969ca52b449cb75f1b70ba591b40
Контрольная сумма SHA1 68fe4d4f41159b8c83e97ddb365730367267fe58
CRC32: f0404edc
каталог C:\Windows\System32\
+ 1037.mst a02f653c26b5d419c2e5226932b3ffdd 10.50 KB
Софт HP Deskjet 6900 series 2005
Создано Hewlett Packard
Версия ОС Windows 98SE
Архитектура 64-разрядная (x64)
Размер 10752
MD5 a02f653c26b5d419c2e5226932b3ffdd
Контрольная сумма SHA1 fe29f6e4741200b85c844b50dd78299861ee9fc1
CRC32: ca67292b
каталог C:\Windows\System32\
+ 1037.mst c68e969ca52b449cb75f1b70ba591b40 21.00 KB
Софт HP Deskjet 6900 series 2005
Создано Hewlett Packard
Версия ОС Windows 98SE
Архитектура 64-разрядная (x64)
Размер 21504
MD5 c68e969ca52b449cb75f1b70ba591b40
Контрольная сумма SHA1 68fe4d4f41159b8c83e97ddb365730367267fe58
CRC32: f0404edc
каталог C:\Windows\System32\
+ 1037.mst a02f653c26b5d419c2e5226932b3ffdd 10.50 KB
Софт HP Deskjet 6900 series 2005
Создано Hewlett Packard
Версия ОС Windows XP
Архитектура 64-разрядная (x64)
Размер 10752
MD5 a02f653c26b5d419c2e5226932b3ffdd
Контрольная сумма SHA1 fe29f6e4741200b85c844b50dd78299861ee9fc1
CRC32: ca67292b
каталог C:\Windows\System32\
+ 1037.mst c68e969ca52b449cb75f1b70ba591b40 21.00 KB
Софт HP Deskjet 6900 series 2005
Создано Hewlett Packard
Версия ОС Windows XP
Архитектура 64-разрядная (x64)
Размер 21504
MD5 c68e969ca52b449cb75f1b70ba591b40
Контрольная сумма SHA1 68fe4d4f41159b8c83e97ddb365730367267fe58
CRC32: f0404edc
каталог C:\Windows\System32\
+ 1037.mst a02f653c26b5d419c2e5226932b3ffdd 10.50 KB
Софт HP Deskjet 6900 series 2005
Создано Hewlett Packard
Версия ОС Windows ME
Архитектура 64-разрядная (x64)
Размер 10752
MD5 a02f653c26b5d419c2e5226932b3ffdd
Контрольная сумма SHA1 fe29f6e4741200b85c844b50dd78299861ee9fc1
CRC32: ca67292b
каталог C:\Windows\System32\
+ 1037.mst c68e969ca52b449cb75f1b70ba591b40 21.00 KB
Софт HP Deskjet 6900 series 2005
Создано Hewlett Packard
Версия ОС Windows ME
Архитектура 64-разрядная (x64)
Размер 21504
MD5 c68e969ca52b449cb75f1b70ba591b40
Контрольная сумма SHA1 68fe4d4f41159b8c83e97ddb365730367267fe58
CRC32: f0404edc
каталог C:\Windows\System32\
+ 1037.mst 58556e10ba988a6ae87773c340d80a44 21.50 KB
Софт nero Multimedia Suite 10 2010
Создано Nero AG
Версия ОС Windows Vista SP1
Архитектура 64-разрядная (x64)
Размер 22016
MD5 58556e10ba988a6ae87773c340d80a44
Контрольная сумма SHA1 3284bd0a68b4fa3def22930c3c937e4f5c29a478
CRC32: e05020a3
каталог C:\Windows\System32\
+ 1037.mst 58556e10ba988a6ae87773c340d80a44 21.50 KB
Софт nero Multimedia Suite 10 2010
Создано Nero AG
Версия ОС Windows XP SP3
Архитектура 64-разрядная (x64)
Размер 22016
MD5 58556e10ba988a6ae87773c340d80a44
Контрольная сумма SHA1 3284bd0a68b4fa3def22930c3c937e4f5c29a478
CRC32: e05020a3
каталог C:\Windows\System32\
+ 1037.mst 58556e10ba988a6ae87773c340d80a44 21.50 KB
Софт nero Multimedia Suite 10 2010
Создано Nero AG
Версия ОС Windows 7
Архитектура 64-разрядная (x64)
Размер 22016
MD5 58556e10ba988a6ae87773c340d80a44
Контрольная сумма SHA1 3284bd0a68b4fa3def22930c3c937e4f5c29a478
CRC32: e05020a3
каталог C:\Windows\System32\
+ 1037.mst 58556e10ba988a6ae87773c340d80a44 21.50 KB
Софт nero Multimedia Suite 10 2010
Создано Nero AG
Версия ОС Windows 7 Ultimate
Архитектура 64-разрядная (x64)
Размер 22016
MD5 58556e10ba988a6ae87773c340d80a44
Контрольная сумма SHA1 3284bd0a68b4fa3def22930c3c937e4f5c29a478
CRC32: e05020a3
каталог C:\Windows\System32\
+ 1037.mst 58556e10ba988a6ae87773c340d80a44 21.50 KB
Софт nero Multimedia Suite 10 2010
Создано Nero AG
Версия ОС Windows 7 Professional
Архитектура 64-разрядная (x64)
Размер 22016
MD5 58556e10ba988a6ae87773c340d80a44
Контрольная сумма SHA1 3284bd0a68b4fa3def22930c3c937e4f5c29a478
CRC32: e05020a3
каталог C:\Windows\System32\
+ 1037.mst 58556e10ba988a6ae87773c340d80a44 21.50 KB
Софт nero Multimedia Suite 10 2010
Создано Nero AG
Версия ОС Windows 7 Home Premium
Архитектура 64-разрядная (x64)
Размер 22016
MD5 58556e10ba988a6ae87773c340d80a44
Контрольная сумма SHA1 3284bd0a68b4fa3def22930c3c937e4f5c29a478
CRC32: e05020a3
каталог C:\Windows\System32\
+ 1037.mst 58556e10ba988a6ae87773c340d80a44 21.50 KB
Софт nero Multimedia Suite 10 2010
Создано Nero AG
Версия ОС Windows 7 Professional x64
Архитектура 64-разрядная (x64)
Размер 22016
MD5 58556e10ba988a6ae87773c340d80a44
Контрольная сумма SHA1 3284bd0a68b4fa3def22930c3c937e4f5c29a478
CRC32: e05020a3
каталог C:\Windows\System32\
+ 1037.mst 58556e10ba988a6ae87773c340d80a44 21.50 KB
Софт nero Multimedia Suite 10 2010
Создано Nero AG
Версия ОС Windows 7 Ultimate x64
Архитектура 64-разрядная (x64)
Размер 22016
MD5 58556e10ba988a6ae87773c340d80a44
Контрольная сумма SHA1 3284bd0a68b4fa3def22930c3c937e4f5c29a478
CRC32: e05020a3
каталог C:\Windows\System32\
+ 1037.mst 58556e10ba988a6ae87773c340d80a44 21.50 KB
Софт nero Multimedia Suite 10 2010
Создано Nero AG
Версия ОС Windows 7 Home Premium x64
Архитектура 64-разрядная (x64)
Размер 22016
MD5 58556e10ba988a6ae87773c340d80a44
Контрольная сумма SHA1 3284bd0a68b4fa3def22930c3c937e4f5c29a478
CRC32: e05020a3
каталог C:\Windows\System32\
+ 1037.mst a937a12628cf101194ae914b73f45e34 28.00 KB
Софт Adobe Acrobat DC 2015 12.1
Создано Adobe
Версия ОС Windows 10
Архитектура 64-разрядная (x64)
Размер 28672
MD5 a937a12628cf101194ae914b73f45e34
Контрольная сумма SHA1 83da09cdd9d8592f066a8b6f54c7478c76a0308e
CRC32: aedc7b45
каталог C:\Windows\System32\
+ 1037.mst f838cba7a23605972ae4f6d4ed0d27ea 21.00 KB
Софт nero 9 2008
Создано Nero Inc
Версия ОС Windows XP Service Pack 3
Архитектура 64-разрядная (x64)
Размер 21504
MD5 f838cba7a23605972ae4f6d4ed0d27ea
Контрольная сумма SHA1 313191aec8e4b5df01255f6d1f4eb5f33da575be
CRC32: 1d9a98a0
каталог C:\Windows\System32\
+ 1037.mst f838cba7a23605972ae4f6d4ed0d27ea 21.00 KB
Софт nero 9 2008
Создано Nero Inc
Версия ОС Windows Vista x64
Архитектура 64-разрядная (x64)
Размер 21504
MD5 f838cba7a23605972ae4f6d4ed0d27ea
Контрольная сумма SHA1 313191aec8e4b5df01255f6d1f4eb5f33da575be
CRC32: 1d9a98a0
каталог C:\Windows\System32\
+ 1037.mst f838cba7a23605972ae4f6d4ed0d27ea 21.00 KB
Софт nero 9 2008
Создано Nero Inc
Версия ОС Windows XP Service Pack 2
Архитектура 64-разрядная (x64)
Размер 21504
MD5 f838cba7a23605972ae4f6d4ed0d27ea
Контрольная сумма SHA1 313191aec8e4b5df01255f6d1f4eb5f33da575be
CRC32: 1d9a98a0
каталог C:\Windows\System32\
+ 1037.mst f838cba7a23605972ae4f6d4ed0d27ea 21.00 KB
Софт nero 9 2008
Создано Nero Inc
Версия ОС Windows XP Media Center Edition 2005 SP2
Архитектура 64-разрядная (x64)
Размер 21504
MD5 f838cba7a23605972ae4f6d4ed0d27ea
Контрольная сумма SHA1 313191aec8e4b5df01255f6d1f4eb5f33da575be
CRC32: 1d9a98a0
каталог C:\Windows\System32\
+ 1037.mst f838cba7a23605972ae4f6d4ed0d27ea 21.00 KB
Софт nero 9 2008
Создано Nero Inc
Версия ОС Windows Server 2003
Архитектура 64-разрядная (x64)
Размер 21504
MD5 f838cba7a23605972ae4f6d4ed0d27ea
Контрольная сумма SHA1 313191aec8e4b5df01255f6d1f4eb5f33da575be
CRC32: 1d9a98a0
каталог C:\Windows\System32\
+ 1037.mst f838cba7a23605972ae4f6d4ed0d27ea 21.00 KB
Софт nero 9 2008
Создано Nero Inc
Версия ОС Windows Vista
Архитектура 64-разрядная (x64)
Размер 21504
MD5 f838cba7a23605972ae4f6d4ed0d27ea
Контрольная сумма SHA1 313191aec8e4b5df01255f6d1f4eb5f33da575be
CRC32: 1d9a98a0
каталог C:\Windows\System32\
+ 1037.mst 82d01b439b16bc29e58f311cb6781eb5 58.50 KB
Софт XPS L502X
Создано Dell Inc.
Версия ОС Windows 10
Архитектура 64-разрядная (x64)
Размер 59904
MD5 82d01b439b16bc29e58f311cb6781eb5
Контрольная сумма SHA1 cd8c829b2d7669a599b9e39e5b0a115a4379c263
CRC32: 34ad6e84
каталог C:\Windows\System32\
+ 1037.mst 458b7e79adcf984e316cb6ca869dff16 4.00 KB
Софт Nero Platinum 2015
Создано Nero AG
Версия ОС Windows 7 Home Premium SP1 x32
Архитектура 64-разрядная (x64)
Размер 4096
MD5 458b7e79adcf984e316cb6ca869dff16
Контрольная сумма SHA1 12f961491473b926b4ab31c8a4991f22fb597bab
CRC32: d2d36d56
каталог C:\Windows\System32\
+ 1037.mst 458b7e79adcf984e316cb6ca869dff16 4.00 KB
Софт Nero Platinum 2015
Создано Nero AG
Версия ОС Windows 8.1 x64
Архитектура 64-разрядная (x64)
Размер 4096
MD5 458b7e79adcf984e316cb6ca869dff16
Контрольная сумма SHA1 12f961491473b926b4ab31c8a4991f22fb597bab
CRC32: d2d36d56
каталог C:\Windows\System32\
+ 1037.mst 458b7e79adcf984e316cb6ca869dff16 4.00 KB
Софт Nero Platinum 2015
Создано Nero AG
Версия ОС Windows 8.1 x32
Архитектура 64-разрядная (x64)
Размер 4096
MD5 458b7e79adcf984e316cb6ca869dff16
Контрольная сумма SHA1 12f961491473b926b4ab31c8a4991f22fb597bab
CRC32: d2d36d56
каталог C:\Windows\System32\
+ 1037.mst 458b7e79adcf984e316cb6ca869dff16 4.00 KB
Софт Nero Platinum 2015
Создано Nero AG
Версия ОС Windows 8 x64
Архитектура 64-разрядная (x64)
Размер 4096
MD5 458b7e79adcf984e316cb6ca869dff16
Контрольная сумма SHA1 12f961491473b926b4ab31c8a4991f22fb597bab
CRC32: d2d36d56
каталог C:\Windows\System32\
+ 1037.mst 458b7e79adcf984e316cb6ca869dff16 4.00 KB
Софт Nero Platinum 2015
Создано Nero AG
Версия ОС Windows 8 x32
Архитектура 64-разрядная (x64)
Размер 4096
MD5 458b7e79adcf984e316cb6ca869dff16
Контрольная сумма SHA1 12f961491473b926b4ab31c8a4991f22fb597bab
CRC32: d2d36d56
каталог C:\Windows\System32\
+ 1037.mst 458b7e79adcf984e316cb6ca869dff16 4.00 KB
Софт Nero Platinum 2015
Создано Nero AG
Версия ОС Windows 7 Home Premium SP1 x64
Архитектура 64-разрядная (x64)
Размер 4096
MD5 458b7e79adcf984e316cb6ca869dff16
Контрольная сумма SHA1 12f961491473b926b4ab31c8a4991f22fb597bab
CRC32: d2d36d56
каталог C:\Windows\System32\
+ 1037.mst 458b7e79adcf984e316cb6ca869dff16 4.00 KB
Софт Nero Platinum 2015
Создано Nero AG
Версия ОС Windows Vista SP2 x32
Архитектура 64-разрядная (x64)
Размер 4096
MD5 458b7e79adcf984e316cb6ca869dff16
Контрольная сумма SHA1 12f961491473b926b4ab31c8a4991f22fb597bab
CRC32: d2d36d56
каталог C:\Windows\System32\
+ 1037.mst 458b7e79adcf984e316cb6ca869dff16 4.00 KB
Софт Nero Platinum 2015
Создано Nero AG
Версия ОС Windows XP SP3 x32
Архитектура 64-разрядная (x64)
Размер 4096
MD5 458b7e79adcf984e316cb6ca869dff16
Контрольная сумма SHA1 12f961491473b926b4ab31c8a4991f22fb597bab
CRC32: d2d36d56
каталог C:\Windows\System32\
+ 1037.mst 458b7e79adcf984e316cb6ca869dff16 4.00 KB
Софт Nero Platinum 2015
Создано Nero AG
Версия ОС Windows Vista SP2 x64
Архитектура 64-разрядная (x64)
Размер 4096
MD5 458b7e79adcf984e316cb6ca869dff16
Контрольная сумма SHA1 12f961491473b926b4ab31c8a4991f22fb597bab
CRC32: d2d36d56
каталог C:\Windows\System32\
+ 1037.mst 458b7e79adcf984e316cb6ca869dff16 4.00 KB
Софт Nero Platinum 2015
Создано Nero AG
Версия ОС Windows 7 Ultimate x32
Архитектура 64-разрядная (x64)
Размер 4096
MD5 458b7e79adcf984e316cb6ca869dff16
Контрольная сумма SHA1 12f961491473b926b4ab31c8a4991f22fb597bab
CRC32: d2d36d56
каталог C:\Windows\System32\
+ 1037.mst 458b7e79adcf984e316cb6ca869dff16 4.00 KB
Софт Nero Platinum 2015
Создано Nero AG
Версия ОС Windows 7 Professional x32
Архитектура 64-разрядная (x64)
Размер 4096
MD5 458b7e79adcf984e316cb6ca869dff16
Контрольная сумма SHA1 12f961491473b926b4ab31c8a4991f22fb597bab
CRC32: d2d36d56
каталог C:\Windows\System32\
+ 1037.mst 458b7e79adcf984e316cb6ca869dff16 4.00 KB
Софт Nero Platinum 2015
Создано Nero AG
Версия ОС Windows 7 Professional x64
Архитектура 64-разрядная (x64)
Размер 4096
MD5 458b7e79adcf984e316cb6ca869dff16
Контрольная сумма SHA1 12f961491473b926b4ab31c8a4991f22fb597bab
CRC32: d2d36d56
каталог C:\Windows\System32\
+ 1037.mst 458b7e79adcf984e316cb6ca869dff16 4.00 KB
Софт Nero Platinum 2015
Создано Nero AG
Версия ОС Windows 7 Ultimate x64
Архитектура 64-разрядная (x64)
Размер 4096
MD5 458b7e79adcf984e316cb6ca869dff16
Контрольная сумма SHA1 12f961491473b926b4ab31c8a4991f22fb597bab
CRC32: d2d36d56
каталог C:\Windows\System32\
+ 1037.mst 458b7e79adcf984e316cb6ca869dff16 4.00 KB
Софт Nero Platinum 2015
Создано Nero AG
Версия ОС Windows 10
Архитектура 64-разрядная (x64)
Размер 4096
MD5 458b7e79adcf984e316cb6ca869dff16
Контрольная сумма SHA1 12f961491473b926b4ab31c8a4991f22fb597bab
CRC32: d2d36d56
каталог C:\Windows\System32\
+ 1037.mst 458b7e79adcf984e316cb6ca869dff16 4.00 KB
Софт Nero Platinum 2016
Создано Nero AG
Версия ОС Windows 7 Ultimate SP1 x64
Архитектура 64-разрядная (x64)
Размер 4096
MD5 458b7e79adcf984e316cb6ca869dff16
Контрольная сумма SHA1 12f961491473b926b4ab31c8a4991f22fb597bab
CRC32: d2d36d56
каталог C:\Windows\System32\
+ 1037.mst 458b7e79adcf984e316cb6ca869dff16 4.00 KB
Софт Nero Platinum 2016
Создано Nero AG
Версия ОС Windows 7 Ultimate SP1 x32
Архитектура 64-разрядная (x64)
Размер 4096
MD5 458b7e79adcf984e316cb6ca869dff16
Контрольная сумма SHA1 12f961491473b926b4ab31c8a4991f22fb597bab
CRC32: d2d36d56
каталог C:\Windows\System32\
+ 1037.mst 458b7e79adcf984e316cb6ca869dff16 4.00 KB
Софт Nero Platinum 2016
Создано Nero AG
Версия ОС Windows 7 Home Premium SP1 x32
Архитектура 64-разрядная (x64)
Размер 4096
MD5 458b7e79adcf984e316cb6ca869dff16
Контрольная сумма SHA1 12f961491473b926b4ab31c8a4991f22fb597bab
CRC32: d2d36d56
каталог C:\Windows\System32\
+ 1037.mst 458b7e79adcf984e316cb6ca869dff16 4.00 KB
Софт Nero Platinum 2016
Создано Nero AG
Версия ОС Windows 7 Professional SP1 x32
Архитектура 64-разрядная (x64)
Размер 4096
MD5 458b7e79adcf984e316cb6ca869dff16
Контрольная сумма SHA1 12f961491473b926b4ab31c8a4991f22fb597bab
CRC32: d2d36d56
каталог C:\Windows\System32\
+ 1037.mst 458b7e79adcf984e316cb6ca869dff16 4.00 KB
Софт Nero Platinum 2016
Создано Nero AG
Версия ОС Windows 8.1 x64
Архитектура 64-разрядная (x64)
Размер 4096
MD5 458b7e79adcf984e316cb6ca869dff16
Контрольная сумма SHA1 12f961491473b926b4ab31c8a4991f22fb597bab
CRC32: d2d36d56
каталог C:\Windows\System32\
+ 1037.mst 458b7e79adcf984e316cb6ca869dff16 4.00 KB
Софт Nero Platinum 2016
Создано Nero AG
Версия ОС Windows 8.1 x32
Архитектура 64-разрядная (x64)
Размер 4096
MD5 458b7e79adcf984e316cb6ca869dff16
Контрольная сумма SHA1 12f961491473b926b4ab31c8a4991f22fb597bab
CRC32: d2d36d56
каталог C:\Windows\System32\
+ 1037.mst 458b7e79adcf984e316cb6ca869dff16 4.00 KB
Софт Nero Platinum 2016
Создано Nero AG
Версия ОС Windows 8 x64
Архитектура 64-разрядная (x64)
Размер 4096
MD5 458b7e79adcf984e316cb6ca869dff16
Контрольная сумма SHA1 12f961491473b926b4ab31c8a4991f22fb597bab
CRC32: d2d36d56
каталог C:\Windows\System32\
+ 1037.mst 458b7e79adcf984e316cb6ca869dff16 4.00 KB
Софт Nero Platinum 2016
Создано Nero AG
Версия ОС Windows 8 x32
Архитектура 64-разрядная (x64)
Размер 4096
MD5 458b7e79adcf984e316cb6ca869dff16
Контрольная сумма SHA1 12f961491473b926b4ab31c8a4991f22fb597bab
CRC32: d2d36d56
каталог C:\Windows\System32\
+ 1037.mst 458b7e79adcf984e316cb6ca869dff16 4.00 KB
Софт Nero Platinum 2016
Создано Nero AG
Версия ОС Windows 7 Professional SP1 x64
Архитектура 64-разрядная (x64)
Размер 4096
MD5 458b7e79adcf984e316cb6ca869dff16
Контрольная сумма SHA1 12f961491473b926b4ab31c8a4991f22fb597bab
CRC32: d2d36d56
каталог C:\Windows\System32\
+ 1037.mst 458b7e79adcf984e316cb6ca869dff16 4.00 KB
Софт Nero Platinum 2016
Создано Nero AG
Версия ОС Windows 7 Home Premium SP1 x64
Архитектура 64-разрядная (x64)
Размер 4096
MD5 458b7e79adcf984e316cb6ca869dff16
Контрольная сумма SHA1 12f961491473b926b4ab31c8a4991f22fb597bab
CRC32: d2d36d56
каталог C:\Windows\System32\
+ 1037.mst 458b7e79adcf984e316cb6ca869dff16 4.00 KB
Софт Nero Platinum 2016
Создано Nero AG
Версия ОС Windows 10 64-bit
Архитектура 64-разрядная (x64)
Размер 4096
MD5 458b7e79adcf984e316cb6ca869dff16
Контрольная сумма SHA1 12f961491473b926b4ab31c8a4991f22fb597bab
CRC32: d2d36d56
каталог C:\Windows\System32\
+ 1037.mst 458b7e79adcf984e316cb6ca869dff16 4.00 KB
Софт Nero Platinum 2016
Создано Nero AG
Версия ОС Windows 10 32-bit
Архитектура 64-разрядная (x64)
Размер 4096
MD5 458b7e79adcf984e316cb6ca869dff16
Контрольная сумма SHA1 12f961491473b926b4ab31c8a4991f22fb597bab
CRC32: d2d36d56
каталог C:\Windows\System32\
+ 1037.mst 458b7e79adcf984e316cb6ca869dff16 4.00 KB
Софт Nero Platinum 2017
Создано Nero AG
Версия ОС Windows 8.1
Архитектура 64-разрядная (x64)
Размер 4096
MD5 458b7e79adcf984e316cb6ca869dff16
Контрольная сумма SHA1 12f961491473b926b4ab31c8a4991f22fb597bab
CRC32: d2d36d56
каталог C:\Windows\System32\
+ 1037.mst 458b7e79adcf984e316cb6ca869dff16 4.00 KB
Софт Nero Platinum 2017
Создано Nero AG
Версия ОС Windows 10
Архитектура 64-разрядная (x64)
Размер 4096
MD5 458b7e79adcf984e316cb6ca869dff16
Контрольная сумма SHA1 12f961491473b926b4ab31c8a4991f22fb597bab
CRC32: d2d36d56
каталог C:\Windows\System32\
+ 1037.mst 458b7e79adcf984e316cb6ca869dff16 4.00 KB
Софт Nero Platinum 2017
Создано Nero AG
Версия ОС Windows 8
Архитектура 64-разрядная (x64)
Размер 4096
MD5 458b7e79adcf984e316cb6ca869dff16
Контрольная сумма SHA1 12f961491473b926b4ab31c8a4991f22fb597bab
CRC32: d2d36d56
каталог C:\Windows\System32\
+ 1037.mst 458b7e79adcf984e316cb6ca869dff16 4.00 KB
Софт Nero Platinum 2017
Создано Nero AG
Версия ОС Windows 7
Архитектура 64-разрядная (x64)
Размер 4096
MD5 458b7e79adcf984e316cb6ca869dff16
Контрольная сумма SHA1 12f961491473b926b4ab31c8a4991f22fb597bab
CRC32: d2d36d56
каталог C:\Windows\System32\
+ 1037.mst 15c4981edd1a3d330343a315c62d8b7b 3.50 KB
Софт HP Officejet H470 2007
Создано Hewlett Packard
Версия ОС Mac OS X 10.4
Архитектура 64-разрядная (x64)
Размер 3584
MD5 15c4981edd1a3d330343a315c62d8b7b
Контрольная сумма SHA1 85600223acfb48312e7c3129517d0689869af12b
CRC32: 211e2f0b
+ 1037.mst 63d1ab80f0267653bd5d7fbb385414cc 30.50 KB
Софт HP Officejet H470 2007
Создано Hewlett Packard
Версия ОС Mac OS X 10.4
Архитектура 64-разрядная (x64)
Размер 31232
MD5 63d1ab80f0267653bd5d7fbb385414cc
Контрольная сумма SHA1 7b922400417a36346732c2aec27c3af00ddc3aad
CRC32: bb8c11c0
+ 1037.mst c68e969ca52b449cb75f1b70ba591b40 21.00 KB
Софт HP Officejet H470 2007
Создано Hewlett Packard
Версия ОС Mac OS X 10.4
Архитектура 64-разрядная (x64)
Размер 21504
MD5 c68e969ca52b449cb75f1b70ba591b40
Контрольная сумма SHA1 68fe4d4f41159b8c83e97ddb365730367267fe58
CRC32: f0404edc
+ 1037.mst 72d4789df99bbc0728ed5f810affdd3b 3.50 KB
Софт HP Officejet H470 2007
Создано Hewlett Packard
Версия ОС Mac OS X 10.4
Архитектура 64-разрядная (x64)
Размер 3584
MD5 72d4789df99bbc0728ed5f810affdd3b
Контрольная сумма SHA1 656bb8e8b15cdb7782fa1b03a16eb4c890ec3d90
CRC32: 8ce45010
+ 1037.mst f7892189ac5c00340f3db4206b188c76 4.00 KB
Софт HP Officejet H470 2007
Создано Hewlett Packard
Версия ОС Mac OS X 10.4
Архитектура 64-разрядная (x64)
Размер 4096
MD5 f7892189ac5c00340f3db4206b188c76
Контрольная сумма SHA1 30ccefd2bfacf14eb3979f15dc48eead0598b644
CRC32: 7199ef01
+ 1037.mst 7578898049ba592859af2109a130261b 3.50 KB
Софт HP Officejet H470 2007
Создано Hewlett Packard
Версия ОС Mac OS X 10.4
Архитектура 64-разрядная (x64)
Размер 3584
MD5 7578898049ba592859af2109a130261b
Контрольная сумма SHA1 0b5c25acfec7572d5a956826875bc0bcefc65c1b
CRC32: 602d31a9
+ 1037.mst 15c4981edd1a3d330343a315c62d8b7b 3.50 KB
Софт HP Officejet H470 2007
Создано Hewlett Packard
Версия ОС Mac OS X
Архитектура 64-разрядная (x64)
Размер 3584
MD5 15c4981edd1a3d330343a315c62d8b7b
Контрольная сумма SHA1 85600223acfb48312e7c3129517d0689869af12b
CRC32: 211e2f0b
+ 1037.mst 63d1ab80f0267653bd5d7fbb385414cc 30.50 KB
Софт HP Officejet H470 2007
Создано Hewlett Packard
Версия ОС Mac OS X
Архитектура 64-разрядная (x64)
Размер 31232
MD5 63d1ab80f0267653bd5d7fbb385414cc
Контрольная сумма SHA1 7b922400417a36346732c2aec27c3af00ddc3aad
CRC32: bb8c11c0
+ 1037.mst c68e969ca52b449cb75f1b70ba591b40 21.00 KB
Софт HP Officejet H470 2007
Создано Hewlett Packard
Версия ОС Mac OS X
Архитектура 64-разрядная (x64)
Размер 21504
MD5 c68e969ca52b449cb75f1b70ba591b40
Контрольная сумма SHA1 68fe4d4f41159b8c83e97ddb365730367267fe58
CRC32: f0404edc
+ 1037.mst 72d4789df99bbc0728ed5f810affdd3b 3.50 KB
Софт HP Officejet H470 2007
Создано Hewlett Packard
Версия ОС Mac OS X
Архитектура 64-разрядная (x64)
Размер 3584
MD5 72d4789df99bbc0728ed5f810affdd3b
Контрольная сумма SHA1 656bb8e8b15cdb7782fa1b03a16eb4c890ec3d90
CRC32: 8ce45010
+ 1037.mst f7892189ac5c00340f3db4206b188c76 4.00 KB
Софт HP Officejet H470 2007
Создано Hewlett Packard
Версия ОС Mac OS X
Архитектура 64-разрядная (x64)
Размер 4096
MD5 f7892189ac5c00340f3db4206b188c76
Контрольная сумма SHA1 30ccefd2bfacf14eb3979f15dc48eead0598b644
CRC32: 7199ef01
+ 1037.mst 7578898049ba592859af2109a130261b 3.50 KB
Софт HP Officejet H470 2007
Создано Hewlett Packard
Версия ОС Mac OS X
Архитектура 64-разрядная (x64)
Размер 3584
MD5 7578898049ba592859af2109a130261b
Контрольная сумма SHA1 0b5c25acfec7572d5a956826875bc0bcefc65c1b
CRC32: 602d31a9
+ 1037.mst 15c4981edd1a3d330343a315c62d8b7b 3.50 KB
Софт HP Officejet H470 2007
Создано Hewlett Packard
Версия ОС Mac OS X 10.3
Архитектура 64-разрядная (x64)
Размер 3584
MD5 15c4981edd1a3d330343a315c62d8b7b
Контрольная сумма SHA1 85600223acfb48312e7c3129517d0689869af12b
CRC32: 211e2f0b
+ 1037.mst 63d1ab80f0267653bd5d7fbb385414cc 30.50 KB
Софт HP Officejet H470 2007
Создано Hewlett Packard
Версия ОС Mac OS X 10.3
Архитектура 64-разрядная (x64)
Размер 31232
MD5 63d1ab80f0267653bd5d7fbb385414cc
Контрольная сумма SHA1 7b922400417a36346732c2aec27c3af00ddc3aad
CRC32: bb8c11c0
+ 1037.mst c68e969ca52b449cb75f1b70ba591b40 21.00 KB
Софт HP Officejet H470 2007
Создано Hewlett Packard
Версия ОС Mac OS X 10.3
Архитектура 64-разрядная (x64)
Размер 21504
MD5 c68e969ca52b449cb75f1b70ba591b40
Контрольная сумма SHA1 68fe4d4f41159b8c83e97ddb365730367267fe58
CRC32: f0404edc
+ 1037.mst 72d4789df99bbc0728ed5f810affdd3b 3.50 KB
Софт HP Officejet H470 2007
Создано Hewlett Packard
Версия ОС Mac OS X 10.3
Архитектура 64-разрядная (x64)
Размер 3584
MD5 72d4789df99bbc0728ed5f810affdd3b
Контрольная сумма SHA1 656bb8e8b15cdb7782fa1b03a16eb4c890ec3d90
CRC32: 8ce45010
+ 1037.mst f7892189ac5c00340f3db4206b188c76 4.00 KB
Софт HP Officejet H470 2007
Создано Hewlett Packard
Версия ОС Mac OS X 10.3
Архитектура 64-разрядная (x64)
Размер 4096
MD5 f7892189ac5c00340f3db4206b188c76
Контрольная сумма SHA1 30ccefd2bfacf14eb3979f15dc48eead0598b644
CRC32: 7199ef01
+ 1037.mst 7578898049ba592859af2109a130261b 3.50 KB
Софт HP Officejet H470 2007
Создано Hewlett Packard
Версия ОС Mac OS X 10.3
Архитектура 64-разрядная (x64)
Размер 3584
MD5 7578898049ba592859af2109a130261b
Контрольная сумма SHA1 0b5c25acfec7572d5a956826875bc0bcefc65c1b
CRC32: 602d31a9
+ 1037.mst 15c4981edd1a3d330343a315c62d8b7b 3.50 KB
Софт HP Officejet H470 2007
Создано Hewlett Packard
Версия ОС Windows 2000
Архитектура 64-разрядная (x64)
Размер 3584
MD5 15c4981edd1a3d330343a315c62d8b7b
Контрольная сумма SHA1 85600223acfb48312e7c3129517d0689869af12b
CRC32: 211e2f0b
каталог C:\Windows\System32\
+ 1037.mst 63d1ab80f0267653bd5d7fbb385414cc 30.50 KB
Софт HP Officejet H470 2007
Создано Hewlett Packard
Версия ОС Windows 2000
Архитектура 64-разрядная (x64)
Размер 31232
MD5 63d1ab80f0267653bd5d7fbb385414cc
Контрольная сумма SHA1 7b922400417a36346732c2aec27c3af00ddc3aad
CRC32: bb8c11c0
каталог C:\Windows\System32\
+ 1037.mst c68e969ca52b449cb75f1b70ba591b40 21.00 KB
Софт HP Officejet H470 2007
Создано Hewlett Packard
Версия ОС Windows 2000
Архитектура 64-разрядная (x64)
Размер 21504
MD5 c68e969ca52b449cb75f1b70ba591b40
Контрольная сумма SHA1 68fe4d4f41159b8c83e97ddb365730367267fe58
CRC32: f0404edc
каталог C:\Windows\System32\
+ 1037.mst 72d4789df99bbc0728ed5f810affdd3b 3.50 KB
Софт HP Officejet H470 2007
Создано Hewlett Packard
Версия ОС Windows 2000
Архитектура 64-разрядная (x64)
Размер 3584
MD5 72d4789df99bbc0728ed5f810affdd3b
Контрольная сумма SHA1 656bb8e8b15cdb7782fa1b03a16eb4c890ec3d90
CRC32: 8ce45010
каталог C:\Windows\System32\
+ 1037.mst f7892189ac5c00340f3db4206b188c76 4.00 KB
Софт HP Officejet H470 2007
Создано Hewlett Packard
Версия ОС Windows 2000
Архитектура 64-разрядная (x64)
Размер 4096
MD5 f7892189ac5c00340f3db4206b188c76
Контрольная сумма SHA1 30ccefd2bfacf14eb3979f15dc48eead0598b644
CRC32: 7199ef01
каталог C:\Windows\System32\
+ 1037.mst 7578898049ba592859af2109a130261b 3.50 KB
Софт HP Officejet H470 2007
Создано Hewlett Packard
Версия ОС Windows 2000
Архитектура 64-разрядная (x64)
Размер 3584
MD5 7578898049ba592859af2109a130261b
Контрольная сумма SHA1 0b5c25acfec7572d5a956826875bc0bcefc65c1b
CRC32: 602d31a9
каталог C:\Windows\System32\
+ 1037.mst 15c4981edd1a3d330343a315c62d8b7b 3.50 KB
Софт HP Officejet H470 2007
Создано Hewlett Packard
Версия ОС Windows Vista
Архитектура 64-разрядная (x64)
Размер 3584
MD5 15c4981edd1a3d330343a315c62d8b7b
Контрольная сумма SHA1 85600223acfb48312e7c3129517d0689869af12b
CRC32: 211e2f0b
каталог C:\Windows\System32\
+ 1037.mst 63d1ab80f0267653bd5d7fbb385414cc 30.50 KB
Софт HP Officejet H470 2007
Создано Hewlett Packard
Версия ОС Windows Vista
Архитектура 64-разрядная (x64)
Размер 31232
MD5 63d1ab80f0267653bd5d7fbb385414cc
Контрольная сумма SHA1 7b922400417a36346732c2aec27c3af00ddc3aad
CRC32: bb8c11c0
каталог C:\Windows\System32\
+ 1037.mst c68e969ca52b449cb75f1b70ba591b40 21.00 KB
Софт HP Officejet H470 2007
Создано Hewlett Packard
Версия ОС Windows Vista
Архитектура 64-разрядная (x64)
Размер 21504
MD5 c68e969ca52b449cb75f1b70ba591b40
Контрольная сумма SHA1 68fe4d4f41159b8c83e97ddb365730367267fe58
CRC32: f0404edc
каталог C:\Windows\System32\
+ 1037.mst 72d4789df99bbc0728ed5f810affdd3b 3.50 KB
Софт HP Officejet H470 2007
Создано Hewlett Packard
Версия ОС Windows Vista
Архитектура 64-разрядная (x64)
Размер 3584
MD5 72d4789df99bbc0728ed5f810affdd3b
Контрольная сумма SHA1 656bb8e8b15cdb7782fa1b03a16eb4c890ec3d90
CRC32: 8ce45010
каталог C:\Windows\System32\
+ 1037.mst f7892189ac5c00340f3db4206b188c76 4.00 KB
Софт HP Officejet H470 2007
Создано Hewlett Packard
Версия ОС Windows Vista
Архитектура 64-разрядная (x64)
Размер 4096
MD5 f7892189ac5c00340f3db4206b188c76
Контрольная сумма SHA1 30ccefd2bfacf14eb3979f15dc48eead0598b644
CRC32: 7199ef01
каталог C:\Windows\System32\
+ 1037.mst 7578898049ba592859af2109a130261b 3.50 KB
Софт HP Officejet H470 2007
Создано Hewlett Packard
Версия ОС Windows Vista
Архитектура 64-разрядная (x64)
Размер 3584
MD5 7578898049ba592859af2109a130261b
Контрольная сумма SHA1 0b5c25acfec7572d5a956826875bc0bcefc65c1b
CRC32: 602d31a9
каталог C:\Windows\System32\
+ 1037.mst 15c4981edd1a3d330343a315c62d8b7b 3.50 KB
Софт HP Officejet H470 2007
Создано Hewlett Packard
Версия ОС Windows XP
Архитектура 64-разрядная (x64)
Размер 3584
MD5 15c4981edd1a3d330343a315c62d8b7b
Контрольная сумма SHA1 85600223acfb48312e7c3129517d0689869af12b
CRC32: 211e2f0b
каталог C:\Windows\System32\
+ 1037.mst 63d1ab80f0267653bd5d7fbb385414cc 30.50 KB
Софт HP Officejet H470 2007
Создано Hewlett Packard
Версия ОС Windows XP
Архитектура 64-разрядная (x64)
Размер 31232
MD5 63d1ab80f0267653bd5d7fbb385414cc
Контрольная сумма SHA1 7b922400417a36346732c2aec27c3af00ddc3aad
CRC32: bb8c11c0
каталог C:\Windows\System32\
+ 1037.mst c68e969ca52b449cb75f1b70ba591b40 21.00 KB
Софт HP Officejet H470 2007
Создано Hewlett Packard
Версия ОС Windows XP
Архитектура 64-разрядная (x64)
Размер 21504
MD5 c68e969ca52b449cb75f1b70ba591b40
Контрольная сумма SHA1 68fe4d4f41159b8c83e97ddb365730367267fe58
CRC32: f0404edc
каталог C:\Windows\System32\
+ 1037.mst 72d4789df99bbc0728ed5f810affdd3b 3.50 KB
Софт HP Officejet H470 2007
Создано Hewlett Packard
Версия ОС Windows XP
Архитектура 64-разрядная (x64)
Размер 3584
MD5 72d4789df99bbc0728ed5f810affdd3b
Контрольная сумма SHA1 656bb8e8b15cdb7782fa1b03a16eb4c890ec3d90
CRC32: 8ce45010
каталог C:\Windows\System32\
+ 1037.mst f7892189ac5c00340f3db4206b188c76 4.00 KB
Софт HP Officejet H470 2007
Создано Hewlett Packard
Версия ОС Windows XP
Архитектура 64-разрядная (x64)
Размер 4096
MD5 f7892189ac5c00340f3db4206b188c76
Контрольная сумма SHA1 30ccefd2bfacf14eb3979f15dc48eead0598b644
CRC32: 7199ef01
каталог C:\Windows\System32\
+ 1037.mst 7578898049ba592859af2109a130261b 3.50 KB
Софт HP Officejet H470 2007
Создано Hewlett Packard
Версия ОС Windows XP
Архитектура 64-разрядная (x64)
Размер 3584
MD5 7578898049ba592859af2109a130261b
Контрольная сумма SHA1 0b5c25acfec7572d5a956826875bc0bcefc65c1b
CRC32: 602d31a9
каталог C:\Windows\System32\
+ 1037.mst 4d51fd9937dbd6285b499ae6a3fe4c4d 35.50 KB
Софт HP LaserJEt 2400 series 2.0
Создано Hewlett Packard
Версия ОС Windows 10
Архитектура 64-разрядная (x64)
Размер 36352
MD5 4d51fd9937dbd6285b499ae6a3fe4c4d
Контрольная сумма SHA1 dfcbf4e1bb5e781f8c8b2aca86f33b2a424a7a9c
CRC32: d7337d1d
каталог C:\Windows\System32\
+ 1037.mst 1255c46e9de644b2aa04eb703ad873d7 34.00 KB
Софт HP LaserJEt 2400 series 2.0
Создано Hewlett Packard
Версия ОС Windows 10
Архитектура 64-разрядная (x64)
Размер 34816
MD5 1255c46e9de644b2aa04eb703ad873d7
Контрольная сумма SHA1 92735ba9258f7b431d9edf5b5a6a410f2be8e949
CRC32: 7431da75
каталог C:\Windows\System32\
+ 1037.mst a02f653c26b5d419c2e5226932b3ffdd 10.50 KB
Софт HP Officejet Pro K550 2005
Создано Hewlett Packard
Версия ОС Windows 10
Архитектура 64-разрядная (x64)
Размер 10752
MD5 a02f653c26b5d419c2e5226932b3ffdd
Контрольная сумма SHA1 fe29f6e4741200b85c844b50dd78299861ee9fc1
CRC32: ca67292b
каталог C:\Windows\System32\
+ 1037.mst 87bcf7214dd43bfe55f42d24498ccaac 4.00 KB
Софт HP Officejet Pro K550 2005
Создано Hewlett Packard
Версия ОС Windows 10
Архитектура 64-разрядная (x64)
Размер 4096
MD5 87bcf7214dd43bfe55f42d24498ccaac
Контрольная сумма SHA1 cf5a5ffe466ff975116ae399bfb7d4b4b3d9be15
CRC32: c0709ba5
каталог C:\Windows\System32\
+ 1037.mst 31a6be98aa9758078f6cf24c602cb1ea 4.50 KB
Софт HP Officejet Pro K550 2005
Создано Hewlett Packard
Версия ОС Windows 10
Архитектура 64-разрядная (x64)
Размер 4608
MD5 31a6be98aa9758078f6cf24c602cb1ea
Контрольная сумма SHA1 b362bbe14016f3ec759c2b55f4cd3dd14d5baea8
CRC32: b5998b39
каталог C:\Windows\System32\
+ 1037.mst 562c400afdbaa96cb0a5156668576a89 3.50 KB
Софт HP Officejet Pro K550 2005
Создано Hewlett Packard
Версия ОС Windows 10
Архитектура 64-разрядная (x64)
Размер 3584
MD5 562c400afdbaa96cb0a5156668576a89
Контрольная сумма SHA1 a1906b37b4b6fec6639341986dd040de8a83e787
CRC32: 76f632a3
каталог C:\Windows\System32\
+ 1037.mst 8b024c1e32874a54508750d35d472e37 28.50 KB
Софт HP Officejet Pro K550 2005
Создано Hewlett Packard
Версия ОС Windows 10
Архитектура 64-разрядная (x64)
Размер 29184
MD5 8b024c1e32874a54508750d35d472e37
Контрольная сумма SHA1 4c71257646bfb24f69c56228366c8c170ea05206
CRC32: 1a2ecf16
каталог C:\Windows\System32\
+ 1037.mst 0a19137b8881a6fe9e7f649c18b2fac7 4.00 KB
Софт HP Deskjet F4400 Series 2009
Создано Hewlett Packard
Версия ОС Mac OS X 10.5
Архитектура 64-разрядная (x64)
Размер 4096
MD5 0a19137b8881a6fe9e7f649c18b2fac7
Контрольная сумма SHA1 7c77553aca20e85f2cb697e2ca06dd3c6dad189a
CRC32: 53c71c7e
+ 1037.mst c68e969ca52b449cb75f1b70ba591b40 21.00 KB
Софт HP Deskjet F4400 Series 2009
Создано Hewlett Packard
Версия ОС Mac OS X 10.5
Архитектура 64-разрядная (x64)
Размер 21504
MD5 c68e969ca52b449cb75f1b70ba591b40
Контрольная сумма SHA1 68fe4d4f41159b8c83e97ddb365730367267fe58
CRC32: f0404edc
+ 1037.mst 0a19137b8881a6fe9e7f649c18b2fac7 4.00 KB
Софт HP Deskjet F4400 Series 2009
Создано Hewlett Packard
Версия ОС Mac OS X 10.4
Архитектура 64-разрядная (x64)
Размер 4096
MD5 0a19137b8881a6fe9e7f649c18b2fac7
Контрольная сумма SHA1 7c77553aca20e85f2cb697e2ca06dd3c6dad189a
CRC32: 53c71c7e
+ 1037.mst c68e969ca52b449cb75f1b70ba591b40 21.00 KB
Софт HP Deskjet F4400 Series 2009
Создано Hewlett Packard
Версия ОС Mac OS X 10.4
Архитектура 64-разрядная (x64)
Размер 21504
MD5 c68e969ca52b449cb75f1b70ba591b40
Контрольная сумма SHA1 68fe4d4f41159b8c83e97ddb365730367267fe58
CRC32: f0404edc
+ 1037.mst 0a19137b8881a6fe9e7f649c18b2fac7 4.00 KB
Софт HP Deskjet F4400 Series 2009
Создано Hewlett Packard
Версия ОС Mac OS X 10.3
Архитектура 64-разрядная (x64)
Размер 4096
MD5 0a19137b8881a6fe9e7f649c18b2fac7
Контрольная сумма SHA1 7c77553aca20e85f2cb697e2ca06dd3c6dad189a
CRC32: 53c71c7e
+ 1037.mst c68e969ca52b449cb75f1b70ba591b40 21.00 KB
Софт HP Deskjet F4400 Series 2009
Создано Hewlett Packard
Версия ОС Mac OS X 10.3
Архитектура 64-разрядная (x64)
Размер 21504
MD5 c68e969ca52b449cb75f1b70ba591b40
Контрольная сумма SHA1 68fe4d4f41159b8c83e97ddb365730367267fe58
CRC32: f0404edc
+ 1037.mst 0a19137b8881a6fe9e7f649c18b2fac7 4.00 KB
Софт HP Deskjet F4400 Series 2009
Создано Hewlett Packard
Версия ОС Windows 2000
Архитектура 64-разрядная (x64)
Размер 4096
MD5 0a19137b8881a6fe9e7f649c18b2fac7
Контрольная сумма SHA1 7c77553aca20e85f2cb697e2ca06dd3c6dad189a
CRC32: 53c71c7e
каталог C:\Windows\System32\
+ 1037.mst c68e969ca52b449cb75f1b70ba591b40 21.00 KB
Софт HP Deskjet F4400 Series 2009
Создано Hewlett Packard
Версия ОС Windows 2000
Архитектура 64-разрядная (x64)
Размер 21504
MD5 c68e969ca52b449cb75f1b70ba591b40
Контрольная сумма SHA1 68fe4d4f41159b8c83e97ddb365730367267fe58
CRC32: f0404edc
каталог C:\Windows\System32\
+ 1037.mst 0a19137b8881a6fe9e7f649c18b2fac7 4.00 KB
Софт HP Deskjet F4400 Series 2009
Создано Hewlett Packard
Версия ОС Windows 7
Архитектура 64-разрядная (x64)
Размер 4096
MD5 0a19137b8881a6fe9e7f649c18b2fac7
Контрольная сумма SHA1 7c77553aca20e85f2cb697e2ca06dd3c6dad189a
CRC32: 53c71c7e
каталог C:\Windows\System32\
+ 1037.mst c68e969ca52b449cb75f1b70ba591b40 21.00 KB
Софт HP Deskjet F4400 Series 2009
Создано Hewlett Packard
Версия ОС Windows 7
Архитектура 64-разрядная (x64)
Размер 21504
MD5 c68e969ca52b449cb75f1b70ba591b40
Контрольная сумма SHA1 68fe4d4f41159b8c83e97ddb365730367267fe58
CRC32: f0404edc
каталог C:\Windows\System32\
+ 1037.mst 0a19137b8881a6fe9e7f649c18b2fac7 4.00 KB
Софт HP Deskjet F4400 Series 2009
Создано Hewlett Packard
Версия ОС Windows Vista
Архитектура 64-разрядная (x64)
Размер 4096
MD5 0a19137b8881a6fe9e7f649c18b2fac7
Контрольная сумма SHA1 7c77553aca20e85f2cb697e2ca06dd3c6dad189a
CRC32: 53c71c7e
каталог C:\Windows\System32\
+ 1037.mst c68e969ca52b449cb75f1b70ba591b40 21.00 KB
Софт HP Deskjet F4400 Series 2009
Создано Hewlett Packard
Версия ОС Windows Vista
Архитектура 64-разрядная (x64)
Размер 21504
MD5 c68e969ca52b449cb75f1b70ba591b40
Контрольная сумма SHA1 68fe4d4f41159b8c83e97ddb365730367267fe58
CRC32: f0404edc
каталог C:\Windows\System32\
+ 1037.mst 0a19137b8881a6fe9e7f649c18b2fac7 4.00 KB
Софт HP Deskjet F4400 Series 2009
Создано Hewlett Packard
Версия ОС Windows XP
Архитектура 64-разрядная (x64)
Размер 4096
MD5 0a19137b8881a6fe9e7f649c18b2fac7
Контрольная сумма SHA1 7c77553aca20e85f2cb697e2ca06dd3c6dad189a
CRC32: 53c71c7e
каталог C:\Windows\System32\
+ 1037.mst c68e969ca52b449cb75f1b70ba591b40 21.00 KB
Софт HP Deskjet F4400 Series 2009
Создано Hewlett Packard
Версия ОС Windows XP
Архитектура 64-разрядная (x64)
Размер 21504
MD5 c68e969ca52b449cb75f1b70ba591b40
Контрольная сумма SHA1 68fe4d4f41159b8c83e97ddb365730367267fe58
CRC32: f0404edc
каталог C:\Windows\System32\
+ 1037.mst 458b7e79adcf984e316cb6ca869dff16 4.00 KB
Софт Nero 2014 Platinum 2013
Создано Nero AG
Версия ОС Windows 7 Ultimate SP1 x64
Архитектура 64-разрядная (x64)
Размер 4096
MD5 458b7e79adcf984e316cb6ca869dff16
Контрольная сумма SHA1 12f961491473b926b4ab31c8a4991f22fb597bab
CRC32: d2d36d56
каталог C:\Windows\System32\
+ 1037.mst 458b7e79adcf984e316cb6ca869dff16 4.00 KB
Софт Nero 2014 Platinum 2013
Создано Nero AG
Версия ОС Windows 7 Ultimate SP1 x32
Архитектура 64-разрядная (x64)
Размер 4096
MD5 458b7e79adcf984e316cb6ca869dff16
Контрольная сумма SHA1 12f961491473b926b4ab31c8a4991f22fb597bab
CRC32: d2d36d56
каталог C:\Windows\System32\
+ 1037.mst 458b7e79adcf984e316cb6ca869dff16 4.00 KB
Софт Nero 2014 Platinum 2013
Создано Nero AG
Версия ОС Windows 7 Home Premium SP1 x32
Архитектура 64-разрядная (x64)
Размер 4096
MD5 458b7e79adcf984e316cb6ca869dff16
Контрольная сумма SHA1 12f961491473b926b4ab31c8a4991f22fb597bab
CRC32: d2d36d56
каталог C:\Windows\System32\
+ 1037.mst 458b7e79adcf984e316cb6ca869dff16 4.00 KB
Софт Nero 2014 Platinum 2013
Создано Nero AG
Версия ОС Windows 7 Professional SP1 x32
Архитектура 64-разрядная (x64)
Размер 4096
MD5 458b7e79adcf984e316cb6ca869dff16
Контрольная сумма SHA1 12f961491473b926b4ab31c8a4991f22fb597bab
CRC32: d2d36d56
каталог C:\Windows\System32\
+ 1037.mst 458b7e79adcf984e316cb6ca869dff16 4.00 KB
Софт Nero 2014 Platinum 2013
Создано Nero AG
Версия ОС Windows 8.1 x64
Архитектура 64-разрядная (x64)
Размер 4096
MD5 458b7e79adcf984e316cb6ca869dff16
Контрольная сумма SHA1 12f961491473b926b4ab31c8a4991f22fb597bab
CRC32: d2d36d56
каталог C:\Windows\System32\
+ 1037.mst 458b7e79adcf984e316cb6ca869dff16 4.00 KB
Софт Nero 2014 Platinum 2013
Создано Nero AG
Версия ОС Windows 8.1 x32
Архитектура 64-разрядная (x64)
Размер 4096
MD5 458b7e79adcf984e316cb6ca869dff16
Контрольная сумма SHA1 12f961491473b926b4ab31c8a4991f22fb597bab
CRC32: d2d36d56
каталог C:\Windows\System32\
+ 1037.mst 458b7e79adcf984e316cb6ca869dff16 4.00 KB
Софт Nero 2014 Platinum 2013
Создано Nero AG
Версия ОС Windows 8 x64
Архитектура 64-разрядная (x64)
Размер 4096
MD5 458b7e79adcf984e316cb6ca869dff16
Контрольная сумма SHA1 12f961491473b926b4ab31c8a4991f22fb597bab
CRC32: d2d36d56
каталог C:\Windows\System32\
+ 1037.mst 458b7e79adcf984e316cb6ca869dff16 4.00 KB
Софт Nero 2014 Platinum 2013
Создано Nero AG
Версия ОС Windows 8 x32
Архитектура 64-разрядная (x64)
Размер 4096
MD5 458b7e79adcf984e316cb6ca869dff16
Контрольная сумма SHA1 12f961491473b926b4ab31c8a4991f22fb597bab
CRC32: d2d36d56
каталог C:\Windows\System32\
+ 1037.mst 458b7e79adcf984e316cb6ca869dff16 4.00 KB
Софт Nero 2014 Platinum 2013
Создано Nero AG
Версия ОС Windows 7 Professional SP1 x64
Архитектура 64-разрядная (x64)
Размер 4096
MD5 458b7e79adcf984e316cb6ca869dff16
Контрольная сумма SHA1 12f961491473b926b4ab31c8a4991f22fb597bab
CRC32: d2d36d56
каталог C:\Windows\System32\
+ 1037.mst 458b7e79adcf984e316cb6ca869dff16 4.00 KB
Софт Nero 2014 Platinum 2013
Создано Nero AG
Версия ОС Windows 7 Home Premium SP1 x64
Архитектура 64-разрядная (x64)
Размер 4096
MD5 458b7e79adcf984e316cb6ca869dff16
Контрольная сумма SHA1 12f961491473b926b4ab31c8a4991f22fb597bab
CRC32: d2d36d56
каталог C:\Windows\System32\
+ 1037.mst 458b7e79adcf984e316cb6ca869dff16 4.00 KB
Софт Nero 2014 Platinum 2013
Создано Nero AG
Версия ОС Windows Vista SP2 x32
Архитектура 64-разрядная (x64)
Размер 4096
MD5 458b7e79adcf984e316cb6ca869dff16
Контрольная сумма SHA1 12f961491473b926b4ab31c8a4991f22fb597bab
CRC32: d2d36d56
каталог C:\Windows\System32\
+ 1037.mst 458b7e79adcf984e316cb6ca869dff16 4.00 KB
Софт Nero 2014 Platinum 2013
Создано Nero AG
Версия ОС Windows XP SP3 x32
Архитектура 64-разрядная (x64)
Размер 4096
MD5 458b7e79adcf984e316cb6ca869dff16
Контрольная сумма SHA1 12f961491473b926b4ab31c8a4991f22fb597bab
CRC32: d2d36d56
каталог C:\Windows\System32\
+ 1037.mst 458b7e79adcf984e316cb6ca869dff16 4.00 KB
Софт Nero 2014 Platinum 2013
Создано Nero AG
Версия ОС Windows Vista SP2 x64
Архитектура 64-разрядная (x64)
Размер 4096
MD5 458b7e79adcf984e316cb6ca869dff16
Контрольная сумма SHA1 12f961491473b926b4ab31c8a4991f22fb597bab
CRC32: d2d36d56
каталог C:\Windows\System32\
+ 1037.mst 458b7e79adcf984e316cb6ca869dff16 4.00 KB
Софт Nero 2014 2013
Создано Nero AG
Версия ОС Windows 7 Ultimate SP1 x64
Архитектура 64-разрядная (x64)
Размер 4096
MD5 458b7e79adcf984e316cb6ca869dff16
Контрольная сумма SHA1 12f961491473b926b4ab31c8a4991f22fb597bab
CRC32: d2d36d56
каталог C:\Windows\System32\
+ 1037.mst 458b7e79adcf984e316cb6ca869dff16 4.00 KB
Софт Nero 2014 2013
Создано Nero AG
Версия ОС Windows 7 Ultimate SP1 x32
Архитектура 64-разрядная (x64)
Размер 4096
MD5 458b7e79adcf984e316cb6ca869dff16
Контрольная сумма SHA1 12f961491473b926b4ab31c8a4991f22fb597bab
CRC32: d2d36d56
каталог C:\Windows\System32\
+ 1037.mst 458b7e79adcf984e316cb6ca869dff16 4.00 KB
Софт Nero 2014 2013
Создано Nero AG
Версия ОС Windows XP x32
Архитектура 64-разрядная (x64)
Размер 4096
MD5 458b7e79adcf984e316cb6ca869dff16
Контрольная сумма SHA1 12f961491473b926b4ab31c8a4991f22fb597bab
CRC32: d2d36d56
каталог C:\Windows\System32\
+ 1037.mst 458b7e79adcf984e316cb6ca869dff16 4.00 KB
Софт Nero 2014 2013
Создано Nero AG
Версия ОС Windows 7 Home Premium SP1 x32
Архитектура 64-разрядная (x64)
Размер 4096
MD5 458b7e79adcf984e316cb6ca869dff16
Контрольная сумма SHA1 12f961491473b926b4ab31c8a4991f22fb597bab
CRC32: d2d36d56
каталог C:\Windows\System32\
+ 1037.mst 458b7e79adcf984e316cb6ca869dff16 4.00 KB
Софт Nero 2014 2013
Создано Nero AG
Версия ОС Windows 7 Professional SP1 x32
Архитектура 64-разрядная (x64)
Размер 4096
MD5 458b7e79adcf984e316cb6ca869dff16
Контрольная сумма SHA1 12f961491473b926b4ab31c8a4991f22fb597bab
CRC32: d2d36d56
каталог C:\Windows\System32\
+ 1037.mst 458b7e79adcf984e316cb6ca869dff16 4.00 KB
Софт Nero 2014 2013
Создано Nero AG
Версия ОС Windows 8.1 x64
Архитектура 64-разрядная (x64)
Размер 4096
MD5 458b7e79adcf984e316cb6ca869dff16
Контрольная сумма SHA1 12f961491473b926b4ab31c8a4991f22fb597bab
CRC32: d2d36d56
каталог C:\Windows\System32\
+ 1037.mst 458b7e79adcf984e316cb6ca869dff16 4.00 KB
Софт Nero 2014 2013
Создано Nero AG
Версия ОС Windows 8.1 x32
Архитектура 64-разрядная (x64)
Размер 4096
MD5 458b7e79adcf984e316cb6ca869dff16
Контрольная сумма SHA1 12f961491473b926b4ab31c8a4991f22fb597bab
CRC32: d2d36d56
каталог C:\Windows\System32\
+ 1037.mst 458b7e79adcf984e316cb6ca869dff16 4.00 KB
Софт Nero 2014 2013
Создано Nero AG
Версия ОС Windows 8 x64
Архитектура 64-разрядная (x64)
Размер 4096
MD5 458b7e79adcf984e316cb6ca869dff16
Контрольная сумма SHA1 12f961491473b926b4ab31c8a4991f22fb597bab
CRC32: d2d36d56
каталог C:\Windows\System32\
+ 1037.mst 458b7e79adcf984e316cb6ca869dff16 4.00 KB
Софт Nero 2014 2013
Создано Nero AG
Версия ОС Windows 8 x32
Архитектура 64-разрядная (x64)
Размер 4096
MD5 458b7e79adcf984e316cb6ca869dff16
Контрольная сумма SHA1 12f961491473b926b4ab31c8a4991f22fb597bab
CRC32: d2d36d56
каталог C:\Windows\System32\
+ 1037.mst 458b7e79adcf984e316cb6ca869dff16 4.00 KB
Софт Nero 2014 2013
Создано Nero AG
Версия ОС Windows 7 Professional SP1 x64
Архитектура 64-разрядная (x64)
Размер 4096
MD5 458b7e79adcf984e316cb6ca869dff16
Контрольная сумма SHA1 12f961491473b926b4ab31c8a4991f22fb597bab
CRC32: d2d36d56
каталог C:\Windows\System32\
+ 1037.mst 458b7e79adcf984e316cb6ca869dff16 4.00 KB
Софт Nero 2014 2013
Создано Nero AG
Версия ОС Windows 7 Home Premium SP1 x64
Архитектура 64-разрядная (x64)
Размер 4096
MD5 458b7e79adcf984e316cb6ca869dff16
Контрольная сумма SHA1 12f961491473b926b4ab31c8a4991f22fb597bab
CRC32: d2d36d56
каталог C:\Windows\System32\
+ 1037.mst 458b7e79adcf984e316cb6ca869dff16 4.00 KB
Софт Nero 2014 2013
Создано Nero AG
Версия ОС Windows Vista SP2 x32
Архитектура 64-разрядная (x64)
Размер 4096
MD5 458b7e79adcf984e316cb6ca869dff16
Контрольная сумма SHA1 12f961491473b926b4ab31c8a4991f22fb597bab
CRC32: d2d36d56
каталог C:\Windows\System32\
+ 1037.mst 458b7e79adcf984e316cb6ca869dff16 4.00 KB
Софт Nero 2014 2013
Создано Nero AG
Версия ОС Windows Vista SP2 x64
Архитектура 64-разрядная (x64)
Размер 4096
MD5 458b7e79adcf984e316cb6ca869dff16
Контрольная сумма SHA1 12f961491473b926b4ab31c8a4991f22fb597bab
CRC32: d2d36d56
каталог C:\Windows\System32\
+ 1037.mst 458b7e79adcf984e316cb6ca869dff16 4.00 KB
Софт Nero 12 Platinum 12 2012
Создано Nero AG
Версия ОС Windows 7 Home Premium SP1 x32
Архитектура 64-разрядная (x64)
Размер 4096
MD5 458b7e79adcf984e316cb6ca869dff16
Контрольная сумма SHA1 12f961491473b926b4ab31c8a4991f22fb597bab
CRC32: d2d36d56
каталог C:\Windows\System32\
+ 1037.mst 458b7e79adcf984e316cb6ca869dff16 4.00 KB
Софт Nero 12 Platinum 12 2012
Создано Nero AG
Версия ОС Windows 8 x64
Архитектура 64-разрядная (x64)
Размер 4096
MD5 458b7e79adcf984e316cb6ca869dff16
Контрольная сумма SHA1 12f961491473b926b4ab31c8a4991f22fb597bab
CRC32: d2d36d56
каталог C:\Windows\System32\
+ 1037.mst 458b7e79adcf984e316cb6ca869dff16 4.00 KB
Софт Nero 12 Platinum 12 2012
Создано Nero AG
Версия ОС Windows 8 x32
Архитектура 64-разрядная (x64)
Размер 4096
MD5 458b7e79adcf984e316cb6ca869dff16
Контрольная сумма SHA1 12f961491473b926b4ab31c8a4991f22fb597bab
CRC32: d2d36d56
каталог C:\Windows\System32\
+ 1037.mst 458b7e79adcf984e316cb6ca869dff16 4.00 KB
Софт Nero 12 Platinum 12 2012
Создано Nero AG
Версия ОС Windows 7 Home Premium SP1 x64
Архитектура 64-разрядная (x64)
Размер 4096
MD5 458b7e79adcf984e316cb6ca869dff16
Контрольная сумма SHA1 12f961491473b926b4ab31c8a4991f22fb597bab
CRC32: d2d36d56
каталог C:\Windows\System32\
+ 1037.mst 458b7e79adcf984e316cb6ca869dff16 4.00 KB
Софт Nero 12 Platinum 12 2012
Создано Nero AG
Версия ОС Windows Vista SP2 x32
Архитектура 64-разрядная (x64)
Размер 4096
MD5 458b7e79adcf984e316cb6ca869dff16
Контрольная сумма SHA1 12f961491473b926b4ab31c8a4991f22fb597bab
CRC32: d2d36d56
каталог C:\Windows\System32\
+ 1037.mst 458b7e79adcf984e316cb6ca869dff16 4.00 KB
Софт Nero 12 Platinum 12 2012
Создано Nero AG
Версия ОС Windows XP SP3 x32
Архитектура 64-разрядная (x64)
Размер 4096
MD5 458b7e79adcf984e316cb6ca869dff16
Контрольная сумма SHA1 12f961491473b926b4ab31c8a4991f22fb597bab
CRC32: d2d36d56
каталог C:\Windows\System32\
+ 1037.mst 458b7e79adcf984e316cb6ca869dff16 4.00 KB
Софт Nero 12 Platinum 12 2012
Создано Nero AG
Версия ОС Windows Vista SP2 x64
Архитектура 64-разрядная (x64)
Размер 4096
MD5 458b7e79adcf984e316cb6ca869dff16
Контрольная сумма SHA1 12f961491473b926b4ab31c8a4991f22fb597bab
CRC32: d2d36d56
каталог C:\Windows\System32\
+ 1037.mst 458b7e79adcf984e316cb6ca869dff16 4.00 KB
Софт Nero 12 Platinum 12 2012
Создано Nero AG
Версия ОС Windows 7 Ultimate x32
Архитектура 64-разрядная (x64)
Размер 4096
MD5 458b7e79adcf984e316cb6ca869dff16
Контрольная сумма SHA1 12f961491473b926b4ab31c8a4991f22fb597bab
CRC32: d2d36d56
каталог C:\Windows\System32\
+ 1037.mst 458b7e79adcf984e316cb6ca869dff16 4.00 KB
Софт Nero 12 Platinum 12 2012
Создано Nero AG
Версия ОС Windows 7 Ultimate x64
Архитектура 64-разрядная (x64)
Размер 4096
MD5 458b7e79adcf984e316cb6ca869dff16
Контрольная сумма SHA1 12f961491473b926b4ab31c8a4991f22fb597bab
CRC32: d2d36d56
каталог C:\Windows\System32\
+ 1037.mst 458b7e79adcf984e316cb6ca869dff16 4.00 KB
Софт Nero 12 2012
Создано Nero AG
Версия ОС Windows 7 Ultimate SP1 x64
Архитектура 64-разрядная (x64)
Размер 4096
MD5 458b7e79adcf984e316cb6ca869dff16
Контрольная сумма SHA1 12f961491473b926b4ab31c8a4991f22fb597bab
CRC32: d2d36d56
каталог C:\Windows\System32\
+ 1037.mst 458b7e79adcf984e316cb6ca869dff16 4.00 KB
Софт Nero 12 2012
Создано Nero AG
Версия ОС Windows 7 Ultimate SP1 x32
Архитектура 64-разрядная (x64)
Размер 4096
MD5 458b7e79adcf984e316cb6ca869dff16
Контрольная сумма SHA1 12f961491473b926b4ab31c8a4991f22fb597bab
CRC32: d2d36d56
каталог C:\Windows\System32\
+ 1037.mst 458b7e79adcf984e316cb6ca869dff16 4.00 KB
Софт Nero 12 2012
Создано Nero AG
Версия ОС Windows 7 Home Premium SP1 x32
Архитектура 64-разрядная (x64)
Размер 4096
MD5 458b7e79adcf984e316cb6ca869dff16
Контрольная сумма SHA1 12f961491473b926b4ab31c8a4991f22fb597bab
CRC32: d2d36d56
каталог C:\Windows\System32\
+ 1037.mst 458b7e79adcf984e316cb6ca869dff16 4.00 KB
Софт Nero 12 2012
Создано Nero AG
Версия ОС Windows 7 Professional SP1 x32
Архитектура 64-разрядная (x64)
Размер 4096
MD5 458b7e79adcf984e316cb6ca869dff16
Контрольная сумма SHA1 12f961491473b926b4ab31c8a4991f22fb597bab
CRC32: d2d36d56
каталог C:\Windows\System32\
+ 1037.mst 458b7e79adcf984e316cb6ca869dff16 4.00 KB
Софт Nero 12 2012
Создано Nero AG
Версия ОС Windows 8 x64
Архитектура 64-разрядная (x64)
Размер 4096
MD5 458b7e79adcf984e316cb6ca869dff16
Контрольная сумма SHA1 12f961491473b926b4ab31c8a4991f22fb597bab
CRC32: d2d36d56
каталог C:\Windows\System32\
+ 1037.mst 458b7e79adcf984e316cb6ca869dff16 4.00 KB
Софт Nero 12 2012
Создано Nero AG
Версия ОС Windows 8 x32
Архитектура 64-разрядная (x64)
Размер 4096
MD5 458b7e79adcf984e316cb6ca869dff16
Контрольная сумма SHA1 12f961491473b926b4ab31c8a4991f22fb597bab
CRC32: d2d36d56
каталог C:\Windows\System32\
+ 1037.mst 458b7e79adcf984e316cb6ca869dff16 4.00 KB
Софт Nero 12 2012
Создано Nero AG
Версия ОС Windows 7 Professional SP1 x64
Архитектура 64-разрядная (x64)
Размер 4096
MD5 458b7e79adcf984e316cb6ca869dff16
Контрольная сумма SHA1 12f961491473b926b4ab31c8a4991f22fb597bab
CRC32: d2d36d56
каталог C:\Windows\System32\
+ 1037.mst 458b7e79adcf984e316cb6ca869dff16 4.00 KB
Софт Nero 12 2012
Создано Nero AG
Версия ОС Windows 7 Home Premium SP1 x64
Архитектура 64-разрядная (x64)
Размер 4096
MD5 458b7e79adcf984e316cb6ca869dff16
Контрольная сумма SHA1 12f961491473b926b4ab31c8a4991f22fb597bab
CRC32: d2d36d56
каталог C:\Windows\System32\
+ 1037.mst 458b7e79adcf984e316cb6ca869dff16 4.00 KB
Софт Nero 12 2012
Создано Nero AG
Версия ОС Windows Vista SP2 x32
Архитектура 64-разрядная (x64)
Размер 4096
MD5 458b7e79adcf984e316cb6ca869dff16
Контрольная сумма SHA1 12f961491473b926b4ab31c8a4991f22fb597bab
CRC32: d2d36d56
каталог C:\Windows\System32\
+ 1037.mst 458b7e79adcf984e316cb6ca869dff16 4.00 KB
Софт Nero 12 2012
Создано Nero AG
Версия ОС Windows XP SP3 x32
Архитектура 64-разрядная (x64)
Размер 4096
MD5 458b7e79adcf984e316cb6ca869dff16
Контрольная сумма SHA1 12f961491473b926b4ab31c8a4991f22fb597bab
CRC32: d2d36d56
каталог C:\Windows\System32\
+ 1037.mst 458b7e79adcf984e316cb6ca869dff16 4.00 KB
Софт Nero 12 2012
Создано Nero AG
Версия ОС Windows Vista SP2 x64
Архитектура 64-разрядная (x64)
Размер 4096
MD5 458b7e79adcf984e316cb6ca869dff16
Контрольная сумма SHA1 12f961491473b926b4ab31c8a4991f22fb597bab
CRC32: d2d36d56
каталог C:\Windows\System32\
+ 1037.mst 8254335978f67ed77eb63b9fcf97cad3 22.00 KB
Софт Dell OptiPlex CD for Microsoft Windows XP Professional x64 Edition March 2007 A10
Создано Dell
Версия ОС Windows XP Professional x64
Архитектура 64-разрядная (x64)
Размер 22528
MD5 8254335978f67ed77eb63b9fcf97cad3
Контрольная сумма SHA1 2af79b84ea6be8c58c306f1685016409e664be98
CRC32: 36214175
каталог C:\Windows\System32\
+ 1037.mst 458b7e79adcf984e316cb6ca869dff16 4.00 KB
Софт Nero 11 2011
Создано Nero AG
Версия ОС Windows Vista SP1 x64
Архитектура 64-разрядная (x64)
Размер 4096
MD5 458b7e79adcf984e316cb6ca869dff16
Контрольная сумма SHA1 12f961491473b926b4ab31c8a4991f22fb597bab
CRC32: d2d36d56
каталог C:\Windows\System32\
+ 1037.mst 458b7e79adcf984e316cb6ca869dff16 4.00 KB
Софт Nero 11 2011
Создано Nero AG
Версия ОС Windows XP SP3 x32
Архитектура 64-разрядная (x64)
Размер 4096
MD5 458b7e79adcf984e316cb6ca869dff16
Контрольная сумма SHA1 12f961491473b926b4ab31c8a4991f22fb597bab
CRC32: d2d36d56
каталог C:\Windows\System32\
+ 1037.mst 458b7e79adcf984e316cb6ca869dff16 4.00 KB
Софт Nero 11 2011
Создано Nero AG
Версия ОС Windows Vista SP1 x32
Архитектура 64-разрядная (x64)
Размер 4096
MD5 458b7e79adcf984e316cb6ca869dff16
Контрольная сумма SHA1 12f961491473b926b4ab31c8a4991f22fb597bab
CRC32: d2d36d56
каталог C:\Windows\System32\
+ 1037.mst 458b7e79adcf984e316cb6ca869dff16 4.00 KB
Софт Nero 11 2011
Создано Nero AG
Версия ОС Windows 7 Ultimate x32
Архитектура 64-разрядная (x64)
Размер 4096
MD5 458b7e79adcf984e316cb6ca869dff16
Контрольная сумма SHA1 12f961491473b926b4ab31c8a4991f22fb597bab
CRC32: d2d36d56
каталог C:\Windows\System32\
+ 1037.mst 458b7e79adcf984e316cb6ca869dff16 4.00 KB
Софт Nero 11 2011
Создано Nero AG
Версия ОС Windows 7 Professional x32
Архитектура 64-разрядная (x64)
Размер 4096
MD5 458b7e79adcf984e316cb6ca869dff16
Контрольная сумма SHA1 12f961491473b926b4ab31c8a4991f22fb597bab
CRC32: d2d36d56
каталог C:\Windows\System32\
+ 1037.mst 458b7e79adcf984e316cb6ca869dff16 4.00 KB
Софт Nero 11 2011
Создано Nero AG
Версия ОС Windows 7 Home Premium x32
Архитектура 64-разрядная (x64)
Размер 4096
MD5 458b7e79adcf984e316cb6ca869dff16
Контрольная сумма SHA1 12f961491473b926b4ab31c8a4991f22fb597bab
CRC32: d2d36d56
каталог C:\Windows\System32\
+ 1037.mst 458b7e79adcf984e316cb6ca869dff16 4.00 KB
Софт Nero 11 2011
Создано Nero AG
Версия ОС Windows 7 Professional x64
Архитектура 64-разрядная (x64)
Размер 4096
MD5 458b7e79adcf984e316cb6ca869dff16
Контрольная сумма SHA1 12f961491473b926b4ab31c8a4991f22fb597bab
CRC32: d2d36d56
каталог C:\Windows\System32\
+ 1037.mst 458b7e79adcf984e316cb6ca869dff16 4.00 KB
Софт Nero 11 2011
Создано Nero AG
Версия ОС Windows 7 Ultimate x64
Архитектура 64-разрядная (x64)
Размер 4096
MD5 458b7e79adcf984e316cb6ca869dff16
Контрольная сумма SHA1 12f961491473b926b4ab31c8a4991f22fb597bab
CRC32: d2d36d56
каталог C:\Windows\System32\
+ 1037.mst 458b7e79adcf984e316cb6ca869dff16 4.00 KB
Софт Nero 11 2011
Создано Nero AG
Версия ОС Windows 7 Home Premium x64
Архитектура 64-разрядная (x64)
Размер 4096
MD5 458b7e79adcf984e316cb6ca869dff16
Контрольная сумма SHA1 12f961491473b926b4ab31c8a4991f22fb597bab
CRC32: d2d36d56
каталог C:\Windows\System32\
+ 1037.mst 82d01b439b16bc29e58f311cb6781eb5 58.50 KB
Софт Dell Resource Media c. 2012
Создано Dell
Версия ОС Not OS Specific
Архитектура 64-разрядная (x64)
Размер 59904
MD5 82d01b439b16bc29e58f311cb6781eb5
Контрольная сумма SHA1 cd8c829b2d7669a599b9e39e5b0a115a4379c263
CRC32: 34ad6e84
+ 1037.mst 85b5245b890f36f32de08c288e2919e6 20.00 KB
Софт Dell Drivers and Utilities Already Installed on Your Computer P/N YGG3Y Rev. A03 September 2009 2009
Создано Dell
Версия ОС Windows 10
Архитектура 64-разрядная (x64)
Размер 20480
MD5 85b5245b890f36f32de08c288e2919e6
Контрольная сумма SHA1 06b1d6970e76a95fb3b8c0a4e764ab7973257f7c
CRC32: 8206a491
каталог C:\Windows\System32\
+ 1037.mst 724f61b8d492900b0c7f006f36c1b0a7 16.00 KB
Софт Dell DRIVERS AND UTILITIES 2007
Создано Dell
Версия ОС Windows 10
Архитектура 64-разрядная (x64)
Размер 16384
MD5 724f61b8d492900b0c7f006f36c1b0a7
Контрольная сумма SHA1 990ef63d63f0e6fb20dc319e9e2f584bd2cb2820
CRC32: d450e82f
каталог C:\Windows\System32\

Обновлено: 30.01.2023

Обычно для отладки макроса его выполняют в пошаговом режиме. Для включения этого режима необходимо нажать кнопку По шагам (Single Step) на панели инструментов в окне Конструктора макросов или выбрать команду меню Запуск, По шагам (Run, Single Step). Тогда перед выполнением каждой макрокоманды будет появляться диалоговое окно Пошаговое исполнение макроса (Macro Single Step) (рис. 11.14).

В этом окне отображаются имя макроса, имя исполняемой макрокоманды, условие ее исполнения и аргументы. При этом в полях Условие (Condition) и Аргументы (Arguments) видны значения условного выражения и аргументов макрокоманды. Если в строке макрокоманды условие не указано, в поле Условие (Condition) всегда будет показываться значение Истина (True). Кнопки справа от полей в этом окне позволяют выполнить очередную макрокоманду, прервать выполнение макроса (например, если видно, что аргументы вычислены неправильно) и продолжить выполнение в обычном режиме, т. е. не по шагам.

Рис. 11.14. Диалоговое окно Пошаговое исполнение макроса

Если в процессе выполнения макроса возникла ошибка, появляется диалоговое окно Ошибка выполнения макроса (Action Failed), аналогичное окну Пошаговое исполнение макроса (Macro Single Step), но без возможности продолжить процесс (кнопки Шаг (Step) и Продолжить (Continue) недоступны). Можно только прервать выполнение макроса, нажав кнопку Прервать (Halt). В окне отображается макрокоманда, содержащая ошибку.

Поиск ошибок в макросах, как правило, не вызывает больших затруднений. Это связано с тем, что:

  • большинство синтаксических ошибок проверяется при вводе и система просто не даст ввести неправильное название макрокоманды или условное выражение (правда, она не защитит от ввода неправильного имени объекта, например несуществующей формы или элемента управления в форме);
  • макросы, как правило, достаточно просты и не содержат длинных последовательностей макрокоманд, в противном случае лучше написать процедуру на VBA, т. к. язык VBA предоставляет больше возможностей и имеет существенно лучшие средства отладки.

Основные ошибки, которые возникают в макросах, связаны либо с неправильным вводом имен объектов, и тогда Access не может найти соответствующий объект, либо с тем, что объекты, на которые ссылается макрокоманда, недоступны, например форма не открыта. Поэтому при возникновении ошибки в первую очередь нужно проверить, правильно ли введены имена объектов и открыты ли формы, использованные в условиях или аргументах макрокоманд.

Прежде чем использовать ссылки на форму или элемент управления, рекомендуется выполнять проверку, открыта ли форма, с помощью функции isLoaded(). К сожалению, эта функция не является стандартной функцией Access, а обычно включается в модуль «Служебные функции» (Utility Function) базы данных «Борей». Вы можете скопировать ее оттуда в свою базу данных.

Еще один стандартный прием — установка точек останова. Его применяют для того, чтобы остановить выполнение макроса в определенной точке до завершения процесса. Для этого используется макрокоманда ОстановитьМакрос (StopMacro). Макрос будет выполняться до макрокоманды ОстановитьМакрос (StopMacro), после этого можно проверить результаты. Таким образом, можно локализовать ошибку с точностью до макрокоманды.

Файл 1037.ini использует расширение INI, в частности известное как файл Windows Initialization. Классифицируется как файл Параметры (Windows Initialization), созданный для RocketDock 1.3.5 компанией PunkLabs.

Впервые 1037.ini был представлен 06/26/2008 в составе RocketDock 1.3.5 для Windows 10. По нашим данным, это самая последняя дата выпуска от компании PunkLabs.

В этой короткой статье приводятся подробные сведения о файле, шаги по устранению проблем INI с 1037.ini и список бесплатных загрузок для каждой версии, содержащейся в нашем полном каталоге файлов.

Совместимость с Windows 10, 8, 7, Vista, XP и 2000

Средняя оценка пользователей

Сведения о разработчике и ПО
Программа: RocketDock 1.3.5
Разработчик: PunkLabs
Программное обеспечение: RocketDock
Версия ПО: 1.3.5
Сведения о файле
Размер файла (байты): 7060
Дата первоначального файла: 12/04/2019
Дата последнего файла: 12/04/2019
Информация о файле Описание
Размер файла: 6.9 kB
Дата и время изменения файла: 2019:12:04 02:54:15+00:00

✻ Фрагменты данных файлов предоставлены участником Exiftool (Phil Harvey) и распространяются под лицензией Perl Artistic.

Общие ошибки выполнения 1037.ini

Ошибки файла 1037.ini часто возникают на этапе запуска RocketDock, но также могут возникать во время работы программы. Эти типы ошибок INI также известны как «ошибки выполнения», поскольку они возникают во время выполнения RocketDock. К числу наиболее распространенных ошибок выполнения 1037.ini относятся:

  • Не удается найти 1037.ini.
  • 1037.ini — ошибка.
  • Не удалось загрузить 1037.ini.
  • Ошибка при загрузке 1037.ini.
  • Не удалось зарегистрировать 1037.ini / Не удается зарегистрировать 1037.ini.
  • Ошибка выполнения — 1037.ini.
  • Файл 1037.ini отсутствует или поврежден.

Программа: C:Program Files (x86)RocketDockLanguages1037.ini

Среда выполнения получила запрос от этого приложения, чтобы прекратить его необычным способом.
Для получения дополнительной информации обратитесь в службу поддержки приложения.

В большинстве случаев причинами ошибок в INI являются отсутствующие или поврежденные файлы. Файл 1037.ini может отсутствовать из-за случайного удаления, быть удаленным другой программой как общий файл (общий с RocketDock) или быть удаленным в результате заражения вредоносным программным обеспечением. Кроме того, повреждение файла 1037.ini может быть вызвано отключением питания при загрузке RocketDock, сбоем системы при загрузке или сохранении 1037.ini, наличием плохих секторов на запоминающем устройстве (обычно это основной жесткий диск) или заражением вредоносным программным обеспечением. Таким образом, крайне важно, чтобы антивирус постоянно поддерживался в актуальном состоянии и регулярно проводил сканирование системы.

Шаг 1. Восстановите компьютер до последней точки восстановления, «моментального снимка» или образа резервной копии, которые предшествуют появлению ошибки.

Чтобы начать восстановление системы (Windows XP, Vista, 7, 8 и 10):

Если на этапе 1 не удается устранить ошибку 1037.ini, перейдите к шагу 2 ниже.

Шаг 2. Если вы недавно установили приложение RocketDock (или схожее программное обеспечение), удалите его, затем попробуйте переустановить RocketDock.

Чтобы удалить программное обеспечение RocketDock, выполните следующие инструкции (Windows XP, Vista, 7, 8 и 10):

После полного удаления приложения следует перезагрузить ПК и заново установить RocketDock.

Если на этапе 2 также не удается устранить ошибку 1037.ini, перейдите к шагу 3 ниже.

Если ни один из предыдущих трех шагов по устранению неполадок не разрешил проблему, можно попробовать более агрессивный подход (примечание: не рекомендуется пользователям ПК начального уровня), загрузив и заменив соответствующую версию файла 1037.ini. Мы храним полную базу данных файлов 1037.ini со 100%-ной гарантией отсутствия вредоносного программного обеспечения для любой применимой версии RocketDock . Чтобы загрузить и правильно заменить файл, выполните следующие действия:

Windows 10: C:Program Files (x86)RocketDockLanguages

Если этот последний шаг оказался безрезультативным и ошибка по-прежнему не устранена, единственно возможным вариантом остается выполнение чистой установки Windows 10.

СОВЕТ ОТ СПЕЦИАЛИСТА: Мы должны подчеркнуть, что переустановка Windows является достаточно длительной и сложной задачей для решения проблем, связанных с 1037.ini. Во избежание потери данных следует убедиться, что перед началом процесса вы создали резервные копии всех важных документов, изображений, установщиков программного обеспечения и других персональных данных. Если вы в настоящее время не создаете резервных копий своих данных, вам необходимо сделать это немедленно.

БЕСПЛАТНЫЕ компьютерные консультации. ДНЕПР

БЕСПЛАТНЫЕ компьютерные консультации. ДНЕПР

БЕСПЛАТНЫЕ компьютерные консультации. ДНЕПР запись закреплена

ОБРАТИЛИСЬ С ПРОБЛЕМОЙ
Здравствуйте.
Пропал раздел жесткого диска (D, если быть конкретным) после установки Windows 7.
В управлении дисками, раздел показывается, но ему не задана буква. При попытке задать букву выдает ошибку «Произошла ошибка при выполнении операции, так как информация в оснастке диспетчера дисков устарела. Обновите данные при помощи операции обновления.Если ошибка сохранится, закройте окно оснастки диспетчера дисков, затем перезапустите эту службу или перезагрузите компьютер». Перезагрузка ничего не дала.
Прочитал уже кучу форумов с подобной проблемой, но, похоже, у каждой проблемы индивидуальное решение.

РЕШЕНИЕ
Откройте диспетчер устройств. Это можно сделать, введя «Диспетчер устройств» или «devmgmt.msc» в поле поиска меню «Пуск».
После открытия диспетчера устройств щелкните «Тома запоминающих устройств», чтобы развернуть раздел «Тома запоминающих устройств» дерева устройств.
В разделе «Тома запоминающих устройств» должен отобразиться том, указанный как «Неизвестное устройство.» Щелкните его правой кнопкой мыши и выберите команду «Удалить.» После отображения запроса на подтверждение нажмите кнопку «ОК».
Перезапустите систему, если появится соответствующее уведомление. Том должен быть доступен после окончания перезагрузки. Если уведомление о перезагрузке системы не отображается, щелкните правой кнопкой диспетчер устройств и выберите параметр «Обновить конфигурацию оборудования.» После завершения обновления и установки тома вы сможете получить доступ к нему.

Александра Зарянова

Александра Зарянова

нет пункта «Неизвестное устройство.» в «Тома запоминающих устройств»
что делать?

Отказ макроса или надстройки от выполнения своих функций имеет ряд причин. Рассмотрим наиболее распространенные из них.

Операционная система

Вплоть до Office 2016 пакет приложений Microsoft Office выпускается в различных версиях, для Windows и для Mac OS. Встроенный в приложения Office язык программирования при этом использует отличающиеся друг от друга библиотеки операционной системы. В связи с этим макрос/надстройка, написанная для работы в приложениях под Windows, может не работать, либо работать некорректно в MacOS. Проверьте операционную систему, для которой разрабатывался макрос/надстройка.

Разработчик пакета офисных приложений

Кроме Microsoft Office, пользователи достаточно часто используют альтернативные пакеты офисных приложений, такие как OpenOffice или LibreOffice. Приложения этих пакетов также имеют встроенные языки программирования, но эти языки отличаются друг от друга. Макросы или надстройки, написанные в Visual Basic for Application в приложениях пакета Microsoft Office, не будут работать в приложениях OpenOffice или LibreOffice. Уточните, для какого пакета офисных программ разработан макрос/надстройка.

Наличие компонента VBA

Для того, чтобы можно было запустить макрос или надстройку в каком-либо приложении пакета Office, необходимо, чтобы с этим пакетом был установлен компонент VBA – встроенный язык программирования Visual Basic for Application. В некоторых версиях Office этот пакет может устанавливаться отдельно. Проверьте, установлен ли этот компонент на компьютере. Нажмите сочетание клавиш Alt+F11, если после этого появляется окно редактора Visual Basic, то компонент установлен. В случае, если компонент отсутствует, его необходимо установить.

Версия Microsoft Office

Активация Microsoft Office

Убедитесь в том, что Microsoft Office не требует активации. Проведите активацию, чтобы избежать каких-либо ограничений при использовании приложений.

Снятие блокировки файла

Файл, полученный с другого компьютера или из сети интернет может быть заблокирован. Чтобы разблокировать такой файл, необходимо кликнуть на нем правой кнопкой мыши и на вкладке «Общие» нажать кнопку «Разблокировать».

snyatie blokirovki s fajla

Система безопасности

Используемые библиотеки

cant find project or library

Это окно также можно вызвать и самостоятельно, если в редакторе VB выбрать пункт меню Tools/References.

Кроме этого не все библиотеки подключаются автоматически. Если на компьютере разработчика макроса или надстройки какая-то библиотека была подключена вручную, затем макрос или надстройка были перенесены на другой компьютер, где эта библиотека не подключена, возникает такая-же ошибка.

Читайте также:

  • Сменить виндовс 7 на 7
  • Как найти ноутбук по мак адресу
  • Windows ce синхронизация времени
  • Qasmixer linux нет звука
  • Как установить origin на windows 10

Программа справки Windows не поддерживается в Windows 10, Windows Server 2012 или более поздних версиях Windows Server. Программа справки Windows доступна только для Windows Vista, 7, 8 и 8.1.

Корпорация Майкрософт настоятельно рекомендует разработчикам программного обеспечения прекратить использование приложения справки Windows. Разработчикам программного обеспечения, которые поставляют программы, использующие HLP-файлы, рекомендуется перевести интерфейс справки на альтернативный формат файла справки, например CHM, HTML или XML. Дополнительные сведения см. в статье MSDN о том, какая версия справки мне нужна? Пока корпорация Майкрософт разрабатывает будущие технологии справки, мы рекомендуем авторам продолжить использование HTML-справки 1.4. HtmL-справка 1.4 включена в версии Windows, начиная с Windows 7.

Признаки

При попытке открыть справку в программах под управлением Windows вы получаете одно из следующих сообщений об ошибке.
 

Справка для этой программы была создана в формате справки Windows, который использовался в предыдущих версиях Windows и не поддерживается в Windows Vista.
 

Справка для этой программы была создана в формате справки Windows, который зависит от функции, не включенной в эту версию Windows. Однако вы можете скачать программу, которая позволит просматривать справку, созданную в формате справки Windows.
 

Справка для этой программы была создана в формате справки Windows, который зависит от функции, не включенной в эту версию Windows. Дополнительные сведения см. на веб-сайте справки и поддержки Майкрософт.

«Разрешение»

Чтобы просмотреть 32-разрядные файлы справки с расширением HLP в Windows, необходимо скачать и установить WinHlp32.exe из Центра загрузки Майкрософт.

  • 4013443 WinHlp32.exe для версий x86 Windows 8.1

  • 4013443 WinHlp32.exe 64-разрядных версий Windows 8.1

  • 4013443 WinHlp32.exe для Windows 8

Важные примечания для скачивания этой программы

  • Откройте ссылки с помощью Internet Explorer.

  • Если при открытии страницы загрузки отображается сообщение «Требуется проверка», нажмите кнопку » Продолжить» и следуйте инструкциям на экране.

  • При появлении запроса на скачивание файла выберите имя файла, содержащее «x64» для 64-разрядных версий Windows или «x86» для 32-разрядных версий Windows. Используйте следующие сведения об автоматическом обнаружении, чтобы сделать выбор.

  • Программа справки Windows не поддерживается в Windows Server 2012 или более поздних версиях Windows Server.

Если при установке WinHlp32.exe или использовании справки возникают проблемы, перейдите к разделу «Дополнительные сведения».

Дополнительные сведения для опытных пользователей

Эта проблема возникает, когда справка Windows использует более раннюю версию программы справки Windows (WinHlp32.exe) для отображения содержимого.

Известные проблемы, которые могут возникнуть при установке WinHlp32.exe

клиентский компонент Центра обновления Windows ошибки 80070422

Исправление этой проблемы вручную

Если при клиентский компонент Центра обновления Windows обновления 80070422 WinHlp32.exe, может потребоваться изменить параметры клиентский компонент Центра обновления Windows службы, а затем перезапустить службу. Для этого выполните указанные ниже действия.

  1. Нажмите кнопку «Пуск» и введите «Службы» в текстовом поле «Запуск поиска » или «Программы поиска и файлы «.

  2. Дважды щелкните «Службы » из списка «Программы». Если вам будет предложено ввести пароль администратора или подтверждение, введите пароль или предоставьте подтверждение.

  3. Щелкните правой кнопкой мыши службу клиентский компонент Центра обновления Windows и выберите пункт «Свойства».

  4. На вкладке «Общие» убедитесь, что рядом с типом запуска выбран параметр «Автоматический».

  5. Рядом с состоянием службы проверьте, запущена ли служба. Если он не запущен, нажмите кнопку » Пуск». Если вам будет предложено ввести пароль администратора или подтверждение, введите пароль или предоставьте подтверждение.

  6. Нажмите кнопку ОК.

Известные проблемы, которые могут возникнуть после установки WinHlp32.exe

В следующем списке показаны известные регрессии функциональных возможностей из предыдущих выпусков WinHlp32.exe. Следующие известные проблемы относятся только к версии WinHlp32.exe, которая рассматривается в этой статье.

  • Макросы отключены

    По умолчанию в справке Windows отключены следующие макросы:

    • ExecFile

    • RegisterRoutine

    • Shellexecute

    • Контекстное

    • Создать

    • Тест

    • ExecProgram

    Однако все остальные макросы в HLP-файлах будут работать так же, как и в предыдущих выпусках. Таким образом, если HLP-файл, который зависит от этих макросов, открывается после установки справки Windows для Windows Vista, Windows 7, Windows Server 2008 или Windows Server 2008 R2, некоторые функциональные возможности файла могут работать неправильно. В этом случае может появиться следующее сообщение об ошибке:

    Возникла проблема при выполнении макроса. (1037)

    Если вам нужно использовать эти макросы, их можно включить с помощью обходного групповая политика или обходного решения реестра, описанного в разделе «Записи реестра и групповые политики для администраторов сети».

  • Не удается получить доступ к HLP-файлам, хранящимся на сайтах интрасети

    По умолчанию вы не можете использовать WinHlp32.exe для доступа к HLP-файлам, хранящимся на сайтах интрасети. При попытке открыть удаленный файл вы получите следующее сообщение об ошибке:

    Не удается отобразить этот файл справки. Попробуйте снова открыть файл справки, и если вы по-прежнему получаете это сообщение, скопируйте файл справки на другой диск и повторите попытку.

    Если вам нужно получить доступ к HLP-файлам, хранящимся на сайтах интрасети, их можно разблокировать с помощью обходного решения групповая политика или обходного пути реестра, описанного в разделе «Записи реестра и групповые политики для администраторов сети».

  • Неинтерактивный доступ пользователей заблокирован

    Доступ к HLP-файлам заблокирован неинтерактивными пользователями, такими как системные процессы. При возникновении этой ошибки пользователь не получает сообщение об ошибке.

  • Функция перетаскивания отключена

    Поддержка функций перетаскивания в приложении отключена. При возникновении этой ошибки пользователь не получает сообщение об ошибке.

  • Зависимости от файлов справки

    Файлы справки с названием «How to Use Help» (Как использовать справку) были удалены из Windows Vista и Windows Server 2008. Удалены следующие файлы:

    • Windows.hlp

    • Winhlp32.hlp

    • Winhlp32.cnt

    • Winhelp.cnt

    • Nocntnt.cnt

    Примечания

    • Эти файлы не включены в Windows 7 или Windows Server 2008 R2.

    • HLP-файлы, которые зависят от этих файлов, могут возвращать ошибку при попытке открыть их.

Устранение проблем совместимости, связанных с WinHlp32.exe

Вы можете использовать WinHlp32.exe для просмотра 32-разрядных файлов справки. В этом выпуске групповая политика параметры и подразделы реестра, которые можно использовать для решения проблем совместимости приложений. Например, параметры групповая политика и подразделы реестра можно использовать для устранения проблем, связанных с макросами в HLP-файлах, и для доступа к HLP-файлам, хранящимся на сайтах интрасети. Однако если пользователи просматривают файлы справки из неизвестного источника, компьютер будет под угрозой, если они включит эти политики или эти параметры. Поэтому следует соблюдать осторожность, когда вы решаете, следует ли реализовать обходные пути совместимости приложений, описанные в этом разделе.

Используйте следующие вопросы, чтобы определить, следует ли устанавливать WinHlp32.exe и какие изменения политики и реестра необходимо внести.

  • Должны ли у вас быть приложения и функциональные возможности, на которые влияет удаление WinHlp32.ex?

    • Сколько приложений требуется WinHlp32.exe? На сколько приложений влияют изменения функциональности? Насколько важны эти приложения?

    • Насколько серьезной является неисправность, вызванная изменениями?

  • Каковы ваши требования к безопасности и возможности безопасности?

    • Что важнее: можно ли использовать WinHlp32.exe или убедиться, что ваша безопасность является как можно более надежной?

    • Обеспечивают ли внешние меры безопасности, такие как локальный или корпоративный брандмауэр, достаточную уверенность в том, что вы можете установить WinHlp32.exe и внести изменения в политику или изменения реестра, описанные в этой статье?

  • Если вы работаете в организации, доставляет ли ваша организация содержимое в формате HLP?

    • Можно ли изменить программу или содержимое таким образом, чтобы им не WinHlp32.exe функции? Например, можно ли преобразовать содержимое справки, которое в настоящее время имеет формат HLP, в альтернативный формат файла, например CHM, .html или .xml?

    • Хранит ли ваша организация HLP-файлы на сайте интрасети? Можно ли установить эти файлы локально?

Включение макросов на одном компьютере после установки WinHlp32.exe

После установки WinHelp32.exe, описанной в этой статье, некоторые макросы будут отключены. Дополнительные сведения об этой проблеме см. в разделе «Известные проблемы».

В этом разделе содержатся инструкции по повторному включению этих макросов путем изменения раздела реестра. Если компьютер находится в управляемой среде, не следуйте этим инструкциям без предварительного консультации с ИТ-отделом. ИТ-отделы могут не включать макросы повторно или повторно включить их с помощью групповых политик. Прежде чем продолжить, ИТ-отделам следует полностью прочитать эту статью.

Предупреждение В этой статье содержатся сведения о том, как обойти проблемы, вызванные изменениями в этом выпуске справки Windows. Однако корпорация Майкрософт не дает никаких конкретных рекомендаций о том, какие разделы реестра и какие значения являются правильными для вашей уникальной среды. Если вы используете управляемую среду, ИТ-отдел лучше всего оценит, как оценить преимущества этих обходных решений от рисков их использования. Более безопасный курс — не использовать обходные пути реестра.

Примечание Для выполнения действий, описанных в этой задаче, необходимо войти на компьютер с помощью учетной записи администратора. Используя учетную запись администратора, вы можете внести изменения на компьютере, которые нельзя внести с помощью другой учетной записи, например стандартной учетной записи.

Чтобы войти в систему с помощью учетной записи администратора, необходимо знать пароль для учетной записи администратора на компьютере. Если вы выполняете эти действия на личном компьютере, скорее всего, вы уже вошли в систему с помощью учетной записи администратора. Если вы выполняете эти действия на рабочем компьютере, может потребоваться обратиться за помощью к системному администратору.

Включение макросов на одном компьютере вручную

Важно

Внимательно выполните действия, описанные в этом разделе. Ошибки при изменении реестра могут привести к серьезным проблемам. Прежде чем изменять его, создайте резервную копию реестра для восстановления на случай возникновения проблем.

Чтобы включить макросы на одном компьютере после установки WinHelp32.exe, выполните следующие действия.

  1. Войдите с помощью учетной записи администратора.

  2. Нажмите клавишу Windows +R, введите regedit и нажмите кнопку » ОК».
    Значок уведомления если появится запрос на ввод пароля администратора или подтверждение, введите пароль или нажмите кнопку «Продолжить».

  3. В 32-разрядных выпусках Windows найдите и выберите следующий подраздел реестра:

    HKEY_LOCAL_MACHINESOFTWAREMicrosoft
    В 64-разрядных выпусках Windows найдите и выберите следующий подраздел реестра:

    HKEY_LOCAL_MACHINESOFTWAREWow6432NodeMicrosoft

  4. В меню «Правка » наведите указатель мыши на пункт «Создать» и нажмите кнопку » Ключ».

  5. Введите WinHelp и нажмите клавишу ВВОД.

  6. Щелкните ключ WinHelp .

  7. В меню «Правка » наведите указатель мыши на пункт «Создать» и выберите значение DWORD (32-разрядное значение).

  8. Введите AllowProgrammaticMacros и нажмите клавишу ВВОД.

  9. В меню «Правка » нажмите кнопку «Изменить».

  10. В поле данных «Значение» введите 1, щелкните шестнадцатеричное значение в базовой области и нажмите кнопку «ОК«.

  11. Закройте редактор реестра.

Как разблокировать HLP-файлы, хранящиеся в интрасети на одном компьютере после установки WinHlp32.exe

После установки WinHelp32.exe файла, описанного в этой статье, HLP-файлы, хранящиеся на сайтах интрасети, блокируются. Дополнительные сведения об этой проблеме см. в разделе «Известные проблемы».

В этой статье содержатся инструкции по разблокировки этих HLP-файлов путем изменения раздела реестра. Если компьютер находится в управляемой среде, не следуйте этим инструкциям без предварительного консультации с ИТ-отделом. ИТ-отделы могут не включать макросы повторно или повторно включить их с помощью групповых политик.

Важно В этой статье содержатся сведения о том, как уменьшить параметры безопасности или отключить функции безопасности на компьютере. Эти изменения можно внести для решения конкретной проблемы. Перед внесением этих изменений рекомендуется оценить риски, связанные с реализацией этого обходного решения в конкретной среде. Если вы реализуете это временное решение, выполните дополнительные действия, которые помогут защитить компьютер.

Предупреждение В этой статье содержатся сведения о том, как обойти проблемы, вызванные изменениями в этом выпуске справки Windows. Однако корпорация Майкрософт не дает никаких конкретных рекомендаций о том, какие разделы реестра и какие значения являются правильными для вашей уникальной среды. Если вы используете управляемую среду, ИТ-отдел лучше всего оценит, как оценить преимущества этих обходных решений от рисков их использования. Более безопасный курс — не использовать обходные пути реестра.

Примечание Для выполнения действий, описанных в этой задаче, необходимо войти на компьютер с помощью учетной записи администратора. Используя учетную запись администратора, вы можете внести изменения на компьютере, которые нельзя внести с помощью другой учетной записи, например стандартной учетной записи.

Чтобы войти в систему с помощью учетной записи администратора, необходимо знать пароль для учетной записи администратора на компьютере. Если вы выполняете эти действия на личном компьютере, скорее всего, вы уже выполнили вход с помощью учетной записи администратора. Если вы выполняете эти действия на рабочем компьютере, может потребоваться обратиться за помощью к системному администратору.

Разблокировка HLP-файлов вручную, хранящихся в интрасети на одном компьютере

Важно

Внимательно выполните действия, описанные в этом разделе. Ошибки при изменении реестра могут привести к серьезным проблемам. Прежде чем изменять его, создайте резервную копию реестра для восстановления на случай возникновения проблем.

Чтобы разблокировать HLP-файлы после установки WinHelp32.exe, выполните следующие действия.

  1. Войдите с помощью учетной записи администратора.

  2. Нажмите клавишу Windows +R, введите regedit и нажмите кнопку » ОК».
    Значок уведомления если появится запрос на ввод пароля администратора или подтверждение, введите пароль или нажмите кнопку «Продолжить».

  3. В 32-разрядных выпусках Windows найдите и выберите следующий подраздел реестра:

    HKEY_LOCAL_MACHINESOFTWAREMicrosoft
    В 64-разрядных выпусках Windows найдите и выберите следующий подраздел реестра:

    HKEY_LOCAL_MACHINESOFTWAREWow6432NodeMicrosoft

  4. В меню «Правка » наведите указатель мыши на пункт «Создать» и нажмите кнопку » Ключ».

  5. Введите WinHelp и нажмите клавишу ВВОД.

  6. Щелкните ключ WinHelp .

  7. В меню «Правка » наведите указатель мыши на пункт «Создать» и выберите значение DWORD (32-разрядное значение).

  8. Введите AllowIntranetAccess и нажмите клавишу ВВОД.

  9. В меню «Правка » нажмите кнопку «Изменить».

  10. В поле данных «Значение» введите 1, щелкните шестнадцатеричное значение в базовой области и нажмите кнопку «ОК«.

  11. Закройте редактор реестра.

Записи реестра и групповые политики для администраторов сети

Предупреждение Это решение может сделать компьютер или сеть более уязвимыми для атак злоумышленников или вредоносных программ, таких как вирусы. Мы не рекомендуем использовать это решение, но предоставляем эти сведения, чтобы вы могли реализовать это решение по собственному усмотрению. Используйте это решение на свой риск.

Предупреждение В этой статье содержатся сведения о том, как обойти проблемы, вызванные изменениями в этом выпуске справки Windows. Однако корпорация Майкрософт не предоставляет никаких конкретных рекомендаций о том, какие разделы реестра и какие значения являются правильными для вашей организации. Ваш ИТ-отдел лучше всего оценивает преимущества этих обходных решений от рисков их использования. Более безопасный курс — не использовать обходные пути реестра.

Скачивание WinHlp32.exe содержит групповая политика параметров и записей реестра для решения двух известных проблем в этом выпуске справки Windows. Используя следующие параметры групповая политика или записи реестра, администраторы сети и отдельные пользователи могут повторно включить макросы и разблокировать HLP-файлы, хранящиеся на сайтах интрасети. Параметры локального групповая политика и текущего пользователя групповая политика предоставляются в качестве обходного решения для каждой функции. Для управления каждым компонентом можно также использовать параметр реестра пользователей.

Для каждой функции приоритет имеет следующий порядок:

  • Локальные компьютеры групповая политика

  • Текущее пользовательское групповая политика

  • Параметр реестра пользователей

Если политика для функции не задана, а параметр реестра пользователей для этой функции не задан, функции будут вести себя так, как описано в разделе «Известные проблемы».

Важно В этом разделе, методе или задаче содержатся инструкции по изменению реестра. Однако при неправильном изменении реестра могут возникнуть серьезные проблемы. Поэтому убедитесь, что вы тщательно выполните эти действия. Чтобы добавить защиту, создайте резервную копию реестра перед его изменением. Затем можно восстановить реестр в случае возникновения проблемы. Чтобы получить дополнительные сведения о резервном копировании и восстановлении реестра, щелкните следующий номер статьи, чтобы просмотреть статью в базе знаний Майкрософт:

322756 Резервное копирование и восстановление реестра в Windows

  • Включение макросов

    Администраторы сети могут использовать параметр «Разрешить программные макросы» в WinHlp32.exeгрупповая политика, чтобы включить или отключить макросы в HLP-файлах. Администраторы могут использовать консоль групповая политика управления (GPMC) для управления этим групповая политика параметрами. Дополнительные сведения о групповая политика см. в разделе «Ссылки».

    Если не задан ни локальный компьютер групповая политика ни текущий пользователь групповая политика для этой функции, пользователи могут изменить параметр реестра пользователей для этой функции, чтобы включить или отключить макросы в HLP-файлах. Чтобы изменить этот параметр, пользователям необходимо сначала добавить в реестр следующий новый подраздел:

    HKEY_LOCAL_MACHINESOFTWAREMicrosoftWinHelp Затем пользователи должны добавить значение DWORD с именем AllowProgrammaticMacros в этот подраздел. Если для AllowProgrammaticMacros задано значение 1, макросы будут включены. Если задано значение 0, макросы будут отключены. Если это значение реестра не существует, макросы будут отключены.

  • Как разблокировать HLP-файлы, хранящиеся в интрасети

    Сетевые администраторы могут использовать разрешение WinHlp32.exe для доступа к HLP-файлам, хранящимся на сайтах интрасети групповая политика, чтобы разблокировать HLP-файлы, хранящиеся в интрасети. Администраторы могут использовать GPMC для управления этим групповая политика настройки. Дополнительные сведения о групповая политика см. в разделе «Ссылки».

    Если ни один групповая политика для этой функции не задан, пользователи могут изменить параметр реестра пользователей для этой функции, чтобы заблокировать или разблокировать HLP-файлы, хранящиеся на сайтах интрасети. Чтобы изменить этот параметр, пользователям необходимо сначала добавить в реестр следующий новый подраздел:

    HKEY_LOCAL_MACHINESOFTWAREMicrosoftWinHelp Затем пользователи должны добавить значение DWORD с именем AllowIntranetAccess в этот подраздел. Если для AllowIntranetAccess задано значение 1, будут доступны HLP-файлы, хранящиеся на сайтах интрасети. Если значение равно 0, HLP-файлы, хранящиеся на сайтах интрасети, будут заблокированы. Если это значение реестра не существует, HLP-файлы, хранящиеся на сайтах интрасети, будут заблокированы.

Помощь поставщикам содержимого, которые выпускают HLP-файлы

Начиная с Windows Vista старый компонент справки (WinHlp32.exe) заменяется новым компонентом справки, который добавляет дополнительные функциональные возможности для более новых версий Windows.

Технология WinHlp32.exe не будет поддерживаться в ее текущей форме в будущих выпусках Windows. Поэтому настоятельно рекомендуется, чтобы разработчики программного обеспечения больше не используют эту программу справки Windows. Разработчикам программного обеспечения, которые выпускают программы, использующие HLP-файлы, рекомендуется перевести свои системы справки на альтернативный формат файла справки, например CHM, .html или .xml. Кроме того, им придется изменить свои вызовы с API WinHelp на новый источник содержимого. Доступно несколько сторонних средств, помогающих разработчикам программного обеспечения преобразовывать содержимое справки из одного формата в другой.

Обратите внимание, что Windows Vista, Windows 7, Windows Server 2008 и Windows Server 2008 R2 по-прежнему WinHelp.exe для 16-разрядных HLP-файлов. Программа WinHelp.exe — это версия справки Windows для 16-разрядных HLP-файлов.

Ссылки

Ошибки sp flash tool и их решениеДовольно часто при прошивке смартфона через sp flash tool возникают ошибки они мало информативные и сложно понять, что именно пошло не так, а в данной статье мы дадим каратное описание ошибкам sp flash и советы по их  решению. Если вам известны другие ошибки напишите их в комментарии.

SP Flash Tool — это приложение для перепрошивки смартфонов и создания резервной копию прошивки. Он совместим с устройствами, использующими процессоры компании MediaTek. Итак, сегодня мы собираемся расшифровать  ошибки SP Flash Tool и дать на них решение. 

Скачать последнию версию SP Flash Tool  и драйвера

Ошибка 2: SP Flash Tool

Значение: SP Flash Tool не удалось установить связь с устройством.

Решение:

  1. Попробуйте использовать другой компьютер (желательно Windows 7)
  2. Установите MediaTek USB-драйверы на ПК
  3. Используйте другой USB-кабель

Ошибка 1002: S_INVALID_ARGUMENTS

Значение: Некорректный Scatter файл. Например, в файле scatter отключены блоки PRELOADER и DSP_BL

Решение: Загрузите другой Scatter файл и включите блоки PRELOADER и DSP_BL

Ошибка 1011: S_NOT_ENOUGH_STORAGE_SPACE

Значение: Возникает в том случае, если размер одной из частей прошивки превышает размер отведенного ему пространства. Обычно это блок ядра или рекавери. Данная ошибка иногда возникает на недоработанных версиях Flash Tool. Замените используемую версии прошивальщика

Ошибка 1012:S_NOT_ENOUGH_MEMORY 

Значение: версия SP Flash Tool не поддерживает размер файла (ов) в прошивке или ПЗУ.

Решение: Используйте последнюю версию Flash Tool

Ошибка 1013:S_COM_PORT_OPEN (1003)

РешениеПроблема с портом. Например, ошибка может появиться, если в BIOS отключены COM порты. Даже если COM порт виртуальный, а физический USB. В этом случае вы не увидите оборудование на которое ставятся драйверы PRELOADER. Проблема может быть в кабеле USB, в этом случае замените кабель. Если неисправен USB порт компьютера, то необходимо переткнуть кабель в другой порт. Теоретически, может возникать в режиме UART USB порта.

Порт был виден, его выбрали в настройках Flash Tool, программа записала его в INI файл, после чего систему перегрузили с отключенным портом, и сразу же запустили Flash Tool, не выбирая порт.. Когда после прохода красной полосы до 100% в результате прошивки, кнопки операций снова становятся доступными для нажатия, но ни сообщения об ошибке, ни окошка с зеленым кругом не появляется возникнет данная ошибка, или аналогичная ей, код которой 1013 . В этом состоянии Flash Tool не закрывает COM порт, и попытка снова запустить любую операцию, переподключив устройство, вызовет ошибку. Если программа перешла в такое неопределенное состояние, то нужно закрыть ее и запустить заново

Ошибка аналогична ошибке 1003. Решения нужно искать по тому же принципу. Может помочь смена версии прошивальщика, или прошивка устройства с отключенной батареей

Ошибка 1018 S_UNKNOWN_TARGET_BBCHIP

Решение: Воспользуйтесь более свежей версией прошивальщика

Ошибка 1022: S_UNSUPPORTED_VER_OF_DA

Значение: версия инструмента SP Flash несовместима с вашим устройством или не работает интерфейс USB.

Решение:

  1. Используйте другую или последнюю версию SP Flash Tool 
  2. Замените USB-кабель или USB-порт.

Ошибка 1040: S_UNSUPPORTED_OPERATION

Значение:Scatter файл не подходит для устройства. Например в названии файла содержится номер версии 6777, а устройство версии 6555

Решение:Убедитесь, что загружен правильный Scatter файл.

Ошибка 1041:CHS_ERR

Решение: Необходимо перейти во вкладку Help, нажать Open Logs Folder и удалить все логи. Перейти в папку с прошивкой и удалить файл Checksum.ini

Ошибка 1042: S_TIMEOUT

Значение: процесс перепрошивки занял слишком много времени и SP Flash Tool обнаружил тайм-аут.

Решение:

  1. Попробуйте прошивать один файл за раз
  2. Используйте последнюю версию SP Flash Tool  
  3. Используйте другой ПК и USB-кабель

Ошибка 2004: S_BROM_DOWNLOAD_FAIL

Значение: Проблема может заключаться в версии флэштула. Загрузите версию в конце которой есть обозначение SEC. Ошибка может возникнуть, если в операционной системе установлено множество USB драйверов для разных устройств. Воспользуйтесь программой USBDeview для удаления установленных USB драйверов и выполните прошивку через Flash Tool. Может помочь подключение устройства с зажатой клавишей громкости + или . Если вышеперечисленные способы не помогают, после того как появится ошибка, необходимо сразу закрыть окно с ошибкой и тут же нажать кнопку download еще раз

Решение:

  1. Выньте аккумулятор и снова вставьте его.
  2. Используйте другой USB-кабель, порт и ПК.
  3. Щелкните правой кнопкой мыши flash_tool.exe -> Свойства -> Совместимость -> Установите пакет обновления 3 (SP3) для Windows XP -> Применить -> ОК -> Запустите flash_tool.exe от имени администратора.
  4. Убедитесь, что аккумулятор достаточно заряжен.

Ошибка 2005:S_BROM_CMD_STARTCMD_FAIL 

Значение: Ошибка может возникать на устройствах MTD, если при выборе режима Download на блоках PRELOADER или DSP_BL не установлена галочка. Необходимо использовать подходящую версию Flash Tool, например v2.xxx для телефонов MT6573, или выключить режим DA Download All.. При выборе режима Download на блоках PRELOADER или DSP_BL установлена галочка, необходимо ее снять с этих блоков. Если эти блоки необходимо прошить, то подсоединить телефон в режиме BOOTROM. При выборе ReadBackFormat или MemoryTest нужно подключить устройство в режиме BOOTROM. Можно попробовать прошить устройство с отключенной батареей

Решение:

  1. Выньте аккумулятор и снова вставьте его.
  2. Используйте другой USB-кабель, порт и ПК.
  3. Щелкните правой кнопкой мыши flash_tool.exe -> Свойства -> Совместимость -> Установите пакет обновления 3 (SP3) для Windows XP -> Применить -> ОК -> Запустите flash_tool.exe от имени администратора.
  4. Убедитесь, что аккумулятор достаточно заряжен.

Ошибка 2020: S_BROM_CHKSUM16_MEM_RESULT_DIFF

Значение: Flash Tool обнаружил проблему при перемещении файлов, которые должны быть переброшены, во внутреннюю SRAM устройства.

Решение:

  1. Используйте последнюю версию SP flash tool 
  2. В SP flash tool выберите «Опции»> «Опции»> «Соединение»> «Аккумулятор». Установите его «с батареей».
  3. Используйте опцию Форматировать все + Скачать
  4. Удерживайте обе кнопки регулировки громкости перед подключением к ПК для мигания и отпустите после начала мигания

Ошибка 2035: S_BROM_CMD_JUMP_DA_FAIL

Решение: После нажатия кнопки Download подключить к компьютеру выключенное устройство с предварительно зажатыми кнопками громкости

Ошибка 3001: S_DA_EXT_RAM_ERROR

Решение: Происходит из-за проблем со связью. Проверьте кабель и подключитесь к другому порту. Если это все еще происходит, попробуйте использовать другой компьютер.

Ошибка 3012: NAND_FLASH_NOT_FOUND

Значение: проблема связана с определением флеш памяти устройства. Воспользуйтесь другой версией прошивальщика, т.к. по мере выпуска разных версий обновляется информация о флеш памяти. Если не помог вышеуказанный вариант, попробуйте прошить устройство на другом компьютере, т.к. бывают проблемы, которые не позволяют корректно определить память на конкретной машине

Решение:

  1. Используйте другую версию Flash Tools 
  2. Используйте другой компьютер, USB-кабель и USB-порт.

Ошибка 3013:S_DS_SOC_CHECK_FAIL

Решение: Возможно, что в настройках прошивки Flash Tool не стоит галочка на Uboot . Uboot — загрузчик операционной системы и драйверов для инициализации основного оборудования, таких как дисплей, процессор, GPIO. Ошибка может возникать в том случае, если в строке пути, по которому расположена программа или прошивка, присутствует кириллица или некорректные символы, иероглифы. Допустимо размещение программы и файла прошивки только по тому пути, который полностью состоит из латинских символов. Пример, показывающий некорректное размещение файлов: C:UsersПользовательDesktopПрошивкиПрошивка планшета

Ошибка 3054:S_DA_NFB_BOOTLOADER_NOT_EXIST

Решение: Воспользуйтесь другой версией прошивальщика. Попробуйте заменить версию прошивальщика с пятой на третью версию

Ошибка 3066:S_DA_HANDSET_FAT_INFO_NOT_FOUND

Решение: Возникает при автоматическом форматировании. Необходимо задать адреса форматирования вручную

Ошибка 3140:S_DA_UPDATE_BOOLOADER_EXIST_MAGIC_NOT_

MATCHED

Значение: SP flash tool обнаружил ошибку при перепрошивке выбранного файла в неуказанный раздел

Решение:

  1. Используйте последнюю версию SP Flash Tool 
  2. Используйте параметр формата, а затем загрузите в SP Flash Tool

Ошибка 3144: S_DA_EMMC_FLASH_NOT_FOUND

Решение: Ошибка возникает, если есть проблемы с аппаратной частью устройства. Также может возникать в том случае, если Scatter файл не подходит к устройству. Например, в названии присутствует emmc, а устройство на самом деле с MTD флэш. Есть вероятность того, что проблема решится, если воспользоваться другим компьютером и операционной системой. Предпочтительно использовать компьютер с операционной системой Windows XP со вновь установленными драйверами

Ошибка 3149: S_DA_SDMMC_WRITE_FAILED

Значение: SP Flash Tool не может прошить файлы на устройстве.

Решение:

Воспользуйтесь другой версией прошивальщика. Если прошиваете 3 версией, попробуйте 5 версию, либо наоборот. Выберите режим Format all + download. Необходимо переустановить драйвера для устройства и добиться того, чтобы в диспетчере устройств устройство правильно отображалось как MTK USB PORT. Запустите Flash Tool, снимите галочки со всех пунктов, кроме PRELOADER и прошейте в режиме Download. Если прогрес идёт но в конце возникает ошибка, то убеждаемся что прошивать будем только PRELOADER. В верхней части окна Flash Tool, рядом с кнопкой Download, нажмите кнопку Format. Откроется окно настроек форматирования с режимами форматирования Auto и Manual. В режиме Auto есть две настройки, поставить галочку на верхний пункт и нажать OK. Начнётся форматирование. После окончания форматирования, снова прошить PRELOADER. После удачной прошивки PRELOADER, прошить устройство полностью

Ошибка 3168:S_CHIP_TYRE_NOT_MATCH

Значение: Некорректный scatter файл. 

Решение:

  1. Используйте Scatter файл от вашего устройства
  2. Используйте более высокую версию SP Flash Tool 
  3. Установите правильные драйверы на ПК.

Ошибка 3178: BROM_ERROR_S_STORAGE_NOT_MATCH (3167,3182)

Значение: прошивка, которую вы пытаетесь прошить, несовместима с вашим устройством.

Решение: попробуйте получить подходящую прошивку для вашей модели устройства.

Ошибка 4001: S_FT_DA_NO_RESPONSE

Значение: SP Flash Tool сталкивается с проблемой связи с устройством.

Решение: Смените порт USB и перенесите Flash Tool в корень диска. Возможно, в Download Agent нет информации о ЦП/флэш, поэтому воспользуйтесь более свежей версией прошивальщика. Ошибка может быть аппаратной, например при вышедшей из строя флеш-памяти

Ошибка 4004: ошибка драйвера

Значение: драйверы не найдены или повреждены.

Решение: Удалите драйверы и установите их заново.

Ошибка 4008:S_FT_DOWNLOAD_FAIL

Решение: Воспользуйтесь другой версией прошивальщика. Есть вероятность, что поможет замена версии на более старую. Проблема может быть в кабеле USB, в этом случае замените кабель или порт USB. Возможно в процессе прошивки сел аккумулятор. Зарядите устройство и попробуйте выполнить прошивку заново. Можно попробовать вытащить из устройства аккумулятор и попробовать прошить без него. Попробуйте выполнить форматирование устройства

Ошибка 4009: S_FT_READBACK_FAIL 

Значение: Кроме ошибок чтения в самом устройстве, ошибка может наблюдаться в случае ошибок в файловой системе компьютера. Например, недостаточно места на диске, либо файл невозможно перезаписать т.к. он заблокирован. Для того, чтобы понять причину, необходимо смотреть в лог Flash Tool

Решение:

  1. Используйте другую версию SP Flash Tool 
  2. Удалить старые файлы Readback

Ошибка 4010: S_FT_FORMAT_FAIL

Значение: Рекомендуется сменить версию прошивальщика на 5 версию, крайне желательно начать с версии 5.1352.01 и попытаться прошить аппарат через режим Firmware upgrade. Прошивка должна быть оригинальной для аппарата и содержать все блоки. Попробуйте сменить кабель для прошивки на более качественный

Решение:

  1. Используйте правильную прошивку для вашей модели устройства.
  2. Используйте последнюю версию SP Flash Tool 

Ошибка 4017:S_FT_NAND_READLEN_NOT_ALIGNMENT 

Значение: вы пытаетесь прошить файл, который не был обработан для перепрошивки через SP flash tool

Ошибка 4032:S_FT_ENABLE_DRAM_FAIL

Значение:Ошибка sp flash tool может возникнуть при прошивке на аппарате с процессором MT6589. Для ее устранения, отформатируйте устройство через кнопку Format. Не делайте форматирование, если у вас аппарат на процессоре MT6575 или 6577. После форматирования, прошейте устройство со всеми галочками, нажав кнопку Download. Можно попробовать переустанавить драйверы и выполнить форматирование повторно. Выполнить прошивку, если предыдущая попытка была неудачной. Если ничего не помогло, то попробуйте сменить версию прошивальщика. Рекомендуется начать с версии 5.1352.01. Ошибка связана с неверным блоком PRELOADER. Необходимо найти родной PRELOADER и прошить его. Если прошивка стандартным методом не приносит результата, то возможно придется прошивать аппарат через тестпоинт. Появлению данной ошибки может способствовать низкий заряд батареи. Можно попробовать решить проблему замкнув 4 и 5 контакт на разъеме USB. 

Решение:  

  1. Убедитесь, что прошиваемая вами прошивка сделана для вашей модели устройства.
  2. Удалите папку SP Flash Tool и заново распакуйте ее.
  3. Убедитесь, что вы отметили флажки только для тех файлов, которые находятся на том диске, который вы собираетесь прошить
  4. Возможно, установлен неправильный драйвер. Удалите драйверы VCOM, Preloader и MTK и переустановите их.

Если выше изложенный материал вам не помог вот ссылка на подробный разбор данной ошибки Sp Flash Tool 4032 ошибка как исправить

Ошибка 4037: S_FT_FS_READ_FAIL 

 Решение: Ошибка sp flash tool может возникать в том случае, если в строке пути, по которому расположена программа или прошивка, присутствует кириллица или некорректные символы, иероглифы. Допустимо размещение программы и файла прошивки только по тому пути, который полностью состоит из латинских символов. Пример, показывающий некорректное размещение файлов: C:UsersПользовательDesktopПрошивкиПрошивка планшета

Ошибка 4050: S_FT_NEED_DOWNLOAD_ALL_FAIL

Значение: Возникает в том случае, если не совпадают размеры блоков в PMT и в Scatter файле. В общем случае эта ошибка устраняется загрузкой всех блоков, после этого размер в PMT должен поменяться на правильный. Можно попробовать сменить версию прошивальщика

Решение:

  1. Используйте другую версию Flash Tool

Ошибка 4058:S_FT_GET_MEMORY_FAIL 

Решение:Ошибка возникает при наличии проблем с флеш-памятью. Не рекомендуется решать проблему самостоятельно. Варианты устранения ошибки: прогрев чипа флеш-памяти паяльным феном при высокой температуре, примерно 400 градусов по цельсию. Вероятно, придется произвести замену чипа с донорской платы, либо на новый

Ошибка 5002: S_INVALID_DA_FILE

Значение: выбранный файл агента загрузки (DA) несовместим. DA-файл связен с  Flash Tool, поэтому выберите тот, который находится в папке Flash Tool.

Решение:

  1. Выберите файл DA из папки SP Flash Tool.
  2. При настройке Flash Tool Download Agent необходимо выбирать прилагающийся к данной версии прошивальщика. Выбор других агентов приводит к данной ошибке

Ошибка 5007:S_FTHND_FILE_IS_NOT_LOADED_YET 

Значение: Ошибка обычно возникает в том случае, если в программе Flash Tool стоит галочка на блоке, к которому некорректно указан путь, либо отсутствует. Для ее устранения, необходимо указать корректный путь к нужному блоку прошивки. Также при возникновении данной ошибки, воспользуйтесь другой версией прошивальщика, например v5.1352.01

Решение:

  1. Убедитесь, что разбросанный файл находится в той же папке, где находятся другие файлы для прошивки.
  2. Снимите флажок с любого элемента, у которого нет файла или путь которого не указан.

Ошибка 5054:S_DL_GET_DRAM_SETTINGS_FAIL 

Решение: Ошибка sp flash tool заключается в том, что программе Flash Tool не удалось получить настройки оперативной памяти устройства. Может возникнуть в том случае, если был выполнен полный сброс через Flash Tool. Также ошибка может происходить при обмене данными между Download Agent и устройством. При некорректной работе драйвера сбой при передаче может произойти лишь в том случае, если у вас операционная система Windows XP с сервис-паком ниже третьего. Необходимо установить третий сервис-пак. В старших версиях драйвер usbser.sys обновлениям не подвергался и в переустановке не будет смысла.

Ошибка 5056:S_DL_PMT_ERR_NO_SPACE

Значение: размер файла больше доступного размера раздела.

Решение:

  1. Убедитесь, что вы записываете правильные файлы на устройство.
  2. Попробуйте другой ROM.

Ошибка 5066: S_DL_PC_BL_INVALID_GFH_FILE_INFOR

Решение: Некорректный Scatter файл. Может возникнуть в том случае, если выбрали Scatter из папки с неподготовленными для Flash Tool файлами. Необходимо выбрать корретный Scatter файл

Ошибка 5069: S_DL_PMT_ERR_NO_SPACE

Решение: Ошибка вероятнее всего возникает из-за особенности флеш-памяти. Случается так, что форматирование, даже низкоуровневое, не дает никакого эффекта. Т.е во флеш-памяти все остается как есть. Если делать Format, то может появиться ошибка 1037 и при этом выводится сообщение, с необходимостью выполнить Download для создания таблиц разделов. Firmware Upgrade выполнить не удается, из-за ошибки 1037. Можно сделать Download только PRELOADER. Загрузка любого другого раздела выдаст ошибку 5069. От версии Scatter, размера раздела FAT не зависит. Можно выполнить Manual Format, но в пределах UA Size. После форматирования, попытка залить любой раздел снова сводится к ошибке 5069

Ошибка 5095: S_DL_MAUI_FLASH_ID_NOT_MATCHED_

WITH_TARGET 

Значение: если вы выберете неправильный файл, например, другой тип флэш-памяти, загружаемый в текущую флэш-память, инструмент выдаст предупреждение с этим сообщением. Выбранные флэш-файлы не совместимы с вашим устройством.

Ошибка 6010:SP FLASHTOOL

Значение: устройство имеет защищенный или заблокированный загрузчик.

Решение: разблокируйте загрузчик на вашем устройстве.

Ошибка 6012:S_SECURITY_SF_CODE_COMMAND_FORBIDDEN

Значение: используемый агент загрузки несовместим с устройством.

Решение: установите Download-Agent на MTK_AllInOne_DA.bin

Ошибка 6045: S_SECURITY_SECURE_USB_DL_IMAGE_SIGN_

HEADER_NOT_FOUND

 Решение: Рекомендуется сменить версию прошивальщика на 5 версию, крайне желательно начать с версии 5.1352.01

Ошибка 6047: S_SECURITY_SECURE_USB_DL_IMAGE_

HASH_FAIL

Значение: проверка хеша (целостности) прошиваемых файлов не удалась.

Решение:

  1. Используйте SP Flash Tool последнию 
  2. Выберите правильный файл Download Agent
  3. Перейдите к «Параметры»> «Параметры»> «Загрузить» и снимите флажок «DA DLL All»

Ошибка 6104:S_SECURITY_SECURE_USB_DL_DA_RETURN_

INVALID_TYPE

 Решение: Рекомендуется сменить версию прошивальщика на 5 версию, крайне желательно начать с версии 5.1352.01

Ошибка 6124:S_SECURITY_INVALID_PROJECT

Значение: Есть вероятность того, что ошибка пропадет после прошивки родного PRELOADER через кнопку Download. После этого выполнить прошивку модифицированного Recovery и полную прошивку

Решение:

  1. Используйте правильную прошивку для вашей точной модели устройства
  2. Выберите правильный файл агента загрузки в SP flash tool
  3. Выберите «Параметры»> «Параметры»> «Подключение»> «Скорость USB»> «Полная скорость».
  4. Выберите «Параметры»> «Параметры»> «Загрузить»> «Отменить выбор DA DL All with Checksum».

Ошибка 6126: S_SECURITY_SECRO_HASH_INCORREC

Решение: Ошибка часто встречается на аппаратах Huawei G610, Huawei G700, LG L60 Dual и на текущий момент не решаема в домашних условиях. Последствия: периодическая перезагрузка, в устройстве остаются удаленные файлы, при проверке памяти на запись возникает ошибка. Причина в том, что устройство имеет залоченный загрузчик, из-за чего необходимо прошить разлоченный SEC_ROдля разблокировки и дальнейшей перепрошивки. Сводится все к тому, что именно при прошивке SEC_RO возникает эта ошибка. Рекомендуется заменить память в сервисе

Ошибка 8038: SP flash tool

Значение: Для устранения ошибки необходимо использовать режим Firmware upgrade. Внимание! Прошивка должна быть конкретно для прошиваемого устройства и содержать абсолютно ВСЕ блоки, которые обычно есть в стоковых прошивках

Решение:

  1. Отформатируйте телефон в SP flash tool (не форматировать Bootloader), затем попробуйте снова прошить файлы с помощью Download.
  2. Если загрузка не работает, сделайте обновление прошивки
  3. Если резервная копия MTK содержит более одного файла разброса, повторите попытку с другим файлом разброса.
  4. Если это невозможно, попробуйте сначала выполнить форматирование или используйте обновление прошивки.
  5. Если это не сработает, откройте файл разброса с помощью Notepad ++ и измените __NODL_FAT на FAT, удалив «__NODL_».

Ошибка 8045: SP FLASH TOOL ERROR

Решение: Ошибка sp flash tool похожа на 8038, но на практике правка Scatter-файла не помогает. Для решения проблемы можно обратиться в сервисный центр для прошивки аппарата через программатор. В домашних условиях иногда срабатывает вариант прошивки через кнопку Download со всеми установленными галочками. Также можно попробовать сменить версию прошивальщика на 5 версию, крайне желательно начать с версии 5.1352.01. Проблема может быть аппаратная

Ошибка 8100: SP FLASH TOOL ERROR

Значение: не удается найти порт USB.

Решение:

  1. Установите драйверы. Если они уже установлены, удалите их и установите заново.

Ошибка 8200: SP FLASH TOOL ERROR

Значение: Ошибка возникает если вы пытаетесь прошить аппарат на одной платформе, прошивкой от другого. Например у вас MT6577, а вы пытаетесь прошить прошивкой от аппарата на MT6575. Можно попробовать сменить версию прошивальщика на 5 версию, крайне желательно начать с версии 5.1352.01

Решение:

  1. Найдите правильный файл восстановления.
  2. Используйте последнюю версию SP Flash Tool.

Ошибка 8406: ОШИБКА SP FLASH TOOL

Значение: проблемы совместимости.

Решение:

  1. Прошивка правильная прошивка для вашей точной модели устройства.
  2. Обновите драйверы VCOM.

Ошибка 8417:Ошибка инициализации Scatter-файл. Пожалуйста, проверьте правильность имени загружаемого файла.

Значение: Ошибка может возникать в том случае, если в строке пути, по которому расположена программа или прошивка, присутствует кириллица или некорректные символы, иероглифы. Допустимо размещение программы и файла прошивки только по тому пути, который полностью состоит из латинских символов. Пример, показывающий некорректное размещение файлов: C:UsersПользовательDesktopПрошивкиПрошивка планшета

SP Flash Tool не удалось найти COM-порт

Значение:Эта ошибка говорить о том что, что у Flash Tool возникают проблемы с поиском COM-порта, к которому подключено ваше устройство.

Решение:

  1. Подключите ваши смартфон к другому порту и убедитесь, что у вас установлены USB-драйверы.
  2. Откройте « Диспетчер устройств » и найдите COM-порт подключенного устройства. Откройте Flash Tool, нажмите «Параметры» -> «COM-порт» -> выберите COM-порт, к которому вы подключили ваше устройство.

Устройство автоматически отключается во время перепрошивки

Значение: устройство отключается, как только начинается процесс перепрошивки, прерывая процесс.

Решение:

  1. Попробуйте другой USB-шнур, USB-порт и ПК
  2. Удерживайте кнопку громкости вниз или вверх при подключении устройства к ПК для перепрошивки

SP Flash Tool остается на 0 процентов

Решение:

  1. Установите необходимые  драйверы MediaTek VCOM на ПК. на ПК.
  2. Используйте последнюю версию SP Flash Tool 

Ошибка: не удалось инициализировать Scatter-файл. Пожалуйста, проверьте правильность имени загружаемого файла.

Решение:

  1. Убедитесь, что Scatter файл не был переименован.
  2. Попробуйте более новую версию SP Flash Tool  

Ошибка: USB-устройство не распознано

Значение:  Эта ошибка возникает при подключении устройства к ПК. Он показывает подсказку в системном трее после подключения вашего устройства. ПК испытывает затруднения при связи с вашим устройством (это происходит из-за прерывания, проблем с оборудованием или драйвером).

Решение:

  1. Попробуйте использовать другой USB-шнур, USB-порт или компьютер.
  2. Установите последние версии драйверов MediaTek USB на ПК.

Ошибка: пожалуйста, выберите один ROM файл перед выполнением операции

Значение: SP Flash Tool не может распознать наличие отмеченного элемента.

Решение:

Снова выберите Scatter-файл и снимите отметки со всех элементов. Не используйте флажок, который снимает галочки со всех пунктов сразу, а затем поставте нужные галки и попробуйте снова.

Ошибка: PRO_INFO: не удалось получить информацию PMT

Значение: SP Flash Tool испытывает проблемы с чтением телефона.

Решение:

  1. Используйте другой ПК и USB-кабель.
  2. Убедитесь, что телефон заряжен

Примечание. Для некоторых телефонов необходимо вынимать аккумулятор во время прошивки.

Ошибка 2005 flashtool как исправить

{youtube}EBC8S9Hp_f8{/youtube}

Flashtool ошибка 1041 как исправить

{youtube}WjR9fCGW1jM{/youtube}

Ошибка 1013 flashtool что делать как решить

{youtube}ml9rKWo0IvM?t=16{/youtube}

  1. Добавить свои

Оставьте свой комментарий

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
146
147
148
149
150
151
152
153
154
155
156
157
158
159
160
161
162
163
164
165
166
167
168
169
170
171
172
173
174
175
176
177
178
179
180
181
182
183
184
185
186
187
188
189
190
191
192
193
194
195
196
197
198
199
200
201
202
203
204
205
206
207
208
209
210
211
212
213
214
215
216
217
218
219
220
221
222
223
224
225
226
227
228
229
230
231
232
233
234
235
236
237
238
239
240
241
242
243
244
245
246
247
248
249
250
251
252
253
254
255
256
257
258
259
260
261
262
263
264
265
266
267
268
269
270
271
272
273
274
275
276
277
278
279
280
281
282
283
284
285
286
287
288
289
290
291
292
293
294
295
296
297
298
299
300
301
302
303
304
305
306
307
308
309
310
311
312
313
314
315
316
317
318
319
320
321
322
323
324
325
326
327
328
329
330
331
332
333
334
335
336
337
338
339
340
341
342
343
344
345
346
347
348
349
350
351
352
353
354
355
356
357
358
359
360
361
362
363
364
365
366
367
368
369
370
371
372
373
374
375
376
377
378
379
380
381
382
383
384
385
386
387
388
389
390
391
392
393
394
395
396
397
398
399
400
401
402
403
404
405
406
407
408
409
410
411
412
413
414
415
416
417
418
419
420
421
422
423
424
425
426
427
428
429
430
431
432
433
434
435
436
437
438
439
440
441
442
443
444
445
446
447
448
449
450
451
452
453
454
455
456
457
458
459
460
461
462
463
464
465
466
467
468
469
470
471
472
473
474
475
476
477
478
479
480
481
482
483
484
485
486
487
488
489
490
491
492
493
494
495
496
497
498
499
500
501
502
503
504
505
506
507
508
509
510
511
512
513
514
515
516
517
518
519
520
521
522
523
524
525
526
527
528
529
530
531
532
533
534
535
536
537
538
539
540
541
542
543
544
545
546
547
548
549
550
551
552
553
554
555
556
557
558
559
560
561
562
563
564
565
566
567
568
569
570
571
572
573
574
575
576
577
578
579
580
581
582
583
584
585
586
587
588
589
590
591
592
593
594
595
596
597
598
599
600
601
602
603
604
605
606
607
608
609
610
611
612
613
614
615
616
617
618
619
620
621
622
623
624
625
626
627
628
629
630
631
632
633
634
635
636
637
638
639
640
641
642
643
644
645
646
647
648
649
650
651
652
653
654
655
656
657
658
659
660
661
662
663
664
665
666
667
668
669
670
671
672
673
674
675
676
677
678
679
680
681
682
683
684
685
686
687
688
689
690
691
692
693
694
695
696
697
698
699
700
701
702
703
704
705
706
707
708
709
710
711
712
713
714
715
716
717
718
719
720
721
722
723
724
725
726
727
728
729
730
731
732
733
734
735
736
737
738
739
740
741
742
743
744
745
746
747
748
749
750
751
752
753
754
755
756
757
758
759
760
761
762
763
764
765
766
767
768
769
770
771
772
773
774
775
776
777
778
779
780
781
782
783
784
785
786
787
788
789
790
791
792
793
794
795
796
797
798
799
800
801
802
803
804
805
806
807
808
809
810
811
812
813
814
815
816
817
818
819
820
821
822
823
824
825
826
827
828
829
830
831
832
833
834
835
836
837
838
839
840
841
842
843
844
845
846
847
848
849
850
851
852
853
854
855
856
857
858
859
860
861
862
863
864
865
866
867
868
869
870
871
872
873
874
875
876
877
878
879
880
881
882
883
884
885
886
887
888
889
890
891
892
893
894
895
896
897
898
899
900
901
902
903
904
905
906
907
908
909
910
911
912
913
914
915
916
917
918
919
920
921
922
923
924
925
926
927
928
929
930
931
932
933
934
935
936
937
938
939
940
941
942
943
944
945
946
947
948
949
950
951
952
953
954
955
956
957
958
959
960
961
962
963
964
965
966
967
968
969
970
971
972
973
974
975
976
977
978
979
980
981
982
983
984
985
986
987
988
989
990
991
992
993
994
995
996
997
998
999
1000
1001
1002
1003
1004
1005
1006
1007
1008
1009
1010
1011
1012
1013
1014
1015
1016
1017
1018
1019
1020
1021
1022
1023
1024
1025
1026
1027
1028
1029
1030
1031
1032
1033
1034
1035
1036
1037
1038
1039
1040
1041
1042
1043
1044
1045
1046
1047
1048
1049
1050
1051
1052
1053
1054
1055
1056
1057
1058
1059
1060
1061
1062
1063
1064
1065
1066
1067
1068
1069
1070
1071
1072
1073
1074
1075
1076
1077
1078
1079
1080
1081
1082
1083
1084
1085
1086
1087
1088
1089
1090
1091
1092
1093
1094
1095
1096
1097
1098
1099
1100
1101
1102
1103
1104
1105
1106
1107
1108
1109
1110
1111
1112
1113
1114
1115
1116
1117
1118
1119
1120
1121
1122
1123
1124
1125
1126
1127
1128
1129
1130
1131
1132
1133
1134
1135
1136
1137
1138
1139
1140
1141
1142
1143
1144
1145
1146
1147
1148
1149
1150
1151
1152
1153
1154
1155
1156
1157
1158
1159
1160
1161
1162
1163
1164
1165
1166
1167
1168
1169
1170
1171
1172
1173
1174
1175
1176
1177
1178
1179
1180
1181
1182
1183
1184
1185
1186
1187
1188
1189
1190
1191
1192
1193
1194
1195
1196
1197
1198
1199
1200
1201
1202
1203
1204
1205
1206
1207
1208
1209
1210
1211
1212
1213
1214
1215
1216
1217
1218
1219
1220
1221
1222
1223
1224
1225
1226
1227
1228
1229
1230
1231
1232
1233
1234
1235
1236
1237
1238
1239
1240
1241
1242
1243
1244
1245
1246
1247
1248
1249
1250
1251
1252
1253
1254
1255
1256
1257
1258
1259
1260
1261
1262
1263
1264
1265
1266
1267
1268
1269
1270
1271
1272
1273
1274
1275
1276
1277
1278
1279
1280
1281
1282
1283
1284
1285
1286
1287
1288
1289
1290
1291
1292
1293
1294
1295
1296
1297
1298
1299
1300
1301
1302
1303
1304
1305
1306
1307
1308
1309
1310
1311
1312
1313
1314
1315
1316
1317
1318
1319
1320
1321
1322
1323
1324
1325
1326
1327
1328
1329
1330
1331
1332
1333
1334
1335
1336
1337
1338
1339
1340
1341
1342
1343
1344
1345
1346
1347
1348
1349
1350
1351
1352
1353
1354
1355
1356
1357
1358
1359
1360
1361
1362
1363
1364
1365
1366
1367
1368
1369
1370
1371
1372
1373
1374
1375
1376
1377
1378
1379
1380
1381
1382
1383
1384
1385
1386
1387
1388
1389
1390
1391
1392
1393
1394
1395
1396
1397
1398
1399
1400
1401
1402
1403
1404
1405
1406
1407
1408
1409
1410
1411
1412
1413
1414
1415
1416
1417
1418
1419
1420
1421
1422
1423
1424
1425
1426
1427
1428
1429
1430
1431
1432
1433
1434
1435
1436
1437
1438
1439
1440
1441
1442
1443
1444
1445
1446
1447
1448
1449
1450
1451
1452
1453
1454
1455
1456
1457
1458
1459
1460
1461
1462
1463
1464
1465
1466
1467
1468
1469
1470
1471
1472
1473
1474
1475
1476
1477
1478
1479
1480
1481
1482
1483
1484
1485
1486
1487
1488
1489
1490
1491
1492
1493
1494
1495
1496
1497
1498
1499
1500
1501
1502
1503
1504
1505
1506
1507
1508
1509
1510
1511
1512
1513
1514
1515
1516
1517
1518
1519
1520
1521
1522
1523
1524
1525
1526
1527
1528
1529
1530
1531
1532
1533
1534
1535
1536
1537
1538
1539
1540
1541
1542
1543
1544
1545
1546
1547
1548
1549
1550
1551
1552
1553
1554
1555
1556
1557
1558
1559
1560
1561
1562
1563
1564
1565
1566
1567
1568
1569
1570
1571
1572
1573
1574
1575
1576
1577
1578
1579
1580
1581
1582
1583
1584
1585
1586
1587
1588
1589
1590
1591
1592
1593
1594
1595
1596
1597
1598
1599
1600
1601
1602
1603
1604
1605
1606
1607
1608
1609
1610
1611
1612
1613
1614
1615
1616
1617
1618
1619
1620
1621
1622
1623
1624
1625
1626
1627
1628
1629
1630
1631
1632
1633
1634
1635
1636
1637
1638
1639
1640
1641
1642
1643
1644
1645
1646
1647
1648
1649
1650
1651
1652
1653
1654
1655
1656
1657
1658
1659
1660
1661
1662
1663
1664
1665
1666
1667
1668
1669
1670
1671
1672
1673
1674
1675
1676
1677
1678
1679
1680
1681
1682
1683
1684
1685
1686
1687
1688
1689
1690
1691
1692
1693
1694
1695
1696
1697
1698
1699
1700
1701
1702
1703
1704
1705
1706
1707
1708
1709
1710
1711
1712
1713
1714
1715
1716
1717
1718
1719
1720
1721
1722
1723
1724
1725
1726
1727
1728
1729
1730
1731
1732
1733
1734
1735
1736
1737
1738
1739
1740
1741
1742
1743
1744
1745
1746
1747
1748
1749
1750
1751
1752
1753
1754
1755
1756
1757
1758
1759
1760
1761
1762
1763
1764
1765
1766
1767
1768
1769
1770
1771
1772
1773
1774
1775
1776
1777
1778
1779
1780
1781
1782
1783
1784
1785
1786
1787
1788
1789
1790
1791
1792
1793
1794
1795
1796
1797
1798
1799
1800
1801
1802
1803
1804
1805
1806
1807
1808
1809
1810
1811
1812
1813
1814
1815
1816
1817
1818
1819
1820
1821
1822
1823
1824
1825
1826
1827
1828
1829
1830
1831
1832
1833
1834
1835
1836
1837
1838
1839
1840
1841
1842
1843
1844
1845
1846
1847
1848
1849
1850
1851
1852
1853
1854
1855
1856
1857
1858
1859
1860
1861
1862
1863
1864
1865
1866
1867
1868
1869
1870
1871
1872
1873
1874
1875
1876
1877
1878
1879
1880
1881
1882
1883
1884
1885
1886
1887
1888
1889
1890
1891
1892
1893
1894
1895
1896
1897
1898
1899
1900
1901
1902
1903
1904
1905
1906
1907
1908
1909
1910
1911
1912
1913
1914
1915
1916
1917
1918
1919
1920
1921
1922
1923
1924
1925
1926
1927
1928
1929
1930
1931
1932
1933
1934
1935
1936
1937
1938
1939
1940
1941
1942
1943
1944
1945
1946
1947
1948
1949
1950
1951
1952
1953
1954
1955
1956
1957
1958
1959
1960
1961
1962
1963
1964
1965
1966
1967
1968
1969
1970
1971
1972
1973
1974
1975
1976
1977
1978
1979
1980
1981
1982
1983
1984
1985
1986
1987
Option Explicit
' ####### глобальные переменные #######
Dim FilesCount As Integer       ' счетчик файлов, в штуках
Dim FilesDirName As String      ' адрес и именя искомого файла
Dim Nalich_CSV As Byte          ' проверка наличия готовых к обработке файлов-заданий (0 - нет, 1 - есть)
Dim Nalich_FILE As Byte         ' факт наличия искомого файла (0 - нет, 1 - есть)
Dim Nalich_PRINTER As Byte      ' проверка наличия файла для загрузки параметров принтеров (0 - нет, 1 - есть)
Dim Nalich_VIZ As Byte          ' проверка наличия готовых к печати визиток (0 - нет, 1 - есть)
Dim PrintDo As Long             ' окончание печати по списку
Dim PrintOt As Long             ' начало печати по списку
Dim PrinterViz As Integer       ' индекс выбранного принтера на вкладке "Визитки"
Dim PrinterBrosh As Integer     ' индекс выбранного принтера на вкладке "Брошюры"
Dim PrinterSpisok As Integer    ' индекс выбранного принтера на вкладке "Список"
Dim WhatUserLuking As String    ' имя выбранной вкладки
Dim zadanie_info_file
Dim zadanie_info_program
' #####################################
 
Private Sub cboDoliaSp_Change()
    Dim for_case As String    ' тип составляемого списка
    
    Call SpisViewReload   '=== процедура: обновление внешнего вида вкладки "Список"
    for_case = cboDoliaSp.value
    If for_case = "Способ отображения..." Then
        lstSpis.Clear
        lstSpis.BackColor = &H80000004
        lstSpis.Enabled = False
     Else
        Call NapolnenieSpiska     ' наполнение списка
    End If
End Sub
 
Private Sub cboDoliaViz_Change()
    Dim rInd As Integer
    Dim strSelection As String  ' выбранный пункт списка
    Dim TruFal As Boolean
    Dim FalTru As Boolean
    
    strSelection = cboDoliaViz.value
    FalTru = True
    TruFal = False
    Select Case strSelection
    Case Is = "Текущая"
        txbCopy.BackColor = &H80000004
        txbCopy.value = Null
    Case Is = "Все"
        FalTru = True
        lstViz.ListIndex = 1
        txbCopy.BackColor = &H80000004
        txbCopy.value = Null
    Case Is = "От"
        txbCopy.BackColor = &H80000004
        txbCopy.value = Null
    Case Is = "До"
        txbCopy.BackColor = &H80000004
        txbCopy.value = Null
    Case Is = "Коррекция числа копий:"
        TruFal = True
        rInd = lstViz.ListIndex
        If rInd > 0 Then
            txbCopy.value = lstViz.List(rInd, 2)
            txbCopy.BackColor = &H80000005
          Else
            cboDoliaViz.value = "Текущая"
        End If
    End Select
    If lstViz.List(0, 0) = "Нет файлов для печати..." Then FalTru = False
    cmdCalcV.Enabled = TruFal
    lstViz.Enabled = FalTru
    txbCopy.Enabled = TruFal
End Sub
 
Private Sub cboFZad_Change()                        ' ========= выбрали файл: проанализировали =========
    chkPrinted.Enabled = False
    chkPrinted.value = False
    Call FZAnaliz        '=== процедура:
    Call AnalizInReport    '=== процедура:
    If cboFZad.value = "" _
        Or cboFZad.value = "Выберите задание..." _
        Or cboFZad.value = "Полный список.fz" _
        Or Nalich_CSV < 1 Then
        cmdArhiving.Enabled = False
     Else
        cmdArhiving.Enabled = True
    End If
End Sub
 
Private Sub cboFZSp_Change()
    If Nalich_CSV < 1 Then Exit Sub
    
    Dim strFZN As String
    Dim TruFal As Boolean
    cboKatSp.Clear                              ' очистили список категорий
    cboKatSp.value = "Выберите категорию..."
    cmdCalcS.Enabled = False
    lblAdr.Caption = "Адрес выбранного файла..."
    lblName.Caption = "Выбранный файл..."
    lstSpis.Clear
    txbCopies.BackColor = &H80000004
    txbCopies.Enabled = False
    txbCopies.value = Null
    strFZN = CStr(cboFZSp.value)
    If strFZN = "" Or strFZN = "Выберите задание..." Then TruFal = False Else TruFal = True
    cboKatSp.Enabled = TruFal
    If strFZN <> "Полный список.fz" Then cmdArhiving.Enabled = TruFal
    If TruFal Then Call SeparatorSpiska     ' наполнение списка категорий
End Sub
 
Private Sub cboKatSp_Change()
    If cboKatSp.value = "Выберите категорию..." Then Exit Sub
    cboDoliaSp.Enabled = True
    Call SpisViewReload  '=== процедура: обновление внешнего вида вкладки "Список"
    If cboDoliaSp = "Способ отображения..." Then Exit Sub
    Call NapolnenieSpiska    '=== процедура: наполнение списка
End Sub
 
Private Sub cboPrinter_Change()           ' ========= выбор принтера =========
    If cboPrinter.value <> "Укажите принтер ..." Then
        cmdPrinterProp.Enabled = True
     Else
        cmdPrinterProp.Enabled = False
    End If
    Select Case WhatUserLuking
        Case Is = "pViz"        ' если выбрана вкладка "Визитки"
            PrinterViz = cboPrinter.ListIndex
        Case Is = "pBrosh"      ' если выбрана вкладка "Брошюры и Буклеты"
            PrinterBrosh = cboPrinter.ListIndex
        Case Is = "pSpisok"     ' если выбрана вкладка "Список"
            PrinterSpisok = cboPrinter.ListIndex
    End Select
End Sub
 
Private Sub cboVizArhiv_Change()
  If cboVizArhiv.value = "Укажите файл для возврата из архива..." Or _
     cboVizArhiv.value = "В архиве файлов нет..." Then
     cmdVFromArhiv.Enabled = False
    Else
     cmdVFromArhiv.Enabled = True
  End If
End Sub
 
Private Sub cboVizArhiv_MouseDown(ByVal Button As Integer, ByVal Shift As Integer, ByVal X As Single, ByVal Y As Single)
    cboVizArhiv.ListIndex = cboVizArhiv.ListCount - 1   ' выделяем последнюю строку в списке
End Sub
 
Private Sub cboZArhiv_Change()
    If cboZArhiv.value = "Укажите файл для возврата из архива..." Or _
       cboZArhiv.value = "В архиве файлов нет..." Then
       cmdZFromArhiv.Enabled = False
     Else
       cmdZFromArhiv.Enabled = True
    End If
End Sub
 
Private Sub cboZArhiv_MouseDown(ByVal Button As Integer, ByVal Shift As Integer, ByVal X As Single, ByVal Y As Single)
    cboZArhiv.ListIndex = cboZArhiv.ListCount - 1   ' выделяем последнюю строку в списке
End Sub
 
 
Private Sub chkPrinted_Click()                         
 ' ========= выбор файла: автоматический анализ при выборе ====
    Call FZAnaliz
End Sub
 
Private Sub cmdArhiving_Click()    ' ========= кнопка: поместить в АРХИВ =========
    Select Case WhatUserLuking
        Case Is = "pBrosh"          ' если выбрана вкладка "Брошюры и Буклеты"
            Call FZToArhiv(cboFZad.value)   ' поместить в архив файл-задание
            Call FZReload         ' перезагрузка списков файлов-заданий
            Call FZReloadArhiv    ' перезагрузка списка архива файлов-заданий
        Case Is = "pSpisok"         ' если выбрана вкладка "Список"
            Call FZToArhiv(cboFZSp.value)    ' поместить в архив задание
            Call FZReload         ' перезагрузка списков файлов-заданий
            Call FZReloadArhiv    ' перезагрузка списка архива файлов-заданий
        Case Is = "pViz"            ' если выбрана вкладка "Визитки"
            Call VizToArhiv         ' поместить архив визитку
            Call VizReload          ' перезагрузка списка визиток к печати
            Call VizReloadArhiv     ' перезагрузка списка визиток в архиве
    End Select
    lstLog.ListIndex = lstLog.ListCount - 1     ' выделяем последнюю строку в отчёте
End Sub
 
Private Sub cmdCalcS_Click()
    Set objAscker = frmPrintPP.txbCopies
    frmCalc.Show
    Set objAscker = Nothing
End Sub
 
Private Sub cmdCalcV_Click()
    Set objAscker = frmPrintPP.txbCopy
    frmCalc.Show
    Set objAscker = Nothing
End Sub
 
Private Sub cmdLogClear_Click()
    lstLog.Clear     ' ========= очистка "Справочно-информационного поля" (ЛОГ)
End Sub
 
Private Sub cmdPRINT_Click()      ' ========= кнопка: ПЕЧАТЬ =========
    Dim i, iStart, iEnd As Integer  ' индексы цикла
    Dim lisInd, lisCount As Integer
    Dim msgTxt, msgTxtAdd As String
    Dim pCount As Integer
    Dim printerNm As String
    Dim ShouldArhiv As Boolean
    Dim strSelection As String  ' выбранный пункт списка
    Dim TipSpiska As String
 
    printerNm = cboPrinter.value
    If printerNm = "Укажите принтер ..." Or printerNm = "" Then
        MsgBox "УКАЖИТЕ принтер для печати.", vbQuestion, "Ошибка: не указан принтер."
        cboPrinter.SetFocus
        Exit Sub
    End If
    Select Case WhatUserLuking
        Case Is = "pBrosh"  ' если выбрано: вкладка "Брошюры и Буклеты"
             msgTxt = PrintBrosh(printerNm)             '=== процедура: печать элемента задания
             If lstMain.Enabled = True Then lstMain.SetFocus    ' установили фокус на список частей задания
        Case Is = "pSpisok" ' если выбрано: вкладка "Список"
             TipSpiska = cboDoliaSp.value
             If TipSpiska = "От и До" Or TipSpiska = "От..." Or TipSpiska = "...До" Then
                msgTxt = PrintBroshOtDo(printerNm)      '=== процедура: печать "От и До"
              Else
                msgTxt = PrintBroshSpisok(printerNm)    '=== процедура: печать элемента списка
             End If
             If lstSpis.Enabled = True Then lstSpis.SetFocus    ' установили фокус на список элементов
        Case Is = "pViz"    ' если выбрано: вкладка "Визитки"
            lisInd = lstViz.ListIndex
            lisCount = lstViz.ListCount
            If lisCount > 1 And lisInd > 0 Then
                strSelection = cboDoliaViz.value
                Select Case strSelection
                Case Is = "Текущая"
                    iStart = lisInd
                    iEnd = lisInd
                Case Is = "Все"
                    lstViz.ListIndex = 1
                    iStart = 1
                    iEnd = lisCount - 1
                Case Is = "От"
                    iStart = lisInd
                    iEnd = lisCount - 1
                Case Is = "До"
                    iStart = 1
                    iEnd = lisInd
                Case Is = "Коррекция числа копий:"
                    iStart = lisInd
                    iEnd = lisInd
                    pCount = CInt(txbCopy.value)
                End Select
                ShouldArhiv = chkVizToArh.value
                For i = iStart To iEnd
                    msgTxtAdd = msgTxtAdd & Chr(13) & lstViz.List(lstViz.ListIndex, 0)
                    If strSelection <> "Коррекция числа копий:" Then
                        pCount = pCount + lstViz.List(lstViz.ListIndex, 2)
                    End If
                    Call PrintVizitka(printerNm)    '=== процедура: печать визиток
                    If ShouldArhiv = True Then Call VizToArhiv
                    lstViz.RemoveItem (lstViz.ListIndex)    ' удаляем выполненное задание из списка заданий
                Next i
                chkVizToArh.value = True
                txbCopy.BackColor = &H80000004
                txbCopy.value = Null
                txbCopy.Enabled = False
                If ShouldArhiv = True Then Call VizReloadArhiv  ' перезагрузка архива
                'cmdArhiving.Enabled = False
                msgTxt = "Отправка визиток на печать завершена." & Chr(13) _
                        & "На принтер: " & printerNm & " отправлено " & CStr(pCount) & " страниц." _
                        & msgTxtAdd
            Else
                msgTxt = "Отпаравка на печать не возможна. Не правильно указаны параметры печати"
            End If
            If lstViz.Enabled = True Then lstViz.SetFocus   ' установили фокус на список визиток
    End Select
    If msgTxt = "" Then Exit Sub
    MsgBox msgTxt, vbInformation, "Отправка на печать визиток." ' отчитались пользователю
End Sub
 
Private Sub cmdPrinterProp_Click()       ' ========= кнопка: свойства принтера - 1 =========
    Dim retval As Double
    Dim name_print As String
    Dim printrName As String
    printrName = cboPrinter.value
    If printrName = "" Or printrName = "Укажите принтер ..." Then   ' если принтер НЕ УКАЗАН, то:
        cboPrinter.SetFocus
        Exit Sub
    End If
    name_print = "rundll32 printui.dll, PrintUIEntry /n " & Chr(34) & printrName & Chr(34) & " /p c"
    retval = Shell(name_print, 1)
End Sub
 
Private Sub cmdReload_Click()     ' ========= кнопка: ПЕРЕЗАГРУЗКА =========
    cboPrinter.value = "Укажите принтер ..."
    Select Case WhatUserLuking
        Case Is = "pBrosh"          ' если выбрано: вкладка "Брошюры и Буклеты"
            PrinterBrosh = -1       ' сбрасываем индекс выбранного принтера
            Call FZReload           ' перезагрузка списков файлов-заданий
            Call FZReloadArhiv      ' перезагрузка списка архива файлов-заданий
        Case Is = "pSpisok"         ' если выбрано: вкладка "Список"
            PrinterSpisok = -1      ' сбрасываем индекс выбранного принтера
            Call FZReload
            Call SpisReload         ' перезагрузка вкладки "Список"
            lblWellAdd.Caption = "="
        Case Is = "pViz"            ' если выбрано: вкладка "Визитки"
            PrinterViz = -1         ' сбрасываем индекс выбранного принтера
            Call VizReload          ' перезагрузка списка визиток к печати
            Call VizReloadArhiv     ' перезагрузка списка визиток в архиве
        Case Is = "pSettings"       ' если выбрано: вкладка "Переменные"
            Call ReloadPrinter      ' перезагрузка списка пиртреров
    End Select
End Sub
 
Private Sub cmdVFromArhiv_Click()
    Call VizFromArhiv
    Call VizReload
    Call VizReloadArhiv
End Sub
 
Private Sub cmdZFromArhiv_Click()           ' ========= кнопка: возврат файлов из архива =========
    Call FZFromArhiv
    Call FZReload
    Call FZReloadArhiv
End Sub
 
 
 
Private Sub lblWellAdd_Click()
    If lblWellAdd.Caption = "=" Then
        lblWellAdd.Caption = "+"
        lblWellAdd.ForeColor = &HFF&
    Else
        lblWellAdd.Caption = "="
        lblWellAdd.ForeColor = &H80000012
    End If
End Sub
 
 
Private Sub lstMain_Click()
    If Nalich_CSV < 0 Then Exit Sub
    
    Dim PrintedOrNot As Byte           ' признак (на/нена)печатано
    
    If cboFZad.value = "Выберите задание..." Or lstMain.ListIndex < 1 Then
        cmdPRINT.Enabled = False
     Else
        cmdPRINT.Enabled = True
    End If
    PrintedOrNot = 0
    On Error Resume Next
    PrintedOrNot = lstMain.List(lstMain.ListIndex, 4)
    If PrintedOrNot = 1 Then
       MsgBox "ВНИМАНИЕ: Выбрано напечатанное задание!", vbExclamation
    End If
End Sub
 
Private Sub lstMain_DblClick(ByVal Cancel As MSForms.ReturnBoolean) ' ====== удаление записи из Задания по DblClick =
    Dim zadanie As String
    zadanie = lstMain.List(lstMain.ListIndex, 0)
    If zadanie = "Название задания:" Then Exit Sub
    lstMain.RemoveItem (lstMain.ListIndex)
    lstLog.AddItem Format(Now, "hh:mm:ss") & "  ПРИНУДИТЕЛЬНОЕ УДАЛЕНИЕ задания: [" & zadanie & "]"
    lstLog.AddItem "---------------------------------------------------------------------------------------------------------"
    lstLog.ListIndex = lstLog.ListCount - 1          ' выделяем последнюю строку в отчёте
End Sub
 
Private Sub lstSpis_Click()
    If lstSpis.ListCount = 0 Then Exit Sub
    If lstSpis.List(0, 0) = "Все элементы удалены!" Then Exit Sub
    
    Dim copies_print As Integer     ' количество копий файлов, отправляемых на печать
    Dim for_case As String          ' тип составляемого списка
    Dim OtDoSwicher As String
    Dim zadanie As String
    
    for_case = cboDoliaSp.value
    OtDoSwicher = cboOtDoSp.value
    zadanie = lstSpis.List(lstSpis.ListIndex, 0)
    Select Case for_case
       Case Is = "От и До"
          Select Case OtDoSwicher
             Case Is = "От..."
                lblName.Caption = "Начало печати:" & Chr(13) & zadanie
                PrintOt = lstSpis.ListIndex
             Case Is = "...До"
                lblAdr.Caption = "Окончание печати:" & Chr(13) & zadanie
                PrintDo = lstSpis.ListIndex
          End Select
          If PrintOt > PrintDo And lblAdr.Caption <> "Окончание печати..." Then
             MsgBox "Ничего не будет напечатано, поскольку " & Chr(34) & "Начало печати..." & Chr(34) & Chr(13) & _
                    "указано позже её " & Chr(34) & "Окончания" & Chr(34) & "!", _
                    vbCritical, _
                    "Ошибка указания " & Chr(34) & "Начальной" & Chr(34) & _
                    " и " & Chr(34) & "Конечной" & Chr(34) & " позиции отправки на печать."
          End If
       Case Is = "От..."
          lblName.Caption = "Начало печати:" & Chr(13) & zadanie
          lblAdr.Caption = "Окончание печати:" & Chr(13) & lstSpis.List(lstSpis.ListCount - 1, 0)
          PrintOt = lstSpis.ListIndex
          PrintDo = lstSpis.ListCount - 1
       Case Is = "...До"
          lblName.Caption = "Начало печати:" & Chr(13) & lstSpis.List(0, 0)
          lblAdr.Caption = "Окончание печати:" & Chr(13) & zadanie
          PrintOt = 0
          PrintDo = lstSpis.ListIndex
       Case Else
          lblName.Caption = zadanie
          lblAdr.Caption = lstSpis.List(lstSpis.ListIndex, 2)
          cmdCalcS.Enabled = True
          txbCopies.BackColor = &H80000005
          txbCopies.Enabled = True
          copies_print = lstSpis.List(lstSpis.ListIndex, 3)
          If copies_print > 0 Then
             txbCopies.value = copies_print
           Else
             txbCopies.value = Null
          End If
    End Select
    cmdPRINT.Enabled = True
End Sub
 
Private Sub lstSpis_DblClick(ByVal Cancel As MSForms.ReturnBoolean)
    If lstSpis.ListIndex < 0 Then Exit Sub
    If lstSpis.ListCount = 0 Then Exit Sub
    If IsNull(lstSpis.List(lstSpis.ListIndex)) Then Exit Sub
    If lstSpis.List(0, 0) = "Все элементы удалены!" Then Exit Sub
    lstSpis.RemoveItem (lstSpis.ListIndex)
    If lstSpis.ListCount = 0 Then
        cmdPRINT.Enabled = False
        lblAdr.Caption = "Адрес выбранного файла..."
        lblName.Caption = "Выбранный файл..."
        lblAdr.Enabled = False
        lblName.Enabled = True
        lstSpis.AddItem "Все элементы удалены!"
        lstSpis.AddItem "Выберите другую часть задания"
        lstSpis.AddItem "или другое задание."
        lstSpis.BackColor = &H80000004
        cmdCalcS.Enabled = False
        txbCopies.BackColor = &H80000004
        txbCopies.Enabled = False
        txbCopies.value = Null
    End If
End Sub
 
Private Sub lstSpis_KeyDown(ByVal KeyCode As MSForms.ReturnInteger, ByVal Shift As Integer)
    Call ListRowMove(lstSpis, KeyCode, Shift)
End Sub
 
Private Sub lstViz_Click()
    If Nalich_VIZ < 0 Then Exit Sub
    Dim fName As String                   ' имя обрабатываемой визитки
    Dim FNameFull As String               ' имя PreView к обрабатываемой визитке с "путями"
    Dim TuFal As Boolean
     
    If lstViz.ListIndex > 0 Then
        fName = lstViz.List(lstViz.ListIndex, 4)
        FNameFull = lblVPath.Caption & Left(fName, Len(fName) - 4) & ".jpg"  ' задаем адрес поиска файла PreView
        If ProverNalichFiles(FNameFull) = False Then    ' если нет подготовленных к печати файлов, то
            FNameFull = ""
            MsgBox "У этой визитки нет PreView!", vbInformation, Me.Caption
        End If
        TuFal = True
    Else
        FNameFull = ""
        TuFal = False
    End If
    'CheckBox3.Enabled = TuFal
    'CheckBox3.Value = False               ' снимаем пометку о необходимости корекции количества копий
    cmdPRINT.Enabled = TuFal
    cmdArhiving.Enabled = TuFal
    Image1.PictureSizeMode = fmPictureSizeModeZoom
    Image1.Picture = LoadPicture(FNameFull)
    txbCopy.BackColor = &H80000004
    txbCopy.Enabled = False
    txbCopy.value = Null
End Sub
 
Private Sub lstViz_DblClick(ByVal Cancel As MSForms.ReturnBoolean) ' ====== удаление записи из Задания по DblClick =
    Dim zadanie As String
    zadanie = lstViz.List(lstViz.ListIndex, 0)
    If zadanie = "" Then Exit Sub
    If zadanie = "Название задания:" Then Exit Sub
    If zadanie = "Нет файлов для печати..." Then Exit Sub
    lstLog.AddItem Format(Now, "hh:mm:ss") & "  ПРИНУДИТЕЛЬНОЕ УДАЛЕНИЕ задания: [" & zadanie & "]"
    lstLog.AddItem "---------------------------------------------------------------------------------------------------------"
    lstLog.ListIndex = lstLog.ListCount - 1          ' выделяем последнюю строку в отчёте
    lstViz.RemoveItem (lstViz.ListIndex)
End Sub
 
Private Sub MultiPage1_Change()          ' ========= "переход" по вкладкам =========
    WhatUserLuking = MultiPage1.SelectedItem.Name
    cmdPrinterProp.Enabled = False
    cmdPRINT.Enabled = False
    lstViz.ListIndex = 0
    Select Case WhatUserLuking
        Case Is = "pViz"                     ' если выбрана вкладка "Визитки"
            If PrinterViz = -1 Or _
                PrinterViz = PrinterBrosh Or _
                PrinterViz = PrinterSpisok Then
                cboPrinter.value = "Укажите принтер ..."
             Else
                cboPrinter.ListIndex = PrinterViz  ' указывем принтер, выбранный на этой владке
            End If
            cmdArhiving.Enabled = False
            MultiPage2.value = 0
        Case Is = "pBrosh"                    ' если выбрана вкладка "Брошюры и Буклеты"
            If cboFZad.value = "Нет файлов для обработки..." Or _
                cboFZad.value = "Выберите задание..." Or _
                cboFZad.value = "" Then
                cmdArhiving.Enabled = False
             Else
                cmdArhiving.Enabled = True
            End If
            If Nalich_CSV > 0 Then lstMain.ListIndex = 0
            If PrinterBrosh = -1 Or _
                PrinterBrosh = PrinterViz Or _
                PrinterBrosh = PrinterSpisok Then
                cboPrinter.value = "Укажите принтер ..."
             Else
                cboPrinter.ListIndex = PrinterBrosh  ' указывем принтер, выбранный на этой владке
            End If
            MultiPage2.value = 1
        Case Is = "pSpisok"                   ' если выбрана вкладка "Список"
            If cboFZSp.value = "Выберите задание..." Or _
                cboFZSp.value = "" Then
                cmdArhiving.Enabled = False
             Else
                cmdArhiving.Enabled = True
            End If
            If PrinterSpisok = -1 Or _
                PrinterSpisok = PrinterViz Or _
                PrinterSpisok = PrinterBrosh Then
                cboPrinter.value = "Укажите принтер ..."
             Else
                cboPrinter.ListIndex = PrinterSpisok    ' указывем принтер, выбранный на этой владке
            End If
            MultiPage2.value = 1
        Case Is = "pSettings"                    ' если выбрана вкладка "Переменные"
            cmdArhiving.Enabled = False
            cboPrinter.value = "Укажите принтер ..."
            MultiPage2.value = 1
    End Select
End Sub
 
Private Sub txbCopies_KeyDown(ByVal KeyCode As MSForms.ReturnInteger, ByVal Shift As Integer)
    If KeyCode = 13 Then Call cmdPRINT_Click
End Sub
 
Private Sub txbPoisk_Change()
    Call LookForString(txbPoisk, lstSpis)
End Sub
 
Private Sub txbPoisk_Enter()
    If txbPoisk.value = "Поиск..." Then
        txbPoisk.value = ""
        txbPoisk.ForeColor = &H80000012
    End If
End Sub
 
Private Sub txbPoisk_Exit(ByVal Cancel As MSForms.ReturnBoolean)
    If txbPoisk.value = "" Then
        txbPoisk.ForeColor = &H80000010
        txbPoisk.value = "Поиск..."
    End If
End Sub
 
Private Sub txbPoisk_KeyDown(ByVal KeyCode As MSForms.ReturnInteger, ByVal Shift As Integer)
    If KeyCode = 40 Then lstSpis.SetFocus
End Sub
 
Private Sub UserForm_Initialize()        ' ========= инициализация формы =========
    ' наполнение спика:
    cboDoliaViz.AddItem "Текущая"
    cboDoliaViz.AddItem "Все"
    cboDoliaViz.AddItem "От"
    cboDoliaViz.AddItem "До"
    cboDoliaViz.AddItem "Коррекция числа копий:"
    cboDoliaViz.ListIndex = 0
    
    Call PrintersAdd    ' добавление списка принтеров
    If chkPrAbsent = False Then Call PrinterCheck   ' очистка списка принтеров от отсутствующих в системе
    If Nalich_PRINTER = 0 Then Exit Sub
    Call VizReload
    Call VizReloadArhiv
    Call FZReload
    Call FZReloadArhiv
    Call SpisReload
    If Nalich_CSV < 1 And Nalich_VIZ < 1 Then
        MsgBox "Не обнаружено файлов, готовых к обработке!" & Chr(13) _
            & "Воспользуйтесь Архивом или закройте программу!"
    End If
    cboDoliaSp.AddItem "Позиция"
    cboDoliaSp.AddItem "От и До"
    cboDoliaSp.AddItem "От..."
    cboDoliaSp.AddItem "...До"
    cboDoliaSp.AddItem "Заказанное"
    WhatUserLuking = MultiPage1.SelectedItem.Name
    PrinterViz = -1
    PrinterBrosh = -1
    PrinterSpisok = -1
End Sub
 
 
' ##################### ______ процедуры ____ #####################
 
Private Sub AnalizInReport()
    If Nalich_CSV < 1 Then Exit Sub
    If cboFZad.value = "" Then Exit Sub
    If cboFZad.value = "Выберите задание..." Then Exit Sub
    
    Dim for_case As String
    Dim fName As String         ' адрес *.info-файла
    Dim Frep As Long
    Dim MyText As String
    Dim name_info As String     ' адрес и имя *.info-файла
    Dim ShoudToAdd As Byte      ' признак добавлять/не добавлять
    
    name_info = lblFZPath.Caption & Left(cboFZad.value, Len(cboFZad.value) - 3) & ".info"
    If ProverNalichFiles(name_info) Then
        ShoudToAdd = 0
        Frep = FreeFile            ' добавляем автоматический счётчик открытых файлов
        Open name_info For Input As #Frep
        Do Until EOF(Frep)
            Line Input #Frep, MyText
            for_case = Left(MyText, InStr(MyText, ";") - 1)  ' получили признак напечатанного
            If for_case <> "текст" Then                      ' усли отпечатан не "текст", то...
                If ShoudToAdd = 0 Then
                    lstLog.AddItem "###############       УЖЕ НАПЕЧАТАНО       ##################"
                    ShoudToAdd = 1
                End If
                lstLog.AddItem MyText
            End If
        Loop            ' начать цикл заново
        Close #Frep     ' закрыть файл по выполнении цикла
        If ShoudToAdd = 1 Then
            lstLog.AddItem "##################################################"
        End If
        lstLog.ListIndex = lstLog.ListCount - 1   ' выделяем последнюю строку в отчёте
    End If
End Sub
 
Private Sub FZAnaliz()            ' ========= процедура: анализ файла =========
    If Nalich_CSV < 1 Then Exit Sub
    If cboFZad.value = "" Then Exit Sub                        ' проверка: выбрано-ли задание
    If cboFZad.value = "Выберите задание..." Then Exit Sub     ' проверка: выбрано-ли задание
    
    Dim AllStrings() As String
    Dim copies_print As Long        ' количество копий файла, отправляемого на печать
    Dim count_f As Integer          ' счетчик файлов, отправляемых на печать
    Dim count_f_obl As Long         ' счетчик файлов, отправляемых на печать обложек
    Dim count_f_forz As Long        ' счетчик файлов, отправляемых на печать форзацев
    Dim count_f_vkl1 As Long        ' счетчик файлов, отправляемых на печать вкладышей 1-я сторона
    Dim count_f_vkl2 As Long        ' счетчик файлов, отправляемых на печать вкладышей 2-я сторона
    Dim count_f_bukl1 As Long       ' счетчик файлов, отправляемых на печать буклетов 1-я сторона
    Dim count_f_bukl2 As Long       ' счетчик файлов, отправляемых на печать буклетов 2-я сторона
    Dim count_f_cvetO As Long       ' счетчик файлов, отправляемых на печать полноцветов обложек
    Dim count_f_cvetF As Long       ' счетчик файлов, отправляемых на печать полноцветов форзацев
    Dim count_f_cvet1 As Long       ' счетчик файлов, отправляемых на печать полноцветов внутр.часть 1-я сторона
    Dim count_f_cvet2 As Long       ' счетчик файлов, отправляемых на печать полноцветов внутр.часть 2-я сторона
    Dim count_f_pap1 As Long        ' счетчик файлов, отправляемых на печать папок 1-я сторона
    Dim count_f_pap2 As Long        ' счетчик файлов, отправляемых на печать папок 2-я сторона
    Dim count_p As Long             ' общее количество страниц, отправляемых на печать
    Dim count_p_vkl1 As Long        ' счетчик страниц, отправляемых на печать вкладышей 1-я сторона
    Dim count_p_vkl2 As Long        ' счетчик страниц, отправляемых на печать вкладышей 2-я сторона
    Dim count_p_obl As Long         ' счетчик страниц, отправляемых на печать обложек
    Dim count_p_forz As Long        ' счетчик страниц, отправляемых на печать форзацев
    Dim count_p_bukl1 As Long       ' счетчик страниц, отправляемых на печать буклетов 1-я сторона
    Dim count_p_bukl2 As Long       ' счетчик страниц, отправляемых на печать буклетов 2-я сторона
    Dim count_p_cvetO As Long       ' счетчик страниц, отправляемых на печать полноцветов обложек
    Dim count_p_cvetF As Long       ' счетчик страниц, отправляемых на печать полноцветов форзацев
    Dim count_p_cvet1 As Long       ' счетчик страниц, отправляемых на печать полноцветов внутр.часть 1-я сторона
    Dim count_p_cvet2 As Long       ' счетчик страниц, отправляемых на печать полноцветов внутр.часть 2-я сторона
    Dim count_p_pap1 As Long        ' счетчик страниц, отправляемых на печать папок 1-я сторона
    Dim count_p_pap2 As Long        ' счетчик страниц, отправляемых на печать папок 2-я сторона
    Dim Fa As Long
    Dim Fl As Long
    Dim for_case As String             ' признак печати (текст, обложка, вкладышь и пр.)
    Dim MyText As String               ' строка из файла-задания по порядку целиком
    Dim name_csv As String             ' адрес и имя обрабатываемого файла-задания
    Dim name_log As String             ' адрес и имя *.log-файла
    Dim PrintedOrNot As Byte           ' признак (на/нена)печатано
    Dim printed_obl As Byte            ' признак (на/нена)печатано
    Dim printed_forz As Byte           ' признак (на/нена)печатано
    Dim printed_vkl1 As Byte           ' признак (на/нена)печатано
    Dim printed_vkl2 As Byte           ' признак (на/нена)печатано
    Dim printed_bukl1 As Byte          ' признак (на/нена)печатано
    Dim printed_bukl2 As Byte          ' признак (на/нена)печатано
    Dim printed_cvetO As Byte          ' признак (на/нена)печатано
    Dim printed_cvetF As Byte          ' признак (на/нена)печатано
    Dim printed_cvet1 As Byte          ' признак (на/нена)печатано
    Dim printed_cvet2 As Byte          ' признак (на/нена)печатано
    Dim printed_pap1 As Byte           ' признак (на/нена)печатано
    Dim printed_pap2 As Byte           ' признак (на/нена)печатано
    Dim second As Integer              ' времени печати одной страницы, в секундах
    Dim second_lost As Integer         ' переменна потери времени на загрузку одной страницы в принтер, в секундах
    Dim str As Byte                    ' переменная "номер строки" при добавлении заданий в очередь
    Dim time_chas As Integer           ' общее время печати, в часах
    Dim time_min As Long               ' общее время печати, в минутах
    Dim time_label As String           ' отображаемое время печати
    Dim time_lost As Integer           ' общие потери времени на загрузку в принтер файлов, поставленных в очередь
    
    name_csv = lblFZPath.Caption & cboFZad.value
    If ProverNalichFiles(name_csv) = False Then
      MsgBox "Файл-задание: " & cboFZad.value & Chr(13) & _
             "НЕ ОБНАРУЖЕН!!!" & Chr(13) & Chr(13) & _
             "Сейчас будет произведена перезагрузка списков." & Chr(13) & _
             "ПОВТОРИТЕ СВОЙ ВЫБОР.", _
             vbCritical, _
             "Ошибка: файл-задание не обнаружен/пропал."
      Call FZReload
      Call FZReloadArhiv
      Exit Sub
    End If
    count_f = 0
    lstMain.Clear               ' доп.функция очистки списка заданий
    lstMain.Enabled = True
    Fa = FreeFile
    Open name_csv For Input As #Fa      ' открываем файл для чтения построчно
        Do Until EOF(Fa)                ' цикл "пока не найдено окончание файла":
            Line Input #Fa, MyText      ' получили строку по порядку целиком для работы
            If MyText <> "" Then
                AllStrings = Split(MyText, Chr(9))
                for_case = AllStrings(0)
                copies_print = AllStrings(4)        ' получили количество КОПИЙ
                zadanie_info_program = for_case
                PrintedOrNot = 0
                Call InfoAnaliz
                If chkPrinted.value = False Then
                    If zadanie_info_file = "напечатано" Then for_case = "напечатано"
                 Else
                    If zadanie_info_file = "напечатано" Then
                       PrintedOrNot = 1
                     Else
                       PrintedOrNot = 0
                    End If
                End If
                zadanie_info_program = Null
                zadanie_info_file = Null
           
                ' процедура множественного ветвления для подсчёта количества страниц по заданиям
                Select Case for_case
                   Case Is = "обложка"                                    ' если "обложка", то
                        If copies_print > 0 Then
                           count_f_obl = count_f_obl + 1
                           count_p_obl = count_p_obl + copies_print       ' посчитали количество "обложка"
                           If printed_obl = 0 Then
                              printed_obl = PrintedOrNot
                           End If
                        End If
                   Case Is = "форзац"                                     ' если "форзац", то
                        If copies_print > 0 Then
                           count_f_forz = count_f_forz + 1
                           count_p_forz = count_p_forz + copies_print     ' посчитали количество "форзац"
                           If printed_forz = 0 Then
                              printed_forz = PrintedOrNot
                           End If
                        End If
                   Case Is = "вкладыш 1"                                  ' если "вкладыш 1", то
                        If copies_print > 0 Then
                           count_f_vkl1 = count_f_vkl1 + 1
                           count_p_vkl1 = count_p_vkl1 + copies_print     ' посчитали количество "вкладыш 1"
                           If printed_vkl1 = 0 Then
                              printed_vkl1 = PrintedOrNot
                           End If
                        End If
                   Case Is = "вкладыш 2"                                  ' если "вкладыш 2", то
                        If copies_print > 0 Then
                           count_f_vkl2 = count_f_vkl2 + 1
                           count_p_vkl2 = count_p_vkl2 + copies_print     ' посчитали количество "вкладыш 2"
                           If printed_vkl2 = 0 Then
                              printed_vkl2 = PrintedOrNot
                           End If
                        End If
                   Case Is = "буклеты 1"                                  ' если "буклеты 1", то
                        If copies_print > 0 Then
                           count_f_bukl1 = count_f_bukl1 + 1
                           count_p_bukl1 = count_p_bukl1 + copies_print   ' посчитали количество "буклеты 1"
                           If printed_bukl1 = 0 Then
                              printed_bukl1 = PrintedOrNot
                           End If
                        End If
                   Case Is = "буклеты 2"                                  ' если "буклеты 2", то
                        If copies_print > 0 Then
                           count_f_bukl2 = count_f_bukl2 + 1
                           count_p_bukl2 = count_p_bukl2 + copies_print   ' посчитали количество "буклеты 2"
                           If printed_bukl2 = 0 Then
                              printed_bukl2 = PrintedOrNot
                           End If
                        End If
                   Case Is = "полноцвет обложка"                          ' если "полноцвет обложка", то
                        If copies_print > 0 Then
                           count_f_cvetO = count_f_cvetO + 1
                           count_p_cvetO = count_p_cvetO + copies_print   ' посчитали количество "полноцвет обложка"
                           If printed_cvetO = 0 Then
                              printed_cvetO = PrintedOrNot
                           End If
                        End If
                   Case Is = "полноцвет форзац"                           ' если "полноцвет форзац", то
                        If copies_print > 0 Then
                           count_f_cvetF = count_f_cvetF + 1
                           count_p_cvetF = count_p_cvetF + copies_print   ' посчитали количество полноцвет форзац"
                           If printed_cvetF = 0 Then
                              printed_cvetF = PrintedOrNot
                           End If
                        End If
                   Case Is = "полноцвет середина 1"                       ' если "полноцвет середина 1", то
                        If copies_print > 0 Then
                           count_f_cvet1 = count_f_cvet1 + 1
                           count_p_cvet1 = count_p_cvet1 + copies_print   ' посчитали количество "полноцвет середина 1"
                           If printed_cvet1 = 0 Then
                              printed_cvet1 = PrintedOrNot
                           End If
                        End If
                   Case Is = "полноцвет середина 2"                       ' если "полноцвет середина 2", то
                        If copies_print > 0 Then
                           count_f_cvet2 = count_f_cvet2 + 1
                           count_p_cvet2 = count_p_cvet2 + copies_print   ' посчитали количество "полноцвет середина 2
                           If printed_cvet2 = 0 Then
                              printed_cvet2 = PrintedOrNot
                           End If
                        End If
                   Case Is = "папка 1"                                    ' если "папка 1", то
                        If copies_print > 0 Then
                           count_f_pap1 = count_f_pap1 + 1
                           count_p_pap1 = count_p_pap1 + copies_print     ' посчитали количество "папка 1"
                           If printed_pap1 = 0 Then
                              printed_pap1 = PrintedOrNot
                           End If
                        End If
                   Case Is = "папка 2"                                    ' если "папка 2", то
                        If copies_print > 0 Then
                           count_f_pap2 = count_f_pap2 + 1
                           count_p_pap2 = count_p_pap2 + copies_print     ' посчитали количество "папка 2"
                           If printed_pap2 = 0 Then
                              printed_pap2 = PrintedOrNot
                           End If
                        End If
                End Select
                copies_print = 0
           End If
        Loop            ' возврат к началу процедуры "пока не найдено окончание файла"
    Close #Fa           ' закрываем файл и освобождаем доступ к нему
  
    lstMain.ColumnCount = 6                          ' указываем количество столбцов
    lstMain.ColumnWidths = "150; 45; 40; 55; 0; 40"  ' устанавливаем ширину столбцов
    lstMain.AddItem "Название задания:"              ' добавляем заголовок "Название задания"
    lstMain.List(0, 1) = "Бумага:"                   ' добавляем заголовок "Бумага, г/м:"
    lstMain.List(0, 2) = "Листов:"                   ' добавляем заголовок "Листов, шт:"
    lstMain.List(0, 3) = "Время, мин:"               ' добавляем заголовок "Время, мин:"
    lstMain.List(0, 4) = 0                           ' устанавливаем признак (на/нена)печатано
    lstMain.List(0, 5) = "Файлов:"                   ' число файлов, отправляемых на печать
    
    If cboPrinter.value = "Укажите принтер ..." Then
        second = lstPrinter.List(1, 1)                          ' получаем время печати одной страницы
        second_lost = lstPrinter.List(1, 4)                     ' получаем время печати одной страницы
     Else
        second = cboPrinter.List(cboPrinter.ListIndex, 1)       ' получаем время печати одной страницы
        second_lost = cboPrinter.List(cboPrinter.ListIndex, 4)  ' получаем время печати одной страницы
    End If
    str = 0     ' переменная "номер строки"
    If count_p_vkl2 > 0 Then                   ' если 2-ю сторону вкладыша, то
        str = str + 1                               ' смещаемся на одну строку ниже
        lstMain.AddItem "вкладыш 2"                 ' добавляем строку "вкладыш 2"
        lstMain.List(str, 1) = "100 г/м"            ' добавляем параметр бумаги
        lstMain.List(str, 2) = count_p_vkl2         ' записываем количество страниц
        lstMain.List(str, 3) = CLng(count_p_vkl2 * second / 60)   ' высчитываем время печати
        lstMain.List(str, 4) = printed_vkl2         ' устанавливаем признак (на/нена)печатано
        lstMain.List(str, 5) = count_f_vkl2         ' число файлов, отправляемых на печать
    End If
    If count_p_vkl1 > 0 Then                   ' если 1-ю сторону вкладыша, то
        str = str + 1                               ' смещаемся на одну строку ниже
        lstMain.AddItem "вкладыш 1"                 ' добавляем строку "вкладыш 1"
        lstMain.List(str, 1) = "100 г/м"            ' добавляем параметр бумаги
        lstMain.List(str, 2) = count_p_vkl1         ' записываем количество страниц
        lstMain.List(str, 3) = CLng(count_p_vkl1 * second / 60)   ' высчитываем время печати
        lstMain.List(str, 4) = printed_vkl1         ' устанавливаем признак (на/нена)печатано
        lstMain.List(str, 5) = count_f_vkl1         ' число файлов, отправляемых на печать
    End If
    If count_p_forz > 0 Then                   ' если форзацы, то
        str = str + 1                               ' смещаемся на одну строку ниже
        lstMain.AddItem "форзац"                    ' добавляем строку "форзац"
        lstMain.List(str, 1) = "160 г/м"            ' добавляем параметр бумаги
        lstMain.List(str, 2) = count_p_forz         ' записываем количество страниц
        lstMain.List(str, 3) = CLng(count_p_forz * second / 60)   ' высчитываем время печати
        lstMain.List(str, 4) = printed_forz         ' устанавливаем признак (на/нена)печатано
        lstMain.List(str, 5) = count_f_forz         ' число файлов, отправляемых на печать
    End If
    If count_p_obl > 0 Then                    ' если надо печатать обложки, то
        str = str + 1                               ' смещаемся на одну строку ниже
        lstMain.AddItem "обложка"                   ' добавляем строку "обложка"
        lstMain.List(str, 1) = "160 г/м"            ' добавляем параметр бумаги
        lstMain.List(str, 2) = count_p_obl          ' записываем количество страниц
        lstMain.List(str, 3) = CLng(count_p_obl * second / 60)    ' высчитываем время печати
        lstMain.List(str, 4) = printed_obl          ' устанавливаем признак (на/нена)печатано
        lstMain.List(str, 5) = count_f_obl          ' число файлов, отправляемых на печать
    End If
    If count_p_bukl1 > 0 Then                  ' если 1-я сторона буклетов, то
        str = str + 1                               ' смещаемся на одну строку ниже
        lstMain.AddItem "буклеты 1"                 ' добавляем строку "буклеты 1"
        lstMain.List(str, 1) = "100 г/м"            ' добавляем параметр бумаги
        lstMain.List(str, 2) = count_p_bukl1        ' записываем количество страниц
        lstMain.List(str, 3) = CLng(count_p_bukl1 * second / 60)  ' высчитываем время печати
        lstMain.List(str, 4) = printed_bukl1        ' устанавливаем признак (на/нена)печатано
        lstMain.List(str, 5) = count_f_bukl1        ' число файлов, отправляемых на печать
    End If
    If count_p_bukl2 > 0 Then                  ' если 2-я сторона буклетов, то
        str = str + 1                               ' смещаемся на одну строку ниже
        lstMain.AddItem "буклеты 2"                 ' добавляем строку "буклеты 2"
        lstMain.List(str, 1) = "100 г/м"            ' добавляем параметр бумаги
        lstMain.List(str, 2) = count_p_bukl2        ' записываем количество страниц
        lstMain.List(str, 3) = CLng(count_p_bukl2 * second / 60)  ' высчитываем время печати
        lstMain.List(str, 4) = printed_bukl2        ' устанавливаем признак (на/нена)печатано
        lstMain.List(str, 5) = count_f_bukl2        ' число файлов, отправляемых на печать
    End If
    If count_p_cvetO > 0 Then                  ' если обложки полноцвета, то
        str = str + 1                               ' смещаемся на одну строку ниже
        lstMain.AddItem "полноцвет обложка"         ' добавляем строку "полноцвет обложка"
        lstMain.List(str, 1) = "160 г/м"            ' добавляем параметр бумаги
        lstMain.List(str, 2) = count_p_cvetO        ' записываем количество страниц
        lstMain.List(str, 3) = CLng(count_p_cvetO * second / 60)  ' высчитываем время печати
        lstMain.List(str, 4) = printed_cvetO        ' устанавливаем признак (на/нена)печатано
        lstMain.List(str, 5) = count_f_cvetO        ' число файлов, отправляемых на печать
    End If
    If count_p_cvetF > 0 Then                  ' если форзацы полноцвета, то
        str = str + 1                               ' смещаемся на одну строку ниже
        lstMain.AddItem "полноцвет форзац"          ' добавляем строку "полноцвет форзац"
        lstMain.List(str, 1) = "160 г/м"            ' добавляем параметр бумаги
        lstMain.List(str, 2) = count_p_cvetF        ' записываем количество страниц
        lstMain.List(str, 3) = CLng(count_p_cvetF * second / 60)  ' высчитываем время печати
        lstMain.List(str, 4) = printed_cvetF        ' устанавливаем признак (на/нена)печатано
        lstMain.List(str, 5) = count_f_cvetF        ' число файлов, отправляемых на печать
    End If
    If count_p_cvet1 > 0 Then                  ' если "полноцвет середина 1", то
        str = str + 1                               ' смещаемся на одну строку ниже
        lstMain.AddItem "полноцвет середина 1"      ' добавляем строку "полноцвет середина 1"
        lstMain.List(str, 1) = "100 г/м"            ' добавляем параметр бумаги
        lstMain.List(str, 2) = count_p_cvet1        ' записываем количество страниц
        lstMain.List(str, 3) = CLng(count_p_cvet1 * second / 60)  ' высчитываем время печати
        lstMain.List(str, 4) = printed_cvet1        ' устанавливаем признак (на/нена)печатано
        lstMain.List(str, 5) = count_f_cvet1        ' число файлов, отправляемых на печать
    End If
    If count_p_cvet2 > 0 Then                  ' если "полноцвет середина 2", то
        str = str + 1                               ' смещаемся на одну строку ниже
        lstMain.AddItem "полноцвет середина 2"      ' добавляем строку "полноцвет середина 2"
        lstMain.List(str, 1) = "100 г/м"            ' добавляем параметр бумаги
        lstMain.List(str, 2) = count_p_cvet2        ' записываем количество страниц
        lstMain.List(str, 3) = CLng(count_p_cvet2 * second / 60)  ' высчитываем время печати
        lstMain.List(str, 4) = printed_cvet2        ' устанавливаем признак (на/нена)печатано
        lstMain.List(str, 5) = count_f_cvet2        ' число файлов, отправляемых на печать
    End If
    If count_p_pap1 > 0 Then                   ' если "папка 1", то
        str = str + 1                               ' смещаемся на одну строку ниже
        lstMain.AddItem "папка 1"                   ' добавляем строку "папка 1"
        lstMain.List(str, 1) = "100 г/м"            ' добавляем параметр бумаги
        lstMain.List(str, 2) = count_p_pap1         ' записываем количество страниц
        lstMain.List(str, 3) = CLng(count_p_pap1 * second / 60)   ' высчитываем время печати
        lstMain.List(str, 4) = printed_pap1         ' устанавливаем признак (на/нена)печатано
        lstMain.List(str, 5) = count_f_pap1         ' число файлов, отправляемых на печать
    End If
    If count_p_pap2 > 0 Then                   ' если "папка 2", то
        str = str + 1                               ' смещаемся на одну строку ниже
        lstMain.AddItem "папка 2"                   ' добавляем строку "папка 2"
        lstMain.List(str, 1) = "100 г/м"            ' добавляем параметр бумаги
        lstMain.List(str, 2) = count_p_pap2         ' записываем количество страниц
        lstMain.List(str, 3) = CLng(count_p_pap2 * second / 60)   ' высчитываем время печати
        lstMain.List(str, 4) = printed_pap2         ' устанавливаем признак (на/нена)печатано
        lstMain.List(str, 5) = count_f_pap2         ' число файлов, отправляемых на печать
    End If
    
    count_f = count_f_obl + count_f_forz + _
              count_f_vkl1 + count_f_vkl2 + _
              count_f_bukl1 + count_f_bukl2 + _
              count_f_cvetO + count_f_cvetF + _
              count_f_cvet1 + count_f_cvet2 + _
              count_f_pap1 + count_f_pap2               'счетчик файлов, отправляемых на печать
    count_p = count_p_vkl1 + count_p_vkl2 + _
              count_p_forz + count_p_obl + _
              count_p_pap1 + count_p_pap2 + _
              count_p_cvetO + count_p_cvetF + _
              count_p_cvet1 + count_p_cvet2 + _
              count_p_bukl1 + count_p_bukl2         'счетчик страниц, отправляемых на печать
    time_chas = 0
    time_min = CLng((CLng(count_p) * CLng(second)) / 60)
    
    If time_min < 60 Then
        time_label = time_min & " мин., "
     Else
        Do While time_min >= 60
            time_min = time_min - 60
            time_chas = time_chas + 1
        Loop
        time_label = time_chas & " ч. " & time_min & " мин., "
    End If
    time_lost = second_lost * count_f / 60            ' потери времени на загрузку файлов в принтер, в минутах
    lblVybor.Caption = "Общее время печати: " & time_label & "[" & time_lost & " мин.] " & " (" & count_p & " стр.)"
    
    If (lstMain.ListCount - 1) > 0 Then
        lstMain.ListIndex = 1
     Else
        lstMain.ListIndex = 0
    End If
    
    name_log = "d:\Raspechatka\.Автоматизация\" & "log\" & "Eps_" & Format(Now, "yyyy.mm.dd") & ".log"
    Fl = FreeFile
    Open name_log For Append As #Fl  'открываем файл для дабавления
        Print #Fl, ""
        Print #Fl, Now & "==========================================================="
        Print #Fl, Now & "Анализ файла: " & cboFZad.value
        Print #Fl, Now & "Общее время печати: " & time_label & count_p & " стр., " & count_f & " файлов."
        Print #Fl, Now & "Потери времени на загрузку файла в принтер: " & time_lost & " мин."
        Print #Fl, Now & "-----------------------------------------------------------"
    Close #Fl
    If count_p > 0 Then cmdPRINT.Enabled = True Else cmdPRINT.Enabled = False
End Sub
 
Private Sub FZFromArhiv()
    If cboZArhiv.value = "" Then Exit Sub
    If cboZArhiv.value = "Укажите файл для возврата из архива..." Then Exit Sub
    If cboZArhiv.value = "В архиве файлов нет..." Then Exit Sub
    
    Dim f_name As String
    Dim fName As String          ' адрес *.info-файла
    Dim i As Byte                ' счётчик циклов
    Dim dName As String          ' адрес и имя "конечного" файла сохранения
    Dim sName As String          ' адрес и имя обрабатываемого файла (он же исходный файл сохранения)
    
    fName = cboZArhiv.value
    f_name = fName
    i = 0
    For i = 0 To 1
        sName = lblFZArh.Caption & f_name
        If ProverNalichFiles(sName) Then
            f_name = Right(f_name, Len(f_name) - 11)
            dName = lblFZPath.Caption & f_name
            FileCopy Source:=sName, Destination:=dName
            Kill sName
            lstLog.AddItem "ВОЗВРАЩЕНО из архива: [" & f_name & "]"
         Else
            MsgBox "Сейчас будет произведена перезагрузка списков." & Chr(13) & _
                   "ПОВТОРИТЕ СВОЙ ВЫБОР.", _
                   , _
                   "Ошибка: указанный Вами файл не обнаружен!"
            Call FZReloadArhiv
            Exit For
        End If
        f_name = Left(fName, Len(fName) - 3) & ".info"
    Next i
    lstLog.ListIndex = lstLog.ListCount - 1   ' выделяем последнюю строку в отчёте
End Sub
 
Private Sub FZReload( _
        Optional ByVal pLook As String _
        )                            '=== процедура перезагрузки списков файлов-заданий
    ' если список принтеров пуст, то пропускаем процедуру
    If Nalich_PRINTER < 1 Then Exit Sub
    
    Dim fDirName As String
    Dim fName As String         ' имя файла-задания
    Dim fzArr() As String       ' массив имён заданий
    Dim fzArrUB As Integer
    Dim fzCount As Byte         ' счётчик файлов-заданий
    Dim i As Integer            ' счетчик
    Dim rowCount As Integer     ' счетчик строк чекбокса
    Dim rowShow As Byte         ' число отоброжаемых строк чекбокса
    Dim TruFal As Boolean       ' признак раз/блокировки элементов
    
    If pLook = "" Or pLook = "pSpisok" Then cboFZSp.Clear   ' очищаем список заданий
    If pLook = "" Or pLook = "pBrosh" Then
        cboFZad.Clear    ' очищаем список заданий
        lstMain.Clear
    End If
    fDirName = lblFZPath.Caption & "*.fz"
    If ProverNalichFiles(fDirName) = False Then
        Nalich_CSV = 0
        TruFal = False
        cboFZad.value = "Нет файлов для обработки..."
        lstMain.AddItem "Нет файлов для обработки..."
        lstMain.BackColor = &H80000004
     Else
        Nalich_CSV = 1
        TruFal = True
        fName = Dir(lblFZPath.Caption & "*.fz")
        While fName <> ""
            If fName <> "Полный список.fz" Then
                ReDim Preserve fzArr(fzCount) As String
                fzArr(fzCount) = fName
                fzCount = fzCount + 1
            End If
            fName = Dir
        Wend
        If fzCount > 1 Then Call QuickSort(fzArr())     ' пересортировываем массив
        If fzCount > 0 Then fzArrUB = UBound(fzArr()) Else fzArrUB = -1
        For i = 0 To fzArrUB
            If pLook = "" Or pLook = "pSpisok" Then cboFZSp.AddItem fzArr(i)
            If pLook = "" Or pLook = "pBrosh" Then cboFZad.AddItem fzArr(i)
        Next i
        If Dir(lblFZPath.Caption & "Полный список.fz") <> "" _
            And (pLook = "" Or pLook = "pSpisok") Then cboFZSp.AddItem "Полный список.fz"
        fzCount = cboFZad.ListCount
        cboFZSp.ListRows = fzCount + 1
        cboFZad.ListRows = fzCount
        cboFZad.Text = "Выберите задание..."
        cboFZSp.Text = "Выберите задание..."
        lstMain.AddItem "Ожидают обработку: " & FilesCount & " файл(ов)."
        lstMain.AddItem "Выберите один из них."
        lstMain.BackColor = &H80000005
        lstLog.AddItem "Обнаружено: " & fzCount & " файл(ов)-заданий."
        
        rowCount = cboFZSp.ListCount
        Select Case rowCount
            Case Is < 15: rowShow = rowCount
            Case Is >= 15: rowShow = 15
        End Select
        cboFZSp.ListRows = rowShow
        rowCount = cboFZad.ListCount
        Select Case rowCount
            Case Is < 15: rowShow = rowCount
            Case Is >= 15: rowShow = 15
        End Select
        cboFZad.ListRows = rowShow
    End If
    chkArhiving.Enabled = TruFal
    cboFZad.Enabled = TruFal
    cboFZSp.Enabled = TruFal
    lstMain.Enabled = False
    MultiPage1.Pages("pSpisok").Enabled = TruFal
End Sub
 
Private Sub FZReloadArhiv()            ' ========= процедура: отобразить список архива =========
    Dim fName As String
    Dim count_f As Byte
    cboZArhiv.Clear
    count_f = 0
    fName = Dir(lblFZArh.Caption & "*.fz")
    While fName <> ""
        cboZArhiv.AddItem (fName)
        count_f = 1
        fName = Dir
    Wend
    If count_f = 1 Then
       cboZArhiv.Enabled = True
       cboZArhiv.value = "Укажите файл для возврата из архива..."
     Else
       cboZArhiv.Enabled = False
       cboZArhiv.value = "В архиве файлов нет..."
    End If
End Sub
 
Private Sub FZToArhiv( _
        fName As String _
        )
    If fName = "" Or fName = "Выберите задание..." Then Exit Sub
    
    Dim f_name As String
    Dim i As Byte           ' счётчик циклов
    Dim dName As String     ' адрес и имя "конечного" файла сохранения
    Dim sName As String     ' адрес и имя обрабатываемого файла (он же исходный файл сохранения)
    
    f_name = fName
    i = 0
    For i = 0 To 1
        sName = lblFZPath.Caption & f_name
        If ProverNalichFiles(sName) Then
           dName = lblFZArh.Caption & Format(Now, "yyyy.mm.dd") & "_" & f_name
           FileCopy Source:=sName, Destination:=dName
           Kill sName
           lstLog.AddItem "ВОЗВРАЩЕНО из архива: [" & f_name & "]"
         Else
           MsgBox "Сейчас будет произведена перезагрузка списков." & Chr(13) _
                & "ПОВТОРИТЕ СВОЙ ВЫБОР.", _
                , "Ошибка: указанный Вами файл не обнаружен!"
           Call FZReloadArhiv
           Exit For
        End If
        f_name = Left(fName, Len(fName) - 3) & ".info"
    Next i
    lstLog.ListIndex = lstLog.ListCount - 1   ' выделяем последнюю строку в отчёте
    ' затираем название файла-задания, чтоб избавиться от ошибки перечитыватия
    ' удалённого файла, когда снимем пометку о необходимости архивации
    cboFZad.value = "Выберите задание..."
    chkArhiving.value = False                       ' снимаем пометку о необходимости архивации
End Sub
 
Private Sub InfoAnaliz()
    Dim f_info_exist As String          ' признак существования *.info-файла по указанному адресу
    Dim Fai As Long
    Dim for_case As String              ' ПРИЗНАК печати (текст, обложка, вкладышь и пр.)
    Dim fName As String                 ' адрес *.info-файла
    Dim IsPrinted As Byte               ' признак отпечатано/не отпечатано
    Dim MyText As String                ' строка из *.info-файла целиком
    Dim MyText_left As Integer
    Dim name_info As String             ' адрес и имя *.info-файла
    
    name_info = lblFZPath.Caption & Left(cboFZad.value, Len(cboFZad.value) - 3) & ".info"
    If ProverNalichFiles(name_info) Then
        Fai = FreeFile                      ' добавляем автоматический счётчик открытых файлов
        Open name_info For Input As #Fai
        Do Until EOF(Fai)
            Line Input #Fai, MyText
            MyText_left = InStr(MyText, ";")            ' нашли каким по счёту символом является ";" слева
            for_case = Left(MyText, MyText_left - 1)    ' получили признак напечатанного
            If zadanie_info_program = for_case Then     ' если задание совпадает с "файлом", то
                zadanie_info_file = "напечатано"
                If for_case <> "текст" Then
                    chkPrinted.Enabled = True           ' активируем возможность показать напечатанныйе части задания
                End If
            End If
        Loop        ' начать цикл заново
        Close #Fai  ' закрыть файл по выполнении цикла
    Else
    End If
End Sub
 
Private Sub NapolnenieSpiska()
    Dim kategor As String
    Dim TipSpiska As String            ' тип составляемого списка
    Dim fzadanie As String
    
    kategor = cboKatSp.value
    TipSpiska = cboDoliaSp.value
    fzadanie = cboFZSp.value
    
    If fzadanie = "" Or fzadanie = "Выберите задание..." Or _
       TipSpiska = "" Or TipSpiska = "Способ отображения..." Then Exit Sub
    
    Dim AllStrings() As String
    Dim adr As String                  ' адрес файла
    Dim book_name As String            ' название печатаемого элемента
    Dim copies_print As Integer        ' количество копий файлов, отправляемых на печать
    Dim F As Long                      ' уникольный номер файла в системе
    Dim for_case As String             ' признак печати (текст, обложка, вкладышь и пр.)
    Dim MyText As String               ' строка из файла-задания, взятая целиком
    Dim path_f As String               ' адрес расположения обрабатываемого файла-задания
    Dim str As Integer                 ' "номер" строки (индекс строки)
    
    If lblWellAdd.Caption = "=" Then
        lstSpis.Clear
        str = 0
    Else
        str = lstSpis.ListCount
    End If
    lstSpis.ColumnCount = 4                  ' указываем количество столбцов
    lstSpis.ColumnWidths = "225; 80; 0; 0"   ' устанавливаем ширину столбцов
    path_f = lblFZPath.Caption & fzadanie
    
    F = FreeFile
    Open path_f For Input As #F
    Do Until EOF(F)
        Line Input #F, MyText
        If MyText <> "" Then
            AllStrings = Split(MyText, Chr(9))
            for_case = AllStrings(0)
            book_name = Replace(Replace(AllStrings(1), Chr(10), " "), Chr(34) & Chr(34), Chr(34))
            If Left(book_name, 1) = Chr(34) Then
                book_name = Right(book_name, Len(book_name) - 1)
            End If
            If Right(book_name, 1) = Chr(34) Then
                book_name = Left(book_name, Len(book_name) - 1)
            End If
            adr = Replace(AllStrings(2), Chr(34), "")
            copies_print = AllStrings(4)
            If for_case <> "текст" Then
                Select Case TipSpiska
                    Case Is = "Позиция"
                        If kategor = for_case Or kategor = "Все категории" Then
                            lstSpis.AddItem book_name               ' добавляем название книги
                            lstSpis.List(str, 1) = for_case         ' добавляем признак печати
                            lstSpis.List(str, 2) = adr              ' добавляем адрес файла
                            lstSpis.List(str, 3) = copies_print     ' добавляем количество копий
                            str = str + 1   ' смещаемся на одну строку ниже
                        End If
                    Case Is = "Заказанное", "От и До", "От...", "...До"
                        If (kategor = for_case Or kategor = "Все категории") And copies_print > 0 Then
                            lstSpis.AddItem book_name               ' добавляем название книги
                            lstSpis.List(str, 1) = for_case         ' добавляем признак печати
                            lstSpis.List(str, 2) = adr              ' добавляем адрес файла
                            lstSpis.List(str, 3) = copies_print     ' добавляем количество копий
                            str = str + 1   ' смещаемся на одну строку ниже
                        End If
                End Select
            End If
        End If
    Loop
    Close #F
    txbPoisk.ForeColor = &H80000010
    txbPoisk.value = "Поиск..."
    If str > 0 Then
        lstSpis.Enabled = True
        lstSpis.BackColor = &H80000005
        txbPoisk.Enabled = True
     Else
        lstSpis.Enabled = False
        lstSpis.BackColor = &H80000004
        txbPoisk.Enabled = False
    End If
End Sub
 
Private Sub PrintersAdd()
    Dim name_print As String
    
    name_print = lblPrSetings.Caption
    If ProverNalichFiles(name_print) = False Then
        Nalich_PRINTER = 0
        cboZArhiv.Enabled = False
        cboVizArhiv.Enabled = False
        cmdLogClear.Enabled = False
        lstLog.AddItem "Работа программы аварийно заблокирована!"
        lstLog.Enabled = False
        lstLog.ListIndex = lstLog.ListCount - 1   ' выделяем последнюю строку в отчёте
        lstPrinter.ColumnCount = 1                      ' указываем количество столбцов
        lstPrinter.AddItem "Не обнаружен файл для загрузки списка принтеров!"
        lstPrinter.AddItem "Для корректоной работы программы необходим указанный выше файл!"
        lstPrinter.AddItem "Восстановите указанный файл и нажмите кнопку перезагрузки списка!..."
        lstPrinter.AddItem "Или ОБРАТИТЕСЬ К АДМИНИСТРАТОРУ!"
        MsgBox "Не обнаружен файл для загрузки списка принтеров!" & Chr(13) & _
               "Дальнейшая работа не возможна!" & Chr(13) & _
               "ЗАКРОЙТЕ пожалуйста программу.", _
               vbCritical, _
               "Ошибка: файл параметров принтеров не обнаружен."
        Exit Sub
     Else
        Nalich_PRINTER = 1
        cmdLogClear.Enabled = True
        lstLog.Enabled = True
    End If
    
    Dim colum_printer As String      ' название принтера
    Dim colum_obl As Variant         ' продолжительности печати одной страницы обложек
    Dim colum_bukl As Variant        ' продолжительности печати одной страницы буклетов
    Dim colum_vizitka As Variant     ' продолжительности печати одной страницы визиток
    Dim colum_zaderzh As Variant     ' время загрузки файла в принтер (время задержки)
    Dim colum_aktiv As Variant       ' признак активности принтера (использовать при печати или нет)
    Dim for_case As Variant          ' признак принтера относятся или нет к мастеру цветной печати
    Dim Fpr As Long                  ' свободный номер в системе
    Dim MassivStrok() As String      ' массив переменных, полученный из строки
    Dim MyText As String             ' строка, полученная из файла
    Dim str As Byte                  ' переменная "номер строки"
    Dim Str_Cb As Byte               ' переменная "номер строки"
    
    str = 0
    Str_Cb = 0
    lstPrinter.ColumnCount = 6                           ' указываем количество столбцов
    lstPrinter.ColumnWidths = "120; 55; 40; 40; 35; 35"  ' устанавливаем ширину столбцов
    cboPrinter.ColumnCount = 5                          ' указываем количество столбцов
    cboPrinter.ColumnWidths = "130; 0; 0; 0; 0"         ' устанавливаем ширину столбцов
    Fpr = FreeFile
    Open name_print For Input As #Fpr
    Do Until EOF(Fpr)
        Line Input #Fpr, MyText
        MassivStrok = Split(MyText, ";")    ' получили массив подстрок из основной строки
        for_case = MassivStrok(0)
        If for_case < 3 Then                ' если значения относятся к мастеру цветной печати
            colum_printer = MassivStrok(1)
            colum_obl = MassivStrok(2)
            colum_bukl = MassivStrok(3)
            colum_vizitka = MassivStrok(4)
            colum_zaderzh = MassivStrok(5)
            colum_aktiv = MassivStrok(6)
            lstPrinter.AddItem colum_printer    ' добавили принтер в список
            lstPrinter.List(str, 1) = colum_obl
            lstPrinter.List(str, 2) = colum_bukl
            lstPrinter.List(str, 3) = colum_vizitka
            lstPrinter.List(str, 4) = colum_zaderzh
            lstPrinter.List(str, 5) = colum_aktiv
            If str > 1 And colum_aktiv = 1 Then
                cboPrinter.AddItem colum_printer    ' добавили принтер в меню печати
                cboPrinter.List(Str_Cb, 1) = CSng(colum_obl)        ' добавляем параметр скорости печати обложек
                cboPrinter.List(Str_Cb, 2) = CSng(colum_bukl)       ' добавляем параметр скорости печати буклетов
                cboPrinter.List(Str_Cb, 3) = CSng(colum_vizitka)    ' добавляем параметр скорости печати визиток
                cboPrinter.List(Str_Cb, 4) = CSng(colum_zaderzh)    ' добавляем параметр скорости загрузки файлов в принтер
                Str_Cb = Str_Cb + 1
            End If
            str = str + 1   ' переменная "номер строки"
        End If
    Loop        ' начать цикл заново
    Close #Fpr  ' закрыть файл по выполнении цикла
End Sub
 
Private Sub PrinterCheck()
    Dim i As Long, j As Integer ' индексы циклов
    Dim prExist As Boolean      ' признак наличия принтера
    Dim prName As String        ' имя принтера
    For j = CInt(cboPrinter.ListCount - 1) To 0 Step -1
        prName = cboPrinter.List(j, 0)
        prExist = False
        For i = 1 To Application.Printers.Count
            If Application.Printers.Item(i).Name = prName Then prExist = True
        Next i
        If prExist = False Then cboPrinter.RemoveItem (j)
    Next j
End Sub
 
Private Sub ProverNalichViz()       ' ========= проверка наличия готовых к печати визиток =========
    Dim TuFal As Boolean
    Dim fDirName As String
    fDirName = lblVPath.Caption & "*.tif"   ' задаем адрес поиска файлов визиток, готовых к печати
    If ProverNalichFiles(fDirName) Then     ' если есть подготовленные к печати файлы, то
        lstViz.BackColor = &H80000005
        Nalich_VIZ = 1
        TuFal = True
     Else       ' если нет подготовленных к печати файлов, то
        lblTime.Caption = ""
        lstViz.Clear                                ' очистка списка заданий
        lstViz.AddItem "Нет файлов для печати..."   ' добавляем заголовок "Название задания"
        lstViz.BackColor = &H80000004
        Nalich_VIZ = 0
        TuFal = False
    End If
    cboDoliaViz.Enabled = TuFal
    chkVizToArh.Enabled = TuFal
    lstViz.Enabled = TuFal
End Sub
 
Private Sub ReloadPrinter()       ' ========= процедура: перезагрузка списка принтеров =========
    cboPrinter.Clear
    cboPrinter.value = "Укажите принтер ..."
    cmdPrinterProp.Enabled = False
    lstPrinter.Clear
    Call PrintersAdd    ' добавление списка принтеров
    If chkPrAbsent = False Then Call PrinterCheck   ' очистка списка принтеров от отсутствующих в системе
    If cboPrinter.ListCount = 1 Then cboPrinter.ListIndex = 0
End Sub
 
Private Sub SeparatorSpiska()
    If Nalich_CSV < 1 Then Exit Sub
    If cboFZSp.value = "Выберите задание..." Then Exit Sub
    
    Dim book_adr_str As String         ' остатки строки с названием, адресом и количеством страниц в макете
    Dim book_adr_str_len As Integer
    Dim book_adr_str_left As Integer
    Dim book_name As String
    Dim copies_print As Integer     ' количество копий файлов, отправляемых на печать
    Dim F As Long                   ' уникольный номер файла в системе
    Dim for_case As String          ' признак печати (текст, обложка, вкладышь и пр.)
    Dim kategCount As Byte
    Dim line_name As String
    Dim MyText As String            ' строка из файла-задания, взятая целиком
    Dim MyText_len As Integer       ' посчитали количество символов во всей строке, полученной из файла-задания
    Dim MyText_left As Integer
    Dim MyText_right As Integer
    Dim path_f As String            ' адрес расположения обрабатываемого файла-задания
    Dim priznak As String
    Dim str As Integer              ' "номер строки" (индекс строки)
    Dim zadanie As String           ' искомый признак строки для отправки файла на печать
    
    cboKatSp.Clear
    'cboKatSp.ColumnCount = 2            ' указываем количество столбцов
    'cboKatSp.ColumnWidths = "150; 0"    ' устанавливаем ширину столбцов
    path_f = lblFZPath.Caption & cboFZSp.value
    F = FreeFile
    Open path_f For Input As #F
    Do Until EOF(F)
        Line Input #F, MyText
        If MyText <> "" Then
            MyText_len = Len(MyText)
            MyText_left = InStr(1, MyText, Chr(9))  ' нашли каким слева по счёту символом является "разделитель"
            for_case = Left(MyText, MyText_left - 1)
            If for_case <> "текст" Then
                str = cboKatSp.ListCount
                priznak = ""                ' обнулили значение признака наличия
                Do While str > 0
                    str = str - 1
                    line_name = cboKatSp.List(str, 0)
                    If line_name = for_case Then
                        priznak = "есть"    ' если задание совпадает с "файлом", то
                        Exit Do
                    End If
                Loop
                If priznak <> "есть" Then cboKatSp.AddItem for_case   ' добавили новую категорию
            End If
        End If
    Loop
    Close #F
    cboKatSp.AddItem "Все категории"    ' добавили "объединительную" категорию
    kategCount = cboKatSp.ListCount
    If kategCount > 20 Then kategCount = 20
    cboKatSp.ListRows = kategCount
End Sub
 
Private Sub SpisReload()             ' ====== процедура: перезагрузка "списка" (вклвдка "Список")
    lblAdr.Caption = "Адрес выбранного файла..."
    lblAdr.Enabled = False
    lblName.Caption = "Выбранный файл..."
    lblName.Enabled = False
    lstSpis.Clear
    lstSpis.Enabled = False
    PrintDo = 0
    PrintOt = 0
    cmdCalcS.Enabled = False
    txbCopies.BackColor = &H80000004
    txbCopies.Enabled = False
    txbCopies.value = Null
End Sub
 
Private Sub SpisViewReload()    ' процедура: обновление внешнего вида вкладки "Список"
    Dim for_case As String   ' тип составляемого списка
    cboOtDoSp.Clear
    for_case = cboDoliaSp.value
    If for_case = "От и До" Then
        cboOtDoSp.AddItem "От..."
        cboOtDoSp.AddItem "...До"
        cboOtDoSp.ListIndex = 0
        cboOtDoSp.Visible = True
        lblName.Caption = "Начало печати..."
        lblAdr.Caption = "Окончание печати..."
        lblAdr.Enabled = True
     Else
        cboOtDoSp.Visible = False
        If for_case = "От..." Or for_case = "...До" Then
            lblName.Caption = "Начало печати..."
            lblAdr.Caption = "Окончание печати..."
            lblAdr.Enabled = True
         Else
            lblName.Caption = "Выбранный файл..."
            lblAdr.Caption = "Адрес выбранного файла..."
            lblAdr.Enabled = False
        End If
    End If
    lblName.Enabled = True
    cmdCalcS.Enabled = False
    txbCopies.BackColor = &H80000004
    txbCopies.Enabled = False
    txbCopies.value = Null
End Sub
 
Private Sub VizFromArhiv()
    If cboVizArhiv.value = "Укажите файл для возврата из архива..." Then Exit Sub
    If cboVizArhiv.value = "" Then Exit Sub
    If cboVizArhiv.value = "В архиве файлов нет..." Then Exit Sub
    
    Dim f_name As String
    Dim f_name_big As String
    Dim f_name_smal As String
    Dim j_right_v As Integer
    Dim pechat_len As Integer
    Dim pechat_v1 As String
    Dim pechat_v2 As String
    Dim sName As String           ' старое имя файла и его распложение
    Dim dName As String           ' новое имя файла и его расположение
    Dim WFName As String          ' имя не найденного файла
    
    f_name_big = cboVizArhiv.value
    f_name = lblVArh.Caption & f_name_big
    If ProverNalichFiles(f_name) Then
        f_name_smal = Right(f_name_big, Len(f_name_big) - 12)
        sName = f_name
        dName = lblVPath.Caption & f_name_smal
        FileCopy Source:=sName, Destination:=dName
        Kill sName
        
        j_right_v = InStrRev(f_name_big, ",")               ' нашли каким справа по счёту символом является ","
        pechat_v1 = Left(f_name_big, (j_right_v - 1))       ' получили промежуточное имя для отчета
        pechat_len = Len(pechat_v1)                         ' посчитали оставшееся количество символов в строке
        pechat_v2 = Right(pechat_v1, (pechat_len - 24))     ' получили конечное имя для отчета
        lstLog.AddItem "ВОЗВРАЩЕНО из архива: [" & pechat_v2 & "]"
     Else
        WFName = f_name_big
        MsgBox "Указанный Вами файл (*.tif):" & Chr(13) & _
               WFName & Chr(13) & _
               "не обнаружен!" & Chr(13) & _
               "Сейчас будет произведена перезагрузка списков." & Chr(13) & _
               "ПОВТОРИТЕ СВОЙ ВЫБОР.", vbExclamation
        Call VizReloadArhiv
    End If
    
    f_name_big = Left(f_name_big, Len(f_name_big) - 4) & ".jpg"
    f_name = lblVArh.Caption & f_name_big
    If ProverNalichFiles(f_name) Then
        f_name_smal = Right(f_name_big, Len(f_name_big) - 12)
        sName = f_name
        dName = lblVPath.Caption & f_name_smal
        FileCopy Source:=sName, Destination:=dName
        Kill sName
     Else
        WFName = f_name_big
        MsgBox "Искомый файл PreView:" & Chr(13) & WFName & Chr(13) & "не обнаружен!", vbExclamation
    End If
    
    lstLog.ListIndex = lstLog.ListCount - 1   ' выделяем последнюю строку в отчёте
End Sub
 
Private Sub VizLoadSpis()
    If Nalich_VIZ < 0 Then Exit Sub
    
    Dim count_fv As Integer             ' счетчик файлов, в штуках
    Dim pPrint As Integer               ' необходимое количество визиток
    Dim pCount As Integer               ' общее количество копий на печать
    Dim FVizName As String              ' адрес и именя файла к печати
    Dim j_right_t As Integer
    Dim j_right_v As Integer
    Dim lost_time_v As Integer          ' совокупная потеря времени при загрузке печатаемых страниц в принтер, в минутах
    Dim name_STif As String             ' имя файла целиком (c .tif)
    Dim name_BezTif As String           ' имя файла без хвоста (без .tif)
    Dim name_len_v As Integer
    Dim pechat_len As Integer
    Dim pechat_v1 As String
    Dim pechat_v2 As String
    Dim second_v As Integer             ' временя печати одной страницы, в секундах
    Dim second_lost_v As Integer
    Dim str_v As Byte                   ' "номер строки" при добавлении заданий в список
    Dim time_chas As Byte
    Dim time_chas_v As Byte             ' общее время печати, в часах
    Dim time_min_v As Long              ' общее время печати, в минутах
    Dim time_v_label As String
    Dim time_lost_v_label As String
    Dim time_label As String            ' отображаемое время
    
    lstViz.Enabled = True
    lstViz.Clear                                ' доп.функция очистки списка заданий: очищаем lstViz.Clear
    lstViz.ColumnCount = 4                      ' указываем количество столбцов
    lstViz.ColumnWidths = "150; 55; 55; 55; 0"  ' устанавливаем ширину столбцов
    lstViz.AddItem "Название задания:"          ' добавляем заголовок "Название задания"
    lstViz.List(0, 1) = "Бумага, г/м:"          ' добавляем заголовок "Бумага, г/м:"
    lstViz.List(0, 2) = "Листов, шт:"           ' добавляем заголовок "Листов, шт:"
    lstViz.List(0, 3) = "Время, мин:"           ' добавляем заголовок "Время, мин:"
    lstViz.List(str_v, 4) = FVizName            ' сохраняем имя файла
    str_v = 0                                   ' переменная "номер строки", индекс строки
    count_fv = 0
    pPrint = 0
    pCount = 0
    If cboPrinter.value = "Укажите принтер ..." Then
       second_v = lstPrinter.List(1, 1)                     ' получаем время печати одной страницы
     Else
       second_v = cboPrinter.List(cboPrinter.ListIndex, 1)  ' получаем время печати одной страницы
    End If
    
    FVizName = Dir(lblVPath.Caption & "*.tif")  ' указываем адрес поиска файлов
    While FVizName <> ""                        ' цикл наполнения списка визиток (подготовка задания на печать)
        str_v = str_v + 1                       ' смещаемся на одну строку ниже
        name_STif = FVizName                    ' получили имя файла целиком
        j_right_t = InStrRev(name_STif, ".")    ' нашли каким справа по счёту символом является "."
        name_BezTif = Left(name_STif, (j_right_t - 1))      ' получили имя файла без ".tif"
        name_len_v = Len(name_BezTif)                       ' посчитали оставшееся количество символов в строке
        j_right_v = InStrRev(name_BezTif, ",")              ' нашли каким справа по счёту символом является ","
        pPrint = CInt(Right(name_BezTif, (name_len_v - (j_right_v + 1)))) ' получили количество печатаемых визиток
        pechat_v1 = Left(name_BezTif, (j_right_v - 1))      ' получили промежуточное имя задания на печать
        pechat_len = Len(pechat_v1)                         ' посчитали оставшееся количество символов в строке
        pechat_v2 = Right(pechat_v1, (pechat_len - 12))     ' получили конечное имя задания на печать
        lstViz.AddItem pechat_v2                            ' добавляем имя задания
        lstViz.List(str_v, 1) = "280 г/м"                   ' добавляем параметр бумаги
        lstViz.List(str_v, 2) = pPrint                      ' записываем количество печатаемых страниц
        lstViz.List(str_v, 3) = Fix(CDbl(pPrint) * CDbl(second_v) / CDbl(60))    ' высчитываем время печати
        lstViz.List(str_v, 4) = FVizName                    ' записываем имя файла
        count_fv = count_fv + 1                             ' счетчик найденных файлов
        pCount = pCount + pPrint    ' получили общее количество печатаемых листов
        FVizName = Dir
    Wend         ' конец цикла наполнения
    
    time_min_v = CLng(Fix(CLng(pCount) * CLng(second_v) / CLng(60)))         ' вычислили общее время печати, в минутах
    time_chas_v = 0
    If time_min_v < 60 Then
       time_v_label = CInt(time_min_v) & " мин. "
      Else
        Do While time_min_v > 60
           time_min_v = time_min_v - 60
           time_chas_v = time_chas + 1
        Loop
        time_v_label = time_chas_v & " ч. " & time_min_v & " мин. "
    End If
    If second_lost_v < 60 Then       ' вычислили общие потери времени на загрузку страниц в принтер
       time_lost_v_label = "[" & CInt(second_lost_v) & " сек.] "
      Else
       time_lost_v_label = "[" & (second_lost_v * count_fv / 60) & " мин.] "
    End If
    lblTime.Caption = "Общее время печати: " & time_v_label & time_lost_v_label & " (" & pCount & " стр.)"
      
    lstViz.ListIndex = 0
End Sub
 
Private Sub VizReload()     ' ========= процедура: перезагрузка списка визиток =========
    Dim FNameFull As String                       ' имя PreView к обрабатываемой визитке с "путями"
    FNameFull = ""
    Image1.PictureSizeMode = fmPictureSizeModeZoom
    Image1.Picture = LoadPicture(FNameFull)
    If Nalich_PRINTER < 1 Then Exit Sub ' если список принтеров пуст, то пропускаем процедуру
    Call ProverNalichViz
    If Nalich_VIZ < 1 Then Exit Sub     ' если визиток нет, то прерываем процедуру
    Call VizLoadSpis                    ' загрузка списка визиток
    'CheckBox3.Value = False            ' снимаем пометку о необходимости корекции количества копий
    chkVizToArh.value = True            ' включаем автоматическую архивацию
    cmdPRINT.Enabled = False
    cmdArhiving.Enabled = False
    txbCopy.Enabled = True
    txbCopy.BackColor = &H80000004
    txbCopy.value = Null
    txbCopy.Enabled = False
End Sub
 
Private Sub VizReloadArhiv()            ' ========= процедура: отобразить список архива =========
    Dim FVizName As String
    Dim count_f As Integer           ' счетчик найденных файлов
    count_f = 0
    cboVizArhiv.Clear
    FVizName = Dir(lblVArh.Caption & "*.tif")
    While FVizName <> ""
        cboVizArhiv.AddItem (FVizName)
        count_f = count_f + 1
        FVizName = Dir
    Wend
    If count_f > 0 Then
       cboVizArhiv.value = "Укажите файл для возврата из архива..."
       cboVizArhiv.Enabled = True
     Else
       cboVizArhiv.value = "В архиве файлов нет..."
       cboVizArhiv.Enabled = False
    End If
End Sub
 
Private Sub VizToArhiv()        ' ====== процедура: архивация визиток ======
    If lstViz.value = "Название задания:" Then Exit Sub ' защита от ошибочного архивирования "шапки" (это не возможно)
    
    Dim fDirName As String
    Dim FVizName As String      ' имя обрабатываемой группы файлов
    Dim sName As String         ' старое имя файла и его распложение
    Dim dName As String         ' новое имя файла и его расположение
    Dim WFName As String        ' имя не найденного файла
    
    FVizName = lstViz.List(lstViz.ListIndex, 4)
    fDirName = lblVPath.Caption & FVizName      ' задаем адрес поиска файлов визиток, готовых к печати
    If ProverNalichFiles(fDirName) Then                               ' если нет подготовленных к печати файлов, то
        sName = lblVPath.Caption & FVizName                           ' помещаем в архив "печатаемый файл"
        dName = lblVArh.Caption & Format(Now, "yyyy.mm.dd") & "_ " & FVizName
        FileCopy Source:=sName, Destination:=dName
        Kill sName
     Else                                               ' если нет подготовленных к печати файлов, то
        WFName = FVizName
        MsgBox "Искомый файл (*.tif):" & Chr(13) & WFName & Chr(13) & "не обнаружен!", vbExclamation
    End If
    
    ' задаем адрес поиска файлов визиток, готовых к печати
    fDirName = lblVPath.Caption & Left(FVizName, Len(FVizName) - 4) & ".jpg"
    If ProverNalichFiles(fDirName) Then                             ' если нет подготовленных к печати файлов, то
        sName = lblVPath.Caption & Left(FVizName, Len(FVizName) - 4) & ".jpg"   ' помещаем в архив PreView
        dName = lblVArh.Caption & Format(Now, "yyyy.mm.dd") & "_ " & Left(FVizName, Len(FVizName) - 4) & ".jpg"
        FileCopy Source:=sName, Destination:=dName
        Kill sName
     Else                                               ' если нет подготовленных к печати файлов, то
        WFName = Left(FVizName, Len(FVizName) - 4) & ".jpg"
        MsgBox "Искомый файл PreView:" & Chr(13) & WFName & Chr(13) & "не обнаружен!", vbExclamation
    End If
    
    lstLog.AddItem "помещено в АРХИВ: [" & FVizName & "]"
    lstLog.ListIndex = lstLog.ListCount - 1   ' выделяем последнюю строку в отчёте
End Sub
 
 
 
 
 
 
 
 
 
' ##################### ______ функции ______ #####################
Private Function PrintBrosh( _
        printer_selected As String _
        ) As String                        ' ========= ПЕЧАТЬ буклетов=========
    Dim AllStrings() As String
    Dim adr As String               ' адрес и имя печатаемого файла
    Dim count_copies As Long        ' счётчик отправленых на печать страниц
    Dim count_f As Integer          ' счётчик оставшихся файлов
    Dim count_fp As Integer         ' счётчик отправленых файлов
    Dim copies_print As Integer     ' количество копий файла для печати
    Dim count_p As Integer          ' счётчик оставшихся страниц
    Dim doc1 As Document
    Dim for_case As String          ' ПРИЗНАК печати (текст, обложка, вкладышь и пр.) обрабатываемой строки
    Dim Fp As Long                  ' счётчик открытых файлов
    Dim Fi As Long                  ' счётчик открытых файлов
    Dim Fn As Long                  ' счётчик открытых файлов
    Dim MyText As String
    Dim MsgText As String           ' сообщение о окончании печати.
    Dim name_csv As String          ' адрес и имя файла-задания
    Dim name_info As String         ' адрес и имя *.info-файла
    Dim name_log As String          ' адрес и имя файла отчета
    Dim second As Integer           ' время печати одной страницы
    Dim second_lost As Byte         ' потери времени на загрузку файла в принтер
    Dim str As Byte                 ' номер строки
    Dim time_chas As Byte           ' общее время печати, в часах
    Dim time_min As Long            ' общее время печати, в минутах
    Dim time_label As String        ' отображаемое время печати
    Dim time_logIn As Date
    Dim time_logOut As Date
    Dim time_lost As Integer        ' общие потери времени на загрузку в принтер файлов, поставленных в очередь
    Dim time_post As Integer        ' время, за которое файлы отправлены на печать
    Dim zadanie As String           ' требуемый ПРИЗНАК печати (текст, обложка, вкладышь и пр.)
    Dim WhatCsv As String           ' имя обрабатываемого файла-задания
    Dim work_in As Double           ' продолжительность (время) "занятости" принтера
    Dim wait_for As Double
    
    time_logIn = Now                ' засекаем время начала отправки на печать
    
    WhatCsv = cboFZad.value
    name_csv = lblFZPath.Caption & WhatCsv
    If ProverNalichFiles(name_csv) = False Then
        MsgBox "Файл-задание: " & cboFZad.value & Chr(13) _
            & "НЕ ОБНАРУЖЕН!!!" & Chr(13) & Chr(13) _
            & "Сейчас будет произведена перезагрузка списков." & Chr(13) _
            & "Затем, ПОВТОРИТЕ СВОЙ ВЫБОР." _
            , vbCritical _
            , "Ошибка: файл-задание не обнаружен."
        Call FZReload
        Call FZReloadArhiv
        Exit Function
    End If
    count_fp = 0                      ' счётчик отправленых файлов
    count_copies = 0                  ' счётчик отправленых копий (страниц) на печать
    zadanie = lstMain.value          ' получаем ТРЕБУЕМЫ ПРИЗНАК печати (текст, обложка, вкладышь и пр.)
    
    Fp = FreeFile
    Open name_csv For Input As #Fp
    Do Until EOF(Fp)
        Line Input #Fp, MyText
        If MyText <> "" Then
            AllStrings = Split(MyText, Chr(9))
            for_case = AllStrings(0)
            If zadanie = for_case Then                  ' если задание совпадает с "файлом", то
                copies_print = AllStrings(4)            ' получили количество КОПИЙ
                If copies_print > 0 Then                ' если количество копий не 0, то
                    adr = Replace(AllStrings(2), Chr(34), "")
                    Set doc1 = OpenDocument(adr)        ' открыть документ
                    With doc1.PrintSettings
                             .SelectPrinter printer_selected    ' указать принтер для печати
                             .Collate = True                    ' разобрать по копиям
                             .Copies = copies_print             ' количество копий для печати
                    End With
                    doc1.PrintOut           ' печать документа
                    doc1.Close              ' закрыть документ
                    Set doc1 = Nothing      ' освободили переменную
                    count_fp = count_fp + 1 ' "счётчик файлов"
                    count_copies = count_copies + copies_print  ' "счётчик копий"
                End If
            End If
        End If
    Loop             ' начать цикл заново
    Close #Fp        ' закрыть файл по выполнении цикла
    
    ' ----------- отчёт в программу -----------
    time_logOut = Now                                     ' засекаем время окончания отправки на печать
    second = cboPrinter.List(cboPrinter.ListIndex, 1)       ' получаем время печати одной страницы
    second_lost = cboPrinter.List(cboPrinter.ListIndex, 4)  ' получаем "потери" времени
    ' секунда - 1/86400 дня
    ' посчитали work_in = "время печати" + "время потери", в сек.
    work_in = CDec((count_copies * second + count_fp * second_lost) / 86400)
    wait_for = CDec(time_logIn) + work_in        ' посчитали wait_for = "время начала печати" + work_in, в сек.
    lstLog.AddItem Format(time_logIn, "hh:mm:ss") & "  ЗАДАНИЕ : [" & zadanie _
                     & "], (" & count_copies & " стр.;  " & Format(work_in, "hh:mm:ss") & " мин.)"
    lstLog.AddItem "                 принтер: " & printer_selected _
                   & ";   занят до: " & Format(wait_for, "hh:mm:ss")
    lstLog.AddItem "---------------------------------------------------------------------------------------------------------"
    lstLog.ListIndex = lstLog.ListCount - 1   ' выделяем последнюю строку в отчёте
    
    ' ----------- отчёт в файл ОТПРАВЛЕНЫХ ЗАДАНИЙ -----------
    ' "собираем" путь для файл-отчёта
    name_info = lblFZPath.Caption & Left(WhatCsv, Len(WhatCsv) - 3) & ".info"
    
    Fi = FreeFile   ' добавляем автоматический счётчик открытых файлов
    Open name_info For Append As #Fi            'открываем файл для дабавления
        ' добавляем строку в файл-отчет
        Print #Fi, zadanie & "; напечатано: " & Format(Now, "yyyy.mm.dd hh:mm:ss")
    Close #Fi
    
    ' ----------- отчёт в файл СТАТИСТИКА -----------
    ' "собираем" путь для файл-отчёта
    name_log = "d:\Raspechatka\.Автоматизация\" & "log\" & "EpsPrint_" & Format(Now, "yyyy.mm.dd") & ".log"
    Fn = FreeFile                                             ' добавляем автоматический счётчик открытых файлов
    time_post = CInt((time_logOut - time_logIn) * 100000)     ' высчитываем время отправки на печать, в секундах
    Open name_log For Append As #Fn                           ' открываем файл для дабавления
        ' добавляем строку в файл-отчет
        Print #Fn, Now & printer_selected & ";" & zadanie & ";" & count_copies & ";" _
                      & count_fp & ";" & time_post & ";" & CInt(time_post / count_fp) _
                      & ";" & second & ";" & second_lost
    Close #Fn   ' закрываем файл-отчёт и сохраняем
    
    chkPrinted.Enabled = True
    MsgText = "Отправка (" & zadanie & ") на печать завершена!"
    count_f = 0
    str = lstMain.ListCount - 1
    count_p = 0
    If str > 0 Then
        Do While str > 0
            count_f = count_f + lstMain.List(str, 5)
            count_p = count_p + lstMain.List(str, 2)
            str = str - 1
        Loop
    Else
        lstMain.ListIndex = 0
    End If
    time_min = CLng((CLng(count_p) * CLng(second)) / 60)
    
    If time_min < 60 Then
        time_label = time_min & " мин., "
    Else
        time_chas = 0
        Do While time_min >= 60
            time_min = time_min - 60
            time_chas = time_chas + 1
        Loop
        time_label = time_chas & " ч. " & time_min & " мин., "
    End If
    time_lost = second_lost * count_f / 60            ' потери времени на загрузку файлов в принтер, в минутах
    lblVybor.Caption = "Общее время печати: " & time_label & "[" & time_lost & " мин.] " & " (" & count_p & " стр.)"
    
    lstMain.RemoveItem (lstMain.ListIndex)         ' удаляем выполненное задание из списка заданий
    lstMain.SetFocus                                ' вернули фокус
    
    ' проверяем выбрана ли процедура архивирования
    If chkArhiving.value = True And lstMain.ListCount < 2 Then
        Call cmdArhiving_Click                   ' отправляем файл в архив
        chkArhiving.value = False                       ' сняли пометку на архивирование
    End If
    PrintBrosh = MsgText
End Function
 
Private Function PrintBroshOtDo( _
        printer_selected As String _
        ) As String                       ' ========= ПЕЧАТЬ буклетов=========
    If PrintDo < PrintOt Then Exit Function  ' проверка на корректность старта печати
    
    Dim adr As String                       ' адрес и имя печатаемого файла
    Dim count_f As Integer                  ' счётчик отправленых файлов
    Dim count_copies As Integer             ' счётчик отправленых на печать страниц
    Dim copies_print As Integer             ' количество копий файла для печати
    Dim doc1 As Document
    Dim Fn As Long                          ' счётчик открытых файлов
    Dim name_log As String                  ' адрес и имя файла отчета
    Dim second As Integer                   ' время печати одной страницы
    Dim second_lost As Byte                 ' потери времени на загрузку файла в принтер
    Dim time_post As Integer                ' время, за которое файлы отправлены на печать
    Dim time_logIn As Date
    Dim time_logOut As Date
    Dim str As Long                         ' индекс стоки в списке печати
    Dim work_in As Double                   ' продолжительность (время) "занятости" принтера
    Dim wait_for As Double
    Dim zadanie As String
    
    time_logIn = Now                        ' засекаем время начала отправки на печать
    count_f = 0                             ' счётчик отправленых файлов
    count_copies = 0                        ' счётчик отправленых копий (страниц) на печать
    zadanie = cboKatSp.value
    For str = PrintOt To PrintDo
        adr = lstSpis.List(str, 2)                      ' получаем адрес файла
        copies_print = lstSpis.List(str, 3)             ' получаем количество копий
        Set doc1 = OpenDocument(adr)                    ' открыть документ
        With doc1.PrintSettings
                 .SelectPrinter printer_selected        ' указать принтер для печати
                 .Collate = True                        ' разобрать по копиям
                 .Copies = copies_print                 ' количество копий для печати
        End With
        doc1.PrintOut                                   ' распечатать
        doc1.Close                                      ' закрыть документ
        Set doc1 = Nothing                              ' оболили переменную
        count_f = count_f + 1                           ' "счётчик файлов" = сч.файлов + 1
        count_copies = count_copies + copies_print      ' "счётчик копий" = "счётчик копий" + "количество копий"
    Next str                 ' начать цикл заново
    
    ' ----------- отчёт в программу -----------
    time_logOut = Now                                       ' засекаем время окончания отправки на печать
    second = cboPrinter.List(cboPrinter.ListIndex, 1)         ' получаем время печати одной страницы
    second_lost = cboPrinter.List(cboPrinter.ListIndex, 4)    ' получаем "потери" времени
    ' секунда - 1/86400 дня
    ' посчитали work_in = "время печати" + "время потери", в сек.
    work_in = CDec((count_copies * second + count_f * second_lost) / 86400)
    wait_for = CDec(time_logIn) + work_in        ' посчитали wait_for = "время начала печати" + work_in, в сек.
    lstLog.AddItem Format(time_logIn, "hh:mm:ss") & "  ЗАДАНИЕ : [" & zadanie _
                     & "], (" & count_copies & " стр.;  " & Format(work_in, "hh:mm:ss") & " мин.)"
    lstLog.AddItem "                 принтер: " & printer_selected _
                   & ";   занят до: " & Format(wait_for, "hh:mm:ss")
    lstLog.AddItem "---------------------------------------------------------------------------------------------------------"
    lstLog.ListIndex = lstLog.ListCount - 1   ' выделяем последнюю строку в отчёте
    
    ' ----------- отчёт в файл СТАТИСТИКА -----------
    ' "собираем" путь для файл-отчёта
    name_log = "d:\Raspechatka\.Автоматизация\" & "log\" & "EpsPrint_" & Format(Now, "yyyy.mm.dd") & ".log"
    Fn = FreeFile                                             ' добавляем автоматический счётчик открытых файлов
    time_post = CInt((time_logOut - time_logIn) * 100000)     ' высчитываем время отправки на печать, в секундах
    Open name_log For Append As #Fn                           ' открываем файл для дабавления
         ' добавляем строку в файл-отчет
         Print #Fn, Now & printer_selected & ";" & zadanie & ";" & count_copies & ";" _
                        & count_f & ";" & time_post & ";" & CInt(time_post / count_f) _
                        & ";" & second & ";" & second_lost
    Close #Fn   ' закрываем файл-отчёт и сохраняем
    
    cmdPRINT.Enabled = False
    lblName.Caption = "Начало печати..."
    lblAdr.Caption = "Окончание печати..."
      
    PrintBroshOtDo = "Отправка на печать завершена!"
End Function

Понравилась статья? Поделить с друзьями:
  • Ошибка при исполнении запроса набора данных
  • Ошибка при запуске системы виндовс 10
  • Ошибка при инициализации приложения 0xc0000005 windows xp
  • Ошибка при запуске системы elma
  • Ошибка при инициализации приложения 0xc00000005