使用 Autohotkey 清空文本文件？

Question

我正在尝试找到一种使用 Autohotkey 清空文本文件的方法。不幸的是，我找不到任何可以让你做到这一点的内置函数。我能想出的最佳解决方案是：

FileRead, TheText, file.txt
StringReplace, NewText, TheText, 'text to search for', 'replacement text', All
FileDelete, file.txt
FileAppend, %NewText%, file.txt

但是，这个解决方案对我不起作用，因为我正在编写一个工具来添加或删除 Windows 主机文件中的内容。删除主机文件当然是不可能的。

因此，我将主机文件内容加载到变量中，将我的程序所做的任何添加替换为该变量内的空字符串（以恢复原始主机文件内容）并将其写回主机文件。但为了做到这一点，我需要先清空文件，否则它只会将变量附加到现有内容。

对于那些对我的程序感到好奇的人：

该程序将启用/禁用 Outlook.com 或 hotmail.com 上的自动 Skype 登录功能。当然不会对邮件功能或 Skype 客户端造成任何问题。

Answer 1

这是一种使用文件对象的方法 (req ahk 1.1+)

只需将此示例放在一个新的脚本文件中并运行它以查看它是如何工作的

/* String1
 * String2
 * String3
 * String4
 * String5
 * String6
 * String7
 * String8
 * String10
*/

msgbox % CutString(A_ScriptFullPath, "String7")

CutString(filePath, Needle)
{
    fileObj := FileOpen(filePath, "rw"), pointerPos := fileObj.Pos, RegExMatch(fileObj.read(), "O)" needle, match)

    fileObj.Seek(0), newText .= fileObj.read(match.pos-1), fileObj.Seek(match.pos + match.Len), newText .= fileObj.read()

    fileObj.Seek(pointerPos), fileObj.Write(newText), fileObj.length := StrLen(newText), fileObj.Close()
    return match.value
}

此函数使用正则表达式查找文件中“needle”字符串的位置和大小，然后在没有它的情况下重写和调整文件内容。

您还可以重写该函数以简单地从文件中删除行。

我希望这能满足您的需要

Answer 2

重命名呢？我以前做过。

hosts := "c:\windows\system32\etc\hosts"

fileread, hostsText, %hosts%
stringreplace, newText, %hostsText%, %searchtext%, %replacementtext%, all
fileappend, %hostsText%, %hosts%.bak   ;make backup
filedelete, %hosts%.temp               ;delete the temp file if it exists
fileappend, %newtext%, %hosts%.temp    ;write new text to a blank file
filemove, %hosts%.temp, %hosts%, 1     ;rename the new file to hosts - set flag to 1 to overwrite

那你需要刷新DNS，不是吗？

Run cmd /c ipconfig /flushdns

Answer 3

按照以下步骤操作：

1. 运行，notepad.exe invalid_response.txt
2. 睡觉，200
3. 发送，^a
4. 发送，{Del}
5. 睡觉，200
6. 发送，!{F4}
7. 发送，{HOME}
8. Sendraw，#
9. 发送，^s
10. 睡觉，200
11. 发送，!{F4}
12. 退出