Salve a tutti
Scusate la domanda stupida però in questo momento (forse di confusione) non riesco a capire come poter visualizzare un messaggio del tipo "Per la selezione fatta non risulta nessun dato" quando il contenuto di un datareader è vuoto.
Ho una banale pagina con un droplist che in funzione della scelta interroga una tabella per poi visualizzarli. Questo è il pezzo di codice dove vengono estratti i dati in funzione del parametro scelto nel droplist. Come faccio a testare il caso in cui non ho dati?
'sub per estrarre i dati in funzione della scelta fatta dal droplist
Sub bntRisco_Click(sender as Object, e as EventArgs)
Dim aCookie As HttpCookie = Request.Cookies("permessi")
Dim Label1 as String
Label1 = Server.HtmlEncode(aCookie.Value)
If Label1 = "de" Then
Dim recupero_codente as String = Request.QueryString("codente")
Dim recupero_denom as String = Request.QueryString("denominazione")
Dim strConn as String ="PROVIDER=Microsoft.Jet.OLEDB.4.0;DATA SOURCE=" & server.mappath("/civitas/mdb-database/civitas.mdb")
Dim objConn as New OleDbConnection(strConn)
objConn.Open()
Dim strSQL as String = "SELECT tesnumopercon, desente, tesannruo,tescodfisc, dateven, (tesimprisc/100) AS importo FROM testata_incassi INNER JOIN tabenti ON testata_incassi.tesente=tabenti.codente WHERE testata_incassi.tesente=" & "'" & recupero_codente & "'" & "ORDER BY " & "'" & lstRisco.SelectedItem.Value & "'"
Dim objCommand as New OleDbCommand(strSQL, objConn)
Dim objDataReader as OleDbDataReader
objDataReader = objCommand.ExecuteReader(CommandBehavior.CloseConn ection)
dgrisco.DataSource = objDataReader
dgrisco.DataBind()
lblMessaggio.Text = "Incassi Per " & lstRisco.SelectedItem.Text & " per il comune " & recupero_denom
end if
End Sub
Come posso testare dgrisco?
Grazie a tutti

Rispondi quotando