
CODE: [Copy to clipboard]for /f "tokens=* eol=<" %%i in (test.htm) do @echo.%%i>dest_text.txt
CODE: [Copy to clipboard]set fso=createobject("scripting.filesystemobject")
set file=fso.opentextfile("test.htm")
s=file.readall
file.close
Function getImages(Str)
Set re = New RegExp
re.global=true
re.Pattern = "\n\W+"""
Set Contents = re.Execute(Str)
For Each Match in Contents
Images = Images +Match+vbcrlf
Next
getImages =Images
End Function
set file=fso.createtextfile("#test.txt")
file.write getimages(s)
file.close
createobject("wscript.shell").run "#test.txt"
| Quote: | |
|

| Quote: | |
|
| 欢迎光临 中国DOS联盟论坛 (http://cndos.fam.cx/forum/) | Powered by Discuz! 2.5 |