aku kan punya satu app vb dan satu dbase access
Privatesub command1_click()
Adodc1.RecordSource = "Select date, loadnum, process, material, location,
distance, hl1, hl2, hl3, hl4, hl5, hl6, hl7, hl8 from mapping"
Adodc1.Refresh
Adodc1.Recordset.AddNew
Adodc1.Recordset![Date] = Text1.Text
Adodc1.Recordset![loadnum] = Text2.Text
Adodc1.Recordset![process] = Text3.Text
Adodc1.Recordset![material] = Text4.Text
Adodc1.Recordset![location] = Text5.Text
Adodc1.Recordset![distance] = Text6.Text
Adodc1.Recordset![hl1] = Text7.Text
Adodc1.Recordset![hl2] = Text8.Text
Adodc1.Recordset![hl3] = Text9.Text
Adodc1.Recordset![hl4] = Text10.Text
Adodc1.Recordset![hl5] = Text11.Text
Adodc1.Recordset![hl6] = Text12.Text
Adodc1.Recordset![hl7] = Text13.Text
Adodc1.Recordset![hl8] = Text14.Text
Adodc1.Recordset.Update
end sub
gimana supaya nggak ke save data yang sama ya, kalo dengan cara ini bakalan ada
banyak yang sama, kalo misalnya sebelum nya aku salah input terus ke save ...
makasih atas bantuan nya ...
____________________________________________________________________________________
Never miss a thing. Make Yahoo your home page.
http://www.yahoo.com/r/hs
[Non-text portions of this message have been removed]
