Find skærmopløsning

http://www.naughter.com/qres.html

Der er ikke noget i VBScript som kan gøre det her... der skal du ud og have fat i et tredjepartsprodukt... kunne være du kunne få lidt ud af det her... ved jeg ikke..

/Leth

Jeg skal ikke skifte opløsning, men kun have information puttet ned i en variabel.

passer ikke, jeg har noget kode et eller andet sted ...
Ikke 3parts ... kigger lige!!

Den var god nok, selvom jeg nu også havde noget 3parts...
men dette virker ved mig:
Set WMIS = GetObject("winmgmts:" & "{impersonationLevel=impersonate}!\\.\root\cimv2")

msgbox MONITOR()

Function MONITOR()
    Set cold = WMIS.ExecQuery("Select * from Win32_DisplayConfiguration")

    For Each monitor in cold
        height = monitor.PelsHeight
        width = monitor.PelsWidth
    Next
    MONITOR = width &"x"& height
End Function

Kan evt. udbygges hvis du bruger flere skærme!

desuden kan det køres fra en computre til en anden da vi bruger WMI (eller noget)
strComputer = "."
Set objWMIService = GetObject("winmgmts:" & "{impersonationLevel=impersonate}!\\" &  strComputer & "\root\cimv2")

Det burde virke :p
Enjoy

hehe..... jamen dog jamen dog.. :D så ved jeg også det.... det er jo altid godt..

Hehe, fandt det efter at havde søgt i en uges tid ...
Skulle selv bruge det, og jeg gad da ikke til at lære et helt nyt sprog bare for at kode det jeg var igang med :p
Men man kan faktisk få stort set alle informationer fra computeren gennem VBS... (på en eller anden måde)

Fedt, det var lige det jeg havde brug for.
Tak for hjælpen.

Selv tak ... det er jo det vi har eksperten.dk til :p
Har da også selv fået hjælp mange gange!!