LINQ and .NET 3.5

SELECT tbl_products.ProductName, tbl_xref_product_promo_code.Price
        FROM         tbl_promo_codes INNER JOIN
                              tbl_xref_product_promo_code ON tbl_promo_codes.IDPromoCode = tbl_xref_product_promo_code.IDPromoCode INNER JOIN
                              tbl_products ON tbl_xref_product_promo_code.IDPrice = tbl_products.ProductID
        WHERE        (tbl_promo_codes.IDPromoCode = 1)

from t1 in db.Table1
join t2 in db.Table2 on t1.field equals t2.field
select new { t1.field2, t2.field3}

iID Convert.ToInt32(data) = (from o in SupplierType
               where o.Description = sDescription
               select o.ID);

int[] numbers = { 1, 2, 3, 4, 5, 11 };
// throws an exception
int firstBigNumber = (from p in numbers where p > 10 select p).First();
 
// returns 0
int firstBigNumber = (from p in numbers where p > 10 select p).FirstOrDefault();
 
// returns 111
int firstBigNumber = (from p in numbers where p > 100 select p).DefaultIfEmpty(111).FirstOrDefault();

			
string sDescription = "Source system";

int iTypeID = (from t in oTable.AsEnumerable()
where t.Field("Description").ToLower() == sDescription.ToLower()
select t.Field("TypeID")).FirstOrDefault();

Dim mediaFiles = From file In fileinfo _
                         Where file.Extension = ".avi" Or file.Extension = ".mov" _
                                                       Or file.Extension = ".mkv" _
                                                       Or file.Extension = ".mp4" _
                                                       Or file.Extension = ".asf" _
                         Select file

Dim showsInXML = From s In doc...<tvshow> _
                      Select s

Dim mediaOnFileSystemAndInXML = From mf In mediaFiles, sh In showsInXML _
                                     Where mf.FullName = sh.<path>.Value _
                                     Select mf

Dim mediaOnFileSystemAndNotInXML = mediaFiles.Except(mediaOnFileSystemAndInXML)

    Public Sub UpdateXML()
        Try
            Dim doc = XDocument.Load(My.Settings.xmlMedia)
            Dim newTvShows As New Collections.Generic.List(Of XElement)

            Dim showPathInXML = From s In doc...<tvshow> _
                               Select s.<path>.Value

            For Each filePath As String In My.Computer.FileSystem.GetFiles(My.Settings.mediaFolder)
                Dim fileInfo As System.IO.FileInfo = My.Computer.FileSystem.GetFileInfo(filePath)
                If CheckValidExtention(fileInfo.Extension) = False Then Continue For
                If showPathInXML.Any(Function(f) f = fileInfo.FullName) = False Then
                    newTvShows.Add(<tvshow>
                                       <path><%= fileInfo.FullName %></path>
                                       <dateAdded><%= fileInfo.CreationTime %></dateAdded>
                                       <seen><%= "0" %></seen>
                                       <name><%= fileInfo.Name %></name>
                                       <deleted><%= "0" %></deleted>
                                   </tvshow> )
                End If
            Next

            For Each ntvs As XElement In newTvShows
                doc.<torrss>.<tvshows>(0).Add(ntvs)
            Next

            doc.Save(My.Settings.xmlMedia)
        Catch ex As Exception
            ErrorNotifyer("Error updating XML.")
        End Try
    End Sub

var rsDailyHoursTC = (from d in Empctx.DailyHoursTimeCategories
group d.TimeCategory into TotalArea
orderby TotalArea.TimeCategory
select new
{
TimeCategory = TotalArea.TimeCategory,
Hours = TotalArea.Sum( h => h.Hours),
Min = TotalArea.Sum( m => m.Min)
});

u2envy12 wrote:

ambada Error on
TotalArea.TimeCategory

var rsDailyHoursTC = (from d in Empctx.DailyHoursTimeCategories
group d by d.TimeCategory into TotalArea
orderby TotalArea.TimeCategoryName
select new
{
TimeCategory = TotalArea.TimeCategoryName,
Hours = TotalArea.Sum( h => h.Hours),
Min = TotalArea.Sum( m => m.Min)
});

u2envy12 wrote:

DailyHoursID
1
2
3

Table2 HoursTimeCategory
DailyHoursID TimeCategory Hours Min
1 0 8 30
1 1 9 0
2 0 6 30

var rsDailyHoursTC = 
                 from rs in
                 (
                     from d in Empctx.DailyHoursTimeCategories
                     join tc in Empctx.TimeCategories on d.TimeCategoryID equals tc.TimeCategoryID
                     where empCatList.Contains(d.DailyHoursID)
                     select new { TimeCategoryName = tc.TimeCategoryName, Hours = d.Hours, Minutes = d.Min }
                 )
                 group rs by rs.TimeCategoryName into g
                 select new { Category = g.Key, Hours = g.Sum(r => r.Hours), Minutes = g.Sum(r => r.Minutes) };