VBScript _criar arquivo txt

Criar arquivo txt com VBScript

O texto em verde é onde você deve alterar com as informações desejadas

O código:_________________________________

Dim objFS, objFile
Set objFS = CreateObject("Scripting.FileSystemObject")
Set objFile = objFS.CreateTextFile("Local e nome para o arquivo seguido de .txt")
objFile.WriteLine("Texto que deve contem no arquivo")

A execução:_________________________________

1 - Abra o bloco de notas

2 - Copie e cole o código abaixo:

Dim objFS, objFile
Set objFS = CreateObject("Scripting.FileSystemObject")
Set objFile = objFS.CreateTextFile("C:\Cod_vbscript\primeiro.txt")
objFile.WriteLine("Primeiro arquivo txt criado via vbscript")

3 - Salve o arquivo com o nome arquivo_texto.vbs na area de trabalho OBS.: Não esqueça de colocar o .vbs

4 - Clique sobre o ícone com o nome arquivo_texto