標籤

bat (54) 作品 (41) python (24) shell (17) windows (11) 虛擬機 (11) php (10) CPP (6) KMS (6) 程式設計 (6) docker (5) 使用教學 (5) xoops (4) 公文 (4) Apache2 (3) Excel (3) juniper (3) 資料庫 (3) 轉檔 (3) mysql (2) 免動手 (2) 資料結構 (2) 軟體廣播 (2) 電腦維修 (2) Android Studio (1) Apple IPAD管理 (1) Arduino (1) CSS (1) LAMP (1) NAS (1) Ubuntu (1) VHD (1) Windows Server (1) 原因 (1) 程式應用 (1) 程式積木 (1) 編輯器 (1) 雲端硬碟 (1)

2021年3月4日 星期四

只要會用滑鼠點兩下,一鍵完成Windows 電腦滑鼠指標大小鍵設定

 情境說明:

        由於補校學生在學校電腦教室上電腦課。補校學生年紀大,經常找不到滑鼠。希望能夠讓補校學生一鍵完成Windows 電腦滑鼠指標大小鍵設定。或者是資訊組長需為補校學生設定滑鼠大小,但是一台一台設定太麻煩了。希望能夠一鍵完成Windows 電腦滑鼠指標大小鍵設定。

範例檔案,解壓密碼:demo1234
使用方法:
1.下載範例檔案
2.解壓縮,解壓密碼demo1234
3.0.對資料夾內的BigMouse.bat點兩下--->--->重開機,滑鼠指標變大,
3.1.對資料夾內的NormalMouse.bat點兩下--->重開機,滑鼠指標變正常大小
3.2.對資料夾內的MouseSettingShow.bat點兩下--->出現滑鼠設定面板。
以下方法分析:
一、使用Bat
        優點:完成之後即時生效,不需要重新開機。
        缺點: 一鍵出現面板,但還需選擇[設定]
        檔案名稱:MouseSettingShow.bat
        檔案內容:
        control main.cpl
      
二、使用Bat與Registry
        優點:確實可達到目的_一鍵完成設定。
        缺點:完成之後,需要重新開機。 
        目前是將滑鼠設定好,將HKEY_CURRENT_USER\Control Panel\Cursors 匯出。

一、利用Registry
檔名:BigMouse.bat
程式功能:匯入BigMouse.reg
內容:
@echo off
REM :: BatchGotAdmin (Run as Admin code starts)
REM --> Check for permissions
>nul 2>&1 "%SYSTEMROOT%\system32\cacls.exe" "%SYSTEMROOT%\system32\config\system"
REM --> If error flag set, we do not have admin.
if '%errorlevel%' NEQ '0' (
echo Requesting administrative privileges...
goto UACPrompt
) else ( goto gotAdmin )
:UACPrompt
echo Set UAC = CreateObject^("Shell.Application"^) > "%temp%\getadmin.vbs"
echo UAC.ShellExecute "%~s0", "", "", "runas", 1 >> "%temp%\getadmin.vbs"
"%temp%\getadmin.vbs"
exit /B
:gotAdmin
if exist "%temp%\getadmin.vbs" ( del "%temp%\getadmin.vbs" )
pushd "%CD%"
CD /D "%~dp0"
REM 將滑鼠指標變大
regedit.exe /s "%~dp0BigMouse.reg"
echo "Mouse big. Finish! Reboot now"
PAUSE
shutdown /r /f /t 0

檔名:NormalMouse.bat
程式功能:匯入NormalMouse.reg
內容:
@echo off
REM :: BatchGotAdmin (Run as Admin code starts)
REM --> Check for permissions
>nul 2>&1 "%SYSTEMROOT%\system32\cacls.exe" "%SYSTEMROOT%\system32\config\system"
REM --> If error flag set, we do not have admin.
if '%errorlevel%' NEQ '0' (
echo Requesting administrative privileges...
goto UACPrompt
) else ( goto gotAdmin )
:UACPrompt
echo Set UAC = CreateObject^("Shell.Application"^) > "%temp%\getadmin.vbs"
echo UAC.ShellExecute "%~s0", "", "", "runas", 1 >> "%temp%\getadmin.vbs"
"%temp%\getadmin.vbs"
exit /B
:gotAdmin
if exist "%temp%\getadmin.vbs" ( del "%temp%\getadmin.vbs" )
pushd "%CD%"
CD /D "%~dp0"
REM 將滑鼠指標變正常大小
regedit.exe /s "%~dp0NormalMouse.reg"
echo "Mouse normal. Finish! Reboot now"
PAUSE
shutdown /r /f /t 0


沒有留言:

張貼留言

只要點兩下,就能夠將InputAndOutput資料夾底下的子子孫孫資料夾內所有Word通通轉成PDF

  系列文章: 1. 只要點兩下,就能將一堆的Doc與Docx 轉成 PDF 1. https://skjhcreator.blogspot.com/2023/05/docdocx-pdf.html 2. 只要點兩下,就能將一堆的JPG轉成一個PDF,並以JPG所在的資料夾名稱為...