I have created a small script that can retrieve the itemcount for a mailbox.
Is it possible to do the 2nd Where? The output should only be the number of mails received on a given date.
Absolutely awesome! It works perfect! I used guitarzan's script and modified it with Geates last post, and now it works!
I am very happy, this script will save me a lot of time :) Thank you both so much for helping :)
I think you misunderstood me :) Making the script run from anything but C:\Users\any username\Desktop does not work. If I make it run from C:\Users (the goal) and using On Error Resume Next at each For Each loop the script will obviously finish, but not edit anything (I put rdp files in...
I think you are starting to try and fix a lot of things that really work right now.
The script works perfectly fine if I just tell it to run in C:\Users\any username\Desktop
As I want to search through several users on many, many computers, I would simply like to be able to run in C:\Users\...
I have made sure that the Administrators group has Full Access to the C: drive and all subfolders. My user is of course an administrator.
I added the on error resume next, and the script did finish. Without changing any RDP files though. I added RDP files at different levels to see if it got...
This did not appear to work.
First I tried copy/pasting yours, resulting in a Permission Denied at the first For Each.
I then tried adding more excludes, but was still denied permission to whatever it is.
I see your logic in iterating folders before files, but decided to try and switch it...
The user "dude" is the only administrator on this computer (I always rename administrator and delete all other users). I am running the script locally on my laptop for test purposes. This should not be a folder permission issue, as I have made sure to give my user and group Full Control of the...
I see what you mean. I changed the script according, but nothing appears to have changed.
This still works
[quite]
strDir = "C:\Users\dude\Desktop"
Set FSO1 = CreateObject("Scripting.FileSystemObject")
Set objDir = FSO1.GetFolder(strDir)
getInfo(objDir)
Sub getInfo(objDir)
For Each aItem In...
Here is my script
This works perfectly fine. It searches the desktop and subfolders for RDP shortcuts, and edits the IP.
I tried changing the strDir to a level higher, so C:\Users\dude\ but then I get Permission Denied at line 8 (first For Each). I tried changing to a bunch of difference...
Doing a very short test, this seemed to work.
Set dicOverall = CreateObject("Scripting.Dictionary")
Set objFSO = CreateObject("Scripting.FileSystemObject")
Set objTextFile = objFSO.OpenTextFile("c:\vbs\csv.csv", 1, False)
a = 1
Do Until objTextFile.AtEndOfStream
aLine = objTextFile.ReadLine...
There we go, fixed it.
Set dicOverall = CreateObject("Scripting.Dictionary")
Const ForReading = 1
Set objFSO = CreateObject("Scripting.FileSystemObject")
Set objTextFile = objFSO.OpenTextFile("c:\vbs\csv.csv", 1, False)
Do Until objTextFile.AtEndOfStream
aLine = ""
strRest = ""
aLine =...
haha, man that was quick! It does work quite well, and as you commented, I need to figure out a way to add that first line to every file. I will look into it on monday, I'm off from work.
Thank you very much for the help!
ADO records seem to be over the top for something this simple.
I have no idea if this would actually work, but when I run the script I get told I lack permissions to write to the file. What do?
Const ForReading = 1
Const ForAppending = 8
Set objFSO = CreateObject("Scripting.FileSystemObject")...
This site uses cookies to help personalise content, tailor your experience and to keep you logged in if you register.
By continuing to use this site, you are consenting to our use of cookies.