event constructor; Long li_status i_PBWWord = CREATE OLEObject li_status = i_PBWWord.ConnectToNewObject(is_server) IF li_status < 0 THEN MessageBox("No Server", "Can't connect to " + is_server) END IF end event