Oh iy, ternyata cuma kurang ketelitian aja y...Makasih banyak y mas sistyo...Makasih banget..
--- Sistyo Alfan Tribowo <[EMAIL PROTECTED]> wrote: > Hapus & _ Sebelum rsCheck.MoveNext > > > > _____ > > From: [email protected] > [mailto:[EMAIL PROTECTED] > On Behalf Of Hasan > Sent: Tuesday, April 18, 2006 8:55 AM > To: [email protected] > Subject: [Programmer-VB] Tolongin dong.... > > > > Rekans... > Saya mi minta tlg neh..,kenapa y script berikut sll > klr error "Expected Function Or Variable", pdhl > diatasnya msh ada script lg, tp die sll aja lgs > error, > jadi kesannya die ga baca script yg > diatasnya....,tlg > y rekans,bantu saya..,ini scriptnya : > Set rsCheck = New ADODB.Recordset > rsCheck.Open "select * from pickdetail where > orderkey='" & txtwho.Text & "' ", con, adOpenDynamic > Do Until rsCheck.EOF > lot = Trim(rsCheck!lot) > loc = Trim(rsCheck!loc) > qty = Trim(rsCheck!qty) > Dim rslotx As New ADODB.Recordset > Set rslotx = New ADODB.Recordset > rslotx.Open "select * from lotxlocxid where > lot='" & lot & "' and loc='" & loc & "'", Cn > qtyAll = rslotx!QtyAllocated > qtyAll = qtyAll - qty > Cn.Execute " Update lotxlocxid set > qtyallocated='" & qtyAll & "' where " & _ > " lot='" & lot & "' and loc='" & > loc & "' " & _ > rsCheck.MoveNext > Loop > > Yang diblok selalu rsCheck.movenext... > Thanx... > Hasan > > __________________________________________________ > Do You Yahoo!? > Tired of spam? Yahoo! Mail has the best spam > protection around > http://mail.yahoo.com > > > Wahana Programmer Groups Links > > > > > > > > > _____ > > YAHOO! GROUPS LINKS > > > > * Visit your group "Programmer-VB > <http://groups.yahoo.com/group/Programmer-VB> " on > the web. > > * To unsubscribe from this group, send an email to: > [EMAIL PROTECTED] > <mailto:[EMAIL PROTECTED]> > > > * Your use of Yahoo! Groups is subject to the > Yahoo! > <http://docs.yahoo.com/info/terms/> Terms of > Service. > > > > _____ > > __________________________________________________ Do You Yahoo!? Tired of spam? Yahoo! Mail has the best spam protection around http://mail.yahoo.com Wahana Programmer Groups Links <*> Untuk mengunjungi sponsor milis ini, klik link berikut: http://wahanaprogrammer.net <*> Untuk menghubungi owner milis ini, kirim email ke: [EMAIL PROTECTED] <*> Konsultasi pemrogramman bisa chat disini: Yahoo! Messenger: wahanaprogrammer Yahoo! Groups Links <*> To visit your group on the web, go to: http://groups.yahoo.com/group/Programmer-VB/ <*> To unsubscribe from this group, send an email to: [EMAIL PROTECTED] <*> Your use of Yahoo! Groups is subject to: http://docs.yahoo.com/info/terms/
