Source/ExcelDNA/AddIn.cs


1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53

using ExcelDna.Integration;
using ExcelDna.Registration;
using Microsoft.Win32;
using System.Net.Http;

namespace RehauSku.Assist
{
    public enum ResponseOrder
    {
        Default,
        Relevance,
        Name,
        Price,
        Series
    }

    public class AddIn : IExcelAddIn
    {
        public static readonly HttpClient httpClient = new HttpClient();
        public static ResponseOrder responseOrder;
        public static string priceListPath;

        public void AutoOpen()
        {
            RegisterFunctions();
            GetRegistryKeys();
        }

        public void AutoClose()
        {

        }

        void RegisterFunctions()
        {
            ExcelRegistration.GetExcelFunctions()
                             .ProcessAsyncRegistrations(nativeAsyncIfAvailable: false)
                             .RegisterFunctions();
        }

        void GetRegistryKeys()
        {
            RegistryKey addInKeys = Registry
                .CurrentUser
                .OpenSubKey("SOFTWARE")
                .OpenSubKey("REHAU")
                .OpenSubKey("SkuAssist");

            responseOrder = (ResponseOrder)addInKeys.GetValue("ResponseOrder");
            priceListPath = (string)addInKeys.GetValue("PriceListPath");
        }
    }
}