faizinfy

Company.vb

Dec 13th, 2018
117
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
VB.NET 1.56 KB | None | 0 0
  1. Imports System.Collections.Generic
  2. Imports System.ComponentModel.DataAnnotations
  3. Imports System.ComponentModel.DataAnnotations.Schema
  4.  
  5. Public Class Company
  6.  
  7.     Public Property id As Integer
  8.     Public Property name As String
  9.     Public Property registrationno As String
  10.  
  11.     <Display(Name:="Street 1")>
  12.     Public Property addressstreet1 As String
  13.     <Display(Name:="Street 2")>
  14.     Public Property addressstreet2 As String
  15.  
  16.     Public Property postcode As String
  17.     Public Property city As String
  18.  
  19.     Public Property state As String
  20.     Public Property country As String
  21.  
  22.     Public ReadOnly Property roAddress As String
  23.         Get
  24.             Return addressstreet1 & ", " & addressstreet2 & ", " & postcode & " " & city & ", " & state & ", " & country
  25.         End Get
  26.     End Property
  27.  
  28.     Public Property phone As String
  29.     Public Property fax As String
  30.     <Display(Name:="Website URL")>
  31.     Public Property websiteURL As String
  32.     <Display(Name:="Email Address")>
  33.     Public Property email As String
  34.     Public Property logo As String
  35.  
  36.     Public Property datetimecreated As DateTime
  37.  
  38.     '-Email Setting
  39.     Public Property usedefaultemailsetting As Boolean = True
  40.     Public Property emailport As String
  41.     Public Property emailhost As String
  42.     Public Property emailfromaddress As String
  43.     Public Property emailusername As String
  44.     Public Property emailpassword As String
  45.     Public Property emailenablessl As Boolean
  46.  
  47.     Public Overridable Property auditlogs As ICollection(Of AuditLog) = New HashSet(Of AuditLog)
  48. End Class
Advertisement
Add Comment
Please, Sign In to add comment