User Guide Tutorials ASP tutorials Tutorial 06: How to protect cells and sheet elements in Classic ASP How to protect cells and sheet elements in Classic ASP EasyXLS Excel library can be used to export Excel files in Classic ASP. The library is a COM+ component that works without MS Excel installed.
Step 1: Download and install EasyXLS Excel Library for COM+ To download the trial version of EasyXLS Excel Library, press the below button:
If you already own a license key, you may login and download EasyXLS from your account.
Step 2: Verify if EasyXLS is registered Check if EasyXLS component is present in Component Services.
Step 3: License file setup Step required for EasyXLS v9.0 or later. If you are using a trial, generate a trial license file from EasyXLS trials page. The trial license is valid for 30-days. If you own a license key, you may login to the account that purchased the license and generate the license file from: https://www.easyxls.com/my-orders Setup the license file into your project using these guidelines .
Step 4: Run ASP code that protects Excel sheet Execute the following ASP code that exports data to Excel, protects Excel sheet and locks cells.
<% @ Language =VBScript %>
<%
response.write("Tutorial 06<br>" )
response.write("----------<br>" )
Set workbook = Server.CreateObject("EasyXLS.ExcelDocument" )
workbook.easy_addWorksheet_2("First tab" )
workbook.easy_addWorksheet_2("Second tab" )
workbook.easy_getSheetAt(0).setSheetProtected(true )
Set xlsFirstTable = workbook.easy_getSheetAt(0).easy_getExcelTable()
Set xlsStyleHeader = Server.CreateObject("EasyXLS.ExcelStyle" )
xlsStyleHeader.setFont("Verdana" )
xlsStyleHeader.setFontSize(8)
xlsStyleHeader.setItalic(True )
xlsStyleHeader.setBold(True )
xlsStyleHeader.setForeground(CLng(COLOR_YELLOW))
xlsStyleHeader.setBackground(CLng(COLOR_BLACK))
xlsStyleHeader.setBorderColors CLng(COLOR_GRAY), CLng(COLOR_GRAY), CLng(COLOR_GRAY), CLng(COLOR_GRAY)
xlsStyleHeader.setBorderStyles BORDER_BORDER_MEDIUM, BORDER_BORDER_MEDIUM, _
BORDER_BORDER_MEDIUM, BORDER_BORDER_MEDIUM
xlsStyleHeader.setHorizontalAlignment(ALIGNMENT_ALIGNMENT_CENTER)
xlsStyleHeader.setVerticalAlignment(ALIGNMENT_ALIGNMENT_BOTTOM)
xlsStyleHeader.setWrap(True )
xlsStyleHeader.setDataType(DATATYPE_STRING)
for column = 0 to 4
xlsFirstTable.easy_getCell(0,column).setValue("Column " & (column + 1))
xlsFirstTable.easy_getCell(0,column).setStyle(xlsStyleHeader)
next
xlsFirstTable.easy_getRowAt(0).setHeight(30)
Set xlsStyleData = Server.CreateObject("EasyXLS.ExcelStyle" )
xlsStyleData.setHorizontalAlignment(ALIGNMENT_ALIGNMENT_LEFT)
xlsStyleData.setForeground(CLng(COLOR_DARKGRAY))
xlsStyleData.setWrap(False )
xlsStyleData.setLocked(True )
xlsStyleData.setDataType(DATATYPE_STRING)
for row = 0 to 99
for column = 0 to 4
xlsFirstTable.easy_getCell(row+1,column).setValue("Data " & (row + 1) & ", " & (column + 1))
xlsFirstTable.easy_getCell(row+1,column).setStyle(xlsStyleData)
next
next
xlsFirstTable.setColumnWidth_2 0, 70
xlsFirstTable.setColumnWidth_2 1, 100
xlsFirstTable.setColumnWidth_2 2, 70
xlsFirstTable.setColumnWidth_2 3, 100
xlsFirstTable.setColumnWidth_2 4, 70
response.write("Writing file: C:\Samples\Tutorial06 - protect Excel sheet.xlsx<br>" )
workbook.easy_WriteXLSXFile ("C:\Samples\Tutorial06 - protect Excel sheet.xlsx" )
if workbook.easy_getError() = "" then
response.write("File successfully created." )
else
response.write("Error encountered: " + workbook.easy_getError())
end if
workbook.Dispose
%>
Overloaded methods For methods with same name but different parameters, only the first method overload retains the original name. Subsequent overloads are uniquely renamed by appending to the method name '_2', '_3', etc (method, method_2, method_3), an integer that corresponds to the order of declaration that can be found in EasyXLS.h, a file that comes with EasyXLS installation.