VBÖд°ÌåÄ£¿é¡¢±ê׼ģ¿é¡¢ÀàÄ£¿éµÄÇø±ð
VBµÄ´úÂë´æ´¢ÔÚÄ£¿éÖС£ÔÚVBÖÐÌṩÁËÈýÖÖÀàÐ͵ÄÄ£¿é£º´°ÌåÄ£¿é¡¢±ê׼ģ¿éºÍÀàÄ£¿é¡£
¡¡¡¡¼òµ¥µÄÓ¦ÓóÌÐò¿ÉÒÔÖ»ÓÐÒ»¸ö´°Ì壬ËùÓõijÌÐò¶¼×¤ÁôÔÚ´°ÌåÄ£¿éÖУ¬¶øµ±Ó¦ÓóÌÐòÅÓ´ó¸´ÔÓʱ£¬¾ÍÒªÁíÍ⸽¼Ó´°Ìå¡£×îÖÕ¿ÉÄÜÓм¸¸ö´°ÌåÖÐÓÐһЩ¹²Í¬¶¼ÒªÖ´ÐеĴúÂ룬ΪÁËÔÚÁ½¸ö´°ÌåÖв»²úÉúÖØ¸´´úÂ룬¿É´´½¨Ò»¸ö¶ÀÁ¢µÄÄ£¿é£¬ÓÃËüʵÏÖ´úÂ빫Ó᣸öÀÁ¢Ä£¿é¼´ÊDZê׼ģ¿é¡£´ËÍ⻹¿ÉÒÔ½¨Á¢°üº¬¹²Ïí´úÂëÓëÊý¾ÝµÄÀàÄ£¿é¡£
¡¡¡¡Ã¿¸ö±ê׼ģ¿é¡¢ÀàÄ£¿éºÍ´°ÌåÄ£¿é¿É°üº¬£º
¡¡¡¡ÉùÃ÷¡£ ¿É½«³£Êý¡¢ÀàÐÍ¡¢±äÁ¿ºÍ¶¯Ì¬Á´½Ó¿â£¨DLL£©¹ý³ÌµÄÉùÃ÷·ÅÔÚ´°Ìå¡¢Àà»ò±ê׼ģ¿éµÄÉùÃ÷²¿·Ö¡£Ã¿¸öÄ£¿éÖ»ÓÐÒ»¸öÉùÃ÷²¿·Ö
¡¡¡¡¹ý³Ì¡£Ã¿¸öÄ£¿é¿ÉÓжà¸ö¹ý³Ì£¬¹ý³ÌÊÇ»®·ÖVB´úÂëµÄ×îСµ¥Ôª£¬Ã¿¸ö¹ý³ÌÊÇÒ»¸ö¿ÉÖ´ÐеĴúÂëÆ¬¶Î¡£VBÖÐÖ÷ÒªÓÐ×Ó¹ý³Ì¡¢º¯Êý¹ý³Ì»òÕßÊôÐÔ¹ý³ÌµÈ
¡¡¡¡¸÷ÖÖÄ£¿éÀàÐÍ
¡¡¡¡1.´°ÌåÄ£¿é
¡¡¡¡ÓÉÓÚVBÊÇÃæÏò¶ÔÏóµÄÓ¦ÓóÌÐò¿ª·¢¹¤¾ß£¬ËùÒÔÓ¦ÓóÌÐòµÄ´úÂë½á¹¹¾ÍÊǸóÌÐòÔÚÆÁÄ»ÉϱíʾµÄ¶ÔӦģÐÍ¡£¸ù¾Ý¶¨Ò壬¶ÔÏó°üº¬Êý¾ÝºÍ´úÂë¡£Ó¦ÓóÌÐòÖеÄÿ¸ö´°Ìå¶¼ÓÐÒ»¸öÏà¶ÔÓ¦µÄ´°ÌåÄ£¿é£¨ÎļþÀ©Õ¹ÃûΪ.frm£©
¡¡¡¡´°ÌåÄ£¿éÊÇVBÓ¦ÓóÌÐòµÄ»ù´¡¡£´°ÌåÄ£¿é¿ÉÒÔ°üº¬´¦ÀíʼþµÄ¹ý³Ì¡¢Í¨Óùý³ÌÒÔ¼°±äÁ¿¡¢³£Êý¡¢×Ô¶¨ÒåÀàÐͺÍÍⲿ¹ý³ÌµÄ´°Ìå¼¶ÉùÃ÷¡£Ð´Èë´°ÌåÄ£¿éµÄ´úÂëÊǸô°ÌåËùÊôµÄ¾ßÌåÓ¦ÓóÌÐòרÓõģ»Ò²¿ÉÒÔÒýÓøóÌÐòÄ򵀮äËü´°ÌåºÍ¶ÔÏó
¡¡¡¡Ã¿¸ö´°ÌåÄ£¿é¶¼°üº¬Ê¼þ¹ý³Ì£¬ÔÚʼþ¹ý³ÌÖÐÓÐΪÏìÓ¦¸Ãʼþ¶øÖ´ÐеijÌÐò¶Î¡£´°Ìå¿É°üº¬¿Ø¼þ¡£ÔÚ´°ÌåÄ£¿éÖУ¬¶Ô´°ÌåÉϵÄÿ¸ö¿Ø¼þ¶¼ÓÐÒ»¸ö¶ÔÓ¦µÄʼþ¹ý³Ì¼¯¡£³ýÁËʼþ¹ý³Ì£¬´°ÌåÄ£¿é»¹¿É°üº¬Í¨Óùý³Ì£¬Ëü¶ÔÀ´×Ըô°ÌåÖÐÈκÎʼþ¹ý³ÌµÄµ÷Óö¼×÷³öÏìÓ¦¡£
¡¡¡¡2.±ê׼ģ¿é
¡¡¡¡±ê׼ģ¿éÊdzÌÐòÖеÄÒ»¸ö¶ÀÁ¢ÈÝÆ÷£¬°üº¬È«¾Ö±äÁ¿¡¢Function(º¯Êý)¹ý³ÌºÍSub¹ý³Ì£¨×Ó¹ý³Ì£©¡£
¡¡¡¡¿É½«ÄÇЩÓëÌØ¶¨´°Ìå»ò¿Ø¼þÎ޹صĴúÂë·ÅÈë±ê׼ģ¿éÖС£±ê׼ģ¿éÖаüº¬Ó¦ÓóÌÐòÄÚµÄÔÊÐíÆäËüÄ£¿é·ÃÎʵĹý³ÌºÍÉùÃ÷¡£ËüÃÇ¿ÉÒÔ°üº¬±äÁ¿¡¢³£Êý¡¢ÀàÐÍ¡¢Íⲿ¹ý³ÌºÍÈ«¾ÖÉùÃ÷»òÄ£¿é¼¶ÉùÃ÷¡£Ð´Èë±ê׼ģ¿éµÄ´úÂë²»±Ø¹Ì¶¨ÔÚÌØ¶¨µÄÓ¦ÓóÌÐòÉÏ£»
¡¡¡¡£¨1£©Ê¹Óñê׼ģ¿é
¡¡¡¡ÔÚ±àд³ÌÐòʱ£¬ºÜ¿ÉÄÜ»áÓöµ½Ò»Ð©Ê¹ÓÃÏàͬ±äÁ¿ºÍÀý³ÌµÄ´°ÌåºÍʼþ¹ý³Ì¡£ÔÚȱʡ״̬Ï£¬±äÁ¿¶ÔÓÚʼþ¹ý³ÌÀ´ËµÊǾֲ¿µÄ£¬¾ÍÊÇ˵½öÄÜÔÚ´´½¨ÕâЩ±äÁ¿µÄʼþ¹ý³ÌÖжÁÈ¡»òÕßÐ޸ıäÁ¿¡£ÓëÖ®ÏàËÆ£¬Ê¼þ¹ý³Ì¶ÔÓÚ´´½¨ËüÃǵĴ°ÌåÀ´ËµÒ²ÊǾֲ¿¡£ÎªÁËÔÚ¹¤³ÌÖеÄËùÓд°ÌåºÍʼþÖй²Ïí±äÁ¿ºÍ¹ý³Ì£¬ÐèÒªÔڸù¤³ÌµÄÒ»¸ö»ò¶à¸ö±ê׼ģ¿éÖжÔËüÃǽ
Ïà¹ØÎĵµ£º
È¥ÄêÔøÐ´¹ýһƪ²©ÎÄ£¬Ãû³Æ½Ð¡¶ÓÃVBÎÞ´°¿Ú͸Ã÷Usercontrol±àд͸Ã÷¸¡¶¯°´Å¥¡·£¬¸ÃÎÄÓÐÒ»¸ö¹ÛµãÊÇ´íÎóµÄ£¬¼´Í¸Ã÷ÎÞ´°¿ÚUsercontrol²»Ö§³ÖÉè¼ÆÊ±µãÑ¡¡£Æäʵ£¬Í¨¹ýÔÚUserControl_HitTest¹ý³ÌÀï¼ÓÈëHitResult = vbHitResultHitÓï¾ä£¬¾Í¿ÉÒÔʵÏÖÉè¼ÆÊ±µÄµãÑ¡ÁË£¬Îª´Ë£¬Ð޸ĴúÂëÈçÏ£º
'* ******************* ......
http://bbs.blueidea.com/viewthread.php?tid=531257
Èç¹ûÏëÁ˽âSOAPµ½µ×ÊÇʲô£¬¾ÍÒª×Ô¼º¶¯ÊÖ½¨Á¢×Ô¼ºµÄSOAP±ê×¼¶ÔÏó¡£±¾ÎÄ¿ÉÒÔ°ïÖúÄãÆð²½¡£
============================================
¼ò½é
SOAP - ¼òµ¥¶ÔÏó´¦ÀíÐÒé(Simple Object Access Protocol) - Êǵ±Ç°XML¿ª·¢µÄÈȵ㡣ËüÊÇ΢ÈíÐÂÒ»´úVisual StudioµÄÖ÷Òª½Ç ......
±¾ÎÄÀ´×Ô´ËÌûµÄÈß³¤ÌÖÂÛ£¬¸ÐлTiger_ZhaoµÄÈ«³ÌÖ¸µãºÍ³Â»Ô¡¢°¢Ó¡¢ÂíÔÆ½£µÈºÜ¶àÅóÓѵÄÈÈÐIJÎÓë¡£±¾ÎÄÆäËû²¿·ÖÔÚ£º£¨¶þ£©¡¢£¨Èý£©¡¢£¨ËÄ£©¡£
»°ËµVB6ÊǸöºÜÈÏÕæÏ¸ÖµÄÂèÂ裬Ëü»áÇÄûÉùµØ°ïÄã×öºÜ¶àÊ¡£½ñÌìÎÒÃÇÀ´ËµµÄÊÇVB6ÔÚAPIµ÷ÓÃʱ×Ô¶¯¶Ô×Ö·û´®²ÎÊý½øÐÐת»»µÄ“ºÃÈ˺ÃÊ”¡£
µÚÒ»½Ú ÌåÌùµÄVBÂè ......
Public Class Form1
Private Sub CmdTrans_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles CmdTrans.Click
Dim psi As New System.Diagnostics.ProcessStartInfo
Dim ftpFileName As String
psi.FileName = "ftp.exe"
psi.RedirectStandardInput = ......
ÏàÐÅÏÖÔÚ¾ø´ó¶àÊý¼ÆËã»úÉÏʹÓõÄÊÇIEä¯ÀÀÆ÷¡£ÈçºÎͨ¹ý±à³Ì¿ØÖÆIEµÄ²Ù×÷ÄØ£¬±¾ÎĽ«Ò»²½²½½éÉÜÈçºÎͨ¹ýVB
µ÷ÓÃIEµÄ¶ÔÏó¿âÀ´¶ÔIE½øÐпØÖÆ¡£
±¾ÎÄʹÓõıà³Ì¹¤¾ßÊÇVB6Ó¢ÎÄÆóÒµ°æ£¬ä¯ÀÀÆ÷ÊÇIE5£¬ÒÔϵĴúÂëÖ»ÄÜÔÚIE4¼°ÒÔÉϰ汾ÏÂÔËÐС£ÁíÍâΪÁËÄÜÉî
ÈëÁ˽â³ÌÐò´úÂ룬×îºÃÄܰ²×°MSDN¡£ ......