ÔÚaccessÖ÷´°ÌåµÄ×Ó´°ÌåÖиüÐÂÕûÁÐÊý¾Ý
ÈçÌ⣬Ö÷´°ÌåÓÐÒ»×éºÏ¿Ø¼þ¡°²úÆ·Ðͺ𱣬µ±µ¥»÷Ëü¸üÐÂʼþºó£¬×Ó´°Ìå»áÏÔʾ£º²úÆ·ÐͺŠӢÎÄÃû³Æ ÓÃÁ¿£¬ÈçÏ£º
²úÆ·ÐͺŠӢÎÄÃû³Æ ÓÃÁ¿
1100022 SPRING PIN 3*16L
1100173 RESET KIA7027AP(600J)
1100191 BEARING 2210HH
1100318 SPRING PIN 3*20L
1100342 OSCILLATOR CST4.00MTW
1100591 E-RING-ETW-9
1100725 FK24Y5V1H104Z
1101282 WORM SHAFT
´ËʱÓÃÁ¿Îª¿ÕÊÇÓÃÀ´ÊäÈëÊýÁ¿µÄ£¬ÎÊÌâÊÇ£ºµ±ÊäÈëºÃÊýÁ¿ºó£¬ÔٴθüС°²úÆ·Ðͺš±£¬ÒªÇóÓÃÁ¿µÄÕûÁÐΪ¿Õ£¬¸ÃÔõôд£¿
currentdb.execute "update table1 set ÓÃÁ¿=null"
ÎÒÒ²ÊÇÓöµ½ÕâÑùµÄÒ»¸öÎÊÌ⣬¾ÍÊǸüÐÂÁËÊý¾Ý±íÖ®ºó£¬ÈçºÎ¶ÔÔ×Ó´°Ìå½øÐÐˢУ¿½«×Ó´°ÌåÉèΪdatasheet£¬ÖØÐÂÉèÖòéѯÌõ¼þÖ®ºó£¬Ò»°ãÎÒ¶¼Òª°ÑÊó±êÔÚ±í¸ñÖеãһϣ¬È»ºó²ÅÄܵõ½Ë¢ÐºóµÄ½á¹û¡£ÓÃʲôʼþ»¹ÊÇ¿ØÖÆ·½·¨¿ÉÒÔË¢ÐÂ×Ó´°Ì壿
try:
×Ó´°Ìå.requery
Private Sub ²éѯ´úÂë_AfterUpdate()
Dim rs As Object
Set rs = Me.Recordset.Clone
rs.FindFirst "[²úÆ·ÐͺÅ] = '" & Me![²éѯ´úÂë] & "'"
Me.Bookmark = rs.Bookmark
Me.Refresh
CurrentDb.Execute "update ²úÆ·¹
Ïà¹ØÎÊ´ð£º
access ÖÐÖ´ÐÐsql updateÓï¾äʱÓÐʱºò³É¹¦ÓÐʱºò²»³É¹¦£¬µ«ÊÇaccessÖв»³ö´íÎóÐÅÏ¢£¬²»ÖªµÀÊÇʲôÔÒò£¬ÓÐÄÄλ´óÏÀÖªµÀ£¬Çë°ïæ°¡
ÌùSQLÓï¾ä£¬¼ì²é±í¡¢×ֶεÄÓÐЧÐÔÉèÖÃ
sql ÔÚ²éѯ·ÖÎöÆ÷ÀïÃæ Ö´ÐкÜÕý³£
ÊÇ ......
ÕâÁ½Ììѧϰ¡¶Delphi¼¼Êõ·½°¸±¦µä¡·Ò»ÊéÖеÚÈýÕ¹ØÓÚÓû§µÇ¼·½°¸µÄÀý×Ó£¬ÀûÓõÄÊÇSQl ServerÊý¾Ý¿âʵÏÖÓû§µÇ¼£¬±àÒëÔËÐж¼Ã»ÎÊÌ⣬¸ÃʵÏֵŦÄÜÒ²¶¼ÊµÏֵĺܺ㬵«ÊÇÆæ¹ÖµÄÊÇ£¬·´¸´ÔËÐÐÒ»¶Îʱ¼äºó£¬ÓÐʱÔڹرÕÕû¸ö ......
ÈçºÎ½«ExcelÊý¾Ýµ¼ÈëAccessÊý¾Ý¿â?,
±íÃû:crk
²»¶¥²»ÐÐ
excel¿ÉÒÔÖ±½Ó×÷ΪÊý¾Ý¿â²Ù×÷
ʹÓÃADOÈ»ºó¸ã½øÈ¥
procedure TExInput.Excel1Click(Sender: TObject); //ʵÏÖExcelµ¼ÈëSQL
var
& ......
ÈçºÎ½«ExcelÊý¾Ýµ¼ÈëAccessÊý¾Ý¿â?
±íÃû:crk
End_rbody_60447848//-->
¸Ã»Ø¸´ÓÚ2009-10-19 10:44:48±»¹ÜÀíԱɾ³ý
¶ÔÎÒÓÐÓÃ[0]
¶ª¸ö°åש[0]
ÒýÓÃ
¾Ù±¨
¹ÜÀí
TOP
......