Visual Basic - 尝试删除 AppData 中的数据时卡住了

Visual Basic - Stuck trying to delete data in AppData

我想创建一个 Visual Basic 应用程序来删除以下文件,但我是 VB 的新手,抱歉!:

C:\Users\username\AppData\Local\Google\Chrome\User Data\Default\Cookies

该文件似乎没有文件扩展名,但它是一个 SQL 类型的文件。我在尝试使用 "username" 变量时遇到问题。我在那个 space 中尝试过类似 %USER% 的东西,但它一直给我一个关于无法找到文件的错误。如果有人能发现我分配给按钮的以下代码中的任何错误,我将不胜感激:

    Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
    Dim FileToDelete As String

    FileToDelete = "C:\Users\%USERNAME%\AppData\Local\Google\Chrome\User Data\Default\Cookies"

    If System.IO.File.Exists(FileToDelete) = True Then

        System.IO.File.Delete(FileToDelete)
        MsgBox("File Deleted")

在 vb.net 中,您可以使用 Enviroment.GetFolderPath() 方法。 要到达您想要的代码将是:

Dim appData As String = GetFolderPath(SpecialFolder.LocalApplicationData)

SpecialFolder 是一个枚举,允许您从许多不同的文件夹(例如 Program Files 或 Desktop)中 select。要阅读有关 Environment.SpecialFolder 枚举的更多信息,请访问: https://msdn.microsoft.com/en-us/library/system.environment.specialfolder%28v=vs.110%29.aspx

这将为您提供本地 appdata 文件夹(我假设这就是您从您给我们的路径中想要的文件夹。

使用上面的字符串后,就像将变量连接到字符串中一样简单:

FileToDelete = appData & "\Google\Chrome\User Data\Default\Cookies"

请记住,您还需要

Imports System.Environment

在代码的开头。