dreamweaver 如何批量替换源代码文件

       正则表达式不能提取文件名作为变量，可以试试VBS：

       sFolder = "."

       Set oFSO = CreateObject("Scripting.FileSystemObject")

       Set oFolder= oFSO.GetFolder(sFolder)

       Set colFiles = oFolder.Files

       For Each oFile in colFiles

        If Lcase(oFSO.GetExtensionName(oFile)) = "html" The仿美团源码 密码n

        oName = Split(oFile.Name,".")(0)

        Set sFile = oFSO.OpenTextFile(oFile, 1)

        colLines = sFile.ReadAll

        sFile.Close

        aryLines = Replace(colLines, "1.jpg", oName & ".jpg")

        Set dtFile = oFSO.OpenTextFile(oFile, 2)

        dtFile.Write aryLines

        dtFile.Close

        End If

       Next

       Set oFSO = Nothing

       代码假设文件在同级文件夹，保存为VBS文件放到HTML文件夹，小游戏代码源码双击执行。揭阳源码网站制作如果不在同级文件夹，无代码app源码HI我以作修改。小米系统源码设计