2013-06-11 89 views
0

對壞的英語語法表示歉意:這是一本圖書銷售數據庫,我在更新「庫存」字段時出現了一些問題 - 書籍(book_id,價格,庫存)表格 - 「銷售」表單中的值是「銷售」形式中出售多少種圖書(book_id,數量)的子形式。 請幫忙,謝謝帶有子表單值的更新表

+0

好吧,所以你有一個表格「銷售」和一個子表格稱爲「?」。你有什麼問題?你如何填充子表單? – Grant

+0

你的英語比我的非英語好。 :o)但我仍然不明白你在問什麼?你是否試圖用書中銷售表中的「qty」更新書籍表中的「庫存」? –

+0

子表格稱爲「sale_details」 - book_id,數量。例如「book1」的庫存爲100,「book2」爲200,我從「book1」出售20,從「book2」出售10到「customer1」,那麼我的庫存就會變成這樣:「book1」80和「 book2「是190 _ @milad moafi –

回答

1

更新時間:

如果要編輯的記錄,你會做這樣的事情:

'this will create the recordset variable and a string variable 
Dim myR As Recordset 
Dim strSQL as String  

'to find the record you want to edit use this and then set your recordset to this query 
strSQL = "Select * From Books Where book_id = '" & Me.Book_I_Want_To_Edit_Field & "'" 

'make the table strSQL your table to work with 
Set myR = CurrentDb.OpenRecordset(strSQL, dbOpenDynaset) 


'you can set your subform fields or controls here 
Me.Sales_Details.Form.Field_in_subform_to_edit = MyR![Inventory] 

'you need this to edit it 
myR.Edit 

'Modify everything here with vba 

'then update it 
myR.Update 

'clear the variable 
Set myR = Nothing 

讓我知道如果這樣的事情會幫助或者如果您需要我來更新它。

+0

我知道如何更新字段,添加一些記錄,使用VBA執行SQL和...但我無法寫入那SQL查詢 - @milad Moafi –

+0

我的道歉,看到更新的代碼。 – Grant

+0

謝謝@milad moafi –