I am trying to display TWO combo boxes on my ASP Front end. I call the function to do this from VB BACK END, however only ONE combo box is displayed(instead of TWO):

Here's my code which should generate two combo boxesMaybe the layout isnt correct??? Any suggestions?

Public Sub sb_ListStandardJourney()

Dim obj As New DCStrdJourneyClass
Dim rs As New ADODB.Recordset
Set rs = obj.fn_ListStandardJourney
rs.Open
g_objSC.Response.Write "<select name=select1>" & vbCrLf
Do While Not rs.EOF
g_objSC.Response.Write "<option value=" & rs(0) & ">" & rs(1) & "</option>" & vbCrLf
rs.MoveNext
Loop
g_objSC.Response.Write "</select>" & vbCrLf

'NOW FOR MY SECOND COMBO!..

g_objSC.Response.Write "<select name=select2>" & vbCrLf
Do While Not rs.EOF
g_objSC.Response.Write "<option value=" & rs(0) & ">" & rs(1) & "</option>" & vbCrLf
rs.MoveNext
Loop
g_objSC.Response.Write "</select>" & vbCrLf

End Sub


Then i call this function from my ASP PAGE:
<%
Dim obj
set obj = server.CreateObject("UCStandardJourney.UCStrdJourneyClass")
CALL obj.sb_ListStandardJourney
Set obj = Nothing
%>

Whats the problem??????????????????????????????