一键静默导入OEM信息 AU3源代码-支持Win7/WinXp

2012-12-30 21:14:41  阅读 2380 次 评论 0 条
TrayTip('OEM设置工具','正在删除原有OEM信息',3) FileDelete(@SystemDir & "\oobe\Oemlogo.bmp") FileDelete(@SystemDir & "\oobe\logo.bmp") FileDelete(@SystemDir & "\oobe\Oemlogo1.bmp") Sleep(1000) FileInstall("oemlogo.bmp", @SystemDir & "\oobe\") TrayTip('OEM设置工具','正在设置OEM信息为戴尔!',3) RegWrite('HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows\CurrentVersion\OEMInformation') RegWrite('HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows\CurrentVersion\OEMInformation', 'Manufacturer', 'REG_SZ', 'dell') RegWrite('HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows\CurrentVersion\OEMInformation', 'Model', 'REG_SZ', '') RegWrite('HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows\CurrentVersion\OEMInformation', 'SupportHours', 'REG_SZ', '') RegWrite('HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows\CurrentVersion\OEMInformation', 'SupportPhone', 'REG_SZ', '800-858-2925') RegWrite('HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows\CurrentVersion\OEMInformation', 'SupportURL', 'REG_SZ', 'http://support.dell.com') TrayTip('OEM设置工具','正在导入戴尔LOGO图片',1) RegWrite('HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows\CurrentVersion\OEMInformation', 'Logo', 'REG_SZ', '' & @SystemDir & '\oobe\oemlogo.bmp') $var = MsgBox(0 + 64, "温馨提示", "戴尔OEM信息导入成功!" ,2) If $var = 1 Then Exit EndIf


本文地址:https://www.yms7.com/post/37.html
版权声明:本文为原创文章,版权归 yms 所有,欢迎分享本文,转载请保留出处!

发表评论取消回复


表情

还没有留言,还不快点抢沙发?