Cheat Engine :: View topic - A little help @atom0s

Cheat Engine Forum Index

Cheat Engine
The Official Site of Cheat Engine

FAQ

Usergroups

Register

Log in to check your private messages

A little help @atom0s

Cheat Engine Forum Index -> General Discussions

View previous topic :: View next topic

Author

Message

AylinCE
Grandmaster Cheater Supreme

Reputation: 37

Joined: 16 Feb 2017
Posts: 1516

Posted: Sat Jan 18, 2020 1:21 pm Post subject: A little help @atom0s

Reply with quote

A little help @ atom0s
The code below; VB.Script activation code.
But it gives the results in separate windows.
How to arrange to get the whole list in one window?

Code:

' List Processor Information

strComputer = "."
Set objWMIService = GetObject("winmgmts:\\" & strComputer & "\root\CIMV2")
Set colCSes = objWMIService.ExecQuery("SELECT * FROM Win32_ComputerSystem")
For Each objCS In colCSes
WScript.Echo "Computer Name: " & objCS.Name
WScript.Echo "System Type: " & objCS.SystemType
WScript.Echo "Number Of Processors: " & objCS.NumberOfProcessors
Next
Set colProcessors = objWMIService.ExecQuery("Select * from Win32_Processor")
For Each objProcessor in colProcessors
WScript.Echo "Manufacturer: " & objProcessor.Manufacturer
WScript.Echo "Name: " & objProcessor.Name
WScript.Echo "Description: " & objProcessor.Description
WScript.Echo "Processor ID: " & objProcessor.ProcessorID
WScript.Echo "Address Width: " & objProcessor.AddressWidth
WScript.Echo "Data Width: " & objProcessor.DataWidth
WScript.Echo "Family: " & objProcessor.Family
WScript.Echo "Maximum Clock Speed: " & objProcessor.MaxClockSpeed
Next

+ If possible; Can we print the results on UDF1.CEMemo1?
_________________

Hi Hitler Different Trainer forms for you!
https://forum.cheatengine.org/viewtopic.php?t=619279
Enthusiastic people: Always one step ahead
Do not underestimate me Master: You were a beginner in the past

Send private message

Visit poster's website

MSN Messenger

atom0s
Moderator

Reputation: 205

Joined: 25 Jan 2006
Posts: 8585
Location: 127.0.0.1

Posted: Sat Jan 18, 2020 10:55 pm Post subject:

This post has 1 review(s)

Reply with quote

Code:

strComputer = "."
Set objWMIService = GetObject("winmgmts:\\" & strComputer & "\root\CIMV2")
Set colCSes = objWMIService.ExecQuery("SELECT * FROM Win32_ComputerSystem")

Dim result
For Each objCS In colCSes
result = "Computer Name: " & objCS.Name & vbCrLf
result = result & "System Type: " & objCS.SystemType & vbCrLf
result = result & "Number Of Processors: " & objCS.NumberOfProcessors & vbCrLf
Next
result = result & vbCrLf

Set colProcessors = objWMIService.ExecQuery("Select * from Win32_Processor")
For Each objProcessor in colProcessors
result = result & "Manufacturer: " & objProcessor.Manufacturer & vbCrLf
result = result & "Name: " & objProcessor.Name & vbCrLf
result = result & "Description: " & objProcessor.Description & vbCrLf
result = result & "Processor ID: " & objProcessor.ProcessorID & vbCrLf
result = result & "Address Width: " & objProcessor.AddressWidth & vbCrLf
result = result & "Data Width: " & objProcessor.DataWidth & vbCrLf
result = result & "Family: " & objProcessor.Family & vbCrLf
result = result & "Maximum Clock Speed: " & objProcessor.MaxClockSpeed & vbCrLf
Next

WScript.Echo result

_________________

- Retired.

Send private message

Visit poster's website

AylinCE
Grandmaster Cheater Supreme

Reputation: 37

Joined: 16 Feb 2017
Posts: 1516

Posted: Sun Jan 19, 2020 12:44 am Post subject:

Thanks master. I will share a system code in CE lua. Thank you for editing this detail. I never see teaching simple. And +1. Thanks again. _________________ Hi Hitler Different Trainer forms for you! https://forum.cheatengine.org/viewtopic.php?t=619279 Enthusiastic people: Always one step ahead Do not underestimate me Master: You were a beginner in the past

Send private message

Visit poster's website

MSN Messenger

Display posts from previous:

	Cheat Engine Forum Index -> General Discussions	All times are GMT - 6 Hours
Page 1 of 1

Jump to:

You cannot post new topics in this forum
You cannot reply to topics in this forum
You cannot edit your posts in this forum
You cannot delete your posts in this forum
You cannot vote in polls in this forum
You cannot attach files in this forum
You can download files in this forum

Powered by phpBB © 2001, 2005 phpBB Group

CE Wiki IRC (#CEF) Twitter
Third party websites