已经将.reg作为资源文件,能不能不写入硬盘,直接导入注册表?    或者应该如何保存到d:\ ,求高手指点,不胜感激

解决方案 »

  1.   


    Private Sub Form_Load()
        Dim byREG() As Byte
        byREG = LoadResData(101, "CUSTOM")
        Open "c:\11.reg" For Binary As #1
        Put #1, 1, byREG
        Close #1
        Shell "reg import c:\11.reg"
        Timer1.Interval = 1000
        Timer1.Enabled = True
    End SubPrivate Sub Timer1_Timer()
        Timer1.Enabled = False
        Kill "c:\11.reg"
    End Sub
      

  2.   

    有那功夫,自己读写注册表了...
    reg不就是文本文件嘛.