|
campbells wrote: On Error Resume Next
This is why VB sucks
campbells wrote: Do
On Error Resume Next
If rr![NO] = ldono.Caption Then
If rr![item] = item.Caption Then
temp = rr![item]
rr.MoveNext
End If
End If
Loop Until (rr.EOF)
Two conditions need to be met on every iteration, otherwise your code will just get stuck until the end of time, I see no code to guarentee that you'll keep moving through the DB until the end, every time.
Christian Graus - Microsoft MVP - C++
Metal Musings - Rex and my new metal blog
|
|
|
|
|
ok i think i have solve the error, but i didnt get the result i want ...
any suggestion?? i have an idea is it possible to use SQL?? but i not sure how to edit it with my code...
cause seem like the computer didnt refer the bill no to increase the item number properly.
My idea was:
temp = rr![item] where dono.Text = rr![NO] (where i think this may specific the location which data to refer..)
Anyone can help me modify my logic to proper coding???
Orginal coding:
If dono.Text = rr![NO] Then
Do
temp = rr![item]
rr.MoveNext
Loop Until (rr.EOF)
item.Caption = Val(temp) + 1
End If
|
|
|
|
|
What is it that you are trying to do?
You are looping throught the values only to get the last value. Why don't you reverse the sorting and get the first value instead?
---
b { font-weight: normal; }
|
|
|
|
|
I wanna get the last value contain in the databse then Increase value when i add new item. u know wat i mean??
Like the record now have 1,2,3 item in bill no1, when i add item the item NO will become 4.
Same for my bill no2 will be the same also start from 1,2,3.
but now my bill no2 have continue start the number form bill no1. which is 4,5,6 ... i want to make it restart to from 1.
|
|
|
|
|
Get the highest number for that bill from the database then. SQL example:
"select max(ItemNumber) as Highest from Items where BillNumber = 2"
---
b { font-weight: normal; }
|
|
|
|
|
campbells wrote: temp = rr![item] where dono.Text = rr![NO]
This isn't possible in VB6, or VB.NET 2002, 2003, or 2005. Something like this will show up in the LINQ extensions to C# and VB.NET.
If you're looking for the next highest number, why no get it from the database?? If that field is Auto Incremented, the database keeps track of this for you.
Dave Kreskowiak
Microsoft MVP - Visual Basic
|
|
|
|
|
yes i finding the highest number but according to the specific number only but it not working, my coding like.. did not check the bill no but it just get the highest number in any of those bill...
like Bill no1 have item 1,2,3.
when i create the bill no2 suppose when i add item it will become first "1" for the first time but it goes to number "4"
do u get wat i mean??
|
|
|
|
|
You're not getting what we're telling you. You don't have to track the bill number yourself. The database can do it for you! If your bill number field in the database is an Auto number field, it will track when the next number is supposed to be for you.
Dave Kreskowiak
Microsoft MVP - Visual Basic
|
|
|
|
|
my access databse dont track for me, and i increse the value myself in vb.
unless u tell me there is wat to do it.
I have 2 table, 1 is the "bill record" and sales "item record" which it refer to to wat item customer bought from bill record.
The "bill record" have unique have No. but the "item record" dont have , so everything will junk in there. like it may have bill no1- candy-$1, no1-chocolate-$2.
and i dont undertsnad wat u mean auto number field, i using data grid and i didnt see the function for it to auto field in number itself.
|
|
|
|
|
AutoNumber is in the Access database table definition, not is Visual Studio, VB.NET, or the DataGrid. Each table should have its own Primary key, which is usually an AutoNumber field.
Dave Kreskowiak
Microsoft MVP - Visual Basic
|
|
|
|
|
ya i did put primary key but not sure wat u trying to tell me.
|
|
|
|
|
Go into Access and Design your database table. When you define the fields of your table, one of the field type options, the column after your field name, is AutoNumber.
Dave Kreskowiak
Microsoft MVP - Visual Basic
|
|
|
|
|
is it possible to set the data grid when user click on the column it will do ascending sort or descending sort?
|
|
|
|
|
Yes. How it's done depends greatly on the version of VB or VB.NET you're using.
Dave Kreskowiak
Microsoft MVP - Visual Basic
|
|
|
|
|
i'm using VB6, but i didnt found the function on the properties...
|
|
|
|
|
It's been 6 years since I've used VB6...Let me see...IIRC, the VB6 DataGrid doesn't have any support built in for sorting. I think you had to sort the ADODB.RecordSet you bound the grid to. There was a Sort property on the Recordset object that you set something like this:
myRecordSet.Sort = "LastName ASC, FirstName ASC, Age DESC"
My VB6 is pretty rusty so don't take this as The Official Word...
Dave Kreskowiak
Microsoft MVP - Visual Basic
|
|
|
|
|
Hello.
Basically I am trying to modify mouse events in a VB web browser. My first goal was to try and make a right click on the AxWebBrowser control to act as a left click. So both mouse buttons would act as left click. Yet when I was messing with some code it seems AxWebBrowser doesnt have MouseEvents ?
This is the code I am using to detect a mouse click on the control, but I get error!
Private Sub AxWebBrowser1_MouseDown(ByVal sender As Object, ByVal e As System.Windows.Forms.MouseEventArgs) Handles AxWebBrowser1.MouseDown
If e.Button = MouseButtons.Right Then
'do something
End If
End Sub
Any information on trying to work with mouse events and a web control would be nice.
Thanks
|
|
|
|
|
This won't do what you want it to anyway. You can't change the mouse click inside the event handler. The mouse "event", message really, will still get passed to the Browser as a right-click.
The only place you can change buttons clicked on is using a global mouse hook. You have to change the mouse message BEFORE your application ever gets it.
-- modified at 23:17 Tuesday 15th August, 2006
Dave Kreskowiak
Microsoft MVP - Visual Basic
|
|
|
|
|
Hey all 
I'm confused here. I have an mdi application which will recognize keystroke that i hit. However, it seems to recognize the hit when it's first time loaded. After that, if I switch the focus to another window, it wont recognize the hit anymore. How can I make it recognize the hit everytime it's got focus?
Thanks
|
|
|
|
|
Try using event Got focus... on that other form...
|
|
|
|
|
I did, it doesn't work 
|
|
|
|
|
What do you mean by "if I switch the focus to another window"?? If this means what it should, then the form won't see any keystrokes until it has the focus returned to it. Are you saying that the form won't see keystrokes when the form has focus again??
Dave Kreskowiak
Microsoft MVP - Visual Basic
|
|
|
|
|
Yes, you are correct.
Let's say you open the application, then, you open internet explorer (example). You go back to the application, then the keystrokes won't be recognized.
This happens if I open an mdi child too. After i closed the child, the the parent wont see the keystrokes anymore.
Did i mention this is MDI application. :P
Thank you
|
|
|
|
|
I haven't seen this problem myself and I can't find any information on it either. It could be caused by something you have installed on the machine.
When you close the child windows, does the MDI form show that it got the focus? The title bar of the window should turn Blue again.
Dave Kreskowiak
Microsoft MVP - Visual Basic
|
|
|
|
|
2 situations here.
First one, is when i have 2 mdi children.
I tried to test it by putting the following code on 1 mdi child form.
me.text = "deactive"
in my onDeactivated event.
and
me.text = "active"
in my onActivated event.
When I choose another mdi child, The Text changed to deactive, but when I switch back to the first mdi child, the text doesnt change back to active.
Second, With the MDI Container itself. I tried the same method, on the mdi container
I opened another application, and choose that application, the text on the mdi container is change to deactive, and when i switch back to the MDI application, the text changed to active again  .
However, it still doesn't recognize the keystroke. I think it's not the focus that we're talking about here. I dunno what it is, but it sure is weird -_-
thanks
|
|
|
|
General 
News 
Suggestion 
Question 
Bug 
Answer 
Joke 
Praise 
Rant 
Admin 
Submit an article or tip
