access 表單存資料

各位大大好

小弟是access新手,爬了好多文實在沒有辦法才來求救,先謝謝大大的協助!

小弟的問題是:

利用表單A查詢資料表A的資料,

而表單A中有設定了2個下拉式選單以及2個文字方塊,

接著選擇後下面的表格會自己更新搜尋的資料。

但問題來了,搜尋完後,

小弟想把『下拉式選單的值、文字方塊、搜尋到的資料』存到新的『資料表B』,

但不曉得怎麼寫或怎麼設定才能把這些資料一併儲存到資料表B呢?

拜託各位大大解答~

Update:

感謝葉大這麼盡力在幫小弟,附上小弟歪七扭八的程式碼...還望大大指錯...

Dim C As String

Dim Datetime As String

Dim E As String

Dim F As String

Dim People As String

Dim INTStr As String

Dim UPDstr As String

C = Me.Combo19.Text '類別

Datetime = Me.日期.Text '日期

E = Me.Combo21.Text '腔調

F = Me.次數.Text '次數

People = Me.Combo23.Text

Update 3:

Else

UPDstr = "update 發稿記錄 where 類別='" & C & "'and ..

CurrentDb.Execute (UPDstr)

End If

Update 5:

感謝葉大! 終於成功了! 謝謝您!

Comments

  • 你好,

    要把查詢出來的資料另存在一個資料表,一定要用到SQL語法去執行,因為你查出來的資料是經過篩選,所以要一個變數存取你的條件,再給 INSERT INTO 用,所以你先設一個變數

    dim strSQL as string

    把你的查詢語法給這個

    但我無法知你的資料表及表單如何操作,無法告知你接下來如何操作,,

    如果有問題再提出來

    2014-08-04 18:58:28 補充:

    查詢時,有二種方式,

    一是做一個查詢,把所要的參數寫入去,這個方式是最快的,如你用此方式,你可以去看一下查詢的SQL語法,,你用此來源去INSERT INTO 另一個資料表,

    dim mySQL as string

    mySQL = "INSERT INTO 資料表2(欄一,欄二,欄三) " & _

    " SELECT 欄一,欄二,欄三 FROM 資料表1 WHERE " & 接你所下的條件

    CurrentDb.Execute (mySQL)

    如果你有寫錯,執行當然會出現錯誤,但你如果寫錯了資料庫看不懂的語法,當然都不動了,你試看看吧,

    2014-08-05 06:25:41 補充:

    我不知你後面...是什麼,也許寫對.要全部給我才看的出來

    INTStr = "insert into 發稿記錄 (類別,腔調) " & _

    " values('"& Me.Combo19 &"','"& Me.Combo21 &"',)"

    CurrentDb.Execute (INTStr)

    這樣才對

    2014-08-05 07:44:06 補充:

    更正

    INTStr = "insert into 發稿記錄 (類別,腔調) " & _

    " values('"& Me.Combo19 &"','"& Me.Combo21 &"')"

    CurrentDb.Execute (INTStr)

  • 網上看了這家,因為我公司的硬碟故障,微軟的張經理都找過他們,把他們送去內湖救不出來的,都給救出來

    http://www.datamaster.com.tw/

    http://millerforyew1.pixnet.net/blog/

  • >這家不錯 lv333。cC買幾次啦真的一樣

    乌卐儷

Sign In or Register to comment.