批处理怎样解码Outlook Express邮件内容？

cjiabing

        前面做了个“OE收件箱监控与主题提取工具 OEInboxtoolV6.2”，因为Outlook Express的标题比较容易提取和解码，所以用了标题做主要的通讯方式。
        而Outlook Express的邮件内容也是可以提取的，但解码总是不能完全成功，总有些乱码。这个可能与“收件箱.dbx”转换成 txt 有关。
       我直接将后缀名 dbx  改为  txt  提取邮件内容，许多制表符号不能解决，所以不能彻底转换。.dbx 可以用电子表格查看，大家看看有什么办法。用VB或者其它方式，把一封邮件完美的提取出来。
      

1. @echo off&setlocal enabledelayedexpansion
   
2. move "C:\Documents and Settings\Administrator\Local Settings\Application Data\Identities\{ECFEDFFB-8EB4-4F0E-827F-1139C49E60D0}\Microsoft\Outlook Express\收件箱.dbx" !cd!
   
3. if exist 收件箱.dbx ren 收件箱.dbx 收件箱.txt
   
4. if exist 收件箱.txt more /T8 /p /e /s 收件箱.txt>>glsjx.txt
   
5. if exist glsjx.txt for /f "tokens=*" %%a in (glsjx.txt) do (
   
6. echo.%%a>glfh.txt
   
7. if exist glfh.txt base64 -d -i glfh.txt -o sjxjm.txt
   
8. if exist sjxjm.txt type sjxjm.txt>>sjxjmr.txt
   
9. )
   
10. more sjxjmr.txt >>sjxjmre.txt
    
11. del glsjx.txt,sjxjm.txt,glfh.txt,sjxjm.txt
    
12. if exist sjxjmre.txt START "" sjxjmre.txt
    
13. ping /n 3 127.0.0>nul
    
14. exit
    
15. 上面是前几天写的一个，多个临时文件是用来观察结果的。需要解码器base64.exe 。注意MOVE邮件后，可能收件箱变空，可能而已。
    
16. 清理 收件箱.dbx
    
17. 发邮件时，最好在邮件内容前加两行 cls，在邮件内容后面加两行exit，避免邮件内容被乱码淹没。
    
18. 并且内容不一定能完全翻译正确
    
19. 在Outlook Express上，点击邮件邮件查看属性，可以查看邮件来源里面的代码。
    

复制代码