区域和语言选项 默认账户设置 如何用api实现
http://www.autoitx.com/attachment.php?aid=MTcwMTd8M2MyMGRmZWV8MTMyMDAyMDMzOHxjOWU2ODNkQUhMVnVSS0tSNDI0NTBwUDlMMkNmWEJ1djA5L05HV3MzcHQ0bUNMNA%3D%3D&noupdate=yes区域和语言选项--高级 中,选中“将所有设置应用于当前账户和默认用户配置文件”后确定。
这个用哪个api函数实现 。求指点。 --------------------编程问答-------------------- 在vb中叫出控制台Item的内容
协助工具 内容rundll32.exe最後一个叁数1代表协助工具中TabStrip中的第1个Tab(键盘)
若为2表第二个Tab(声音)以此类推
Call Shell("rundll32.exe shell32.dll,Control_RunDLL access.cpl,,1",vbNormalFocus)
新增移除程式 rundll32.exe最後一个叁数1代表新增移除程式中TabStrip中的第1个Tab安装/移除)
Call Shell("rundll32.exe shell32.dll,Control_RunDLL appwiz.cpl,,1",vbNormalFocus)
显示器 rundll32.exe最後一个叁数0代表TabStrip中的第1个Tab 背景,若为1则为萤幕保护装置,以此类推)
Call Shell("rundll32.exe shell32.dll,Control_RunDLL desk.cpl,,1",vbNormalFocus)
使用Flying Windows.scr 当作Screen Saver
Call Shell("rundll32.exe desk.cpl,InstallScreenSaver c:\windows\system\Flying Windows.scr", vbNormalFocus)
国别设定rundll32.exe最後一个叁数0代表TabStrip中的第1个Tab 国别,若为1则为
数字,以此类推)
Call Shell("rundll32.exe shell32.dll,Control_RunDLL intl.cpl,,0",vbNormalFocus)
JoyStick 设定
Call Shell("rundll32.exe shell32.dll,Control_RunDLL joy.cpl", vbNormalFocus)
滑鼠
Call Shell("rundll32.exe shell32.dll,Control_RunDLL main.cpl @0",vbNormalFocus)
键盘
Call Shell("rundll32.exe shell32.dll,Control_RunDLL main.cpl @1",vbNormalFocus)
印表机
Call Shell("rundll32.exe shell32.dll,Control_RunDLL main.cpl @2",vbNormalFocus)
Fonts
Call Shell("rundll32.exe shell32.dll,Control_RunDLL main.cpl @3",vbNormalFocus)
输入法
Call Shell("rundll32.exe shell32.dll,Control_RunDLL main.cpl @4",vbNormalFocus)
电源
Call Shell("rundll32.exe shell32.dll,Control_RunDLL main.cpl @5",vbNormalFocus)
MS Exchange设定
Call Shell("rundll32.exe shell32.dll,Control_RunDLL mlcfg32.cpl",vbNormalFocus)
多媒体 rundll32.exe最後一个叁数0代表TabStrip中的第1个Tab 音效,若为1则为影像,以此类推)
Call Shell("rundll32.exe shell32.dll,Control_RunDLL mmsys.cpl,,0",vbNormalFocus)
声音
Call Shell("rundll32.exe shell32.dll,Control_RunDLL mmsys.cpl @1",vbNormalFocus)
数据机
Call Shell("rundll32.exe shell32.dll,Control_RunDLL modem.cpl",vbNormalFocus)
网路
Call Shell("rundll32.exe shell32.dll,Control_RunDLL netcpl.cpl",vbNormalFocus)
拨号网路
Call Shell("rundll32.exe rnaui.dll,RnaWizard", vbNormalFocus)
密码
Call Shell("rundll32.exe shell32.dll,Control_RunDLL password.cpl",vbNormalFocus)
系统 rundll32.exe最後一个叁数0代表TabStrip中的第1个Tab 一般,若为1则为装置管理员,以此类推)
Call Shell("rundll32.exe shell32.dll,Control_RunDLL sysdm.cpl,,0",vbNormalFocus)
新增硬体 精灵
Call Shell("rundll32.exe shell32.dll,Control_RunDLL sysdm.cpl @1",vbNormalFocus)
新增印表机 精灵
Call Shell("rundll32.exe shell32.dll,SHHelpShortcuts_RunDLL AddPrinter",vbNormalFocus)
日期/时间 之日期时间
Call Shell("rundll32.exe shell32.dll,Control_RunDLL timedate.cpl",vbNormalFocus)
日期/时间 之时区
Call Shell("rundll32.exe shell32.dll,Control_RunDLL timedate.cpl,,/f",vbNormalFocus)
Microsoft Mail 邮局
Call Shell("rundll32.exe shell32.dll,Control_RunDLL wgpocpl.cpl",vbNormalFocus)
开启档案
Call Shell("rundll32.exe shell32.dll,OpenAs_RunDLL d:\path\filename.ext",vbNormalFocus)
复制磁碟
Call Shell("rundll32 diskcopy.dll,DiskCopyRunDll", vbNormalFocus)
Internet(ie4)
Call Shell("rundll32.exe shell32.dll,Control_RunDLL inetcpl.cpl,,0",vbNormalFocus)
32位元ODBC
Call Shell("rundll32.exe shell32.dll,Control_RunDLL odbccp32.cpl",vbNormalFocus)
拨号网路
Call Shell("undll32.exe shell32.dll,Control_RunDLL telephon.cpl users", vbNormalFocus)
--------------------编程问答--------------------
这是用命令调用,我的意思是用api函数。不出现界面操作,直接用函数修改。 --------------------编程问答-------------------- 有人知道吗
?
补充:VB , API