Appending string in asp

Greeting,

I have the following format in a table.

ID   Desc
--    -----
1     this is
2     a
3     test

what I want to have is a string="this is a test". Basically, use the select statement then append the Desc field.   the ID can be null or up to any number.

thanks.

mrongAsked:
Who is Participating?
 
alsaanConnect With a Mentor Commented:
Dim rsData, string
Set rsData = Server.CreateObject("ADODB.Recordset")

rsData.Open "SELECT desc FROM table ORDER BY id;", connstring

While Not rsData.EOF
    string = string & rsData("desc")
    rsData.EOF
Wend

Set rsData = Nothing
0
 
alsaanCommented:
Um... the second "rsData.EOF" actually should be "rsData.MoveNext"

Greets
0
 
MasoudghCommented:
alssam's code is right but forget " "
string = string & " " & rsData("desc")
0
 
Anthony PerkinsConnect With a Mentor Commented:
Some minor corrections:

Dim rsData, Value               'String is a keyword
Set rsData = Server.CreateObject("ADODB.Recordset")

rsData.Open "SELECT desc FROM table ORDER BY id;", connstring
Value = ""
While Not rsData.EOF
    If Not IsNull(rsData("desc")) Then
       If Len(rsData("desc")) > 0 Then
          If Len(Value) > 0 Then
              Value = Value & " "
          End If
          Value = Value & rsData("desc")
       End If
     End if
    rsData.MoveNext                            ' MoveNext here
Wend
rsData.Close
Set rsData = Nothing
0
Question has a verified solution.

Are you are experiencing a similar issue? Get a personalized answer when you ask a related question.

Have a better answer? Share it in a comment.

All Courses

From novice to tech pro — start learning today.