＜FileSystemObjectの.DeleteFileでファイル削除＞
こんにちは、三流プログラマーのＫｅｎ３です。 今回は、 指定ファイルを削除してみたいと思います。/* * １．今回のキッカケ */
テンポラリファイルの作成を、 No.69 FileSystemObjectの.GetTempName(一時ファイル名作成) http://www.ken3.org/backno/backno_asp14.html#69 で、FileSystemObjectの .GetTempNameを使用してファイル名の作成、 .CreateTextFileを使用して作成しました。 http://www.ken3.org/cgi-bin/test/test069-1.asp で、テスト可能です。 これって、ファイル作りっぱなして（笑）、 削除はＦＴＰで２・３日に１回実行してます（笑） 今回は、ファイルの削除処理を探ってみます。/* * ２．意外と簡単、.DeleteFile(ファイル名)でＯＫでした。 */
調べてみると、意外と簡単でした。 Set objFS = Server.CreateObject("Scripting.FileSystemObject") と、 いつものように、ファイルシステムのオブジェクトを作成後、 objFS.DeleteFile(ファイル名のとパスの文字列) でＯＫでした。 ワイルドカード指定も可能なので、 objFS.DeleteFile("x:\zzzz\*.tmp") など、指定可能です。 http://www.ken3.org/cgi-bin/test/test071-1.asp で、テスト可能です。 Server.MapPath("work/") でworkの実フォルダーを返し、 objFS.DeleteFile(strFDIRNAME & "\*.tmp") で、*.tmpを削除してます。 <%@LANGUAGE=VBScript%> <html> <head> <title>FileSystemObject .DeleteFile(ファイル名を削除する)</title> </head> <body> <h2>FileSystemObject .DeleteFile(ファイル名を削除する)</h2> <b>FileSystemObjectの.DeleteFile</b>を使用して、ファイルを削除してみます<br> <br> .DeleteFile(削除するパスとファイル名)を使用すると、<br> ファイルを削除することができます。<br> ※*.tmp を削除したので、下記の実行結果とソースを見てください。<br> <hr> <% '*1 FileSystemObjectを生成します、、って英文、そのままジャン。 Set objFS = Server.CreateObject("Scripting.FileSystemObject") '現在のフォルダーから相対位置のworkディレクトリの名称を取り出す strFDIRNAME = Server.MapPath("work/") 'フォルダー名取得 '*2 .DeleteFileを使用して、ファイルを削除する objFS.DeleteFile(strFDIRNAME & "\*.tmp") '*.tmpを削除する Response.Write strFDIRNAME & "\*.tmp を削除しました<br>" '確認でファイルリストの表示.GetFolderで取得後、一覧表示 Response.Write strFDIRNAME & "のファイル一覧です<br>" & vbCRLF Set objDIR = objFS.GetFolder(strFDIRNAME) '.Filesコレクションにアクセスする For Each objFILE In objDIR.Files strFNAME = objFILE.Name '取り出したobjFILEの.Nameを取得 If strFNAME = strTEMPNAME Then Response.Write "<b>" Response.Write "<a href='work/" & strFNAME & "'>" Response.Write strFNAME & "</a>" & vbTab 'おまけで更新日の表示 Response.Write objFILE.DateLastModified & "<br>" & vbCRLF If strFNAME = strTEMPNAME Then Response.Write "</b>" Next %> <hr> <a href="test069-1.asp">テストのテンポラリファイルを作成する</a><br> ↑※ファイル作成後、再度テストしてみてください。<br> <br> </body> </html> -【けんぞう！】--------------------------------------------------------- 転職関係、在宅プログラマー、SOHOの広告まとめました http://www.ken3.org/etc/500yen/zaitaku.html いろいろとあるので転機の人はぜひ 『だだ、広告料稼ぎたいだけだろ、紹介料300円〜2000円の小金稼ぎ』 ギクっ、、、バレた（笑）登録料無料、匿名で探せるので在宅で小金稼ぎの人も見てね ------------------------------------------------------------------------/* * ３．終わりの挨拶 ＜／ＨＴＭＬ＞ */
今回は、 ファイルの削除でした。 思ったよりも簡単だったので、私もびっくりでした。 ファイルの削除、間違えないように注意して使ってみてください。 何かの参考となれば幸いです。 ＡＳＰ、ＶＢＳｃｒｉｐｔ勉強中の三流プログラマーのＫｅｎ３でした。
| ＡＳＰで遊ぶ、失敗する | 掲示板 | バックナンバー | 登録と解除 |
| 三流プログラマー 業務の愚痴 | 掲示板 | バックナンバー | 登録と解除 |
| ＶＢＡで楽しくプログラミング | 掲示板 | バックナンバー | 登録と解除 |
| コンビニのオモテとウラ話 | 掲示板 | バックナンバー | 登録と解除 |