Boleh nanya gak, If rs1.RecordCount <> 0 Then rs1.MoveLast rs1.MoveFirst For j = 1 To rs1.RecordCount cmbtgl.AddItem "select Tgl from tblJoin1 where Tgl= '" & txtcarinomr.Text & "'", cnJoin, adOpenStatic, adLockOptimistic rs1.MoveNext Next j End If Maksud programnya, bagaimana supaya combo tanggal menampilkan tanggal sesuai NoMR. Mohon koreksinya
===============
<http://geo.yahoo.com/serv?s=97359714/grpId=8332265/grpspId=1705115364/m
sgId=27909/stime=1199553907/nc1=3848640/nc2=5045823/nc3=4990212>
<<image001.jpg>>
