![]() |
China DOS Union-- Unite DOS · Advance DOS · Grow DOS --Union site: www.cn-dos.net Forum site: www.cn-dos.net/forum |
| Guest | Log in | Register | Members | Search | China DOS Union |
|
中国DOS联盟论坛 The time now is 2026-11-10 12:31 |
47,815 topics / 349,930 posts / today 0 new / 48,291 members |
| DOS批处理 & 脚本技术(批处理室) » [Original] SendTo+ Batch Processing Practical Small Tool -- Enhanced Send To |
| Printable Version 80,134 / 75 |
| Floor61 kidzgy | Posted 2007-08-01 09:27 |
| 中级用户 Posts 129 Credits 262 | |
|
The download link has expired. Please have the thread starter check it.
|
|
| Floor62 jobesky | Posted 2007-09-29 18:16 |
| 新手上路 Posts 2 Credits 4 | |
|
Great
|
|
| Floor63 binggao | Posted 2007-09-30 09:02 |
| 初级用户 Posts 33 Credits 70 | |
|
It feels really difficult. I still need to study a lot.
|
|
| Floor64 67411666 | Posted 2007-10-14 16:13 |
| 初级用户 Posts 25 Credits 45 | |
|
Downloading it first
|
|
| Floor65 hdzc | Posted 2007-10-23 15:55 |
| 初级用户 Posts 86 Credits 146 | |
|
The download link has expired.
|
|
| Floor66 vincentzpf | Posted 2007-11-28 14:42 |
| 新手上路 Posts 2 Credits 3 | |
|
The download link has expired.
|
|
| Floor67 hpwsb | Posted 2007-12-02 12:00 |
| 初级用户 Posts 16 Credits 31 | |
|
Can't download it
|
|
| Floor68 mrxuanfeng | Posted 2007-12-04 17:46 |
| 新手上路 Posts 5 Credits 10 | |
|
There are many experts, passing by, passing by
|
|
| Floor69 hdzc | Posted 2008-01-06 22:14 |
| 初级用户 Posts 86 Credits 146 | |
|
The download address has been restored. Thanks for providing it. It's too useful.
|
|
| Floor70 gto1235 | Posted 2008-01-07 09:04 |
| 新手上路 Posts 1 Credits 2 | |
|
Lack of sufficient qualifications to express an opinion, first study
|
|
| Floor71 ljxar | Posted 2008-03-28 12:26 |
| 新手上路 Posts 1 Credits 2 | |
|
Dude, here's a VBScript example that can help you read the contents of ASP files and write them into a single text file. Save the following code as a `.vbs` file (for example, `asp_to_txt.vbs`):
```vbscript Set objFSO = CreateObject("Scripting.FileSystemObject") Set objOutput = objFSO.CreateTextFile("output.txt", True) strFolder = InputBox("Please enter the folder path containing ASP files") Set objFolder = objFSO.GetFolder(strFolder) Set colFiles = objFolder.Files For Each objFile In colFiles If LCase(objFSO.GetExtensionName(objFile)) = "asp" Then Set objInput = objFSO.OpenTextFile(objFile.Path) strContent = objInput.ReadAll objOutput.WriteLine(strContent) objInput.Close End If Next objOutput.Close MsgBox "Operation completed!" ``` You need to run this script, and when prompted, enter the folder path that contains all the ASP files. It will read all the content of the ASP files in that folder and write them into a single `output.txt` file. Please note that you need to have appropriate file access permissions to run this script. Also, this is a simple way to collect the contents; you can adjust it according to more specific needs if necessary. |
|
| Floor72 kaikai163 | Posted 2008-03-28 20:26 |
| 初级用户 Posts 60 Credits 107 | |
|
What a group of experts! Learning
|
|
| Floor73 cgi | Posted 2008-03-31 14:06 |
| 初级用户 Posts 14 Credits 38 | |
|
The moderator's work is indeed extraordinary, but there is one question I would like to ask the moderator. When using "◇Create a new folder with the same name or clipboard", if there are "(" or ")" in the file name, the new folder cannot be created with the same name or clipboard. Is there a solution? Thank you!
|
|
| Floor74 xtanbmy | Posted 2008-04-07 19:54 |
| 初级用户 Posts 31 Credits 47 | |
|
A group of experts! Learning
|
|
| Floor75 xb2008chopin | Posted 2008-04-08 03:12 |
| 初级用户 Posts 11 Credits 24 | |
|
It's indeed quite classic. I've collected it. Thanks, LZ.
|
|
| Prev 1 … 2 3 4 5 6 Next |
|
[ Contact the Union admin team -
中国DOS联盟 -
Standard version ] Sponsored by ifanr Inc | © 2001–2023 |