Solved

Export a list of all installed software to a txt file

Posted on 2004-04-28
4
8,484 Views
Last Modified: 2012-06-27
Using the following code copied from another expert solution I want to know if it is possible to get the code result in to a TXT file:

Option Explicit

Dim ListText, S, Key

Set S = CreateObject("RegEdit.Server")

For Each Key In S.Keys("SOFTWARE\Microsoft\Windows\CurrentVersion\Uninstall").SubKeys
    If Key.ExistsValue("DisplayName") Then
      ListText = ListText & Key.Values("DisplayName").Value & vbCrLf
    Else
      ListText = ListText & "(" & Key.Name & ")" & vbCrLf
    End If
Next

Wscript.Echo ListText

I want also if possible to get the same type of result but including all the hardware installed in the computer and also all the users names included the access type.

Thanks.
0
Comment
Question by:semogT
4 Comments
 
LVL 2

Expert Comment

by:golsen23
ID: 10939717
heres a better way to do it....

On Error Resume Next
    cName = "."

    Set oWMI = GetObject("winmgmts:{impersonationLevel=impersonate}!\\" & cName & "\root\cimv2")
    Set cSoftware = oWMI.execQuery _
        ("SELECT * FROM Win32_Product")
    For Each oSoftware In cSoftware
        Worksheets("sheet1").Cells(Row, Count) = oSoftware.Description
        Count = Count + 1
        Worksheets("sheet1").Cells(Row, Count) = oSoftware.identifyingnumber
        Count = Count + 1
        Worksheets("sheet1").Cells(Row, Count) = oSoftware.installlocation
        Count = Count + 1
        Worksheets("sheet1").Cells(Row, Count) = oSoftware.installstate
        Count = Count + 1
        Worksheets("sheet1").Cells(Row, Count) = oSoftware.Name
        Count = Count + 1
        Worksheets("sheet1").Cells(Row, Count) = oSoftware.skunumber
        Count = Count + 1
        Worksheets("sheet1").Cells(Row, Count) = oSoftware.vendor
        Count = Count + 1
        Worksheets("sheet1").Cells(Row, Count) = oSoftware.Version
        Count = Count + 1
        Worksheets("sheet1").Cells(Row, Count) = oSoftware.installdate
        Count = Count + 1
        oSoftware.Caption
       
    Next
0
 

Author Comment

by:semogT
ID: 10939865
It is really the first time that I try to use scripts and my skills in this matter are very low.
When I run the code supplied by golsen23 nothing upon.

I want to be able to export this information to a txt or xls file.

Thanks.
0
 
LVL 1

Expert Comment

by:HynesCo
ID: 10941048
There is a free app called Belarc that does what you are trying to do.
0
 
LVL 10

Accepted Solution

by:
LRI41 earned 250 total points
ID: 10941264
To follow up on HynesCo comment, here is where you can find Belarc, plus some other programs

BELARC ADVISOR.  You can download a short file at

http://www.belarc.com/Download.html 

and this software will take a snapshot
of your system and display a Web page providing a complete summary.  The
data resides on your local system and is not sent to a Web server.   The
report provides information on all hardware and software you are
running.  It even tells you the version number.  And it's all free, for
personal use, and supports Windows 95/98/ME/NT4/2000/XP.

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

Aida also

Last Aida Version 3.93

sad note: Aida is no longer going to be supported

they officially took the aida site down

here you can download aida32 here

http://www.majorgeeks.com/download181.html

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

Aida is now called Everest

Everest 1.00.93

Compact PC Diagnostics Tool Based on EVEREST Technology.

was reading about Aida in a forum, and this program was described as being identical. both AIDA32 3.93 and Everest 1.00.93 installed and they appear to be almost carbon copies of each other.


 http://www.lavalys.com/index.php?page=products_index

Subject:      Re: (no subject)
Date:      4/25/2004 1:58:09 PM Pacific Daylight Time


 agree. I now have both AIDA32 3.93 and Everest 1.00.93 installed and they appear to be almost carbon copies of each other.
WHY SHOULDN'T THEY BE ????
 
This is the last AIDA32-related broadcast message you receive.
 

Best Regards,
 
Tamas Miklos (Fiery)
 
tamas.miklos@aida32.hu
 

Tamás Miklós has joined Lavalys
Press Release | 2004-04-18  
Lavalys Appoints Tamás Miklós as CTO and Executive Vice President of Software Engineering Research & Development.
 
http://www.lavalys.com/index.php?page=news_index


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

WinAudit 1.2.3

WinAudit allows you to perform a detailed audit of the hardware and software configuration of your computer. The resulting audit report contains details on installed software, license information, peripherals, memory usage, processor model, network settings, startup programs and more. It can be viewed from within the application, or optionally exported to text, nicely formatted web page, XML and spreadsheet formats. WinAudit also supports ODBC connections and can export audit data to an existing database. Very small, standalone program that works well.

http://mywebattack.com/gnomeapp.php?id=107817


WinAudit is free, it will work on any computer using Windows 95 or higher. The program requires no installation making it ideal for those who need to perform an audit in a few seconds with the simple click of a button.

The program's small size of 112KB means that it will easily fit onto a floppy disk or can be sent as an e-mail attachment enabling you to audit a computer rapidly and with the minimum of effort.  

Download (112kB, 20s @ 56kb/s). There is no installation; using your file manager, navigate to the folder where you saved WinAudit, then double click on the program

http://www.pxserver.com/WinAudit.htm


0

Featured Post

PRTG Network Monitor: Intuitive Network Monitoring

Network Monitoring is essential to ensure that computer systems and network devices are running. Use PRTG to monitor LANs, servers, websites, applications and devices, bandwidth, virtual environments, remote systems, IoT, and many more. PRTG is easy to set up & use.

Question has a verified solution.

If you are experiencing a similar issue, please ask a related question

Suggested Solutions

SharePoint Designer 2010 has tools and commands to do everything that can be done with web parts in the browser, and then some – except uploading a web part straight into a page that is edited in SPD. So, can it be done? Scenario For a recent pr…
We had a requirement to extract data from a SharePoint 2010 Customer List into a CSV file and then place the CSV file into a directory on the network so that the file could be consumed by an AS400 system. I will share in Part 1 how to Extract the Da…
This is used to tweak the memory usage for your computer, it is used for servers more so than workstations but just be careful editing registry settings as it may cause irreversible results. I hold no responsibility for anything you do to the regist…
Hi friends,  in this video  I'll show you how new windows 10 user can learn the using of windows 10. Thank you.

776 members asked questions and received personalized solutions in the past 7 days.

Join the community of 500,000 technology professionals and ask your questions.

Join & Ask a Question