ASPバッチ変更プログラムを使用したコード実装、FSO関連
それはコード変更のバッチで行う必要がある小さなことであり、私はあなたとそれを共有します。
現在処理できるファイルタイプ：.asp .inc .htm .html特定のタイプを自分で変更および追加できます。
プログラムによって実装された関数：バッチソースディレクトリのファイルを変更し、それらを宛先ディレクトリに保存します。
いくつかの変更が多くのことを達成できます！
私は他に何も言わない、コードは非常に明確だ
<％
'// +-------------------------------------------------------------------------- +
'// |プログラム名：Stone Code Batch Modifier V1.01 |
'// |他の山の石によって予約されているすべての権利、侵害が追求されます！転載時に著作権を示してください:) |
'// | --------------------------------------------------------------------------- |
'// |システム：Win2000;編集者：editplus;インデントツール：タブ。インデントの長さ：8;フォント：Songti（10pt）; |
'// | --------------------------------------------------------------------------- |
'// |作成者：WYC;作成時間：2004-03-08; |
'// |作家：WYC;ライター：2004-03-08; |
'// +-------------------------------------------------------------------------- +
server.scripttimeout = 500 'スクリプトタイムアウト時間
'// +-------------------------------------------------------------------------- +
'// |バッチは機能を変更します|
'// | --------------------------------------------------------------------------- |
'// |属性：path_fromソースファイルディレクトリpath_toターゲットファイル作業ディレクトリ|
'// | --------------------------------------------------------------------------- |
'// |返品値：なし|
'// | --------------------------------------------------------------------------- |
'// |プログラムフロー：... |
'// | --------------------------------------------------------------------------- |
'// |作家：WYC;書き込み時間：2004-03-08; |
'// +-------------------------------------------------------------------------- +
sub midfile（path_from、path_to）
list_from = path_from 'ストレージ現在のソースワーキングディレクトリ
list_to = path_to '現在のターゲット作業ディレクトリを保存します
fso = createObject（scripting.filesystemObject）をset
fold = fso.getFolder（list_from） 'フォルダーオブジェクトを取得します
fc = fold.files 'get fileレコードセットを設定します
mm = fold.subfolders '取得ディレクトリレコードセットを設定します
mmの各F2について
objfile = server.createobject（scripting.filesystemobject）を設定します
objfile.createfolder（path_to＆ /＆＆f2.name） '作成ディレクトリを作成します
Midfile path_from＆ /＆f2.name、path_to＆ /＆f2.name '再帰呼び出し
respons.write path_to＆ /＆f2.name＆finisht！ <br>
次
FCの各F1
file_from = list_from＆ /＆f1.name 'ファイルアドレスの作成（ソース）
file_to = list_to＆ /＆f1.name 'ファイルアドレスを作成（to）
fileext = lcase（right（f1.name、4）） 'ファイルタイプを取得します
fileext = .aspまたはfileext = .incまたはfileext = .htmまたはfileext = htmlの場合、特定のタイプを自分で変更および追加できます