デスクトップの背景を変更するスクリプト

仕事で前向きな日

画像クレジット: Brusonja / iStock /ゲッティイメージズ

ほとんどのユーザーはそれを認識していませんが、MicrosoftはすべてのWindowsコンピューターにVisual BasicScript言語のコピーをインストールしています。 このシンプルで強力な言語により、デスクトップの背景の変更など、ユーザーまたは管理者がシステムで実行する必要のあるほぼすべてのタスクを自動化できます。

テキストエディタ

Visual Basicスクリプトの作成は簡単です。必要なのは、Windowsのメモ帳などの単純なテキストエディタだけです。 ただし、「。TXT」で終わる名前でファイルを保存する代わりに、「。VBS」で終わる名前でファイルを保存する必要があります。

今日のビデオ

スクリプト

以下をテキストエディタに貼り付けます。

薄暗いシェル薄暗いユーザー

シェル= WScriptを設定します。 CreateObject( "WScript。 Shell ")user = shell。 ExpandEnvironmentStrings( "%USERNAME%")

fso = CreateObject( "Scriptingを設定します。 FileSystemObject ")

windowsDir = fso。 GetSpecialFolder(0)wallpaper = "c:\ wallpaper.jpg"

シェル。 RegWrite「HKCU \コントロールパネル\デスクトップ\壁紙」、壁紙

シェル。 "%windowsDir%\ System32 \ RUNDLL32.EXE user32.dll、UpdatePerUserSystemParameters"、1、Trueを実行します

ファイル「c:\ wallpaper.jpg」を使用するデスクトップの背景のパスとファイル名に変更します。

実行方法

スクリプトを実行するには、ファイル拡張子.VBSを付けてスクリプトを保存するだけです。 次に、他のプログラムを起動する場合と同じように、デスクトップ上のアイコンをマウスでダブルクリックします。