Shamil Salakhetdinov
shamil at smsconsulting.spb.ru
Tue Feb 16 13:48:22 CST 2010
Yes, Doug, That's the old discussion I mentioned. But I do not have that code anymore. It could be somewhere on my old dismounted HDDs but I'm not sure. Thank you. -- Shamil -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Doug Murphy Sent: Tuesday, February 16, 2010 10:32 PM To: 'Access Developers discussion and problem solving' Subject: Re: [AccessD] DBRepair (EatBloat+) Was: Re: AccessD Digest, Vol 84, Issue 23 Does this look familiar. From my archive. -------------------------------------------------------------- Hey, hey... I was just doing this for entertainment value! I don't advocate intellectual property theft, and I take no responsibility for the misuse of this code. Tune in next week for "How to synthesize plastic explosives from ordinary household materials" Brett Barabash, MCP Tappe Construction, Co. Eagan, MN bbarabash at tappeconstruction.com (651) 256-6831 "Any sufficiently advanced technology is indistinguishable from magic." - Clarke's Third Law -----Original Message----- From: Shamil Salakhetdinov [mailto:shamil at smsconsulting.spb.ru] Sent: Friday, May 31, 2002 5:01 PM To: AccessD at databaseadvisors.com Subject: Re: [AccessD] Converting MDE It's very hot Brett! Shamil P.S. But I think you'd better not have posted the code here to not have severe problems with Redmond Police and migthy CIA agents mentioned by David McAfee :) ----- Original Message ----- From: "Brett Barabash" <BBarabash at TappeConstruction.com> To: <AccessD at databaseadvisors.com> Sent: Saturday, June 01, 2002 1:34 AM Subject: RE: [AccessD] Converting MDE > I just tried it here on my end, and I was shocked! You can access all > of an > MDE's collections and properties via automation. Here's an extremely simple > example: > > Public Sub MDEThief() > > Dim objAcc As Access.Application > Dim frm As Form > Dim ctl As Control > Dim prp As Property > > Set objAcc = New Access.Application > objAcc.OpenCurrentDatabase "c:\acc2k\mdetest.mde" > > 'In my MDE, I have a startup form. > 'We could also open another form to grab its properties > Set frm = objAcc.Forms(0) > > For Each ctl In frm.Controls > Debug.Print "*** " & ctl.Name > > For Each prp In ctl.Properties > 'Error # 2187: Propery only available in design view > 'will occur for InSelection control property > On Error Resume Next > Debug.Print prp.Name, prp.Value > Next prp > > On Error GoTo 0 > Debug.Print > Next ctl > > objAcc.Quit > Set objAcc = Nothing > > End Sub > > Brett Barabash, MCP > Tappe Construction, Co. > Eagan, MN > bbarabash at tappeconstruction.com > (651) 256-6831 > > "Any sufficiently advanced technology is indistinguishable from > magic." - Clarke's Third Law > > > > -----Original Message----- > From: Seth Galitzer [mailto:sgsax at ksu.edu] > Sent: Friday, May 31, 2002 3:56 PM > To: AccessD at databaseadvisors.com > Subject: Re: [AccessD] Converting MDE > > > Shamil, > > Heck, I just want to know how you did it. Real tricky, complex > coding, or just something we never thought of before? Can you give an > outline, or will that give too much away? > > Seth > > At 11:58 PM 5/31/2002 +0400, you wrote: > >Well, now it is clear that there is a way to get design of forms and > reports > >out of MDE/ADE for Access97, Access2K and AccessXP (as for ADE I > >didn't yet > >finish the tests but it should work OK I'm quite sure) > > Seth D. Galitzer sgsax at ksu.edu > Computing Specialist http://puma.agron.ksu.edu/~sgsax Dept. of Plant > Pathology phone: (785) 532-1372 Kansas State University fax: (785) > 532-6094 Manhattan, KS 66506 > > This list sponsored by Database Advisors Inc., a worldwide association > of database developers. > Visit http://www.DatabaseAdvisors.com, the database developers' list portal > and support site. > This list sponsored by Database Advisors Inc., a worldwide association > of database developers. > Visit http://www.DatabaseAdvisors.com, the database developers' list portal and support site. This list sponsored by Database Advisors Inc., a worldwide association of database developers. Visit http://www.DatabaseAdvisors.com, the database developers' list portal and support site. This list sponsored by Database Advisors Inc., a worldwide association of database developers. Visit http://www.DatabaseAdvisors.com, the database developers' list portal and support site. -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Shamil Salakhetdinov Sent: Tuesday, February 16, 2010 9:08 AM To: 'Access Developers discussion and problem solving' Subject: Re: [AccessD] DBRepair (EatBloat+) Was: Re: AccessD Digest, Vol 84,Issue 23 <<< This would be an attractive project for me to take on if it would solve problems not just for A2K, but for more recent versions as well. >>> Hi Ken -- You are welcome to implement this functionality as an Access.PowerTools plug-in in one of its future releases if you plan this your tool to be shared on MIT license basis... AFAIKR I have had a discussion here on AccessD or on Access-L(?) quite some time ago - I cannot find it on Internet, which was called "Getting sources from MS Access MDE". The issue was that one of the developers lost their source mdb, and they didn't have resources to purchase a tool extracting/recreating forms' and reports' designs out of mde. And that time I had written a small tool mdb, which did run subject .mde in Automation mode, did open all its forms and reports, and did get forms' and reports' design out of that mde recreated form by form, report by report, control by control - that could have been in some parts similar to your code but I must say I can't find its sources now - they are buried somewhere on my old disconnected HDDs - that code was just creating forms and reports in VBA, extracting their properties by iterating properties collections of forms/reports sections and controls, creating target forms'/reports' sections and controls and assigning properties' values using .add property - something like that relatively simple but efficient - and it did the job well... And I was unaware that time that solution was much closer - as undocumented .SaveAsText feature could have got forms', reports', and macros designs out of .mdes: Access.PoweTools can do that now - just a side effect/benefit feature of this tool. Thank you. -- Shamil -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Kenneth Ismert Sent: Tuesday, February 16, 2010 12:20 AM To: accessd at databaseadvisors.com Subject: [AccessD] DBRepair (EatBloat+) Was: Re: AccessD Digest, Vol 84, Issue 23 Some background on my code, which I called DBRepair: I developed it to clean up a stubbornly corrupted database for a company I previously worked for, and the principals are uncomfortable with the idea of open-sourcing it. However, if I completely rewrote the code under .NET, that would remove any proprietary restrictions. This would be an attractive project for me to take on if it would solve problems not just for A2K, but for more recent versions as well. -Ken -- AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com __________ Information from ESET NOD32 Antivirus, version of virus signature database 4869 (20100215) __________ The message was checked by ESET NOD32 Antivirus. http://www.esetnod32.ru __________ Information from ESET NOD32 Antivirus, version of virus signature database 4871 (20100216) __________ The message was checked by ESET NOD32 Antivirus. http://www.esetnod32.ru -- AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com __________ Information from ESET NOD32 Antivirus, version of virus signature database 4872 (20100216) __________ The message was checked by ESET NOD32 Antivirus. http://www.esetnod32.ru