ªð¦^¦Cªí ¤W¤@¥DÃD µo©«

[¤À¨É] ¦bExcel ¨Ï¥ÎWinsock

[¤À¨É] ¦bExcel ¨Ï¥ÎWinsock

Sub Excel_Winsock()
    Dim ExcelWinsock As Object
    Set ExcelWinsock = CreateObject("mswinsock.winsock")
    MsgBox ExcelWinsock.LocalIP
End Sub

¥»©«³Ì«á¥Ñ PD961A ©ó 2010-5-11 21:04 ½s¿è
Sub Excel_Winsock()
    Dim ExcelWinsock As Object
    Set ExcelWinsock = CreateObject("mswinsock. ...
Min µoªí©ó 2010-5-9 21:57


¶{ª©¥D
¤£¦n·N«ä:
³o½g¤å³¹
¬O¤Þ¥Î©³¤Uªººô§}¶K¤Wªº.....¦]¬°¤£¤ÓÀ´±z»¡ªºWinsock..©Ò¥H¥h¬d¤@¤U¸ê®Æ
§Æ±æ±z¤£­n¤¶·N!!(¦pªG±zı±o¤£§´..¦A³Â·Ð±z§R°£.....ÁÂÁÂ!!!)
http://rogerspeaking.blogspot.com/2007/07/winsock.html
    2007¦~7¤ë10¤é¬P´Á¤G
¦p¦ó­×´_³Q´c·Nµ{¦¡¯}ÃaªºWinsock¡H

¦³¨Ç´c·Nµ{¦¡ (¦pTrojan.Riler.F¡BTROJ_AGENT.CAC) ©Î¶¡¿Ò³nÅé (¦pNewDotNet¡BWebHancerµ¥) ¦w¸Ë¤@¨Çªþ¥[¤¸¥ó¦Ü¨t²ÎªºWinsock2¾÷½X¤¤ (¦³®É­ÔºÙ¬°Layered Service Provider, aka, LSP)¡A¥H§Q©óºÊµø¨t²Îªººô¸ô°T®§¡C·í§A (¨¾¬r³nÅé©Î¤Ï¶¡¿Ò³nÅé) ¤£¤p¤ß²¾°£¥¦®É¡A·|³y¦¨ºô¸ô¤¤Â_©Îºô¸ô¤£Ã­©w¡C¦pªGµo¥Í³oºØ±¡§Î¡A¦p¦óÀˬd¤Î­×´_¥¦©O¡H

¦p¦ó§PÂ_Winsock2¤w¸g³Q·l·´¤F©O¡H

¤èªk¤@¡G¨Ï¥Î Windows XP SP2 ©Ò´£¨Ñªº©R¥O (netsh winsock show catalog)
1. «ö¤@¤U [¶}©l]¡AµM«á«ö¤@¤U [°õ¦æ]¡A¿é¤Jcmd¡AµM«á«ö¤@¤U [½T©w]¡C
2. ¦b©R¥O¦Cµøµ¡¤¤¡A¿é¤Jnetsh winsock show catalog¡C
3. ¦pªGWinsock2¾÷½X¨S¦³·lÃa¥B¥u¦w¸ËTCP/IPªº¸Ü¡A[³q°T¨ó©w] ¤¤·|¦³10­Ó°Ï¬q¡A¨C­Ó°Ï¬qªº¦WºÙ±N¦p¤U©Ò¥Ü¡G
¡E MSAFD Tcpip [TCP/IP]
¡E MSAFD Tcpip [UDP/IP]
¡E RSVP UDP Service Provider
¡E RSVP TCP Service Provider
¡E MSAFD NetBIOS [\Device\NetBT_Tcpip...
¡E MSAFD NetBIOS [\Device\NetBT_Tcpip...
¡E MSAFD NetBIOS [\Device\NetBT_Tcpip...
¡E MSAFD NetBIOS [\Device\NetBT_Tcpip...
¡E MSAFD NetBIOS [\Device\NetBT_Tcpip...
¡E MSAFD NetBIOS [\Device\NetBT_Tcpip...

¤èªk¤G¡G¨Ï¥Îmsinfo32.exe
1. «ö¤@¤U [¶}©l]¡AµM«á«ö¤@¤U [°õ¦æ]¡A¿émsinfo32¡AµM«á«ö¤@¤U [½T©w]¡C
2. ®i¶} [¤¸¥ó]¡A¦A®i¶} [ºô¸ô]¡AµM«á«ö¤@¤U [³q°T¨ó©w]¡C
3. ¦pªGWinsock2¾÷½X¨S¦³·lÃa¥B¥u¦w¸ËTCP/IPªº¸Ü¡A[³q°T¨ó©w] ¤¤·|¦³10­Ó°Ï¬q¡A¨C­Ó°Ï¬qªº¦WºÙ±N¦p¤U©Ò¥Ü¡G
¡E MSAFD Tcpip [TCP/IP]
¡E MSAFD Tcpip [UDP/IP]
¡E RSVP UDP Service Provider
¡E RSVP TCP Service Provider
¡E MSAFD NetBIOS [\Device\NetBT_Tcpip...
¡E MSAFD NetBIOS [\Device\NetBT_Tcpip...
¡E MSAFD NetBIOS [\Device\NetBT_Tcpip...
¡E MSAFD NetBIOS [\Device\NetBT_Tcpip...
¡E MSAFD NetBIOS [\Device\NetBT_Tcpip...
¡E MSAFD NetBIOS [\Device\NetBT_Tcpip...

¦p¦ó­×´_¤w¸g³Q·l·´ªºWinsock2©O¡H

¤èªk¤@¡G
¦pªG§Aªº¨t²Î¤w¸g¬OWindows XP SP2ªº¸Ü¡A¥u­n¦b©R¥O¦Cµøµ¡¤¤¡A¿é¤J¤U¦Cªº©R¥O§Y¥i¡Gnetsh winsock reset
¤£¹L¡A¦pªG§A¦³¦w¸Ë¨ä¥Lªºªþ¥[¤¸¥óªº¸Ü (¦pGoogle Toolbar)¡A¦¹©R¥O·|ÁÙ­ì¦Ü¥u¦³TCP/IPªºª¬ªp¡C

¤èªk¤G¡G¨Ï¥ÎLSP-Fixµ{¦¡
1. §A¥i¥H±qhttp://cexx.org/lspfix.htm¤U¸ü¦¹µ{¦¡¡C

¤èªk¤T¡G§R°£·´·lªºµn¿ý¾÷½X¡AµM«á­«·s¦w¸Ë TCP/IP ³q°T¨ó©w
1. «ö¤@¤U [¶}©l]¡AµM«á«ö¤@¤U [°õ¦æ]¡C
2. ¦b [¶}±Ò] ¤è¶ô¤¤¡A¿é¤Jregedit¡AµM«á«ö¤@¤U [½T©w]¡C
3. ¦b [µn¿ý½s¿èµ{¦¡] ¤¤§ä¥X¤U¦C¾÷½X¡A¦A¥Î·Æ¹«¥kÁä«ö¤@¤U¨C­Ó¾÷½X¡AµM«á«ö[§R°£]¡G
HKEY_LOCAL_MACHINE\System\CurrentControlSet\Services\Winsock
HKEY_LOCAL_MACHINE\System\CurrentControlSet\Services\Winsock2
4. ´£¥Ü±z¬O§_½T©w­n§R°£®É¡A½Ð«ö¤@¤U [¬O]¡C
ª`·N §R°£Winsock¾÷½X¤§«á¡A½Ð­«·s±Ò°Ê¹q¸£¡A§_«h¡A¤U¦Cªº¨BÆJ´N·|µLªk¥¿½T°õ¦æ¡C
5. ¦w¸Ë TCP/IP¡A¥Î·Æ¹«¥kÁä«ö¤@¤Uºô¸ô³s½u¡A¦A«ö¤@¤U [¤º®e]¡C
6. «ö¤@¤U [¦w¸Ë]¡A«ö¤@¤U [³q°T¨ó©w]¡AµM«á«ö¤@¤U [·s¼W]¡C
7. «ö¤@¤U [±qºÏ¤ù¦w¸Ë]¡A¿é¤JC:\Windows\inf¡AµM«á«ö¤@¤U [½T©w]¡C
8. ¦b¥i¥Î³q°T¨ó©wªº²M³æ¤¤«ö¤@¤U [Internet Protocol (TCP/IP)]¡AµM«á«ö¤@¤U [½T©w]¡AµM«á­«·s±Ò°Ê¹q¸£¡C

TOP

PD961A ±z«È®ð¤F!
¨Ã«D±`·PÁ±zªº¸É¥R~

winsock¥D­n¬O¥Î©ó¹q¸£ºÝ ¸ê°T¶¡ªº·¾³q~
©Ò¥H³o¤è­±ªº¤åÄm ¦]¸Ó¦³«Ü¦h...

TOP

¦^´_ 1# Min


    ActiveX¤¸¥óµLªk²£¥Íª«¥ó
ActiveX.PNG
2010-5-12 13:28
¾Ç®üµL²P_¤£®¢¤U°Ý

TOP

§Ú°O±o¥u­n¬OWindows 2000¥H¤W´N·|¦³Winsock¤¸¥ó....

±z±NÀ£ÁYÀɤºªº¤T­ÓÀɮשñ¸m©ó %windir%\system32\
¦b°õ¦æRegsvr32 /s %windir%\system32\MSWINSCK.OCX (µù¥U)

WINSCK.zip (61.92 KB)

TOP

        ÀR«ä¦Û¦b : ¦³¦h¤Ö¤O¶q´N°µ¦h¤Ö¨Æ¡A¤£­n¤ß¦sµ¥«Ý¡Aµ¥«Ý¤~·|¸¨ªÅ¡C
ªð¦^¦Cªí ¤W¤@¥DÃD