Application with VSFlexGrid1 in VB6
Dear Sir, Sorry for again with same question, before I say anything I will submitt to you my Command what I use I think its a better way to solve my problem.
MySql = "select * from _ Location where ItemNo"
If MyItem.state = 1 Then _ MyItem.Close
MyiTem.Open MySql, Data, asOpenKeyset, adLockOptimistic
if MyItem.Recordcount > 0 Then
MyItem.Movefirst
VsflexGrid1.Rows = 1
Do While Not MyItem.EOF
VsFlexGRId.AddItem MyItem!Location & Chr(9) & MyItem!Locdesc & Chr(9) & MyItem!PickingSequence & (9) & MyItem!Active & Chr(9) & MyItem!Used & Chr(9) & MyItem!Qtyonhand & Chr(9) & MyItem!Qtyonorder & Chr(9) & MyItem!QtySaleonder & Chr(9) & MyItem!Costunit & Chr(9) & MyItem!StdCost & Chr (9) & MyItem!Recentcost & Chr(9) & MyItem!Lastcost & Chr(9) & MyItem!avgcost & Chr(9) & MyItem!Qtyavailable & Chr(9) & MyItem!Qtycommit
MyItem.MoveNext
Loop
End If
Thanks for your co-operation to me to Progress.
thanks a lot
Rash
Software/Hardware used:
Software/Hardware used:
ASKED:
May 27, 2009 8:35 AM
UPDATED:
May 27, 2009 3:30 PM
Answer Wiki:
Last Wiki Answer Submitted:
Be the first to answer this question.
To see all answers submitted to the Answer Wiki: View Answer History.
This question is related to this one.