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

vb .netʹÓÃOracleCommand.ExecuteNoquery insertÇë½Ì

ÐèÇó°ÑÁíÒ»¸öÊý¾Ý¿â²éѯ½á¹ûµÄDataSet insertµ½Oracle×ÊÁϿ⡣DataSet°üº¬ÓÐeqp_status, eqp_status_time£¬seq, seq_recipeµÈÀ¸Î»¡£insertÓï¾ä²ÉÓÃBatch·½Ê½£¬²¿·Ö´úÂëÈçÏ£º
'SQL£º
insert into table_a(status, eqp_status_time£¬seq, seq_recipe) values(:pStatus, :pEqpStatusTime, :pSeq, :pSeqRecipe)

'É趨SQL Parameter:
For i = 0 To intQuery - 1
drRow = dsNotExistEqpInfo.Tables(0).Rows(i)
objParam(0) = New DataBase.SqlParameter("pEqpStatus", CStr(drRow.Item("eqp_status")))
objParam(1) = New DataBase.SqlParameter("pEqpStatusTime", CType(drRow.Item("eqp_status_time"), Date))
objParam(2) = New DataBase.SqlParameter("pSeq", CType(drRow.Item("seq"), Integer))
objParam(3) = New DataBase.SqlParameter("pSeqRecipe", CType(drRow.Item("seq_recipe"), Integer))

Me.OraclePis2Connection.ExecuteNonQuery(strSql, objParam)
Next

'´òÓ¡³öÀ´µÄSQLÓï¾ä£º
INSERT INTO C_EQP_EQPX (eqp_status, eqp_status_time, seq, seq_recipe) VALUES ('RUN', 'RUN'Time, '0', '0'Recipe)
ÈçÉÏSQLÓï¾äÖеļӴÖ×ÖÌ壬CType(drRow.Item("eqp_status_time"), Date)='2010/01/01'£¬µ«insertÓï¾äÖÐֵȴΪ'RUN'Time£¬¼´CStr(drRow.Item("eqp_status"))+Time£¬ÇëÎÊ´ó¼ÒÓÐÓöµ½¹ýÕâ¸öÎÊÌâÂð£¿



{{--


Ïà¹ØÎÊ´ð£º

vb¿ÉÒÔÕâÑù×ö²»£¿ - VB / ·Ç¼¼ÊõÀà

¿ÉÒÔÂð
ºÃÆæ¹ÖµÄÌâÄ¿¶î£¡£¡

¿ÉÒÔ¸æËßÎÒÃÇÄãµ½µ×ÏëÎÊʲô £¿

2·Ö¸øÎҵϰ¾Í¿ÉÒÔ¡£

........................¿ÉÒÔÂð

¿ÉÒÔ!


  ¾À½á£¬

29. vb¿ÉÒÔÕâÑù×ö²»£¿ ( H )¡Ì
 A. ......

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


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

vb - VB / »ù´¡Àà

ÔÚvbÖÐÈçºÎ¶ÁÈ¡WordÄÚÈÝ(°üº¬±í¸ñ£¬Í¼Æ¬£¬µÈ£©
¾¹È»²»ÊÇzero¡£

²»ÖªµÀÔõôʵÏֵIJ»ÒªËµ»°

Õâ¸öÖ»ÄܶÁÎı¾,
VB code:
Private Sub Command1_Click()
Dim WordApp As Object
Set WordApp = CreateObject(& ......

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

ÏÖÔÚÎÒÏë¸ù¾ÝtreeviewÉÏÿ¸ö½ÚµãµÄȨÏÞ£¬Ã»ÓÐȨÏ޵Ľڵ㲻Äܱ»Ñ¡ÖУ¬¶øÇҳɻÒÉ«£¬ÔõôʵÏÖ£¬ÔÚÏߵȡ£¡£¡£
Õâ¸ö£¿¡£¡£¡£
Ã²ËÆÃ»·¨¡£
ÊÔÊÔÄܲ»ÄܸÄijЩnodeµÄÑÕÉ«£¬¼Ç¼ÏÂÉϴεÄnodeclickÀïµÄnode¡£
Ï´εã»÷µÄÈç¹ ......

vb - VB / »ù´¡Àà

vbÖÐ ÏÖÔÚÎÒÒª°ÑÊý¾Ý¿âÀï´æ´¢µÄÒ»¸ö¸½¼þµÄÄÚÈÝÌæ»»ÁË£¬Ôõô×ö£¬Ö»ÊÇÌæ»»ÎÒÖ¸¶¨µÄλÖ㬲»ÊÇÈ«²¿Ìæ»»
Ç뽫ÎÊÌâ˵Ã÷°×£¬´æ´¢×ֶθñʽ£¬Èç¹ûÊÇBinary¸ñʽµÄ±È½ÏÂé·³£¬Èç¹ûÊÇ×Ö´®£¬Ö±½ÓÌæ»»¡£×îºÃ²»Òª½øÐÐÖ¸¶¨Î»ÖÃÌæ»»¡ ......
© 2009 ej38.com All Rights Reserved. ¹ØÓÚE½¡ÍøÁªÏµÎÒÃÇ | Õ¾µãµØÍ¼ | ¸ÓICP±¸09004571ºÅ