'保存工程相干信息到注册表
         SaveSetting "工程名", Section:="Options", Key:="user", setting:=Trim(TxtUsr)
         SaveSetting "工程名", Section:="Options", Key:="ip", setting:=Trim(Txtip)
         SaveSetting "工程名", Section:="Options", Key:="Passwd", setting:=Trim(TxtPasswd)
'在注册表中读取一个安装后的文件存放的路径
TxtUsr = GetSetting("工程名", "options", "user")
Txtip = GetSetting("工程名", "options", "ip")
TxtPasswd = GetSetting("工程名", "options", "Passwd")