class= " lineNumbers " de
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= de
>< " de l'id= " codeSnippet762218 de
< ! ---- file= " JSON_UTIL_0.1.1.asp " de #include ---->
<%
Faible membre
Placer le membre = le jsObject ()
placer conn=Server.CreateObject (« ADODB.Connection »)
conn.ConnectionString= " DSN=sql.dsn ; database=db24 ; UID=reader ; PWD=k34ghh65hnsh5463 "
conn. Ouvert
jmode = demande. Former (« jmode »)
load_mode = request.QueryString (« profile_id »)
si le jmode = « s'ajoutent » alors
le jmode d'elseif = « éditent » alors
jmode d'elseif = « suppression » puis
autrement
'la charger
le pStr = « privé, aucun-cachette, doit-revalidate »
Response.ExpiresAbsolute = #2000-01-01#
Response.AddHeader « pragma », « aucun-cachette »
Response.AddHeader « cachette-commande », pStr
réponse. Écrire « {marque : « identification », étiquette : « identification », articles : »
QueryToJSON (conn., « identification choisie, type_code, f_id, nom, address_l1, address_l2, ville, état, o_officer, phone_number, description, quantité de dbo.PRIMARY_Non ») .flush
réponse. Écrire « } »
finir si
conn. Se fermer
%>
|