Advertisement
Guest User

Untitled

a guest
Jul 1st, 2015
190
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 0.97 KB | None | 0 0
  1. Public Property UserDetails() As ObservableCollection(Of tbl_Main_Timer)
  2. Get
  3. Return _UserDetails
  4. End Get
  5. Set(value As ObservableCollection(Of tbl_Main_Timer))
  6. _UserDetails = value
  7. End Set
  8. End Property
  9.  
  10. Public Property FillDataGrid() As RelayCommand
  11. Get
  12. _FillDatagrid = New RelayCommand(AddressOf FillProductivityEE)
  13. Return _FillDatagrid
  14. End Get
  15. Set(value As RelayCommand)
  16. _FillDatagrid = value
  17. RaisePropertyChanged("FillDataGrid")
  18. End Set
  19. End Property
  20.  
  21. Public Sub FillProductivityEE()
  22. Using entityconn As New TimerConn()
  23. Dim result = (From f In entityconn.tbl_Main_Timer Where f.Enumber = Enumber AndAlso f.LogDate = "2015-07-01" Order By f.ID).ToList
  24. For Each ac In result
  25. _UserDetails.Add(ac)
  26. Next
  27. End Using
  28. End Sub
  29.  
  30. ItemsSource="{Binding EmployeeViewM.UserView}"
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement