Ado.Net

Entity Framework Sys.WebForms.PageRequestManagerParserErrorException: The message received from the server could not be parsed.

Emanuele Mattei — Sun, 17 Jul 2011 11:35:00 GMT

Nel caso che state utilizzando Entity Framework, con un controllo GridView in Asp.net, se la paginazione risulta elevata, si possono verificare dei problemi a livello di prestazioni e qualche errore.
Un errore tipico, può avenire nel caso che si hanno più di 15 000 record, un errore del tipo "
Sys.WebForms.PageRequestManagerParserErrorException: The message received from the server could not be parsed. " nel caso che si passa all'ultimo pagina della gridview.
Per ovviare a questo problema, nell'evento page_load della pagina, impostare la proprietà
la proprietà AutoPage a False, come nell'esempio seguente.

EntityDataSource1.AutoPage = false;

EntityFramework proprietà where per filtrare una data

Emanuele Mattei — Sat, 16 Jul 2011 09:45:00 GMT

In questi giorni, lavorando con Entity Framework con un collega, ci siamo scontrati con una piccola problema, quella di filtrare i record in riferimento alla data.
Nel caso che si utilizza un controllo EntityDataSource, per la gestione di una fonte dati, tramite la proprietà "where" possiamo effettuare dei filtri sui dati.
Nell'esempio seguente, tramite l'attributo it che identifica il campo, effettuamo un filtro in base ad un campo data, utilizzando la parola chiave cast per trasformare un valore stringa in data.
Qui di seguito l'esempio.

EntityDataSource1.Where = "it.Campo_DATA >= cast( '2011/07/23 10:10:00' as System.DateTime) and it.Campo_DATA < cast( '2011/07/23 10:10:00' as System.DateTime)";

Ado.Net Eseguire una stored Procedure (VB.Net e C#)

Emanuele Mattei — Sun, 15 Feb 2009 11:40:00 GMT

Il frammento qui di seguito, illustra l'utilizzo delle classi command e connection, per eseguire una store procedura.

Supponiamo di avere una storeprocedure, che restetuisce il valore di una select, e queste record, visualizzarli in un oggetto dropdownlist oppure gridview.

L'esempio qui di seguito, illustra l'utilizzo di Stored Procedure.

VB.NEt

Dim sConnectionString As String = ConfigurationManager.ConnectionStrings("ConDati").ConnectionStringUsing ConDati As SqlConnection = New SqlConnection(sConnectionString)

ConDati.Open()

'oggetti per l'esecuzione delle storeProcedureUsing comElencoOperazioni As SqlCommand = New SqlCommand()

comElencoOperazioni.CommandType = CommandType.StoredProcedure

comElencoOperazioni.CommandText =

"sp_sel_caricaelenco"

comElencoOperazioni.Connection = ConDati

'eseguo la sp e carico la combo

ElencoOperazioniDropDownList.DataTextField =

"descrizione"

ElencoOperazioniDropDownList.DataValueField =

"ID"

ElencoOperazioniDropDownList.DataSource = comElencoOperazioni.ExecuteReader()

ElencoOperazioniDropDownList.DataBind()

End Using

string sConnectionString = ConfigurationManager.ConnectionStrings["ConDati"].ConnectionString;using (SqlConnection ConDati = new SqlConnection(sConnectionString))

{

ConDati.Open();

//oggetti per l'esecuzione delle storeProcedureusing (SqlCommand comElencoOperazioni = new SqlCommand())

{

comElencoOperazioni.CommandType = CommandType.StoredProcedure;comElencoOperazioni.CommandText = "sp_sel_caricaelenco";

comElencoOperazioni.Connection = ConDati;

//eseguo la sp e carico la comboElencoOperazioniDropDownList.DataTextField = "DESC_descrizione";ElencoOperazioniDropDownList.DataValueField = "CODE_ID";

ElencoOperazioniDropDownList.DataSource = comElencoOperazioni.ExecuteReader();

ElencoOperazioniDropDownList.DataBind();

}

Ado.Net - Filtrare i dati di un dataview (VB.Net e C#)

Emanuele Mattei — Sat, 14 Feb 2009 16:08:00 GMT

L'oggetto datatable, ha una proprietà chiamata defaultView, nella quale contiene un oggetto di tipo dataview, tale oggetto ha una proprietà (RowFilter) per effettuare il filtro dei dati, ossia effettuare una selezione dei dati, in base a dei paramenti.

Il frammento di codice qui di seguito, illustra, come utilizzare la proprietà RowFilter, per estrapolare tutti quei dati, nel cui campo Nome è presente il valore Emanuele.

VB.Net

Dim con As String = "Data Source=(local);Integrated Security=SSPI; Initial Catalog=test"

Dim Sql As String = "Select * from Dati "

Try'

Dim DtaDati As New SqlDataAdapter(Sql, con)

Dim DttDati As New DataTable("Dati")

DtaDati.Fill(DttDati)

'filtro i dati

DttDati.DefaultView.RowFilter =

"Nome = 'Emanuele'"

'rilevo il dataviewDim dtvDati As DataView = DttDati.DefaultView

If dtvDati.Count < 1 ThenMessageBox.Show("Nessun record")

ElseMessageBox.Show("Record esistente")End If

Catch ex As Exception

MessageBox.Show(

"Errore:" & ex.Message)

C#string con = "Data Source=(local);Integrated Security=SSPI; Initial Catalog=test";

String Sql = "Select * from Dati where id = 1";

try

{

SqlDataAdapter DtaDati = new SqlDataAdapter(Sql, con);DataTable DttDati = new DataTable("Dati");

DtaDati.Fill(DttDati);

//Filtro i datiDttDati.DefaultView.RowFilter = "Nome ='Emanuele'";

//rilevo il dataviewDataView dtvDati = DttDati.DefaultView;if (dtvDati.Count < 1)

{

MessageBox.Show("Nessun record");

}

else

{

MessageBox.Show("Record esistente");

}

catch (Exception ex)

{

MessageBox.Show("Errore: " + ex.Message);

}

Ado.Net - Effettuare delle query in un oggetto DataTable tramite il metodo select (VB.Net e C#)

Emanuele Mattei — Fri, 13 Feb 2009 20:55:00 GMT

L'oggetto DataTable, tra i suoi metodi, c'è ne uno che permette di fare delle query. Il metodo Select, accetta due argomenti, il secondo è facoltativo, il primo è la query, ossia il valore da ricercare in un determinato campo, mentre il secondo è l'ordinamento.

Di seguito si riporta un frammento di codice, di utilizzo del metodo select della classe DataTable, in particolare si effettua una ricerca nel campo nome, con il valore Emanuele. Si nota, che è possibile utilizzare anche l'operatore like.

VB.Net

Dim con As String = "Data Source=(local);Integrated Security=SSPI; Initial Catalog=test"

Dim Sql As String = "Select * from Dati "

Try'

Dim DtaDati As New SqlDataAdapter(Sql, con)

Dim DttDati As New DataTable("Dati")

DtaDati.Fill(DttDati)

'posso utilizzare anche la likeDim riga() As DataRow = DttDati.Select("Nome = 'Emanuele'")

If riga.Length < 1 ThenMessageBox.Show("Nessun record")

ElseMessageBox.Show("Record esistente")End If

Catch ex As ExceptionMessageBox.Show("Errore:" & ex.Message)

End Try

string con = "Data Source=(local);Integrated Security=SSPI; Initial Catalog=test";

String Sql = "Select * from Dati where id = 1";

try

{

SqlDataAdapter DtaDati = new SqlDataAdapter(Sql, con);DataTable DttDati = new DataTable("Dati");

DtaDati.Fill(DttDati);

// posso utilizzare anche la likeDataRow[] riga = DttDati.Select("Nome = 'Emanuele'");if (riga.Length < 1)

{

MessageBox.Show("Nessun record");

}

else

{

MessageBox.Show("Record esistente");

}

catch (Exception ex)

{

MessageBox.Show("Errore: " + ex.Message);

Ado.Net - utilizzo del metodo find per trovare un record

Emanuele Mattei — Tue, 10 Feb 2009 23:04:00 GMT

Il seguente code snippet, illustra l'utilizzo del metodo find, della classe datatable, per trovare un determinato record. Va ricordato che tale metodo, si utilizza, solo nel caso che la colonna abbia valori univoci e non dupplicati.

L'esempio qui proposto è per il linguaggio di programmazione VB.Net e C#

VB.Net

Dim con As String = "Data Source=(local);Integrated Security=SSPI; Initial Catalog=test"

Dim Sql As String = "Select * from Dati "

Try'

Dim DtaDati As New SqlDataAdapter(Sql, con)

Dim DttDati As New DataTable("Dati")

DtaDati.Fill(DttDati)

'solo per valori univoci. Altrimenti erroreDttDati.PrimaryKey = New DataColumn() {DttDati.Columns("Nome")}

'rilevo i datiDim riga As DataRow = DttDati.Rows.Find("emanuele")

If riga IsNot Nothing ThenMessageBox.Show("Record esistente")

ElseMessageBox.Show("Nessun record")End If

Catch ex As ExceptionMessageBox.Show("Errore:" & ex.Message)

End Try

string con = "Data Source=(local);Integrated Security=SSPI; Initial Catalog=test";

String Sql = "Select * from Dati where id = 1";

try

{

SqlDataAdapter DtaDati = new SqlDataAdapter(Sql, con);DataTable DttDati = new DataTable("Dati");

DtaDati.Fill(DttDati);

//solo per valori univoci. Altrimenti erroreDttDati.PrimaryKey = new DataColumn[]{DttDati.Columns["Nome"]};

//rilevo i datiDataRow riga = DttDati.Rows.Find("emanuele");if (riga != null)

{

MessageBox.Show("Record esistente");

}

else

{

MessageBox.Show("Nessun record");

}

catch (Exception ex)

{

MessageBox.Show("Errore: " + ex.Message);

}

Ado.Net la gestione dell'aggiornamento dei dati dell'evento RowUpdating della classe SqlDataAdapter (VB.Net e C#)

Emanuele Mattei — Mon, 02 Feb 2009 22:32:00 GMT

La classe SqlDataAdapter, tramite il metodo update, permette l'aggiornamento dei dati, quando si esegue tale metodo si scatenano vari eventi, tra cui RowUpdating, il quale è il momento in cui si sta facendo l'aggiornamento dei dati.

L'esempio di codice, qui di seguito, illustra come tramite il linguaggio VB.Net e C#, possiamo gestire tale evento.

VB.Net

Dim con As String = "Data Source=(local);Integrated Security=SSPI; Initial Catalog=test"

Dim Sql As String = "Select * from Dati where id = 1 "

Try'

Dim DtaDati As New SqlDataAdapter(Sql, con)

Dim cmbDati As New SqlCommandBuilder(DtaDati)Dim DttDati As New DataTable("Dati")

'gestore dell'evento RowUpdatingAddHandler DtaDati.RowUpdating, AddressOf DtaDati_RowUpdating

DtaDati.Fill(DttDati)

'aggiorno il dato

DttDati.Rows(0)(

"nome") = DttDati.Rows(0)("nome") & " Nuovo"

'metodo che aggiorna il dato

DtaDati.Update(DttDati)

Catch ex As ExceptionMessageBox.Show("Errore:" & ex.Message)

End Try

'Funzione per la gestione dell'evento RowUpdating, si scatena, quando l'aggiornamento si sta verificandoPrivate Sub DtaDati_RowUpdating(ByVal sender As Object, ByVal e As SqlRowUpdatingEventArgs)

If e.Status = UpdateStatus.ErrorsOccurred ThenMessageBox.Show("Errore")

ElseMessageBox.Show("Evento: " & e.StatementType.ToString())

MessageBox.Show(

"Valore da - a " & e.Row("nome", DataRowVersion.Original) + " - " + e.Row("nome"))

End IfEnd Sub

string con = "Data Source=(local);Integrated Security=SSPI; Initial Catalog=test";

String Sql = "Select * from Dati where id = 1";

try

{

SqlDataAdapter DtaDati = new SqlDataAdapter(Sql, con);

SqlCommandBuilder cmbDati = new SqlCommandBuilder(DtaDati);

//gestore dell'evento RowUpdatingDtaDati.RowUpdating += new SqlRowUpdatingEventHandler(DtaDati_RowUpdating);DataTable DttDati = new DataTable("Dati");

DtaDati.Fill(DttDati);

//aggiorno il datoDttDati.Rows[0]["nome"] = DttDati.Rows[0]["nome"] + " Nuovo";

//metodo che aggiorna il dato

DtaDati.Update(DttDati);

}

catch (Exception ex)

{

MessageBox.Show("Errore: " + ex.Message);

}

//Funzione per la gestione dell'evento RowUpdating, si scatena, quando l'aggiornamento si sta verificandovoid DtaDati_RowUpdating(object sender, SqlRowUpdatingEventArgs e)

{

if (e.Status == UpdateStatus.ErrorsOccurred)

{

MessageBox.Show("Errore");

}

else

{

MessageBox.Show("Event: " + e.StatementType);MessageBox.Show("Valore da - a " + e.Row["nome", DataRowVersion.Original] + " - " + e.Row["nome"]);

}

Ado.Net Gestione dell'evento rowupdated per l'aggiornamento dei dati (VB.Net e C#)

Emanuele Mattei — Mon, 26 Jan 2009 22:57:00 GMT

La classe SqlDataAdapter, tramite il metodo update, aggiorna i dati di una fonte dati sql server tramite il metodo Update. Al termine dell'aggiornamento, si scatena un evento (rowupdated) . L'esempio qui di seguito, illustra come creare un gestore di evento per tale evento.

VB.Net

Dim con As String = "Data Source=(local);Integrated Security=SSPI; Initial Catalog=test"

Dim Sql As String = "Select * from Dati "

Try'

Dim DtaDati As New SqlDataAdapter(Sql, con)

Dim cmbDati As New SqlCommandBuilder(DtaDati)Dim DttDati As New DataTable("Dati")

'gestore dell'evento rowupdatedAddHandler DtaDati.RowUpdated, AddressOf DtaDati_RowUpdated

DtaDati.Fill(DttDati)

'aggiorno il dato

DttDati.Rows(0)(

"nome") = DttDati.Rows(0)("nome") & " Nuovo"

'metodo che aggiorna il dato

DtaDati.Update(DttDati)

Catch ex As ExceptionMessageBox.Show("Errore:" & ex.Message)

End Try

'Funzione per la gestione dell'evento RowUpdate, si scatena, quando l'aggiornamento Š avvenutoPrivate Sub DtaDati_RowUpdated(ByVal sender As Object, ByVal e As SqlRowUpdatedEventArgs)

If e.Status = UpdateStatus.ErrorsOccurred ThenMessageBox.Show("Errore")

ElseMessageBox.Show("Evento: " & e.StatementType.ToString())

MessageBox.Show(

"Valore modificato " & e.Row("nome").ToString())

End IfEnd Sub

string con = "Data Source=(local);Integrated Security=SSPI; Initial Catalog=test";

String Sql = "Select * from Dati where id = 1";

try

{

SqlDataAdapter DtaDati = new SqlDataAdapter(Sql, con);

SqlCommandBuilder cmbDati = new SqlCommandBuilder(DtaDati);

//gestore dell'evento rowupdatedDtaDati.RowUpdated += new SqlRowUpdatedEventHandler(DtaDati_RowUpdated);DataTable DttDati = new DataTable("Dati");

DtaDati.Fill(DttDati);

//aggiorno il datoDttDati.Rows[0]["nome"] = DttDati.Rows[0]["nome"] + " Nuovo";

//metodo che aggiorna il dato

DtaDati.Update(DttDati);

}

catch (Exception ex)

{

MessageBox.Show("Errore: " + ex.Message);

}

//Funzione per la gestione dell'evento RowUpdate, si scatena, quando l'aggiornamento Š avvenuto

void DtaDati_RowUpdated(object sender, SqlRowUpdatedEventArgs e)

{

if (e.Status == UpdateStatus.ErrorsOccurred)

{

MessageBox.Show("Errore di aggiornamento");

}

else

{

MessageBox.Show("Evento: " + e.StatementType);MessageBox.Show("Valore modificato " + e.Row["nome"].ToString());

}

Ado.Net Gestione degli errori del metodo Fill della classe SqlDataAdapter tramite VB.Net e C#

Emanuele Mattei — Sun, 25 Jan 2009 18:24:00 GMT

Quando si utilizza il metodo fill, della classe SqlDataAdapter, possiamo crearci un gesto di evento, per gestire l'eventualità di un errore.

In questo esempio di codice, (VB.Net e C#) vediamo un esempio pratico. L'errore, voluto, riguarda la mancata creazione di colonne nell'oggetto datatable.

VB.Net

'Esempio dell'evento FillError, si verifica nel caso ci sono errori durante l'utilizzo del metodo fill

Dim con As String = "Data Source=(local);Integrated Security=SSPI; Initial Catalog=test"

Dim Sql As String = "Select * from Dati where id = 'a'"

Try'

Dim DtaDati As New SqlDataAdapter(Sql, con)

DtaDati.MissingSchemaAction = MissingSchemaAction.Error

Dim DttDati As New DataTable("Dati")

'gestore dell'evento fill errorAddHandler DtaDati.FillError, AddressOf DtaDati_FillError

DtaDati.Fill(DttDati)

Catch ex As ExceptionMessageBox.Show("Errore:" & ex.Message)

End TryPublic Sub DtaDati_FillError(ByVal sender As Object, ByVal e As FillErrorEventArgs)

MessageBox.Show(e.Errors.Message)

e.Continue =

True

End Sub

//Esempio dell'evento FillError, si verifica nel caso ci sono errori durante l'utilizzo del metodo fillstring con = "Data Source=(local);Integrated Security=SSPI; Initial Catalog=test";

String Sql = "Select * from Dati where id = 1";

try

{

SqlDataAdapter DtaDati = new SqlDataAdapter(Sql, con);

DtaDati.MissingSchemaAction =

MissingSchemaAction.Error;DataTable DttDati = new DataTable();

//gestore dell'evento fill errorDtaDati.FillError += new FillErrorEventHandler(DtaDati_FillError);

//non valorizzando con i nomi delle colonne genero un eccezione.

DtaDati.Fill(DttDati);

}

catch (Exception ex)

{

MessageBox.Show("Errore: " + ex.Message);

}

//gestore di evento

void DtaDati_FillError(object sender, FillErrorEventArgs e)

{

MessageBox.Show(e.Errors.Message);

e.Continue =

true;

}

Ado.Net esempio di MARS (Multiple Active Result Sets) tramite VB.Net e C#

Emanuele Mattei — Wed, 14 Jan 2009 21:24:00 GMT

Con Ado.Net versione 2 o successiva, possiamo eseguire più batch su una singola connessione. Nelle versioni precedenti era possibile eseguire un batch alla volta su una singola connessione. L'esecuzione di più batch con MARS non implica l'esecuzione simultanea delle operazioni.

Questo avviene impostando nella connectionstring il parametro MultipleActiveResultSets a true.

Es.

MultipleActiveResultSets=True

Qui di seguito si riporta un frammento di codice.

VB.Net

Dim con As String = "Data Source=(local);Integrated Security=SSPI; Initial Catalog=test; MultipleActiveResultSets=True"

Using ConDati As New SqlConnection(con)

Dim SqlTabDati As String = "Select id from Dati"

Dim SqlTabAnagrafica As String = "Select * from Anagrafica where id = @id"

Dim DatiCmd As SqlCommand

Dim AnagraficaCmd As SqlCommand

Try

DatiCmd = New SqlCommand(SqlTabDati, ConDati)

AnagraficaCmd = New SqlCommand(SqlTabAnagrafica, ConDati)

AnagraficaCmd.Parameters.Add("@id", SqlDbType.Int)

ConDati.Open()

Dim idDati As Integer

Using DatiReader = DatiCmd.ExecuteReader()

While DatiReader.Read()

idDati = CInt(DatiReader("id"))

AnagraficaCmd.Parameters("@id").Value = idDati

Using AnagraficaReader As SqlDataReader = AnagraficaCmd.ExecuteReader()

While AnagraficaReader.Read()

MessageBox.Show("Dati: " & AnagraficaReader("nazione"))

End While

End Using

End While

End Using

Catch exdb As SqlException

MessageBox.Show("ERrore:" & exdb.Message)

Return

Catch ex As Exception

MessageBox.Show("ERrore:" & ex.Message)

Return

End Try

ConDati.Close()

End Using

string con = "Data Source=(local);Integrated Security=SSPI; Initial Catalog=test; MultipleActiveResultSets=True";using (SqlConnection ConDati = new SqlConnection(con))

{

string SqlTabDati = "Select id from Dati";

string SqlTabAnagrafica = "Select * from Anagrafica where id = @id";

SqlCommand DatiCmd;

SqlCommand AnagraficaCmd;

try

{

DatiCmd = new SqlCommand(SqlTabDati, ConDati);

AnagraficaCmd = new SqlCommand(SqlTabAnagrafica, ConDati);

AnagraficaCmd.Parameters.Add("@id", SqlDbType.Int);

ConDati.Open();

SqlDataReader DatiReader;

int idDati;

using (DatiReader = DatiCmd.ExecuteReader())

{

while (DatiReader.Read())

{

idDati = (int)(DatiReader["id"]);

AnagraficaCmd.Parameters["@id"].Value = idDati;

using (SqlDataReader AnagraficaReader = AnagraficaCmd.ExecuteReader())

{

while (AnagraficaReader.Read())

{

MessageBox.Show("Dati: " + AnagraficaReader["nazione"]);

}

catch (SqlException exdb)

{

MessageBox.Show("ERrore:" + exdb.Message);return;

}

catch (Exception ex)

{

MessageBox.Show("ERrore:" + ex.Message);

return;

}

ConDati.Close();

}