<pre> cmd = New SqlCeCommand("Select Id, Name FROM Product WHERE Name <>''", con) If con.State = ConnectionState.Closed Then con.Open() Dim sdr As SqlCeDataReader = cmd.ExecuteReader() While sdr.Read = True Product.Items.Add(sdr.Item("Name")) End While sdr.Close()
... Dim sdr As SqlCeDataReader = cmd.ExecuteReader() Dim concatenatedResult As String concatenatedResult = "" While sdr.Read = True If concatenatedResult <> "" Then concatenatedResult = concatenatedResult & " / " End If concatenatedResult = concatenatedResult + sdr.Item("Name").ToString() End While MyTextBox.Text = concatenatedResult ...
SELECT REPLACE(GROUP_CONCAT(name),",","/") FROM product WHERE Name <>''"
var
This content, along with any associated source code and files, is licensed under The Code Project Open License (CPOL)