I got disgusted and deleted most of it. Here it is.

? "Running Script #8 - Shares.kix"
$INDEX = 0
:SWLOOP
$KEY = ENUMKEY("HKey_Local_Machine\System\CurrentControlSet\Services\lanmanserver\shares", $INDEX)
? $KEY
If @Error = 0
; $shares = $key
$INDEX = $INDEX + 1
GOTO SWLOOP

Here is what is returned to my text file>
Running Script #8 - Shares.kix
Security