Code:
Dim myFSO

'this line creates an instance of the File Scripting Object named myFSO

SET myFSO = Server.CreateObject("Scripting.FileSystemObject")

'error handling here to make sure that things go smoothly
'if the file does not exist

If NOT myFSO.FileExists("C:\Inetpub\wwwroot\BMS\myNewText.txt") Then

'then we create it on this drive in the path we specify
myFSO.CreateTextFile

("C:\Inetpub\wwwroot\BMS\myNewText.txt")
Else

'otherwise we tell the client it does so they don't get a nasty error

Response.Write "THIS FILE ALREADY EXISTS"
End If

'this line destroys the instance of the File Scripting Object named myFSO

SET myFSO = NOTHING