ÐÂÄêÒªÓÐÐÂÆøÏó£¬VB°æÓÖµÃÁËÒ»ÐÉÐÉ£¬É¢É¢·ÖÒÔÇì×£¡¡
»Ø´ðÁËһЩÅóÓѵÄÎÊÌ⣬Ҳ´ÓÆäËüÐÉÐÉÄÄѧµ½Á˲»ÉÙ¶«Î÷£¬Ôڴ˸ÐлÄãÃÇ¡¡
ÁíÍâ¼ÌÐøÑûÇëÐÉÐÉÃÇ¼Ó ¹Â¶À½£µÄQQȺ ȺºÅ33189279
ɳ·¢ ÇÀ·Ö
ÀÏV¶¯×÷Õæ¿ìѽ¡«
°åµÊ
½Ó·Ö...
¼ñµãÏ㽶Ƥ¡£
½Ó·Ö
jf ........
???????????????? ......
VB¡£Net ExcelÎÊÌ⣺1.ÈçºÎÐ޸Ť×÷±íµÄÃû³ÆÄØ£¨ÈçºÎ°ÑSHEET1¸ÄµôÄØ£©£¿
2.ÈçºÎºÏ²¢µ¥Ôª¸ñ£¿
ÄÄλ֪µÀ°ï°ïæ{{ ......
¡¡¡¡VBÓÐʲôȱµã°¡£¿ÎªÊ²Ã´ÓÐÈË˵ËüÊÇÒ»ÃÅ¿ìûÂäµÄÓïÑÔ£¿ÓÐʲôÊÇËü×ö²»µ½µÄ£¿ÄÜ˵ͨË×Ò»µãµÄ¾¡¿ÉÄÜ˵µÃͨË×Ò»µã°É£¡
±¨±í²»ºÃ£¬°²×°°ü±È½Ï´ó¡£ÆäËü¶¼»¹²»´í
½âÊÍÐÔÖ´ÐС£ËٶȱȽÏÂý¡£
vbµÄΨһȱµã¾ÍÊDz»ÒªÇó±äÁ¿ÉêÃ÷¡£O(¡É_¡É)O¹þ¹þ¹þ~
VBÓïÑÔÉú³ÉµÄÎļþ£¨Í¬ÐÔÄÜ£©±ÈÆðÆäËûÓïÑÔµÄÒª¸ü´ó£¬ÔËÐÐÆðÀ´Õ¼µÃÄÚ´æÒ²ÉÔ ......
ÏȰÑSMTP.ocx¿Ø¼þÔÚϵͳÖÐ×¢²á£¬ÔÚvbÖÐÎÒÊÇÕâÑùµ÷Óã¬ÏȽ¨Á¢Ò»¸ö¹¤³Ì£¬ÔÚÒ»¸öformÖУ¬°Ñ¸Õ×¢²áSMTP.ocx¿Ø¼þµ÷ÓóöÀ´£¬ÍÏ·ÅÔÚ½çÃæÉÏ£¬¿Ø¼þÃû³Æ¸ÄΪ¡°SMTP_Test¡±£¬´úÂëÈçÏ£º
With SMTP_Test
.Server = "10.4.250.52"
.Port = 25
.Mailfrom = "smileguo@strcn.com"
.SendTo ......
ÊÇÕâÑùµÄ£¬ÎÒÏëÓÃpc»úºÍÏÂλµ¥Æ¬»ú½øÐÐͨѶ¡£¸Õѧvb²»¾Ã£¬ÊÇÕâÑùдµÄ£º
Private Sub com_OnComm()
Select Case com.CommEvent
Case comEvReceive
text2 = com.Input
com.InBufferCount = 0
End Select
End Sub
......
vbÖÐÓÐÒ»¶Î´úÂë¶Áȡһ¸öÎļþ£¬È»ºó¶ÁÈ¡µ½Ò»¸öÀàÀïÃæ£¨Ò»¸öÀàµÄʵÀý£©ÓÃFileGetObjectʵÏÖ
ÄÇôÔÚvb.netÖÐÈçºÎʵÏÖ£¿
vb.netÓÐFileÀ࣬StreamReaderÀ࣬ºÜ¼òµ¥¡£¿´¿´Îĵµ¼´¿É»á
ÁíÍâFileGetObjectÈÔÈ»¿ÉÒÔ¼ÌÐøÊ¹ÓÃ
http://msdn.microsoft.com/en-us/library/y1swwyc4.aspx
ʹÓÃStreamReader¿ÉÒÔÖ±½Ó¶Áµ½Ò»¸öÒѶ ......