vbscript intellisense
Posted: Fri Feb 10, 2017 10:33 am
PrimalScript 2017, v7.3.98
32 or 64 bit version of product:
Windows 7 Enterprise, 64bit
I have the following code and my understanding is that as I'm typing strFilePath = objFile, intellisense should present options (methods) available in objFile. Am I correct and there is a problem with my installation or am I just making stuff up?
David
Set objFSO = CreateObject("Scripting.FileSystemObject")
Set objFolder = objFSO.GetFolder(objStartFolder)
Set objFileOutput = objFSO.OpenTextFile(strFileOutput,2)
WScript.Echo "Root folder Being Enumerated: " & objFolder.Path & vbcrlf
WScript.Echo "Files Found: " & vbCrLf
Set colFiles = objFolder.Files
For Each objFile In colFiles
intcount = intcount + 1
WScript.Echo " File: " & objFile.Name & vbCrLf
WScript.Echo " Permissions: " & vbCrLf
strOutput = strOutput & objFile.Name & ","
strFilePath = objFile.ParentPath
strFileName = objFile.Name
binFolder = False
Call get_Security(objfile,strcomputer,binFolder)
Next
32 or 64 bit version of product:
Windows 7 Enterprise, 64bit
I have the following code and my understanding is that as I'm typing strFilePath = objFile, intellisense should present options (methods) available in objFile. Am I correct and there is a problem with my installation or am I just making stuff up?
David
Set objFSO = CreateObject("Scripting.FileSystemObject")
Set objFolder = objFSO.GetFolder(objStartFolder)
Set objFileOutput = objFSO.OpenTextFile(strFileOutput,2)
WScript.Echo "Root folder Being Enumerated: " & objFolder.Path & vbcrlf
WScript.Echo "Files Found: " & vbCrLf
Set colFiles = objFolder.Files
For Each objFile In colFiles
intcount = intcount + 1
WScript.Echo " File: " & objFile.Name & vbCrLf
WScript.Echo " Permissions: " & vbCrLf
strOutput = strOutput & objFile.Name & ","
strFilePath = objFile.ParentPath
strFileName = objFile.Name
binFolder = False
Call get_Security(objfile,strcomputer,binFolder)
Next