fanhuynet > 08-05-11, 01:49 PM
haquocquan > 10-05-11, 01:28 PM
Private Sub Luu_Click()
Dim rs as RecordSet
Set rs = currentdb.OpenRecordset("thongtin",dbopendynaset)
rs.addnew
rs!TENSV = me.cboTENSV
rs!TENSACH = me.cbotensach
rs!SOLUONG = me.cbotensach.column(1)
rs.Update
rs.close
set rs=nothing
End Sub
vuon_muom > 10-05-11, 09:21 PM