Recent content by prometro

Clarification : Althought database is working perfect on Win XP (Office 2002), ... the same database on Win 10 (Office 2016) is not showing reports correctly. And this is the problem. Do anyone know solution?

Hi, thank you for reply. I am not sure if I understand you ... Office 2016 version is for me little bit different and my experience is lower then befre 10 years ... in appex I put screen. Did you mean this?

Hi, I really need help. Before 10 years I did database in Access XP (2002) and it works fine. Now I have newer comupter (Win 10, Access 2016) ... and the same database on it work fine except for one thing - Reports are not showing corretly. In appex you find two reports from the same file...

Hi Fran Lombard, thank you for reply, yes I tested MultiSelect - Simple and also Extended. Error appears in both choices ... your test was ok? But I did change - at the end of the procedure I added reload of source : Me.se1.RowSource = "SELECT t1.id, t1.polozka FROM t1" Me.se1.Requery ...

Dear BlueIshDan, Yes I tried it, deleting is working fine, but as I said, error appears only in one situation. Maybe I didnt explain it correctly because my english ... So I prepared pdf document with explanation ... in appendix. Please, look at it. Thank you Jiri

I did it, but problem i still the same. Please, look at the code below. I recognize that problem appears only in one situation : When I mark the last and the last but one item in the listbox and then run delete process. Both items are deleted without problem. But when I mark the last item in...

Thak you for reply! Do you mean replace : SQL = "DELETE '*' FROM [t1] WHERE [id] = " & .ItemData(i) & " ;" with "DELETE '*' FROM [t1] WHERE [id] = " & .ItemData(.ItemsSelected(i)) & " ;" ? I tryied it and it is not working ... did I some mistake?

Hi, in appendix is .mdb file with this thema. Inside you can find one form with listbox (with multi selecting ability). I use this code : Dim strSQL As String Dim i As Variant With Me.se1 For Each i In .ItemsSelected SQL = "DELETE '*' FROM [t1] WHERE [id] = " &...

Ok Galaxiom, thank you for help! Have nice weekend. Jiri

Hi, thanks for reply, ... yes, I need to learn CSS ... I have "visuallightbox" program installed on pc. This program can edit *.jpg. You choose the colour of background of your webpage and it will add rounded corners with this colour to every choosen jpg file. So it was my wish to create this...

Hi, is there some possibility to edit jpg file and do rounded corners via access vba? I can use command line of Irfanview for copy, resize, etc.of jpeg but I dont know how to do rounded corners ... Does anyone have experience? Thank you Jiri

Hi, I think I got it! : Now it is working, I hope that there will not be other problems :) Thank you guys! Private Sub Pøíkaz0_Click() Dim db As DAO.Database Dim r1 As DAO.Recordset Dim r2 As DAO.Recordset Dim aaaa, tex1, tex2 As String Set db = CurrentDb Set r1 = db.OpenRecordset("SELECT...

Thank you for your replies! Code is working now, but result is : AAA(aaa1,aaa2,aaa3) ; BBB(aaa1,aaa2,aaa3) ; CCC(aaa1,aaa2,aaa3). And I need : AAA(aaa1,aaa2,aaa3) ; BBB(bbb1,bbb2) ; CCC So CJ_London you are right that is necessary to put r2 openrecordset line to within the r1 loop ... And I...

Hi everyone! Iam trying to find answers for maybe simple thing but with no results yet ... I you can help me it will be great! Thanks! Jiri I have two tables : TAB1 : id filedX 1 AAA 2 BBB 3 CCC TAB2 : id fieldY fieldZ 1 aaa1 AAA 2 aaa2 AAA 3 aaa3 AAA 4 bbb1...

Hi, I have question about do right query and then report. In past I did tables for menus like this : id ; colours ; red ; light red id ; colours ; red ; dark red id ; colours ; green id ; colours ; blue id ; food ; fruit ; apple id ; food ; fruit ; .... id ; food ; vegetables ; carrots etc...