FindSystemFolders

Returns the path to a system folder, based on input. This code is based on a submission by ‘Don’. Originally the code only found the System Folder on the machine. I have added all of the system folders (MyDocuments, System, Cookies, etc), and made it into a class/dll for ease of use. The code is relatively self explanatory,… Read More »

System Information Viewer

Allows programmers to access Windows version information using the properties of a class module. This includes Windows version (95, 98, NT), browser version, Netscape Navigator version, registered company and user.Also included is cRegistry class to access the registry. This code was downloaded from VBAccelerator. VB Accelerators page is http://www.vbaccelerator.com/. Original Author: Sloan Kelly Inputs n/a Assumptions n/a Returns n/a… Read More »

Y2K Test for VB5 and 6

This program test the Visual Basic program you are currently running. As you will see. Original Author: Preston Smith Assumptions You can adjust the dates for Jan 1st 1930, Jan 1st 2029, Jan 1st 00 and Feb 29 or 30 2000. To see if your version is compliant then you should use 1/1/00 for the year 2000, and 2/29/00… Read More »

True Always On top With API

True window always on top. Like MS toolbar.It floats over any active application is inactive but is still always on top.Allows you to switch between applications and window is still always on top!Much better than Jake McCurry’s lousy Always on top code. Original Author: Liu Yucheng Inputs Window Handle of Window to stay on top. Assumptions Nothing Returns Nothing… Read More »

Animated GIF ActiveX control

This ActiveX allow you to use animated gifs in yourapplications. I saw examples of modules before butnot ActiveX.You can make OCX file from this and use itin other applications. Original Author: German Bletel Assumptions This is test application for using animated gif.ActiveX has Propertie: GifPath must be a valid pathto an animated gif fileMethods:StartGif – Loads gif and starts… Read More »

Real C++ Buttons (Fixed)

Notice: THIS CODE HAS BEEN FIXED! PLEASE READ THE COMMENTS AT THE BOTTOM OF THE PAGE TO SEE WHAT WAS WRONG BEFORE.Create real C++ style command buttons with ONE line of code!!! You can use this code on any of your commands buttons. You will loose any images and the BackColor of the button, but that really doesn’t… Read More »

Easily Replace a character in a string

Replaces a character in a string with another character. Pretty simple to understand. Uses a For…Next loop. Original Author: Steve Berardi Code Function ReplaceCharacter(stringToChange$, charToReplace$, replaceWith$) As String’Replaces a specified character in a string with another’character that you specify  Dim ln, n As Long  Dim NextLetter As String  Dim FinalString As String  Dim txt, char, rep As String  txt = stringToChange$ ‘store all arguments… Read More »

Make Form always on top without API !

It automatically makes your form on top until they close or end the program and it is all API free! Original Author: Jake McCurry Code ‘set the timer’s interval to 1Private Sub Timer1_Timer()Form1.ShowForm1.SetFocusEnd Sub

Total Record Count In ADO Recordset

This simple little function just returns the total number of records in a ADO recordset. Original Author: Riaan Aspeling Inputs A ADODB.Recordset structure Returns A Long integer with the total number of records Side Effects I believe it’s not the fastest way of retrieving the information but at least it works. I’d like it if somebody can suggest a… Read More »

(Update) RC4 Stream Cipher (with file handling )

This code offers you a strong encryption with RC4. I’ve tested it a lot and it’s the right implementation of the RC4 cipher.‘You can use this code in your commercial code because it’s not patented!‘I know there is another code that deals with RC4 but my code has nothing to do with this code!‘More infos: sci.crypt Original Author: Sebastian… Read More »