Ogni tanto c'è la necessità di sapere se sul database è presente una tabella oppure no. Con il seguente codice possiamo verificare facilmente se una tabella esiste. Il parametro da passare è comprensivo di schema, per esempio dbo.Anagrafiche.

In VB.NET:

Function TableExists(tableNameAndSchema As String) As Boolean

   Using connection As New SqlConnection(connectionString)

      Dim checkTable As String = [String].Format("IF OBJECT_ID('{0}', 'U') IS NOT NULL SELECT 'true' ELSE SELECT 'false'", tableNameAndSchema)

      Dim command As New SqlCommand(checkTable, connection)

      command.CommandType = CommandType.Text

      connection.Open()

      Return Convert.ToBoolean(command.ExecuteScalar())

   End Using

End Function

e anche in C#:

bool TableExists(string tableNameAndSchema){

   using (SqlConnection connection = new SqlConnection(connectionString))

   {     

     string checkTable = String.Format(

                         "IF OBJECT_ID('{0}', 'U') IS NOT NULL SELECT 'true' ELSE SELECT 'false'", tableNameAndSchema);

       SqlCommand command = new SqlCommand(checkTable, connection);

      command.CommandType = CommandType.Text;

      connection.Open();

      return Convert.ToBoolean(command.ExecuteScalar());   

   }

}

Ciao e buon lavoro!

Avendo perso anche tutto il pomeriggio della giornata di oggi a capire come fare in Linq un banale Left Outer Join, vi posto la query in Linq che ho realizzato.

qry = From f In eDoc.Fatture Where f.Data <= tmp Group Join pn In eDoc.PrimaNota On f.IDFattura Equals pn.FatturaID Into fv = _

      Group From p In fv.DefaultIfEmpty Join a In eDoc.Anagrafiche On f.Anagrafica Equals a.IDAnagrafica _

      Where f.Data <= tmp And (p.Data >= tmp Or p.Data Is Nothing) And (f.Annullata Is Nothing Or f.Annullata >= tmp) _

      Select a.IDAnagrafica, f.IDFattura, f.Numero, f.TipoDocumento, a.RagSoc, a.Nome, f.Data, f.Scadenza, f.TotaleImponibile, _

      f.TotaleDocumento, f.TotaleIVA, f.Anticipata, f.AnticipataImporto, f.AnticipataBanca, f.AnticipataData, f.AnticipataPercentuale, f.Riscossa, f.Annullata

Ogni tanto a me servirebbe la funzione che esisteva nel vecchio VB6 di AppPath. L'ho banalmente ricreata anche in VB.NET

Private Function AppPath() as String

        return System.Windows.Forms.Application.StartupPath

End function

Lavorando con le entità può succedere che si incontri il seguente problema (Bugs è una tabella):

System.Data.UpdateException: Impossibile aggiornare EntitySet 'Bugs' perché include DefiningQuery e nell'elemento <ModificationFunctionMapping> non esiste alcun elemento <InsertFunction> che supporti l'operazione corrente.

Tale problema si verifica se si usa il mapping da database e la tabella non ha definito una chiave primaria.

Questo errore fortunatamente compare solamente durante il debug di un'applicazione: semplicemente avverte che l'operazione che si sta effettuato sta impiegando molto tempo e risorse. Se però si clicca comunque su "Play" l'applicazione continua a proseguire normalmente la sua attività.

Diversi sono i link interessanti a proposito che vi segnalo:

• http://www.experts-exchange.com/Programming/Languages/.NET/Q_23152513.html
• http://social.msdn.microsoft.com/forums/en-US/vsto/thread/e6e0a123-4a84-4ef6-ae10-845a6f7dd071/
• http://blogs.msdn.com/jmstall/archive/2005/11/11/ContextSwitchDeadLock.aspx
• http://msdn.microsoft.com/en-us/library/ms172233.aspx

L'ultimo link è forse quello più completo. Buon lavoro!

Per quanto hai cercato un combobox con la possibilità di ricerca? Ecco una semplice implementazione:

Private Sub CombBox1_KeyPress(ByVal sender As Object, ByVal e As System.Windows.Forms.KeyPressEventArgs) Handles ComboBox1.KeyPress
        Dim findString As String = String.Empty
        If (Not e.KeyChar.IsLetterOrDigit(e.KeyChar, 0)) Then Exit Sub
        findString = e.KeyChar
        With ComboBox1
            .SelectedIndex = ComboBox1.FindString(findString)
        End With
        If ComboBox1.SelectedIndex > -1 Then e.Handled = True
End Sub

Ciao a tutti!

Chissà a quanti è capitato di dover cercare all'interno di un combobox un elemento presente (non un valore). Per risolvere il problema il comando da scrivere è piuttosto semplice:

Il comando FindString presente tra le proprietà del combobox restituisce un intero che è la posizione del valore cercato all'interno degli elementi presenti nel combobox. In questo caso si è scelto di selezionare il valore trovato.

Ciao a tutti e buon Ferragosto! (a chi nn lavora). Oggi un veloce tricks: a me è capitato di dover dare il focus ad un textbox ma non compare il cursore all'interno dello stesso.

La funzione più scontata sarebbe TextBox.Focus(). Invece quella che funziona meglio è TextBox.Select(). Provate e verificate voi stessi!

formatting strings

formatting numbers

custom number formatting

date formatting

custom date formatting