TempFile ( FileNameBuff , 〔Prefix〕 〔, DirName〕 )
' 一時ファイル名を作成して,作成した一時ファイルに
' "MODEM.INF"をコピーする。
Dim bkupFileName ,outDir1
outDir1 = _TEMP_
' プレフィックス"BUP"で一時ファイル名を作成する。
TempFile ( bkupFileName ,"BUP" ,outDir1 )
Copy ( outDir1+"MODEM.INF" ,bkupFileName )