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
<
Ïà¹ØÎÊ´ð£º
ÎÒÓÃDelphiдÁËÒ»¸öDLL, DLLÀïÓÐMDIµÄ×Ó´°Ìå,DLL³õʼ»¯Ê± ´«µÝµ÷ÓÃÕßµÄTApplication¸øDLL, ÔÚDelphi7Öе÷ÓÃÒѾͨ¹ý,µ«ÊDz»ÖªµÀÔÚVBÖÐÓÐÎÞTApplication¶ÔÓ¦ÀàÐÍ, ÊÇ·ñÄÜÔÚVBÖе÷ÓÃ?
ÄãºÃ£¬ÓÃinstance²»ÊǾͿÉÒÔÁË ......
´ó¼ÒºÃ£¬Îʸövb´òÓ¡ÎÊÌâ
printer.print "dsff"
.....
....
Printer.EndDoc
´òÓ¡³É¹¦ºóÎÒ½«Ö´ÐÐ
sqlstr = "update vc_yh set pr=' ÒÑ´òÓ¡ ', ......
VBżѧµÃ²»´í£¬ÏÖÔÚ´óÒ»£¬¸ßÈýµÄʱºò¾ÍѧVBÁË£¬ÏÖÔÚѧУÀï¶¼ÊÇѧC#ºÍVB.NETµÄÐֵܶࡣ¡£¡£
żҪתÐÐVB.NETÁË~µ±ÄêѧVBѧÁË2Ä꣬¶ÔVBÀïÃæµÄ³£Óú¯Êý¶¼Ê®·ÖÁ˽⡣
Select¡¢If½á¹¹¡¢For NextÑ»·¡¢µÈ¶¼Á˽⡣¡£¡£ ......
vbÖÐÔõôͨ¹ýxmlÀ´½âÎöÊý¾Ý¿âÖеÄ×Ö¶ÎÖµ¡£
û°ì·¨ÓÃXML½âÎöÊý¾Ý¿âµÄ×Ö¶ÎÖµ£¬³ý·ÇÊý¾Ý¿âÖб£´æµÄÊÇXML¸ñʽµÄ×Ö·û´®Îĵµ¡£
XMLÓÃÀ´Õ¹Ê¾²ã´ÎµÄÊý¾Ý¡£
Êý¾Ý¿âÒ»°ãÊǶþάÊý¾Ý¡£
Êý¾Ý¿âÖб£´æµÄÊÇXML×Ö·û´®¸ñʽ£ ......
ÔÚvbÕâ±à³ÌÀïËÆºõÓкܶàµÄ¶«Î÷ÊÇÏàÁªÏµµÄ£¬ÎªÊ²Ã´ÓÐЩÈ˶ÔvbµÄ±à³ÌÃþ²»µ½Í·ÄÔ°¡£¡²¢ÇÒÓÐЩʺÜÈÝÒ׵쬵«ÊÇÈ´°ÑËüÃǵĴúÂë±ä³É¸´ÔÓ£¬Ò²È¥ÏëһЩ²»ÄÜʵÏֵĶ«Î÷°¡£¡
û·ÖÁË£¬Â¥Ö÷¶àÀ´µã·Ö£¡
À´½Óµã·Ö
......