Ciao a tutti,inserisco in un datatable delle righe con dei valori presi da una query che possono essere anche uguali.
Io vorrei fare in modo che in fase di inserimento il programma mi inserisca solo un elemento,e non anche tutti quelli uguali,com potrei fare??
Grazie
Questo è il codice:
K è una variabile che contiene dei valori presi da una query.codice:ConnDBF2.Open() Dim DBFCol2 As New OleDb.OleDbCommand("SELECT DISTINCT BRCOL,BRTG,BRGINI FROM [TMPMA_1_.DBF] WHERE BRCODART=('" & x & "')", ConnDBF2) 'MsgBox(x) reader3 = DBFCol2.ExecuteReader Dim K, F, D As String Do While reader3.Read If reader3.IsDBNull(0) = False Then K = CStr(reader3.GetValue(0)) If InStr(K, "'", CompareMethod.Text) Then K = K.Replace("'", "''") End If Else K = " " End If If reader3.IsDBNull(1) = False Then F = CStr(reader3.GetValue(1)) If InStr(F, "'", CompareMethod.Text) Then F = F.Replace("'", "''") End If Else F = " " End If If reader3.IsDBNull(2) = False Then D = CStr(reader3.GetValue(2)) If InStr(D, "'", CompareMethod.Text) Then D = D.Replace("'", "''") End If Else D = " " End If Dtable2.Rows.Add.Item(0) = K
e nella query uso già la select distinct ma non funziona.
Come posso fare?

Rispondi quotando
