PageRenderTime 5ms CodeModel.GetById 2ms app.highlight 0ms RepoModel.GetById 1ms app.codeStats 0ms

/SQL/scripts/pref/language.asp

http://github.com/khaneh/Orders
ASP | 42 lines | 37 code | 5 blank | 0 comment | 0 complexity | 4cf0f0d090989ac8f68ad313805617e2 MD5 | raw file
 1<!-- #INCLUDE FILE="../inc/mla_sql_include.asp" -->
 2<%
 3	Dim myStrTree
 4
 5	If Request.Form("mla_cfg_cancel") <> "" Then
 6		Response.Redirect "default.asp"
 7		Response.End
 8	End If
 9
10	If Request.Form("mla_cfg_submit") <> "" Then
11		Response.Cookies("Option")("Lng") = Request.Form("mla_cfg_lng")
12		Response.Cookies("Option").Expires = #1/1/2020#
13		Response.Redirect "default.asp?refresh=1"
14		Response.End
15	End If
16
17	myStrTree = getTreeStr("3_2", Array())
18%>
19
20<!-- #INCLUDE FILE="../inc/metaheader.asp" -->
21<BODY>
22	<P CLASS="treeinfo"><% = myStrTree %></P>
23	<FORM NAME="mla_cfg" METHOD=POST ACTION="language.asp">
24		<TABLE BORDER=0 CELLPADDING=2 CELLSPACING=0 CLASS="hcontent" SUMMARY="Option Form">
25			<TR><TD CLASS="caption" COLSPAN=2><% = myTObj.getTerm(22) & " \ " &  myTObj.getTerm(24) %></TD></TR>
26			<TR>
27				<TD CLASS="formlabel"><% = myTObj.getTerm(491) %> :</TD>
28				<TD><% = getListBox("mla_cfg_lng", mla_cfg_lngs, 0, 1, "", mla_cfg_lng, "alphanumeric", "") %></TD>
29			</TR>
30			<TR><TD COLSPAN=2>&nbsp;</TD></TR>
31			<TR>
32				<TD COLSPAN=2 ALIGN=CENTER>
33					<INPUT TYPE="submit" VALUE="<% = myTObj.getTerm(51) %>" NAME="mla_cfg_cancel" onClick="document.nocheck = true;"> &nbsp;
34					<INPUT TYPE="submit" VALUE="<% = myTObj.getTerm(54) %>" NAME="mla_cfg_submit">
35				</TD>
36			</TR>
37		</TABLE>
38	</FORM>
39
40</BODY>
41</HTML>
42<!-- #INCLUDE FILE="../inc/mla_sql_end.asp" -->