MartyConnelly
martyconnelly at shaw.ca
Fri Dec 24 10:13:47 CST 2004
I have been playing around with vbs scripts and WMI. Got this from Canada Technet Newsletter Today Here is an Access 2000 mdb file with 2200 + vbs scripts to do all the odd things a lot of people ask for here. Watch the OS version for each script, some can be dangerous as they do things like reimaging disks. Just convert the vbs to vba code. I have listed below some simple example titles. There are others that cover LDAP Exchange WMI etc. I think this may become a must have for Access Programmer Toolboxes. The Do-It-Yourself Script Center Kit (1.03 MB Self-Extracting Zip File) <http://go.microsoft.com/?linkid=1742701> Imagine a database containing more than 2,250 scripts, along with sample scripts (and a few pointers) showing how you can create stand-alone .vbs files, HTML pages, or even your own custom HTML Help file. If you don't like the categories we used, you can recategorize everything in the database and, in essence, create a Script Center that works the way you'd like it to. Would you like an HTML Help file that contains only scripts that will work on Windows NT Server 4.0? Well, now you can do that <http://go.microsoft.com/?linkid=1742702>. I convert them to VBA fairly straight forward, as everything is late bound Just convert your dim statements to object etc and response.write to debug.print You can early bind if you can find the library reference. Examples List Time Zone Information for a Computer List the Processes Running on a Computer List the UTC Time on a Computer Title Modify File Extensions Copy a File Copy a Set of Files Delete a File Delete All Files in a Folder List a Specific Set of Files List All the Files in a Folder List All the Files on a Computer List File Attributes List File Properties Modify File Attributes Monitor File Creation Monitor File Deletion Monitor File Modification Move a File Move a Set of Files Move Files Parse a Path Name Perform Actions on Files Rename a File Rename Files List Detailed Summary Information for a File Uncompress a Folder Enumerate Subfolders Using Recursion Bind to a Folder Using the Browse for Folder Dialog Box Search for Folders Using Wildcards Verify that a Folder Exists Create a Network Share Delete a Network Share Delete a Published Folder List Network Shares List Shared Folders Published in Active Directory Map All Network Shares to Local Folders Map a Network Share to a Local Folder Modify a Network Share Publish a Shared Folder in Active Directory -- Marty Connelly Victoria, B.C. Canada