09-14-2004, 05:35 AM | #1 (permalink) |
Upright
|
[VB.Net] Creating a comma seperated value list with single quotes...
I am trying to go through all the parameters from a certain multi-select box of the request object and generate a CSV list with each value wrapped in a pair of single quotes. What I have is:
Code:
ChmclsCSV = "" For Each p In Request.Params.Keys If p = "sltChmcl" Then If ChmclsCSV.Length = 0 Then ChmclsCSV = "'" & Request.Params(p).ToString() & "'" Else ChmclsCSV = ChmclsCSV & " , '" & Request.Params(p).ToString() & "'" End If End If Next Trace.Write("Chemicals List:" & ChmclsCSV) Chemicals List:'100-01-6,100-41-4,100-42-5' Those are the right values, but you can see that there should be more quotes between each of the values. Anyone know what's going on? |
09-18-2004, 11:00 AM | #2 (permalink) |
Upright
Location: Colorado
|
Code:
Dim aStuff(20) As String Dim i As Int32 Dim s As String Dim csv As String For i = 0 To 20 aStuff(i) = Chr(65 + i) Next For Each s In aStuff If Len(csv) > 0 Then csv += "'," End If csv += "'" + s Next csv += "'" 'A','B','C','D','E','F','G','H','I','J','K','L','M','N','O','P','Q','R','S','T','U' |
09-18-2004, 06:47 PM | #3 (permalink) | |
Tilted
|
Quote:
If correct, then you don't even need the for; you could simply have (vapor code; I come from C# land): Code:
ChmclsCSV = "'" & Request("sltChmcl").Replace(",", "','") & "'" |
|
Tags |
comma, creating, list, quotes, seperated, single, vbnet |
|
|