Click here to Skip to main content
11,812,712 members (68,726 online)
Rate this: bad
Please Sign up or sign in to vote.
See more: VB6 Access ListView
Private Sub CmbItem_LostFocus()
If CmbItem = Empty Then Exit Sub
CmbCode.ListIndex = CmbItem.ListIndex
CmbUnit.ListIndex = CmbItem.ListIndex
End Sub

I'm using this code to set (Id) and (Unit) fields on selection of (Item) field.
[1] I can't use .itemdata coz it gives error "OVERFLOW"...(actually item field is loaded about 26000 records n have to show in combo datz y)

[2] I can't put(aid)in the text for each (item) it gives error "SYNTAX ERROR"...(many of items are like(ex. STEEL CUPBOARD 5') so
sql="SELECT *FROM [ASSET] WHERE Item = "'CmbItem.text'"
not working
so anybody is having any other way to do so I mean I want to add (Id) without displaying it...

Please help me...
Posted 16-May-13 0:03am

1 solution

Rate this: bad
Please Sign up or sign in to vote.

Solution 1

not sure what you're trying to do but....
sql="SELECT *FROM [ASSET] WHERE Item = "'CmbItem.text'" 
should be
sql="SELECT * FROM [ASSET] WHERE Item = '" & CmbItem.text & "'" 

Note the single quote and double quotes, plus the & is missing
Not sure if that was a typo or the problem with the sql statement.....

This content, along with any associated source code and files, is licensed under The Code Project Open License (CPOL)

  Print Answers RSS
0 Abhinav S 270
1 CHill60 180
2 KrunalRohit 154
3 Palash Mondal_ 145
4 Sergey Alexandrovich Kryukov 140
0 OriginalGriff 3,877
1 KrunalRohit 2,496
2 CPallini 2,240
3 Maciej Los 2,205
4 ppolymorphe 1,750

Advertise | Privacy | Mobile
Web02 | 2.8.151002.1 | Last Updated 4 Jul 2013
Copyright © CodeProject, 1999-2015
All Rights Reserved. Terms of Service
Layout: fixed | fluid

CodeProject, 503-250 Ferrand Drive Toronto Ontario, M3C 3G8 Canada +1 416-849-8900 x 100