Recreate psgetsid.exe in VB6(repost)

I want to recreate PsGetSid using its exact method and all its parameters, except I don't want or need it to get the SID from a remote computer, only local, because PsGetSid starts a remove service to read the remote SID and VB cannot do this as far as I know. Also I only need sample code, not a full fledged program, and so I don't need it to be a console app. I've tried 3 different pieces of source code that claim to get the correct SID, but they often fail. You can see PsGetSid here: [login to view URL] There is no source code for PsGetSid, so you'll need to know how to reverse engineer. And no, I don't just want to run PsGetSid from VB and get the results. :) ## Deliverables 1) Complete and fully-functional working program(s) in executable form as well as complete source code of all work done. 2) Deliverables must be in ready-to-run condition, as follows? (depending on the nature? of the deliverables): a)? For web sites or? other server-side deliverables intended to only ever exist in one place in the Buyer's environment--Deliverables must be installed by the Seller in ready-to-run condition in the Buyer's environment. b) For all others including desktop software or software the buyer intends to distribute: A software? installation package that will install the software in ready-to-run condition on the platform(s) specified in this bid request. 3) All deliverables will be considered "work made for hire" under U.S. Copyright law. Buyer will receive exclusive and complete copyrights to all work purchased. (No GPL, GNU, 3rd party components, etc. unless all copyright ramifications are explained AND AGREED TO by the buyer on the site per the coder's Seller Legal Agreement). ## Platform VB6, Windows XP, Windows 2000