Accessת³ÉMSSQLºó²éѯ³öÏÖ´íÎó
´íÎóÀàÐÍ£º
Microsoft OLE DB Provider for SQL Server (0x80040E14)
³ý·Çͬʱָ¶¨ÁË TOP£¬·ñÔò ORDER BY ×Ó¾äÔÚÊÓͼ¡¢ÄÚǶº¯Êý¡¢ÅÉÉú±íºÍ×Ó²éѯÖÐÎÞЧ¡£
/cnblms/index_2/Order_show.asp, µÚ 94 ÐÐ
ÉÏÃæÊÇä¯ÀÀÆ÷¸ø³öµÄ´íÎó¡£ÎÒÊǵÚÒ»´ÎתÊý¾Ý¿â£¬Óöµ½ÕâÖÖÇé¿ö»¹Õæ²»ÖªµÀÔõôÏÂÊÖ£¬ÍøÉÏÓкö඼³öÏÖÁËÕâÑùµÄ´íÎ󣬿ÉÎÒ¿´¿´²»ÏñÎÒÕâÖÖ¡£
ÇóÄÄλºÃÐÄÈ˸ø³ö³ö×¢Ò⣡£¡
Ìù³ö´úÂ룺
SQL code:
sqlOrder1 ="SELECT Top 1 A.ProductionID, A.ProductionNO, A.Title, A.Price,A.Price1, A.Unit,O.OrderNO,O.OrderID,O.UpdateTime,"
sqlOrder1 = sqlOrder1 & "O.PaymentMode, O.Num, O.UserID, A.Price*O.Num AS [Count],A.Price1*O.Num AS Count1,O.Memo, U.UserName,U.TrueName,U.MobilePhone,U.Phone,U.Address "
sqlOrder1 = sqlOrder1 & "from (Production AS A INNER JOIN [Order] AS O ON A.ProductionID = O.ProductionID) "
sqlOrder1 = sqlOrder1 & "INNER JOIN [User] AS U ON (U.UserID = O.UserID) WHERE A.Deleted=0 AND O.OrderNO ='"& OrderNO &"' Order by O.OrderID desc"
Set rsOrder1 = server.CreateObject("Adodb.recordset")
rsOrder1.open sqlOrder1,conn2,1,1
sqlOrder2 = "Select Sum(Count) AS Total,Sum(Count1) AS Total1 from ("
sqlOrder2 = sqlOrder2 & "SELECT A.ProductionID, A.ProductionNO, A.Title, A.
Ïà¹ØÎÊ´ð£º
ACCESSÊý¾Ý¿âÖÐÓÐÒ»¸ötablename±í£¬Éè¼ÆÈçÏÂ
±àºÅ,ÊéÃû,×÷Õß,³ö°æÊ±¼ä,³ö°æÉç,ISBN,Ŀ¼,¼ò½é
ÆäÖгý¡°±àºÅ¡±Îª×Ô¶¯±àºÅÍ⣬ÆäËü¶¼Îª¡°±¸×¢¡±
ÆäÖÐ"±àºÅ"άһ£¬ÔÚ¡°ISBN¡±ÖÐÓеÄΪ¿ÕÖµ£¬ ......
ÕâÁ½Ììѧϰ¡¶Delphi¼¼Êõ·½°¸±¦µä¡·Ò»ÊéÖеÚÈýÕ¹ØÓÚÓû§µÇ¼·½°¸µÄÀý×Ó£¬ÀûÓõÄÊÇSQl ServerÊý¾Ý¿âʵÏÖÓû§µÇ¼£¬±àÒëÔËÐж¼Ã»ÎÊÌ⣬¸ÃʵÏֵŦÄÜÒ²¶¼ÊµÏֵĺܺ㬵«ÊÇÆæ¹ÖµÄÊÇ£¬·´¸´ÔËÐÐÒ»¶Îʱ¼äºó£¬ÓÐʱÔڹرÕÕû¸ö ......
DbgridÁ¬½Óaccess ÏÔʾÊý¾ÝʱÍ϶¯¹ö¶¯ÌõËÀ»ú£¿Ôõô½â¾ö°¡£¿
»úÆ÷Ì«²îÁ˰ɣ¿
ÊDz»ÊÇÄãÊý¾ÝÁ¿Ì«´óÁ˰¡
ÄãÊý¾ÝÉÙһЩ¿´¿´»¹ËÀ»úÂð£¿
Êý¾ÝºÜÉÙ°¡ ¾ÍÒ»Ò³¡£
ÎÒÔÚBCB6ÏÂ×ö¹ý²»ÉÙ DBGRID+ACCESS £¬´ÓÀ´Ã»ÓÐÓöµ½ ......
win2000ϵͳADOÁ¬½ÓACCESSÊý¾Ý¿â±ØÐèÒª½øÈë×ÀÃæÂð?
ÎÒÓÐÒ»¸ö×°ÁËwin2000-SP4µÄ»ú×Ó,ÒÑ×°ÁËMDAC 2.8 ,дÁ˸öwindows·þÎñ³ÌÐòÊÇÓÃADO²Ù×÷ACCESSÊý¾Ý¿âµÄ,Ææ¹ÖµÄÊÇ´ò¿ªÊý¾Ý¿âÎļþʱ,±ØÐèÒªµÇ¼µ½×ÀÃæ²ÅÄÜÕý³£´ò¿ ......
delphi 2007 + access 2007 +odbc +TADODataset,TADOConnection,TADOCommand
//ɾ³ýÊý¾Ý
procedure TCDSSelectTools.DeleteMachine(byMachineID: string);
tmpCmd := TADOCommand.Create(ni ......