I am seeking a way to detect my laptop's docking state so that I may programmatically reconfigure video settings.  

I have written a script in Autohotkey that does the reconfig, I now just need the trigger.  I would prefer a script within Autohotkey, but anything external that would interface will suffice.  Please help!

http://www.autohotkey.com/

I have tried calling the GetCurrentHwProfile function included in the advapi32 library using the DllCall function in Autohotkey with both str * and UInt * return types.  Script is copied below, no luck.  I suspect either I am not calling properly or am not deconstructing the HW_PROFILE_INFO response properly.

http://msdn.microsoft.com/library/default.asp?url=/library/en-us/sysinfo/base/getcurrenthwprofile.asp

I am using the ExtractInteger function code supplied in the Autohotkey help for DllCall to dissect the doxking state from the returned structure.

********************************************************************

;This function copied directly for Autohotkey help for DllCall
;Given as a method for extracting an integer from the return of a DLL call
;that has mixed types, accepted as a string

ExtractInteger(ByRef pSource, pOffset = 0, pIsSigned = false, pSize = 4)
; pSource is a string (buffer) whose memory area contains a raw/binary integer at pOffset.
; The caller should pass true for pSigned to interpret the result as signed vs. unsigned.
; pSize is the size of PSource's integer in bytes (e.g. 4 bytes for a DWORD or Int).
; pSource must be ByRef to avoid corruption during the formal-to-actual copying process
; (since pSource might contain valid data beyond its first binary zero).
{
      SourceAddress := &pSource + pOffset  ; Get address and apply the caller's offset.
      result := 0  ; Init prior to accumulation in the loop.
      Loop %pSize%  ; For each byte in the integer:
      {
            result := result | (*SourceAddress << 8 * (A_Index - 1))  ; Build the integer from its bytes.
            SourceAddress += 1  ; Move on to the next byte.
      }
      if (!pIsSigned OR pSize > 4 OR result < 0x80000000)
            return result  ; Signed vs. unsigned doesn't matter in these cases.
      ; Otherwise, convert the value (now known to be 32-bit) to its signed counterpart:
      return -(0xFFFFFFFF - result + 1)
}

;Allocate space for structure
VarSetCapacity(MyStruct, 200, 0)

;Make call to retrieve HW_PROFILE_INFO structure
DllCall("advapi32\GetCurrentHwProfile", "UInt *", MyStruct)

;Extract dwDockInfo from returned structure's first 4 bytes (double word type)
dwDockInfo := ExtractInteger(MyStruct, 0, 4)

;Looking for hex 2 (docked) or hex 4 (undocked)
MsgBox, Docking state is %dwDockInfo%