Create a filesystem Object
Set objFSO = CreateObject("Scripting.FileSystemObject")
Create a output file’s path
Set outFile = objFSO.CreateTextFile("i:\ASQ\import.bat", True)
Input the Value that you would like to input
outFile.WriteLine "Here you are writing it in the file"