Text 制作applescript地址簿

我正在尝试制作一个applescript，它将打开一个文档，并将我在文本框中键入的内容添加到文档中，然后将其保存到一个路径中。当我试图保存它时，它只是说“无法保存x，因为该文件不存在。”

这是我的密码

显示对话框“用户名”默认答案“”
将目标_用户名设置为结果返回的文本
显示带有隐藏答案的“密码”对话框“默认答案”
将pass设置为结果返回的文本
如果target_用户名为“Plasma”，pass为“Sship”，则
显示对话框“欢迎！请选择功能！”按钮{“添加地址”、“查看地址”}
如果返回的结果按钮是“添加地址”，则
将booka设置为返回的文本（显示对话框“rers！”默认答案“”）
告诉应用程序“文本编辑”
激活
制作新文档
将文档1的文本设置为booka
延迟10
将路径设置为“/Users/Cameron/Desktop/”
将DOC设置为文档1
将标题设置为“食物”
将文档保存在（路径和标题）
结束语
其他的
显示对话框“否”
如果结束
其他的
显示对话框“否”
如果结束
}

下面的脚本可以保存在txt文件中

set booka to "my string" -- set booka variable just for testing !
tell application "TextEdit"
activate
make new document
set text of document 1 to booka
set thePath to "Users:Cameron:Desktop:food.txt"
tell document 1 to save in file thePath
end tell

---

下面的脚本可以保存在txt文件中

set booka to "my string" -- set booka variable just for testing !
tell application "TextEdit"
activate
make new document
set text of document 1 to booka
set thePath to "Users:Cameron:Desktop:food.txt"
tell document 1 to save in file thePath
end tell

---

脚本对我很有用，当然用自己的用户名替换“Cameron”。你确定你的用户是“Cameron”吗？（这是我唯一不能测试的东西）你是否知道如何打开同一个文档并编写另一个东西？在“告诉文本编辑”组中使用“打开”指令，设置新文本并再次保存。但是，如果目的只是在txt文件上写入文本，则不需要使用TextEdit。在Applescript中查找“read”和“write”命令。该脚本适用于我，当然可以用自己的用户名替换“Cameron”。你确定你的用户是“Cameron”吗？（这是我唯一不能测试的东西）你是否知道如何打开同一个文档并编写另一个东西？在“告诉文本编辑”组中使用“打开”指令，设置新文本并再次保存。但是，如果目的只是在txt文件上写入文本，则不需要使用TextEdit。在Applescript中查找“读取”和“写入”命令。