Integrating threat intelligence can be challenging, and not all companies are ready. These resources can help you build awareness and prepare for defense.
Set objFSO = CreateObject("Scripting.FileSystemObject") 'object to first file Const intForReading = 1 strFile1 = "Text.txt" 'Read file location, name strFile2 = "Disabled.cvs" 'write file location, name Set objFile1 = objFSO.OpenTextFile(strFile1, intForReading, False) arr1 = Split(objFile1.ReadAll, VbCrLf) 'bring file into array objFile1.Close 'closes objec to read file cnt = ubound(arr1) 'sets count to array length Set objFile2 = objFSO.CreateTextFile(strFile2, True) 'object for write file for i=0 to cnt 'loop for writing arr2 = Split(arr1(i), "=") arr3 = Split(arr2(1), ",") objFile2.WriteLine arr3(0) 'writes to file 'increments array count Next objFile2.Close MsgBox "Done"
|Catch Cancellation error from objShell.Run||10||66|
|How to debug this code||7||49|
|how to open a file with any name (*) and specific extension in VB||1||16|
|VBS Script not working correctly.||1||17|
Join the community of 500,000 technology professionals and ask your questions.
Connect with top rated Experts
19 Experts available now in Live!