1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
| <%@LANGUAGE="VBSCRIPT" CODEPAGE="65001"%>
| <%Session.CodePage=65001%>
| <!--#include virtual="/inc/chkadmin.gds"-->
| <!--#include virtual="/inc/function.gds"-->
| <script language=javascript>
| <%
| searchTXT=trim(Request("searchTXT"))
|
|
| i=0
| Set rs = Server.CreateObject("ADODB.Recordset")
| if searchTXT<>"" then
| sql="select OA_User_ID,OA_User,OA_Name,OA_mobile from OA_User where (OA_Name like '%"&searchTXT&"%' or OA_mobile = '"&searchTXT&"') order by OA_User_ID"
| else
| sql=""
| end if
|
| if sql<>"" then
| rs.open Sql,objConn,1,1
| if not rs.eof then
| OAID = rs("OA_User_ID")
| OA_User = rs("OA_User")
| OA_Name = rs("OA_Name")
| OA_mobile = rs("OA_mobile")
| end if
| rs.close()
| end if
|
| if OAID<>"" then
| %>
| parent.JS_UserData('<%=OAID%>','<%=OA_Name%>');
| <%else%>
| parent.JS_UserData('','人员错误');
| <%end if%>
| </script>
| <%Response.End%>
|
|
