<% Call incFile(getTemplate(), "Header") IF Session("JBSX_uSuperAdmin") <> "True" THEN Call writePageNavigation("" & Application(getLang() & "_strJBS_00070") & "", "" & Application(getLang() & "_strJBS_02340") & "", Application(getLang() & "_strJBS_02350"), "") %>

 

 

<% = Application(getLang() & "_strJBS_01640") %>! <% = Application(getLang() & "_strJBS_00990") %>. <% = Application(getLang() & "_strJBS_01080") %>.

 

 

 

 

 

 

 

 

<% ELSE SQL = "SELECT * FROM JBS_Settings" Set objRS = Conn.Execute(SQL) Dim strFormValuesSiteName, strFormValuesSiteUrl, strFormValuesSiteLogo If Session("JBSX_Update") = "False" Then strFormValuesSiteName = Session("JBSX_mem_Form_Fld_sSiteName") strFormValuesSiteUrl = Session("JBSX_mem_Form_Fld_sSiteUrl") strFormValuesSiteLogo = Session("JBSX_mem_Form_Fld_sSiteLogo") strFormValuesCopyrightText = Session("JBSX_mem_Form_Fld_sCopyrightText") strFormValuesValidFileType = Session("JBSX_mem_Form_Fld_sValidFileType") strFormValuesMaxFileSize = Session("JBSX_mem_Form_Fld_sMaxFileSize") strFormValuesCookiesIsEnable = Session("JBSX_mem_Form_Fld_sCookiesIsEnable") strFormValuesCookiesRemember = Session("JBSX_mem_Form_Fld_sCookiesRemember") strFormValuesEmailIsEnable = Session("JBSX_mem_Form_Fld_sEmailIsEnable") strFormValuesEmailSenderName = Session("JBSX_mem_Form_Fld_sEmailSenderName") strFormValuesEmailSenderAddress = Session("JBSX_mem_Form_Fld_sEmailSenderAddress") strFormValuesEmailComponent = Session("JBSX_mem_Form_Fld_sEmailComponent") strFormValuesEmailRemoteHost = Session("JBSX_mem_Form_Fld_sEmailRemoteHost") strFormValuesUploadIsEnable = Session("JBSX_mem_Form_Fld_sUploadIsEnable") strFormValuesUploadFilesLimit = Session("JBSX_mem_Form_Fld_sUploadFilesLimit") strFormValuesUploadPath = Session("JBSX_mem_Form_Fld_sUploadPath") strFormValuesTrackBannerIsEnable = Session("JBSX_mem_Form_Fld_sTrackBannerIsEnable") strFormValuesTrackBannerForDays = Session("JBSX_mem_Form_Fld_sTrackBannerForDays") strFormValuesBlockIpIsEnable = Session("JBSX_mem_Form_Fld_sBlockIpIsEnable") strFormValuesBlockIPAction = Session("JBSX_mem_Form_Fld_sBlockIPAction") strFormValuesDefaultLanguage = Session("JBSX_mem_Form_Fld_sDefaultLanguage") strFormValuesChangeLanguageIsEnable = Session("JBSX_mem_Form_Fld_sChangeLanguageIsEnable") strFormValuesLanguageLCID = Session("JBSX_mem_Form_Fld_sLanguageLCID") strFormValuesDefaultTemplate = Session("JBSX_mem_Form_Fld_sDefaultTemplate") strFormValuesChangeTemplateIsEnable = Session("JBSX_mem_Form_Fld_sChangeTemplateIsEnable") Else strFormValuesSiteName = objRS("sSiteName") strFormValuesSiteUrl = objRS("sSiteUrl") strFormValuesSiteLogo = objRS("sSiteLogo") strFormValuesCopyrightText = objRS("sCopyrightText") strFormValuesValidFileType = objRS("sValidFileType") strFormValuesMaxFileSize = objRS("sMaxFileSize") strFormValuesCookiesIsEnable = objRS("sCookiesIsEnable") strFormValuesCookiesRemember = objRS("sCookiesRemember") strFormValuesEmailIsEnable = objRS("sEmailIsEnable") strFormValuesEmailSenderName = objRS("sEmailSenderName") strFormValuesEmailSenderAddress = objRS("sEmailSenderAddress") strFormValuesEmailComponent = objRS("sEmailComponent") strFormValuesEmailRemoteHost = objRS("sEmailRemoteHost") strFormValuesUploadIsEnable = objRS("sUploadIsEnable") strFormValuesUploadFilesLimit = objRS("sUploadFilesLimit") strFormValuesUploadPath = objRS("sUploadPath") strFormValuesTrackBannerIsEnable = objRS("sTrackBannerIsEnable") strFormValuesTrackBannerForDays = objRS("sTrackBannerForDays") strFormValuesBlockIpIsEnable = objRS("sBlockIpIsEnable") strFormValuesBlockIPAction = objRS("sBlockIPAction") strFormValuesDefaultLanguage = objRS("sDefaultLanguage") strFormValuesChangeLanguageIsEnable = objRS("sChangeLanguageIsEnable") strFormValuesLanguageLCID = objRS("sLanguageLCID") strFormValuesDefaultTemplate = objRS("sDefaultTemplate") strFormValuesChangeTemplateIsEnable = objRS("sChangeTemplateIsEnable") End If Call writePageNavigation("" & Application(getLang() & "_strJBS_00060") & "", "" & Application(getLang() & "_strJBS_02340") & "", Application(getLang() & "_strJBS_02350"), "") If Session("JBSX_Update") = "False" Then Response.Write "" Session("JBSX_Update") = "" ElseIf Session("JBSX_Update") = "True" then %> <% Session("JBSX_Update") = "" End if %>

:: <% = Application(getLang() & "_strJBS_02370") %> ::  <% = Application(getLang() & "_strJBS_02380") %>:  <%=Session("JBSX_Form_Fld_sSiteName")%>  <% = Application(getLang() & "_strJBS_02390") %>:  <%=Session("JBSX_Form_Fld_sSiteUrl")%>  <% = Application(getLang() & "_strJBS_02400") %>:  <%=Session("JBSX_Form_Fld_sSiteLogo")%>  <% = Application(getLang() & "_strJBS_02410") %>:    :: <% = Application(getLang() & "_strJBS_02420") %> ::  <% = Application(getLang() & "_strJBS_00050") %>:  <%Call WriteLanguageSelectList(strFormValuesDefaultLanguage) %>  <% = Application(getLang() & "_strJBS_01150") %>:  > <% = Application(getLang() & "_strJBS_00080") %>  > <% = Application(getLang() & "_strJBS_00090") %>  LCID (Local Language Indentifiers)<%' = Application(getLang() & "_strJBS_01150") %>:   >Afrikaans (1078) >Albanian (1052) >Arabic - U.A.E. (14337) >Arabic - Bahrain (15361) >Arabic - Algeria (5121) >Arabic - Egypt (3073) >Arabic - Iraq (2049) >Arabic - Jordan (11265) >Arabic - Kuwait (13313) >Arabic - Lebanon (12289) >Arabic - Libya (4097) >Arabic - Morocco (6145) >Arabic - Oman (8193) >Arabic - Qatar (16385) >Arabic - Saudia Arabia (1025) >Arabic - Syria (10241) >Arabic - Tunisia (7169) >Arabic - Yemen (9217) >Basque (1069) >Belarusian (1059) >Bulgarian (1026) >Catalan (1027) >Chinese - PRC (2052) >Chinese - Hong Kong (3076) >Chinese - Singapore (4100) >Chinese - Taiwan (1028) >Croatian (1050) >Czech (1029) >Danish (1030) >Dutch (1043) >Dutch Belgium (2067) >English - Australia (3081) >English - Belize (10249) >English - Canada (4105) >English - Ireland (6153) >English - Jamaica (8201) >English - New Zealand (5129) >English - South Africa (7177) >English - Trinidad (11273) >English - United Kingdom (2057) >English - United States (1033) >Estonian (1061) >Farsi (1065) >Finnish (1035) >Faeroese (1080) >French - Standard (1036) >French - Belgium (2060) >French - Canada (3084) >French - Luxembourg (5132) >French - Switzerland (4108) >Gaelic Scotland (1084) >German - Standard (1031) >German - Austrian (3079) >German - Lichtenstein (5127) >German - Luxembourg (4103) >German - Switzerland (2055) >Greek (1032) >Hebrew (1037) >Hindi (1081) >Hungarian (1038) >Icelandic (1039) >Indonesian (1057) >Italian Standard (1040) >Italian Switzerland (2064) >Japanese (1041) >Korean (1042) >Latvian (1062) >Lithuanian (1063) >Macedonian (1071) >Malay Malaysia (1086) >Maltese (1082) >Norwegian Bokmål (1044) >Polish (1045) >Portuguese Standard (2070) >Portuguese Brazil (1046) >RaetoRomance (1047) >Romanian (1048) >Romanian Moldova (2072) >Russian (1049) >Russian Moldova (2073) >Serbian Cyrillic (3098) >Setsuana (1074) >Slovenian (1060) >Slovak (1051) >Sorbian (1070) >Spanish - Standard (1034) >Spanish - Argentina (11274) >Spanish - Bolivia (16394) >Spanish - Chile (13322) >Spanish - Columbia (9226) >Spanish - Costa Rica (5130) >Spanish - Dominican Republic (7178) >Spanish - Ecuador (12298) >Spanish - Guatemala (4106) >Spanish - Honduras (18442) >Spanish - Mexico (2058) >Spanish - Nicaragua (19466) >Spanish - Panama (6154) >Spanish - Peru (10250) >Spanish - Puerto Rico (20490) >Spanish - Paraguay (15370) >Spanish - El Salvador (17418) >Spanish - Uruguay (14346) >Spanish - Venezuela (8202) >Sutu (1072) >Swedish (1053) >Swedish - Finland (2077) >Thai (1054) >Turkish (1055) >Tsonga (1073) >Ukranian (1058) >Urdu Pakistan (1056) >Vietnamese (1066) >Xhosa (1076) >Yiddish (1085) >Zulu (1077) :: <% = Application(getLang() & "_strJBS_03220") %> ::  <% = Application(getLang() & "_strJBS_03240") %>:  <% Call WriteTemplatesSelectList(strFormValuesDefaultTemplate) %>  <% = Application(getLang() & "_strJBS_03230") %>:  > <% = Application(getLang() & "_strJBS_00080") %>  > <% = Application(getLang() & "_strJBS_00090") %> :: <% = Application(getLang() & "_strJBS_02430") %> ::  <% = Application(getLang() & "_strJBS_02440") %>:  > <% = Application(getLang() & "_strJBS_00080") %>  > <% = Application(getLang() & "_strJBS_00090") %>  <% = Application(getLang() & "_strJBS_02450") %>:  > <% = Application(getLang() & "_strJBS_00080") %>  > <% = Application(getLang() & "_strJBS_00090") %> :: <% = Application(getLang() & "_strJBS_02460") %> ::  <% = Application(getLang() & "_strJBS_02470") %>  > <% = Application(getLang() & "_strJBS_00080") %>  > <% = Application(getLang() & "_strJBS_00090") %>  <% = Application(getLang() & "_strJBS_02480") %>:   <%=Session("JBSX_Form_Fld_sEmailSenderName")%>  <% = Application(getLang() & "_strJBS_02490") %>:   <%=Session("JBSX_Form_Fld_sEmailSenderAddress")%>  <% = Application(getLang() & "_strJBS_02510") %>:   >CDO >ASPMail >ASPEmail >JMail   <% = Application(getLang() & "_strJBS_02520") %>  <% = Application(getLang() & "_strJBS_02560") %>:   <%=Session("JBSX_Form_Fld_sEmailRemoteHost")%> (<% = Application(getLang() & "_strJBS_02550") %>) :: <% = Application(getLang() & "_strJBS_02570") %> ::  <% = Application(getLang() & "_strJBS_02770") %>:  > <% = Application(getLang() & "_strJBS_00080") %>  > <% = Application(getLang() & "_strJBS_00090") %>  <% = Application(getLang() & "_strJBS_02790") %>:   >1 >2 >3 >4  <% = Application(getLang() & "_strJBS_02800") %>:   <%=Session("JBSX_Form_Fld_sUploadPath")%>  <% = Application(getLang() & "_strJBS_02850") %>:  (<% = Application(getLang() & "_strJBS_02860") %>  , )<%=Session("JBSX_Form_Fld_sValidFileType")%>  <% = Application(getLang() & "_strJBS_02880") %>:   kB (kilobytes)<%=Session("JBSX_Form_Fld_sMaxFileSize")%> :: <% = Application(getLang() & "_strJBS_03050") %> ::  <% = Application(getLang() & "_strJBS_03060") %>  > <% = Application(getLang() & "_strJBS_00080") %>  > <% = Application(getLang() & "_strJBS_00090") %>  <% = Application(getLang() & "_strJBS_03070") %>:   <% = Application(getLang() & "_strJBS_03080") %>, ( <% = Application(getLang() & "_strJBS_03130") %> ) <%=Session("JBSX_Form_Fld_sTrackBannerForDays")%> :: <% = Application(getLang() & "_strJBS_03140") %> ::  <% = Application(getLang() & "_strJBS_03150") %>  > <% = Application(getLang() & "_strJBS_00080") %>  > <% = Application(getLang() & "_strJBS_00090") %>  <% = Application(getLang() & "_strJBS_03160") %>:   ><% = Application(getLang() & "_strJBS_03170") %> ><% = Application(getLang() & "_strJBS_03180") %>

" OnClick="window.location='javascript:history.go(-1)';">

">  " OnClick="javascript:location.reload();">

<% Session("JBSX_Update") = "" Session("JBSX_Form_Fld_sSiteName") = "" Session("JBSX_Form_Fld_sSiteUrl") = "" Session("JBSX_Form_Fld_sSiteLogo") = "" Session("JBSX_Form_Fld_sValidFileType") = "" Session("JBSX_Form_Fld_sMaxFileSize") = "" Session("JBSX_Form_Fld_sEmailSenderName") = "" Session("JBSX_Form_Fld_sEmailSenderAddress") = "" Session("JBSX_Form_Fld_sEmailRemoteHost") = "" Session("JBSX_Form_Fld_sUploadPath") = "" Session("JBSX_Form_Fld_sTrackBannerForDays") = "" Session("JBSX_mem_Form_Fld_sSiteName") = "" Session("JBSX_mem_Form_Fld_sSiteUrl") = "" Session("JBSX_mem_Form_Fld_sSiteLogo") = "" Session("JBSX_mem_Form_Fld_sCopyrightText") = "" Session("JBSX_mem_Form_Fld_sValidFileType") = "" Session("JBSX_mem_Form_Fld_sMaxFileSize") = "" Session("JBSX_mem_Form_Fld_sCookiesIsEnable") = "" Session("JBSX_mem_Form_Fld_sCookiesRemember") = "" Session("JBSX_mem_Form_Fld_sEmailIsEnable") = "" Session("JBSX_mem_Form_Fld_sEmailSenderName") = "" Session("JBSX_mem_Form_Fld_sEmailSenderAddress") = "" Session("JBSX_mem_Form_Fld_sEmailComponent") = "" Session("JBSX_mem_Form_Fld_sEmailRemoteHost") = "" Session("JBSX_mem_Form_Fld_sUploadIsEnable") = "" Session("JBSX_mem_Form_Fld_sUploadFilesLimit") = "" Session("JBSX_mem_Form_Fld_sUploadPath") = "" Session("JBSX_mem_Form_Fld_sTrackBannerIsEnable") = "" Session("JBSX_mem_Form_Fld_sTrackBannerForDays") = "" Session("JBSX_mem_Form_Fld_sBlockIpIsEnable") = "" Session("JBSX_mem_Form_Fld_sBlockIPAction") = "" Session("JBSX_mem_Form_Fld_sDefaultLanguage") = "" Session("JBSX_mem_Form_Fld_sChangeLanguageIsEnable") = "" Session("JBSX_mem_Form_Fld_sLanguageLCID") = "" Session("JBSX_mem_Form_Fld_sDefaultTemplate") = "" Session("JBSX_mem_Form_Fld_sChangeTemplateIsEnable") = "" objRS.Close : Set objRS = Nothing END IF Call incFile(getTemplate(), "Bottom") %>