Why I got this error message while trying to save the records?The field name "STATUS AIR" is a number data type
When I debug, it highlight this line
.Fields("STATUS AIR").Value = Text4.Text
Code:With InfoRS .Fields("TAHUN").Value = Text1.Text .Fields("MUSIM").Value = Text2.Text .Fields("PLOT").Value = Text3.Text .Fields("STATUS AIR").Value = Text4.Text .Fields("PERINGKAT PADI").Value = Text5.Text .Fields("SIPUT GONDANG").Value = Combo1.Text .Fields("RACUN").Value = Combo2.Text .Fields("% RUMPAI").Value = Text8.Text .Fields("PERDU").Value = Text9.Text .Fields("BPH(NIM)").Value = Text10.Text .Fields("BPH(KPK PND)").Value = Text11.Text .Fields("BPH(KPK PNJ)").Value = Text12.Text .Fields("WBPH(NIM)").Value = Text13.Text .Fields("WBPH(DEWASA)").Value = Text14.Text .Fields("KBR").Value = Text15.Text .Fields("KES").Value = Text16.Text .Fields("NEZ").Value = Text17.Text .Fields("BH").Value = Text18.Text .Fields("THRIPS").Value = Text19.Text .Fields("UBG").Value = Text20.Text .Fields("ULD").Value = Text21.Text .Fields("UGD").Value = Text22.Text .Fields("URS").Value = Text23.Text .Fields("MSJ").Value = Text24.Text .Fields("TIKUS").Value = Text25.Text .Fields("HS").Value = Text26.Text .Fields("BLB").Value = Text27.Text .Fields("KRH").Value = Text28.Text .Fields("PMV").Value = Text29.Text .Fields("BAK").Value = Text30.Text .Fields("RT").Value = Text31.Text .Fields("RB").Value = Text32.Text .Fields("BTK PRG").Value = Text33.Text .Fields("RPS").Value = Text34.Text .Fields("E1").Value = Text35.Text .Fields("N1").Value = Text36.Text .Fields("E2").Value = Text37.Text .Fields("N2").Value = Text38.Text .Update End With




Reply With Quote