根据命名约定重命名.jpg文件的最佳方法

Question

在我的HTML页面中，我显示了c * urrent日和过去4天的报告 *。我已经设计了HTML页面。但是对于每一天，我都对JPG Image文件名进行了硬编码。

我正在使用命名约定，如下所示 -

1. 当天，CurDt_S1
2. 当天减去1天，CurDt_1_S1
3. 当天减去2天，CurDt_2_S1
4. 当天减去3天，CurDt_3_S1
5. 当日减去4天，CurDt_4_S1

现在，我想重命名一系列.jpg，但我想在文件名末尾添加字符串。请帮帮我怎样才能实现这个目标。 通过vbscript或HTML或批处理文件。

我尝试使用批处理文件，但它对我不起作用。

系列的jpg文件 - CurDt_S1，CurDt_S2，CurDt_S3等.. uptill S20。

• CurDt_S1将重命名为CurDt_1_S1 uptill S20
• CurDt_ 1 _S1 to CurDt_2_S1 uptill S20
• CurDt_ 2 _S1 to CurDt_3_S1 uptill S20
• CurDt_ 3 _S1 to CurDt_4_S1 uptill S20
• CurDt_ 4 _S1文件将存档到差异文件夹或将被删除

我欢迎任何能编码的SIMPLE解决方案。 ：）

感谢。

Answer 1

首先，HTML将无法为此提供任何内容。它是一种标记语言，而不是编程语言。

在visual basic中，你有很多选择。首先，您想要更改文件名，您可以使用

   My.Computer.FileSystem.RenameFile(fileX, fileY)

对于Cur_Dt_4_s1，您将使用

  My.Computer.FileSystem.MoveFile("C:\directory1\file.txt","C:\directory2\file.txt")

要处理名称更改，首先要创建一个循环，它将遍历这些jpeg的文件夹。

接下来，使用path class中的方法按顺序加载每个文件，以便将每个文件的整个路径收集为字符串。由于您为文件维护了标准命名系统，因此只需：

 result = Path.GetFileName(fileName); //result being a string 

然后，因为字符串“result”已经是一个字符数组，使用以下命令访问第6个字符（您的号码）：

 Dim charNum = result(5)

要将'charNum'更改为整数，请使用

 CInt(charNum)

之后它非常简单。你将+1来自CInt的变量+1，然后将它转换回CChar的一个字符，将其推回到同一位置的数组中，然后使用新的字符串作为变量你将拥有对于fileY字符串。

希望你自己可以更好地探索这个，但如果你还在苦苦挣扎，我会正确地构建代码。

Answer 2

我终于找到了以最简单的方式使用BATCH FILE实现此bu的SIMPLEST方法。

使用以下代码 -

del CurDt_5_S * ren CurDt_4_S * CurDt_5_S * ren CurDt_3_S * CurDt_4_S * ren CurDt_2_S * CurDt_3_S * ren CurDt_1_S * CurDt_2_S *

我测试了它和它的工作。 :) :) :)）