All pastes #386889 Raw Edit

Unnamed

public text v1 · immutable
·published 2007-03-08 23:17 UTC
rendered paste body
Private Sub Form_Load()
    On Error GoTo Form_Load_Error

    Set owRZ = New cResize
    Set owEV = New cEvents
    
    owRZ.Init Me
    InitForm Me

    On Error GoTo 0
    Exit Sub

Form_Load_Error:
    If Not ErrorLog(Err.Number, Err.Description, "Form_Load", "Form fArticoli") Then End
    Resume Next
End Sub