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 VBS code that exports data to HTML file
Execute the following VBS code that exports data to HTML file.
'=================================================================
' Tutorial 31
'
' This tutorial shows how to export data to HTML file in VBScript.
'=================================================================
WScript.StdOut.WriteLine("Tutorial 31" & vbcrlf & "----------" & vbcrlf)
' Constants declarationDim DATATYPE_STRING
DATATYPE_STRING = "string"Dim AUTOFORMAT_EASYXLS1
AUTOFORMAT_EASYXLS1 = 43
' Create an instance of the class that exports Excel filesSet workbook = CreateObject("EasyXLS.ExcelDocument")
' Create a worksheet
workbook.easy_addWorksheet_2("First tab")
' Get the table of data for the worksheetSet xlsFirstTable = workbook.easy_getSheetAt(0).easy_getExcelTable()
' Add data in cells for report headerFor Column = 0 To 4
xlsFirstTable.easy_getCell(0,column).setValue("Column " & (Column + 1))
xlsFirstTable.easy_getCell(0,column).setDataType(DATATYPE_STRING)
Next' Add data in cells for report valuesFor 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).setDataType(DATATYPE_STRING)
Next
Next' Create an instance of the class used to format the cellsDim xlsAutoFormat
Set xlsAutoFormat = CreateObject("EasyXLS.ExcelAutoFormat")
xlsAutoFormat.InitAs(AUTOFORMAT_EASYXLS1)
' Apply the predefined format to the cells
xlsFirstTable.easy_setRangeAutoFormat_2 "A1:E101", xlsAutoFormat
' Export HTML file
WScript.StdOut.WriteLine("Writing file C:\Samples\Tutorial31 - export HTML file.html")
workbook.easy_WriteHTMLFile_3 "C:\Samples\Tutorial31 - export HTML file.html", "First tab"' Confirm export of HTML fileDim sError
sError = workbook.easy_getError()
If sError = ""Then
WScript.StdOut.Write(vbcrlf & "File successfully created.")
Else
WScript.StdOut.Write(vbcrlf & "Error: " & sError)
End If' Dispose memory
workbook.Dispose
Wscript.StdOut.Write(vbcrlf & "Press Enter to exit ...")
WScript.StdIn.ReadLine()
How to run VBScript tutorial In order to run the tutorial create a file named Tutorial31.vbs containing previous code, open Command Prompt, change the directory to tutorial location using cd command and type: > cscript Tutorial31.vbs.
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.
