<%
Schwaches Mitglied
Mitglied = jsObject einstellen ()
conn=Server.CreateObject („ADODB.Connection“) einstellen
conn.ConnectionString= " DSN=sql.dsn; database=db24; UID=reader; PWD=k34ghh65hnsh5463 "
Anschl. Geöffnet
jmode = Antrag. Bilden („jmode“)
load_mode = request.QueryString („profile_id“)
wenn jmode = dann „hinzufügen“
elseif jmode = „redigieren“ dann
elseif jmode = „Löschung“ dann
sonst
'sie laden
pStr = „privat, Keinpufferspeicher, muss-revalidate“
Response.ExpiresAbsolute = #2000-01-01#
Response.AddHeader „Pragma“, „Keinpufferspeicher“
Response.AddHeader „Pufferspeichersteuerung“, pStr
Antwort. Schreiben „{Bezeichner: „Identifikation“, Aufkleber: „Identifikation“, Einzelteile: “
QueryToJSON (Anschl., „auserwählte Identifikation, type_code, f_id, Name, address_l1, address_l2, Stadt, Zustand, o_officer, phone_number, Beschreibung, Menge von dbo.PRIMARY_Non“) .flush
Antwort. Schreiben „}“
beenden wenn
Anschl. Schließen
%>
|