デスクトップの絶対パス　C:\Users\Owner\Desktop\
カレントディレクトリ　　.\　（省略可）
%date% の中身は　月 2012/04/13 といった具合に "/" があり、曜日を出すOSもある。


rem "ソース"フォルダの本日日付のファイル(file_yyyymmdd.txt)を"targ"フォルダにコピー
　@echo off
　copy .\ソース\file_%date:~-10,4%%date:~-5,2%%date:~-2,2%.txt .\targ
rem %date:~-10,4% は %data% の中で、後ろから10番目の文字から4つを利用する意味
rem %date:~2,-2% は %data% の中で、前から3番目の文字から、後ろの２文字除いて全て


echo 入力した日付のファイル(file_yyyymmdd.txt)を取得します。
echo yyyymmddの形式で入力して下さい。
　set /P INP=値を入力して下さい＞
echo file_%INP%.txtを取得します。
　copy .\source\file_%INP%.txt .\targ
pause


@echo off
　set VV=abc
　set YY=abc
　if %VV% equ %YY% (echo 等しい) else echo 等しくない
　if VV equ YY (echo 等しい) else echo 等しくない

　if /i ABCD neq abcd (echo 等しい) else echo 等しくない
　if ABCD neq abcd (echo 等しい) else echo 等しくない
pause

rem フォルダオープン
　explorer.exe C:\Users\Owner\Desktop\text

ファイル名抜き出し
dir /b /oe /a-d > filename.txt

フォルダ名抜き出し
dir /b /ad > foldername.txt

全部名前を抜き出し
dir /b /oeg > allname.txt


＜マクロ＞
Option Explicit

Sub InMsgBox()
Dim x As String
Dim y As String
Dim modorichi As String

x = InputBox("名前を入力", "氏名のウィンドウ", "入力例")
LLLL:
y = InputBox("ファイルを取得する日付を入力", "ファイル取得ウィンドウ", "日付")

modorichi = MsgBox(x & "さん。file_" & y & ".txtのファイルを取得します。", vbYesNoCancel)

Select Case modorichi
Case vbYes
FileCopy "C:\Users\Owner\Desktop\source\file_" & y & ".txt", "C:\Users\Owner\Desktop\targ\file_" & y & ".txt"
MsgBox y & "のファイルが取得できました。", , "結果表示ウィンドウ"
Case vbNo
GoTo LLLL
Case vbCancel
MsgBox "またのご利用を"
End Select

End Sub