怎样存取注册表信息

核心提示：应用程序在启动和运行时需要将一些重要的信息保存起来，以便在下次启动和运行时使用，怎样存取注册表信息，在Windows16位操作系统中，使用系统初始化文件(INI)来存取重要参数，“startup”，“left”，在微软WIN95及最新的WIN98系统中，却是采用注册表来存放应用程序的启动及运行所需的重要参数

应用程序在启动和运行时需要将一些重要的信息保存起来，以便在下次启动和运行时使用。在Windows16位操作系统中，使用系统初始化文件(INI)来存取重要参数。在微软WIN95及最新的WIN98系统中，却是采用注册表来存放应用程序的启动及运行所需的重要参数。

注册表的存取方法一般有以下两种：

一、使用WIN95提供的注册表编辑器。使用方法为：点“开始”，选“运行”，打开“regedit”，回车即可进入注册表编辑器。使用它提供的新建、删除及修改等功能来完成对注册表的存取操作。但一定要注意预先备份注册表。

二、编程实现。可以采用WIN95API中有关注册表编辑的几个函数来读写注册表，但是技巧性很强，万一操作不当，则可能破坏注册表，造成系统下次启动或某些程序运行故障。

下面我利用VB5.0提供的两个语句和两个函数来读写注册表，它们的使用方法十分简单，而且很实用。

1、SaveSetting语句

语法：SaveSettingappname,section,key,setting

2、GetAllSettings函数

语法：GetAllSettings(appname,section)

3、GetSetting函数

语法：GetSetting(appname,scetion,key[,default])

4、DeleteSetting语句

语法：DeleteSettingappname,section,[key]

参数含义：

appname：字符串表达式，应用程序名

section：字符串表达式，小节名

key：字符串表达式，关键字名

setting：表达式，关键字设定值

下面通过实例来说明它们的用法：应用程序名为jld_app，小节名为startup，关键字为left。

在注册表中建立应用程序的注册项：

SaveSetting“jld_app”,“startup”,“left”,100

从应用程序注册表项中读取所有关键字及其对应的值：

Dimmysettings(10,10)AsVariant

DimsettingindexAsInteger

GetAllSettings“jld_app”,“startup”

Forsettingindex=LBound(mysettings,1)ToUBound(mysettins,1)

Debug.PRintmysettings(settingindex,0);“=”;mysettings(settingindex,1)

Nextsettingindex

EndSub

从应用程序注册表项中读取关键字“left”的设置：

Debug.PrintGetSetting(“jld_app”，“startup”，“left”，“notok”)

从WIN95注册表中删除小节“startup”

DeleteSetting“jld_app”，“startup”

->