我有个很好的想法，高手们都来试试 - 中国DOS联盟论坛

─────────────────────　版务记录　──────────────────────
执行：namejm
原标题：我有个很好的想法，高手们都来试试
说明：因标题表述过于模糊，不便于论坛的搜索和管理，请在三日内修改标题。
提示：修改标题请在当前帖的右下脚点编辑，修改完毕之后按编辑帖子即可。
处罚：因刚脱离论坛新人阶段不久，暂时不予处罚；若三日之后尚未修改标题，将扣除
　　2点积分，以示惩罚，并由版主强制修改标题。请点击这里阅读论坛发帖规定，
　　以避免在今后的讨论中违规发帖。
─────────────────────　版务记录　──────────────────────

用C:\WINDOWS\notepad，打开utf-8文件，然后Alt+F，再Alt+A，再Alt+E再选则，ANSI，再回车。完成以上操作就将，utf-8编码的文件转换成ANSI编码的文件啦，但我不知道用批处理该怎样写，我很菜，难过啊。

[ Last edited by jdxhyuan on 2007-3-20 at 09:27 AM ]

楼主试试type UTF-8文件>ANSI文件的方式是否可以转换啊？如果光看你的描述传递组合键，那只能用VBS脚本完成，P处理没法实现

LZ的方法是得用VBS脚本完成，我以前玩过

LS的type UTF-8文件>ANSI文件方式试了，无效，用16进制茹软件查看，内容一样，type只适合type Unicode文件>ANSI文件


set tc="%temp%\%random%.vbs"
echo Set tc=WScript.CreateObject("WScript.Shell")>%tc%
echo tc.Run "notepad.exe %~f1">>%tc%
echo tc.AppActivate "%~nx1 - 记事本">>%tc%
echo WScript.Sleep 500 >>%tc%
echo tc.SendKeys "%%FA%~n1bak.txt%%EA%%SY%%{F4}N">>%tc%
cscript %tc%
pause

这样子的

[ Last edited by everest79 on 2007-3-15 at 05:35 AM ]

Originally posted by everest79 at 2007-3-14 10:29 AM:
set tc="%temp%\%random%.vbs" echo Set tc=WScript.CreateObject("WScript.Shell")>%tc% echo tc.Run "notepad.exe %~f1">>%tc% echo tc.AppActivate " ... 遇到救星啦，我要转的文件加在什么地方呢？

大家帮帮忙，问题快要解决啦

4 楼的方法是“批处理.bat 要处理的文件”，把要处理的文件名作为%1参数
不过选择编码方式有误，键盘选择编码方式只能选择头位字母，改为：

set tc="%temp%\%random%.vbs"
echo Set tc=WScript.CreateObject("WScript.Shell")>%tc%
echo tc.Run "notepad.exe 文件名.txt">>%tc%
echo tc.AppActivate "文件名 - 记事本">>%tc%
echo WScript.Sleep 500 >>%tc%
echo tc.SendKeys "%%FA文件名bak.txt%%EUUU%%SY%%{F4}N">>%tc%
cscript %tc%
pause

UTF改为三个U就行了（发送三次U依次选择到UTF-8）

PS：“echo tc.AppActivate "文件名 - 记事本">>%tc%”这句在设置系统显示文件扩展名的时候改为“echo tc.AppActivate "文件名.txt - 记事本">>%tc%”，

呵呵，我发现我少了好多耐心，其本上都不测试，检讨
%1的参数我是想拖放来着

现在问题是怎样才能调用多个无规则的文件名来做想同的处理呢，而这段代码的文件名要求要输入。

set tc="%temp%\%random%.vbs"
echo Set tc=WScript.CreateObject("WScript.Shell")>%tc%
echo tc.Run "notepad.exe 文件名.txt">>%tc%
echo tc.AppActivate "文件名 - 记事本">>%tc%
echo WScript.Sleep 500 >>%tc%
echo tc.SendKeys "%%FA文件名bak.txt%%EUUU%%SY%%{F4}N">>%tc%
cscript %tc%
pause

用

for /f "delims=" %%i in ('dir /b /a-d *.txt') do (start notepad "%%i")

它们相互怎样调用

[ Last edited by jdxhyuan on 2007-3-15 at 09:26 AM ]

Originally posted by jdxhyuan at 2007-3-15 09:21 AM:
现在问题是怎样才能调用多个无规则的文件名来做想同的处理呢，而这段代码的文件名要求要输入。

set tc="%temp%\%random%.vbs" echo Set tc=WSc ... for /f "delims=" %%i in ('dir /b /a-d *.txt') do (call :ansi "%%~dpnxi") goto :eof :ansi set tc="%temp%\%random%.vbs" echo ct=WScript.Arguments.Item(0) echo Set tc=WScript.CreateObject("WScript.Shell")>%tc% echo tc.Run "notepad.exe %~f1">>%tc% echo tc.AppActivate "%~nx1 - 记事本">>%tc% echo WScript.Sleep 500 >>%tc% echo tc.SendKeys "%%FA%~n1bak.txt%%EA%%SY%%{F4}N">>%tc% cscript %tc% goto :eof

没改完，嘿嘿

第1楼　jdxhyuan	发表于 2007-03-14 22:18
初级用户　发帖 11　积分 26
我有个很好的想法，高手们都来试试 ─────────────────────　版务记录　────────────────────── 执行：namejm 原标题：我有个很好的想法，高手们都来试试说明：因标题表述过于模糊，不便于论坛的搜索和管理，请在三日内修改标题。提示：修改标题请在当前帖的右下脚点编辑，修改完毕之后按编辑帖子即可。处罚：因刚脱离论坛新人阶段不久，暂时不予处罚；若三日之后尚未修改标题，将扣除　　2点积分，以示惩罚，并由版主强制修改标题。请点击这里阅读论坛发帖规定，　　以避免在今后的讨论中违规发帖。 ─────────────────────　版务记录　────────────────────── 用C:\WINDOWS\notepad，打开utf-8文件，然后Alt+F，再Alt+A，再Alt+E再选则，ANSI，再回车。完成以上操作就将，utf-8编码的文件转换成ANSI编码的文件啦，但我不知道用批处理该怎样写，我很菜，难过啊。 [ Last edited by jdxhyuan on 2007-3-20 at 09:27 AM ]

第2楼　9527	发表于 2007-03-14 22:30
银牌会员　发帖 438　积分 1,185　来自北京
楼主试试type UTF-8文件>ANSI文件的方式是否可以转换啊？如果光看你的描述传递组合键，那只能用VBS脚本完成，P处理没法实现

第3楼　zh159	发表于 2007-03-14 22:37
金牌会员　发帖 1,467　积分 3,687
LZ的方法是得用VBS脚本完成，我以前玩过 LS的type UTF-8文件>ANSI文件方式试了，无效，用16进制茹软件查看，内容一样，type只适合type Unicode文件>ANSI文件

第4楼　everest79	发表于 2007-03-14 23:29
金牌会员　发帖 1,127　积分 2,564
set tc="%temp%\%random%.vbs" echo Set tc=WScript.CreateObject("WScript.Shell")>%tc% echo tc.Run "notepad.exe %~f1">>%tc% echo tc.AppActivate "%~nx1 - 记事本">>%tc% echo WScript.Sleep 500 >>%tc% echo tc.SendKeys "%%FA%~n1bak.txt%%EA%%SY%%{F4}N">>%tc% cscript %tc% pause 这样子的 [ Last edited by everest79 on 2007-3-15 at 05:35 AM ]

第5楼　jdxhyuan	发表于 2007-03-15 04:19
初级用户　发帖 11　积分 26
Originally posted by everest79 at 2007-3-14 10:29 AM: set tc="%temp%\%random%.vbs" echo Set tc=WScript.CreateObject("WScript.Shell")>%tc% echo tc.Run "notepad.exe %~f1">>%tc% echo tc.AppActivate " ... 遇到救星啦，我要转的文件加在什么地方呢？

第6楼　jdxhyuan	发表于 2007-03-15 04:24
初级用户　发帖 11　积分 26
大家帮帮忙，问题快要解决啦

第7楼　zh159	发表于 2007-03-15 05:33
金牌会员　发帖 1,467　积分 3,687
4 楼的方法是“批处理.bat 要处理的文件”，把要处理的文件名作为%1参数不过选择编码方式有误，键盘选择编码方式只能选择头位字母，改为： set tc="%temp%\%random%.vbs" echo Set tc=WScript.CreateObject("WScript.Shell")>%tc% echo tc.Run "notepad.exe 文件名.txt">>%tc% echo tc.AppActivate "文件名 - 记事本">>%tc% echo WScript.Sleep 500 >>%tc% echo tc.SendKeys "%%FA文件名bak.txt%%EUUU%%SY%%{F4}N">>%tc% cscript %tc% pause UTF改为三个U就行了（发送三次U依次选择到UTF-8） PS：“echo tc.AppActivate "文件名 - 记事本">>%tc%”这句在设置系统显示文件扩展名的时候改为“echo tc.AppActivate "文件名.txt - 记事本">>%tc%”，

第8楼　everest79	发表于 2007-03-15 11:38
金牌会员　发帖 1,127　积分 2,564
呵呵，我发现我少了好多耐心，其本上都不测试，检讨 %1的参数我是想拖放来着

第9楼　jdxhyuan	发表于 2007-03-15 22:21
初级用户　发帖 11　积分 26
现在问题是怎样才能调用多个无规则的文件名来做想同的处理呢，而这段代码的文件名要求要输入。 set tc="%temp%\%random%.vbs" echo Set tc=WScript.CreateObject("WScript.Shell")>%tc% echo tc.Run "notepad.exe 文件名.txt">>%tc% echo tc.AppActivate "文件名 - 记事本">>%tc% echo WScript.Sleep 500 >>%tc% echo tc.SendKeys "%%FA文件名bak.txt%%EUUU%%SY%%{F4}N">>%tc% cscript %tc% pause 用 for /f "delims=" %%i in ('dir /b /a-d .txt') do (start notepad "%%i")它们相互怎样调用 [ Last edited by jdxhyuan on 2007-3-15 at 09:26 AM* ]

第10楼　everest79	发表于 2007-03-16 00:01
金牌会员　发帖 1,127　积分 2,564
Originally posted by jdxhyuan at 2007-3-15 09:21 AM: 现在问题是怎样才能调用多个无规则的文件名来做想同的处理呢，而这段代码的文件名要求要输入。 set tc="%temp%\%random%.vbs" echo Set tc=WSc ... for /f "delims=" %%i in ('dir /b /a-d *.txt') do (call :ansi "%%~dpnxi") goto :eof :ansi set tc="%temp%\%random%.vbs" echo ct=WScript.Arguments.Item(0) echo Set tc=WScript.CreateObject("WScript.Shell")>%tc% echo tc.Run "notepad.exe %~f1">>%tc% echo tc.AppActivate "%~nx1 - 记事本">>%tc% echo WScript.Sleep 500 >>%tc% echo tc.SendKeys "%%FA%~n1bak.txt%%EA%%SY%%{F4}N">>%tc% cscript %tc% goto :eof 没改完，嘿嘿