Code Repository

We would like to introduce users of this forum to the myITforum Code Repository.

The myITforum Code Repository is a collection of Batch Files, Command Scripts, HTML Applications, HTML Documents, SMS Installer Scripts, Jscript Scripts, Jscript Encoded Scripts, Kixstart Scripts, Perl Scripts, SQL Scripts, VBScript Encoded Scripts, VBScript Scripts, Windows Script Components, Wise files, SMS 2003 custom reports and MOF files, and Windows Script Files. (**Some areas may have limited exposure.)

The database is currently populated with over 1400 items running the gamut of code you may need in supporting your systems. We suggest you download the database because, if you find yourself frequently asking for assistance in writing code to complete a given task, chances are that something has already been developed and is in the database.

You can read about the database in the myITforum Code Repository article.

We will be releasing Code Packs on a routine basis as we continue to accumulate code to share.

Links:
myITforum Code Repository article
myITforum Code Repository download

\ / /
\\\' , / //
\\\//, _/ //,
\_-//' / //<,
\ /// > \\\`__/_
/,)-~>> _\` \\\
(/ \\ //\\
// // \\\
(( ((

Dan,
Since you are an expert with WMI, is there a way to find out the site a client is reporting to using WMI? It is the registry but in hex. Thanks.

Nicky Fulgencio

Is this SMS 2.0?
Let me know where you' re pulling that info from in the registry and I' ll see about digging out the hex conversion code snippet I have.

BTW: There should be a conversion routine in the Code Repository.

\ / /
\\\' , / //
\\\//, _/ //,
\_-//' / //<,
\ /// > \\\`__/_
/,)-~>> _\` \\\
(/ \\ //\\
// // \\\
(( ((

Can' t quite locate error I' m getting here..........Opening the Code Repository on my XP Pro system with Jet DB SP 8 I repeatedly get this error.....running Access 2003.....any clues...

Attached Image(s)

Sandy Wood
Network Admin
Orange County District Attorney

We have code that does some button highlighting. This code has proved problematic for 3 other individuals. We have been unable to replicate the problem on our end but have a fix for those who experience this.

Basically, the fix is as follows:

You' ll have to hold down the shift key when you open the database. This will keep the form from autoloading.

Follow these steps once the database is open:
1- Be sure you are viewing the list of available forms
2- Highlight the frmScripts form
3- Select View from the toolbar
4- Select Code from the drop down menu
5- The Microsoft Script Editor (or something) opens

The code in question is in the procedures named fSetFontBold and fRemoveFontBold. These procedures are located in a number of forms used in the database. The workaround is to remove these two procedures from the code for all forms.

HTH

\ / /
\\\' , / //
\\\//, _/ //,
\_-//' / //<,
\ /// > \\\`__/_
/,)-~>> _\` \\\
(/ \\ //\\
// // \\\
(( ((

Thanks for the note and the detailed help. I' m afraid I' ve mucked it up real good now. I remove both procedures from all the forms and upon starting the Repository I now get the error below........so many times I need to Task Manager to get it to stop..........

I' d like to work with all the scripts and will probably try to pull the tables out of the db and work with them manually...


thanks for the help

Attached Image(s)

Sandy Wood
Network Admin
Orange County District Attorney

Go and get the database again.

Start with a new one. If you have any scripts in the current database you need, email the database to me and I' ll extract all your scripts and send them back to you.

After you have gotten a new database, follow Dan' s instructions and then let us know what happens.

My email address is
r d c r u m b a k e r @ gmail.com
without the spaces.

Thanks,
Ron
Microsoft MVP - Configuration Manager
rdcrumbaker@gmail.com
My Blog

Ron,

Thanks for the help and heroic measures....I downloaded the file again and searched every form for the two subs and removed them. Unfortunatley, I' m still getting the same error. I' m sorry, put me down to a lost cause. The bright side however, is I' m starting to use Microsoft One Note and create a repository of my own and although not as full-featured and professional looking as your creation, it seems too server my purpose.

Let me know if I can try anything else.

Sandy Wood
Network Administrator
Orange County District Attorney

Email me and I' ll send you an edited version of the blank DB.

If this one works, I' ll then send you the one with all the scripts.

We won' t give up that easily. We will resolve your issue one way or another.

Thanks,
Ron
Microsoft MVP - Configuration Manager
rdcrumbaker@gmail.com
My Blog

I just now was able to duplicate your error message.

I' ll resolve it shortly (hopefully) and will get you the neccessary changes.

Thanks,
Ron
Microsoft MVP - Configuration Manager
rdcrumbaker@gmail.com
My Blog

I' ll hold off on the email for now.....

Sandy Wood
Network Administrator
Orange County District Attorney

I have it resolved in a blank version of the db.

There are a few references you have to remove on the forms.

If you want, I can email a copy of the blank db to you. Or I can upload it (Rod willing) and give you a link to download it.

The zipped file is 594K. But it contains NO scripts. You can export all the scripts from the current version you have by opening the DB while holding the shift key down. Then exporting the table called scripts and importing it to the blanked version of the db.

Thanks,
Ron
Microsoft MVP - Configuration Manager
rdcrumbaker@gmail.com
My Blog

So, the " No Scripts" version that' s out there is different from the one you' re talking about here?

Sort of. The version on the web is the version I started with a few minutes ago to fix your problem with the On Mouse move. The no scripts version on the web is Exactly the same as the other verion expect it contains no scripts.

The reason I choose to edit this version for you, was so you wouldn' t have to worry about receiving a very large file.

So, I took the no scripts version and made the necessary changes for your problems. However, I have not uploaded it to MyITforum yet.

Did that make sense? Of did I confuse you and me both?

Thanks,
Ron
Microsoft MVP - Configuration Manager
rdcrumbaker@gmail.com
My Blog

I think I have it...let me edit the " No Scripts" version and see how I do...

Sandy Wood
Network Administrator
Orange County District Attorney

This is NOT a copy that is on the web. It' s a copy that I just edited myself to resolve your issues.

We will be releasing an article soon with the latest version of the Code Repository. Which will include the latest changes to the database.

Thanks,
Ron
Microsoft MVP - Configuration Manager
rdcrumbaker@gmail.com
My Blog

The new update will be posted to www.myITforum.com as a new download shortly...along with an article explaining the steps required to move the scripts.

Thanks,
Ron
Microsoft MVP - Configuration Manager
rdcrumbaker@gmail.com
My Blog

I' ll check the downloads and see what I can come up with.

Sandy Wood
Network Administrator
Orange County District Attorney

There will be an article released tomorrow.

Thanks,
Ron
Microsoft MVP - Configuration Manager
rdcrumbaker@gmail.com
My Blog

The updated code is in the download included in the following article:

http://www.myitforum.com/articles/11/view.asp?id=6864


Here is the direct link to the download:
www.myitforum.com/inc/upload/9056Code%20Repository.zip


Please let us know.

Thanks,
Ron
Microsoft MVP - Configuration Manager
rdcrumbaker@gmail.com
My Blog

Thanks for the quick work! I' ll download it and let you know how I do.

Sandy Wood
Network Administrator
Orange County District Attorney

We are here to please...or at least try to please.

Let us know if you need anything else or if you still experience issues.

Thanks,
Ron
Microsoft MVP - Configuration Manager
rdcrumbaker@gmail.com
My Blog

Well here I go...I just unzipped it and opened it and got this message about an ActiveX control......do I need to download any controls before running it?

Attached Image(s)

Sandy Wood
Network Administrator
Orange County District Attorney

Post the error message, please.

You should not be getting any errors.

For users of Access 2003, you may be prompted to update the
Microsoft Jet 4.0 database engine to service pack 8.

Here' s a single KB article with the download links:

http://support.microsoft.com/?kbid=829558

What version of Access are you running?

Thanks,
Ron
Microsoft MVP - Configuration Manager
rdcrumbaker@gmail.com
My Blog

Ron,

I added a *.jpg in my previous post with a picture of the error message...I' m running Access 2003 on two machines I use. I get the error on both of them and one has the Jet DB update, the other doesn' t.

Sandy Wood
Network Administrator
Orange County District Attorney

I' m checking in on the error now.

I' ll let you know as soon as possible.

Thanks,
Ron
Microsoft MVP - Configuration Manager
rdcrumbaker@gmail.com
My Blog

You' ll have to hold down the shift key when you open the database. This will keep the form from autoloading.

Follow these steps once the database is open:
1- Be sure you are viewing the list of available forms
2- Hit ALT + F11
3- Click on Tools
4- References
5- Verify they look like the same as what is in the attached picture.

6- Let me know.

Attached Image(s)

Thanks,
Ron
Microsoft MVP - Configuration Manager
rdcrumbaker@gmail.com
My Blog

Exactly! It looks the same.

Sandy Wood
Network Administrator
Orange County District Attorney

The command that is causing conflict is the Maximize on open command.

Open the Database using the Shift Key.

Then Right click on frmScripts Form and choose Design View
Then in the upper left hand corner, Right Click on the square.
Choose Properties.
This will bring up the FORM Properties.

Scroll down about 3/4 way down until you see:

On Activate = DoCmd.Maximize

Remove the DoCmd.Maximize

Save and Close.

Reopen the db.

Let me know.

Thanks,
Ron
Microsoft MVP - Configuration Manager
rdcrumbaker@gmail.com
My Blog

Well, you' re going to think I' m a moron, but right-clicking the frmScripts form gives me a menu with Properties but doesn' t quite follow - I can' t quite go to a square in the upper left hand corner....sorry for the grief on this one....see the jpg for my view...

Attached Image(s)

Sandy Wood
Network Administrator
Orange County District Attorney

Opps...I left out a step.

Go into Design View of the frmScripts.

Then within there Right Click on the square in the upper left.

Thanks,
Ron
Microsoft MVP - Configuration Manager
rdcrumbaker@gmail.com
My Blog

I corrected the steps above.

I have been unable to duplicate your problem, but this fix should resolve your issue. It removes the On Activate function, and hopefully fixes your issues.

Please let us know.

Thanks,
Ron
Microsoft MVP - Configuration Manager
rdcrumbaker@gmail.com
My Blog

We have sucess! It works good now.

Thanks for all your help

Sandy Wood
Network Admin
Orange County District Attorney

Thank you for your patience.

Glad its working for you.

Thanks,
Ron
Microsoft MVP - Configuration Manager
rdcrumbaker@gmail.com
My Blog

I' m speechless! This is outstanding.

Enough praise. I have found one snag, when adding quite a long script:

" The text is too long to be edited"

The field size can be modified in Access but will this affect performance and/or file size?

I ran into that once, and it does not effect the performance.

We have some big plans for the Code Repository...just keep an eye open!!

Thanks,
Ron
Microsoft MVP - Configuration Manager
rdcrumbaker@gmail.com
My Blog

I' ve created a wizard for ASE that lets you browse the myITforum Code Repository and insert scripts within the Editor. Note: I' m not distributing the database- you have to download it separately and supply its location on your system.

1) You need ASE (free trial version works fine) http://www.adminscripteditor.com/editor/download.asp

2) Then get the myITforum Code Repository Wizard from http://www.adminscripteditor.com/wizards/view.asp?id=24

3) You can run the wizard from anywhere, but to have it appear as a wizard within ASE- place it in the following folder: " %ProgramFiles%\iTripoli\AdminScriptEditor\addins\wizards"

If you don' t have KiXforms installed, it is included and you will be asked to install it. KiXforms is a freeware DLL that you can use in your VBScript or KiXtart scripts to create GUIs. This wizard was written in KiXtart using KiXforms for the display. Click on the " about" button for details.

Any feedback appreciated!
Bob

Nice. I' ll have to give this a look.

We have been discussing what we should do with the next update to the Code Repository...this just might be something we use.

Thanks!!

Thanks,
Ron
Microsoft MVP - Configuration Manager
rdcrumbaker@gmail.com
My Blog

I really appreciate your efforts Bob. I haven' t yet checked it out, but I will try soon and give feedback if something comes to mind.

\ / /
\\\' , / //
\\\//, _/ //,
\_-//' / //<,
\ /// > \\\`__/_
/,)-~>> _\` \\\
(/ \\ //\\
// // \\\
(( ((

I' ve just posted the source script for this wizard here:

http://www.adminscripteditor.com/scriptlibrary/view.asp?id=448

There are lots more things that could be done with this, but before investing the time I wanted to judge the level of interest for such a thing. It' s pretty straight-forward; for now it should serve to bring the code repository to the attention of more people.