Windows10 エクスプローラーでフォルダの一覧表示中、勝手に一番上に移動する

エクスプローラーでファイル名を参照している時に、勝手に先頭位置に移動する事象が度々あり困っていた

まだ、解決策は見つかっていないが、再現方法がわかったのでメモしておきます

◆再現方法

共有プリンタを登録するVBSです。

メモ帳を開いて下記のソースをペーストします。[ネットワークプリンタ名]のところを、各自の環境に合わせて変更します。

ファイル名をprt_add.vbsで保存します

これを実行すると共用プリンタが登録されますが、何故かエクスプローラの表示が先頭位置に移動してしまいます

Dim objWshNetwork
Dim strPrinterName

Set objWshNetwork = WScript.CreateObject("WScript.Network")

strPrinterName = "[ネットワークプリンター名]"

objWshNetwork.AddWindowsPrinterConnection strPrinterName

Set objWshNetwork = Nothing

自分の環境では十数台のプリンタを、パソコン起動した際に自動で登録しています

1台のプリンタを「カラー」「モノクロ」用と、別々に登録していることと、最近、ドライバーの更新をスムースに行うため、毎回、共有プリンターの「削除&登録」をするように変更しため、スクリプトの実行時間が長くなってました。

まさか、共有プリンタの登録処理がエクスプローラーの表示に影響を与えていたとは...

windows8.1でも同様に再現されました

コメントを残す

メールアドレスが公開されることはありません。 * が付いている欄は必須項目です