Riferimento: [.net] apertura e chiusura dei form
Citazione:
Originariamente Scritto da
Frykky
ho tolto l'opzione "Option Strict -> OFF".
E' cosa buona e giusta...
Citazione:
Ora Locale vuole un valore booleano. L'IDE mi suggerisce di scrivere
Codice:
CBool(dr("Locale"))
e di conseguenza CShort, Cdate etc....
ma volevo sapere se è corretto :)
In linea di massima è corretto, purchè tu sia sicuro del tipo di dato contenuto nella tua variabile, perchè altrimenti il cast può fallire con eccezione... se ci sono dubbi (non è deto che il valore così come contenuto su DB sia castabile in maniera trasparente sull'equivalente .NET, vedi ad esempio potenziali campi NULL), è meglio optare per le varie funzioni <tipo di dato>.TryCast a disposizione, che trovi descritte sull guida.
Nel tuo caso specifico, immagino, dal nome, che si stia parlando di un DataReader... se è così allora esistono già funzioni incorporate; basta non usare la sintassi "vecchio stile VB" per leggere i valori, ma quella "lunga"
Quindi, invece di 'dr("Locale")', puoi usare esplicitamente 'dr.GetBoolean(dr.GetOrdinal("Locale"))' e così via per gli altri tipi di dato
Citazione:
E' possibile parametrizzare l'arraylist a "Image"?
Mi sa di no vero?
Non ho capito cosa intendi...
Riferimento: [.net] apertura e chiusura dei form
Sono faticosamente arrivato a 10 errori :)
La domanda dell'arraylist deriva dal fatto che nell'istruzione
Codice:
Public ImgArray As New ArrayList
Private Sub cmdPrevImg_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles cmdPrevImg.Click
Try
indice = indice - 1
PictureBox.Image = ImgArray.Item(indice)
txtImgVisualizzata.Text = indice + 1
Catch ex As ArgumentOutOfRangeException
Try
indice = ImgArray.Count - 1
PictureBox.Image = ImgArray.Item(indice)
txtImgVisualizzata.Text = indice + 1
Catch ex2 As ArgumentOutOfRangeException
Exit Sub
End Try
End Try
lui, giustamente, mi dice che non può convertire da Object a System.Drawing.Image.
Allora pensavo che si potesse parametrizzare l'array list a Image coi Generics.
Li per li scrivevo
Public ImgArray As New ArrayList (Of Image)
ma mi dava errore.
quindi sono andato su msnd e ho visto che quello ceh volevo fare io (previa tua approvazione) si ottiene con
Public ImgArray As New Generic.List(Of Image)
Riferimento: [.net] apertura e chiusura dei form
Da parte di frykky, che nn può postare in quanto bananato :asd:
Citazione:
Ciao Larsen,
torno a scassarti
Uso l'account di un mio compare perchè sono stato ingiustamente bannato (lunga storia di flame in Bar Sport :
Ho un problema enorme con i report fondamentalmente perchè non li ho mai usati e non ne vengo a capo (ma come sono facili da fare con Access no?)ù
In questo form chiamato "statistiche" devo interrogare il database per sapere quante sono le chiamate chiuse, quante quelle annullate, quante quelle prese correttamente etc.. e visualizzare tutti i dati in alcune caselle di testo
domanda 1 (facoltativa): io per farlo ho fatto 5 query e 5 txtblabla.text=[mio sqlcommand].executescalar.tostring ma sono più che certo che non è il metodo corretto : :
domanda 2: Voglio stampare questi dati appena presi dal database. Mi sono dunque fatto il mio report.rdlc con tutte le descrizioni dei campi e tutte le caselle di testo pronte per essere riempite (fondamentalmente è la stampa a video del form, stessi campi e stessi nomi).
Ora come cappero faccio a passargli i valori? Giuro che non l'ho capito!
Help
PS Sono ricchione ora posso dirlo
Riferimento: [.net] apertura e chiusura dei form
Ti scrivo sempre da un altro account:
Citazione:
Per quanto riguarda la domanda 1 il codice per ora l'ho cambiato così
Codice:
Dim da As New SqlClient.SqlDataAdapter()
Dim dsprova As New DataSet
Dim dt As New DataTable()
da.SelectCommand = hSSConn_Command
da.Fill(dsprova, "Sessioni")
dt = dsprova.Tables("Sessioni")
txtTotaleRichieste.Text = dt.Rows.Count.ToString
txtRichiesteBuonFine.Text = dt.Select("Stato='CL' and Motivo_annullamento = ' '").Length.ToString
txtRichiesteAnnullate.Text = dt.Select("Motivo_annullamento <> ' '").Length.ToString
'txtAbort.Text = dt.Select("Stato='AB'").Length.ToString
txtDIS.Text = dt.Select("Motivo_Annullamento='DIS'").Length.ToString
txtPER.Text = dt.Select("Motivo_Annullamento='PER'").Length.ToString
txtTEC.Text = dt.Select("Motivo_Annullamento='TEC'").Length.ToString
txtTEM.Text = dt.Select("Motivo_Annullamento='TEM'").Length.ToString
txtWWW.Text = dt.Select("Motivo_Annullamento='WWW'").Length.ToString
txtAttesaMedia.Text = dt.Compute("AVG(Attesa)", "").ToString
txtDurataMedia.Text = dt.Compute("AVG(Durata)", "").ToString
meglio?
invece per la 2 ancora nulla :(
Riferimento: [.net] apertura e chiusura dei form
Devo aver raggiunto il limite di sopportazione di LarsenB :asd:
Riferimento: [.net] apertura e chiusura dei form
scusate ilo necroposting ma mi spiegate come mai un filesystemwatcher incluso in una form non si chiude se faccio
Codice:
form.dispose
form.close
form=nothing
?
Me ne sono accorto oggi perchè questa form ha un filesystemwatcher che alla creazione di un file pdf scatena l'evento OnCreated e lo invia via ftp da un'altra parte. Oggi vado a controllare e c'erano file che non ci dovevano essere. Faccio delle prove e mi accorgo che nonostante i 3 comandi prima vengano eseguiti il filesystemwatcher continua a girare anche se l'utente crea un pdf fuori dal programma.
Ho risolto facendo
Codice:
form.filesystemwatcher1.dispose
form.filesystemwatcher1..close
form.filesystemwatcher1.=nothing
form.dispose
form.close
form=nothing
però volevo capire perchè succedere questa cosa