Hi, the following code should normally display the elements within the SELECT tags vertically, but it does only display them horizontally no matter what I do. Everything works except for proper diplaying direction of the elements. I've tried different scenarios, but the outcome was the same. Am I missing something, or am I taking the wrong way? I'm new in ASP.

Thanks for your help..

<%
      Dim objConn, CourseNameVal
    Set objConn = Server.CreateObject("ADODB.Connection")
    objConn.Open "Provider=Microsoft.Jet.OLEDB.4.0;" & _
                 "Data Source=" & Server.MapPath(".") & "\CourseContent.mdb;" & _
                 "User ID=admin;" & _
                 "Password="

    Dim objRS
    Set objRS = Server.CreateObject("ADODB.Recordset")
    objRS.Open "CourseContentTable", objConn,,, adCmdTable
%>
<select>
        <option>
<%
    'Read course content table.
     Do until objRS.EOF
     CourseNameVal = objRS("CourseName")
     Response.Write CourseNameVal
%>
       <br /> -> I know this tag should not be here, but I'm miss
                   resources. With or without, it's the same.
<%
       objRS.MoveNext
     Loop
%>
        </option>
</select>

<%
     'Clean up everything.
     objRS.Close
     Set objRS = Nothing

     objConn.Close
     Set objConn = Nothing
%>


Ramez

__________________
Ramez

Hi again,

I've found where was the problem. The problem was where I've put the two options tags. This new segment of the program is the correct segment that I'm putting here for helping others who might get the same problem.

Thanks if you've tried to help, but did not have the time to answer.

<%
      Dim objConn, CourseNameVal
    Set objConn = Server.CreateObject("ADODB.Connection")
    objConn.Open "Provider=Microsoft.Jet.OLEDB.4.0;" & _
                 "Data Source=" & Server.MapPath(".") & "\CourseContent.mdb;" & _
                 "User ID=admin;" & _
                 "Password="

    Dim objRS
    Set objRS = Server.CreateObject("ADODB.Recordset")
    objRS.Open "CourseContentTable", objConn,,, adCmdTable
%>
<select>

<%
    'Read course content table.
     Do until objRS.EOF
     CourseNameVal = objRS("CourseName")
%>
<option>
     <%= CourseNameVal %>
</option>

<%
       objRS.MoveNext
     Loop
%>

</select>

<%
     'Clean up everything.
     objRS.Close
     Set objRS = Nothing

     objConn.Close
     Set objConn = Nothing
%>


Ramez

Yes, not to be forgotten, for every list item to be displayed, you should start with an <OPTION> tag and end with a </OPTION> tag. It is only enough to keep the SELECT tags outside the while loop.

Cheers!

_________________________
- Vijay G
Strive for Perfection

Thanks,

I will remember. Textarea tag is not as straitforward though. I'm working on it.

Cheers

Ramez



Ramez

Textarea tag doesn't have value attribute as other input tags do. It has got to open with <textarea> and end with </textarea> the content comes inbetween those tags.

EG:
<textarea>My text is not your text, My text is not your text, My text is not your text, My text is not your text, My text is not your text</textarea>

Remeber, not to break the line before you close the textarea tag like this

<textarea>text
</textarea>

as it puts extra spaces/tab space within the control when viewed on the browser, and on focus the cursor is placed not on left top corner instead.

Hope that helps.
Cheers!

_________________________
- Vijay G
Strive for Perfection

Yes, there was a lot of tabs or breaks in my text as you are pointing.
Finally, since I elected to use the "SELECT and GO" strategy, I decided to use the select and option tags which seem cleaner to me and more of practicle use in my situation.

Thanks again,

Cheers

Ramez