Vbs创建一个包含文本的文本文件

时间:2015-04-06 06:54:52

标签: vbscript

我想创建一个VbScript程序,它将创建一个文本文件并从输入框中写入给它的信息。

例如:

firstNameInput = inputbox("Enter your name")
lastNameInput = inputbox("Enter your last name")
eMailInput = inputbox("Enter your e-mail adress")
numberInput = inputbox("Enter your number")

现在,其余代码必须创建一个文本文件,其中包含这些信息

所以文本文档看起来像这样:

Bob Marley --- Bobiscool@gmail.com --- 0918273645

如果你能提供帮助,那将非常感激

1 个答案:

答案 0 :(得分:1)

使用Scripting.FileSystemObject创建文本文件流并写入:

Option Explicit
Dim fso
Set fso = CreateObject("Scripting.FileSystemObject")
Dim fileStream
Set fileStream = fso.CreateTextFile("C:\Users\Me\Desktop\Foo.txt")
fileStream.WriteLine "First name: " & firstNameInput
fileStream.WriteLine "Last name: " & lastNameInput
' and so on...
fileStream.Close

这在MSDN上有记录:https://msdn.microsoft.com/en-us/library/5t9b5c0c(v=vs.84).aspx