HSPTV!掲示板

WINAPIの"SHFileOperation"を使って、ファイルのコピーを行おうとしているものです。
例えば、変数filesには
C:\\〜test.txt
C:\\〜test.zip
C:\\〜テスト.rar
C:\\〜てすと.lzh
が代入されており、
folderには
C:\〜\\testfolder
が代入されているものとします。
そして、copyfoldersはSHFileOperationのモジュールを呼び出すものとします。
(中身は先輩方のサンプルをコピーしたものです。)

そこで、

repeat notemax
     noteget fname,cnt
     copyfolders fname,folder,2
loop

として、コピーを試みるのですが、
「ファイル をコピーできません。送り側のファイルまたはディスクから読み取れません。」
とエラーが出てしまいます。

ご教授お願いします。

copyfolders命令が何を行っているのがわからないので答えようがない。
モジュールなら、その部分のソースを載せてみろ。

#uselib "shell32"
#func global SHFileOperation "SHFileOperation" sptr

#module
#deffunc copyfolders str FromFolder,str ToFolder,int mode
	From= FromFolder : To= ToFolder
	SHFILEOPSTRUCT = hwnd, mode, varptr.From, varptr.To, $150, -1, 0, 0
	SHFileOperation varptr.SHFILEOPSTRUCT
	return
#global

です。

まず、どこが問題なのかを自分で考えましょう。

下記では、問題なくコピーできました。

fname="d:\\_1\\a.txt"
folder="d:\\_2"
copyfolders fname,folder,2

ファイルがひとつならば、コピー可能なのですが、
複数となってくると、できなくなってしまいます。

1.なぜWINAPIでなければならないのですか？
2.どこで変数filesを使用しているのですか？
3.また、note〜系の命令は大半がnotesel命令が必要で
notegetもその通りなのに、あなたのスクリプトにはない。なぜですか?
4.変数folderとはなに？
>以上がスクリプトを見た限りの感想;疑問。

あなたのエラーメッセージを見る限りファイル名の指定が間違っている気がします。
実行中のエラーでしょうから、Debug Windowの変数タグからきちんと
copyfolders fname,folder,2
時に fname と folder に 予想された文字列が入っているか確認する。

1.fxcopyですと、正常にコピーできないためです。
2.dirlist2r filesとして使用しています。
3.申し訳ございません。入力漏れです。こちらの方では、記述してあります。[notesel files]
4.コピー先フォルダ名です。

Debug Windowの変数タグにて確認しましたが、双方正常に代入されていました。

　SHFILEOPSTRUCTのpfromとpToが指すバッファの最後にはターミネータが２つ必要です。

　随分面倒なものを使っているので、複数一度にコピーしようとしているのかと思ったら、
１個ずつですね。何でCopyFileを使わないのでしょう？

>1.fxcopyですと、正常にコピーできないためです。
　コピー元はカレントディレクトリで、ファイル名のみ指定するようです。

　bcopyは？

fxcopyのヘルプ修正提案
【修正前】
p1で、コピー元のファイル名をあらかじめ格納してある変数名を指定します。
【修正後】
p1で、コピー元のファイル名をあらかじめ格納してある変数名を指定します。
事前にchdirでコピー元ディレクトリを指定しておいてください。

CopyFileの存在を忘れておりました。
最初の方に試したのですが、どうもうまくいかないので、それ以降触れていなかったのです。

CopyFileで正常に動作することを確認しました。
bcopyを使わなかったのは、タイムスタンプが変更されるらしいからです。

回答してくださった、checkさん、KAさん、hatterさん、ANTARESさん
本当にありがとうございました。