wymiller/DeskHubSharp
Archived
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

Merge pull request #5 from wymillerlinux/test

Browse Source 
adding files to my library
This commit is contained in:
Wyatt J. Miller 2018-12-16 14:42:38 -05:00 committed by GitHub
commit 70fa17a3b5
No known key found for this signature in database
GPG Key ID: 4AEE18F83AFDEB23
14 changed files with 163 additions and 23 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

BIN
.vs/DeskHubSharp/v15/.suo
View File

Binary file not shown.

BIN
.vs/DeskHubSharp/v15/Server/sqlite3/storage.ide
View File

Binary file not shown.

41
DeskHubSharp.Models/AssemblyInfo.fs Normal file
View File

@ -0,0 +1,41 @@
namespace DeskHubSharp.Models.AssemblyInfo
open System.Reflection
open System.Runtime.CompilerServices
open System.Runtime.InteropServices
// General Information about an assembly is controlled through the following
// set of attributes. Change these attribute values to modify the information
// associated with an assembly.
[<assembly: AssemblyTitle("DeskHubSharp.Models")>]
[<assembly: AssemblyDescription("")>]
[<assembly: AssemblyConfiguration("")>]
[<assembly: AssemblyCompany("")>]
[<assembly: AssemblyProduct("DeskHubSharp.Models")>]
[<assembly: AssemblyCopyright("Copyright © Wyatt J. Miller 2018")>]
[<assembly: AssemblyTrademark("")>]
[<assembly: AssemblyCulture("")>]
// Setting ComVisible to false makes the types in this assembly not visible
// to COM components. If you need to access a type in this assembly from
// COM, set the ComVisible attribute to true on that type.
[<assembly: ComVisible(false)>]
// The following GUID is for the ID of the typelib if this project is exposed to COM
[<assembly: Guid("8bda59ae-1de9-4049-8929-0eaa58f28e68")>]
// Version information for an assembly consists of the following four values:
//
// Major Version
// Minor Version
// Build Number
// Revision
//
// You can specify all the values or you can default the Build and Revision Numbers
// by using the '*' as shown below:
// [<assembly: AssemblyVersion("1.0.*")>]
[<assembly: AssemblyVersion("1.0.0.0")>]
[<assembly: AssemblyFileVersion("1.0.0.0")>]
do
()

72
DeskHubSharp.Models/DeskHubSharp.Models.fsproj
View File

@ -1,11 +1,69 @@
<Project Sdk="Microsoft.NET.Sdk">
<?xml version="1.0" encoding="utf-8"?>
<Project ToolsVersion="15.0" DefaultTargets="Build" xmlns="http://schemas.microsoft.com/developer/msbuild/2003">
<Import Project="$(MSBuildExtensionsPath)\$(MSBuildToolsVersion)\Microsoft.Common.props" Condition="Exists('$(MSBuildExtensionsPath)\$(MSBuildToolsVersion)\Microsoft.Common.props')" />
<PropertyGroup>
<TargetFramework>netstandard2.0</TargetFramework>
<Configuration Condition=" '$(Configuration)' == '' ">Debug</Configuration>
<Platform Condition=" '$(Platform)' == '' ">AnyCPU</Platform>
<SchemaVersion>2.0</SchemaVersion>
<ProjectGuid>8bda59ae-1de9-4049-8929-0eaa58f28e68</ProjectGuid>
<OutputType>Library</OutputType>
<RootNamespace>DeskHubSharp.Models</RootNamespace>
<AssemblyName>DeskHubSharp.Models</AssemblyName>
<UseStandardResourceNames>true</UseStandardResourceNames>
<TargetFrameworkVersion>v4.6.1</TargetFrameworkVersion>
<AutoGenerateBindingRedirects>true</AutoGenerateBindingRedirects>
<Name>DeskHubSharp.Models</Name>
</PropertyGroup>
<PropertyGroup Condition=" '$(Configuration)|$(Platform)' == 'Debug|AnyCPU' ">
<DebugSymbols>true</DebugSymbols>
<DebugType>full</DebugType>
<Optimize>false</Optimize>
<Tailcalls>false</Tailcalls>
<OutputPath>bin\$(Configuration)\</OutputPath>
<DefineConstants>DEBUG;TRACE</DefineConstants>
<WarningLevel>3</WarningLevel>
<DocumentationFile>bin\$(Configuration)\$(AssemblyName).XML</DocumentationFile>
</PropertyGroup>
<PropertyGroup Condition=" '$(Configuration)|$(Platform)' == 'Release|AnyCPU' ">
<DebugType>pdbonly</DebugType>
<Optimize>true</Optimize>
<Tailcalls>true</Tailcalls>
<OutputPath>bin\$(Configuration)\</OutputPath>
<DefineConstants>TRACE</DefineConstants>
<WarningLevel>3</WarningLevel>
<DocumentationFile>bin\$(Configuration)\$(AssemblyName).XML</DocumentationFile>
</PropertyGroup>
<PropertyGroup>
<MinimumVisualStudioVersion Condition="'$(MinimumVisualStudioVersion)' == ''">11</MinimumVisualStudioVersion>
</PropertyGroup>
<PropertyGroup Condition=" '$(FSharpTargetsPath)' == '' AND Exists('$(MSBuildExtensionsPath32)\Microsoft\VisualStudio\v$(VisualStudioVersion)\FSharp\Microsoft.FSharp.Targets') ">
<FSharpTargetsPath>$(MSBuildExtensionsPath32)\Microsoft\VisualStudio\v$(VisualStudioVersion)\FSharp\Microsoft.FSharp.Targets</FSharpTargetsPath>
</PropertyGroup>
<Import Project="$(FSharpTargetsPath)" />
<ItemGroup>
<Compile Include="Library.fs" />
<Compile Include="AssemblyInfo.fs" />
<Compile Include="Email.fs" />
<None Include="Script.fsx" />
<Content Include="packages.config" />
</ItemGroup>
</Project>
<ItemGroup>
<Reference Include="FSharp.Core">
<HintPath>..\packages\FSharp.Core.4.5.2\lib\net45\FSharp.Core.dll</HintPath>
</Reference>
<Reference Include="mscorlib" />
<Reference Include="System" />
<Reference Include="System.Core" />
<Reference Include="System.Numerics" />
<Reference Include="System.ValueTuple">
<HintPath>..\packages\System.ValueTuple.4.4.0\lib\net461\System.ValueTuple.dll</HintPath>
<Private>True</Private>
</Reference>
</ItemGroup>
<!-- To modify your build process, add your task inside one of the targets below and uncomment it.
Other similar extension points exist, see Microsoft.Common.targets.
<Target Name="BeforeBuild">
</Target>
<Target Name="AfterBuild">
</Target>
-->
</Project>

10
DeskHubSharp.Models/Email.fs
View File

@ -1,6 +1,6 @@
module Email
namespace DeskHubSharp.Models
type EmailModel (fromEmail: string, toEmail: string, password: string) =
member x.fromEmail = fromEmail
member x.toEmail = toEmail
member x.password = "password"
type EmailModel() =
member this.FromEmail = "wjmiller2016@gmail.com"
member this.ToEmail = "wjmiller2016@gmail.com"
member this.Password = "password"

3
DeskHubSharp.Models/Error.fs Normal file
View File

@ -0,0 +1,3 @@
module Error
// This file is to test out file IO and exceptions

5
DeskHubSharp.Models/Library.fs
View File

@ -1,5 +0,0 @@
namespace DeskHubSharp.Models
module Say =
let hello name =
printfn "Hello %s" name

9
DeskHubSharp.Models/Math.fs Normal file
View File

@ -0,0 +1,9 @@
module Math
let addOne x = x + 1
let square x = x * x
let slash x = x / x
let recursive x = 1 / x

15
DeskHubSharp.Models/Opener.fs Normal file
View File

@ -0,0 +1,15 @@
module Opener
open System.IO
open System.Diagnostics
let file =
try
use file = File.OpenRead "config.xml"
Some <| file.Read
with
:? FileNotFoundException as ex ->
printfn "%s was not found. Does it exist?" ex.FileName
None
_ -> printfn "Error loading file..."
reraise()

8
DeskHubSharp.Models/Script.fsx Normal file
View File

@ -0,0 +1,8 @@
// Learn more about F# at http://fsharp.org
// See the 'F# Tutorial' project for more help.
#load "Email.fs"
open DeskHubSharp.Models
// Define your library scripting code here

5
DeskHubSharp.Models/packages.config Normal file
View File

@ -0,0 +1,5 @@
<?xml version="1.0" encoding="utf-8"?>
<packages>
<package id="FSharp.Core" version="4.5.2" targetFramework="net461" />
<package id="System.ValueTuple" version="4.4.0" targetFramework="net461" />
</packages>

10
DeskHubSharp.sln
View File

@ -5,7 +5,7 @@ VisualStudioVersion = 15.0.28010.2046
MinimumVisualStudioVersion = 10.0.40219.1
Project("{FAE04EC0-301F-11D3-BF4B-00C04F79EFBC}") = "DeskHubSharp", "DeskHubSharp\DeskHubSharp.csproj", "{BB23F915-21F5-4201-9021-0BE824660DBC}"
EndProject
Project("{F2A71F9B-5D33-465A-A702-920D77279786}") = "DeskHubSharp.Models", "DeskHubSharp.Models\DeskHubSharp.Models.fsproj", "{AC090BDC-3D12-4F61-B4EE-145BADEB3AC6}"
Project("{F2A71F9B-5D33-465A-A702-920D77279786}") = "DeskHubSharp.Models", "DeskHubSharp.Models\DeskHubSharp.Models.fsproj", "{8BDA59AE-1DE9-4049-8929-0EAA58F28E68}"
EndProject
Global
GlobalSection(SolutionConfigurationPlatforms) = preSolution
@ -17,10 +17,10 @@ Global
{BB23F915-21F5-4201-9021-0BE824660DBC}.Debug|Any CPU.Build.0 = Debug|Any CPU
{BB23F915-21F5-4201-9021-0BE824660DBC}.Release|Any CPU.ActiveCfg = Release|Any CPU
{BB23F915-21F5-4201-9021-0BE824660DBC}.Release|Any CPU.Build.0 = Release|Any CPU
{AC090BDC-3D12-4F61-B4EE-145BADEB3AC6}.Debug|Any CPU.ActiveCfg = Debug|Any CPU
{AC090BDC-3D12-4F61-B4EE-145BADEB3AC6}.Debug|Any CPU.Build.0 = Debug|Any CPU
{AC090BDC-3D12-4F61-B4EE-145BADEB3AC6}.Release|Any CPU.ActiveCfg = Release|Any CPU
{AC090BDC-3D12-4F61-B4EE-145BADEB3AC6}.Release|Any CPU.Build.0 = Release|Any CPU
{8BDA59AE-1DE9-4049-8929-0EAA58F28E68}.Debug|Any CPU.ActiveCfg = Debug|Any CPU
{8BDA59AE-1DE9-4049-8929-0EAA58F28E68}.Debug|Any CPU.Build.0 = Debug|Any CPU
{8BDA59AE-1DE9-4049-8929-0EAA58F28E68}.Release|Any CPU.ActiveCfg = Release|Any CPU
{8BDA59AE-1DE9-4049-8929-0EAA58F28E68}.Release|Any CPU.Build.0 = Release|Any CPU
EndGlobalSection
GlobalSection(SolutionProperties) = preSolution
HideSolutionNode = FALSE

1
DeskHubSharp/BusinessLayer/EmailBLL.cs
View File

@ -8,6 +8,7 @@ using MailKit;
using MailKit.Net.Smtp;
using MailKit.Security;
using MimeKit;
using DeskHubSharp.Models;
namespace DeskHubSharp
{

7
DeskHubSharp/DeskHubSharp.csproj
View File

@ -165,9 +165,14 @@
<ItemGroup>
<None Include="App.config" />
</ItemGroup>
<ItemGroup />
<ItemGroup>
<Resource Include="colors.txt" />
</ItemGroup>
<ItemGroup>
<ProjectReference Include="..\DeskHubSharp.Models\DeskHubSharp.Models.fsproj">
<Project>{8bda59ae-1de9-4049-8929-0eaa58f28e68}</Project>
<Name>DeskHubSharp.Models</Name>
</ProjectReference>
</ItemGroup>
<Import Project="$(MSBuildToolsPath)\Microsoft.CSharp.targets" />
</Project>