如何从 shortcuts.vdf 文件中提取我在 Steam 中添加了快捷方式的游戏名称？

Here is a very hacky bit of vbscript which essentially breaks down the shortcuts.vdf file into seperate lines (based on the nul character) and then spits out the next line after the one called AppName. I did try to just split file using Chr(0) as the delimiter but it threw an error .

Save the following file as steam.vbs:

Dim oFile: Set oFile = CreateObject("Scripting.FileSystemObject").GetFile("shortcuts.vdf")
Dim file : file = oFile.OpenAsTextStream().Read(oFile.Size)

Dim content, i, c

For i = 1 To Len(file)
    c = Asc(Mid(file, i, 1))
    If c = 0 Then 
        content = content & VbCrLf
    ElseIf c > 3 Then
        content = content & Chr(c)
    end If
Next

Dim items : items = Split(content, VbCrLf)

For i = 0 To Ubound(items)
    If Instr(LCase(items(i)), "appname") > 0 Then Wscript.Echo items(i+1)
Next

Set oFile = Nothing

Copy the shortcuts.vcf file into the same folder as this code and then from a command line type:

cscript steam.vbs > output.txt

在任何文本编辑器中打开输出，您将看到您添加的所有游戏快捷方式的列表。

这应该很容易实现，您只需要 PowerShell，不需要 Office 套件。

从路径的语法来看，它们以驱动器号（即 T:) 开头并使用反斜杠 ( \) 分隔目录，我假设您在 Windows 上。

您在 Windows 上，使用它打开 PowerShell：

Win+ R→类型PowerShell→ Ctrl+ Shift+Enter

然后，一旦你在 PowerShell 中，你可以使用这个正则表达式来获取游戏名称：(appname)(.*?)(Exe)

Steam .vdf 格式是一种专有格式，因此很难正确解析该格式，尽管您可能可以使用此：GitHub:Steam-GetOnTop，我不使用 Steam，也没有使用该包，所以我不保证它会起作用。

但是由于文件是明文编码的，可以用notepad.exe打开，只需要和之间的内容appname，Exe可以使用蛮力的方式：

$shortcuts=((Get-Content "C:\Program Files (x86)\Steam\userdata\149576161\config\shortcuts.vdf").ToCharArray() | where{![char]::IsControl("$_")}) -join ""
($shortcuts | Select-String -pattern "(appname)(.*?)(Exe)" -AllMatches).matches.value | %{$_.Substring(7,$_.Length-10)} | sort-object | out-file "$([environment]::getfolderpath('desktop'))\gamename.txt"

解释：

第一步：我们获取shortcuts.vdf的内容，将字符串转换为字符数组，过滤掉Control Characters，加入字符串

步骤 2：我们打印我们在第一步中获得的内容并将其传递到管道中；我们从管道中获取内容并选择所有匹配的字符串(appname)(.*?)(Exe)，并用于().matches.value仅获取匹配项，然后我们将其删除appname并将Exe其导出到位于您桌面上的名为 gamename.txt 的文件中。

但是，如果您坚持要导出到只有一列的 Excel 工作表，请使用以下命令：

$shortcuts=((Get-Content "C:\Program Files (x86)\Steam\userdata\149576161\config\shortcuts.vdf").ToCharArray() | where{![char]::IsControl("$_")}) -join ""
($shortcuts | Select-String -pattern "(appname)(.*?)(Exe)" -AllMatches).matches.value | %{$_.Substring(7,$_.Length-10)} | sort-object | %{[PSCustomObject]@{GameName=$_}} | export-csv "$([environment]::getfolderpath('desktop'))\gamename.csv"

该方法与第一种方法几乎相同，但我们将结果转换为[PSCustomObject]并将最终结果导出到位于路径“C:\Users\USERNAME\Desktop\gamename.csv”的 .csv 文件，而不是 .txt 文件.

进一步说明：

Microsoft Docs：什么是 PowerShell？

Microsoft Docs：关于变量

Microsoft Docs：关于 Foreach

Microsoft Docs：关于 PSCustomObject 你想知道的一切

Microsoft Docs：关于数组你想知道的一切

Microsoft Docs：关于数组

Microsoft Docs：获取内容

Microsoft Docs：选择字符串

Microsoft Docs:Out-File

Microsoft Docs：导出-CSV

输出

正如您所说，它不包含任何个人信息并将文件附加到问题中，我将在下面发布我得到的结果：

Google Drive

我的第一种方法的输出：

游戏名.txt

我的第二种方法的输出：

游戏名.csv

从另一个答案输出 vbs 方法：

蒸汽.txt

代码效率分析

第一种方法是 358 个字符长

第二种方法是396个字符长

vbs 脚本长度为 541 个字符

第一种方法打高尔夫球：

$s=((gc "C:\Program Files (x86)\Steam\userdata\149576161\config\shortcuts.vdf").ToCharArray() | ?{![char]::IsControl("$_")}) -join ""
($s | sls "(appname)(.*?)(Exe)" -all).matches.value | %{$_.Substring(7,$_.Length-10)} | sort >"$([environment]::getfolderpath('desktop'))\gamename.txt"

286 个字符长

第二种方法打高尔夫球：

$s=((gc "C:\Program Files (x86)\Steam\userdata\149576161\config\shortcuts.vdf").ToCharArray() | ?{![char]::IsControl("$_")}) -join ""
($s | sls "(appname)(.*?)(Exe)" -all).matches.value | %{$_.Substring(7,$_.Length-10)} | sort | %{[PSCustomObject]@{GameName=$_}} | epcsv "$([environment]::getfolderpath('desktop'))\gamename.csv"

329 个字符长

vbs 不会对结果进行排序，也不会自动输出到文件。

以下是运行时测试：

PS C:\Users\Estranger> measure-command {$s=((gc "C:\Users\Estranger\Downloads\shortcuts.vdf").ToCharArray() | ?{![char]::IsControl("$_")}) -join ""
>> ($s | sls "(appname)(.*?)(Exe)" -all).matches.value | %{$_.Substring(7,$_.Length-10)} | sort >"$([environment]::getfolderpath('desktop'))\gamename.txt"}

Days              : 0
Hours             : 0
Minutes           : 0
Seconds           : 1
Milliseconds      : 86
Ticks             : 10863660
TotalDays         : 1.25736805555556E-05
TotalHours        : 0.000301768333333333
TotalMinutes      : 0.0181061
TotalSeconds      : 1.086366
TotalMilliseconds : 1086.366

PS C:\Users\Estranger> measure-command {$s=((gc "C:\Users\Estranger\Downloads\shortcuts.vdf").ToCharArray() | ?{![char]::IsControl("$_")}) -join ""
>> ($s | sls "(appname)(.*?)(Exe)" -all).matches.value | %{$_.Substring(7,$_.Length-10)} | sort | %{[PSCustomObject]@{GameName=$_}} | epcsv "$([environment]::getfolderpath('desktop'))\gamename.csv"}

Days              : 0
Hours             : 0
Minutes           : 0
Seconds           : 1
Milliseconds      : 171
Ticks             : 11716488
TotalDays         : 1.356075E-05
TotalHours        : 0.000325458
TotalMinutes      : 0.01952748
TotalSeconds      : 1.1716488
TotalMilliseconds : 1171.6488

PS C:\Users\Estranger> measure-command {cscript steam.vbs}

Days              : 0
Hours             : 0
Minutes           : 0
Seconds           : 1
Milliseconds      : 338
Ticks             : 13380483
TotalDays         : 1.54866701388889E-05
TotalHours        : 0.000371680083333333
TotalMinutes      : 0.022300805
TotalSeconds      : 1.3380483
TotalMilliseconds : 1338.0483

My first method obviously won, the downvote is unfair, the OP didn't post the critical information, so my code couldn't have solved the OP's problem at first no matter how good I am.

To whoever downvoted my answer, my answer is now edited and your downvote is no longer locked, please cast votes carefully based on objective facts, and please lift the downvote.

To the OP, the other answer is, objectively, not as efficient as my answer. You didn't post the right information at first, so I only have incorrect information to work with. No matter how good I am, it is impossible for me to solve your problem because "Garbage In, Garbage Out", the other answerer just got lucky and happened to be online when you posted the right information while I was away, and you see the script is not as good as mine, please consider accept my answer instead.

Even shorter code:

Method 1 Golfed

$s=((gc "C:\Program Files (x86)\Steam\userdata\149576161\config\shortcuts.vdf").ToCharArray() | ?{![char]::IsControl("$_")}) -join ""
($s | sls "(?<=appname)(.*?)(?=Exe)" -All).matches.value | sort > "$([environment]::getfolderpath('desktop'))\gamename.txt"

Method 2 Golfed

$s=((gc "C:\Program Files (x86)\Steam\userdata\149576161\config\shortcuts.vdf").ToCharArray() | ?{![char]::IsControl("$_")}) -join ""
($s | sls "(?<=appname)(.*?)(?=Exe)" -All).matches.value | sort | %{[PSCustomObject]@{GameName=$_}} | epcsv "$([environment]::getfolderpath('desktop'))\gamename.csv"

The regex used by these new methods will matches only the game names, but using it increases runtime by 0.3s compared to the first regex.

This is what I see in console using the second method 1 golfed:

I want to answer this question and help the OP simply because I find the question interesting, the thing OP wanted is fun, I am just a beginner in Programming, and I want to improve my skills by answering questions others have posted with programs, that's all...

P.S. I really want to be a hacker...

有一个非官方的vdf python 模块用于解析 Valve 的 vdf 文件。有了它，解析和写出包含所有名称的 csv 非常简单：

import vdf

def print_names(shortcut_file_path):
    with open(shortcut_file_path, "rb") as f:
        shortcuts = vdf.binary_load(f)

    with open('c:/scratch/shortcuts.csv', 'w') as f:
        f.write('Game Name\n')
        for k, v in shortcuts["shortcuts"].items():
            appname = v.get("appname")
            print(appname)
            f.write(appname + '\n')

print_names("C:/Program Files (x86)/Steam/userdata/149576161/config/shortcuts.vdf")

要查看所有可用字段（“appname”除外），请将该print行替换为import pprint; pprint.pprint(v); break

像其他 python 模块一样，使用pip install vdf.