lazada.co.id

Monday 31 October 2011

menyimpan VB6

Posted by Unknown | Monday 31 October 2011 | Category: |

With Adodc1.Recordset
If isi = True Then
.AddNew
.Fields("field") = Text1.Text
.Fields("field") = DTPicker1
.Update
Else
.Fields("field") = Text1.Text
.Fields("field") = DTPicker1
.Update
End If
End With

Currently have 0 comments:


Leave a Reply

Popular Posts