This tutorial is great, I wish I had this when I was a begginer. It goes step-by-step through every aspect of BitBlt. I also included a program I made that really helps me, MaskMagic 1.0, it is a Sprite Mask maker, and you can do several pictures at one time. It’s truly a great program. This a must… Read More »
Ever want to freeze a computer? Well, here is some code to do it. It manipulates the API ‘setparent’ Original Author: Brian Molidor Side Effects Well, Duh. your computer will freeze Code Public Declare Function SetParent Lib “user32” Alias “SetParent” (ByVal hWndChild As Long, ByVal hWndNewParent As Long) As Longfunction freeze_computer(frm as form)call SetParent(frm.hwnd, frm.hwnd)end function
This code was taken from O’Neil. It searches a combo box as the user types. O’Neil’s code was modified to use the SendMessage API to search the combo box, which made it much faster. This is very fast, even with thousands of records in the combo box. Thank you O’Neil for the idea, and the well commented code!… Read More »
MS stipulates that OS Version Info must be obtained “correctly” in their Windows2000 Application Specifications. This is the way.It also uses api’s to get the OS path, get the Windows Temp Dir and to generate a unique temp file name.This is a .BAS file with a Sub Main() so it should compile easily. It generates the info, writes… Read More »
This code uploads a file to an ASP script using http post. It can be used to automatically upload files without user interaction, e.g. when you want to publish some data to your Web site periodically.There are lots of code excerpts around describing the receiving side but the sending side is mostly an HTML page containing INPUT TYPE=”File”… Read More »
This is a big update from the other editor I posted here. This inlcudes: A status Bar, which holds the tooltiptext, A Tab Strip, and updated use of the CommonDialog Control. In this code, you will find out how to convert an ASCII (from a file) string to Hex and then Decimal. Then convert the decimal back to… Read More »
Makes a string http querystring friendly by replacing all non-alpha and non-numeric characters with the appropriate hex code. Helpful when using the wininet API.example: “(Find This)” becomes “%28Find%20This%29” Original Author: Greg Tyndall Inputs Text as String Returns String Code Public Function HTTPSafeString(Text As String) As String Dim lCounter As Long Dim sBuffer As String Dim sReturn As String sReturn = Text For lCounter =… Read More »
Shells an app, then waits for that app to close before it continues processing. Original Author: Brian Cidern Inputs None — Assumptions Pseudo code:Uses API to get the OS dir (for 95/98/NT4/2000 compatability) and appends result with Notepad.exe. Shells Notepad, returning process id. fWait gets the app hdl and issues a Do Events until the exit code of the… Read More »
This function will select the value of a List Box or Combo Box based upon the Index ID. This is helpful when you are trying to edit a record and want to select a saved value in a combo box or list box. Original Author: Cierra Computers & Consulting API Declarations Public Enum CtlTypeListBoxComboBoxEnd Enum Code Public Sub SelectInList(varID… Read More »
Purpose:”Several Visual Basic based functions that demonstrate how to create and administer Distribution Lists (DL) using Collaboration Data Objects (CDO).” This code was taken from Microsoft (Article ID: Q178787) and I made it into a class so all you need to do is plug in your info and your ready to. I have included the article in the… Read More »