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