VBレスキュー(花ちゃん)
VB2005用トップページへVBレスキュー(花ちゃん)のトップページVB6.0用のトップページ各掲示板

メニューへ戻ります。 フォルダー関係のメニュー
1.フォルダー(ディレクトリ)の属性を取得及び設定・除去する
2.フォルダー(ディレクトリ)のタイムスタンプを取得及び設定する
3.フォルダーの作成・有無の確認及びコピー・移動・削除・フォルダー名の変更
4.フォルダー(ディレクトリ)に関するパス操作色々
5.システムの特別なフォルダーのフォルダーパスを取得
6.指定フォルダー以下のサブフォルダー数を取得及びフォルダー名を列挙
7.
8.
9.
10.
11.
12.
 .
20.その他、当サイト内に掲載のフォルダーに関するサンプル


2.フォルダー(ディレクトリ)のタイムスタンプを取得及び設定する(35_Fld_02) (旧、SampleNo.032)
1.フォルダーの作成日時を取得する
2.フォルダーの更新日時を取得する
3.フォルダーのアクセス日時を取得する
4.フォルダーの作成日時を設定する
5.フォルダーの更新日時を設定する
6.フォルダーのアクセス日時を設定する

 下記プログラムコードに関する補足・注意事項 
動作確認:Windows 8.1 (Windows 7) / VB2013 (VB2010) / Framework 4.5.1 / 対象の CPU:x86
Option :[Compare Text] [Explicit On] [Infer On] [Strict On]
Imports :追加なし
参照設定:
追加なし
その他 :
    :
このサンプル等の内容を無断で転載、掲載、配布する事はお断りします。(私の修正・改訂・削除等が及ばなくなるので)
必要ならリンクをはるようにして下さい。(引用の場合は引用元のリンクを明記して下さい)
このページのトップへ移動します。 1.フォルダーの作成日時を取得する

Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
'フォルダーの作成日時を取得する
    'Directory.GetCreationTime メソッド  
    'フォルダーの作成日時を取得します。
    Dim dt As DateTime
    dt = System.IO.Directory.GetCreationTime("..\..\..\")      '結果  2014/08/25 10:44:19
    Debug.WriteLine(dt)
End Sub

このページのトップへ移動します。 2.フォルダーの更新日時を取得する

Private Sub Button2_Click(sender As Object, e As EventArgs) Handles Button2.Click
'フォルダーの更新日時を取得する
    'Directory.GetLastWriteTime メソッド  
    '指定したフォルダーに最後に書き込んだ日付と時刻を返します。
    Dim dt As DateTime
    dt = System.IO.Directory.GetLastWriteTime("..\..\..\")    '結果  2014/08/25 10:44:20
    Debug.WriteLine(dt)
End Sub

このページのトップへ移動します。 3.フォルダーのアクセス日時を取得する
※ エクスプローラー等で参照中(使用中)のフォルダーに対してアクセスするとエラーが発生します。

Private Sub Button3_Click(sender As Object, e As EventArgs) Handles Button3.Click
'フォルダーのアクセス日時を取得する
    'Directory.GetLastAccessTime メソッド
    '指定したフォルダーに最後にアクセスした日付と時刻を返します。
    Dim dt As DateTime
    dt = System.IO.Directory.GetLastAccessTime("..\..\..\")   '結果  2014/08/25 10:44:22
    Debug.WriteLine(dt)
End Sub

このページのトップへ移動します。 4.フォルダーの作成日時を設定する

Private Sub Button4_Click(sender As Object, e As EventArgs) Handles Button4.Click
'フォルダーの作成日時を設定する
    'Directory.SetCreationTime メソッド
    '指定したフォルダーの作成日時を設定します。
    System.IO.Directory.SetCreationTime("..\..\..\", DateTime.Now)    '結果  2014/08/25 10:50:13
End Sub

このページのトップへ移動します。 5.フォルダーの更新日時を設定する

Private Sub Button5_Click(sender As Object, e As EventArgs) Handles Button5.Click
'フォルダーの更新日時を設定する
    'Directory.SetLastWriteTime メソッド
    'フォルダーに最後に書き込んだ日付と時刻を設定します。
    System.IO.Directory.SetLastWriteTime("..\..\..\", DateTime.Now)   '結果  2014/08/25 10:50:14
End Sub

このページのトップへ移動します。 6.フォルダーのアクセス日時を設定する

Private Sub Button6_Click(sender As Object, e As EventArgs) Handles Button6.Click
'フォルダーのアクセス日時を設定する
    'Directory.SetLastAccessTime メソッド
    '指定したフォルダーに最後にアクセスした日付と時刻を設定します。
    System.IO.Directory.SetLastAccessTime("..\..\..\", DateTime.Now)  '結果  2014/08/25 10:50:16
End Sub

このページのトップへ移動します。 検索キーワード及びサンプルコードの別名(機能名)
1.ディレクトリの作成日時を取得する  2.ディレクトリの更新日時を取得する  3.ディレクトリのアクセス日時を取得する
4.ディレクトリの作成日時を設定する  5.ディレクトリの更新日時を設定する  6.ディレクトリのアクセス日時を設定する



このページのトップへ移動します。