STRINGS

ALAUDO 30/07/2009 09:00:30
#318292
estou a tentar juntar strings, mas não estou a conseguir fazer.


Dim SQL_a_cheque11 As String = [Ô]SELECT t_movimentos.cod_mov FROM t_movimentos INNER JOIN t_mov_aux ON t_movimentos.id_mov = t_mov_aux.id_mov[Ô] [ô] WHERE (t_mov_aux.cod_aux = [Ô] & total & [Ô] )[Ô]
Dim da_aux_cheque11 = New SqlDataAdapter(SQL_a_cheque11, connection4)
Dim ds_aux_cheque11 = New DataSet
da_aux_cheque11.Fill(ds_aux_cheque11, [Ô]t_movimentos[Ô])

Dim v_cod_mov As String
Dim dttt As DataRow

For Each dttt In ds_aux_cheque11.Tables(0).Rows
v_cod_mov = dttt.Item(0)

Next


Com este codigo estou a fazer o select o cod_mov e queria juntar todos os cod_mov numa só váriavel e guarda-la na variavel v_cod_mov para depois guardar numa auxiliar.

Alguem me pode ajudar??
TECLA 30/07/2009 09:14:24
#318297
.
.
.
For Each dttt In ds_aux_cheque11.Tables(0).Rows
v_cod_mov += dttt.Item(0)
Next
Tópico encerrado , respostas não são mais permitidas