Category Archives: Microsoft

GetCpuDescription

Get information on the CPU using Active Directory ‘ Get a description of the processor using Active Directory” NOTE: requires a reference to the Active DS Type library Function GetCpuDescription() As String  Dim thisComputer As ActiveDs.IADsComputer  Dim thisService As ActiveDs.IADsServiceOperations  ‘ we need this object to retrieve computer name  Dim sysInfo As New ActiveDs.WinNTSystemInfo   ‘ retrieve the AD object corresponding to this… Read More »

WindowFromMouse

Gets the handle of the window under the mouse cursor. Private Type POINTAPI  X As Long  Y As LongEnd TypePrivate Declare Function GetCursorPos Lib “user32” (lpPoint As POINTAPI) As LongPrivate Declare Function WindowFromPoint Lib “user32” (ByVal xPoint As Long, _  ByVal yPoint As Long) As Long ‘ Return the handle of the window under the mouse cursor. Function WindowFromMouse() As Long  Dim… Read More »

Download File

Shows you a couple very easy ways to download files from the internet using the url. Uses api, no controls. You can download files, webpages ect.. If someone has right clicking disabled. Recovered from the remains of vbcodesource.com.

The Death of PlanetSourceCode

Recently, I went to one my favorite source code repositories, just to check out new submissions, and see how things are progressing in the community. I always enjoy seeing how up and coming young programmers are learning new ways to keep our favorite “old, dead” language alive.

Add Virtual Hard Disk to a Hyper-V VM

Adding a new virtual hard disk to a virtual Machine (VM) is something that needs to be done from time to time, with any hypervisor. This process will walk you through adding a new virtual hard drive to a VM with Hyper-V.

8 Useful PowerShell Quickies

In my current position, I use PowerShell quite a bit, but not just for automation of repetitive tasks. I thought I would take a few minutes to jot down a few one-offs that might be of use to other folks. Some of these might even be useful in larger scripts.