후크를 호출한 이벤트 유형을 리턴합니다. 이는 읽기 전용 특성입니다. 즉, 볼 수는 있으나 설정할 수는 없습니다.
VBScript
eventObject.EventType
Perl
$eventObject->EventType();
VBScript
Dim eventType
eventType = param.EventType
if eventType = AD_BUTTON_CLICK Then
SetFieldValue "KeyCustomer", "Company A"
elseif eventType = AD_CONTEXMENU_ITEM_SELECTION Then
SetFieldValue "KeyCustomer", "Company B"
end if
Perl
my $eventType;
$eventType = $param->EventType();
if ($eventType == $CQPerlExt::CQ_BUTTON_CLICK) {
$entity->SetFieldValue("KeyCustomer", "Company A");
} else {
if ($eventType == $CQPerlExt::CQ_CONTEXMENU_ITEM_SELECTION) {
$entity->SetFieldValue("KeyCustomer", "Company B");
}
}