简单设置让迅雷一步保存所有网页图片

　　有时在网上看到很多漂亮的图片，真恨不得将它们倾收囊中。一般情况下，我们先用迅雷的“使用迅雷下载全部链接”功能，再手工选择图片类型，这样做步骤较多。事实上，网络上多数的图片是JPG格式的，我们只要自己动手，很简单地操作就能做到一步保存页面美图。甚至也能请电脑高手做好，然后将这个功能“安装”到你的迅雷5上，相当酷！
　　第一步：复制相应文件
　　先进入X：ProgramFilesThunderNetworkThunderProgram文件夹，选中getAllurl。htm，按下CtrlC，再按下CtrlV，将会生成“getAllurl复制。htm”文件。选中它，按下F2键，将其重命名为getAlljpg。htm。
　　第二步：修改相应代码
　　右击getAlljpg。htm文件，选择“打开方式”“记事本”（如图1），用“记事本”打开它。
　　再按下CtrlA键选中所有字符，按下Del将其删除掉，然后输入如下内容：
　　SubOnContextMenu（）setThunderAgentCreateObject（ThunderAgent。Agent。1）setlinksexternal。menuArguments。document。linkssetimagesexternal。menuArguments。document。imageslinkcountlinks。lengthimagecountimages。lengthstrDownloadPageexternal。menuArguments。document。urlsettheDownloadPageexternal。menuArguments。document。getElementById（thunderdownpageurl）ifTypeName（theDownloadPage）NothingthenstrDownloadPagetheDownloadPage。valueendifstrStatPagesettheStatPageexternal。menuArguments。document。getElementById（thunderstatpageurl）ifTypeName（theStatPage）NothingthenstrStatPagetheStatPage。valueendifDimpicNumifstrStatPagethenfori0tolinkcount1IfRight（links（i）。href，3）jpgOrRight（links（i）。href，3）JpgOrRight（links（i）。href，3）JPGThenpicNumpicNum1callThunderAgent。AddTask4（links（i）。href，photoCStr（picNum）。jpg，，links（i）。innerText，strDownloadPage，1，0，1，external。menuArguments。document。cookie，，strStatPage）EndIfNextfori0toimagecount1IfRight（images（i）。src，3）jpgOrRight（images（i）。src，3）JpgOrRight（images（i）。src，3）JPGThenpicNumpicNum1callThunderAgent。AddTask4（images（i）。src，photoCStr（picNum）。jpg，，images（i）。innerText，strDownloadPage，1，0，1，external。menuArguments。document。cookie，，strStatPage）EndIfnextelsefori0tolinkcount1IfRight（links（i）。href，3）jpgOrRight（links（i）。href，3）JpgOrRight（links（i）。href，3）JPGThenpicNumpicNum1callThunderAgent。AddTask4（links（i）。href，photoCStr（picNum）。jpg，，links（i）。innerText，strDownloadPage，1，0，1，external。menuArguments。document。cookie，，）EndIfNextfori0toimagecount1IfRight（images（i）。src，3）jpgOrRight（images（i）。src，3）JpgOrRight（images（i）。src，3）JPGThenpicNumpicNum1callThunderAgent。AddTask4（images（i）。src，photoCStr（picNum）。jpg，，images（i）。innerText，strDownloadPage，1，0，1，external。menuArguments。document。cookie，，）EndIfnextendIfcallThunderAgent。CommitTasks2（1）setThunderAgentnothingendSubcallOnContextMenu（）