602SQL-┌plnß dokumentace Index   Tisk  

SetVariable (WBIK)

Formßt p°φkazu:

SetVariable: jmΘno_existujφcφ_prom∞nnΘ:=v²raz_definujφcφ_novou_hodnotu

V²znam:

Tento blok slou₧φ ke zm∞n∞ hodnoty existujφcφ vstupnφ formulß°ovΘ prom∞nnΘ nebo prom∞nnΘ zφskanΘ pomocφ GetVariable a DeclareVariable p°ed tφmto blokem konektoru.

V²raz_definujφcφ_novou_hodnotu je konstruovan² podle pravidel pro v²razy, m∙₧e obsahovat nßzvy vstupnφch formulß°ov²ch prom∞nn²ch, nßzvy select∙ a sloupc∙, kterΘ byly vyhodnoceny v pojmenovanΘm SQLStatement p°ed tφmto blokem a nßzvy HTW prom∞nn²ch zφskan²ch pomocφ GetVariable a DeclareVariable p°ed tφmto blokem. V²raz m∙₧e obsahovat i starou hodnotu prom∞nnΘ.

Typ existujφcφ prom∞nnΘ a typ v²razu musφ b²t kompatibilnφ (bu∩ stejn², nebo lze p°i°adit Integer do Real prom∞nnΘ, p°φpadn∞ naopak);

P°φklad 1:

Na zaΦßtku konektoru se vytvo°φ prom∞nnß typu Boolean s hodnotou FALSE, podle v²sledku SELECTu se p°φpadn∞ zm∞nφ na TRUE:

<%WBC%>
DeclareVariable: Logged :=FALSE
SQLStatement: Login
+ SELECT id,jmeno,heslo
+ FROM Logtable
+ WHERE jmeno="%name%" AND heslo="%passw%"
EndSQL
#if exists Login[0].id
SetVariable: Logged :=TRUE
#endif
<%/WBC%>

Nßsledujφcφ Üablona m∙₧e vypadat:

<%if Logged = TRUE%>
  P°ihlßÜen jako <B><%Login.jmeno%></B>.<BR>

...

<FORM ACTION="<%wb_url%>/next.htw" METHOD="POST">
<INPUT TYPE="Submit" VALUE="P°edat parametry">
<INPUT TYPE="Hidden" NAME="name" VALUE="<%login.jmeno%>">
<INPUT TYPE="Hidden" NAME="passw" VALUE="<%login.heslo%>">
</FORM>
<%else%>
  P°ihlßÜenφ ne·sp∞ÜnΘ.<BR>
<%endif%>