vbs制作一个文本文件,里面写着文字
Vbs Make a text file with text written in it
我想制作一个 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
如能提供帮助,将不胜感激
使用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
我想制作一个 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
如能提供帮助,将不胜感激
使用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