Tabuliacijų kūrimas su ASP.NET

http://www.codeproject.com/Articles/13165/A-Simple-ASP-NET-Tab-Control-Using-the-MultiView-c

LINQ to SQL model

1. Prisidėti papildomą projekta "Class library"
2. Pridėti LINQ to SQL model ir jį sukonfiguruoti
3. Konfiguruojant keisti namespace ir sutvarkyti connection string

4. Sukūrus projektą, jį dar reikia pridėti prie web projekto

5. Į web.config įdedame

      
< add name="DiscountDB" connectionString="Data Source=aaa;Initial Catalog=bbb;Persist Security Info=True;User ID=ccc;Password=ddd" providerName="System.Data.SqlClient"/>






       
<assemblies>

<

add assembly="System.Data.Linq, Version=4.0.0.0, Culture=neutral, PublicKeyToken=B77A5C561934E089"/>

</

assemblies>
   
6. Galiausiai galime naudoti:
        Dim odb As New ExportDB.DataContext
        Dim obj = From a In odb.MainGroups
7. Sukuriame naują vb failą, konfiguravimui
Namespace My

    Partial Friend NotInheritable Class MySettings

        Private Sub MySettings_SettingsLoaded(ByVal sender As Object, ByVal e As System.Configuration.SettingsLoadedEventArgs) Handles Me.SettingsLoaded

            Me.Item("DiscountConnectionString") = Configuration.ConfigurationManager.ConnectionStrings("DiscountDB").ConnectionString

            Me.Item("PriceListConnectionString") = Configuration.ConfigurationManager.ConnectionStrings("PriceListDB").ConnectionString

        End Sub

    End Class

End Namespace

AutoPostBack properties in DropDownList

Padeda pagauti įvykį SelectedIndexChanged

Windows Form Properties

Kaip paslėpti meniu juostą?




Kaip langas atsiras ekrane?

LINQ: Join left ir join right

http://www.codeguru.com/columns/vb/article.php/c15057__1/Implementing-a-Left-Join-with-LINQ.htm

Dim sSearch As String = "%" & tbSearch.Text.Trim & "%"
            qMoulds = qMoulds.Where(

Function(m) Linq.SqlClient.SqlMethods.Like(m.MouldNo, sSearch) Or
                                        Linq.SqlClient.

SqlMethods.Like(m.MaterialCode, sSearch) Or
                                        Linq.SqlClient.

SqlMethods.Like(m.ProductDrg, sSearch) Or
                                        Linq.SqlClient.

SqlMethods.Like(m.Description, sSearch) Or
                                        Linq.SqlClient.

SqlMethods.Like(m.ComponentCode, sSearch))


End If


Dim qMouldIds = From m In qMoulds


Select m.MouldNo


Distinct


Dim qCurrMoulds = From m In oDB.TTSMoulds


Join l In oDB.TTSLocations On m.LocationID Equals l.ID


Join s In oDB.TTSStores On l.StoreID Equals s.ID


Select m.MouldID, l.Location, s.StoreName


Dim qMouldInfo = From c In qMouldIds


Group Join m In qCurrMoulds On c Equals m.MouldID Into mgroup = Group


From cm In mgroup.DefaultIfEmpty()


Order By c


Select New MouldInfo With {
                             .MouldNo = c,
                             .Location = cm.Location,
                             .StoreName = cm.StoreName
                         }

Nustatymai, kurį projektą rodyti

Kai viename Solution'e yra webinis ir windows form projektai

MaintainScrollPositionOnPostBack

Savybė, po Postback grąžinanti į redaguojamą puslapio vietą:

MaintainScrollPositionOnPostBack = True

Kaip nurodyti kokią reikšmę grąžinti į e.CommandArgument įvykyje RowCommand