class= " lineNumbers "
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:
|
class=
>< " class= " id= " codeSnippet762218
<%
Тусклый член
Установите член = jsObject ()
установите conn=Server.CreateObject («ADODB.Connection»)
conn.ConnectionString= " DSN=sql.dsn; database=db24; UID=reader; PWD=k34ghh65hnsh5463 "
conn. Открыто
jmode = запрос. Сформируйте («jmode»)
load_mode = request.QueryString («profile_id»)
если jmode = «добавляет» после этого
jmode elseif = «редактирует» после этого
jmode elseif = «delete» после этого
еще
'нагрузите его
pStr = «приватно, никак-тайник, -revalidate»
Response.ExpiresAbsolute = #2000-01-01#
Response.AddHeader «прагма», «никак-тайник»
Response.AddHeader «тайник-управление», pStr
реакция. Напишите «{обозначение: «удостоверение личности», ярлык: «удостоверение личности», детали: »
QueryToJSON (conn, «отборное удостоверение личности, type_code, f_id, имя, address_l1, address_l2, город, положение, o_officer, phone_number, описание, количество от dbo.PRIMARY_Non») .flush
реакция. Напишите «}»
закончитесь если
conn. Закройте
%>
|