Category Archives: Visual Basic 6 (VB6)

A puzzle. Add your own pictures.

A Puzzle. You can add your own pictures. When you have selected the picture and the pieces, you can start puzzling. Click on a piece to move it. When it’s in the right place, it will be fixed to the screen. Right-click to move a piece to the second screen. In the second screen, right-click again to move… Read More »

GetMonDate

Get the previous week’s Monday…”Kathleen A. Earley” Original Author: Newsgroup Posting Code Function GetMonDate (CurrentDate)  ‘checks to see if CurrentDate is a Date datatype  If VarType(CurrentDate) <> 7 Then    GetMonDate = Null  Else    Select Case Weekday(CurrentDate)      Case 1   ‘Sunday        GetMonDate = CurrentDate – 6      Case 2   ‘Monday        GetMonDate = CurrentDate      Case 3 To 7 ‘Tuesday..Saturday        GetMonDate = CurrentDate – Weekday(CurrentDate) + 2    End Select  End IfEnd Function

A Better Key Logger – IMPROVED

Thanks for Keeping my KeyLoggers the highest Rated on PSC. I really appreciate your feedback.My latest version uses a GLOBAL Keyboard Hook that was written in Visual C++, NO MORE TIMERS!!!. It have uploaded a complete program that shows how to use a simple Class Module as well.You can put this program into Stealth Mode or Visible Mode.… Read More »

File List Grabber

With this program you can easily make a searchable list of files with size included. This is great for people with large numbers of files (like say mp3’s) who don’t want to duplicate their already downloaded files. Simply drag and Drop files onto the listbox. You can save and retrieve the filelist to a text file for future… Read More »

CaptureWindows,CaptureForm,CaptureClient,etc…

Screen capture code. Original Author: StonePage API Declarations Option Explicit‘declares to disable PCPublic Const SPI_SCREENSAVERRUNNING = 97Declare Function SystemParametersInfo Lib “user32” Alias “SystemParametersInfoA” (ByVal uAction As Long, ByVal uParam As Long, ByVal lpvParam As Boolean, ByVal fuWinIni As Long) As Long‘global variable for capture settingGlobal Setting As IntegerPrivate Type PALETTEENTRYpeRed As BytepeGreen As BytepeBlue As BytepeFlags As ByteEnd TypePrivate… Read More »

Build a Stateless Class

The example shows how to create a “Stateless” Class. By sending and receiving UDT’s and disconnected recordsets you will find a significant increase in speed with your objects in a 3 tiered application. If you use collections, each time you get/set a property you make a network call. This method reduces network traffic. Original Author: Mark Freni Inputs I… Read More »

Get GUID string

Generates Global Unique ID – when you want to create an identifier which will never repeat all over the word , you will find this usefull. Original Author: Bogdan Chernyachuk Returns Returns Global Unique ID in string format (the same as the format of ClassID written in registry). API Declarations Public Type GUID ‘ a structure for Global Uniq.… Read More »

Kill the Windowz Close Button (X)

This subroutine will disable the Windows 9x/NT‘ close button, also known as the little X‘ button. It’s really useful when you have a‘ form that you don’t want to set its ControlBox‘ property to False. Write this code in a‘ standard module (BAS). Original Author: Ultimatum Assumptions Should be familiar with the Windows API. Side Effects If you’re playing… Read More »

aan Example of Pop-Up menus

Ever wounder how to make those neat pop-up menus like you see when you right click on something? well, here is an easy to follow example! Original Author: Dustin Davis Attachments File Uploaded Size CODE_UPLOAD1193.zip 9/3/2020 3:45:00 PM 2215

TWAIN Scanner

Flatbed scanner, Hand Held, or any TWAIN compliant device can be accessed in Visual Basic with the EZTWAIN DLL (Included free as freeware). I like this much better than the KODAK OCX for scanning. This uses less resources and less coding. Don’t flood me with a ton of questions on this project. Once you use it, you will… Read More »