<%
Dim bdm_idx
Dim ST, sql, s_fileds
bdm_idx = InputValue( request("bdm_idx") )
sh_keyword = InputValue( request("sh_keyword") )
Set ST = New SelectTable
s_fileds = "m_num, m_name, m_mobile1, m_mobile2, m_mobile3"
where_query = " where m_mobile1 <> '' and m_mobile2 <> '' and m_mobile3 <> ''"
If bdm_idx <> "" Then
where_query = where_query & " and bdm_idx = '" & bdm_idx & "'"
End if
If sh_keyword <> "" Then
where_query = where_query & " and ( m_name like '%" & sh_keyword & "%' or m_mobile1 like '%" & sh_keyword & "%' or m_mobile2 like '%" & sh_keyword & "%' or m_mobile3 like '%" & sh_keyword & "%' ) "
End if
order_by = " order by m_name "
sql = "select " & s_fileds & " from member " & where_query & order_by
'Response.write sql
rs = ST.selectQueryTable( sql )
If isnull(rs) Then
%>
구성원 없음
<%
Else
For i = 0 To ubound(rs)
ST.arr2Value( rs(i) )
m_mobile = m_mobile1 & m_mobile2 & m_mobile3
%>