VB修改注册表案例
Dim RT As Boolean, v
If Is64bit() Then
v = GetDWordValue("HKEY_LOCAL_MACHINE\SOFTWARE\Wow6432Node\Microsoft\Jet\4.0\Engines\Jet 4.0", "MaxLocksPerFile")
RT = SetDWordValue("HKEY_LOCAL_MACHINE\SOFTWARE\Wow6432Node\Microsoft\Jet\4.0\Engines\Jet 4.0", "MaxLocksPerFile", 99999999)
Else
v = GetDWordValue("HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Jet\4.0\Engines\Jet 4.0", "MaxLocksPerFile")
If v = "Error" Then v = GetDWordValue("HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Jet\4.0\Engines\Jet4.0", "MaxLocksPerFile")
RT = SetDWordValue("HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Jet\4.0\Engines\Jet 4.0", "MaxLocksPerFile", 99999999)
If Not RT Then RT = SetDWordValue("HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Jet\4.0\Engines\Jet4.0", "MaxLocksPerFile", 99999999)
End If
If RT Then
MsgBox "设置成功"
Else
MsgBox "设置失败"
End If
文件下载
资源详情
[{"title":"（ 6 个子文件 11KB ） VB修改注册表案例","children":[{"title":"VB修改注册表案例","children":[{"title":"RegForm.frm <span style='color:#111;'> 1.85KB </span>","children":null,"spread":false},{"title":"RegChange.vbw <span style='color:#111;'> 87B </span>","children":null,"spread":false},{"title":"RegChange.vbp <span style='color:#111;'> 659B </span>","children":null,"spread":false},{"title":"MSSCCPRJ.SCC <span style='color:#111;'> 194B </span>","children":null,"spread":false},{"title":"RegFunction.bas <span style='color:#111;'> 20.94KB </span>","children":null,"spread":false},{"title":"RegChange.exe <span style='color:#111;'> 24.00KB </span>","children":null,"spread":false}],"spread":true}],"spread":true}]
评论信息
其他资源
- CAD门窗绘图算料插件
- 实变函数 （周民强）.pdf
- ArcGIS-在DEM的基础上划分小流域
- 图书借阅管理系统(VB&SqlServer;)
- 大量多标签多类别分类代码和算法matlab版本
- 程序员给女朋友用HTML5制作的3D相册免费(附源码)
- 获取windows系统实时播放的音量
- 弹簧设计手册.rar
- 支持向量机在股票价格预测方面的应用
- PCI Geomatica2015自动提取DEM技术文档
- NSGA-II快速非支配排序遗传算法
- 一元多项式计算器 数据结构课程设计
- unity2D横版冒险跳跃游戏源码
- keil v4 v3 与Proteus 7.6 7.5 7.4联调插件vdmagdi
- Cortex-A76官方技术手册
- 图集打包工具
- 数控机床操作编程基础.ppt
- 医院官网，java+mysql.rar
- 市场-源码
- Compiling your first Qt Program in Ubuntu.pdf
- Ladybug的vs2017库
- 中央电大《计算机系统结构》复习题.pdf
- 生物化学备考适合研究生
- 知乎—ios5旧版本APP
- computability and logic 中文译文
- cuda 9.0 ubuntu16.04百度云链接
- android开发主界面框架
免责申明
【只为小站】的资源来自网友分享，仅供学习研究，请务必在下载后24小时内给予删除，不得用于其他任何用途，否则后果自负。基于互联网的特殊性，【只为小站】 无法对用户传输的作品、信息、内容的权属或合法性、合规性、真实性、科学性、完整权、有效性等进行实质审查；无论 【只为小站】 经营者是否已进行审查，用户均应自行承担因其传输的作品、信息、内容而可能或已经产生的侵权或权属纠纷等法律责任。
本站所有资源不代表本站的观点或立场，基于网友分享，根据中国法律《信息网络传播权保护条例》第二十二条之规定，若资源存在侵权或相关问题请联系本站客服人员，zhiweidada#qq.com，请把#换成@，本站将给予最大的支持与配合，做到及时反馈和处理。关于更多版权及免责申明参见 版权及免责申明
本站所有资源不代表本站的观点或立场，基于网友分享，根据中国法律《信息网络传播权保护条例》第二十二条之规定，若资源存在侵权或相关问题请联系本站客服人员，zhiweidada#qq.com，请把#换成@，本站将给予最大的支持与配合，做到及时反馈和处理。关于更多版权及免责申明参见 版权及免责申明