From StealthBot Wiki
The BotPath function was added to StealthBot in version 2.6, as suggested by werehamster.
'// BOTPATH '// Returns the bot's current path. Future compatibility with multiple user profiles is already in place. '// Return value includes the trailing "\". Public Function BotPath() As String BotPath = GetProfilePath() End Function
This function returns the current bot's location in your windows directory.
CurrentDir = BotPath()
Returns the folder path ending with a \.
- Create a new text file in your bot's folder.
Dim FSO, File Set FSO = CreateObject("Scripting.FileSystemObject") Set File = FSO.CreateTextFile(BotPath & "newtextfile.txt") File.WriteLine("This file is in the bot's folder!") File.Close