![]() ![]() SELECT MACHINE.NAME AS SYSTEM_NAME, USER.FULL_NAME AS FIELD_26, OS_NAME, (SELECT MACHINE_CUSTOM_INVENTORY.STR_FIELD_VALUE FROM MACHINE_CUSTOM_INVENTORY WHERE MACHINE_CUSTOM_INVENTORY.ID=MACHINE.ID AND MACHINE_CUSTOM_INVENTORY.SOFTWARE_ID=24187) AS MACHINE_CUSTOM_INVENTORY_0_24187, (SELECT MACHINE_CUSTOM_INVENTORY.STR_FIELD_VALUE FROM MACHINE_CUSTOM_INVENTORY WHERE MACHINE_CUSTOM_INVENTORY.ID=MACHINE.ID AND MACHINE_CUSTOM_INVENTORY.SOFTWARE_ID=24456) AS MACHINE_CUSTOM_INVENTORY_0_24456, (SELECT MACHINE_CUSTOM_INVENTORY.STR_FIELD_VALUE FROM MACHINE_CUSTOM_INVENTORY WHERE MACHINE_CUSTOM_INVENTORY.ID=MACHINE.ID AND MACHINE_CUSTOM_INVENTORY.SOFTWARE_ID=24305) AS MACHINE_CUSTOM_INVENTORY_0_24305, (SELECT MACHINE_CUSTOM_INVENTORY.STR_FIELD_VALUE FROM MACHINE_CUSTOM_INVENTORY WHERE MACHINE_CUSTOM_INVENTORY.ID=MACHINE.ID AND MACHINE_CUSTOM_INVENTORY.SOFTWARE_ID=24186) AS MACHINE_CUSTOM_INVENTORY_0_24186 FROM MACHINE LEFT JOIN ASSET ON ASSET.MAPPED_ID = MACHINE.ID AND ASSET.ASSET_TYPE_ID=5 LEFT JOIN USER ON USER.ID = ASSET. The above-mentioned methods can help you find office product key 2106 or 2013 if operated. Press enter key to run the command, then your product key will be displayed on screen. Note you must right click it and choose Run as administrator to open PowerShell. You can build it through the wizard but hey if this works as a copy paste into your environment, awesome, stop wasting time working on this. If you are running 64-bit Office, open 64-bit PowerShell. Set colItems = objOS.ExecQuery("SELECT OSArchitecture FROM Win32_OperatingSystem")ĮlseIf(InStr(objItem.OSArchitecture,"64") > 0) ThenĪlso, dunno if this helps but this is the SQL for the License Checker that I run as a report. Set objOS = GetObject("winmgmts:\\" & strComputer & "\root\CIMV2") OReg.SetStringValue HKEY_LOCAL_MACHINE,strKeyPath,strValueName,strValue OReg.CreateKey HKEY_LOCAL_MACHINE,strKeyPath OReg.SetStringValue HKEY_LOCAL_MACHINE,strKeyPath64,strValueName,strValue OReg.CreateKey HKEY_LOCAL_MACHINE,strKeyPath64 Set WshShell = WScript.CreateObject("WScript.Shell") StrComputer & "\root\default:StdRegProv") GetKey = temper(prodloc) & "_" & temper(KeyLoc)Ĭonst strKeyPath64 = "SOFTWARE\Wow6432Node\TVG" Set objFSO = CreateObject("Scripting.FileSystemObject")įor i = LBound(arrKeys) To UBound(arrKeys)ĮlseIf(InStr(arrKeys(i),officeCDLine)) Then Requirements:Product Finder (now form Nirsfot)įirst thing we need to do is copy this VBS code into notepad and save it as keys.vbs Option Explicit Next a VBS writes the keys to the registry.įinally we tie it all together with custom inventory rules. They way this works is we find the keys using nirsoft's keyfinder program. Try it and see if it works.I’ve been getting a lot of request for this in my trainings, so here it is.Īt the end of this post, you will have all the tools you need to track your Windows product keys and Microsoft office product keys. I have no idea how something like that is remotely possible, much less how it happened, but that's how we solved an issue very similar to yours. ![]() Not only did Word open, but it automatically installed itself on the fresh installation of Windows AND used the customer's existing product key. Out of sheer desperation, we ran the executable file for Word that we had stored in the data transfer file. Because we transfer everything, the program files for all programs are physically present, but since they aren't properly installed, the vast majority of them do not run optimally.Įxcept for Office 2013. ![]() When we transfer personal data, we transfer everything on the hard drive to their new computer, primarily because users tend to put their personal documents in the weirdest of places. Nevertheless, we tried to find a solution by pulling a product key, and despite using every program on the market, not a single one managed to pull a full product key. Afterwards, he demanded that we reinstall his copy of Office 2013 that we deleted, despite the fact that we told him that his programs would not transfer alongside the rest of his personal data during the factory reset. Once, I performed a factory reset on a customer's laptop. Are you able to transfer the contents of the hard drive elsewhere before you reimage? ![]()
0 Comments
Leave a Reply. |
AuthorWrite something about yourself. No need to be fancy, just an overview. ArchivesCategories |