Pensieve header: Interactive assembly of my Academic Pensieve.

SetDirectory["C:\\drorbn\\AcademicPensieve\\Projects\\AcademicPensieve"];
Get["AssemblyPrograms.m"];
Get["AcademicPensieveStartup.m"];
Print["Running BatchAssembly with {PensieveDirectory, PensieveURL}=", {PensieveDirectory, PensieveURL}];
BeginPackage["Pensieve`"];
(*Begin["`Private`"];*)

InitializeTemplates[]

PensieveAssemble["nb"]

Last /@ FileNameSplit /@ PensieveAssemble["one"]

OneNoteLink=Pensieve`Private`OneNoteLink

FileType@"C:\\drorbn\\AcademicPensieve\\ByDate\\2019-06.one"

OneNoteFilename="C:\\drorbn\\AcademicPensieve\\ByDate\\2019-06.one";
OneNoteLink@OpenHierarchy[OneNoteFilename, "", OneNoteDocument]

OneNoteFilename="C:\\drorbn\\AcademicPensieve\\ByDate\\2019-01.one";
OneNoteLink@OpenHierarchy[OneNoteFilename, "", OneNoteDocument]

NETLink`NETTypeInfo@OneNoteLink

NETLink`NETTypeInfo["System.Diagnostics.Process"]

NETLink`NETObjectQ[OneNoteLink]

?NETLink`*

?ShortcutTarget

ShortcutTarget[lnk="C:\\drorbn\\AcademicPensieve\\2019-07\\AcademicPensieve - Shortcut.lnk"]