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の場合、特定のタイプを自分で変更および追加できます