Search:

Dear friends.... I re-wrote part of code for ListView1_DblClick event and everything works fine now. Instead to call ListView1_Click inside of DblClick I simply copied ListView1_Click code inside...

Well.... the error is triggered by this code


Set rs22 = New ADODB.Recordset
Dim sql2 As String

sql2 = "SELECT * FROM baza_receptura WHERE nazvanje = " &...

szlamany



It is a breakpoint made from debugger itself after error occurred.




yes

szlamany



I have the same opinion and therefore I'll shange code a little bit. I intend to re-write ListView1_dblclick subroutine avoiding to call ListView1_click.



Debug.Print...

I beg you for patience, please. I have no idea which variables to check. If you suspect on some of them, please write and I'll do that.

I'm sure that the problem will be solved soon. I'll write...

DataMiser
I appreciate your help to me (and not only to me) very much.

You didn't read (I think) at the beginning of this thread that in debugger everything is working fine. Even the previous...

When I click slowly on newly added listitem, everything is working fine. If I do that faster, I get error on line 231.

DataMiser



Yas... the whole module is a little bit messy. Text in bold-italic is quite possible.



As I told before, there's a lot of crap code here. I'm creating database connection in...

line 221 and line 274 as local variables

string2klik is the same as lblKliknutoNa

here is that place:

lblKliknutoNa.Caption = frmViewer.ListView1.ListItems(HTI.iItem + 1).SubItems(2)

I'm using SubItems(2) as the source for queries

When I create a copy of listitem new listitem (copy) arrives at the bottom of the list. But... label which keeps value needed for string2klik keeps old value. After that, if I double click on the...

:):):)

Obviously, the parameter (variable) string2klik didn't get new value.

I've never thought about that, to be honest. But you're right. Removing this line of code problem with deleting is solved.
:)

I have "only" two problems yet ))))

this peace of code isn't a bad idea, generally. This way we can avoid database error. But... what to put instead of Msgbox? How to force the query to return something? :)

in the case of 3 LV items it shows:

Debug.Print indx=3
Debug.Print ListView1.ListItems.Count=3

Debug.Print ListView1.ListItems.Count=2

That means, everything is fine

it calls subroutine for updating ListView1. I've sent the source code of it in the post #24

The breakpoint is triggered and listitem is removed correctly. It is some kind of mystery. During debugging everything is working fine ))))
No errors shown.

I'm trying to be as much cooperative as I can. I appreciate your good will to help me but I can't understand what you wanted from me in posts #20 and #22.

I've copied the whole source related...

DataMiser
Maybe you didn't see but in the post #28 i wrote that code in line 238 generates EOF error.
Obviously, clicking on ListView, it checks database and try to fil txtNaziv.Text =...

:) You didn't sleep well last night, I can see
Not a listbox but listview.
1) Yes. That line exists (33)
2) Many things I already did without success. As the result of that you can see meny...

txtNaziv.Text = rs2.Fields(4).Value

This line (231) generates error related with EOF

Doogle
There's a lot of crap code here, don't pay attention on that for now.

That's the main logic of this module. There's a lot of code for context menu handling but the rest is devoted to TreeView and ListView control.

Public Sub apdejtujGlavniLV()

Dim con33 As ADODB.Connection
Dim rs33 As ADODB.Recordset

Set con33 = New ADODB.Connection
con33.CursorLocation = adUseClient
con33.Open...

Option Explicit


Dim con As ADODB.Connection
Dim rs As ADODB.Recordset
Dim rs2 As ADODB.Recordset
Dim rs22 As ADODB.Recordset

Private sngListViewX As Single
Private sngListViewY As Single

Here's the actual source code

http://www.mediafire.com/?26zu52rnb12kgst

It is impossible to understand the problem while you can't see how the program works.... I can send many posts here...

Dear friend, I did that many times before I decided to ask for the help here. The program generates error with EOF and I can't catch why.....

no....... they didn't disappear.... unfortunately. In the first moment it looked like that. In any case, this loop work better now.

OMG... sounds funny but when I changed for..next loop with this:

Do While Not rs33.EOF
rs33.MoveNext
Loop

errors related with the EOF disappeared!! I didn't know that Recordcount can...

DataMiser, thank you very much in any case
!
I'll try to concentrate myself on this part of code. The problem which you showed isn't a real problem. I simply translated some variables in English to...

I've decided to ask you for help because this problem stays unsolved for more than a month.

It is impossible to solve this without to see whole code. All of us like snippets but sometimes is...

I already told, it is impossible o solve this problem without to se how it works. Therefore I uploaded source for the module together with its database.

http://www.mediafire.com/?73mjm9911kcz2j2
...

I still think that the problem is with the database, not with ListView itself. Program works with only one record in the recordset and possibly that produces errors after adding or deleting. I'm not...

Doogle

I've tried your suggestions with ORDER BY, didn't help ((((

Well, if someone is interested in, I can send source on e-mail address (plz write me on PM). Many things which you mentioned above is more the question of syntax. I know, it is a bit hard to discuss...

.SubItems(2) always matches. That's for sure. It gets value from LV and ask for a record in my database.

I only can't understand why LV control make changes (in the cese of deletion) after we...

LaVolpe, thank you for the response!
I'll try to explain a bit




lblSel.Caption ih sere instead of a global variable. It contains a ListView subitem value which is used for selecting of item...

I’ve spent whole 3 days to resolve a problem in my program. I still didn’t do that and therefore I decided to ask here for help.

-My program have TreeView and ListView control. After selecting an...