System Info
System Help
Sunday, January 22, 2006 by jlaj1989 | Discussion: DesktopX
Reply #2 Monday, January 23, 2006 11:18 AM
? Im trying to have a bunch of stats scroll in a certin area like Vad M's system navagator.Reply #3 Monday, January 23, 2006 3:47 PM
| What is WMI |
W indows
M anagement
I nstrumentation
wmimgmt.msc

Reply #5 Monday, January 23, 2006 5:14 PM
Don't forget to read up on Script-o-Matic
Reply #6 Monday, January 23, 2006 7:22 PM
Thank youReply #8 Monday, January 23, 2006 11:30 PM
Reply #9 Tuesday, January 24, 2006 7:19 AM

Reply #10 Tuesday, January 24, 2006 9:14 AM
Reply #11 Tuesday, January 24, 2006 10:59 AM
Thanks You 
Reply #12 Tuesday, January 24, 2006 3:18 PM
Read that, and then look at the code Script-o-Matic creates. Study the differences between the two and you should be able to do whatever you want with WMI

Reply #13 Tuesday, January 24, 2006 4:21 PM
ill have to study it a bit. Thank you 
Reply #14 Tuesday, January 24, 2006 5:05 PM

Reply #15 Tuesday, January 24, 2006 5:06 PM
Reply #16 Tuesday, January 24, 2006 5:22 PM
| Dim objWMIService Dim szDrive Sub Object_OnScriptEnter object.settimer 123, 5000 Set objWMIService = GetObject("winmgmts:\\.\root\cimv2") Object_OnTimer123 End Sub Sub Object_OnScriptExit Set objWMIService = nothing End Sub Sub Object_OnTimer123 Dim colItems Set colItems = objWMIService.ExecQuery("Select VideoProcessor from Win32_VideoController",,48) For Each objItem In colItems Object.text = objItem.VideoProcessor Exit Sub Next End Sub |
Reply #17 Tuesday, January 24, 2006 6:02 PM
Reply #18 Friday, January 27, 2006 3:26 AM
Object.Text = "Resolution: " & objItem.CurrentHorizontalResolution & " x " & objItem.CurrentVerticalResolution
Just an example of combining strings
Reply #19 Friday, January 27, 2006 4:28 AM
For Each objItem In colItems Object.text = Object.text & objItem.VideoProcessor Exit Sub |
Reply #20 Friday, January 27, 2006 6:38 PM
But how do i put the bolded parts:| Object.Text = "Resolution: " & objItem.CurrentHorizontalResolution & " x " & objItem.CurrentVerticalResolution |
Into this line
| Set colItems = objWMIService.ExecQuery("Select VideoProcessor from Win32_VideoController",,48) |
Thank You

Please login to comment and/or vote for this skin.
Welcome Guest! Please take the time to register with us.
There are many great features available to you once you register, including:
- Richer content, access to many features that are disabled for guests like commenting on the forums and downloading skins.
- Access to a great community, with a massive database of many, many areas of interest.
- Access to contests & subscription offers like exclusive emails.
- It's simple, and FREE!







Reply #1 Monday, January 23, 2006 10:03 AM