我可以添加入站规则,但不能指定方向,但不能指定出站规则,FirewallObject := CreateOleObject('HNetCfg.FwAuthorizedApplicationgive direction here for outboundFirewallManager := CreateOleObject
:= GetActiveOleObject('PowerPoint.Application') as _Application; ppt := CreateOleObjectprinttofile('Error in call to ppt.Presentation.Open' + e.message); end;
每当异常调用CreateOleObject