标题：关于文件监视器
例如：文本文件内容如图：
图片文件原为Sunset.jpg,改为：gk001.jpg。
此主题相关图片如下：文本文件内容.jpg
可以监视文本文件，这样输入内容后保存，系统可以监视到，然后读取文本文件的内容，据此改图片文件的名称
不过怪怪的感觉
我是照相用的，一个人照完照片，自动去改名，而不是手动该。
取文本文件的内容，据此改图片文件的名称用代码怎么实现呢？谢谢
何不直接用foxtable输入文件名去改？
你这样转的湾也太大了。
监控指定目录，一旦发现有新生成的图片文件，就打开一个窗口让用户输入文件名，然后改名。
是这样的，先在我这里开piao，piao上有照相本人的二维码信息，然后再到另外一个地方去照相，照完相后，用扫描枪扫描其二维码并形成一文本文件，再把照相图片和文本文件通过无线的形式传到我这里（这个已经能实现），用文件监视器做到自动改名。这样照片文件名就是其本人名，不会出错。我现在就是用的“打开一个窗口让用户输入文件名，然后改名”的方法，效率低还容易出错。
您就告诉我在文件监视器中，读取文本文件的内容，据此改图片文件的名称用代码怎么实现吧！
你就用文件监视器的FileCreated事件，监控那个目录，如果有图片文件生成，就读取约定的文本文件的内容（就是扫描生成的文本文件），将新生成的图片文件改名。
我感觉还不如将姓名扫描到foxtable呢。
难道在狐表文件监视器里，做不到读取文本文件的内容，据此改图片文件的名称吗？
怎么可能啊，先设置文件监视器，指定指定的目录和要监视的文件类型，然后设置FileCreated事件代码。
读取文本文件和重命名文件的帮助：
ReadAllText
读取文本文件的内容。
语法：
ReadAllText(File, Encoding)
File: 要读取的文件的文件名和路径
Encoding: 可选参数，Encoding类型，可选的编码有：
Default
ASCII
BigEndianUnicode
Unicode
UTF32
UTF7
UTF8
Default表示系统编码，对于中文操作系统，通常是GB2312
示例一
读取并显示指定文本文件的内容：
Dim
s As string = FileSys.ReadAllText("c:\data\table.txt")Output.Show(s)
示例二
一般不需要指定文本文件的编码，ReadAllText会尝试自动检查。
但是如果读取的文本文件出现乱码，那么应该考虑明确指定文件编码，例如：
Dim
s As string = FileSys.ReadAllText("c:\data\table.txt", Encoding.Default)Output.Show(s)
RenameFile
重命名文件。
语法
RenameFile(File, NewName)
File：要重命名的文件。
NewName：新的文件名，不包括目录。
例如：
FileSys.RenameFile(
"c:\data\Test.txt", "SecondTest.txt")
将文件“c:\data\Test.txt”重命名为“SecondTest.txt”。
感觉你的设计非常不合理，不如在照相地方的电脑装上foxtable，使用文件监视器，设置FileCreated事件，一旦发现有照片生成，就打开一个窗口，然后将姓名扫描进窗口的文本框，据此文本框的内容更改图片文件名称。