求QTP用vb脚本操作控制面板

sd2951811 · 发表于 2010-4-9 10:14:38

请各位帮帮忙，有个case 为了做一个自动化测试，需要关闭控制面板中的屏保，不会关闭显示器等等，请问用脚本怎么实现啊？

谢谢大家。。

TIB · 发表于 2010-4-9 12:51:07

用VBScript脚本编辑注册表来达到修改设置的目的，例如下面的脚本修改的是屏保等待时间：
HKEY_CURRENT_USER = &H80000001
strComputer = "."
Set objReg = GetObject("winmgmts:\\" & strComputer & "\root\default:StdRegProv")
strKeyPath = "Control Panel\Desktop"
objReg.CreateKey HKEY_CURRENT_USER, strKeyPath
ValueName = "ScreenSaveTimeout"
strValue = "300"
objReg.SetStringValue HKEY_CURRENT_USER, strKeyPath, ValueName, strValue

sd2951811 · 发表于 2010-4-23 11:00:04

能不能加点注释啊？一下子看不懂

		自动登录	找回密码
密码			(注-册)加入51Testing

[原创] 求QTP用vb脚本操作控制面板

相关帖子

站长推荐 /1