Topic: How to use RunDLL32 with Lisp..

[Andrea]

Hi all,...

I didn't found lot of information about how to use "RunDLL32" in Lisp...
so,...

there is my contribution on this famous forum.
enjoy !!

Code: [Select]

(setq shell (vlax-create-object "WScript.Shell"))

;Lock workStation
(vlax-invoke shell "run" "rundll32.exe user32.dll,LockWorkStation")


;Mouse propreties
(vlax-invoke shell  "run" "rundll32.exe shell32.dll,Control_RunDLL main.cpl @0")

;system propreties
(vlax-invoke shell  "run" "rundll32.exe shell32.dll,Control_RunDLL sysdm.cpl,,2")


;New network connection drive
(vlax-invoke shell  "run" "rundll32.exe user.dll,wnetconnectdialog")
;XP=(vlax-invoke shell  "run" "RunDll32.exe shell32.dll,SHHelpShortcuts_RunDLL Connect")


;Graphic propreties
(vlax-invoke shell  "run" "RUNDLL32.EXE SHELL32.DLL,Control_RunDLL desk.cpl,,0")

;Printer options
(vlax-invoke shell  "run" "RUNDLL32 PRINTUI.DLL,PrintUIEntry /?")

;System info
(vlax-invoke shell  "run" "rundll32.exe shell32.dll,ShellAboutA Info-Box" )

;Time date panel
(vlax-invoke shell  "run" "RUNDLL32 SHELL32.DLL,Control_RunDLL TIMEDATE.CPL,@0,1")

;Funny thing..
(vlax-invoke shell  "run" "RUNDLL32.EXE USER32.DLL,SwapMouseButton")


And so many....

http://www.windowskb.com/Uwe/Forum.aspx/windowsxp/203426/USER32-DLL-API

http://www.powerbasic.com/support/forums/Forum6/HTML/005172.html

[highflyingbird]

Maybe look like this:

Code: [Select]

(vlax-invoke shell 'run "rundll32.exe kernel32.dll Sleep 1000")
(vlax-invoke shell 'run "rundll32.exe user32.dll MessageBoxA 0 \"aaa\" \"bbb\" 0")
but it wouldn't work.

look at here

[Andrea]

Maybe look like this:

Code: [Select]

(vlax-invoke shell 'run "rundll32.exe kernel32.dll Sleep 1000")
(vlax-invoke shell 'run "rundll32.exe user32.dll MessageBoxA 0 \"aaa\" \"bbb\" 0")
but it wouldn't work.

look at here

Wow !...nice reference you have.  thanks for sharing.
i'll keep your link.