获取指定文件夹下指定格式的文件名(带完整路径)

            
            ----------------2021/12/8 JM
            ---------获取指定文件夹下指定格式的文件名,带完整路径
            Imagefile_name_array = #()
            cc= "C:\Users\Administrator\Desktop\\" ------bat文件生成路径
            batname = cc + "Imagefilename.bat"  ------生成bat文件完整路径名
            sstart = createFile batname  -----创建bat文件
                                        
            ff = "C:\Users\Administrator\Desktop\\" ------需要获取的指定文件夹内文件名
            bb = "C:\Users\Administrator\Desktop\\" -------txt文档生成的文件位置
            a1 = "%"
            tt = cc+"result.txt"  ---------txt文档名
            ee = "Imagefile_name_array = #("
            uu = "Imagefile=Imagefile_name_array"
            Format "@echo off\n" to:sstart

            Format "type nul >%result.txt\n"  bb to:sstart
            Format "echo % >%\n" ee tt to:sstart ------向文本写入文本"Imagefile_name_array = #("
            Format " for /r % %%a in (*) do (\n>>%result.txt echo %%~dpa%%~nxa,\n)\n " ff a1 a1  bb  a1 a1 a1 a1 to:sstart
                    ---(*.tga) 指定格式  \n 换行
            Format "echo ) >>\"%\"\n"  tt to:sstart  -----向文本写入) 括号
            Format "echo % >>\"%\"\n"  uu tt to:sstart ------向文本写入文本"Imagefile=Imagefile_name_array"
            
    
            close sstart

                 ----------------------------------------------------生成隐身运行vbs bat文件-------------------------------------------
                                                vbsbname = "C:\Users\Administrator\Desktop\\temp3.vbs"
                                                vbsbstart = createFile vbsbname

                                                Format "Set ws = CreateObject(\"Wscript.Shell\")\n" to:vbsbstart

                                                Format    "ws.run \"cmd /c %\",0\n"        batname to:vbsbstart

                                                close vbsbstart

                                                shellLaunch batname ""  --运行生成后的bat文件


        



                                                
 

 

posted @ 2022-01-07 14:36  简梦JM  阅读(616)  评论(0)    收藏  举报