Query di accodamento

lunedì 11 dicembre 2006 - 17.55

jekisi Profilo | Senior Member

Salve a tutto il forum, avrei il seguente problema:
in un form ho tre datagridview.
La prima mi visualizza tutti i DDT (Documenti Di Trasporto) che come Cliente hanno il valore uguale a TextBox1.text e che come Fatturata hanno N.
Passando una riga alla datagridview2, il valore Fatturata diventa S e il campo Fattura prende il valore della TextBox3.text.
Adesso, passando una riga alla datagridview2, nella terza datagridview, mi dovrebbero spuntare tutte le righe del documento che passo alla datagridview2.
So che basterebbe una select con la where, ma il discorso è un pò diverso, mi spiego:
Se passo una sola riga da datagridview1 a datagridview2, nella terza mi dovrebbero spuntare solo le righe di quel solo documento, ma se passo dalla prima alla seconda, 2 righe, allora nella terza mi dovrebbero spuntare le righe di tutte e due documenti.
In vb 6, per risolvere questo problema avevo fatto:

Public Sub ImpostaRecordSourceData4()
Dim strsqlddt As String
Dim strsql As String
strsqlddt = "(SELECT DDT FROM tddt WHERE cliente=" & Text1.Text & " AND fattura=" & Text9.Text & " and fatturata='S')"
strsql = "SELECT * FROM RDDT WHERE DDT IN " & strsqlddt
With Data4
.RecordSource = strsql
.Refresh
End With
End Sub

dopo di che

il button2, oltre che eseguire tutte le varie istruzioni, mi eseguiva alla fine anche questa:
ImpostaRecordSourceData4

Adesso, però, non riesco ad applicare questa con in Vb 2005, ho provato così:

Public Sub ImpostaRecordSourceData4()
Dim strsqlddt As String
Dim strsql As String
strsqlddt = "(SELECT DDT FROM tddt WHERE cliente=" & TextBox1.Text & " AND fattura=" & TextBox3.Text & " and fatturata='S')"
strsql = "SELECT * FROM RDDT WHERE DDT IN " & strsqlddt
With BindingSource1
.DataSource = strsql
'.Refresh()

End With
End Sub


Ma il refresh non riesco ad applicarlo.

Dovrei aaplicarlo sul Bondigsource, ma

BindingSource1.refresh non sta nelle proprietà del binding.

Qualcuno di voi sa aiutarmi su questa cosa?


Distinti Saluti Fabio Messina
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 !
Copyright © dotNetHell.it 2002-2024
Running on Windows Server 2008 R2 Standard, SQL Server 2012 & ASP.NET 3.5