こんばんわ。またまた質問させていただきます。前回教えていただいたとおりにフラグをたて、フォルダを読込むまでまつところまで完了しました。ありがとうございました。しかし、まだ印刷処理がうまくいきません。サーバーから取り込んだファイル(フォルダ)をブラウザで表示し、それを印刷しています。どうやらブラウザで完全に表示し終わるまでに印刷処理が走ってしまうようです。制御としては、”.busy”は使っています。どなたか他によい方法はご存知ないですか?よろしくお願いします。
表示されるまで、下記で待ちDo While IE.Document.ReadyState <> "complete" DoEventsLoop場合によっては下記のような関数で待ち時間を作るPrivate Sub WaitTime(st As Single) Dim sngSt As Single sngSt = Timer Do While Timer - sngSt < st DoEvents LoopEnd Sub
> 前回教えていただいたとおりに「前回」の投稿が見つからなかったので、外しているかもしれませんが…… m(_ _)m> どうやらブラウザで完全に表示し終わるまでに印刷処理が走ってしまうようです。DocumentCompleteイベントは利用できないでしょうか?