F
fedotxxl
Добивает в каждом Sub'е писать
Можно ли раз и навсегда сказать, что при ошибках в LS - сделай мне это, при ошибках в Java - вот это?
Код:
On Error Goto ErrorLab
....
Exit Sub
ErrorLab:
Msgbox "Error #" + Cstr(Err) + " in " + Cstr(Getthreadinfo(1)) + "(" + Cstr(Erl) + ") : " + Error, 48, "Ошибка исполнения"
Exit Sub
End Sub