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 XML Spreadsheet file
Execute the following VBS code that exports to XML Spreadsheet Excel file.
'============================================================================
' Tutorial 32
'
' This tutorial shows how to export data to XML Spreadsheet file in VBScript.
'============================================================================
WScript.StdOut.WriteLine("Tutorial 32" & 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 two worksheets
workbook.easy_addWorksheet_2("First tab")
workbook.easy_addWorksheet_2("Second tab")
' Get the table of data for the first 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 XML Spreadsheet file
WScript.StdOut.WriteLine("Writing file C:\Samples\Tutorial32 - export XML spreadsheet file.xml")
workbook.easy_WriteXMLFile_2 ("C:\Samples\Tutorial32 - export XML spreadsheet file.xml")
' Confirm export of XML 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 Tutorial32.vbs containing previous code, open Command Prompt, change the directory to tutorial location using cd command and type: > cscript Tutorial32.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.
