어떻게 드 롭 다운 목록 으로 데이터베이스 안의 내용 을 표시 합 니까?

<%Dim obj DC,obj RSSet obj DC=Server.CreateObject("ADODB.Connection")obj DC.Connect Timeout=15obj DC.CommandTimeout=30'데이터베이스 연결 obj DC 를 만 듭 니 다.Open"DBQ="&Server.MapPath("database.mdb")&";Driver={Microsoft Access Driver (*.mdb)};DriverId=25;MaxBufferSize=8192;Threads=20;", "username","password"'Access 데이터베이스 obj DC 를 사용 합 니 다.열기  애플 리 케 이 션("SQLConnString"),애플 리 케 이 션("SQLUsername"),애플 리 케 이 션("SQLPassword")Set obbers=Server.CreateObject("ADODB.Recordset")'기록 집 만 들 기 및 검색'사용 전 커서(0)와 읽 기 전용 모드(1)기록 집 열기'특정 id 요청 이 읽 히 면 If Len(Request.QueryString("id")<>0 Then      ' id 에 따라 해당 하 는 기록 읽 기      objRS.Open "select * from intelsdb WHERE id=" & Request.QueryString("id"), objDC, 0, 1      ' 선택 한 기록 보이 기      If Not objRS.EOF Then            objRS.MoveFirst            %>                                                                                                                                                                                                                                                                                               

ID	이름	부서	월간 판매
<%= objRS.Fields("id") %>	<%= objRS.Fields("name") %>	<%= objRS.Fields("department ") %>	<%= objRS.Fields("sales") %>

            <%      End If      obbers.CloseEnd Ifobjrs.Open"intelsdb",objectDC,0,1'순환 으로 기록 집합 을 읽 고 결 과 를 표시 합 니 다 If Not obbers.EOF Then      objRS.MoveFirst      ' 다음 표 는 Query String 에 있 는 id 의 내용 을 호출 합 니 다.      %>     

                        <%      ' 기록 집 을 다 읽 을 때 까지.      Do While Not objRS.EOF            ' 모든 기록 에 대해 직원 id 에 선택 탭 을 만 들 고 해당 하 는 값 을 설정 합 니 다.            %>            "><%= objRS.Fields("name")  %>            <%      ' 다음 기록 가 져 오기      objRS.MoveNext      Loop      %>                 

      <%End If'obj 를 닫 고 비 웁 니 다.CloseSet obj RS=  NothingobjDC.CloseSet objDC = Nothing%>