Standard Jet DBnb` Ugr@?~1y0̝cǟFN7]D^(`T{6Vx߱wCϯ34ay[|*|OJl>`&_Љ$g'DeFx -{N4 @0 @ @, @X @ @KKD(TitleAuthorCompanyComments AutoSum+ Andrew Semenov` XEnables Excel-like Auto Sum, Avg e t.c. in Datasheet View + SQL View from Immediate PaneKKDValidationRuleValidationKKD(TitleAuthorCompanyComments AutoSum+ Andrew Semenov` XKKD(TitleAuthorCompKKD(TitleAuthorCompanyCommentss AutoSum+ Andrew SemenovA 9Enables Excel-like Auto Sum, Avg e t.c. in Datasheet ViewKKD(TitleAuthorCompKKD(TitleAuthorCompanyCommentss AutoSum+ Andrew SemenovA 9Enables Excel-like Auto Sum, Avg e t.c. in Datasheet ViewKKDValidationRuleValidationTextFilterOrderBy OrderByOn ColumnWidth ColumnOrder ColumnHidden DescriptionFormatCaption DecimalPlaces InputMask DefaultValueRequiredDisplayControlAllowZeroLength RowHeight!  /ID   V Val2 :      0  mW Value       0  mM Val3      mKKD KeepLocal  TKKDb AccessVersionBuildShow Values LimitShow Values in IndexedShow Values in Non-IndexedShow Values in RemoteAppTitle StartUpFormStartUpShowDBWindowStartUpShowStatusBarStartUpMenuBarAllowShortcutMenusAllowFullMenusAllowBuiltInToolbarsAllowToolbarChangesAloLVCS           2                |    }IdParentIdNameType DateCreate DateUpdateOwnerFlagsDatabaseConnect ForeignName RmtInfoShort RmtInfoLongLvLvPropLvModuleLvExtra}}R}}Id ParentIdName        G B G G .G$/G H (H B  0H ,HHxH HHHHHH   H6I  "@0I "XI  bI RI@J-XJ pJ  *\JJ  J L J (K0K$@K 6hK  K K 3K 7K (GK 4Y L XL  hL   xL  7L 3LFLfM  pM M M    3M2[MRN XN @\hN  N  N   'NAlVCOS  O   2  ObjectIdSIDACM FInheritable ObjectIdU  V (Y (X @X PX `X V 0V $pX .X V 6X pV 0@V W Y  0W PWB XW`W hW W W W W @YZ As String&MsgBox (Application.CurrentObjectName)ZZ"ZZZ#Z ! ! !. \ , - .K Transpose  !4 $!^ +f  ! ! $'p ! 'D !BoL@?!"@@@VC? S             ObjectId AttributeOrderName1Name2 ExpressionFlagilnzjtz ObjectIdAttribute   ۇ O8V#jKuE*Ć($_AV#jKV#jKV#jKrvwlrV#jKV#jKV#jKV#jKV#o  ~ ~ۇ O8V#jKuE*Ć($_AV#jKV#jKV#jKrvwlrV#jKV#jKV#jKV#jKV#o ~ z zۇ O8V#jKuE*Ć($_AV#jKV#jKV#jKrvwlrV#jKV#jKV#jKV#jKV#o z    ۇ O8V#jKuE*Ć($_AV#jKV#jKV#jKrvwlrV#jKV#jKV#jKV#jKV#o    ۇ O8V#jKuE*Ć($_AV#jKV#jKV#jKrvwlrV#jKV#jKV#jKV#jKV#o   ۇ O8V#jKuE*Ć($_AV#jKV#jKV#jKrvwlrV#jKV#jKV#jKV#jKV#o   Tۇ O8V#jKuE*Ć($_AV#jKV#jKV#jKrvwlrV#jKV#jKV#jKV#jKV#o  ! !ۇ O8V#jKuE*Ć($_AV#jKV#jKV#jKrvwlrV#jKV#jKV#jKV#jKV#o !  ۇ O8V#jKuE*Ć($_AV#jKV#jKV#jKrvwlrV#jKV#jKV#jKV#jKV#o     ۇ O8V#jKuE*Ć($_AV#jKV#jKV#jKrvwlrV#jKV#jKV#jKV#jKV#o      ۇ O8V#jKuE*Ć($_AV#jKV#jKV#jKrvwlrV#jKV#jKV#jKV#jKV#o   ۇ O8V#jKrvwlrV#jKV#jKV#jKV#jKrvwlrV#jKV#jKV#jKV#jKV#o VCS            szRelationshipgrbitccolumnicolumnszObjectszColumnszReferencedObjectszReferencedColumn   szObjectszReferencedObjectszRelationship(stard( t9@ \9Z t9@: $---9JtonS \9Z As StringFaf ,('ot...9fapnX ,!0..Labels(2).text = "Install a surge protector."H 0 H x toph F D$@'Esgh %Set x = Application.Screen.ActiveForm ! ! !. As String&MsgBox (Application.CurrentObjectName)h ZZZZ  ! !  ctiveF'f ! ! !.  F D$@'Esg ... !\ , - .K Transpose  !4 $!^ +f  ! ! $' ! ' !B@l ! ! !%'0 - ...'T  ! !   !.G*/MSysDbG/++'#.G*/MSysDbG/++'#IIn7ȠAS5Lock  {qg]SI?5JECTO (o{Ishell32tlpbiSHGetPathFromIDListKpidListbOlpBuffer> GetFolderndlgTitleFrmhwnd`NullchrMIDListmResulturFolderQBI\ vbNullCharYForm_C2Command2_ClickbtnBrowse_ClickxktktpI_ TargetPathControlsK _B_str_String _B_str_LeftV ComctlLibn ActiveXCtl46ActiveXCtl46_BeforeLabelEditCancel _B_var_Text36Tree SizeToFitNodes_OCNAddr Tree_UpdatedCodeUpdated Tree_EnterEnterNodeB<SelectedY SelectedItem* LabelEditEOFlevel _B_var_cdsort _B_var_On6PIDDLookupFIIfzIsNull _B_var_NullParentPArenaParentID~Fi<] _B_var_FI _B_var_pathOPN Command49"Command49_Click]Tree_NodeClick NodeClick4 Command50>Command50_Click(_B_var_m Expanded Command51?Command51_Click` CloseButton_ Command52@Command52_Click0Sorted)p Tree_GotFocusGotFocusKTree_MouseDownJ MouseDownsFullPath+ Tree_DblClick DblClickKeyIndex FristSibling FirstSiblings_B_var_j  Command53AText54jsCommand53_Click@Visible Tree_ClickChildren> Rectangle4! MSComctlLibmList* ListItems ColumnHeadersdHideColumnHeadersHQViewIList_ColumnClick+\ ColumnHeadert=intColK- ListView19SortKey SortOrder4 lvwAscending lvwDescending$q EnsureVisibleJ DropHighlight1 ColumnClick~t{K{~I${L\{~I${M{~I${N{~I${OX{~I${P{~I${Q{~I${RT{~I${S{~I${T{~I${UP{~I${h{I${i{I${jL{I${k{I${l{I${mH{I${n{I${o{I${pD{I${q{I${r{I${s@{ @@ @@@ `vjpd`w`a`vfvgruovordxmfv ufm`wjrpvijsvufsruwv vbujswv v}vufm w`amfvov}v`bfvov}vboda`uvov}vjof|brmxopvov}vjof|vsfbvov}vordxmfvov}vordxmfvXov}vrakfbwvov}vtxfujfvov}vufm`wjrpvijsvtxfu}Ww`amfWxv}vbrpgjhxv}vufhjpgr`bbfvvm`}rxw ov}vdavxoo`u}jpgrxvfudfgjpfdI${0{I${{I${ػ{I${,{I${{I${Լ{I${({IJabelEdiν StartLabelEd/ StartLabelEO StartLabelO StartLabepStartLab̬StartLan&StartL StartStar2Stasj ObjectVerbsslectedu"Tag&CheckBoxi{ HideSelections TreeView1m Label57 _B_var_EndF SelectedIteQ^FindItem_B_var_xG _B_var_X}2Placem!the' followinga SendMessagehwnd/wMsg+awParambuser32* LVM_FIRSTπLVM_SETITEMSTATEcLVM_GETITEMSTATELVM_GETITEMTEXTiLVM_SETEXTENDEDLISTVIEWSTYLEV`LVM_GETEXTENDEDLISTVIEWSTYLEnLVS_EX_GRIDLINESLVS_EX_CHECKBOXESLVS_EX_FULLROWSELECT^ LVIF_STATELVIS_STATEIMAGEMASK SW_NORMALiSW_SHOWMAXIMIZEDwSW_SHOWDEFAULTJSW_SHOWNOACTIVATE SW_SHOWNORMALSHGFI_TYPENAME2=LV_ITEMmask-iItem8iSubItemlstate stateMaskxpszText cchTextMax$iIndentjLVCOLUMNԣfmtcx\iOrder7 SHFILEINFO|hIconMiIcon dwAttributes szDisplayName" szTypeNamei SHGetFileInfopszPathdwFileAttributesopsfiocbSizeFileInfo uFlags&uGetDesktopWindow ShellExecute" lpOperation8lpFile lpParametersZ lpDirectoryenShowCmdseries]fPathGetFileDescription[ sFileNameshinfo_TrimNullposchkCheckBox_Clickv5 chkCheckBoxchkGridLines_Click-6 chkGridLinescchkFullRowSelect_ClickLc chkSelectMode\cmdOpenSelected_ClickֳhWndDeskOsfile8aparams$ vbNullString Combo1_Click^3 cmdSelect[Enabled۪SetCheck lItemIndex bState^LV'^cmdSetCheck_Click@lvIndexlvCountuValText1~cmdCheckInvert_ClickgSetCheckInvertAllcmdCheckAll_Click @ @ @       !uy}enuImageList ImageListm|Icons} _B_var_IPN\ ListImage|tvwChildEndWith; _B_var_Folder^Tree_MouseMove= MouseMovev _B_str_Space _B_str_Chrm#Tree2  Tree_Exitzindex As Integer,ButtonShift ActiveXCtl64ٶ SysInfoLibaIList2W _B_var_cds:_B_var_cdcheck< Node_ClickwtImage_B_var_chkGridLinesSelNode_B_var_SelNodeCSelNode\i _B_var_z|^ID] _B_var_idN Tree_Expand>Expand$d Tree_CollapseCollapseu recalcSizersrtrjrsrFROM~ tempRIsDirԜORDERABY\lm^DCountDMaxx Command68kCommand68_ClickApptDSumyList_OLEGiveFeedback\effect|OLEGiveFeedbackS dafaultcursork _B_var_PCTree_OLEGiveFeedbacka OLEDragDropqdata;Tree_OLEDragDrop0 DataObjectTree_OLEDragOverl2 OLEDragOverV StatusBarText>JTree_  MousePointertForm_MouseMovea Tree_DragOverDragOver W List_DragOverList_OLEDragOverZ>Tree_OLEStartDragc OLEStartDragݗallowedeffectsDTree_StartDrag|! StartDragם_B_var_DataObjectral\Tree_CompleteDrag_4 CompleteDragZhTree_OLECompleteDragOLECompleteDrag0fSendMail{qg]SI?ang VerQueryValuepBlock$ lpSubBlock>GetProfileStringWGetProfileStringA RegOpenKeyhKey lpSubKey RegOpenKeyEx2| RegCloseKeyl advapi32.dll}0RegQueryValueExT RegEnumKeyHdwIndex RegEnumKeyExΪlpClass2 lpsA @ @ @ @ @ @ @ @ @ @  !"#$ % & '    ()*+, ! ! ! uuuyyy}} }!    hProcess>SEE_MASK_INVOKEIDLIST4SEE_MASK_NOCLOSEPROCESSSEE_MASK_FLAG_NO_UI1ShellExecuteExSEIcCommand1Command3Command4LoadFolderInfo[oCommand1_ClickVtmp ListIndexQShowProperties$List1Command3_ClickList2Command4_ClickIZ Drive1_ErrorChDrive% vbCritical+} List2_ClickList2_DblClick List1_ClickList1_DblClickPnewPathTrim@hFile#WFDAddItem  ListCount6Label5,Label7,Label11AChangeForm_C4 Command12Command12_Click FileModuleIForm_~TMPCLP201881P dirscannewc scandirnew _B_var_Debugۮ _B_var_CurDirTdevugU _B_var_devugCreateDatabasernFile _B_var_Loopmath.ma7^mapath _B_var_mapath(y~ _B_var_kVALUES _B_var_VALUESl _B_var_ElseifqmMatrixn _B_var_MatrixA clearMatrixMatIJ OutputMatrixk CopyQueryDefK @  t t t t t t t t twHighVersion szDescription#,szSystemStatuss wMaxSockets wMaxUDPDG[G dwVendorInfoWSAGetLastErrorf WSOCK32.DLL W WSAStartupwVersionRequired lpWSADATA WSACleanup L gethostnameQszHost dwHostLen gethostbyname<hpvDest hpvSource܌cbCopyC GetIPAddress9 sHostNameQylpHostHOSTdwIPAddr tmpIPAddrxsIPAddrBSocketsInitializezSocketsCleanup GetIPHostNameHiByteLoByte~bSilentWSAD~sLoBytedsHiByte:QResolveIPAddressvGetIP& MungeLong/DummyDMungeInt/XLo)XHiTUser0iptrNameTUser1i ptrPassword# dwPasswordAgedwPrivՃ ptrHomeDirV2 ptrComment.dwFlags/ ptrScriptPath5USER_PRIV_MASKUSER_PRIV_GUEST?USER_PRIV_USERmvUSER_PRIV_ADMINü UF_SCRIPT+UF_ACCOUNTDISABLEoUF_HOMEDIR_REQUIRED UF_LOCKOUTUF_PASSWD_NOTREQD!UF_PASSWD_CANT_CHANGEmUF_NORMAL_ACCOUNTFILTER_NORMAL_ACCOUNT2 NetGetDCName servernamesm DomainName~DCNPtr netapi32.dllf NetUserDelAusername\NetGroupAddUserN GroupNameNetGroupDelUser NetUserAdd1;Buffer- ParmError  NetUserEnum0JlFilter prefmaxlen entriesread totalentriesT resumehandleNetGroupEnumUsers0L NetGroupEnum0NetUserGetGroups0NetApiBufferFreePtrNetAPIBufferAllocate, ByteCountQ>PtrToStr0StrToPtrPtrToInte nCharCountJStrLenAddUserToGroupsNameUsersGetPrimaryDCNameFiMNameDNamewDCNameDNArray:MNArrayDCNArray AddUserX_PWDPWDPtrFPWDArrayR UserStructfYLOCALE_ILANGUAGELOCALE_SLANGUAGEDLOCALE_SENGLANGUAGESLOCALE_SABBREVLANGNAMEkLOCALE_SNATIVELANGNAMEbLOCALE_ICOUNTRYLOCALE_SCOUNTRYLOCALE_SENGCOUNTRY ~LOCALE_SABBREVCTRYNAMEu_LOCALE_SNATIVECTRYNAMELOCALE_IDEFAULTLANGUAGE0LOCALE_IDEFAULTCOUNTRYzLOCALE_IDEFAULTCODEPAGE%p LOCALE_SLISTMLOCALE_IMEASURELOCALE_SDECIMALLOCALE_STHOUSANDSxLOCALE_SGROUPING$LOCALE_IDIGITS LOCALE_ILZEROLOCALE_SNATIVEDIGITSLOCALE_SCURRENCYLOCALE_SINTLSYMBOL~LOCALE_SMONDECIMALSEP LOCALE_SMONTHOUSANDSEP*LOCALE_SMONGROUPING(LOCALE_ICURRDIGITS4LOCALE_IINTLCURRDIGITSP LOCALE_ICURRENCYuLOCALE_INEGCURR[  LOCALE_SDATE- LOCALE_STIME#LOCALE_SSHORTDATELOCALE_SLONGDATELOCALE_STIMEFORMAT LOCALE_IDATE% LOCALE_ILDATE8 LOCALE_ITIMEpLOCALE_ICENTURY@LOCALE_ITLZEROLOCALE_IDAYLZEROULOCALE_IMONLZERO* LOCALE_S1159` LOCALE_S2359iLOCALE_SDAYNAME19LOCALE_SDAYNAME2:LOCALE_SDAYNAME3;LOCALE_SDAYNAME4<LOCALE_SDAYNAME5=LOCALE_SDAYNAME6>LOCALE_SDAYNAME7?LOCALE_SABBREVDAYNAME17LOCALE_SABBREVDAYNAME27LOCALE_SABBREVDAYNAME37LOCALE_SABBREVDAYNAME47LOCALE_SABBREVDAYNAME57LOCALE_SABBREVDAYNAME67LOCALE_SABBREVDAYNAME77LOCALE_SMONTHNAME1_qLOCALE_SMONTHNAME2`qLOCALE_SMONTHNAME3aqLOCALE_SMONTHNAME4bqLOCALE_SMONTHNAME5cqLOCALE_SMONTHNAME6dqLOCALE_SMONTHNAME7eqLOCALE_SMONTHNAME8fqLOCALE_SMONTHNAME9gqLOCALE_SMONTHNAME10޼LOCALE_SMONTHNAME11߼LOCALE_SM_SABBREVMONTHNAME8w7LOCALE_SABBREVMONTHNAME9x7LOCALE_SABBREVMONTHNAME10WLOCALE_SABBREVMONTHNAME11WLOCALE_SABBREVMONTHNAME12WLOCALE_SABBREVMONTHNAME13WLOCALE_SYSTEM_DEFAULT+LOCALE_USER_DEFAULT cMAXLEN]apiGetLocaleInfoB/LocaleLCTypelpLCDataȒcchDataցapiSetLocaleInfo GetLocaleInfoͰ lngLCType5 lngLocale strLCData1lngDatarlngX/ SetLocaleInfoilValue܅   S LocalSettings;OpenJetUserInfoB strDbPathE.cnn%ADODBs Connection strConnectq OpenSchemaDSchemaadSchemaProviderSpecificQSchemaIDpenJetUserInfo}_B_var_penJetUserInfor _B_var_ADODB`v_B_var_ConnectionG _B_var_cnn6<ADOXMSDASCMSDAOSP ODBCTool(i_B_var_adSchemaProviderSpecific/ERR_OKi$ ERR_CONNECT@ ERR_MESSAGE ERR_NOMESSAGEERR_SEND4 ERR_RECEIVEPT ERR_INTERNALMessagestrToastrCCk_strBCC_strFromstrSubj strHdrCharsetDstrHdrTransferEncodingstrDateDstrBodyg`strContentType) strCharsetstrTransferEncoding$ strFileAttachCheckMsgstrHost strUserName͈ strPasswordaqlPort= freemail.dllSendMsg,G fpCallback/mmMsgs ReceiveMsg:ElMsgNumnv lDelAfterRcv ReceiveHdr]( DeleteMsg ConvertCyr4 strSrcDestX strSrcSrc strFromToCP)KProgressulTypeslModelStatusjAddrOf'Ken DeclarationsGetCurrentVbaProjectqhProjectD vba332.dllp GetFuncIDhstrFunctionNameUM strFunctionId0pointer1u strFuncNamesM lngResultQstrIotPathM* strBuffer 5FileScanENUM_FOLDER_TYPEENUM_APIvENUM_VBENUM_FSOH ENUM_SHELLINVALID_HANDLE_VALUEFILE_ATTRIBUTE_DIRECTORY FOLDER_INFO|aDirSize\ FilesCount  DirsCountNsFiles*1 GetFolderInfo^ sFolderPathSEnumTypeblFileNum lDirNumucurSize EnumFolderAPIfo EnumFolderVB EnumFolderFSOEnumFolderShellsFolderAoShell1UfldItem  NameSpace{Items`hIsFolderFSO objFoldergfyl1 SubFoldersx= FolderQueue| CollectionWDoEnumVB\RemoveϱsTempevbNormal-vbHiddenT; vbReadOnlyLvbSystemlRetE TrimNullswNetScanSV_TYPE_WORKSTATION+SV_TYPE_SERVERRSV_TYPE_SQLSERVER|SV_TYPE_DOMAIN_CTRL SV_TYPE_DOMAIN_BAKCTRLSV_TYPE_TIME_SOURCE_ SV_TYPE_AFP SV_TYPE_NOVELL)QSV_TYPE_DOMAIN_MEMBERSV_TYPE_PRINTQ_SERVERSV_TYPE_DIALIN_SERVERQSV_TYPE_XENIX_SERVERSV_TYPE_SERVER_UNIX SV_TYPE_NTy SV_TYPE_WFWPSV_TYPE_SERVER_MFPNڽSV_TYPE_SERVER_NThSV_TYPE_POTENTIAL_BROWSERhZSV_TYPE_BACKUP_BROWSER]SV_TYPE_MASTER_BROWSERCSV_TYPE_DOMAIN_MASTERISV_TYPE_SERVER_OSFSV_TYPE_SERVER_VMSG!SV_TYPE_WINDOWS SV_TYPE_DFSSV_TYPE_CLUSTER_NT SV_TYPE_DCESV_TYPE_ALTERNATE_XPORT}SV_TYPE_LOCAL_LIST_ONLYSV_TYPE_DOMAIN_ENUM= SV_TYPE_ALLERROR_MORE_DATA&" SIZE_SI_101SERVER_INFO_101  dwPlatformIdlpszServerNameudwVersionMajordwVersionMinorR dwType lpszComment# RtlMoveMemory NetServerEnumq ServerTypezdomainlstrcpyW lpszDestblpszSrc eServerTypes^ ST_SERVERYWST_SQLO GetServerListpszTemp pszS Q]u=i-K lK           FlagsFormModuleNameReplicationVersionTypeTypeInfoVersion"Index1"}/jU@xaqd@USysRegInfo@888,,,,,,,* @ywSFv@xaqd@USysConfig@777+++++++) @um%iT@xaqd@Table14@333'''''''% @ N:U@TbuU@Query1$@@?33'''''''% @! ~5xu@xaqd@MSysModules2*@6Ƴb/UU9-------+  v@ v@MSysModules,,,,,,,,,,* 5xu@xaqd@MSysIMEXSpecs.........., @5xu@xaqd@MSysIMEXColumns0000000000. ~S@xaqd@MSysCmdbars,,,,,,,,,,*  aiRT@d@In##########! Tl.U@d@AS##########!  `5xu@`5xu@UserDefined,,,,,,,,,,*  5xu@3d@SummaryInfo@888,,,,,,,* @ cDxu@d@AccessLayout*@@E99-------+ @`5xu@`5xu@SysRel''''''''''% @5xu@@5xu@Scripts((((((((((&  5xu@ 5xu@Reports((((((((((& `5xu@`5xu@Modules((((((((((& 5xu@5xu@Forms&&&&&&&&&&$ D5xu@D5xu@MSysRelationships22222222220 D5xu@xaqd@MSysQueries,,,,,,,,,,* D5xu@xaqd@MSysACEs))))))))))' D5xu@D5xu@MSysObjects,,,,,,,,,,* D5xu@t~>[@MSysDb@333'''''''% @D5xu@D5xu@Relationships.........., D5xu@D5xu@Databases**********( D5xu@D5xu@Tables''''''''''% VCN   GrptbcdTbName TbIndex coni1_time6coni1_usernamet{ coni1_netname<NetConnectionEnum qualifieri resume_handle8pTouFromTabArray5Label2,dwServer dwShare dwEntriesreaddwTotalentriesdwResumehandleȱsuccess| nStructSizeJcnt+bServer<bShareci1O~vbTabc9GetConnectionTypedwDatatmplen  dwSessionType NecConnexionst NetConnexions{dodo_B_str_EnvironsummatorSumatronf(ummaTable _B_var_TablenCurrentObjectNameActiveDatasheetGridXe(smileOnClosrfOnCloseY TimerInterval?cSelWidthNet _B_var_Netu SelHeight!SelLeft#$SelTopmSumacSysSetStatus_B_var_acSysSetStatusacSysCmdSetStatushIDpd@Dpd@AS!!!!!!!!!!!  Dpd@Dpd@UserDefined***********  Dpd@Dpd@SummaryInfo***********  Dpd@Dpd@AccessLayout+++++++++++ Dpd@Dpd@SysRel%%%%%%%%%%% Dpd@Dpd@Scripts&&&&&&&&&&& Dpd@Dpd@Reports&&&&&&&&&&& Dpd@Dpd@Modules&&&&&&&&&&& Dpd@Dpd@Forms$$$$$$$$$$$ Dpd@Dpd@MSysRelationships22222222220 Dpd@Dpd@MSysQueries,,,,,,,,,,* Dpd@Dpd@MSysACEs))))))))))' Dpd@Dpd@MSysObjects,,,,,,,,,,* Dpd@Dpd@MSysDb''''''''''% Dpd@Dpd@Relationships.........., Dpd@Dpd@Databases**********( Dpd@Dpd@Tables''''''''''% Q{qg  `vd`w`a`vfvgruovordxmfv ufm`wjrpvijsvufsruwv vbujswv v}vufm w`amfvov}v`bfvov}vrakfbwvov}vtxfujfvov}vufm`wjrpvijsv`bbfvvm`}rxw ov}vdavxoo`u}jpgrxvfudfgjpfdaypintLeftintRight-N vartestval\intMida _B_var_LBoundintzBoundx$intLedtFinrRight  SwapElementsY_B_var_SwapElementsvarArra4varItemsGintItem1^IntItem2_varTemp _B_var_Bound!nd_^ _B_var_nd (Transpose _B_var_co{wmh_fSetExistMen_B_var_ExistMen DescriptionTextBuiltInaCreator34 ToolTipTextb? BeginGroup (uninstall^a_B_var_aCellt _B_var_1 GridLines +_B_var_GridlinesP4msoControlButtonn_B_var_msoControlButtonhOnActionCopyFacez_B_var_CopyFacepRFaceIdid[ @@ZLVALh @@ @  `vjpd`w`a`vfvgruovordxmfv ufm`wjrpvijsvufsruwv vbujswv v}vufm w`amfvov}v`bfvov}vrakfbwvov}vtxfujfvov}vufm`wjrpvijsv`bbfvvm`}rxw ov}vdavxoo`u}jpgrxvfudfgjpfdULEQ@HB1s-:B,!B+BIn<P__SRP_0K)^0rU(~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~Comment1jAutoSumIb;Sum=umma()b;Avg =verage()b;Count=ount()b; Count Nums =ountnums()b;Min=iiin()b;Max=aaax()Text13 Command15 Command16Box17Text18Label20Text21Text23 Command25 Command27 Command28 Command29 Command30Text32Command15_ClickCommand16_ClickCommand25_ClickCommand27_ClickCommand28_ClickCommand30_ClickCommand34_ClickCommand6_ClickText0_AfterUpdate F;|?  VBA332.DLL y k cds \ needcolsortqm.col_sortdirscanscandircdsort ]协N?d;|?  (  .)P;|?@ČF1BJ  Confirm Document Deletionsh)aN?  Confirm Record Changes Confirm Action Queries DELETE * FROM temp;`GXGP y   *.mdb y B  3INSERT INTO temp (path, name, SizeBefore) VALUES (' ',' ',  ); y C  . .. y   ADV_LIGHTBOX y  0m.iH!m.im. SELECT path FROM temp; OpenRecordset1m. :Sm.Qm. UPDATE temp SET Tables = , FieldsToMove =  WHERE path = ' '; HNDLWgh& IUPDATE temp SET ToSort = True WHERE TablesToSort >0 And FieldsToSort >0;  UPDATE temp SET Error = '%m.#m. ' WHERE path = 'Im. y i X MSys Update T1 SET id1=0; SELECT id, Name, id1 from T1; *SELECT id, Name, id1 from T1 WHERE id1<>0; 9@Comment _@AutoSum  `xwrvxobroofpw          IdParentIdNameType DateCreate DateUpdateOwnerFlagsDatabaseConnect ForeignName RmtInfoShort RmtInfoLongLvLvPropLvModuleLvExtra  Id ParentIdName        G B G G .G$/G H (H B  0H ,HHxH HHHHHH   H6I  "@0I "XI  bI RI@J-XJ pJ  *\JJ  J L J (K0K$@K 6hK  K K 3K 7K (GK 4Y L XL  hL   xL  7L 3LFLfM  pM M M    3M2[MRN XN @\hN  N  N   'NAlVCN b    @      AttributesDataType FieldName IndexType SkipColumnSpecIDStartWidthk"m( Index1 PrimaryKeywResumehandleȱsuccess| nStructSizeJcnt+bServer<bShareci1O~vbTabc9GetConnectionTypedwDatatmplen  dwSessionType NecConnexionst NetConnexions{dodo_B_str_EnvironsummatorSumatronf(ummaTable _B_var_TablenCurrentObjectNameActiveDatasheetGridXe(smileOnClosrfOnCloseY TimerInterval?cSelWidthNet _B_var_Netu SelHeight!SelLeft#$SelTopmSumacSysSetStatus_B_var_acSysSetStatusacSysCmdSetStatushIDpd@Dpd@AS!!!!!!!!!!!  Dpd@Dpd@UserDefined***********  Dpd@Dpd@SummaryInfo***********  Dpd@Dpd@AccessLayout+++++++++++ Dpd@Dpd@SysRel%%%%%%%%%%% Dpd@Dpd@Scripts&&&&&&&&&&& Dpd@Dpd@Reports&&&&&&&&&&& Dpd@Dpd@Modules&&&&&&&&&&& Dpd@Dpd@Forms$$$$$$$$$$$ Dpd@Dpd@MSysRelationships22222222220 Dpd@Dpd@MSysQueries,,,,,,,,,,* Dpd@Dpd@MSysACEs))))))))))' Dpd@Dpd@MSysObjects,,,,,,,,,,* Dpd@Dpd@MSysDb''''''''''% Dpd@Dpd@Relationships.........., Dpd@Dpd@Databases**********( Dpd@Dpd@Tables''''''''''% {q Command44 Command43  temp_checkBox45  (*m~"j*m~"jCommand43_ClickCommand44_Click}"j}"j}"j;n #j;n #j;n #j Win_UtilsForm_C2=*j@*j>*j?*jC*jB*jCommand2_Click   ,  CoTaskMemFree ole32.dll CoTaskMemFreeAdd ;;SHBrowseForFolder shell32 SHBrowseForFolder <<SHGetPathFromIDList SHGetPathFromIDList <= GetFolder Get path ... Text0tpY? y ^   y h 8c~k B* Fuck5C:\Program Files\Microsoft Office\Office\comctl32.ocx ComctlLib ? @@hQ*jU*jT*j B* ActiveXCtl46p W* ActiveX Controls in Access A A X*jW*jh*jg*jTree h;|?NodesCount Shit        lItemsSetCheckInvertAll H,jH,jH,jText54_AfterUpdate `4  PhwndEnabled ,jǺ ,jƺ ,jЮ؆.jЮ؆.jЮ؆.jЮ؆.jЮ؆.j"$,j(6( ActiveXCtl60 folder `4 ld  PЮ؆.jЮ؆.jIList Folder D:\Temp\folder.gif ListImages Tree@e&N? IList ImageListModule1 Ѯ؆.j Ѯ؆.jIcons ListImagebw t&IList3Ѯ؆.j2Ѯ؆.jRC7?6Ѯ؆.joho5Ѯ؆.j .j .j .j EmptyNode SelectedNode SelNode .j .jtree_MouseMove 3The following ListView items are checked (0-based):   `4 W  PP y   y   item   (   ) .j .jTree_MouseMove .j .jTree2 .j .j1.j7.j6.j=.j<.jA.j@.j Beep!F.jE.j `4 A  zPSNT\System32\SYSINFO.OCX SysInfoLib !i c.jb.jIList2 `b.jbb.jab.jgb.jib.jhb.j_b.jdb.jcb.jAr.jAMIr.jHr.j `4 p  mPYr.jXr.j Node_Click\r.j[r.j`r.j_r.jImageC2Listjr.jir.jTree_NodeClickmr.jlr.j Tree_Expand ofolderqr.jpr.j Tree_CollapsekR.jkR.j ChooseColorkR.jg.jg.jg.j) OINSERT INTO temp (path, name, [Level], Parent, ParentID, IsDir, Size) VALUES (' , 0, g.jg.j recalcSizeg.jg.j Command68Command68_Click IsDir = True temp.Level#2Q$.j,2Q$.j* PUPDATE temp SET Size = DSum('temp.Size','temp','ParentID=' & [ID] WHERE [Level]= ;* QUPDATE temp SET Size = DSum('temp.Size','temp','ParentID=' & [ID]) WHERE [Level]= ( )  ( Kb) IsDir = True And Level = 1 temp.SizeCLPI UPDATE temp SET Size = IIF (IsNull (DSum('temp.Size','temp','ParentID=' & [ID])),0,DSum('temp.Size','temp','ParentID=' & [ID])) WHERE [Level]=  And IsDir = True;) MSELECT name, [Level], path , Parent, Size FROM TeVCN  en           @    }   DateDelimDateFourDigitYearDateLeadingZeros DateOrder DecimalPointFieldSeparatorFileTypeSpecIDSpecNameSpecTypeStartRow TextDelim TimeDelim<}<}<  PrimaryKeyvbTabc9GetConnectionTypedwDatatmplen  dwSessionType NecConnexionst NetConnexions{dodo_B_str_EnvironsummatorSumatronf(ummaTable _B_var_TablenCurrentObjectNameActiveDatasheetGridXe(smileOnClosrfOnCloseY TimerInterval?cSelWidthNet _B_var_Netu SelHeight!SelLeft#$SelTopmSumacSysSetStatus_B_var_acSysSetStatusacSysCmdSetStatushIDpd@Dpd@AS!!!!!!!!!!!  Dpd@Dpd@UserDefined***********  Dpd@Dpd@SummaryInfo***********  Dpd@Dpd@AccessLayout+++++++++++ Dpd@Dpd@SysRel%%%%%%%%%%% Dpd@Dpd@Scripts&&&&&&&&&&& Dpd@Dpd@Reports&&&&&&&&&&& Dpd@Dpd@Modules&&&&&&&&&&& Dpd@Dpd@Forms$$$$$$$$$$$ Dpd@Dpd@MSysRelationships22222222220 Dpd@Dpd@MSysQueries,,,,,,,,,,* Dpd@Dpd@MSysACEs))))))))))' Dpd@Dpd@MSysObjects,,,,,,,,,,* Dpd@Dpd@MSysDb''''''''''% Dpd@Dpd@Relationships.........., Dpd@Dpd@Databases**********( Dpd@Dpd@Tables''''''''''% _{q ORDER BY [Level], IsDir ;+2Q$.j Level = 1 `4 p  1P  .82Q$.j72Q$.jBV0.jKV0.jJV0.j WINNT_V0.jaV0.j`V0.j, TSELECT name, [Level], path , Parent, Size, IsDir FROM Temp ORDER BY [Level], IsDir ;T (.j\ (.jM2[ (.jf (.je (.jList_OLEGiveFeedback !j (.ji (.jTree_OLEGiveFeedback!P.j+P.j*P.j Tree_DragOver/P.j.P.j List_DragOver6P.j5P.j9P.j8P.jTree_StartDrag4#>q  `4 c  EP?P.j H>P.jBP.jAP.jTree_CompleteDragSendMail Q hidden semenov@businessanalytica.ru a $$,  CHOOSECOLOR comdlg32.dll ChooseColorA  9 Form_Form1 Form_frmMainKs].jUs].jLs].jTs].jCommand0Command0_Click c: ExitWindowsEx user32.dll ExitWindowsEx q`ExitWin  # .  Get@      v ^+ ^+ ^(C) {UP} ^{UP} y V ( !  ! !  {BS} {BACKSPACE} {BACKSPACE}  ^{c} {^}{c} {^}{v} {^}c {^}vGetIP     NetGetDCName NETAPI32.DLL NetGetDCName )Y0* NetUserDel NetUserDel ) H*NetGroupAddUser NetGroupAddUser lstrlenW )`*NetGroupDelUser NetGroupDelUser )x* NetUserAdd1 NetUserAdd )I* NetUserEnum0 NetUserEnum )*NetGroupEnumUsers0 NetGroupGetUsers )* NetGroupEnum0 NetGroupEnum )q*InNetUserGetGroups0 NetUserGetGroups )A*NetAPIBufferFree NetApiBufferFree ) +NetAPIBufferAllocate NetApiBufferAllocate ) +PtrToStr lstrcpyW 8+StrToPtrPtrToInt lstrcpynW aP+StrLenNT h+AddUserToGroupDelUserDelUserFromGroupEnumerateServerGroupsEnumerateServerUsersGetPrimaryDCNameAdVCEN  __A__Info GetLocaleInfoA !+apiSetLocaleInfo SetLocaleInfoA + GetLocaleInfo SetLocaleInfo `4 ft  DBPOpenJetUserInfo -Provider=Microsoft.Jet.OLEDB.4.0;Data Source=m. 3C:\Program Files\Common Files\System\ADO\msadox.dllADOX !+m.4C:\Program Files\Common Files\System\ADO\msado10.dllADODB )"Oר)7C:\Program Files\Common Files\system\ole db\oledb32.dllMSDASC C:\Finance 9-p cAC:\WINNT\System32\simpdata.tlbMSDAOSP a  -@JnFC:\Program Files\Microsoft Visual Studio\Common\Tools\APE\ODBCTOOL.DLLODBCTool Ai0-tm.mailFileScanNetScan RemoteFolder  RtlMoveMemory NetServerEnum netapi32.dll NetServerEnum -NetApiBufferFree  -lstrcpyW . GetServerListPointerToString  WSAGetLastError WSOCK32.DLL WSAGetLastError 9a. WSAStartup WSAStartup 9. WSACleanup WSACleanuprgbGetComputerName 9. gethostname gethostname 9/ gethostbyname gethostbyname 9A / GetIPAddress GetIPHostNameHiByteLoByteSocketsCleanupSockets{InitializeResolveIPAddress NetServerEnum failed: y _ P/ y n h/ y  / $Windows Sockets are Not responding.  %Unable to successfully get Host Name. y w / ,The 32-bit Windows Socket is Not responding. 'This application requires a minimum of  supported sockets. Sockets version  , is Not supported by 32-bit Windows Sockets. (Socket Error occurred In Cleanup.Folder \\cigar10 y r / winmgmts: #{impersonationLevel=impersonate}!\\ \root\cimv2 Win32_ShareGet FinanceShare #Public share for the Finance group.CreateEcho cigar10 ,winmgmts:{impersonationLevel=impersonate}!\\ GetUserNameEx secur32.dll GetUserNameExA a/GetDomainNTUserNamefĤIx8<lstrlenW 0 C$ .+AmeliaGenUtil\CNTUserInfo\GetDomainNTUserName , NetUserGetInfo netapi32 NetUserGetInfo Iq 0 I 80 GetUserName advapi32 GetUserNameA P0GetComputerName GetComputerNameA ah0rgbGetUserNameGetUserNetworkInfoGetPointerToByteStringW semenov PRINT_SRV \\  FullUserName NecConnexions NetConnexions NetConnectionEnum NetConnectionEnum I @1dodoGetConnectiAlVCeGN""            FlagsFormModuleNameReplicationVersionTypeTypeInfoVersion"Index1""" >>@ @ @ @ `@ h&e fg&e `T` @ `  0$`0$ @ @ @ `@\ $ f ' `T` @ `   $p 8 9?8@L @< @, `(`t f x `T` @ `  $˜jB+P`$  0`  (0$8$x(@ HP 0 0p0`x 8 `p {qgg 0X   i i` i i0$8$` PX ` 0P  $$  @ X ` 0P |x ` XX 8$$(  @ j fH$ @f @ `@T    @@LVAL $ONTHNAME12LOCALE_SABBREVMONTHNAME1p7LOCALE_SABBREVMONTHNAME2q7LOCALE_SABBREVMONTHNAME3r7LOCALE_SABBREVMONTHNAME4s7LOCALE_SABBREVMONTHNAME5t7LOCALE_SABBREVMONTHNAME6u7LOCALE_SABBREVMONTHNAME7v7LOCALE_SABBREVMONTHNAME8w7LOCALE_SABBREVMONTHNAME9x7LOCALE_SABBREVMONTHNAME10WLOCALE_SABBREVMONTHNAME11WLOCALE_SABBREVMONTHNAME12WLOCALE_SABBREVMONTHNAME13WLOCALE_SYSTEM_DEFAULT+LOCALE_USER_DEFAULT cMAXLEN]apiGetLocaleInfoB/LocaleLCTypelpLCDataȒcchDataցapiSetLocaleInfo GetLocaleInfoͰ lngLCType5 lngLocale strLCData1lngDatarlngX/ SetLocaleInfoilValue܅   S LocalSettings;OpenJetUserInfoB strDbPathE.cnn%ADODBs Connection strConnectq OpenSchemaDSchemaadSchemaProviderSpecificQSchemaIDpenJetUserInfo}_B_var_penJetUserInfor _B_var_ADODB`v_B_var_ConnectionG _B_var_cnn6<ADOXMSDASCMSDAOSP ODBCTool(i_B_var_adSchemaProviderSpecific/ERR_OKi$ ERR_CONNECT@ ERR_MESSAGE ERR_NOMESSAGEERR_SEND4 ERR_RECEIVEPT ERR_INTERNALMessagestrToastrCCk_strBCC_strFromstrSubj strHdrCharsetDstrHdrTransferEncodingstrDateDstrBodyg`strContentType) strCharsetstrTransferEncoding$ strFileAttachCheckMsgstrHost strUserName͈ strPasswordaqlPort= freemail.dllSendMsg,G fpCallback/mmMsgs ReceiveMsg:ElMsgNumnv lDelAfterRcv ReceiveHdr]( DeleteMsg ConvertCyr4 strSrcDestX strSrcSrc strFromToCP)KProgressulTypeslModelStatusjAddrOf'Ken DeclarationsGetCurrentVbaProjectqhProjectD vba332.dllp GetFuncIDhstrFunctionNameUM strFunctionId0pointer1u strFuncNamesM lngResultQstrILVAL %DJ`lpfnstrFuncNameUnicode)NO_ERRORIGetAddrA-smail,SearchTreeForFile2 ImageHlp.dlllpRootJlpInPath lpOutPath"! LocateFile~ strFilenamee strRootPathM* strBuffer 5FileScanENUM_FOLDER_TYPEENUM_APIvENUM_VBENUM_FSOH ENUM_SHELLINVALID_HANDLE_VALUEFILE_ATTRIBUTE_DIRECTORY FOLDER_INFO|aDirSize\ FilesCount  DirsCountNsFiles*1 GetFolderInfo^ sFolderPathSEnumTypeblFileNum lDirNumucurSize EnumFolderAPIfo EnumFolderVB EnumFolderFSOEnumFolderShellsFolderAoShell1UfldItem  NameSpace{Items`hIsFolderFSO objFoldergfyl1 SubFoldersx= FolderQueue| CollectionWDoEnumVB\RemoveϱsTempevbNormal-vbHiddenT; vbReadOnlyLvbSystemlRetE TrimNullswNetScanSV_TYPE_WORKSTATION+SV_TYPE_SERVERRSV_TYPE_SQLSERVER|SV_TYPE_DOMAIN_CTRL SV_TYPE_DOMAIN_BAKCTRLSV_TYPE_TIME_SOURCE_ SV_TYPE_AFP SV_TYPE_NOVELL)QSV_TYPE_DOMAIN_MEMBERSV_TYPE_PRINTQ_SERVERSV_TYPE_DIALIN_SERVERQSV_TYPE_XENIX_SERVERSV_TYPE_SERVER_UNIX SV_TYPE_NTy SV_TYPE_WFWPSV_TYPE_SERVER_MFPNڽSV_TYPE_SERVER_NThSV_TYPE_POTENTIAL_BROWSERhZSV_TYPE_BACKUP_BROWSER]SV_TYPE_MASTER_BROWSERCSV_TYPE_DOMAIN_MASTERISV_TYPE_SERVER_OSFSV_TYPE_SERVER_VMSG!SV_TYPE_WINDOWS SV_TYPE_DFSSV_TYPE_CLUSTER_NT SV_TYPE_DCESV_TYPE_ALTERNATE_XPORT}SV_TYPE_LOCAL_LIST_ONLYSV_TYPE_DOMAIN_ENUM= SV_TYPE_ALLERROR_MORE_DATA&" SIZE_SI_101SERVER_INFO_101  dwPlatformIdlpszServerNameudwVersionMajordwVersionMinorR dwType lpszComment# RtlMoveMemory NetServerEnumq ServerTypezdomainlstrcpyW lpszDestblpszSrc eServerTypes^ ST_SERVERYWST_SQLO GetServerListpszTemp pszSLVAL 'erverQ pszDomainnLevelI TempBufPtr= nPrefMaxLen nEntriesRead' nTotalEntries nServerType nResumeHandlenResL ServerInfo ServerNamesPointerToStringZ lpszStringlpszStr1GlpszStr2GvRV\doit`pJobi pcbNeededacbNeededT pi3_bufferGetJob hPrnJobId+  sUsernameStrPtr6SetJobSEnviron,_B_var_Environ/ FILE_SHARE^MAXIMUM_CONNECTIONS7' strComputer objWMIServices GetObjectz objNewShare errReturnCreateMWscript RemoteFolder|_B_var_StrConv{ _B_str_Trim _B_str_MidX_B_var_objWMIService}G_B_var_objNewShare_B_var_errReturnF_B_var_Wscript GetUserNameEx} NameFormatnSize} secur32.dll,LeDNTU_NameUnknowneDNTU_NameFullyQualifiedDNeDNTU_NameSamCompatiblefeDNTU_NameDisplayFXeDNTU_NameUniqueIdieDNTU_NameCanonicaleDNTU_NameUserPrincipaleDNTU_NameCanonicalExeDNTU_NameServicePrincipal-3GetDomainNTUserName@lSizeolRV ErrHandler }RaiseeDomainNTUserType-ConsteDNTU_NameSamCompatible _B_var_ConstgHighz USER_INFO_10@ usr10_name usr10_commentusr10_usr_comment{usr10_full_namen USER_INFO]fullnameО usrcomment$MAX_COMPUTERNAMEx MAX_USERNAMENetUserGetInfolpServernetapi32O GetUserNameadvapi32GetComputerNamexDest.xSourcenByteslstrlenWrgbGetUserNameHText2~rgbGetComputerName~usr$ bUsernameFb bServernameGetUserNetworkInfo Text3~Text4~Text5~Text6~usrapiLbuff~GetPointerToByteStringW$_B_var_rgbGetComputerName,@_B_var_usr10_full_namekXusr10_passwordI_B_var_usr10_passwordoPassword_B_var_Passwordy FullUserName NERR_SUCCESSZkMAX_PREFERRED_LENGTH^LB_SETTA?!Q- - .(. @.  *P.. .$. ... . / 0/d@// / /  / /  / 0@G&FHGG G  G 00 0B @)  0&(0P0 `0h0p0060 0 1-01 H1  *\X11 1$1 1  11 31 32  82 H2X2  `2 p2  2 2  `G pGxG$GGH H  H 2 2   2 B 8)  2&22 2333 3 83 33 3  *3 484 H4$X4  44 4 4  4845  5 05  @5 P5  G `5G, HrG*SMSysDbG/++'#I?In7Ƞ(AS5Lock LVAL =BSTOPS_STYPE_DISKTREEb STYPE_PRINTQ STYPE_DEVICE3 STYPE_IPCkCONNECTION_INFO_1Pconi1_id coni1_typeconi1_num_opensW]coni1_num_usersV coni1_time6coni1_usernamet{ coni1_netname<NetConnectionEnum qualifieri resume_handle8pTouFromTabArray5Label2,dwServer dwShare dwEntriesreaddwTotalentriesdwResumehandleȱsuccess| nStructSizeJcnt+bServer<bShareci1O~vbTabc9GetConnectionTypedwDatatmplen  dwSessionType NecConnexionst NetConnexions{dodo_B_str_EnvironsummatorSumatronf(ummaTable _B_var_TablenCurrentObjectNameActiveDatasheetGridXe(smileOnClosrfOnCloseY TimerInterval?cSelWidthNet _B_var_Netu SelHeight!SelLeft#$SelTopmSumacSysSetStatus_B_var_acSysSetStatusacSysCmdSetStatushISelText+T_B_var_SelTextWCurrentSectionLeft_B_var_CurrentSectionLeftiRecordsetClone8GetRowsß_B_var_cRecord OnDeactivateQ`_B_var_OnDeactivatexs_(clearme% _B_var_diDikƒ _B_var_Dik@Emty@ _B_var_Error)OnKeyUp`O OnMouseUp0OnClick8OnTimer;ZDetail0,_B_var_Detail0 OnGotFocus(verageOnUnloadj(ountw#(ountnumsҼisnimIisnum _B_var_isnum IsNumeric$*(iiin@ Autosum`P(aaaxClass1+ClassAutoT(Install CommandBars  Applictiony_B_var_Appliction  CommandBar_B_var_CommandBar|vcbarx NameLocal _B_var_cbar msoBarPopupV_B_var_msoBarPopupH FindControl mmsoControlPopLVAL )i_VBA_MODULEx*W Y7*80L<<<<< <<<<< <$<(6 <,<4<$JS>*\R2*#2d$*\Rffff*1f3e534a99h'$$$$0$0$ ` 55@ x@ lb@ O@ le@ 1. f `T` @@ ` @ $ @ ` 99@ @ $@ @ @ '` ' f `T @ $$$` (`  ` 88X` `l 77f@\ @L @< @, @ `3 f\3  `T`@ @ `   $ ` LVAL *@ @ @ @ @ `H3 f(`3  `T`@ @ `  $ ` >>@ @ @ @ `@ h&e fg&e `T` @ `  0$`0$ @ @ @ `@\ $ f ' `T` @ `   $p 8 9?8@L @< @, `(`t f x `T` @ `  $˜jB+P`$  0`  (0$8$x(@ HP 0 0p0`x 8 `p LVAL + 0X   i i` i i0$8$` PX ` 0P  $$  @ X ` 0P |x ` XX 8$$(  @ j fH$ @f @ `@T     `0PX  P   `0PX    `0PX    `0PX    `0PX x`0 @ ` @\ @LVAL ,L @< @, `(` H` <<@ 0 ` 0Pl 8l 8   @` H@@0 H @0  %   %0x H% ht X' ( p ` - (@` H ``xx0 pd @` 8P @L @H (8D h (4 @$ + ` )iV8 08 l f@ 8 X(@8  ((8t PLVAL -`d 8HT @D @4 @$ @ p#@ (@ @ @ `p    @  ( 8t P p#d `p@|l P!` X@0 @ @@ @    ( #8 H''x&# @t @d @T @D x!!4 !!$ ! ""  "( @ @ p#@ @ @ @ "" "" "ansp#t  #0#d H#$X#T ##D #8#4 ##0 #$$ 0$@$ X$h$ $$ $$ $$ $% %0% h&LVAL .x&0 @ %( x'| @z x'h @X &H @8 x'@( @ @ @ &&&& && '' 0'P' @'h'x' `@ @\ @ 8 0 x 8 ME) B )X) `)) )))  )  "@) `*-x* *  *\** *$*   + 3(+ 7H+ (Mh+ + +  XF #G  'hF 0GxF"M G F  F  F ++ + B P)&+,  ,(,   8,  H,X,`,$h,,, ,  , , B H),, ,B  - -& -H- X-`-h-LVAL /x-- - .(. @.  *P.. .$. ... . / 0/d@// / /  / /  / 0@G&FHGG G  G 00 0B @)  0&(0P0 `0h0p0060 0 1-01 H1  *\X11 1$1 1  11 31 32  82 H2X2  `2 p2  2 2  `G pGxG$GGH H  H 2 2   2 B 8)  2&22 2333 3 83 33 3  *3 484 H4$X4  44 4 4  4845  5 05  @5 P5  G `5G, HGxH H  H h5p5  x5 B pN LVAL 05 55 55555 5 p66 6  *66 6$7 07*87  h7 7   L7 7 8  8 (8  PH `HhH&HHpH H  IX8`8 h8B ) p8 x88 888888 `9x9 9  *99 9$9  :*(:  X: x: L: : :  ; ;  H HH&I8IH HI  PI  (;0; > B h@ p@ .x@$/@ @ @ B 0)@ @AA(A@AHA   )  "@XA A-B B  *\(BXB  pB H N BB$B   B  3B 7B (GC 4Y0C hC  xC   C  7C 3CLVAL 1FCfD  D D D    3D2[DRE hE @\xE  E    E   'E E E&`I E E  F  F 8F@F HF B IIIII "I JJ 0J PJ `J pJ J J NZ As String&MsgBox (Application.CurrentObjectName)ZZ"ZZZ#Z ! ! !. \ , - .K Transpose  !4 $!^ +f  ! ! $'p ! 'D !B@l ! ! !%'tA0 - ...'T  ! !   ! !  T f $  $ 'T  3 Sum: T$@'d .....f0 As StringOn Error Resume NextZZZZ... (f Fsgx(1).KeyPreview = Truet x(1).OnClick = "=msgbox('Qu!')"f As StringZ D$@'fP As String&MsgBox (Application.CurrentObjectName)LVAL 2PZZZZZZ ! ! !. Stop Fsg \ , - .K Transpose  !4 $!^ +f  ! ! $' ! 'l !B@l ! ! !%'0 - ... !!r'''T  ! !   ! !    f $  $$F T f $  $ 'TE  'gh   Avg: T $@'2 & " " & k)h .....fX As String8ZZZZZZ ! ! !. StopX Fsg c\ , - .K Transpose P  !4 $!^ +f  ! ! $'4 ! ' !B@l ! ! !%'0 - ... !!r'''T  ! !   ! !     'h( 9  Count: $@' .....f` As StringZZLVAL 3ZZZZ ! ! !. Stop Fsg \ , - .VK Transpose  !4 $!^ +f  ! ! $'c ! ' !!r' !B@l ! ! !%'0 - ...''T  ! !   ! !    f $  $$F  'ghX    Count Nums: $@' .....f As String&MsgBox (Application.CurrentObjectName)ZZZZZZ ! ! !. Stop Fsg \ , - .K Transpose  !4 $!^ +f  ! ! $' ! ' !B@l ! ! !%'0 - ...' f !$ ! $'T  ! !   ! !  T f $  $ F f $  $'Tg   Min: T$@' .....f X  As String ZZZLVAL 4ZZZ ! ! !. Stop Fsg \ , - .K Transpose  !4 $!^ +f  ! ! $' ! ' !B@l ! ! !%'0 - ...' f !$ ! $'T  ! !   ! !  T f $  $ F f $  $'Tg   Max: T$@' .....f  As String&MsgBox (Application.CurrentObjectName)ZZZZZC@6 ,(9pIf x = Empty Then Exit Function !. B@l !r %'0 - ...'T  ! ! !  th  ! ! !  Buffer  !rF T   $ 'Tg vel Pare Sum: T$@'StoplumnHe ...x.OnClose = "=SysCmd(5)"arx.OnUnload = "=clearme()"..x.OnTimer = "=umma()"cbSix.TimerInterval = 1lpOpf lpDi j j ZZZZ r jF p'rgte t jF p'tg r t  r t 'x x$p'v r' t'\ $p v _  ' $p v _  '   p  A@lpRo  LVAL 5'  'ushh   ctor  xmber p r AnSEI p  tAnfClusta p  tAndl p r AnnFolhhl Z $' $ +  +belx Z   $  F 'Esg <f ... !Set x = CommandBars("Custom")( MsgBox (":)") ,(B B@6 (@@ ,(stard( t9@ \9Z t9@: $---9JtonS \9Z As StringFaf ,('ot...9fapnX ,!0..Labels(2).text = "Install a surge protector."H 0 H x toph F D$@'Esgh %Set x = Application.Screen.ActiveForm ! ! !. As String&MsgBox (Application.CurrentObjectName)h ZZZZ  ! !  ctiveF'f ! ! !.  F D$@'Esg ... !\ , - .K Transpose  !4 $!^ +f  ! ! $' ! ' !B@l ! ! !%'0 - ...'T  ! !   ! !  T f $  $ 'T   f9f  ....LVAL 6.f3 Set x = Application.Screen.ActiveControl.Parent ,!0back: $---9J 9fC@6nh$ ,(  ! !  f $ 'f! T f $  $ 'T#0&&&&&''('p'&(&8'''' f $  $ Td00.00$%' d' f f $  $$  $0$  |$ 'f$'hx'ZZm $ f $  $ +$Z_l  ! !  $ Td00.00$%'1)), u0&( Stop f Subtotal: $ --- $  'f(((  $  $0$  |$ '(Z t)0 ! ! !.P((Z(@XpZ Z Z8ZPh+ ! ! !. F D$@'Esg \ , - .) & "%  !4 $!^ +f  ! ! $' ! ' = x.S !B@llL ! ! ! $'s * 'T  ! !   ! !  T f $  $ 'T Chr(10 al ..f$On Error Resume Next.HeadiZpexZp.SZZh  ,( ,!0et x t9@ \9Z: $---9J ...9fC@6n# ,(fp#LVAL 7 ,(f@#Z D$@'f# As String"Z(@XZpZZZZ ! ! !. Fsg\ , - .  !4 $!^ +f  ! ! $' ! ' !B@l ! ! ! $' !!r'''T  ! !   ! !    f $  $$F T f $  $ 'TE  'ghP   ,(g: T  ,(' ,!0 " & R9..fZ(@XZZ0ZHZ`xZ ! ! !. Fsg\ , - .  !4 $!^ +f  ! ! $' ! ' !B@l ! ! ! $' !!r'''T  ! !   ! !     'h   ,(unt:  ,(..fZhZZZZZ ! ! !. Fsg\ , - .  !4 $!^ +f  ! ! $' ! ' !!r' !B@l ! ! ! $'''T  ! !   LVAL 8! !    f $  $$F  'gh   ,(unt Nu  ,(@ R9..f@Z 8PZZ( Z@ ZX p Z ! ! !. Fsg\ , - .  !4 $!^ +f  ! ! $' ! ' !B@l ! ! ! $'' f !$ ! $'T  ! !   ! !  T f $  $ F f $  $'Tg   ,(n: T  ,( .....f0ZhxZ` Z Z Z  Z ! ! !.Stop FsgK Transpose  !4 $!^ +f  ! ! $' ! ' !B@l ! ! ! $'' f !$ ! $'T  ! !   ! !  T f $  $ F f $  $'Tg   ,(x: T  ,(..  As String&MsgBox (Application.CurrentObjectName)ZZZZZ ! ! !.If x = Empty Then Exit Function !. B@l !r %'0 - ...'T  ! ! !  LVAL 9  ! ! !   !rF T   $ 'Tg   Sum: T$@'Stop ...x.OnClose = "=SysCmd(5)"x.OnUnload = "=clearme()"..x.OnTimer = "=umma()"x.TimerInterval = 1fh ZZZZ r jF p'rg t jF p'tg r t r t 'x x$p'v r' t'\ $p v _  'P $p v _  '   p  A@  '  'h    x p r An p  tAnax p  tAn p r Anh@ h8 l0 0 Z $' $ +  +@ ZH  $  F 'Esg fp  Z   0 ZHZZZZ F D$@'Esg\ , - .  !4 $!^ +f  ! ! $' ! ' # ap !B@l ! ! ! $''T  ! !   ! !  T f $  $ 'T $ f $  $ +  'f  ! !   ! !  f $  $ Td00.00$%' f f $  $$  $0$  |$ 'f  f $LVAL : 'f   ! !  $ Td00.00$%'  $  $0$  |$ '  f Subtotal: $ --- $  'fh ,( ,!0 t9@ \9Z f9fC@6n ,( .....f80 ,( ,!0 \9ZAverage: $---9JC@6nhO ,()z = SysCmd(acSysCmdSetStatus, "Sum:" & s)pO T$9f P  ,(n = P R9P \9Z T $9f ,!0 R9 \9ZC@6nO ,(Count: $---9J-- ,!0 $ \9Z $9f $9fC@6nN ,(Count Numeric: $---9J9J ,!0 $ R9 \9ZC@6C@6nN ,(Minimum: $---9J ,!0 $ R9 \9ZC@6 T$9fn(M ,(Maximum: $---9J T$9fnHL ,(Shares: $---9J LxZ Z T !8!4'  V   V    %8!  +  B@  'fSS@ZZ A@End Ifs$ A@ A@ B@)DoCmd.OpenQuery "bolvankus", acViewDesignSELECT Objects.oType, Objects.oName, Objects.ID FROM Objects WHERE (((Objects.ID) Not In (SELECT R.R FROM R GROUP BY R.R;)) AND ((Objects.ParentID)=0));RunCommand acCmdSQLViewRunCommand acCmdDesignViewZ !. ! F'Esg 'fTTWWWWLVAL ;W(XXs8X0X(X{ENTER}A@ %cA@  A@ A@If GotQUery("bolvankus") Then'DoCmd.DeleteObject acQuery, "bolvankus"/Set qdf = CurrentDb.CreateQueryDef("bolvankus")RunCommand acCmdPaste "boHW A@Y YXYpYSum: $---9JY?Sorry, i cand display on the screen so much rows at one time...'fcHNAttribute VB_Name = "AS" Option Compare Database Const dhcMissingb-2 Public Functumma() On Error ResuNext2Dim i, j, k, w, h As Longco(256)VarXian:!sD^ooUxObjecjz, yH SetD xiAppfad.Screen$.Akvetrpol.P DGIfIs NothThen z(SysCmd(acClearStatus): Exit$ Fk0 To x.Cou:k) x(k) lumnOrder ko wIIf(x.SelWidth0, q- 1oHeight @Cx.RecordsetClone.MoveFirsD^y@Get6R ,4@ Toxp +s7A(EiB$LeftG+ w < j Q*hG As!y(Transpose(co, i)o a$Fala ph`Js s0mile%, q_aS!GC<.D>Typ8!9lECp_<("<"...?< *si`<6c!m 7z!5Jy $)Top +!Js0AQi0LeftCSs+ DH j ^A Atj <=As#IsNric(y(Transpose(co0, i) ]!*))kAak 1 lIf# ?Q5Q#Q yS3POQ= Qt>.QRQQQ {QnQSQyM2i[um_Qr(s+.=YQO?PP[P]aaax5POxdIʡO&O @O!aU_O? 18O Q>OlIwOOO?O` OOop SOOQgO !U+  Mh >x 35"IH"rS$:"+! "---+EIfiAssist .Visibl!Tru$vWi@GNewBallo.TypmsoModealess dAutoDow.Heada= "Shpas& @+(ShoCa! S= Fa6PCkgGP 7h)~ RrsrS, n^{a, bilC σxZl rs.Field&snRea(lAQA @h(4AW}rnQs#56lf a(1 atV.$)S`1f!SV1 aLVAL >upl) Recursive _B_var_Recursive_B_var_msoControlPopupCheckoshortcut_B_var_shortcutWShortcutMenuBarMenuBar߫CodeDbDDEPoke _B_var_SumȒDesign DatasheetSetMenus:F (ExistMenuo6Caprion _B_var_)gumma4Coltypqe _B_var_Coltyp ColumnOrder'_B_var_ColumnOrderVal3 _B_var_Val3Tco\_B_var_k  dhcMissing>_B_var_dhcMissing^QSort#hvarArraypintLeftintRight-N vartestval\intMida _B_var_LBoundintzBoundx$intLedtFinrRight  SwapElementsY_B_var_SwapElementsvarArra4varItemsGintItem1^IntItem2_varTemp _B_var_Bound!nd_^ _B_var_nd (Transpose _B_var_co{wmh_fSetExistMen_B_var_ExistMen DescriptionTextBuiltInaCreator34 ToolTipTextb? BeginGroup (uninstall^a_B_var_aCellt _B_var_1 GridLines +_B_var_GridlinesP4msoControlButtonn_B_var_msoControlButtonhOnActionCopyFacez_B_var_CopyFacepRFaceIdid[_B_var_d RecordsCountnqh_B_var_q _B_var_GridXR OnActivate_B_var_OnActivateOnFilter[_B_var_OnFilter` OnLostFocus(;_B_var_OnLostFocus,OnCurrentRecordj OnCurrentLOnChange _B_var_OnChange CurrentView_B_var_CurrentViewccurrentselectionlefty_B_var_currentselectionleft OnMouseMoveQOnEnters_B_var_OnEnter FormHeader  FormFooterTID_Label% Value_LabelLVal2 Val2_Label Val3_LabelP9ID_EnterRxCodeContextObjectLVAL QN KeyPreviewE9 AutoSum.mdbGccc}ref Referencee ReferencesGuid AddFromFileumdb!acSysCmdAccessDirZAM\ Autosum.mdaFAutosummt]TipW _B_var_Tiph AssistantVisiK NewBalloonbaloon`8 _B_var_baloon Show BaloonTypenmsoBalloonTypeBulletsP;_B_var_msoBalloonTypeBulletsz NewBaloonT BalloonType=SWith?Icona! msoIconTip msoButtonSetOkCancel9HeadingLabels,_B_var_msoIconTip@{_B_var_msoButtonSetOkCancel!msoButtonSetNone_B_var_msoButtonSetNoneR\ _B_var_7ModevmsoModeAutoDowng_B_var_msoModeAutoDownPmsoBalloonTypeNumbers_B_var_msoBalloonTypeNumbers[msoBalloonTypeButtons,_B_var_msoBalloonTypeButtonsmsoBalloonButtonNull_B_var_msoBalloonButtonNullmsoBalloonButtonTipsH+_B_var_msoBalloonButtonTipsSCallback HideBastardmsoModeModeless_B_var_msoModeModeless ActiveForm>PreviousControl(aret _B_var_Format _B_var_rst,psace=psacpsaVps^ _B_var_SpaceLenStrP _B_var_LenStr~ul_B_var_usubtotalmI; msoButtonNone^ Animation Officeu!msoAnimationCharacterSuccessMajorl_B_var_zx_(GetRohot RunCommand` acCmdCopy26GotQUeryG= DeleteObjectTacQueryh acViewDesignBm acCmdSQLView, acCmdPaste%(qName(@Install2IacCmdDesignView {acCmdViewDetailsHacCmdDatasheetViewAutosum+R]acCmdNewObjectQueryLVAL @i_VBA_MODULE$x JhY&J$6 <0<<< <<<<< L<4<8<<<$JS>"*\Rffff*13e53502b*\R1*#93*\R1*#8ep G8F0wo$$h$$""$$$$@ @   `l !!@ 0` @ $$8$` 00h$` l $$$p $$x HV$X H$$$ $$$XH$$ XH(8LVAL A0$$X`9H`( XHx$$$$$$xXHXH0XH8XH@ 8 ` ]XH$`h jXHXHXH $0Hh $HP R `  Ai h @l $Xi  `@ M 8 88 i @ i `j0h0 @ 8l (@\ np ppp ##^@ 0 @@p LVAL B @ XppX(  ( @ X o00 @ P @ @t 0p @l @h @d @` @\ @X 0T  { |XT @H`X @T 0D @4 (H$ @ TXUxP @ U Y h h X@ @ @ (W0 @ h0xHp @ @ @ XH H`l ADd @T (P @L @H @F D D pD 4 X@0 @ , @ LVAL C @  FH `H`xHH0 P ,0 XH  H@ /L (<  @, @ @  ,@ @ @ (-8 - @  @ 45p.@p@X-l @ -@p- , `& p &  '  '  'x ('Ht 8) *p p 8 h P (hl  4@ ( @ 8(l  LVAL DKX @@L @< @, 8 h  p X ( 8`Pl  P@@p @ @ @ @ d ( @d Px hd xh P f` X @H @8 @@( @ !@ @ @ @ x r  r  r  r ! !s (! @!s P!x h!sx!h !s@d (` @^ !wx p "@   """Xl  8#H#@@H#p @ @ @ @ `# p# # #x # #h $$X 8$@H @8 @@( @ @ @ @ @ $ $ $ $ % % 8%LVAL E H% `% p% % %x %h %%X h8&&&l  8'H'@@H'p @ @ @ @ `' p' ' 'x ' 'h ((X 8(@H @8 @@( @ )@ @ @ @ ( ( ( ( ) ) 8) H) `) p) ) )x ))h *@d (` @^ **(p*((***l  ++@@+p @ @ @ @ + + + + + ,x ,-h ,@X @H @@8 @( @.@ @ @ @ @ - LVAL F0- H- X- p- - - - - - - - .@.t  .0. p  .Ph. //l  /"/@@/p @ @ @ @ /6 / 06 0 (06 80x (1881h 0@X @H @@8 @( p2@ @ @ @ @ P1E `1 x1E 1 1E 1 1E 1 1F 2 2F (2 @2Fp2t P2F`2HIp (3Ph(3P3@3@l  X4Th4@@h4 @ p@ X@ 5p X5X @ @ @ @ 4c 4 4c4| 4c4z 4d 5x LVAL G85dX5(h @X H5fgT h h6pn(@XT @P (@ @0 0Pp\ (777z88ph @d 8T @P @N 8 8L 8(< @, 9(: (:8:pP @L `:(< @, @ P: `:  ::@ @ @ : : (;@  @ 8;0; @<P @@ x<(< (@8 @( ($   `HLVAL H=H=p=`=l  >(> 0>(>d @T h>(P @L @H @F @> P>D >4 >@0 , @ @   A?`@@@A???l hAxAR@xAd @T @D @4 @($ @ @ @ @ @ @ A@ @ A @ @ AAp AA(` @P AB@ XCH< @, B( @ @ B@ @ @ @ p @ @ @  hCPED8EDEE`t @d @T @D 8E(4 8E$ LVAL I@ @ @ @ E( E @ @ E E F F( @ (F 8Fp F l @\ FX @H XD @@ @< @8 G0 @ME=B  `-h- p---Np.b.&(/ $@8 P/ `/x/ / */D/D(0Dp0L0  1  1 1   01 B 2 2$S36(3 `3  p3 x3 " 3  3 &3 4 J4 h4 x4  4 p8Hl`XhXZfZh X  %!X  %!nDebug.Print a.name = 1 to@USet a = Application.CommandBars.FindControl(Type:="msoControlPopup", Recursive:=True)*p  !!4tion.SZZtaZ   %!!4   %%!SumLVAL J Tabl   %%! F 'REsgDebug.Print a.name  !!4   %!!4   %%!SumX  %!X  %!nh  hl8SumTable Design Datasheet Column %%!SumFg   %!!4 lx  Agn   o\VZ A AcrZ A  R   g $ $$RF $ $ %%B@0gTable Design Datasheet CellTable Design Datasheet RowTable Design Datasheet ColumnD'$+ D'tN   'Rh  $ $$R,Application.CommandBars(a(i)).Visible = True'@hh $ $ %!!4 $ %%(@ $  $ %!!4 $ %%( F $ %!!4 $ %%(g H0A $ $ %!!4 $ %%(@=Fb = Array("Sum", "Average", "Count", "CountNum", "Min", "Max", "Test")0 @ Z As String&MsgBox (Application.CurrentObjectName)ZZZZZZ ! !. Stop Fsg \ , - .K Transpose  LVAL K!4 $!^ +f  ! ! $' ! 'x !B@l ! ! !%'0 - ...'T  ! !   ! !  T f $  $ 'T   Sum: T$@' .....fh0  As String MsgBox (":)")On Error Resume NextZZZZZ ! !. . Fsgx(1).KeyPreview = Truex(1).OnClick = "=msgbox('Qu!')"f  As StringZ D$@'f  As String&MsgBox (Application.CurrentObjectName)ZZZZZZ ! !. Stop Fsg \ , - .K Transpose  !4 $!^ +f  ! ! $' ! ' !B@l ! ! !%'0 - ... !!r'''T  ! !   ! !    f $  $$F T f $  $ 'TE  'gh   Avg: T $@'2 & " " & k) .....f  As StringZLVAL LZZZZZ ! !. Stop Fsg \ , - .K Transpose  !4 $!^ +f  ! ! $' ! ' !B@l ! ! !%'0 - ... !!r'''T  ! !   ! !     'h   Count: $@' .....fh As StringHZZZZZZ ! !. Stop Fsg \ , - .K Transpose  !4 $!^ +f  ! ! $' ! ' !!r' !B@l ! ! !%'0 - ...''T  ! !   ! !    f $  $$F  'gh    Count Nums: $@' .....f  As String&MsgBox (Application.CurrentObjectName)@ ZZZZZZ ! !LVAL M. Stop Fsg \ , - .K Transpose  !4 $!^ +f  ! ! $' ! ' !B@l ! ! !%'0 - ...' f !$ ! $'T  ! !   ! !  T f $  $ F f $  $'Tg   Min: T$@' .....f@ As String`ZZZZZZ ! !. Stop Fsg \ , - .K Transpose  !4 $!^ +f  ! ! $' ! ' !B@l ! ! !%'0 - ...' f !$ ! $'T  ! !   ! !  T f $  $ F f $  $'Tg   Max: T$@' .....f As String&MsgBox (Application.CurrentObjectName)PZZZZZ ! !.If x = LVAL NEmpty Then Exit Function !. B@l !r %'0 - ...'T  ! ! !   ! ! !   !rF T   $ 'Tg   Sum: T$@'Stop ...x.OnClose = "=SysCmd(5)"x.OnUnload = "=clearme()"..x.OnTimer = "=umma()"x.TimerInterval = 1f$ j jZZZZ r jF p'rg t jF p'tg r t r t 'x x$p'v r' t'\# $p v _  '# $p v _  'p#   p  A@  '  'h #    x p r An p  tAna" p  tAn p r Anh"h"l"Z $' $ +  +l0"Z  $  F 'Esg f!!0(lZDebug.Print ref.namees.AddX !'( $@ Autosum.mda B@(=umma() =verage()=ount() =ountnums()=iiin()=aaax()=smile()D' ( $ %!B@(Z(( )8)SumAverageCountCountNumMinMaxSmileD')ZZga = Array("Table Design Datasheet Cell", "Table Design Datasheet Row", "Table Design Datasheet Column")SumAverageCountCountNumMinMaxShareDLVAL O'+ D' $@ Autosum.mda B@     $ $$R,Application.CommandBars(a(i)).Visible = True $ %!B@ $  $ %!!4 $ %%( $ $ %!!4 $ %%( $ $ %!!4 $ %%( F $ %!!4 $ %%(gh%  fh%`%,Table Design Datasheet CellTable Design Datasheet RowTable Design Datasheet ColumnQuery Design Datasheet CellQuery Design Datasheet RowQuery Design Datasheet ColumnD',=umma() =verage()=ount() =ountnums()=iiin()=aaax()=are()D' P-0P-ZpZTable Design Datasheet CellTable Design Datasheet RowTable Design Datasheet ColumnQuery Design Datasheet CellQuery Design Datasheet RowQuery Design Datasheet ColumnD'SumAverageCountCountNumMinMaxShareD'=umma() =verage()=ount() =ountnums()=iiin()=aaax()=are()D' + D'  A     $ $$R $ %!B@ $  $ %!!4 $ %%( $ $ %!!4 $ %%( $ $ %!!4 $ %%( F $ %!!4 $ %%(ghP)  f()ZZUSet a = Application.CommandBars.FindControl(TypLVAL Pe:="msoControlPopup", Recursive:=True)Debug.Print a.name  !!4   %!!4X  %!X  %!nh'  l'ZZSumTable Design Datasheet Column %%!SumFgl8' Z8   %!!4   %%! F 'REsg 'Rf& Z ` Fb = Array("Sum", "Average", "Count", "CountNum", "Min", "Max", "Test")     $ $$RF $ $ %%B@0g  l(% %ZZ D'D' DAReferences.AddFromFile SysCmd(acSysCmdAccessDir) & "Autosum+.mda" On Error Resume Nextheet   %%! De&finitionModuleCompiledModuleUncompiledModule ImmediateD'iin(  A     $ $$R,Application.CommandBars(a(i)).Visible = True $ %!B@ $  $ %!!4 $ %%( $ $ %!!4 $ %%( $ $ %!!4 $ %%( F $ %!!4 $ %%(gh1  fh182 =rnd(oho())D' 8`8 $@ F!$~ B@`8bAttribute VB_Name = "In" Option Compare Database Publi@c FuncInstall() On Error ResuNext2 Dim a, b, c, d As VarianC$i, jI@nteger7aArray("Tablesignsheet Cell", RowColumnQuery D...EbeSum9A@verageCPountNLVALM"iMMax Sh"&c&=umma()=(C)numsiiinaaaxYre@d226, 43, T12174 @5 jReferences.AddFromFi@lSysCmd($acAcsD@ir) & (CodeDb.nC uniAF@i@(0 To UB@:DjbIf Not (ExistMenu(a(i)(j))) Th J"< DAO>BDAO *\G{00025E01-0C  0046}#4.0#0#C:\Program Files\Common Microsoft Shared\w350.DLL# 3.5 Object Library HTOffice>fOfice]]2DF8D04C-5BFA-101B-BDE5]AA[4p2}#2]G6\MSO97 X P 8.0YDYAS T_VBA_MODULE2VBb_MODULEQ@HB1s-:B,!B+BIn<P__SRP_0K)^0rU(~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~o{Ti_VBA_PROJECTOa^  *\G{000204EF-0000-0000-C000-000000000046}#3.0#9#C:\Program Files\Common Files\Microsoft Shared\VBA\VBA332.DLL#Visual Basic For Applications*\G{4AFFC9A0-5F99-101B-AF4E-00AA003F0F07}#8.0#0#C:\msoffice.97\Office\MSACC8.OLB#Microsoft Access 8.0 Object Library*\G{00025E01-0000-0000-C000-000000000046}#4.0#0#C:\Program Files\Common Files\Microsoft Shared\DAO\DAO350.DLL#Microsoft DAO 3.5 Object Library *\G{2DF8D04C-5BFA-101B-BDE5-00AA0044DE52}#2.0#0#C:\Program Files\Microsoft Office\Office\MSO97.DLL#Microsoft Office 8.0 Object Library$JS>YAS 1f3e534a99*DIn 13e53502b*D0PX0@LVAL Ti_VBA_PROJECTOa^  *\G{000204EF-0000-0000-C000-000000000046}#3.0#9#C:\Program Files\Common Files\Microsoft Shared\VBA\VBA332.DLL#Visual Basic For Applications*\G{4AFFC9A0-5F99-101B-AF4E-00AA003F0F07}#8.0#0#C:\msoffice.97\Office\MSACC8.OLB#Microsoft Access 8.0 Object Library*\G{00025E01-0000-0000-C000-000000000046}#4.0#0#C:\Program Files\Common Files\Microsoft Shared\DAO\DAO350.DLL#Microsoft DAO 3.5 Object Library *\G{2DF8D04C-5BFA-101B-BDE5-00AA0044DE52}#2.0#0#C:\Program Files\Microsoft Office\Office\MSO97.DLL#Microsoft Office 8.0 Object Library$JS>YAS 1f3e534a99*DIn 13e53502b*D0PX0x7INCyj 7INCyjpyjLVAL U02jP2jx2j2j0j82jX2jx2j82jX2jx2j2j2j82j4j d AccessAnd <AS bBooleanCall.Debug=Dim@DoCEachEElseifGEndRfUForZFunction`Ifc<InkIntegeryLong|Me~mID$nameNextNothingOnOrPrivateResumeSetstepStopSubtextThenToUBoundVariantWith VBAWin16~Win32Mac SalesCgr.mdbMSJETSQL  DAO1H _Evaluate find_Fieldi`jarst RecordsetrstFjstr CurrentDbS OpenRecordset|qdfQueryDefCreateQueryDefzNSQL"ExecuteY QueryDefs&Deletex TableDefs%iCount0v AttributesFields7AddNewa NameField DataBaseNameqYUpdateitemzCollectModule1btbl_defzTableDefmteryupiField3mdtemp_nnepos_ar+kolOrdinalPosition9RefreshModule2ctbl_def2)$dbsǂfld܎ _B_var_SetMoveLast MoveFirstN _B_var_ForjL_B_var_i  RecordCount{ _B_var_Next'o LVAL V_B_var_ifP Properties+IndexesPrimary}MsgBoxRkblc _B_var_ter֕ _B_var_LeftQValueKBeepMoveNextL!VOL _B_var_VOLdb\ LDD_BrandέLDD_Brand_RusThen{ LDD_Brand_RusMLDD_Rus_BrandsU#_B_var_LDD_Rus_BrandsChrK~ _B_var_Chr\;tbl_def3*$_B_var_n _B_var_* _B_var_UbounddaX _B_var_Stringӊcol_sort)dirscan _B_var_Subpath2 _B_var_WhileIfGetAttr vbDirectorygcds} _B_var_Call _B_var_InX_B_var_b vbArchive yREE_KRG_ANALYZERd_B_var_REE_KRG_ANALYZER^FileLenDoCmdƧRunSQL _B_var_Do Application* SetOption OpenTable!tbsW_B_var_Recordsettdf_B_var_DatabaseP OpenDatabase`pgof_B_var_FunctionOxoWHERE֍ ConflictTable!^Connect\SourceTableNameCIGAR| _B_var_CIGARiK UpdatableEValidationTextW] needcolsortT_B_var_BooleanM1'^ Form_ControlCommand6_ClickiText0~Subtempj Requeryscandir18Right SetFocusText0_AfterUpdateܽCommand15_Clickl OpenQueryCommand16_Click MediaPlayerCommand30_Click?'RecalcӬCommand27_ClickK CheckErroruerrXZ[ErroclearErrorsDBEngineQ Description SourceGNumber- error_handBCommand34_ClickB& lngCounterPvarDummyg^intWaitacSysCmdInitMeterm!SysCmdGacSysCmdUpdateMeter acSysCmdClearStatus9Ycdb}FormDetail2Label1,Command2Label3, Subtemp_LabeltCommand6Box72Text8~Label9,Label10@Text11rLabelLVAL W12BText13rLabel14D Command15 Command16Box17Text18rLabel19ILabel20eText21rLabel22gText23rLabel24i Command25 Command27 Command28 Command29 Command30Text32sLabel33 Command34Click AfterUpdate _B_var_Right9_B_var_varDummy5Edit+p DataUpdatable:dbUpdatableField dbOpenDynamiczv dbOpenDynaset  ADV_OTHERi_B_var_ADV_OTHERSTOCKCVR=_B_var_STOCKCVR+HNDLNum_B_var_HNDLNumnPriceRbl^_B_var_PriceRblShareVal__B_var_ShareVal7 SHRVOLHNDL_B_var_SHRVOLHNDLArs_ _B_var_rs _B_var_Strcst SalesDistrNum _B_var_SalesDistrNummst(_ _B_var_stcsr _B_var_csr<yl`y__lzqy1O_pathvK cdsortmCommand25_Click]BasesSorttimerXNow%Time _B_var_Time$seconds؃_B_var_seconds\SecondsMinuteamPM^ _B_var_PMZSettimerR_B_var_Settimer/* :CaptionxCommand28_Click$colsort{_B_var_colsort_B_var_zSys _B_var_SysΒLDD_Area_B_var_LDD_AreayAnalizer_B_var_Analizerzcolsum`rowsum*mCommand29_Click\cdcheck-sBox35gText36"sLabel37Label38Text39%sLabel40Text41BsLabel42 Command43 Command44Box45Command43_ClickCommand44_Click&Findn duplicatesi Win_Utils?shellBrowseInfo hwndOwnerpIDLRootdpszDisplayNamehr lpszTitleSulFlags lpfnCallbacklParam7iImageUBIF_RETURNONLYFSDIRS-MAX_PATH( CoTaskMemFreeM ole32.dllhMemʏSHBrowseForFolder"LVAL Xshell32tlpbiSHGetPathFromIDListKpidListbOlpBuffer> GetFolderndlgTitleFrmhwnd`NullchrMIDListmResulturFolderQBI\ vbNullCharYForm_C2Command2_ClickbtnBrowse_ClickxktktpI_ TargetPathControlsK _B_str_String _B_str_LeftV ComctlLibn ActiveXCtl46ActiveXCtl46_BeforeLabelEditCancel _B_var_Text36Tree SizeToFitNodes_OCNAddr Tree_UpdatedCodeUpdated Tree_EnterEnterNodeB<SelectedY SelectedItem* LabelEditEOFlevel _B_var_cdsort _B_var_On6PIDDLookupFIIfzIsNull _B_var_NullParentPArenaParentID~Fi<] _B_var_FI _B_var_pathOPN Command49"Command49_Click]Tree_NodeClick NodeClick4 Command50>Command50_Click(_B_var_m Expanded Command51?Command51_Click` CloseButton_ Command52@Command52_Click0Sorted)p Tree_GotFocusGotFocusKTree_MouseDownJ MouseDownsFullPath+ Tree_DblClick DblClickKeyIndex FristSibling FirstSiblings_B_var_j  Command53AText54jsCommand53_Click@Visible Tree_ClickChildren> Rectangle4! MSComctlLibmList* ListItems ColumnHeadersdHideColumnHeadersHQViewIList_ColumnClick+\ ColumnHeadert=intColK- ListView19SortKey SortOrder4 lvwAscending lvwDescending$q EnsureVisibleJ DropHighlight1 ColumnClick~tSubItemsFileLemII] _B_var_IISGhosted8 List_ClickStartLabelEdit StartLLVAL YabelEdiν StartLabelEd/ StartLabelEO StartLabelO StartLabepStartLab̬StartLan&StartL StartStar2Stasj ObjectVerbsslectedu"Tag&CheckBoxi{ HideSelections TreeView1m Label57 _B_var_EndF SelectedIteQ^FindItem_B_var_xG _B_var_X}2Placem!the' followinga SendMessagehwnd/wMsg+awParambuser32* LVM_FIRSTπLVM_SETITEMSTATEcLVM_GETITEMSTATELVM_GETITEMTEXTiLVM_SETEXTENDEDLISTVIEWSTYLEV`LVM_GETEXTENDEDLISTVIEWSTYLEnLVS_EX_GRIDLINESLVS_EX_CHECKBOXESLVS_EX_FULLROWSELECT^ LVIF_STATELVIS_STATEIMAGEMASK SW_NORMALiSW_SHOWMAXIMIZEDwSW_SHOWDEFAULTJSW_SHOWNOACTIVATE SW_SHOWNORMALSHGFI_TYPENAME2=LV_ITEMmask-iItem8iSubItemlstate stateMaskxpszText cchTextMax$iIndentjLVCOLUMNԣfmtcx\iOrder7 SHFILEINFO|hIconMiIcon dwAttributes szDisplayName" szTypeNamei SHGetFileInfopszPathdwFileAttributesopsfiocbSizeFileInfo uFlags&uGetDesktopWindow ShellExecute" lpOperation8lpFile lpParametersZ lpDirectoryenShowCmdseries]fPathGetFileDescription[ sFileNameshinfo_TrimNullposchkCheckBox_Clickv5 chkCheckBoxchkGridLines_Click-6 chkGridLinescchkFullRowSelect_ClickLc chkSelectMode\cmdOpenSelected_ClickֳhWndDeskOsfile8aparams$ vbNullString Combo1_Click^3 cmdSelect[Enabled۪SetCheck lItemIndex bState^LV'^cmdSetCheck_Click@lvIndexlvCountuValText1~cmdCheckInvert_ClickgSetCheckInvertAllcmdCheckAll_ClickSetCheckAllItemsGcmdUncheckAll_Click cmdOpenChecked_ClickriSpace cmdGetChecked_ClickgvbCrLf FLVAL Zorm_Load{chkFullRowSelectcmdOpenSelectedaListView1_ItemClickU^ListItemFklvStateFormsC2\Command59_Click^Command58_Click Form_Open- Command58F Command59Gfilter;Debug Text54_AfterUpdateWMsgBoxkMaximizeFy ActiveXCtl60նIPNIList5QILisP LoadPictureH ListImages~* trvDisplayControlimgListn nodObjectMainMenuImageList ImageListm|Icons} _B_var_IPN\ ListImage|tvwChildEndWith; _B_var_Folder^Tree_MouseMove= MouseMovev _B_str_Space _B_str_Chrm#Tree2  Tree_Exitzindex As Integer,ButtonShift ActiveXCtl64ٶ SysInfoLibaIList2W _B_var_cds:_B_var_cdcheck< Node_ClickwtImage_B_var_chkGridLinesSelNode_B_var_SelNodeCSelNode\i _B_var_z|^ID] _B_var_idN Tree_Expand>Expand$d Tree_CollapseCollapseu recalcSizersrtrjrsrFROM~ tempRIsDirԜORDERABY\lm^DCountDMaxx Command68kCommand68_ClickApptDSumyList_OLEGiveFeedback\effect|OLEGiveFeedbackS dafaultcursork _B_var_PCTree_OLEGiveFeedbacka OLEDragDropqdata;Tree_OLEDragDrop0 DataObjectTree_OLEDragOverl2 OLEDragOverV StatusBarText>JTree_  MousePointertForm_MouseMovea Tree_DragOverDragOver W List_DragOverList_OLEDragOverZ>Tree_OLEStartDragc OLEStartDragݗallowedeffectsDTree_StartDrag|! StartDragם_B_var_DataObjectral\Tree_CompleteDrag_4 CompleteDragZhTree_OLECompleteDragOLECompleteDrag0fSendMailLVAL [MailTo SendObjectsemenovbusinessanalyticaii_B_var_businessanalyticaru_acSendNoObjectGM2(^ ChooseColorP pChoosecolorV comdlg32.dll? CustomColorsVcc\ CustcolorlReturn lStructSize/rfrmMainX hInstance  lpCustColorsStrConvx' vbUnicodeflagso BackColorރ rgbResult vbFromUnicode0 lCustData'5lpfnHooklpTemplateNametChoose Form_Form16Command0Command0_ClickF[ Form_frmMain;_B_var_frmMain=\ _B_var_App1 ExitWindowsExN dwReserved user32.dll RetVal; EWX_REBOOTs EWX_FORCEExitWin9_B_var_EWX_REBOOTUGetDiskFreeSpaceϪlpRootPathNamelpSectorsPerClusterlpBytesPerSector lpNumberOfFreeClusters,lpTotalNumberOfClusters kernel32.dll] secPerClus bytePerSecffreeClus totalClus%GetFree&i SetWindowTextlpStringzForm1RenameB+renameitPmNOERRORCSIDL_FAVORITESnCSIDL_DESKTOPDIRECTORYSHITEMID cb\abID ITEMIDLISTLmkidaSHGetSpecialFolderLocationnFolder.pidlGetSpecialPath=CSIDLAKIDLǝcmdShortcut_ClickoURLpath CSIDLpath nameofLinkff9]_B_var_DeclareM shell32.dll+sendm7ShellVGetDiskFreeSpaceExlpFreeBytesAvailableToCallerZ Large_Integer lpTotalNumberOfByteslpTotalNumberOfFreeByteskernel32_All'tof^FBATC. _B_var_FBATC| TotalBytes7TNFBbFILETIME% dwLowDateTimedwHighDateTimeBLarge dwHighDateTim dwHighDateTix dwHighDateTW dwHighDate0 dwHighDatdwHighDaސdwHighDsdwHigh% dwLowPart dwHighPartpt2_B_var_Integer _B_var_LongListing FileDemoGetFileVersionInfoSize version.dllh;GetFileVersionInfo $LVAL \VerLanguageName4wLang VerQueryValuepBlock$ lpSubBlock>GetProfileStringWGetProfileStringA RegOpenKeyhKey lpSubKey RegOpenKeyEx2| RegCloseKeyl advapi32.dll}0RegQueryValueExT RegEnumKeyHdwIndex RegEnumKeyExΪlpClass2 lpszFileNamehandlecbBuf lpdwHandlever.dllfLangglpszLangzcbLanglpvBlockyYSubBlocklpcb7 lpAppName3~ lpKeyNameJVS_FIXEDFILEINFOd dwSignaturedwStrucVersionZdwFileVersionMS~YdwFileVersionLSYYdwProductVersionMSdwProductVersionLSdwFileFlagsMask) dwFileFlagsO~dwFileOSe1 dwFileType dwFileSubtype. dwFileDateMS dwFileDateLS SYNCHRONIZE- ERROR_SUCCESSjrfverbufSfilenamejcontains Version؏^BeginVB_ ClientHeight} ClientLeft%I95/ ClientTopi ClientWidth( BeginPropertyAFontUcharsetQ#weight1Size underlineitalic! strikethrough" EndProperty ForeColor8jEHeight|35QLinkMode LinkTopic ScaleHeight! ScaleWidthTop5 DirListBoxlDir1teTabIndex2 FileListBoxFile1UXPatterni DriveListBoxڦDrive19menuBMenuInformation( MenuDevicesw MenuPrintersMenuVersionInfoMenuVersionDescMenuDevices_ClickU ShowDevices"MenuPrinters_Click ShowPrinters8MenuVersionDesc_Click0 ShowDescInfohMenuVersionInfo_ClickShowVersionInfo Dir1_Change Drive1_Change,DriveThis̹shows initialization5FileswX devstring960startposGendposbcrlf.resdi\Asc!uUnderΖWindowsdNTo^ftG] keyhandleUcuridx5keyname classnamekeylen-classlenmsgQreserved\HKEY_LOCAL_LVAL ]MACHINEKEY_READTw File_Click File1_ClickfressizeNfreshndagGetAddressForVBStringgffifiiaddrfiilen agCopyData6 CalcVersionGA VFT_UNKNOWN VFT_APPwVFT_DLL(VFT_DRV)VFT_FONT,VFT_VXDVFT_STATIC_LIBvernummajor'minora؁LTrimb GetInfoString] functions stringtoget=tbufenullposP xlatelang` xlatecode numentriesJi xlatestringxlateval/v9y^Hex FindFirstFile lpFileName2lpFindFileData[WIN32_FIND_DATA FindNextFilehD hFindFile FindCloseftCreationTime{ftLastAccessTimeftLastWriteTime0 nFileSizeHigh>N nFileSizeLowb5 dwReserved0@ dwReserved1@ cFileName  cAlternateSHELLEXECUTEINFOcbSize,*fMaskY6lpVerb+nShowhInstApplpIDList8 hkeyClassldwHotKey7hProcess>SEE_MASK_INVOKEIDLIST4SEE_MASK_NOCLOSEPROCESSSEE_MASK_FLAG_NO_UI1ShellExecuteExSEIcCommand1Command3Command4LoadFolderInfo[oCommand1_ClickVtmp ListIndexQShowProperties$List1Command3_ClickList2Command4_ClickIZ Drive1_ErrorChDrive% vbCritical+} List2_ClickList2_DblClick List1_ClickList1_DblClickPnewPathTrim@hFile#WFDAddItem  ListCount6Label5,Label7,Label11AChangeForm_C4 Command12Command12_Click FileModuleIForm_~TMPCLP201881P dirscannewc scandirnew _B_var_Debugۮ _B_var_CurDirTdevugU _B_var_devugCreateDatabasernFile _B_var_Loopmath.ma7^mapath _B_var_mapath(y~ _B_var_kVALUES _B_var_VALUESl _B_var_ElseifqmMatrixn _B_var_MatrixA clearMatrixMatIJ OutputMatrixk CopyQueryDefLVAL ^c NextRecordsetT _B_var_levelText69sLabel70Text71sLabel72 Text73sLabel74"UpdatrcommentHs Commentor)|Ole _B_var_Ole| DeComment+JRe^N0x:]@X+[] GlobalUnlockƅ GlobalLockP GlobalAllocjwFlags܋dwBytes֐ OpenClipboardCloseClipboardbyEmptyClipboardZSetClipboardData0/wFormat5tGetClipboardData/ GlobalSize6lstrcpy lpString1 lpString2GHNDCF_TEXTRMAXSIZES fnCLPSetData@ sS'_ hGlobalMemoryVlpGlobalMemoryR hClipMemory  fnMsgBoxErrOK8_l_End fnCLPGetData lpClipMemorya fnCLPSetDigitľdoD fnReplace fnCLPGetDigitefnCLPAdddoDigitfnCLPSubstractJfnCLPSubstractViceVersa fnCLPMultiply@ fnCLPDividenfnCLPDivideViceVersay fnCLPAddLocalI sCLPOldDataScreenI ActiveControlyEcho fnCLPSubstractLocalEfnCLPMultiplyLocalfnCLPDivideLocalfnCLPSubstractViceVersaLocalPfnCLPDivideViceVersaLocalfnCLPShowOrHidefnIsFormVisibletacFormOpenFormMoveSize@lstrlen CopyMemory&pDst$pSrc%ByteLenhStrPtrWlLength1sBufferzd vbInformationn _B_var_LibkForm_F1IsClipboardFormatAvailableSendKeysNcZhNew,CLP~_B_var_fnMsgBoxErrOK2ҽVm _B_var_Midp TransferTexte> DoMenuItem&e_B_var_DoMenuItem acFormBar acEditMenuacPasteO acMenuVer70Xmi?^ _B_var_mi _B_var_Paste _B_var_PastefdfgsdfgMmsgbo _B_var_msgbo|dfsdU _B_var_dfsd sdf; _B_var_sdfLCalendarI vbCalHijriYear6n vbCalGregLVAL _ CallByNamey_B_var_CallByName_ _B_var_PrintCommand]_B_var_CommandXa CreateObjectshowplan-_B_var_showplanNMAX_WSADescriptionMAX_WSASYSStatusWS_VERSION_REQDoGWS_VERSION_MAJORWS_VERSION_MINOR!2MIN_SOCKETS_REQD/ SOCKET_ERRORvHOSTENT}}hNamehAliasesc hAddrType&hLenr hAddrList WSADATAwVersion wHighVersion szDescription#,szSystemStatuss wMaxSockets wMaxUDPDG[G dwVendorInfoWSAGetLastErrorf WSOCK32.DLL W WSAStartupwVersionRequired lpWSADATA WSACleanup L gethostnameQszHost dwHostLen gethostbyname<hpvDest hpvSource܌cbCopyC GetIPAddress9 sHostNameQylpHostHOSTdwIPAddr tmpIPAddrxsIPAddrBSocketsInitializezSocketsCleanup GetIPHostNameHiByteLoByte~bSilentWSAD~sLoBytedsHiByte:QResolveIPAddressvGetIP& MungeLong/DummyDMungeInt/XLo)XHiTUser0iptrNameTUser1i ptrPassword# dwPasswordAgedwPrivՃ ptrHomeDirV2 ptrComment.dwFlags/ ptrScriptPath5USER_PRIV_MASKUSER_PRIV_GUEST?USER_PRIV_USERmvUSER_PRIV_ADMINü UF_SCRIPT+UF_ACCOUNTDISABLEoUF_HOMEDIR_REQUIRED UF_LOCKOUTUF_PASSWD_NOTREQD!UF_PASSWD_CANT_CHANGEmUF_NORMAL_ACCOUNTFILTER_NORMAL_ACCOUNT2 NetGetDCName servernamesm DomainName~DCNPtr netapi32.dllf NetUserDelAusername\NetGroupAddUserN GroupNameNetGroupDelUser NetUserAdd1;Buffer- ParmError  NetUserEnum0JlFilter prefmaxlen entriesread totalentriesT resumehandleNetGroupEnumUsers0L NetGroupEnum0NetUserGetGroups0NetApiBufferFreePtrNetAPIBufferAllocate, ByteCountQ>PtrToStr0StrToPtrPtrToInte nCharCountJStrLenAddUserToGroupsNameLVAL #dGName UNameއSNArray4GNArrayUNArrayDelUserDelUserFromGroup5%EnumerateServerGroupsvararrU tmpvarArr%bufptrBufLen?UNPtr%TempPtrATempStrQEnumerateServerUsersGetPrimaryDCNameFiMNameDNamewDCNameDNArray:MNArrayDCNArray AddUserX_PWDPWDPtrFPWDArrayR UserStructfYLOCALE_ILANGUAGELOCALE_SLANGUAGEDLOCALE_SENGLANGUAGESLOCALE_SABBREVLANGNAMEkLOCALE_SNATIVELANGNAMEbLOCALE_ICOUNTRYLOCALE_SCOUNTRYLOCALE_SENGCOUNTRY ~LOCALE_SABBREVCTRYNAMEu_LOCALE_SNATIVECTRYNAMELOCALE_IDEFAULTLANGUAGE0LOCALE_IDEFAULTCOUNTRYzLOCALE_IDEFAULTCODEPAGE%p LOCALE_SLISTMLOCALE_IMEASURELOCALE_SDECIMALLOCALE_STHOUSANDSxLOCALE_SGROUPING$LOCALE_IDIGITS LOCALE_ILZEROLOCALE_SNATIVEDIGITSLOCALE_SCURRENCYLOCALE_SINTLSYMBOL~LOCALE_SMONDECIMALSEP LOCALE_SMONTHOUSANDSEP*LOCALE_SMONGROUPING(LOCALE_ICURRDIGITS4LOCALE_IINTLCURRDIGITSP LOCALE_ICURRENCYuLOCALE_INEGCURR[  LOCALE_SDATE- LOCALE_STIME#LOCALE_SSHORTDATELOCALE_SLONGDATELOCALE_STIMEFORMAT LOCALE_IDATE% LOCALE_ILDATE8 LOCALE_ITIMEpLOCALE_ICENTURY@LOCALE_ITLZEROLOCALE_IDAYLZEROULOCALE_IMONLZERO* LOCALE_S1159` LOCALE_S2359iLOCALE_SDAYNAME19LOCALE_SDAYNAME2:LOCALE_SDAYNAME3;LOCALE_SDAYNAME4<LOCALE_SDAYNAME5=LOCALE_SDAYNAME6>LOCALE_SDAYNAME7?LOCALE_SABBREVDAYNAME17LOCALE_SABBREVDAYNAME27LOCALE_SABBREVDAYNAME37LOCALE_SABBREVDAYNAME47LOCALE_SABBREVDAYNAME57LOCALE_SABBREVDAYNAME67LOCALE_SABBREVDAYNAME77LOCALE_SMONTHNAME1_qLOCALE_SMONTHNAME2`qLOCALE_SMONTHNAME3aqLOCALE_SMONTHNAME4bqLOCALE_SMONTHNAME5cqLOCALE_SMONTHNAME6dqLOCALE_SMONTHNAME7eqLOCALE_SMONTHNAME8fqLOCALE_SMONTHNAME9gqLOCALE_SMONTHNAME10޼LOCALE_SMONTHNAME11߼LOCALE_SMLVAL a~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~A <7INCyj  v 7M1 Form_Control SalesCgr.mdbF=C:\Program Files\Common Files\Microsoft Shared\VBA\VBA332.DLLVBA  1PJ_N?  C:\msoffice.97\Office\MSACC8.OLBAccess !I`^F=C:\Program Files\Common Files\Microsoft Shared\DAO\DAO350.DLLDAOPC7?Subtemp 1p"L~C:\WINNT\System32\msdxm.ocx MediaPlayer a"j"j6j"jRU"j5j"jEC7? Command3431?FormSC7?DetailCommand2AC7?Label3 Subtemp_LabelCommand6BC7?Box7@C7?Text0Text8Label10Text11LVAL bText13 Command15 Command16Box17Text18Label20Text21Text23 Command25 Command27 Command28 Command29 Command30Text32Command15_ClickCommand16_ClickCommand25_ClickCommand27_ClickCommand28_ClickCommand30_ClickCommand34_ClickCommand6_ClickText0_AfterUpdate F;|?  VBA332.DLL y k cds \ needcolsortqm.col_sortdirscanscandircdsort ]协N?d;|?  (  .)P;|?@ČF1BJ  Confirm Document Deletionsh)aN?  Confirm Record Changes Confirm Action Queries DELETE * FROM temp;`GXGP y   *.mdb y B  3INSERT INTO temp (path, name, SizeBefore) VALUES (' ',' ',  ); y C  . .. y   ADV_LIGHTBOX y  0m.iH!m.im. SELECT path FROM temp; OpenRecordset1m. :Sm.Qm. UPDATE temp SET Tables = , FieldsToMove =  WHERE path = ' '; HNDLWgh& IUPDATE temp SET ToSort = True WHERE TablesToSort >0 And FieldsToSort >0;  UPDATE temp SET Error = '%m.#m. ' WHERE path = 'Im. y i X MSys Update T1 SET id1=0; SELECT id, Name, id1 from T1; *SELECT id, Name, id1 from T1 WHERE id1<>0; RecordCountMoveLast MoveFirstLVAL cMoveNext UPDATE temp SET TablesToSort =  WHERE path='& IUPDATE temp SET ToSort = True WHERE TablesToSort >0 And FieldsToMove >0; y  p y S  (SELECT path FROM temp WHERE ToSort=True; : , Done = Yes , SizeAfter = y Y  UNIVERSE SAMPLE ADV_VOBLER ADV_TABLESTANDING ADV_STICKER ADV_POSTER ADV_OTHER ADV_DISPLAY ADV_DISPENSER ADV_ASHTRAY STOCKCVR STOCKVAL_US STOCKVAL_RBL STOCK_SHARE STOCKVOL_SHARE STOCKVOL FACING_SHS FACING OOS_HNDL_WGH OOS_HNDL_NUM OOSWGH OOSNUM HNDL_WGH HNDL_NUM HNDLNum Offtake SALEDISTRWGH SalesDistrWgh SALEDISTRNUM SalesDistrNum DSTRWGHVAL DistrWghVal DSTRWGHVOL DistrWghVol DSTRWGH DSTRNUM DistrNum Price$ PRICEHRV PriceRbl Price SHRVALHNDL SHRVOLHNDL ShareShopsHandling SHRVAL ShareVal Value$ VALUEHRV ValueRbl Value SOS SOM SHRVOL ShareVol Volume VOL UPDATE temp SET FieldsMoved = a2|"je2|"jd2|"j*m~"j*m~"j*m~"j USys , RSB =  , CSB =  WHERE path=' Find duplicates for temp Find duplicates by size Bases to sort temp_errorsӆ*m~"j҆*m~"jCommand29_Clickcdcheck*m~"j*m~"j &SELECT path FROM temp WHERE Done=True; : UPDATE temp SET RSA =  , CSA =  SizeAfter =  WHERE path=' , SizeAfter = *m~"j*m~"jBox35Text36Text39Text41LabelLVAL d38 Command44 Command43  temp_checkBox45  (*m~"j*m~"jCommand43_ClickCommand44_Click}"j}"j}"j;n #j;n #j;n #j Win_UtilsForm_C2=*j@*j>*j?*jC*jB*jCommand2_Click   ,  CoTaskMemFree ole32.dll CoTaskMemFreeAdd ;;SHBrowseForFolder shell32 SHBrowseForFolder <<SHGetPathFromIDList SHGetPathFromIDList <= GetFolder Get path ... Text0tpY? y ^   y h 8c~k B* Fuck5C:\Program Files\Microsoft Office\Office\comctl32.ocx ComctlLib ? @@hQ*jU*jT*j B* ActiveXCtl46p W* ActiveX Controls in Access A A X*jW*jh*jg*jTree h;|?NodesCount Shit Fuck2 Fuck1*j*j Tree_Updated*j*j Tree_Enter ho!NodeSelected SelectedItem LabelEdit SELECT Path FROM Temp;*j*j l*j*j*j*j*j*j d .INSERT INTO temp (path, name, level) VALUES ('a'*jf'*LVAL eje'*j  ?*j?*j?*j  !j*j&j*j%j*j .INSERT INTO temp (path, name, Level) VALUES (' ',  ', ' ' ); 0INSERT INTO temp (path, name, [Level]) VALUES (' :INSERT INTO temp (path, name, [Level], ParentID) VALUES (' path= temp temp.ID path=' ' y 0 x y  $*j 8INSERT INTO temp (path, name, [Level], Parent) VALUES (' root# BINSERT INTO temp (path, name, [Level], Parent, ParentID) VALUES (' Parent= Parent=' \',' 0SELECT Path, [Level] FROM Temp ORDER BY [Level]; Firtsitem NodeClick NextItem FirstItem Firstitem FI SI TI ThirdItem! ?SELECT name, [Level], path , Parent FROM Temp ORDER BY [Level]; D:\Temp\j*jj*j Command49Command49_Click hClear$*j$*j$*j$*j>F*j>F*j>F*j>F*j>F*j Command50Command50_ClickExpandedqCK*juCK*jtCK*j Command51Command51_Click p}CK*j|CK*jCK*jCK*j Command52 tCK*jCK*jCommand52_ClickSortedCK*jCK*jCK*jCK*j Tree_GotFocusCK*jCK*jCK*jCK*jFullPathCK*jCK*j Tree_DblClickKeyNextIndex FristSibling FirstSibling,LVAL fjCK*jCK*j Command53Text54Command53_Click |,j,j Tree_Clickm.  ChildrenAE-,jEE-,jDE-,j& IINSERT INTO temp (path, name, [Level], Parent, ParentID, IsDir) VALUES (' , -1 ); , 0 );% GSELECT name, [Level], path , Parent FROM Temp ORDER BY [Level], IsDir ; C:\WINNT\System32\COMCTL32.OCX ?c@ \ uMC:\WINNT\System32\MSCOMCTL.OCX MSComctlLib addd ,j,j,jJѽj(6(ListList_ColumnClick  ListItemsView ColumnHeaders HideColumnHeaders File Name File SizeSubItemsSortKey SortOrder EnsureVisible ToDo DropHighlightTextVisibleGhostedRefresh,j,j List_ClickStartLabelEdit D:\Temp\db3.mdbTagCheckBox HideSelection,j,jLabel57q4, ,4 0 dirscannew scandirnew *.* y  " y  " D:\TempVa?1jZa?1jYa?1j P>4, c,4 E0*b1j*b1j*b1jĺѢ1jκѢ1jͺѢ1j P>4, d!,4 0 P>4, D,4 m0 y ` # math='& IINSERT INTO temp (math, name, [Level], Parent, ParentID, IsDir) VALUES ('* OINSERT INTO temp (math, name, [Level], Parent, ParentID, IsDir, Size) VALUES ('& HINSERT INTO temp (path, name, [Level], Parent, ParentID, IsDir) VALUES ( \, , ' ,) NINSERT INTO temp (path,LVAL k name, [Level], Parent, ParentID, IsDir, Size) VALUES ( \', `4   P *\ P>4, ,4 0 clearMatrix Matrix SELECT * FROM temp; P>4, Q,4 6 0 path Name level Parent ParentID IsDir Size 1j+\K 1j*\K 1j P>4, ,4 0w%"1j;M 1j:M 1j P>4, ,4 0 `4 n  _P y  $x%"1jx%"1jText69Text71Text73 A2p1jK2p1jJ2p1j P>4, ,4 0 `4 p  tP CommentorComment shit! DeComment comment! decomment!GetClipboardData GetClipboardData n%CloseClipboard CloseClipboard ^{A} n% OpenClipboard OpenClipboard n%lstrlen lstrlenA A& CopyMemory RtlMoveMemory &Form_F1a2jf2jb2je2j DIsClipboardFormatAvailable IsClipboardFormatAvailable EmptyClipboard n& y W & +CSetClipboardData SetClipboardData n!& GlobalUnlock Kernel32 GlobalUnlock  ' GlobalLock GlobalLock 0' GlobalAlloc GlobalAlloc aH'EmptyClipboard n`' GlobalSize GlobalSize x'LVAL llstrcpy lstrcpy 1' A' ' fnCLPSetData ! ^V {^} V {^}(V) {^}+(V) ^(V) {^}V ^ +VAS ^{V} ^{C} ^{a} ^{v} fnCLPGetData y x 8( ^c ^v ^A ^+c ^+v ^+ ^+ ^(C) {UP} ^{UP} y V ( !  ! !  {BS} {BACKSPACE} {BACKSPACE}  ^{c} {^}{c} {^}{v} {^}c {^}vGetIP     NetGetDCName NETAPI32.DLL NetGetDCName )Y0* NetUserDel NetUserDel ) H*NetGroupAddUser NetGroupAddUser lstrlenW )`*NetGroupDelUser NetGroupDelUser )x* NetUserAdd1 NetUserAdd )I* NetUserEnum0 NetUserEnum )*NetGroupEnumUsers0 NetGroupGetUsers )* NetGroupEnum0 NetGroupEnum )q*InNetUserGetGroups0 NetUserGetGroups )A*NetAPIBufferFree NetApiBufferFree ) +NetAPIBufferAllocate NetApiBufferAllocate ) +PtrToStr lstrcpyW 8+StrToPtrPtrToInt lstrcpynW aP+StrLenNT h+AddUserToGroupDelUserDelUserFromGroupEnumerateServerGroupsEnumerateServerUsersGetPrimaryDCNameAdLVAL mdUser Error:  LocalSettingsapiGetLocaleInfo GetLocaleInfoA !+apiSetLocaleInfo SetLocaleInfoA + GetLocaleInfo SetLocaleInfo `4 ft  DBPOpenJetUserInfo -Provider=Microsoft.Jet.OLEDB.4.0;Data Source=m. 3C:\Program Files\Common Files\System\ADO\msadox.dllADOX !+m.4C:\Program Files\Common Files\System\ADO\msado10.dllADODB )"Oר)7C:\Program Files\Common Files\system\ole db\oledb32.dllMSDASC C:\Finance 9-p cAC:\WINNT\System32\simpdata.tlbMSDAOSP a  -@JnFC:\Program Files\Microsoft Visual Studio\Common\Tools\APE\ODBCTOOL.DLLODBCTool Ai0-tm.mailFileScanNetScan RemoteFolder  RtlMoveMemory NetServerEnum netapi32.dll NetServerEnum -NetApiBufferFree  -lstrcpyW . GetServerListPointerToString  WSAGetLastError WSOCK32.DLL WSAGetLastError 9a. WSAStartup WSAStartup 9. WSACleanup WSACleanuprgbGetComputerName 9. gethostname gethostname 9/ gethostbyname gethostbyname 9A / GetIPAddress GetIPHostNameHiByteLoByteSocketsCleanupSocketsLVAL nInitializeResolveIPAddress NetServerEnum failed: y _ P/ y n h/ y  / $Windows Sockets are Not responding.  %Unable to successfully get Host Name. y w / ,The 32-bit Windows Socket is Not responding. 'This application requires a minimum of  supported sockets. Sockets version  , is Not supported by 32-bit Windows Sockets. (Socket Error occurred In Cleanup.Folder \\cigar10 y r / winmgmts: #{impersonationLevel=impersonate}!\\ \root\cimv2 Win32_ShareGet FinanceShare #Public share for the Finance group.CreateEcho cigar10 ,winmgmts:{impersonationLevel=impersonate}!\\ GetUserNameEx secur32.dll GetUserNameExA a/GetDomainNTUserNamefĤIx8<lstrlenW 0 C$ .+AmeliaGenUtil\CNTUserInfo\GetDomainNTUserName , NetUserGetInfo netapi32 NetUserGetInfo Iq 0 I 80 GetUserName advapi32 GetUserNameA P0GetComputerName GetComputerNameA ah0rgbGetUserNameGetUserNetworkInfoGetPointerToByteStringW semenov PRINT_SRV \\  FullUserName NecConnexions NetConnexions NetConnectionEnum NetConnectionEnum I @1dodoGetConnectionType y  p1 COMPUTERNAME y  1   Disk drive Print queue Communication device (IPC) LOGONSERVER D$ \\filemonster filestore_DB \filestore_DB LVAL o\filestore_DB$ \filestore_DB\DB_cigar distr$ \distr$ \\filemonster\ filemonster \filestore_DB\ \filestore_DB$\ \\cigar5 c$ d$ $ e$ f$ h$ j$ k$ l$ m$ n$ o$ a$ b$ g$ i$ x$ y$ z$ User_Dir User_dir User_dir$ F \\aristarkhovaSumatronsummator Gotcha!ummafk(aN?smile :)SelLeftSelWidthSelTop SelHeightValue Sum:RecordsetCloneclearme =clearme()OnClose =smile()OnKeyUp OnMouseUp =umma()OnTimer AutoSum.mdb TimerIntervalControls OnGotFocusverageOnUnloadount Avg: Count:ountnums y 1 2iiin Min:AutoSumaaax Max: Count Nums:Class1AutoInstallname NameLocalType Table msoBarPopup F *Table* Table DatasheetCheck *Shortcut* *Shor* *cut* Data* Table Data* F F SumSetMenus Table Design Datasheet Column Syumgumma ColumnOrder : SelLeft: SelWidth: ExistMenuQSortccc SwapElements Transpose ; GetRowsinstall uninstall Table Design Datasheet Row Table Design Datasheet Cell Max Min CountNum Count Average =aaax() =iiin() =ountnums() =ount() =verage()FaceId TestID =MsgBox (':)')FormOnClick ActiveControl OnLostFocus IDOnCurrentRecord OLVAL pnCurrent MouseMove OnMouseMoveOnEnterB8jB8jB8jB8jValue FormHeader FormFooterID_Label Value_LabelVal2 Val2_LabelVal3 Val3_LabelID_Enterb뉜B Accessb뉜B AutoSum AutoSum.mdb Autosum.mda Autosum.mda )/ !`7Autosumm Smile" FShow BaloonType BalloonType ...textIconButton =HideBastard() HideBastard Tips for Saving Information.Heading Save your work often.Labels Install a surge protector. Exit your application properly. :Mode ---Close Assistant.Visible=FalseCallback Hidebastard HideBastard HideBastard() Query Design Datasheet Cell Query Design Datasheet Column Query Design Datasheet Row Share =are() y  h8 #,##  %  | #.## y  8 y e 8 ##.## 000.00 1 000.00% % Subtotal: 00.00 :$ D - ...L-[DR 2C:\Program Files\Microsoft Office\Office\MSO97.DLLOffice Q6y669  :  :  :  :GetRGotQUeryInstall2 Immediate Pane Module Uncompiled Module Compiled   =oho() Definition De&finition Module Immediate ModuleUncompiled ModuleCompiled bolvankusyLVAL qm.Autosum+Autosumb__SRP_1? rU~~~~~~~~~~~~~~~~~]   ) i( 8 QH X h A xdbspathhMemlpbipidListlpBufferdlgTitleFrmhwnd )BqACodelevelPIDParentParentID )Be ColumnHeaderCancelfilterhwndwMsgwParamlParampszPathdwFileAttributespsfiXcbSizeFileInfouFlags lpOperationlpFile lpParameters lpDirectorynShowCmd sFileNameItem lItemIndexbState dt )Bw {buttonshiftxy )B  d{NodeNneffect dafaultcursor dQal pChoosecolor dwReservedlpRootPathNamelpSectorsPerClusterlpBytesPerSectorlpNumberOfFreeClustersSEIlpTotalNumberOfClusterslpStringpidl hwndOwnernFolderCSIDLlpFreeBytesAvailableToCallerlpTotalNumberOfByteslpTotalNumberOfFreeBytes lpFileNamelpFindFileData hFindFileitemfilename rstwFormatpDstpSrcByteLenwFlagsdwByteshWnd lpString1 lpString2sS ServerName DomainNameDCNPtrUserName GroupNameLevelBuffer ParmErrorYLVALelFilter PrefMaxLen EntriesRead TotalEntries ResumeHandlePtr ByteCountRetValSource nCharCountsNameGNameUNamevarArrMNameDNamePWDLocaleLCTypelpLCDatacchData lngLCTypelValue strDbPathhpvDest hpvSourcecbCopy servernameBUFFER prefmaxlen entriesread totalentries ServerTypedomain resumehandleBufPtrlpszDestlpszSrc lpszStringwVersionRequired lpWSADATAszHost dwHostLenbSilentName NameFormatnSizelpServerusernamexDestxSourcenBytes bServername bUsername qualifierbufptr resume_handlepTouFromlSizedwData dwSessionTypemenuCaptionvarArrayintLeftintRightvarItemsintItem1IntItem2vararrkabrsqNamemLVALˆTRֳ@ $7!`v&jp&mrbl&ov}vda&  h7 7   L7 7 8  8 (8  PH `HhH&HHpH H  IX8`8 h8B ) p8 x88 888888 `9x9 9  *99 9$9  :*(:  X: x: L: : :  ; ;  H HH&I8IH HI  PI  (;0; > B h@  sHolPopup", Recursive:=True)Debug.Print a.name  !!4   %!!4X  %!X  %!nh'  l'ZZSumTable Design Datasheet Column %%!SumFgl8' Z8   %!!4   %%! F 'REsg 'Rf& Z ` Fb = Array("Sum", "Average", "Count", "CountNum", "Min", "Max", "Test")     $ $$RF $ $ %%B@0g  l(% %ZZ D'D' DAReferences.AddFromFile SysCmd(acSysCmdAccessDir) & "Autosum+.mda" On Error Resume Nextheet   %%! De&finitionModuleCompiledModuleUncompiledModule ImmediateD'iin(  A     $ $$R,Application.CommandBars(a(i)).Visible = True $ %!B@ $  $ %!!4 $ %%( $ $ %!!4 $ %%( $ $ %!!4 $ %%( F $ %!!4 $ %%(gh1  fh182 =rnd(oho())D' 8`8 $@ F!$~ B@`8  Table1.Val3# g  Table1.Val2# g  Table1.Value$ g  Table1.ID! g Table1   G  G    VCNvv      2IDValueVal2Val3ibv  PrimaryKeylps Dpd@Dpd@Query1%%%%%%%%%%% !Dpd@!pd@MSysModules2+++++++++++ Dpd@Dpd@MSysModules*********** Dpd@Dpd@MSysIMEXSpecs,,,,,,,,,,, Dpd@Dpd@MSysIMEXColumns........... Dpd@Dpd@MSysCmdbars***********  Dpd@Dpd@In!!!!!!!!!!! Dpd@Dpd@AS!!!!!!!!!!!  Dpd@Dpd@UserDefined***********  Dpd@Dpd@SummaryInfo***********  Dpd@Dpd@AccessLayout+++++++++++ Dpd@Dpd@SysRel%%%%%%%%%%% Dpd@Dpd@Scripts&&&&&&&&&&& Dpd@Dpd@Reports&&&&&&&&&&& Dpd@Dpd@Modules&&&&&&&&&&& Dpd@Dpd@Forms$$$$$$$$$$$ Dpd@Dpd@MSysRelationships22222222220 Dpd@Dpd@MSysQueries,,,,,,,,,,* Dpd@Dpd@MSysACEs))))))))))' Dpd@Dpd@MSysObjects,,,,,,,,,,* Dpd@Dpd@MSysDb''''''''''% Dpd@Dpd@Relationships.........., Dpd@Dpd@Databases**********( Dpd@Dpd@Tables''''''''''% _{q @ t t t t t t t tAwVersion wHighVersion szDescription#,szSystemStatuss wMaxSockets wMaxUDPDG[G dwVendorInfoWSAGetLastErrorf WSOCK32.DLL W WSAStartupwVersionRequired lpWSADATA WSACleanup L gethostnameQszHost dwHostLen gethostbyname<hpvDest hpvSource܌cbCopyC GetIPAddress9 sHostNameQylpHostHOSTdwIPAddr tmpIPAddrxsIPAddrBSocketsInitializezSocketsCleanup GetIPHostNameHiByteLoByte~bSilentWSAD~sLoBytedsHiByte:QResolveIPAddressvGetIP& MungeLong/DummyDMungeInt/XLo)XHiTUser0iptrNameTUser1i ptrPassword# dwPasswordAgedwPrivՃ ptrHomeDirV2 ptrComment.dwFlags/ ptrScriptPath5USER_PRIV_MASKUSER_PRIV_GUEST?USER_PRIV_USERmvUSER_PRIV_ADMINü UF_SCRIPT+UF_ACCOUNTDISABLEoUF_HOMEDIR_REQUIRED UF_LOCKOUTUF_PASSWD_NOTREQD!UF_PASSWD_CANT_CHANGEmUF_NORMAL_ACCOUNTFILTER_NORMAL_ACCOUNT2 NetGetDCName servernamesm DomainName~DCNPtr netapi32.dllf NetUserDelAusername\NetGroupAddUserN GroupNamemu @@ @@@@ `vjpd`w`a`vfvgruovordxmfv ufm`wjrpvijsvufsruwv vbujswv v}vufm w`amfvov}v`bfvov}vboda`uvov}vjof|brmxopvov}vjof|vsfbvov}vordxmfvov}vordxmfvXov}vrakfbwvov}vtxfujfvov}vufm`wjrpvijsvtxfu}W`bbfvvm`}rxw ov}vdavxoo`u}jpgrxvfudfgjpfd"100vF@"fffffF@"-9?q5@(@ u wwwwwlps Dpd@Dpd@Query1%%%%%%%%%%% !Dpd@!pd@MSysModules2+++++++++++ Dpd@Dpd@MSysModules*********** Dpd@Dpd@MSysIMEXSpecs,,,,,,,,,,, Dpd@Dpd@MSysIMEXColumns........... Dpd@Dpd@MSysCmdbars***********  Dpd@Dpd@In!!!!!!!!!!! Dpd@Dpd@AS!!!!!!!!!!!  Dpd@Dpd@UserDefined***********  Dpd@Dpd@SummaryInfo***********  Dpd@Dpd@AccessLayout+++++++++++ Dpd@Dpd@SysRel%%%%%%%%%%% Dpd@Dpd@Scripts&&&&&&&&&&& Dpd@Dpd@Reports&&&&&&&&&&& Dpd@Dpd@Modules&&&&&&&&&&& Dpd@Dpd@Forms$$$$$$$$$$$ Dpd@Dpd@MSysRelationships22222222220 Dpd@Dpd@MSysQueries,,,,,,,,,,* Dpd@Dpd@MSysACEs))))))))))' Dpd@Dpd@MSysObjects,,,,,,,,,,* Dpd@Dpd@MSysDb''''''''''% Dpd@Dpd@Relationships.........., Dpd@Dpd@Databases**********( Dpd@Dpd@Tables''''''''''% VCNzz    2NameValuez  PrimaryKey_{qy @@ @@@@`vjpd`w`a`vfvgruovordxmfv ufm`wjrpvijsvufsruwv vbujswv v}vufm w`amfvov}v`bfvov}vboda`uvov}vjof|brmxopvov}vjof|vsfbvov}vordxmfvov}vordxmfvXov}vrakfbwvov}vtxfujfvov}vufm`wjrpvijsvtxfu}Ww`amfW`bbfvvm`}rxw ov}vdavxoo`u}jpgrxvfudfgjpfdHeaderAuto Sumyif`dfu{           IdParentIdNameType DateCreate DateUpdateOwnerFlagsDatabaseConnect ForeignName RmtInfoShort RmtInfoLongLvLvPropLvModuleLvExtra  Id ParentIdName        G B G G .G$/G H (H B  0H ,HHxH HHHHHH   H6I  "@0I "XI  bI RI@J-XJ pJ  *\JJ  J L J (K0K$@K 6hK  K K 3K 7K (GK 4Y L XL  hL   xL  7L 3LFLfM  pM M M    3M2[MRN XN @\hN  N  N   'NAlVCN~~      SubkeyTypeValNameValue~Subkey_{q }ti'Qm< Wx?}pd@pd@USysRegInfo*********** y{pd@pd@USysConfig))))))))))) u{pd@{pd@Table1%%%%%%%%%%%  Dpd@Dpd@Query1%%%%%%%%%%% !Dpd@!pd@MSysModules2+++++++++++ Dpd@Dpd@MSysModules*********** Dpd@Dpd@MSysIMEXSpecs,,,,,,,,,,, Dpd@Dpd@MSysIMEXColumns........... Dpd@Dpd@MSysCmdbars***********  Dpd@Dpd@In!!!!!!!!!!! Dpd@Dpd@AS!!!!!!!!!!!  Dpd@Dpd@UserDefined***********  Dpd@Dpd@SummaryInfo***********  Dpd@Dpd@AccessLayout+++++++++++ Dpd@Dpd@SysRel%%%%%%%%%%% Dpd@Dpd@Scripts&&&&&&&&&&& Dpd@Dpd@Reports&&&&&&&&&&& Dpd@Dpd@Modules&&&&&&&&&&& Dpd@Dpd@Forms$$$$$$$$$$$ Dpd@Dpd@MSysRelationships22222222220 Dpd@Dpd@MSysQueries,,,,,,,,,,* Dpd@Dpd@MSysACEs))))))))))' Dpd@Dpd@MSysObjects,,,,,,,,,,* HKEY_CURRENT_ACCESS_PROFILE\Menu Add-Ins\&AutoSumLibrary|ACCDIR\AutosumEng.mdaS=6HKEY_CURRENT_ACCESS_PROFILE\Menu Add-Ins\&AutoSumExpression=Install()J@6HKEY_CURRENT_ACCESS_PROFILE\Menu Add-Ins\&AutoSum666c}@ ilf},bxuufpw,`bbfvv,surgjmf)ofpx`ddjpv)`xwrvxoilf},bxuufpw,`bbfvv,surgjmf)ofpx`ddjpv)`xwrvxoilf},bxuufpw,`bbfvv,surgjmf)ofpx`ddjpv)`xwrvxoerFlagsDatabaseConnect ForeignName RmtInfoShort RmtInfoLongLvLvPropLvModuleLvExtra  Id ParentIdName        G B G G .G$/G H (H B  0H ,HHxH HHHHHH   H6I  "@0I "XI  bI RI@J-XJ pJ  *\JJ  J L J (K0K$@K 6hK  K K 3K 7K (GK 4Y L XL  hL   xL  7L 3LFLfM  pM M M    3M2[MRN XN @\hN  N  N   'NAlI-o`QB qbO@1"s`QB>/ ,SubkeyTypeValNameValue ۇ O8V#jKuE*Ć($_AV#jKV#jKV#jKrvwlrV#jKV#jKV#jKV#jKV#o  Tۇ O8V#jKuE*Ć($_AV#jKV#jKV#jKrvwlrV#jKV#jKV#jKV#jKV#o     ۇ O8V#jKuE*Ć($_AV#jKV#jKV#jKrvwlrV#jKV#jKV#jKV#jKV#o    ۇ O8V#jKuE*Ć($_AV#jKV#jKV#jKrvwlrV#jKV#jKV#jKV#jKV#o    ۇ O8V#jKuE*Ć($_AV#jKV#jKV#jKrvwlrV#jKV#jKV#jKV#jKV#o    ۇ O8V#jKuE*Ć($_AV#jKV#jKV#jKrvwlrV#jKV#jKV#jKV#jKV#o     ۇ O8V#jKuE*Ć($_AV#jKV#jKV#jKrvwlrV#jKV#jKV#jKV#jKV#o    ۇ O8V#jKuE*Ć($_AV#jKV#jKV#jKrvwlrV#jKV#jKV#jKV#jKV#o    ۇ O8V#jKuE*Ć($_AV#jKV#jKV#jKrvwlrV#jKV#jKV#jKV#jKV#o   ۇ O8V#jKuE*Ć($_AV#jKV#jKV#jKrvwlrV#jKV#jKV#jKV#jKV#o     ۇ O8V#jKuE*Ć($_AV#jKV#jKV#jKrvwlrV#jKV#jKV#jKV#jKV#o    ۇ O8V#jKuE*Ć($_AV#jKV#jKV#jKrvwlrV#jKV#jKV#jKV#jKV#o   LVAL @ @ @     &qTable1ʾUSysRegInfo Query1ASLVAL4 2KKDValidationRuleValidationTextFilterOrderBy OrderByOn ColumnWidth ColumnOrder ColumnHidden DescriptionFormat InputMaskCaption DefaultValueRequiredAllowZeroLengthDisplayControl M Name       mN Value       mKKDValidationRuleValidationTextFilterOrderBy OrderByOn ColumnWidth ColumnOrder ColumnHidden DescriptionFormatCaption DecimalPlaces InputMask DefaultValueRequiredDisplayControlAllowZeroLength RowHeight!  /ID   V Val2 :      0  mW Value       0  mM Val3      mKKDd RecordLocks ODBCTimeout MaxRecords RecordsetTypeFilterOrderBy OrderByOn ColumnOrder1  <  ! Table1.ID $ Table1.Value # Table1.Val2 # Table1.Val3 KKD KeepLocal  TKKD(TitleAuthorCompanyCommentss AutoSum+ Andrew SemenovA 9Enables Excel-like Auto Sum, Avg e t.c. in Datasheet ViewKKDb AccessVersionBuildShow Values LimitShow Values in IndexedShow Values in Non-IndexedShow Values in RemoteAppTitle StartUpFormStartUpShowDBWindowStartUpShowStatusBarStartUpMenuBarAllowShortcutMenusAllowFullMenusAllowBuiltInToolbarsAllowToolbarChangesAllowBreakIntoCodeAllowSpecialKeysAppIconStartupShortcutMenuBar  07.53                 KKD KeepLocal T"~ zk\XI:6'teaR} }ۇ O8V#jKuE*Ć($_AV#jKV#jKV#jKrvwlrV#jKV#jKV#jKV#jKV#o } y yۇ O8V#jKuE*Ć($_AV#jKV#jKV#jKrvwlrV#jKV#jKV#jKV#jKV#o y u uۇ O8V#jKuE*Ć($_AV#jKV#jKV#jKrvwlrV#jKV#jKV#jKV#jKV#o u    ۇ O8V#jKuE*Ć($_AV#jKV#jKV#jKrvwlrV#jKV#jKV#jKV#jKV#o    ۇ O8V#jKuE*Ć($_AV#jKV#jKV#jKrvwlrV#jKV#jKV#jKV#jKV#o   ۇ O8V#jKuE*Ć($_AV#jKV#jKV#jKrvwlrV#jKV#jKV#jKV#jKV#o   Tۇ O8V#jKuE*Ć($_AV#jKV#jKV#jKrvwlrV#jKV#jKV#jKV#jKV#o  ! !ۇ O8V#jKuE*Ć($_AV#jKV#jKV#jKrvwlrV#jKV#jKV#jKV#jKV#o !  ۇ O8V#jKuE*Ć($_AV#jKV#jKV#jKrvwlrV#jKV#jKV#jKV#jKV#o     ۇ O8V#jKuE*Ć($_AV#jKV#jKV#jKrvwlrV#jKV#jKV#jKV#jKV#o      ۇ O8V#jKuE*Ć($_AV#jKV#jKV#jKrvwlrV#jKV#jKV#jKV#jKV#o   ۇ O8V#jKrvwlrV#jKV#jKV#jKV#jKrvwlrV#jKV#jKV#jKV#jKV#o mLVALy~ zk\XI:6'tea @ @  }ۇ O8V#jKuE*Ć($_AV#jKV#jKV#jKrvwlrV#jKV#jKV#jKV#jKV#o } y yۇ O8V#jKuE*Ć($_AV#jKV#jKV#jKrvwlrV#jKV#jKV#jKV#jKV#o y u uۇ O8V#jKuE*Ć($_AV#jKV#jKV#jKrvwlrV#jKV#jKV#jKV#jKV#o u    ۇ O8V#jKuE*Ć($_AV#jKV#jKV#jKrvwlrV#jKV#jKV#jKV#jKV#o    ۇ O8V#jKuE*Ć($_AV#jKV#jKV#jKrvwlrV#jKV#jKV#jKV#jKV#o   ۇ O8V#jKuE*Ć($_AV#jKV#jKV#jKrvwlrV#jKV#jKV#jKV#jKV#o   Tۇ O8V#jKuE*Ć($_AV#jKV#jKV#jKrvwlrV#jKV#jKV#jKV#jKV#o  ! !ۇ O8V#jKuE*Ć($_AV#jKV#jKV#jKrvwlrV#jKV#jKV#jKV#jKV#o !  ۇ O8V#jKuE*Ć($_AV#jKV#jKV#jKrvwlrV#jKV#jKV#jKV#jKV#o    KKDe OrderByOnAllowZeroLengthRequired ColumnWidth ColumnOrder ColumnHiddenFilterOrderBy E Subkey   !  : Type    F ValName   F  D Value      @ @ @       !uy}4j d AccessAnd <AS bBooleanCall.Debug=Dim@DoCEachEElseifGEndRfUForZFunction`Ifc<InkIntegeryLong|Me~mID$nameNextNothingOnOrPrivateResumeSetstepStopSubtextThenToUBoundVariantWith VBAWin16~Win32Mac SalesCgr.mdbMSJETSQL  DAO1H _Evaluate find_Fieldi`jarst RecordsetrstFjstr CurrentDbS OpenRecordset|qdfQueryDefCreateQueryDefzNSQL"ExecuteY QueryDefs&Deletex TableDefs%iCount0v AttributesFields7AddNewa NameField DataBaseNameqYUpdateitemzCollectModule1btbl_defzTableDefmteryupiField3mdtemp_nnepAlo{V_B_var_ifP Properties+IndexesPrimary}MsgBoxRkblc _B_var_ter֕ _B_var_LeftQValueKBeepMoveNextL!VOL _B_var_VOLdb\ LDD_BrandέLDD_Brand_RusThen{ LDD_Brand_RusMLDD_Rus_BrandsU#_B_var_LDD_Rus_BrandsChrK~ _B_var_Chr\;tbl_def3*$_B_var_n _B_var_* _B_var_UbounddaX _B_var_Stringӊcol_sort)dirscan _B_var_Subpath2 _B_var_WhileIfGetAttr vbDirectorygcds} _B_var_Call _B_var_InX_B_var_b vbArchive yREE_KRG_ANALYZERd_B_var_REE_KRG_ANALYZER^FileLenDoCmdƧRunSQL _B_var_Do Application* SetOption OpenTable!tbsW_B_var_Recordsettdf_B_var_DatabaseP OpenDatabase`pgof_B_var_FunctionOxoWHERE֍ ConflictTable!^Connect\SourceTableNameCIGAR| _B_var_CIGARiK UpdatableEValidationTextW] needcolsortT_B_var_BooleanM1'^ Form_ControlCommand6_ClickiText0~Subtempj Requeryscandir18Right SetFocusText0_AfterUpdateܽCommand15_Clickl OpenQueryCommand16_Click MediaPlayerCommand30_Click?'RecalcӬCommand27_ClickK CheckErroruerrXZ[ErroclearErrorsDBEngineQ Description SourceGNumber- error_handBCommand34_ClickB& lngCounterPvarDummyg^intWaitacSysCmdInitMeterm!SysCmdGacSysCmdUpdateMeter acSysCmdClearStatus9Ycdb}FormDetail2L @@ @@@ `vjpd`w`a`vfvgruovordxmfv ufm`wjrpvijsvufsruwv vbujswv v}vufm w`amfvov}v`bfvov}vboda`uvov}vjof|brmxopvov}vjof|vsfbvov}vordxmfvov}vordxmfvXov}vrakfbwvov}vtxfujfvov}vufm`wjrpvijsvtxfu}Ww`amfWxv}vbrpgjhxv}vufhjpgr`bbfvvm`}rxw ov}vdavxoo`u}jpgrxvfudfgjpfdrs_ _B_var_rs _B_var_Strcst SalesDistrNum _B_var_SalesDistrNummst(_ _B_var_stcsr _B_var_csr<yl`y__lzqy1O_pathvK cdsortmCommand25_Click]BasesSorttimerXNow%Time _B_var_Time$seconds؃_B_var_seconds\SecondsMinuteamPM^ _B_var_PMZSettimerR_B_var_Settimer/* :CaptionxCommand28_Click$colsort{_B_var_colsort_B_var_zSys _B_var_SysΒLDD_Area_B_var_LDD_AreayAnalizer_B_var_Analizerzcolsum`rowsum*mCommand29_Click\cdcheck-sBox35gText36"sLabel37Label38Text39%sLabel40Text41BsLabel42 Command43 Command44Box45Command43_ClickCommand44_Click&Findn duplicatesi Win_Utils?shellBrowseInfo hwndOwnerpIDLRootdpszDisplayNamehr lpszTitleSulFlags lpfnCallbacklParam7iImageUBIF_RETURNONLYFSDIRS-MAX_PATH( CoTaskMemFreeM ole32.dllhMemʏSHBrowseForFolder"A @ @ @ @ @ @ @ @ @ @  !"#$ % & '    ()*+, ! ! ! uuuyyy}} }!     stateMaskxpszText cchTextMax$iIndentjLVCOLUMNԣfmtcx\iOrder7 SHFILEINFO|hIconMiIcon dwAttributes szDisplayName" szTypeNamei SHGetFileInfopszPathdwFileAttributesopsfiocbSizeFileInfo uFlags&uGetDesktopWindow ShellExecute" lpOperation8lpFile lpParametersZ lpDirectoryenShowCmdseries]fPathGetFileDescription[ sFileNameshinfo_TrimNullposchkCheckBox_Clickv5 chkCheckBoxchkGridLines_Click-6 chkGridLinescchkFullRowSelect_ClickLc chkSelectMode\cmdOpenSelected_ClickֳhWndDeskOsfile8aparams$ vbNullString Combo1_Click^3 cmdSelect[Enabled۪SetCheck lItemIndex bState^LV'^cmdSetCheck_Click@lvIndexlvCountuValText1~cmdCheckInvert_ClickgSetCheckInvertAllcmdCheckAll_ClickSetCheckAllItemsGcmdUncheckAll_Click cmdOpenChecked_ClickriSpace cmdGetChecked_ClickgvbCrLf FK @  t t t t t t t t t@ `xwrvxobroofpwObjectIdAttribute   ۇ O8V#jKuE*Ć($_AV#jKV#jKV#jKrvwlrV#jKV#jKV#jKV#jKV#o  ~ ~ۇ O8V#jKuE*Ć($_AV#jKV#jKV#jKrvwlrV#jKV#jKV#jKV#jKV#o ~ z zۇ O8V#jKuE*Ć($_AV#jKV#jKV#jKrvwlrV#jKV#jKV#jKV#jKV#o z    ۇ O8V#jKuE*Ć($_AV#jKV#jKV#jKrvwlrV#jKV#jKV#jKV#jKV#o    ۇ O8V#jKuE*Ć($_AV#jKV#jKV#jKrvwlrV#jKV#jKV#jKV#jKV#o   ۇ O8V#jKuE*Ć($_AV#jKV#jKV#jKrvwlrV#jKV#jKV#jKV#jKV#o   Tۇ O8V#jKuE*Ć($_AV#jKV#jKV#jKrvwlrV#jKV#jKV#jKV#jKV#o  ! !ۇ O8V#jKuE*Ć($_AV#jKV#jKV#jKrvwlrV#jKV#jKV#jKV#jKV#o !  ۇ O8V#jKuE*Ć($_AV#jKV#jKV#jKrvwlrV#jKV#jKV#jKV#jKV#o     ۇ O8V#jKuE*Ć($_AV#jKV#jKV#jKrvwlrV#jKV#jKV#jKV#jKV#o      ۇ O8V#jKuE*Ć($_AV#jKV#jKV#jKrvwlrV#jKV#jKV#jKV#jKV#o   ۇ O8V#jKrvwlrV#jKV#jKV#jKV#jKrvwlrV#jKV#jKV#jKV#jKV#o olorlReturn lStructSize/rfrmMainX hInstance  lpCustColors"}/jU@ٱc@USysRegInfo@888,,,,,,,* @ywSFv@ٱc@USysConfig@777+++++++) @um%iT@ٱc@Table14@333'''''''% @ N:U@TbuU@Query1$@@?33'''''''% @! ~5xu@ٱc@MSysModules2*@6Ƴb/UU9-------+  v@ v@MSysModules,,,,,,,,,,* 5xu@ٱc@MSysIMEXSpecs.........., @5xu@ٱc@MSysIMEXColumns0000000000. ~S@ٱc@MSysCmdbars,,,,,,,,,,*  aiRT@d@In##########! Tl.U@d@AS##########!  `5xu@`5xu@UserDefined,,,,,,,,,,*  5xu@3d@SummaryInfo@888,,,,,,,* @ cDxu@d@AccessLayout*@@E99-------+ @`5xu@`5xu@SysRel''''''''''% @5xu@@5xu@Scripts((((((((((&  5xu@ 5xu@Reports((((((((((& `5xu@`5xu@Modules((((((((((& 5xu@5xu@Forms&&&&&&&&&&$ D5xu@D5xu@MSysRelationships22222222220 D5xu@xaqd@MSysQueries,,,,,,,,,,* D5xu@xaqd@MSysACEs))))))))))' D5xu@D5xu@MSysObjects,,,,,,,,,,* D5xu@t~>[@MSysDb@333'''''''% @D5xu@D5xu@Relationships.........., D5xu@D5xu@Databases**********( D5xu@D5xu@Tables''''''''''% ExT RegEnumKeyHdwIndex RegEnumKeyExΪlpClass2 lpszFileNamehandlecbBuf lpdwHandlever.dllfLangglpszLangzcbLanglpvBlockyYSubBlocklpcb7 lpAppName3~ lpKeyNameJVS_FIXEDFILEINFOd dwSignaturedwStrucVersionZdwFileVersionMS~YdwFileVersionLSYYdwProductVersionMSdwProductVersionLSdwFileFlagsMask) dwFileFlagsO~dwFileOSe1 dwFileType dwFileSubtype. dwFileDateMS dwFileDateLS SYNCHRONIZE- ERROR_SUCCESSjrfverbufSfilenamejcontains Version؏^BeginVB_ ClientHeight} ClientLeft%I95/ ClientTopi ClientWidth( BeginPropertyAFontUcharsetQ#weight1Size underlineitalic! strikethrough" EndProperty ForeColor8jEHeight|35QLinkMode LinkTopic ScaleHeight! ScaleWidthTop5 DirListBoxlDir1teTabIndex2 FileListBoxFile1UXPatterni DriveListBoxڦDrive19menuBMenuInformation( MenuDevicesw MenuPrintersMenuVersionInfoMenuVersionDescMenuDevices_ClickU ShowDevices"MenuPrinters_Click ShowPrinters8MenuVersionDesc_Click0 ShowDescInfohMenuVersionInfo_ClickShowVersionInfo Dir1_Change Drive1_Change,DriveThis̹shows initialization5FileswX devstring960startposGendposbcrlf.resdi\Asc!uUnderΖWindowsdNTo^ftG] keyhandleUcuridx5keyname classnamekeylen-classlenmsgQreserved\HKEY_LOCAL_VFT_DRV)VFT_FONT,VFT_VXDVFT_STATIC_LIBvernum"}/jU@ٱc@USysRegInfo@888,,,,,,,* @ywSFv@ٱc@USysConfig@777+++++++) @um%iT@ٱc@Table14@333'''''''% @ N:U@TbuU@Query1$@@?33'''''''% @! ~5xu@ٱc@MSysModules2*@6Ƴb/UU9-------+  v@ v@MSysModules,,,,,,,,,,* 5xu@ٱc@MSysIMEXSpecs.........., @5xu@ٱc@MSysIMEXColumns0000000000. ~S@xaqd@MSysCmdbars,,,,,,,,,,*  aiRT@d@In##########! Tl.U@d@AS##########!  `5xu@`5xu@UserDefined,,,,,,,,,,*  5xu@3d@SummaryInfo@888,,,,,,,* @ cDxu@d@AccessLayout*@@E99-------+ @`5xu@`5xu@SysRel''''''''''% @5xu@@5xu@Scripts((((((((((&  5xu@ 5xu@Reports((((((((((& `5xu@`5xu@Modules((((((((((& 5xu@5xu@Forms&&&&&&&&&&$ D5xu@D5xu@MSysRelationships22222222220 D5xu@xaqd@MSysQueries,,,,,,,,,,* D5xu@xaqd@MSysACEs))))))))))' D5xu@D5xu@MSysObjects,,,,,,,,,,* D5xu@t~>[@MSysDb@333'''''''% @D5xu@D5xu@Relationships.........., D5xu@D5xu@Databases**********( D5xu@D5xu@Tables''''''''''% !`v&jp&mrbl&ov}vda&WLOCALE_SABBREVMONTHNAME11WLOCALE_SABBREVMONTHNAME12WLOCALE_SABBREVMONTHNAME13WLOCALE_SYSTEM_DEFAULT+LOCALE_USER_DEFAULT cMAXLEN]apiGetLocaleInfoB/LocaleLCTypelpLCDataȒcchDataցapiSetLocaleInfo GetLocaleInfoͰ lngLCType5 lngLocale strLCData1lngDatarlngX/ SetLocaleInfoilValue܅   S LocalSettings;OpenJetUserInfoB strDbPathE.cnn%ADODBs Connection strConnectq OpenSchemaDSchemaadSchemaProviderSpecificQSchemaIDpenJetUserInfo}_B_var_penJetUserInfor _B_var_ADODB`v_B_var_ConnectionG _B_var_cnn6<ADOXMSDASCMSDAOSP ODBCTool(i_B_var_adSchemaProviderSpecific/ERR_OKi$ ERR_CONNECT@ ERR_MESSAGE ERR_NOMESSAGEERR_SEND4 ERR_RECEIVEPT ERR_INTERNALMessagestrToastrCCk_strBCC_strFromstrSubj strHdrCharsetDstrHdrTransferEncodingstrDateDstrBodyg`strContentType) strCharsetstrTransferEncoding$ strFileAttachCheckMsgstrHost strUserName͈ strPasswordaqlPort= freemail.dllSendMsg,G fpCallback/mmMsgs ReceiveMsg:ElMsgNumnv lDelAfterRcv ReceiveHdr]( DeleteMsg ConvertCyr4 strSrcDestX strSrcSrc strFromToCP)KProgressulTypeslModelStatusjAddrOf'Ken DeclarationsGetCurrentVbaProjectqhProjectD vba332.dllp GetFuncIDhstrFunctionNameUM strFunctionId0pointer1u strFuncNamesM lngResultQstrIu wwwww_handle8pTouFromTabArray5Label2,dwServer dwShare dwEntriesreaddwTotalentriesdwResumehandleȱsuccess| nStructSizeJcnt+bServer<bShareci1O~vbTabc9GetConnectionTypedwDatatmplen  dwSessionType NecConnexionst NetConnexions{dodo_B_str_EnvironsummatorSumatronf(ummaTable _B_var_TablenCurrentObjectNameActiveDatasheetGridXe(smileOnClosrfOnCloseY TimerInterval?cSelWidthNet _B_var_Netu SelHeight!SelLeft#$SelTopmSumacSysSetStatus_B_var_acSysSetStatusacSysCmdSetStatushISelText+T_B_var_SelTextWCurrentSectionLeft_B_var_CurrentSectionLeftiRecordsetClone8GetRowsß_B_var_cRecord OnDeactivateQ`_B_var_OnDeactivatexs_(clearme% _B_var_diDikƒ _B_var_Dik@Emty@ _B_var_Error)OnKeyUp`O OnMouseUp0OnClick8OnTimer;ZDetail0,_B_var_Detail0 OnGotFocus(verageOnUnloadj(ountw#(ountnumsҼisnimIisnum _B_var_isnum IsNumeric$*(iiin@ Autosum`P(aaaxClass1+ClassAutoT(Install CommandBars  Applictiony_B_var_Appliction  CommandBar_B_var_CommandBar|vcbarx NameLocal _B_var_cbar msoBarPopupV_B_var_msoBarPopupH FindControl mmsoControlPopyif`dfu{ $JS> J"< DAO>BDAO *\G{00025E01-0C  0046}#4.0#0#C:\Program Files\Common Microsoft Shared\w350.DLL# 3.5 Object Library HTOffice>fOfice]]2DF8D04C-5BFA-101B-BDE5]AA[4p2}#2]G6\MSO97 X P 8.0YDYAS T_VBA_MODULE2VBb_MODULEQ@HB1s-:B,!B+BIn<P__SRP_0K)^0rU(~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~c}@ ilf},bxuufpw,`bbfvv,surgjmf)ofpx`ddjpv)`xwrvxoilf},bxuufpw,`bbfvv,surgjmf)ofpx`ddjpv)`xwrvxoilf},bxuufpw,`bbfvv,surgjmf)ofpx`ddjpv)`xwrvxoV_TABLESTANDING ADV_STICKER ADV_POSTER ADV_OTHER ADV_DISPLAY ADV_DISPENSER ADV_ASHTRAY STOCKCVR STOCKVAL_US STOCKVAL_RBL STOCK_SHARE STOCKVOL_SHARE STOCKVOL FACING_SHS FACING OOS_HNDL_WGH OOS_HNDL_NUM OOSWGH OOSNUM HNDL_WGH HNDL_NUM HNDLNum Offtake SALEDISTRWGH SalesDistrWgh SALEDISTRNUM SalesDistrNum DSTRWGHVAL DistrWghVal DSTRWGHVOL DistrWghVol DSTRWGH DSTRNUM DistrNum Price$ PRICEHRV PriceRbl Price SHRVALHNDL SHRVOLHNDL ShareShopsHandling SHRVAL ShareVal Value$ VALUEHRV ValueRbl Value SOS SOM SHRVOL ShareVol Volume VOL UPDATE temp SET FieldsMoved = a2|"je2|"jd2|"j*m~"j*m~"j*m~"j USys , RSB =  , CSB =  WHERE path=' Find duplicates for temp Find duplicates by size Bases to sort temp_errorsӆ*m~"j҆*m~"jCommand29_Clickcdcheck*m~"j*m~"j &SELECT path FROM temp WHERE Done=True; : UPDATE temp SET RSA =  , CSA =  SizeAfter =  WHERE path=' , SizeAfter = *m~"j*m~"jBox35Text36Text39Text41Label