掘地求升-和存档脚本一起攻克难关

《和班尼特福迪一起攻克难关》// Getting over it with bennett foddy // 是一款令人抓狂的小游戏,为了您和他人以及您电脑的安全←_←,写了个可以存档的vbs脚本;
保存.vbs文件

set ws = Wscript.CreateObject("Wscript.Shell")
path = left(wscript.scriptfullname, instrrev(wscript.scriptfullname, "\") - 1)
regPath = "HKEY_CURRENT_USER\SOFTWARE\Bennett Foddy\Getting Over It"
If msgbox("YES FOR SAVING" & vbCrlf & "NO FOR READING",vbYesNo) = vbYes Then
    ws.run "reg export """ & regPath & """ """ & path & "\savREG.reg""", 0, True
Else
    If msgbox("R U SERIOUS?",vbYesNo) = vbYes Then
        ws.run "reg import """ & path & "\savREG.reg""", 0, True
    End If
End If

发表评论

电子邮件地址不会被公开。