Riuso codice

mercoledì 07 aprile 2004 - 09.30

Elenco Threads

Stanze Forum

Aggiungi ai Preferiti

Cerca nel forum

wsaurim Profilo | Newbie

43 messaggi | Data Invio: mer 7 apr 2004 - 09:30

Ciao people,

come posso rendere riusabile un codice tipo questo, visto che ora lo ripeto sempre?

Try
Dim link As OleDbConnection
Dim strLink As String
Dim cmdSelect As OleDbCommand
Dim dataReader As OleDbDataReader
link = New OleDbConnection()
link.ConnectionString = common.BuildConnectionString()
link.Open()
Dim AdapterClienti As New OleDbDataAdapter("Select Cognome, Nome, Via, Comune, Cellulare , Telefono, email, Vip, id_cliente as ID from clienti", link)
Dim myDataSet As New DataSet()
AdapterClienti.Fill(myDataSet, "clienti")
DataGridClienti().DataSource = myDataSet.Tables("clienti").DefaultView
Catch thisExcept As Exception
MsgBox(thisExcept.Message)
End Try

Grazie 1K!

Ciao, Auri

freeteo Profilo | Guru

6.542 messaggi | Data Invio: mer 7 apr 2004 - 11:15

ciao
per renderlo riusabile devi farlo diventare 1a funzione (o meglio ancora 1a classe ;-) dove gli passi come parametri gli oggetti... tipo:

private bool mioMetodo(string pStringaSql,object pControllo)
{
....costruisci i command con la stringa sql che gli passi...
....dentro fai il case sul tipo di controllo e gli setti il datasource etc...
....ti fai tornare true o false a seconda che ci siano delle exception....

...se ti mancano degli oggetti glieli passi...

è 1idea ;-)

Torna su

Stanze Forum

Elenco Threads

Partecipa anche tu! Registrati!

Hai bisogno di aiuto ?
Perchè non ti registri subito?

Dopo esserti registrato potrai chiedere
aiuto sul nostro Forum oppure aiutare gli altri

Consulta le Stanze disponibili.

Registrati ora !