Ò׽ؽØÍ¼Èí¼þ¡¢µ¥Îļþ¡¢Ãâ°²×°¡¢´¿ÂÌÉ«¡¢½ö160KB

vb·­Òë³ÉC#ʱÓö¼ûµÄµÄÂé·³

ADODB.RecordsetÎÒ°ÑËûµ±³ÉDataTableÀ´´¦Àí£¡
¿ÉÊÇËüÓиöADODC.EOF ÊôÐÔ£¬Õâ¸öÎÒÒªÔõôÀ´´¦Àí?
¿´ÄãÊÇÅжÏÓÐûÓÐÐÐÊý£¬»¹ÊÇÅжÏÊÇ·ñµ½ÁË×îºóÒ»ÐÐ
Èç¹ûÅжÏÓÐûÓÐÐÐÊý£¬Ò»°ãÊÇÅжÏBOFºÍEOFÊÇ·ñ¶¼Âú×㣬C#Àï¿ÉÒÔÖ±½ÓÓÃÅжÏRows.Count
Èç¹ûÊÇÅжÏÊÇ·ñµ½ÁË×îºóÒ»ÐУ¬Ò»°ãÊÇÒ»ÐÐÒ»ÐÐÈ¡µÄÇé¿ö£¬ÒòΪVBÀïÊÇ.movefirstÈ»ºó.movenextһֱȡµÄ£¬¶øC#ÀïÃæÄã¿ÉÒÔfor (int i=0;i <XXX.Rows.Count;i++)À´Ñ­»·

VB code:


sSQLcheck = "Select np_Iflight from a_newplan " + lcWhereCheck + " and (np_Istate='Æð·É' or np_Istate='FPL')"

If Objdata.ExecSelect(rsTemp, sSQLcheck, "") Then Exit Sub

If rsTemp.EOF Then

ËýÕâ¶Î´úÂëÊÇÕâÑùµÄ£¬ÄãÈÏΪËûÊÇÅжÏÓÐûÓÐÐл¹ÊÇÅÐ×îºóÒ»ÐУ¿

ÅжÏÊDz»ÊÇÓÐÊý¾Ý £¬ ÓоÍÖ´ÐÐÏÂÃæ¡£¡£¡£


Ïà¹ØÎÊ´ð£º

ÀûÓÃC#±àдtxtת»¯µ½xmlµÄ³ÌÐò

txt ºÍXML ¸ñʽÏàÓ¦
²»½èÖúDataSet
µ¼Èë¶ÁÈ¡TXTÎļþ
È»ºóÖ±½ÓдÈëXML(ͬһÎļþ,²»Í¬Êý¾Ý,µÝÔöÔ­Êý¾ÝûÓб»¸²¸ÇÇé¿öÏÂÔö¼ÓÊý¾Ý.)
½Ì¸öÒªµã»ò×îºÃÊÇÓиö´úÂëÌáʾµÄ
¹ý·ºÃºº °ï¸öæÈö^^
²»»á£¬°ïÂ¥Ö÷ ......

C#·¢Óʼþ21cn

21cnµÄÓÊÏ䣬ÔÚoutlookÅäÖúó¿ÉÒÔÕý³£ÊÕ·¢Óʼþ£¬¿ÉÊÇÎÒдÔÚC#ÖоͲ»ÐУ¬»»³ÉÆäËüÓÊÏ䣬163ºÜÔç×¢²áµÄ¡£¿ÉÒÔ·¢ËÍ¡£²éÁ˺ܾã¬Ã»ÓÐÕÒµ½Ô­Òò£¬Çë¸ßÊÖ°ïæ½â´ð¡£¡£¡£Ð¡µÜ£¬Ð»ÁË¡£¡£´úÂëÈçÏ£º
private void SendMail ......

VBÔõÑù»ñµÃÊó±ê´¦µÄ³¬¼¶Á¬½Ó - VB / »ù´¡Àà

VBÔõÑù»ñµÃÊó±ê´¦µÄ³¬¼¶Á¬½ÓÄØ£¿
  ÔÚWebBrowser¿Ø¼þÖÐÓÐÕâÑùÒ»¸öʼþ:StatusTextChange(index As Integer, ByVal Text As String)
  ËüµÄText²ÎÊýÕýÊÇÊó±ê´¦µÄ³¬¼¶Á¬½Ó,µ«ÎÊÌâÊÇÈç¹ûÎÒµÄä¯ÀÀÆ÷Õýà ......

vbµÄÀàÖÐʹÓÃ×Ô¶¨ÒåÀàÐÍÊý¾ÝµÄÎÊÌâ - VB / »ù´¡Àà


ÎÒÔÚÀàÖÐÓÐÒ»¸öº¯Êý
Public Function DownloadAdditionalSite(SiteName As siteconfig, Directory As String, ymd As String) As Boolean
siteconfigÊÇÎÒ×Ô¶¨ÒåÀàÐ͵ÄÊý¾Ý£¬ÎªÊ²Ã´»áÌáʾ¡°Ö»ÓÐÔÚ¹«¹²¶ÔÏóÄ£¿éÖж ......

vb ÖÐ - VB / »ù´¡Àà

dim a as string,b as string£¬c as string
a="¹¤³Ì±àºÅ,µ¥Î»¹¤³ÌÃû³Æ,·Ö²¿¹¤³Ì±àºÅ"
b="µ¥Î»¹¤³ÌÃû³Æ"
c="µ¥Î»"
Ôõô²ÅÄÜÅжϳöa×Ö·û´®ÖдæÔÚb×Ö·û´®£¬¶ø²»´æÔÚc×Ö·û´®

¿´¿´i ......
© 2009 ej38.com All Rights Reserved. ¹ØÓÚE½¡ÍøÁªÏµÎÒÃÇ | Õ¾µãµØÍ¼ | ¸ÓICP±¸09004571ºÅ