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

ÈçºÎÔÚVB³ÌÐòÀï Ò»´ÎÊäÈë¶à×éÊý¾Ýµ½Êý¾Ý¿âÀï


    Call ConnectDB1
    If connect = True Then
                strsql = vbNullString
                strsql = strsql & "INSERT INTO TB_Event(dsEventTime, dsRecordTime,dschild,dsparent, DSBS, DSDIS, DSRP, DSBL,  DSACT_O, DSACT_A, DSACT_T) values ('" & EventTime & "', sysdate,17140,17140, 1, 1, 1,1,2,1,3 )"
             
DBCon.Execute strsql
DBRec0.Close

Else
        MsgBox "DB ¿¬°á ½ÇÆÐ !!!", 16, "È®ÀÎâ"
        Exit Sub
    End If
   
    DBCon.Close¡£
ÎÊÌâÈçÌâÄ¿£¬£¨MSGBOXµÄÂÒÂë²»Óùܣ¬VALUEµÄֵûÓдíÎó£©
³ÌÐòµÄÎÊÌâ 1 ÔËÐеÄʱºò ³ö´í£¬ÔÚDBCon.Execute strsqlÕâ¸öµØ·½
2.ÎÒÖ±½ÓÔÚÊý¾Ý¿âÀï²åÈëµÄʱºò ÿ´ÎÖ»ÄܲåÁËÒ»×飬ÎÒÏëÒ»´Î²åÈë3000×é Ôõô½â¾ö
1, EventTime ÊÇʲôÊôÐÔ£¿
2£¬ informixÀïÓà ¡®£»¡¯·Ö¿ª¡£

Ñ­»·²åÈë.Ñ­»·µÄÌõ¼þµÃÄã×Ô¼º¶¨

ÒýÓÃ
1, EventTime ÊÇʲôÊôÐÔ£¿
2£¬ informixÀïÓà ¡®£»¡¯·Ö¿ª¡£

EventTime = Format(Now, "yyyy-mm-dd hh:nn:ss")  ,2 ÄãÄܲ»ÄÜ˵µÄ¾ßÌåµã

ÒýÓÃ
Ñ­»·²åÈë.Ñ­»·µÄÌõ¼þµÃÄã×Ô¼º¶¨
ÎÒ²»»áÑ­»·²åÈë ËùÒÔÎʵġ£¡£¡£


Ïà¹ØÎÊ´ð£º

¡¾¼±Çó¡¿VBÖÐʹÓÃWScriptµ÷ÓÃÍⲿÃüÁî - VB / »ù´¡Àà

ÔÚÏÂÊÇvbµÄÐÂÊÖ£¬Ïëд¶Î³ÌÐò£¬ÔÚvbÖУ¬Ê¹ÓÃwscriptµ÷ÓÃһЩÍⲿµÄÃüÁµ«ÊdzÌÐòÖ´ÐÐÒ»Ö±ÓдíÎó£¬Çë¸÷λ¸ßÊÖ°ïæ½â´ðÏ£¬Ð»Ð»¡£
´úÂëÈçÏ£º
VB code:

Private Function getFile_CMD(filename, filepath) As Bo ......

ÇóÖú£ºVBµ÷Óö¯Ì¬¿âÎÊÌâ - VB / »ù´¡Àà

¸÷λ´óϺ£º
  ÎÒÊǸÕѧVB£¬ÏÖÔÚÏëÓÃVBµ÷ÓÃÒ»¸ö¶¯Ì¬¿â£¬¶¯Ì¬¿âÀïÃæÓкܶຯÊý¡£ÎÒÖªµÀʹÓÃVBµ÷Óö¯Ì¬¿âµ÷Óú¯Êý£¬ÐèÒª½«Òªµ÷Óõĺ¯ÊýÔÚ³ÌÐòÖÐÉùÃ÷¼´¿É£¬µ«ÊÇÀïÃæÓкܶຯÊý£¬²»»áÿһ¸öº¯Êý¶¼ÒªÉùÃ÷°É¡£Çë¸ ......

Vb.net Access CrystalReport - .NET¼¼Êõ / VB.NET

µÚÒ»´Î½Ó´¥CrystalReport
¼±Ñ°ÕÒVb.net Access ͨ¹ý²éѯ³öµÄÊý¾ÝÊä³öµ½CrystalReportµÄÀý×Ó.
ÓеÄÅóÓÑÂé·³·¢À´Ñ§Ï°.¶àл!
¸úÄãµÄÒªÇó²î²»¶à£¬²Î¿¼Ò»Ï£º
http://topic.csdn.net/u/20090823/21/87af02d3-f4ca-480 ......

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


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

VB µ÷Óà vc ±àдµÄdll - C/C++ / C++ ÓïÑÔ

ÓÃvc±àдµÄdllÔÚdebugģʽºÍreleaseģʽÏÂÆô¶¯vbµÄexe³ÌÐòµ÷ÓÃvcµÄdll¿ÉÒԵõ½ÕýÈ·½á¹û£¬µ«ÊÇÈç¹ûÖ±½ÓË«»÷vbµÄexe³ÌÐòµ÷ÓÃdll±¨´í£¬ÔÚdllÄÚ²¿Ìí¼Ómessageboxºó·¢ÏÖÖ»ÒªÔÚº¯ÊýÄÚ²¿ÉùÃ÷std::stringÀàÐ͵ıäÁ¿¾Í»á³öÏÖÄ ......
© 2009 ej38.com All Rights Reserved. ¹ØÓÚE½¡ÍøÁªÏµÎÒÃÇ | Õ¾µãµØÍ¼ | ¸ÓICP±¸09004571ºÅ