Actually I was surprised today when I saw this, please check both scenarios:
In one scenario Call addone(i) it transmit I as reference in another one addone(i) - ByVal
Sub Click(Source As Button)
Dim i As Integer
Dim j As Integer
i = 1
For j = 0 To 10
Call addone(i) | addone(i)
Next
Print "i = " & i
End Sub
Sub addone(i As Integer)
i = i + 1
End Sub
Wednesday, December 10, 2008
Monday, December 01, 2008
MS ListView Control in LN
In one of our project we used MS ListView Control to show the data in one table. So here what we did. If you want try this approach also, you should do next steps:
Go to designer, create new form
click on menu: Create\Object and choose MS ListView Control.
Set name to this object and then you can do what you wish with this control, some code:
Go to designer, create new form
click on menu: Create\Object and choose MS ListView Control.
Set name to this object and then you can do what you wish with this control, some code:
Dim control As Variant
Dim lwItem As Variant
Set control = source.getObject("ListView")
Set lwItem = control.ListItems.add(1, "a1", "fio2", 0)
Set lwItem = control.ListItems.add(2, "a2", "fio3", 0)
Set lwItem = control.ListItems.add(3, "a3", "fio4", 0)
Set lwItem = control.ListItems.add(4, "a4", "fio5", 0)
Call control.refresh()
Tuesday, November 11, 2008
Full Text message: Work area overflown due to many hits
Found strange error today in log database
Actually for some reason (I did not figure why) symbols - , ; : \ are the reasons of error in FTSearch. So I changed query a bit to avoid such situation and it worked well after all.
GTR search error for "D:\Domino\data\mydatabase.ft\ftgi": Work area overflown due to many hits. Error-Number = 299: Full text error; see log for more information
The error occurs when I did NotesDatabase.FTSearch(query, 0)
query = (([Form]="AgrAddon") & ( ([AgrDate]=08.07.2005 & [AgrAddonDate]=25.06.2008 & !([AgrAddonNum]=("-" | "/")) )))
I've found that this problem happens because of this part of query:
[AgrAddonNum]=("-" | "/")Actually for some reason (I did not figure why) symbols - , ; : \ are the reasons of error in FTSearch. So I changed query a bit to avoid such situation and it worked well after all.
Wednesday, November 05, 2008
Defer index creation until first use + ENABLE_ON_DEMAND_COLLATIONS=1
In case if we would like to use "Defer index creation until first use" option in columns, we have to remember that it works only in case if Administrator set ENABLE_ON_DEMAND_COLLATIONS=1 in notes.
Thursday, October 23, 2008
Just found the test-exams for Lotus Notes R7
http://dpastov.googlepages.com/
btw, does somebody have free tests for Lotus Notes R8 ? :-)
btw, does somebody have free tests for Lotus Notes R8 ? :-)
Subscribe to:
Posts
(
Atom
)