SQL'de bir tabloya index ekleme ve bu eklenen index'e göre tabloyu rebuild etme

Bir tabloya index ekleme ve bu eklenen index'e göre tabloyu rebuild etme

IF  EXISTS (SELECT * FROM sys.indexes WHERE object_id = OBJECT_ID(N'[dbo].[t_Products]') AND name = N'x_Products_venderno')
DROP INDEX [x_Products_venderno] ON [dbo].[t_Products] WITH ( ONLINE = OFF )
GO

CREATE NONCLUSTERED INDEX [x_Products_venderno] ON [dbo].[t_Products] 
(
[ds_id] ASC,
[vender_no] ASC
)WITH (PAD_INDEX  = OFF, STATISTICS_NORECOMPUTE  = OFF, SORT_IN_TEMPDB = OFF, IGNORE_DUP_KEY = OFF, DROP_EXISTING = OFF, ONLINE = OFF, ALLOW_ROW_LOCKS  = ON, ALLOW_PAGE_LOCKS  = ON) ON [PRIMARY]
GO


ALTER INDEX x_Products_venderno ON [dbo].[t_Products]
REBUILD;

ListView'e DataTable'dan veri aktarmak.

ListView'e DataTable'dan veri aktarmak. Aşağıdaki kodu kullanmadan önce, listView'de str dizisine aktarılan her veri için bir kolon oluşturulması gerekmektedir.

For i As Integer = 0 To myDataTable.Rows.Count - 1
    Dim str(4) As String
    Dim itm As ListViewItem
    str(0) = myDataTable.Rows(i)("userID")    str(1) = myDataTable.Rows(i)("Name")    str(2) = myDataTable.Rows(i)("SurName")    str(3) = myDataTable.Rows(i)("Genre")    str(4) = myDataTable.Rows(i)("Country")    itm = New ListViewItem(str)
    listView.Items.Add(itm)
Next

.NET TabControl içinde istenen sayfaya gitmek.

TabControl içinde sayfalar arasında geçişi sağlamak ya da tabcontrol içindeki bir sayfaya erişimi engellemek için aşağıdaki kod parçası kullanılabilir(bu durumda tabcontrol'un SelectedIndexChanged event'inde belirtilmelidir).

TabControl.SelectedTab

Kullanımı:
tabControl1.SelectedTab = tabControl1.TabPages(1)

RSAPKCS1SHA256SignatureDescription in VB.NET

Imports System
Imports System.Security.Cryptography
Imports System.Security.Cryptography.Xml
Imports System.Security.Cryptography.X509Certificates
Imports System.Text
Imports System.Xml
Imports System.Collections
Imports System.Reflection

Public Class RSAPKCS1SHA256SignatureDescription
    Inherits SignatureDescription

    Public Sub RSAPKCS1SHA256SignatureDescription()
        KeyAlgorithm = GetType(RSACryptoServiceProvider).FullName
        DigestAlgorithm = GetType(SHA256Managed).FullName   ' Note - SHA256CryptoServiceProvider is not registered with CryptoConfig
        FormatterAlgorithm = GetType(RSAPKCS1SignatureFormatter).FullName
        DeformatterAlgorithm = GetType(RSAPKCS1SignatureDeformatter).FullName
    End Sub

SQL'de herhangi bir tarih değerine ait Saat, Dakika ve Saniye bilgilerini almak

SQL'de herhangi bir tarih değerine ait Saat, Dakika ve Saniye bilgilerini almak

SELECT DATEPART(hh, GETDATE());
SELECT DATEPART(MI, GETDATE());
SELECT DATEPART(S, GETDATE());

Extracting hour, minute and second from a datetime value in SQL.

App.Config dosyasında bulunan connectionStrings bölümünü şifrelemek.

App.Config dosyasında bulunan connectionStrings bölümünü şifrelemek.


<?xml version="1.0"?>
<configuration>
  <connectionStrings>
    <add name="ConnectionString" connectionString="Data Source=V10000-PC;Initial Catalog=SQLDB;Integrated Security=SSPI;" providerName="System.Data.SqlClient" />
  </connectionStrings>
</configuration>


Private Sub btnEncrypt_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnEncrypt.Click

    Dim str() As String = Application.ExecutablePath.Split("\")
    Dim applicationName As String = str(str.Count - 1)
    applicationName = applicationName.Replace("EXE", "exe")
    Dim config As Configuration = ConfigurationManager.OpenExeConfiguration(applicationName)



   If config.HasFile() Then
        EncryptAppConfig(config)
   End If
End Sub


Private Sub EncryptAppConfig(ByVal config As Configuration)
    Dim section As ConnectionStringsSection = config.GetSection("connectionStrings")
    If Not section.SectionInformation.IsProtected Then
       section.SectionInformation.ProtectSection("DataProtectionConfigurationProvider")
   End If
   config.Save(ConfigurationSaveMode.Modified)
   ConfigurationManager.RefreshSection("connectionStrings")
End Sub