함수 writeSlt(arrstr,arrstrValue,selectedstr)
'arrstr 옵션에 표시될 값, arrstrValue 옵션의 실제 값, selectedstr 선택할 기본값
'문자열을 배열로 분할하고 선택한 옵션을 출력하고 selectedstr arrstr&arrstrValue를 선택하여 동일한 길이를 갖습니다.
arr=분할(arrstr,",")
arrValue=split(arrstrValue,",")
j=0
j<=ubound(arr) 동안 수행
if Trim(arrValue(j))=trim(selectedstr) 다음
response.write "<옵션 값='" & arrValue(j) & "' 선택됨>" & arr(j) & "</option>"
또 다른
response.write "<옵션 값='" & arrValue(j) & "'>" & arr(j) & "</option>"
종료하면
j=j+1
고리
함수 종료
데이터베이스에서 데이터를 읽어 쉼표로 구분된 문자열을 형성하여 select의 <option>
함수 getArrString(table,fld,cond,sortfld)를
동적으로 생성할 수 있습니다.
'지정된 테이블에서 지정된 필드의 데이터를 가져오고 쉼표로 구분된 문자열을 반환합니다.
rs=server.createobject("adodb.recordset")를 설정합니다.
sql="select " & fld & " from " & 테이블
len(cond)>0이면
sql=sql & " where " & 조건
종료하면
len(sortfld)>0이면
sql=sql & " 주문 기준 " & sortfld
종료하면
rs.SQL,conn,1,1 열기
그렇지 않은 경우(rs.bof 또는 rs.EOF)
rs.EOF가 아닌 동안 수행
getArrString=getArrString & 트림(rs(fld)) & ","
rs.이동다음
고리
종료하면
getArrString=왼쪽(getArrString,len(getArrString)-1)
RS.닫기
rs=아무것도 설정하지 않음
함수 종료