После обновления винды до SP3 заломался самописный конструктор форм.
Найденое решение - откат MSComCt2.OCX до версии 2007 года (последняя из найденых на компах)
Как проявляется в работе:
объявляем
1.
Dim odtpx As MSComCtl2.DTPicker
Раньше работало так:
1.
Set oDtpX = Controls.Add("MSComCtl2.DTPicker", "dtpX1")
Сейчас ломается с ошибкой Error 731: In order to use 'MSComCtl2.DTPicker', you must specify a license string for the control. Use Licenses.Add to add the license string to the Licenses collection.
Пробую еще так:
1.
2.
Licenses.Add "MSComCtl2.DTPicker"
Set odtpx = Controls.Add("MSComCtl2.DTPicker", "dtpX2")
С новым OCX в режиме отладки и runtime ломаемся с run time error '13' Type Mismatch
Пробую еще так:
1.
2.
Licenses.Add "MSComCtl2.DTPicker", "iplpwpnippopupiivjrioppisjsjlpiiokuj"
Set odtpx = Controls.Add("MSComCtl2.DTPicker", "dtpX3")
C старым ругается, что не надо для нелицензируемого контрола добавлять лицензию.
С новым OCX в режиме отладки с run time error '13' Type Mismatch,
в режиме runtime валимся с ошибкой Run Time Error '747' No disine-time license information found foe control 'MSComCtl2.DTPicker'. Contact the vendor for control 'MSComCtl2.DTPicker' to obtain a disine-time license.
У меня одного такие грабли, или еще кто то наступил?
