sql Update語¾ä錯誤
sql Update語¾ä錯誤
´ú碼ÈçÏ£º
Dim rs As ADODB.Recordset
Dim sql2 As String
If Trim(BarCode.Text = "") Then '掃Ãè條碼¿ò為' ',Ìáʾ
MsgBox "ûÓÐ掃Ãè條碼£¬ÇëÖØÐÂ掃Ã裡", vbOKOnly + vbExclamation, "¾¯¸æ"
BarCode.SetFocus
ElseIf Trim(Len(BarCode.Text) <> 16) Then '掃Ãè條碼長¶È²»ÊÇ16個×Ö·û,Ìáʾ"掃Ãè條碼長¶È錯誤£¬請ÖØÐÂ掃Ãè條碼£¡"
MsgBox "掃Ãè條碼長¶È錯誤£¬請ÖØÐÂ掃Ãè條碼£¡", vbOKOnly + vbExclamation, "¾¯¸æ"
BarCode.SetFocus
BarCode.Text = "" '"Barcode"Çå¿Õ
Exit Sub
Else
&nbs
Ïà¹ØÎÊ´ð£º
ÎÒÓõÄÊÇmysql5.1£¬Êý¾Ý¿â×Ö·û¼¯Îªutf8
ͨ¹ýdosÃüÁîÐе¼ÈëSQLÎļþ ³ö´í£¬ÎÞ·¨µ¼Èë¡£
½«SQLÎļþÖеÄÊý¾ÝÈ«²¿Ê¹ÓÃÓ¢ÎÄ ¿ÉÒÔµ¼Èë
ÇëÎÊÎÊÌâÔÚÄÄ£¿
×°¸öÖÐÎÄÈí¼þ¼´¿É.
ºÜ¶àÄêÒÔǰ,Óùý¸öÒ»¸ ......
DateTime startTime=DateTime(em_1.Text)
DateTime endTime=DateTime(em_2.Text)
string sql
sql = dw_1.GetSQLSelect()+"Where (StartTime> '"+startTime+"') and (EndTime ......
Ö´ÐеÄ˳Ðò£º
1£©Îļþä¯ÀÀ¿ò£¨Ñ¡ÔñÎļþʹÓã©
Ñ¡ÔñºÃÎļþºó
µã»÷Ò»¸öµ¼Èë°´Å¥µÄʱºò £¬°ÑÉÏÃæÉÏ´«¿òÀïµÄcsvÎļþÒÔÒ»¸öIDΪÎļþÃû£¬ÉÏ´«µ½**/**Îļþ¼ÐÏÂ
2£©¶ÁÈ¡Õâ¸öÎļþ¼ÐϵÄcsvµÄÎļþ£¬×ª»»³Ésql
3 ......
ÒÑÖª´ÓB,±íÖÐÕÒ³öID, NAMEÁ½ÏîÓëC±íÏàͬµÄÊý¾Ý£¬ÔÙÒÀ¾ÝB±íÖо¹ý²éѯ³öÀ´µÄID,CODEÁ½ÏîÊý¾Ý²éѯÓëA±íID,CODEÁ½ÏîÏàͬµÄÊý¾ÝÖжÔÓ¦µÄEMAILÀ´£¬²¢ÁгöÈçÏÂD±íµÄÐÎʽ£¬²»ÖªÎÒÊÇ·ñ±íʾÇå³þ£¿Âé·³°ïÎÒÁÐһϹ«Ê½ºÃÂð£¿Íò· ......
ÔÚsqlÖÐʹÓÃoutputºÍ²»Ê¹ÓõÄÇø±ð£¿
ÀýÈ磺
ALTER PROCEDURE [dbo].[sp_1]
@SYS_LNNO varchar(20),
@SYS_CALLER varchar(20),
@SYS_ORGANIZE varchar(10), ......