sp1000je
50 lines
1.4 KiB
Plaintext
50 lines
1.4 KiB
Plaintext
<!--#include virtual="/common/lib/dbcon.asp"-->
|
|
<!--#include virtual="/common/lib/func.asp"-->
|
|
<%
|
|
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
|
|
%>
|
|
<li><dl><dt>구성원 없음</dt></dl></li>
|
|
<%
|
|
Else
|
|
For i = 0 To ubound(rs)
|
|
ST.arr2Value( rs(i) )
|
|
m_mobile = m_mobile1 & m_mobile2 & m_mobile3
|
|
%>
|
|
|
|
|
|
<li>
|
|
<input type="checkbox" id="chk_m_num_<%=m_num%>" name="chk_m_num" value="M;<%=m_name%>;<%=m_mobile%>" data-mobile="<%=m_mobile%>" data-count="1" />
|
|
<dl>
|
|
<dt><label for="chk_m_num_<%=m_num%>"><%=m_name%></label></dt>
|
|
<dd><label for="chk_m_num_<%=m_num%>"><%=m_mobile%></label></dd>
|
|
</dl>
|
|
</li>
|
|
<%
|
|
next
|
|
End if
|
|
%> |