Hello, I have used the following to delete files older then 28 days just replace with the correct paths and the number of days and you should be good to go.
Dim fso, f, f1, fc
Set fso = CreateObject("Scripting.FileSystemObject")
Set f = fso.GetFolder("E:\Folder")
Set fc = f.Files
For Each f1...
Thanks , I only had to make a few small changes and it runs like a charm now.
I had to move the second Wscript.Argument to the sendmail sub because it was not excepting it as it was. See scrip below.
TableName = WScript.Arguments(0)
Set OBJdbConnection = CreateObject("ADODB.Connection")...
Tryed the script and it works great, however whant I need to do is have this running in the background with out user input. The idea was to have a small script with the var's kick off the second script that does the work of attaching and e-mailing. Thus I could just write an new startup scrit...
Hello, I am working on a VBS script that will pull a list of email address from a database then email every one on the list with an attached file. I have a working script however I would like to reuse the main portion of it with out having to hard code each script.
'This section reads database...
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.