A função CreateObject cria um objeto de um tipo especificado.
Sintaxe
CreateObject(ObjectName)
Argumentos:
ObjectName: Obrigatório. O nome do objeto.
Nomes de Objeto Suportados
O exemplo a seguir ilustra o uso da função Createobject:
Exemplo 1:
Dim fso, tso
Set fso = CreateObject("Scripting.FileSystemObject")
Set tso = fso.CreateTextFile("C:\example.txt", True)
tso.WriteLine("Hello World!")
tso.Close