VB »ñÈ¡Íø¿¨Ó²¼þÐÅÏ¢
VB ÈçºÎͨ¹ýAPI»ñÈ¡Íø¿¨µÄÓ²¼þÐÅÏ¢£¬±ÈÈ磺
ÎÒµÄÍø¿¨Îª£º
Atheros L1 Gigabit Ethernet 10/100/1000Base-T Controller
ÈçºÎͨ¹ýÕâ¸öÍø¿¨Ãû»ñµÃÏñÏÂÃæÕâ¸öÑùµÄÐÅÏ¢
\Device\Tcpip_{113F8C45-C710-4CA4-9745-A6AA9339F057}
ÎÒÖ»Òª{}ÖеÄÖµ
È»ºóÔÚ×¢²á±íÖжÁÈ¡Õâ¸ö×Ó¼üÖеÄÄÚÈÝ£¬À´ÅжϸÃÍø¿¨ÊDz»ÊÇÎïÀíÍø¿¨
ÎÒ¾õµÃWMI¾Í¿ÉÒÔÁË¡£
ÓÐûÓÐAPIÄØ£¬ÎÒÒªAPIѽ£¬ÖªµÀÓÐûÓУ¬»¹Çë¸ßÊÖ˵Ï£¬Ð»Ð»ÁË
È¡µÃÍø¿¨ÐòÁкÅ
¡¡¡¡ºÜ¶àÈí¼þÒÔÈ¡µÃÍø¿¨µØÖ·×÷ΪLicenseÑéÖ¤£¬ÕⲻʧΪһ¸öÑéÖ¤ºÏ·¨Óû§µÄºÃ°ì·¨£¬²»¹ýÒª¸¶³ö»Ø¸´Óû§µç»°¡¢´«ÕæµÄ´ú¼ÛŶ¡¡^_^
¡¡¡¡½«ÏÂÃæÕâ¶Î´úÂ뿽±´µ½³ÌÐòÖУ¬È»ºóÔÚÄãµÄ³ÌÐòÐèÒªµÄʱºòµ÷ÓÃEthernetAddress(0),¸Ãº¯Êý·µ»ØµÄ×Ö·û´®¾ÍÊÇÄú»úÆ÷ÉÏÍø¿¨µÄÒÔÌ«ÐòÁкš£
Private Const NCBASTAT = &H33
Private Const NCBNAMSZ = 16
Private Const HEAP_ZERO_MEMORY = &H8
Private Const HEAP_GENERATE_EXCEPTIONS = &H4
Private Const NCBRESET = &H32
Private Type NCB
¡¡ncb_command As Byte
¡¡ncb_retcode As Byte
¡¡ncb_lsn As Byte
¡¡ncb_num As Byte
¡¡ncb_buffer As Long
¡¡ncb_length As Integer
¡¡ncb_callname As String * NCBNAMSZ
¡¡ncb_name As String * NCBNAMSZ
¡¡ncb_rto As Byte
¡¡ncb_sto As Byte
¡¡ncb_post As Long
¡¡ncb_lana_num As Byte
¡¡ncb_cmd_cplt As Byte
¡¡ncb_reserve(9) As Byte ' Reserved, must be 0
¡¡ncb_event As Long
End Type
<
Ïà¹ØÎÊ´ð£º
Çë½ÌһϣºÎÒÓÃvbдÁËÒ»¸öµ÷ÓÃIllustratorµÄ²âÊÔ³ÌÐò£¬´úÂëºÜ¼òµ¥£ºPrivate Sub Command1_Click()
Dim app As New Illustrator.Application
Dim doc As Illustrator.Document
Dim thislayer As Illustrator.Layer ......
vbÖÐÔõôͨ¹ýxmlÀ´½âÎöÊý¾Ý¿âÖеÄ×Ö¶ÎÖµ¡£
û°ì·¨ÓÃXML½âÎöÊý¾Ý¿âµÄ×Ö¶ÎÖµ£¬³ý·ÇÊý¾Ý¿âÖб£´æµÄÊÇXML¸ñʽµÄ×Ö·û´®Îĵµ¡£
XMLÓÃÀ´Õ¹Ê¾²ã´ÎµÄÊý¾Ý¡£
Êý¾Ý¿âÒ»°ãÊǶþάÊý¾Ý¡£
Êý¾Ý¿âÖб£´æµÄÊÇXML×Ö·û´®¸ñʽ£ ......
±ÈÈç˵ҪÔÚ1±íÖеĵÚÈýÁеڶþÐе¥ÔªÖÐÊäÈë¡°Ò»¶þÈý¡±Ò»Òª´ÖÌåËÎÌå12ºÅ×Ö£¬¶þ ²»Òª´ÖÌå 15ºÅ×Ö ÈýбÌå5ºÅ×Ö
´úÂëÓ¦¸ÃÔõô´ò£¿
LZÖ¸µÄÊǸöʲô±í¸ñ¿Ø¼þÄØ£¬Ã²ËÆÖ»ÄÜÉèÖÃÕû¸ö±íµÄ×ÖÌ壬»òÕßij¼¸Ðлò¼¸ÁУ¬Ã»Óе¥¶ÀÉèÖ ......
ÔõôÓÅ»¯²éѯµÄЧÂÊ£¬±ÈÈçÎÒÏë´Ó100ÍòÌõ¼Ç¼ÖÐÿ´ÎÖ»²éѯ100Ìõ¼Ç¼µÄ»°£¬ÄÇôÕâÌõsqlÓï¾ä¸ÃÔõôʵÏÖ£¬×¢Ò⣺ÓïÑÔÊÇVBScriptµÄ£¬
http://www.cnblogs.com/anjou/archive/2007/10/17/926944.html
Éæ¼°µ½Ëã·¨£¬goog ......
ÎÒÖÆ×÷Á˸öÓû§¿Ø¼þ£¬ÐèÒª¶¯Ì¬¼ÓÔص½´°ÌåÉÏ
Set objExt = Controls.Add("¹¤³Ì1.meActiveX", argName)
objExt.Visible = True
³ÌÐòÒ»´ÎÄܼÓÔØN¸ö£¬ ÏÖÔÚÏë¶Ô ......