<%@ LANGUAGE = VBScript %> <% Option Explicit %> <% if Session("FONTSIZE") = "" then %> <% else %> <% On Error Resume Next Dim path, currentobj path=Session("dpath") Session("path")=path Set currentobj=GetObject(path) Session("SpecObj")="" Session("SpecProps")="" %> <% ' Do not use top.title.Global.update flag if page is loaded into a dialog bUpdateGlobal = false %> " LINK="#FFFFFF" LEFTMARGIN=0 TOPMARGIN=0 OnLoad="loadHelp();" >

" WIDTH="99%" CELLPADDING=10 CELLSPACING=0>

<%= sFont("","","",True) %>

<%= checkbox("AccessSSL","",false) %> <%= L_REQUIRESECCHANNEL_TEXT %>

HEIGHT=2 BORDER=0 ALIGN="middle">

<%= checkbox("AccessSSL128","",false) %> <%= L_REQUIRE128_TEXT %>

<%= L_CLIENTCERT_TEXT %> HEIGHT=2 BORDER=0 ALIGN="middle">

<%= sFont("","","",True) %> <%= printradio("AccessSSL", not currentobj.AccessSSLNegotiateCert, "document.userform.AccessSSLNegotiateCert.value='False';document.userform.AccessSSLRequireCert.value='False';",False) %> <%= L_DONOTACCEPT_TEXT %>

<%= sFont("","","",True) %> <%= printradio("AccessSSL", currentobj.AccessSSLNegotiateCert, "document.userform.AccessSSLNegotiateCert.value='True';document.userform.AccessSSLRequireCert.value='False';",False) %> <%= L_ACCEPT_TEXT %>

<%= sFont("","","",True) %> <%= printradio("AccessSSL", currentobj.AccessSSLRequireCert, "document.userform.AccessSSLNegotiateCert.value='True';document.userform.AccessSSLRequireCert.value='True';",False) %> <%= L_REQUIRE_TEXT %>

<%= checkbox("AccessSSLMapCert","",false) %> <%= L_ENABLEMAPPING_TEXT %> HEIGHT=2 BORDER=0 ALIGN="middle">

<%= sFont("","","",True) %> <%= L_MAPDESC_TEXT %>

<% end if %>