记事本里面可以直接运行哪些脚本，比如VBS，BAT，JS，谢谢大家，还有哪些，我想

记事本类型的编辑器缓空都不能直接运行调试VBS BAT JS代码的、

如果你想自动输入用户名密码登录软件的话用VBS实枝樱现把

下面是代码：

QQ自动登陆

Dim WshShell, QQPath, QQselect

QQPath="c:\扰搭瞎progra~1\tencent\qq\qq.exe" QQ路径

Set WshShell=WScript.CreateObject("WScript.Shell")

WshShell.Run QQPath

WScript.Sleep 2000

WshShell.AppActivate "Q登录"

WshShell.SendKeys "+{TAB}"

WshShell.SendKeys "34168531" QQ号码

WScript.Sleep 200

WshShell.SendKeys "{TAB}"

WshShell.SendKeys "soula.ik8.com" QQ密码

WScript.Sleep 200

WshShell.SendKeys "{ENTER}" '输入回车键

只须将以上代码中的QQ所在路径、QQ号码、密码改成你自己的，运行该vbs就可以自动登陆QQ了。

@echo off

color 9f

echo.&

echo ╭——晨曦 拼图游戏——╮

echo ╰——————————╯

ping/n 1 127.1>nul

echo ╭—— 4 —— 5 —— 6 —兆举╮

echo │ │

echo │ ■■■■■■■■■■ │

echo │ ■ ■ │

echo │ ■ ■ │

echo │ ■ ■ │

echo │ ■ ■ │

echo │ ■ ■ │

echo │ ■ ■ │

echo │ ■■■■■■■■■■ │

echo │ │

echo ╰—— 1 —— 2 —— 3 —╯

ping/n 2 127.1>nul

echo 上面的图形将拆分为6块并打乱顺序

ping/n 2 127.1>nul

echo -

echo 请使用小键盘的数字键选择图片，

echo 拼出上面的兆猜拿图形。

echo.&

ping/n 2 127.1>nul

echo 按任意键开始游戏...

pause>nul

cls

color 0a

set game=1

set pic1=

set pic2=■

:main2

cls

if %game%==2 echo 请将符族搭号"⊙"组成与前一关同样的形状

set k41=%pic1%%pic1%%pic1%%pic1%&set k51=%pic1%%pic1%%pic1%%pic1%&set k61=%pic1%%pic1%%pic1%%pic1%

set k42=%pic1%%pic2%%pic2%%pic2%&set k52=%pic2%%pic2%%pic2%%pic2%&set k62=%pic2%%pic2%%pic2%%pic1%

set k43=%pic1%%pic2%%pic1%%pic1%&set k53=%pic1%%pic1%%pic1%%pic1%&set k63=%pic1%%pic1%%pic2%%pic1%

set k44=%pic1%%pic2%%pic1%%pic1%&set k54=%pic1%%pic1%%pic1%%pic1%&set k64=%pic1%%pic1%%pic2%%pic1%

set k45=%pic1%%pic2%%pic1%%pic1%&set k55=%pic1%%pic1%%pic1%%pic1%&set k65=%pic1%%pic1%%pic2%%pic1%

set k11=%pic1%%pic2%%pic1%%pic1%&set k21=%pic1%%pic1%%pic1%%pic1%&set k31=%pic1%%pic1%%pic2%%pic1%

set k12=%pic1%%pic2%%pic1%%pic1%&set k22=%pic1%%pic1%%pic1%%pic1%&set k32=%pic1%%pic1%%pic2%%pic1%

set k13=%pic1%%pic2%%pic1%%pic1%&set k23=%pic1%%pic1%%pic1%%pic1%&set k33=%pic1%%pic1%%pic2%%pic1%

set k14=%pic1%%pic2%%pic2%%pic2%&set k24=%pic2%%pic2%%pic2%%pic2%&set k34=%pic2%%pic2%%pic2%%pic1%

set k15=%pic1%%pic1%%pic1%%pic1%&set k25=%pic1%%pic1%%pic1%%pic1%&set k35=%pic1%%pic1%%pic1%%pic1%

set w=0

for /l %%i in (1,1,6) do set p%%i=7

:getnum

set /a x=%random%%%6+1

if %x%==%p1% goto getnum

if %x%==%p2% goto getnum

if %x%==%p3% goto getnum

if %x%==%p4% goto getnum

if %x%==%p5% goto getnum

if %x%==%p6% goto getnum

set /a p%w%=%x%+0

set /a w=w+1

if %w%==7 goto begin

goto getnum

:begin

:start

for /l %%i in (1,1,5) do set p1%%i=k%p1%%%i

for /l %%i in (1,1,5) do set p2%%i=k%p2%%%i

for /l %%i in (1,1,5) do set p3%%i=k%p3%%%i

for /l %%i in (1,1,5) do set p4%%i=k%p4%%%i

for /l %%i in (1,1,5) do set p5%%i=k%p5%%%i

for /l %%i in (1,1,5) do set p6%%i=k%p6%%%i

echo @echo off>temp_game.bat

echo echo ╭—— 4 —— 5 —— 6 —╮>>temp_game.bat

echo echo │%%%p41%%%%%%p51%%%%%%p61%%%│>>temp_game.bat

echo echo │%%%p42%%%%%%p52%%%%%%p62%%%│>>temp_game.bat

echo echo │%%%p43%%%%%%p53%%%%%%p63%%%│>>temp_game.bat

echo echo │%%%p44%%%%%%p54%%%%%%p64%%%│>>temp_game.bat

echo echo │%%%p45%%%%%%p55%%%%%%p65%%%│>>temp_game.bat

echo echo │%%%p11%%%%%%p21%%%%%%p31%%%│>>temp_game.bat

echo echo │%%%p12%%%%%%p22%%%%%%p32%%%│>>temp_game.bat

echo echo │%%%p13%%%%%%p23%%%%%%p33%%%│>>temp_game.bat

echo echo │%%%p14%%%%%%p24%%%%%%p34%%%│>>temp_game.bat

echo echo │%%%p15%%%%%%p25%%%%%%p35%%%│>>temp_game.bat

echo echo ╰—— 1 —— 2 —— 3 —╯ >>temp_game.bat

echo.&

echo ╭——晨曦 拼图游戏——╮

echo ╰——————————╯

call temp_game.bat

if %p1%==1 if %p2% ==2 if %p3% == 3 if %p4% ==4 if %p5% ==5 if %p6% ==6 goto jobdone

del temp_game.bat

set /p m=请选择一张图片(输入1~6):

for /l %%i in (1,1,6) do if %m%==%%i goto inputn

echo 输入有误!&ping/n 2 127.1>nul&cls&goto start

:inputn

set /p n=与这张图片交换(输入1~6):

for /l %%i in (1,1,6) do if %n%==%%i goto inputover

echo 输入有误!&ping/n 2 127.1>nul&cls&goto start

:inputover

cls

FOR /L %%i IN (1,1,6) do if %m%==%%i echo set p%%i=%%p%n%%%^&set p%n%=%%p%%i%%>temp_game.bat&call temp_game.bat&del temp_game.bat

FOR /L %%i IN (1,1,6) do if %n%==%%i echo set p%%i=%%p%n%%%>temp_game.bat&call temp_game.bat&del temp_game.bat

goto start

:jobdone

cls

call temp_game.bat

del temp_game.bat

color 9e

echo ****************************

echo ****-----恭喜过关!! -----***

echo ****************************

ping/n 3 127.1>nul

color 9a

ping/n 1 127.1>nul

color 9b

ping/n 1 127.1>nul

color 9c

ping/n 1 127.1>nul

color 9d

ping/n 1 127.1>nul

color 9e

ping/n 1 127.1>nul

color 9f

ping/n 1 127.1>nul

:text

color 9f

echo ^>^>^>

ping/n 3 127.1>nul

if %game%==2 goto endgame

echo 1.进入下一关[enter]

echo 2.退出

goto choice

:endgame

echo 1.重新开始[enter]

echo 2.退出

:choice

set play=1

set /p play=请选择：

if %play%==1 set pic1=○&set pic2=⊙&set game=2&goto main2

if %play%==2 exit

---