Pull Down List mit Daten füllen !

Hallo !

Ich bin gerade dabei eine Suchmaske mit einigen PulldownList zu erstellen. Ich habe es so weit geschafft das sich EINE PdL. mit Daten aus der Datenbank füllt, jedoch bei den anderen 4 funkt es nicht.

Ich versuche es mit ASP:

<%

Set objConn = Server.CreateObject("ADODB.Connection")

objConn.Open "itcatalog"

SQL = "SELECT distinct CustomerName, CustomerCountry FROM tCustomers"

Set objRS = Server.CreateObject("ADODB.Recordset")

objRS.Open SQL, objConn, 3, 3

If Not objRS.EOF Then

Response.Write "<select name=""selTest"" size=""1"">"

Do While Not objRS.EOF

Response.Write "<option value=""" & objRS.Fields("CustomerName") & """>" & objRS.Fields("CustomerCountry")objRS.MoveNext

Loop

end if

objRS.Close

Set objRS = Nothing

objConn.Close

Set objConn = Nothing

%>

Na kann mir jemand weiterhelfen ???