Roberto Ford Long
rford at terra.com.br
Fri Jun 6 09:56:31 CDT 2014
Hi Bill. Maybe this small program can help. http://accesssvn.codeplex.com/ It saves all from database to a txt files, and can reload then and recreate a database. It's very slow to process tables. Regards, Roberto. Em 06/06/2014 11:33, Bill Benson escreveu: > Not sure (cannot check right now) but, I tried using SET and got the same > error. > > I am since giving up because I cannot get all of the database objects > described enough within non-database files on disk to recombine and rebuild > it without either copying from an old database or using transferdatabase to > import objects from the old data base. > > I was looking for a way to rebuild a database from text files then grab > properties. > On Jun 6, 2014 8:53 AM, "Charlotte Foust" <charlotte.foust at gmail.com> wrote: > >> Connection is an object, but connection string is a property. Did you get >> that? >> >> Charlotte >> >> >> On Thu, Jun 5, 2014 at 6:13 PM, Bill Benson <bensonforums at gmail.com> >> wrote: >> >>> I am trying to recreate a new database in the image of an existing >>> database. >>> So I have saved all the objects in the model database as text, and I plan >>> to >>> import all those objects into the new database. Before doing so, I want >> to >>> capture all of the properties of the model database, and recreate them in >>> the new database. Below is the code I have tried to use, but I am hitting >>> some properties that will not allow me to get their values into the >> array, >>> such as "Connection". That property seems to exist, have a type = 0, but >>> the >>> value cannot be obtained. I am not sure I can create it in the new >> database >>> - nor really whether I should have to. >>> >>> For Each Prp In ModelDb.Properties >>> iUB = UBound(VarPrp, 2) + 1 >>> If iUB = 1 Then >>> ReDim VarPrp(1 To 3, 1 To iUB) >>> Else >>> ReDim Preserve VarPrp(1 To 3, 1 To iUB) >>> End If >>> >>> VarPrp(1, iUB) = Prp.Name >>> VarPrp(2, iUB) = Prp.Type >>> >>> ''''GETTING ERROR HERE >>> ''''Operation is not supported for this type object >>> ''''Note that Prp.Name = "Connection >>> VarPrp(3, iUB) = Prp.Value >>> '''' >>> '''' >>> Next >>> >>> >>> Essentially, I cannot load up all the properties of the ModelDB into an >>> array, which is what I am trying to do. >>> >>> Help?! >>> >>> -- >>> 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 >>