<%
'checkbox selected/unselected
If instr(F_strSharesChecked,CONST_WINDOWSSHARES) > 0 Then
SelectCheckBox CONST_WINDOWSSHARES,true,false
Else
SelectCheckBox CONST_WINDOWSSHARES,false ,false
End If
'to dispaly as error
If instr(G_strErrorinShareType,CONST_WINDOWSSHARES) > 0 Then
ShowErrorinRed L_CHK_WINDOWS_TEXT
Else
response.write L_CHK_WINDOWS_TEXT
End If
%>
|
<%Set G_objConnection = getWMIConnection(CONST_WMI_WIN32_NAMESPACE)
'to make the checkbox disable if the service is not installed
If isServiceInstalled(G_objConnection,"nfssvc") Then
%>
<%
'checkbox selected/unselected
If instr(F_strSharesChecked,CONST_NFSSHARES) > 0 Then
SelectCheckBox CONST_NFSSHARES,true,false
Else
SelectCheckBox CONST_NFSSHARES,false,false
End If
'to dispaly as error
If instr(G_strErrorinShareType,CONST_NFSSHARES) > 0 Then
ShowErrorinRed L_CHK_UNIX_TEXT
Else
response.write L_CHK_UNIX_TEXT
End If
%>
|
<%
End If
%>
<%
'to make the checkbox disable if the service is not installed
If isServiceInstalled(G_objConnection,"msftpsvc") Then
%>
<%'checkbox selected/unselected
If instr(F_strSharesChecked,CONST_FTPSHARES) > 0 Then
SelectCheckBox CONST_FTPSHARES,true,false
Else
SelectCheckBox CONST_FTPSHARES,false ,false
End If
'to dispaly as error
If instr(G_strErrorinShareType,CONST_FTPSHARES) > 0 Then
ShowErrorinRed L_CHK_FTP_TEXT
Else
response.write L_CHK_FTP_TEXT
End If
%>
|
<%
End If
%>
<%
'checkbox selected/unselected
If instr(F_strSharesChecked,CONST_HTTPSHARES) > 0 Then
SelectCheckBox CONST_HTTPSHARES,true,false
Else
SelectCheckBox CONST_HTTPSHARES,false ,false
End If
'to dispaly as error
If instr(G_strErrorinShareType,CONST_HTTPSHARES) > 0 Then
ShowErrorinRed L_CHK_HTTP_TEXT
Else
response.write L_CHK_HTTP_TEXT
End If
%>
|
<%
If isServiceInstalled(G_objConnection,"MacFile") Then
%>
<%
'checkbox selected/unselected
If instr(F_strSharesChecked,CONST_APPLETALKSHARES) > 0 Then
SelectCheckBox CONST_APPLETALKSHARES,true,false
Else
SelectCheckBox CONST_APPLETALKSHARES,false ,false
End If
'to dispaly as error
If instr(G_strErrorinShareType,CONST_APPLETALKSHARES) > 0 Then
ShowErrorinRed L_CHK_APPLETALK_TEXT
Else
response.write L_CHK_APPLETALK_TEXT
End If
%>
|
<%End if %>
|