Command1_click
Allows you to backup a source file and have the destination file name be the current date. Great for database backups!
AI
AIサマリー: This codebase represents a historical implementation of the logic described in the metadata. Our preservation engine analyzes the structure to provide context for modern developers.
ソースコード
- Put this on form load... Private Sub Form_Load() Dim MyDate MyDate = Format(Date, "dddd, mmm d yyyy") Text1.Text = "C:\SourceDirectory\SourceFile.mdb" Text2.Text = "C:\DestinationDirectory\" + MyDate + ".mdb" - Put this on Command1 Click... Private Sub Command1_Click() FileCopy Text1.Text, Text2.Text
オリジナルのコメント (3)
Wayback Machineから復元