bat腳本切換

㈠ 怎樣使用BAT腳本實現自動按鍵盤的某個鍵

批處理是不行的 用VBS 很簡單 例子如下
Set objShell = CreateObject("Wscript.Shell")
do
WScript.Sleep 3000
objShell.SendKeys "{F5}"
WScript.Sleep 3000
objShell.SendKeys "{F5}"
loop

使用 SendKeys 方法可以將鍵擊發送到無自動化界面的應用程序中。多數鍵盤字元都可用一個鍵擊表示。某些鍵盤字元由多個鍵擊組合而成（例如，CTRL+SHIFT+HOME）。要發送單個鍵盤字元，請將字元本身作為 string 參數發送。例如，要發送字母 x，則請發送 string 參數 "x"。

可使用 SendKeys 同時發送多個鍵擊。為此，可將每個鍵擊按順序排列在一起，以此來創建表示一系列鍵擊的復合字元串參數。例如，要發送鍵擊 a、b 和 c，則需要發送字元串參數 "abc" 。SendKeys 方法將某些字元用作字元的修飾符（而不使用其本身的含義）。這組特殊的字元可包括圓括弧、中括弧、大括弧，以及：

加號 "+"
插入記號 "^"
百分號 "%"
和「非」符號 "~"

用大括弧 "{}" 括起這些字元可以發送它們。例如，要發送加號，請使用字元串參數 "{+}"。SendKeys中使用的中括弧 "[ ]" 無任何特殊含義，但是必須把它們括在大括弧中，以便容納確實要賦予其特殊含義的應用程序（例如，對於動態數據交換 (DDE) 就是這樣）。

要發送左中括弧字元，請發送字元串參數 "{[}"；要發送右中括弧字元，請發送字元串參數 "{]}"。
要發送左大括弧字元，請發送字元串參數 "{{}"；要發送右大括弧字元，請發送字元串參數 "{}}"。

某些鍵擊不生成字元（如 ENTER 和 TAB）。某些鍵擊表示操作（如 BACKSPACE 和 BREAK）。要發送這些類型的鍵擊，請發送下表中列出的參數：

空格鍵 " "
退格鍵 {BACKSPACE} 或 {BS} 或 {BKSP}
BREAK {BREAK}
DELETE {DELETE} 或 {DEL}
向下鍵 {DOWN}
向上鍵 {UP}
向左鍵 {LEFT}
向右鍵 {RIGHT}
END {END}
ENTER {ENTER} 或 ~
ESC {ESC}
TAB {TAB}
CAPS LOCK {CAPSLOCK}
HELP {HELP}
HOME {HOME}
INSERT {INSERT} 或 {INS}
NUM LOCK {NUMLOCK}
PAGE DOWN {PGDN}
PAGE UP {PGUP}
PRINT SCREEN {PRTSC}
SCROLL LOCK {SCROLLLOCK}

F1 {F1}
F2 {F2}
F3 {F3}
F4 {F4}
F5 {F5}
F6 {F6}
F7 {F7}
F8 {F8}
F9 {F9}
F10 {F10}
F11 {F11}
F12 {F12}

要發送由常規鍵擊和 SHIFT、CTRL 或 ALT 組合而成的鍵盤字元，請創建表示該鍵擊組合的復合字元串參數。可通過在常規鍵擊之前添加一個或多個以下特殊字元來完成上述操作：

SHIFT +
CTRL ^
ALT %

注意：這樣使用時，不用大括弧括起這些特殊字元。
要指定在按下多個其他鍵時，按下 SHIFT、CTRL 和 ALT 的組合，請創建復合字元串參數，用括弧括起其中的組合鍵。例如，要發送的組合鍵指定：

如果在按 e 和 c 的同時按 SHIFT 鍵，則發送字元串參數 "+(ec)"。
如果在按 e 時只按 c（而不按 SHIFT），則發送字元串參數 "+ec"。
可使用 SendKeys 方法發送一種在一行內重復按鍵的鍵擊。為此，要創建復合字元串參數，以指定要重復的鍵擊，並在其後指定重復次數。可使用 {鍵擊 數字} 形式的復合字元串參數來完成上述操作。例如，如果要發送 10 次 "x"，則需要發送字元串參數 "{x 10}"。請確保在鍵擊和數字之間有一個空格。

注意：只可以發送重復按一個鍵的鍵擊。例如，可以發送 10 次 "x"，但不可發送 10 次 "Ctrl+x"。
注意：不能向應用程序發送 PRINT SCREEN 鍵 {PRTSC}。

例子1：關機腳本 （模擬按鍵為：Ctrl + Esc、u、u ）

把以下代碼復制至記事本，另存為 off.vbs

set WshShell = CreateObject("WScript.Shell")
WshShell.SendKeys "^{ESC}uu"

例子2：重啟腳本 （模擬按鍵為：Ctrl + Esc、u、r ）

把以下代碼復制至記事本，另存為 reboot.vbs

set WshShell = CreateObject("WScript.Shell")
WshShell.SendKeys "^{ESC}ur"

例子3：切換輸入法 （模擬同時按下：Shift Ctrl ）

set WshShell = CreateObject("WScript.Shell")
WshShell.SendKeys "+(^)"

例子4：輸入 cn-dos.net! 至記事本並保存為 CnDos.txt

Dim WshShell
Set WshShell=WScript.CreateObject("WScript.Shell")
WshShell.Run "notepad"
WScript.Sleep 1500
WshShell.AppActivate "無標題 - 記事本"
WshShell.SendKeys "c"
WScript.Sleep 200
WshShell.SendKeys "n"
WScript.Sleep 200
WshShell.SendKeys "-"
WScript.Sleep 200
WshShell.SendKeys "d"
WScript.Sleep 200
WshShell.SendKeys "o"
WScript.Sleep 200
WshShell.SendKeys "s"
WScript.Sleep 200
WshShell.SendKeys "."
WScript.Sleep 200
WshShell.SendKeys "n"
WScript.Sleep 200
WshShell.SendKeys "e"
WScript.Sleep 200
WshShell.SendKeys "t"
WScript.Sleep 200
WshShell.SendKeys "!"
WScript.Sleep 200
WshShell.SendKeys "%FS"
WScript.Sleep 500
WshShell.SendKeys "C"
WScript.Sleep 200
WshShell.SendKeys "n"
WScript.Sleep 200
WshShell.SendKeys "D"
WScript.Sleep 200
WshShell.SendKeys "o"
WScript.Sleep 200
WshShell.SendKeys "s"
WScript.Sleep 200
WshShell.SendKeys "%S"
WScript.Sleep 500
WshShell.SendKeys "%FX"

例子5：自動定時存檔的記事本（此腳本來自網上）

'第一部分：定義變數和對象
Dim WshShell, AutoSaveTime, TXTFileName
AutoSaveTime=(1000*60*1) '自動存檔時間為1分鍾
Set WshShell=WScript.CreateObject("WScript.Shell")
TXTFileName=InputBox("給文本起名(不能用中文和純數字)：")

'第二部分：打開並激活記事本
WshShell.Run "notepad"
WScript.Sleep 200
WshShell.AppActivate "無標題 - 記事本"

'第三部分：用輸入的文件名存檔
WshShell.SendKeys "^s"
WScript.Sleep 300
WshShell.SendKeys TXTFileName
WScript.Sleep 300
WshShell.SendKeys "%s"
WScript.Sleep AutoSaveTime

'第四部分：自動定時存檔
While WshShell.AppActivate (TXTFileName)=True
WshShell.SendKeys "^s"
WScript.Sleep AutoSaveTime
Wend
WScript.Quit

例子：

set objShell = CreateObject("Wscript.Shell")
strCommandLine = "psetup755281.exe" '啟動安裝程序
objShell.Run(strCommandLine)
set WshShell = CreateObject("WScript.Shell")
WScript.Sleep 2000 '延時3秒
WshShell.SendKeys "{ENTER}" '模擬按下回車鍵執行下一步
WScript.Sleep 300 '延時3秒
WshShell.SendKeys "{ENTER}" '模擬按下回車鍵執行下一步
WScript.Sleep 300 '延時3秒
WshShell.SendKeys "{ENTER}" '模擬按下回車鍵執行下一步
WScript.Sleep 5200 '延時3秒
WshShell.SendKeys "{ENTER}" '模擬按下回車鍵執行下一步
WScript.Sleep 300 '延時3秒
WshShell.SendKeys "{ENTER}" '模擬按下回車鍵執行下一步
WScript.Sleep 300 '延時3秒
WshShell.SendKeys "{ENTER}" '模擬按下回車鍵執行下一步
WScript.Sleep 200
WshShell.SendKeys " " '模擬按下空格鍵去除安裝網路超級搜霸一行前的√號
WScript.Sleep 100
WshShell.SendKeys "{TAB}" '模擬按下 Tab 鍵選擇安裝項目
WScript.Sleep 200
WshShell.SendKeys " " '模擬按下空格鍵去除安裝網路超級搜霸一行前的√號
WScript.Sleep 200 '延時0.3秒
WshShell.SendKeys "f" '模擬按下 F鍵同意協議

㈡ 哪位大神幫我寫個網卡切換的bat腳本！！

你提供的硬體ID號是錯誤的，留下q我會聯系你

㈢ 求個自動修改切換IP的BAT文件

命令格式
netsh interface ip set <網路連接屬性> <網路連接名稱> static <IP地址> <子網掩碼> <網關IP> <躍點計數>
netsh interface ip add dns <IP地址>

把下面代碼存成.bat文件，直接運行就行了。
netsh interface ip set address "本地連接" static 192.168.18.100 255.255.255.0 192.168.18.1 1
netsh interface ip set dns "本地連接" static 202.96.128.86
netsh interface ip add dns "本地連接" 202.96.134.133

㈣ BAT腳本類型轉化問題

很簡單，只要加2個字元
for /f %%i in ('ajsshow -F AJSROOT1 -f ^%%I %1') do set job_num=%%i
改成
for /f %%i in ('ajsshow -F AJSROOT1 -f ^%%I %1') do set/a job_num=%%i

㈤ 我想用bat文件實現無線自動切換，並且配置IP

1、新建一個txt文本文件，並將文件名稱改為：IP切換.bat

㈥ 如何寫一個切換jdk版本的bat腳本

SetX有三種使用方式:
語法1:
SETX[/Ssystem[/U[domain/]user[/P[password]]]]varvalue[/M]
語法2:
SETX[/Ssystem[/U[domain/]user[/P[password]]]]var/Kregpath[/M]
語法3:
SETX[/Ssystem[/U[domain/]user[/P[password]]]]
/Ffile{var{/Ax,y|/Rx,ystring}[/M]|/X}[/Ddelimiters]
描述:
在用戶或系統環境創建或修改環境變數。能基於參數、注冊表項或文件輸
入設置變數。
參數列表:
/Ssystem指定要連接到的遠程系統。
/U[domain/]user指定應該在哪個用戶上下文執行命令。
/P[password]指定給定用戶上下文的密碼。如果省略則
提示輸入。
var指定要設置的環境變數。
value指定分配給環境變數的值。
/Kregpath指定變數是基於注冊表項的信息而設置的。
路徑的格式應該是hive/key/.../value。例如
HKEY_LOCAL_MACHINE/System/CurrentControlSet/
Control/TimeZoneInformation/StandardName。
/Ffile指定要使用的文本文件的文件名。
/Ax,y指定絕對文件坐標(線X，項目Y)作為在此文件
里搜索的參數。
/Rx,ystring指定有關「字元串」作為搜索參數的相對文件坐標。
/M指定應該在系統(HKEY_LOCAL_MACHINE)環境中設
置此變數。在HKEY_CURRENT_USER環境下，默認
將設置此變數。
/X用x，y坐標顯示文件內容。
/Ddelimiters指定其他限定符，如","或"/"。
內置分隔符是空格、製表符、回車和換行符。所有
ASCII字元都可作為限定符。限定符的最大數量，
包括內置分隔符，是15。
/?顯示此幫助消息。
注意:1)SETX在注冊表中將變數寫入主機環境。
2)在本地系統，用此工具創建或修改的變數將在以後的命令窗口可用，但
在當前的CMD.exe命令窗口。
3)在遠程系統，用此工具創建或修改的變數在下次登錄會話可用。
4)有效的注冊表項數據類型是REG_DWORD，REG_EXPAND_SZ，REG_SZ
和REG_MULTI_SZ。
5)受支持的配置單元:HKEY_LOCAL_MACHINE(HKLM)，
HKEY_CURRENT_USER(HKCU)。
6)限定符區分大小寫。
7)REG_DWORD的值是從注冊表裡以十進制格式提取出來的。
示例:
SETXMACHINECOMPAQ
SETXMACHINE"COMPAQCOMPUTER"/M
SETXMYPATH"%PATH%"
SETXMYPATH~PATH~
SETX/Ssystem/Uuser/PpasswordMACHINECOMPAQ
SETX/Ssystem/Uuser/PpasswordMYPATH^%PATH^%
SETXTZONE/KHKEY_LOCAL_MACHINE/System/CurrentControlSet/
Control/TimeZoneInformation/StandardName
SETXBUILD/K"HKEY_LOCAL_MACHINE/Software/Microsoft/Windows
NT/CurrentVersion/CurrentBuildNumber"/M
SETX/Ssystem/Uuser/PpasswordTZONE/KHKEY_LOCAL_MACHINE/
System/CurrentControlSet/Control/TimeZoneInformation/
StandardName
SETX/Ssystem/Uuser/PpasswordBUILD/K
"HKEY_LOCAL_MACHINE/Software/Microsoft/WindowsNT/
CurrentVersion/CurrentBuildNumber"/M
SETX/Fipconfig.out/X
SETXIPADDR/Fipconfig.out/A5,11
SETXOCTET1/Fipconfig.out/A5,3/D"#$*."
SETXIPGATEWAY/Fipconfig.out/R0,7Gateway
SETX/Ssystem/Uuser/Ppassword/Fc:/ipconfig.out/X

雖然是很長的一段，不過關鍵信息就是可以用SETX來設置系統變數。通過以下的這條命令，我們可以對java_HOME進行設置(當然前提是系統中有這個變數)

@SETXJAVA_HOME"V:/ProgramFiles/Java/jdk1.8.0_77"/M

熟悉java配置的就會知道，通過配置JAVA_HOME我們才能使用JDK來進行開發，也就是說，只要能通過命令來修改JAVA_HOME，那就可以自由的切換我們想要的版本了。然後再在腳本中進行一些簡單的判斷就可以實現基本功能了。

以下是一個基本的腳本，實現在1.6和1.8之間的切換

@ECHO========請以管理員許可權運行========
@titleJAVA_HOMESWITCH
@color07
@ECHO請選擇
@ECHO1.JDK1.8
@ECHO2.JDK1.6
@CHOICE/C12
@IFERRORLEVEL2gotoswitchTo1.6
@IFERRORLEVEL1gotoswitchTo1.8
@:switchTo1.8
@SETXJAVA_HOME"V:/ProgramFiles/Java/jdk1.8.0_77"/M
@IF%ERRORLEVEL%NEQ0gotoerror
@echo#切換到1.8完成#
@pause
@gotolast
@:switchTo1.6
@SETXJAVA_HOME"C:/ProgramFiles/Java/jdk1.6.0_43"/M
@IF%ERRORLEVEL%NEQ0gotoerror
@echo#切換到1.6完成#
@pause
@gotolast
@:error
@echo沒有切換成功......
@gotolast
@:last
@pause

如果你只有兩個版本的jdk需要切換，那麼將上面的路徑修改下，改為自己的JDK安裝路徑就行了，再改下提示信息就ok了。

運行效果

因為修改的是系統變數，所以必須以管理員身份運行。運行完後可以使用java -version和javac -version驗證是否起到作用，或者直接查看系統變數。這時可能你會發現java和javac驗證出來的版本不一致，只有javac版本變了，解決方案是把path裡面的%JAVA_HOME%/bin;%JAVA_HOME%/jre/bin提到path的開頭，保存後就可以實現版本的同步了

㈦ bat腳本中對路徑進行替換。

給您舉個栗子（呃，是例子，哈哈）：

set var=C:\Test\File.txt

set var=%var:C:\Test\=D:\Ok\%

echo %var%

pause

㈧ BAT批處理更改~ 快速切換IPv4/IPv6 host的腳本

想節約步驟，編寫bat文件，每次不用點擊運行、ip輸入，再連主機，想用批處理文件一步到位。
這個好辦啊如果你每次IP都是固定的只需要以下語句
@echo

㈨ 網路IP 自動使用BAT腳本切換的問題。

做2個批處理吧！ 一個用來修改0段位的IP 一個用來修改5段位的IP

給你個批處理文件 你稍微修改下就能用！

@echooff
titleAlpha-IP地址修改工具
MODEcon:COLS=80lines=20

remIP地址列表

setlname=本地連接2
rem本地連接IP地址一公司IP地址
setlAdd1=192.168.3.126
setlmask1=255.255.252.0
setlGat1=192.168.3.254
setldns11=202.96.199.133
setldns12=202.106.196.115
rem本地連接IP地址二家庭IP地址
setlAdd2=192.168.0.115
setlmask2=255.255.255.0
setlGat2=192.168.0.1
setldns21=202.96.199.133
setldns22=202.106.196.115

setwname=無線網路連接
rem無線連接IP地址一公司IP地址
setwAdd1=%lAdd1%
setwmask1=%lmask1%
setwGat1=%lGat1%
setwdns11=%ldns11%
setwdns12=%ldns12%
rem無線連接IP地址二家庭IP地址
setwAdd2=%lAdd2%
setwmask2=%lmask2%
setwGat2=%lGat2%
setwdns21=%ldns21%
setwdns22=%ldns21%


:home
cls
@echo.
@echoAlpha-IP地址修改工具（KYT--PanFu）
@echo.
@echo1：設置%lname%
@echo2：設置%wname%
@echo.
@echo警告：WIN7系統必須單擊右鍵[以管理員身份運行(A)]！
@echo.
@echo.
setshut=""
set/pshut="請輸入【<1>或<2>或<q>退出】並按回車鍵:"
IFNOT"%shut%"==""(
if%shut%NEQ""SETshut=%shut:~0,1%
)else(
setshut="")
if/i%shut%==1gotolocally
if/i%shut%==2gotowireless
if/i%shut%==qexit
gotohome

:locally
cls
@echo.
@echo修改%lname%IP地址（KYT--PanFu）
@echo.
@echo1：設置%lname%自動獲取IP地址
@echo2：設置%lname%IP地址為公司IP%lAdd1%
@echo3：設置%lname%IP地址為專用IP%lAdd2%
@echo.
@echo.
setshut=""
set/pshut="請輸入【<1>或<2>或<3>或<q>退出】並按回車鍵或者按<回車鍵>返回主菜單

:"
IFNOT"%shut%"==""(
if%shut%NEQ""SETshut=%shut:~0,1%
)else(
setshut="")
if/i%shut%==1gotolocallyone
if/i%shut%==2gotolocallytwo
if/i%shut%==3gotolocallythree
if/i%shut%==qexit
gotohome

:wireless
cls
@echo.
@echo修改%wname%IP地址（KYT--PanFu）
@echo.
@echo1：設置%wname%自動獲取IP地址
@echo2：設置%wname%IP地址為公司IP%wAdd1%
@echo3：設置%wname%IP地址為專用IP%wAdd2%
@echo.
@echo.
setshut=""
set/pshut="請輸入【<1>或<2>或<3>或<q>退出】並按回車鍵或者按<回車鍵>返回主菜單

:"
IFNOT"%shut%"==""(
if%shut%NEQ""SETshut=%shut:~0,1%
)else(
setshut="")
if/i%shut%==1gotowirelessone
if/i%shut%==2gotowirelesstwo
if/i%shut%==3gotowirelessthree
if/i%shut%==qexit
gotohome

rem設置本地網路連接開始
:locallyone
@echo.
@echo正在設置%lname%IP地址請稍後。。。
call:autolocall%lname%>nul
@echo設置%lname%自動獲取IP地址成功！！
@echo.
@echo.
gotothree

:locallytwo
@echo.
@echo正在設置%lname%IP地址請稍後。。。
call:autowireless%wname%>nul
cmd/="%lname%"static%ladd1%%lmask1%%lGat1%>nul
cmd/cnetshinterfaceipadddnsname="%lname%"%ldns11%index=1>nul
cmd/cnetshinterfaceipadddnsname="%lname%"%ldns12%index=2>nul
@echo設置%lname%IP地址成功！！！
@echo.
@echo當前IP地址：%ladd1%
@echo當前子網掩碼：%lmask1%
@echo當前默認網關：%lGat1%
@echo當前DNS1地址：%ldns11%
@echo當前DNS2地址：%ldns12%
@echo.
@echo.
gotothree

:locallythree
@echo.
@echo正在設置%lname%IP地址請稍後。。。
call:autowireless%wname%>nul
cmd/="%lname%"static%ladd2%%lmask2%%lGat2%>nul
cmd/cnetshinterfaceipadddnsname="%lname%"addr=%ldns21%index=1>nul
cmd/cnetshinterfaceipadddnsname="%lname%"addr=%ldns22%index=2>nul
@echo設置%lname%IP地址成功！！！
@echo.
@echo當前IP地址：%ladd2%
@echo當前子網掩碼：%lmask2%
@echo當前默認網關：%lGat2%
@echo當前DNS1地址：%ldns21%
@echo當前DNS2地址：%ldns22%
@echo.
@echo.
gotothree
::設置本地網路連接結束

::設置無線網路連接開始
:wirelessone
@echo.
@echo正在設置%wname%IP地址請稍後。。。
call:autowireless%wname%>nul
@echo設置%wname%自動獲取IP地址成功！！
@echo.
@echo.
gotothree

:wirelesstwo
@echo.
@echo正在設置%wname%IP地址請稍後。。。
call:autolocall%lname%>nul
cmd/="%wname%"static%wadd1%%wmask1%%wGat1%>nul
cmd/cnetshinterfaceipadddnsname="%wname%"%wdns11%index=1>nul
cmd/cnetshinterfaceipadddnsname="%wname%"%wdns12%index=2>nul
@echo設置%wname%IP地址成功！！！
@echo.
@echo當前IP地址：%wadd1%
@echo當前子網掩碼：%wmask1%
@echo當前默認網關：%wGat1%
@echo當前DNS1地址：%wdns11%
@echo當前DNS2地址：%wdns12%
@echo.
@echo.
gotothree

:wirelessthree
@echo.
@echo正在設置%wname%IP地址請稍後。。。
call:autolocall%lname%>nul
cmd/="%wname%"static%wadd2%%wmask2%%wGat2%>nul
cmd/cnetshinterfaceipadddnsname="%wname%"%wdns121%index=1>nul
cmd/cnetshinterfaceipadddnsname="%wname%"%wdns122%index=2>nul
@echo設置%wname%IP地址成功！！！
@echo.
@echo當前IP地址：%wadd2%
@echo當前子網掩碼：%wmask2%
@echo當前默認網關：%wGat2%
@echo當前DNS1地址：%wdns21%
@echo當前DNS2地址：%wdns22%
@echo.
@echo.
gotothree
::設置無線網路連接結束

:three
::pause>nul
setshut=""
set/pshut="請輸入【<a>返回主菜單】或者按<其他鍵>退出:"
IFNOT"%shut%"==""(
if%shut%NEQ""SETshut=%shut:~0,1%
)else(
setshut="")
if/i%shut%==agotohome
exit

:autolocall
cmd/="%lname%"static0.0.0.00.0.0.00.0.0.0>nul
cmd/="%lname%"source=dhcp>nul
cmd/cnetshinterfaceipsetdnsname="%lname%"source=dhcp>nul
::@echo設置%lname%自動獲取IP地址成功！
goto:eof

:autowireless
cmd/="%wname%"static0.0.0.00.0.0.00.0.0.0>nul
cmd/="%wname%"source=dhcp>nul
cmd/cnetshinterfaceipsetdnsname="%wname%"source=dhcp>nul
::@echo設置%wname%自動獲取IP地址成功！
goto:eof

上面的本地連接2 是你的本地連接的名字！ IP地址修改下就行了！

把上面的代碼 復制到新建文本里，然後改下後綴名！ .bat就OK了