请问如何将bac格式文件批量转换为jpg文件

来源:百度知道 编辑:UC知道 时间:2024/09/20 21:45:35

把下面的复制到记事本里面 ,然后保存为 改名.hta
然后打开就可以批量改了。
下面开始。。

<html>
<head>
<title>文件批量改名脚本</title>
<style>
body{color:ffffff;}
td{text-align:center;}
.td1{width:80;text-align:center;}
.input1{width:100%;text-align:center;color:red;}
</style>
<hta:application scroll="no">

<script language="vbscript">
resizeto 500,300
'减去字符串的脚本
sub tihuan(varsrc,vardst,var1,var2)
'msgbox varsrc & vardst & var1 & var2
set fso1=createobject("scripting.filesystemobject")
set folder_src=fso1.getfolder(varsrc)
set folder_dst=fso1.getfolder(vardst)
'set folders_src=folder_src.subfolders
set files_src=folder_src.files
for each fi in files_src
dstfi=replace(fi.name,var1,var2)
fso1.movefile fi.path,folder_dst.path & "\" &