From artful at rogers.com Thu Jan 1 04:06:11 2004 From: artful at rogers.com (Arthur Fuller) Date: Thu, 1 Jan 2004 02:06:11 -0800 Subject: AW: [AccessD] Hiding Main Access Window In-Reply-To: <1292795.1072863925548.JavaMail.www@wwinf3004> Message-ID: <030501c3d04e$eda25090$6701a8c0@rock> One way to do this is to create an image file having the same name as your application MDB but with a different extension and place it in the same directory as the MDB. Access will load this image instead of its native logo. I have never tried to create a one-pixel image file but I'm guessing that it would work too. Arthur -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of paul.hartland at fsmail.net Sent: Wednesday, December 31, 2003 1:45 AM To: Access Developers discussion and problem solving Subject: Re: AW: [AccessD] Hiding Main Access Window Sorry but I don?t think I have explained correctly, when you first open Access that?s the screen I want to hide I know I can hide database windows etc from Tools/StartUp. Lets say we go to START/PROGRAMS and click on Microsoft Access and you get the blank access screen from which you can creat a new database, open existing etc. That?s the screen I want to hide, the actual Access screen. Sorry for any confusion. Paul Hartland Message date : Dec 31 2003, 09:39 AM >From : Helmut Kotsch To : Access Developers discussion and problem solving Copy to : Subject : AW: [AccessD] Hiding Main Access Window Paul, that's easy, even I can answer this one. Tools => Start..=> uncheck the "Show Database Window" Checkbox. I took this info from my installed German version of Access 2000, hope I translated the fieldnames alright. Regards and have a nice day. Helmut Kotsch -----Urspr?ngliche Nachricht----- Von: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]Im Auftrag von paul.hartland at fsmail.net Gesendet: Mittwoch, 31. Dezember 2003 10:17 An: accessd Betreff: [AccessD] Hiding Main Access Window To all, I?m sure I have seen this somewhere but can?t for the life of me remember where, I have an Access 2000 application that a few people have a shortcut to on their machines, which when opened opens the main Access window (as usual) and a switchboard. Is there anyway I can hide the main Access window so that the application looks similar to a Visual Basic application ? Thanks in advance for all your help. Paul Hartland Freeserve AnyTime - HALF PRICE for the first 3 months - Save ?7.50 a month www.freeserve.com/anytime _______________________________________________ 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 Freeserve AnyTime - HALF PRICE for the first 3 months - Save ?7.50 a month www.freeserve.com/anytime _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From andy at minstersystems.co.uk Thu Jan 1 07:05:44 2004 From: andy at minstersystems.co.uk (Andy Lacey) Date: Thu, 1 Jan 2004 13:05:44 -0000 Subject: [AccessD] Happy New Year - was Your contact info In-Reply-To: <3FF2F7BF.25733.17E6C8A@localhost> Message-ID: <00e601c3d067$f78540e0$b274d0d5@minster33c3r25> You're right Bryan it was 8pm here, but we managed a bevy or two before we hit the hay around 3 after a rousing chorus of Auld Lang Syne. Start the new year as you mean to go on, I say. Happy New Year to everyone. Andy Lacey http://www.minstersystems.co.uk > -----Original Message----- > From: accessd-bounces at databaseadvisors.com > [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of > Bryan Carbonnell > Sent: 31 December 2003 21:22 > To: Access Developers discussion and problem solving > Subject: Re: [AccessD] Your contact info > > > On 31 Dec 2003 at 16:10, William Hindman wrote: > > > ...not to bang on him too hard Andy but this has happened before > > Not picking on you William, you just happen to be the last in line > > I have also contacted him and am still waiting for a reply. I have a > gut feeling that this was an automated post from Plaxo. > > Don't worry, the mods are on it, so can we drop it. If any decisions > are to be made, your wonderful mod team will take care of it. > > Everyone have a safe and Happy New Year. > > BTW Andy, what are you doing posting at 8 pm on New Years Eve? > Shouldn't you be out enjoying a beverage or 3? > > > ...nice guy but its not his first time around the block with this > :( > > True, but still no reason for derogatory spelling comments either. I > can't spell worth a darn myself. > > -- > Bryan Carbonnell - carbonnb at sympatico.ca > Never let a computer see you hurry. > > > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com > > From mastercafe at ctv.es Thu Jan 1 13:29:40 2004 From: mastercafe at ctv.es (MastercafeCTV) Date: Thu, 1 Jan 2004 20:29:40 +0100 Subject: AW: [AccessD] Hiding Main Access Window In-Reply-To: <030501c3d04e$eda25090$6701a8c0@rock> Message-ID: <000c01c3d09d$9a4df8f0$69fa2250@servercafe> Efectivelly we take a BMP file with same name that application (mdb/mde) and in the same directory that this and supply the main Access warning for our logo. Thanks Arthur great information. Juan Menendez =========================================== MASTERCAFE SL - NIF B-82.617.614 www.mastercafe.com Deleg. Asturias Tel 985.88.49.44 / 627.531.764 Fax 627.500.205 info at mastercafe.com juan at mastercafe.com Deleg. Madrid Tel 627.474.285 cecilia at mastercafe.com =========================================== -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Arthur Fuller Sent: jueves, 01 de enero de 2004 11:06 To: 'Access Developers discussion and problem solving' Subject: RE: AW: [AccessD] Hiding Main Access Window One way to do this is to create an image file having the same name as your application MDB but with a different extension and place it in the same directory as the MDB. Access will load this image instead of its native logo. I have never tried to create a one-pixel image file but I'm guessing that it would work too. Arthur -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of paul.hartland at fsmail.net Sent: Wednesday, December 31, 2003 1:45 AM To: Access Developers discussion and problem solving Subject: Re: AW: [AccessD] Hiding Main Access Window Sorry but I don?t think I have explained correctly, when you first open Access that?s the screen I want to hide I know I can hide database windows etc from Tools/StartUp. Lets say we go to START/PROGRAMS and click on Microsoft Access and you get the blank access screen from which you can creat a new database, open existing etc. That?s the screen I want to hide, the actual Access screen. Sorry for any confusion. Paul Hartland Message date : Dec 31 2003, 09:39 AM >From : Helmut Kotsch To : Access Developers discussion and problem solving Copy to : Subject : AW: [AccessD] Hiding Main Access Window Paul, that's easy, even I can answer this one. Tools => Start..=> uncheck the "Show Database Window" Checkbox. I took this info from my installed German version of Access 2000, hope I translated the fieldnames alright. Regards and have a nice day. Helmut Kotsch -----Urspr?ngliche Nachricht----- Von: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]Im Auftrag von paul.hartland at fsmail.net Gesendet: Mittwoch, 31. Dezember 2003 10:17 An: accessd Betreff: [AccessD] Hiding Main Access Window To all, I?m sure I have seen this somewhere but can?t for the life of me remember where, I have an Access 2000 application that a few people have a shortcut to on their machines, which when opened opens the main Access window (as usual) and a switchboard. Is there anyway I can hide the main Access window so that the application looks similar to a Visual Basic application ? Thanks in advance for all your help. Paul Hartland Freeserve AnyTime - HALF PRICE for the first 3 months - Save ?7.50 a month www.freeserve.com/anytime _______________________________________________ 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 Freeserve AnyTime - HALF PRICE for the first 3 months - Save ?7.50 a month www.freeserve.com/anytime _______________________________________________ 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 From jwcolby at colbyconsulting.com Thu Jan 1 14:12:48 2004 From: jwcolby at colbyconsulting.com (John W. Colby) Date: Thu, 1 Jan 2004 15:12:48 -0500 Subject: [AccessD] test Message-ID: John W. Colby www.ColbyConsulting.com From starkey at wanadoo.nl Thu Jan 1 15:56:16 2004 From: starkey at wanadoo.nl (StaRKeY) Date: Thu, 1 Jan 2004 22:56:16 +0100 Subject: [AccessD] test In-Reply-To: Message-ID: test ok:-) -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of John W. Colby Sent: donderdag 1 januari 2004 21:13 To: AccessD Subject: [AccessD] test John W. Colby www.ColbyConsulting.com _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com --- avast! Antivirus: Outbound message clean. Virus Database (VPS): 30-12-2003 Tested on: 1-1-2004 22:56:16 avast! is copyright (c) 2000-2003 ALWIL Software. http://www.avast.com From wdhindman at bellsouth.net Thu Jan 1 16:11:58 2004 From: wdhindman at bellsouth.net (William Hindman) Date: Thu, 1 Jan 2004 17:11:58 -0500 Subject: [AccessD] test References: Message-ID: <000a01c3d0b4$46519bf0$6101a8c0@dejpolsys> ...test originator not ok :) William Hindman - Next Year In The Free State! ----- Original Message ----- From: "StaRKeY" To: "Access Developers discussion and problem solving" Sent: Thursday, January 01, 2004 4:56 PM Subject: RE: [AccessD] test > test ok:-) > > -----Original Message----- > From: accessd-bounces at databaseadvisors.com > [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of John W. Colby > Sent: donderdag 1 januari 2004 21:13 > To: AccessD > Subject: [AccessD] test > > > > > John W. Colby > www.ColbyConsulting.com > > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com > > > --- > avast! Antivirus: Outbound message clean. > Virus Database (VPS): 30-12-2003 > Tested on: 1-1-2004 22:56:16 > avast! is copyright (c) 2000-2003 ALWIL Software. > http://www.avast.com > > > > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com > From jwcolby at colbyconsulting.com Thu Jan 1 16:19:49 2004 From: jwcolby at colbyconsulting.com (John W. Colby) Date: Thu, 1 Jan 2004 17:19:49 -0500 Subject: [AccessD] test In-Reply-To: <000a01c3d0b4$46519bf0$6101a8c0@dejpolsys> Message-ID: LOL. Better than some... After that it's the percentages that matter. John W. Colby www.ColbyConsulting.com -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of William Hindman Sent: Thursday, January 01, 2004 5:12 PM To: Access Developers discussion and problem solving Subject: Re: [AccessD] test ...test originator not ok :) William Hindman - Next Year In The Free State! ----- Original Message ----- From: "StaRKeY" To: "Access Developers discussion and problem solving" Sent: Thursday, January 01, 2004 4:56 PM Subject: RE: [AccessD] test > test ok:-) > > -----Original Message----- > From: accessd-bounces at databaseadvisors.com > [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of John W. Colby > Sent: donderdag 1 januari 2004 21:13 > To: AccessD > Subject: [AccessD] test > > > > > John W. Colby > www.ColbyConsulting.com > > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com > > > --- > avast! Antivirus: Outbound message clean. > Virus Database (VPS): 30-12-2003 > Tested on: 1-1-2004 22:56:16 > avast! is copyright (c) 2000-2003 ALWIL Software. > http://www.avast.com > > > > _______________________________________________ > 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 From wdhindman at bellsouth.net Thu Jan 1 16:35:55 2004 From: wdhindman at bellsouth.net (William Hindman) Date: Thu, 1 Jan 2004 17:35:55 -0500 Subject: [AccessD] test References: Message-ID: <000801c3d0b7$9f0540a0$6101a8c0@dejpolsys> ...hey, as long as you can still laugh, eh? :) ...hope you and Mary and the kids had a good xmas and New Years :) William Hindman - Next Year In The Free State! ----- Original Message ----- From: "John W. Colby" To: "Access Developers discussion and problem solving" Sent: Thursday, January 01, 2004 5:19 PM Subject: RE: [AccessD] test > LOL. Better than some... After that it's the percentages that matter. > > John W. Colby > www.ColbyConsulting.com > > -----Original Message----- > From: accessd-bounces at databaseadvisors.com > [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of William > Hindman > Sent: Thursday, January 01, 2004 5:12 PM > To: Access Developers discussion and problem solving > Subject: Re: [AccessD] test > > > ...test originator not ok :) > > William Hindman > - Next Year In The Free State! > > > ----- Original Message ----- > From: "StaRKeY" > To: "Access Developers discussion and problem solving" > > Sent: Thursday, January 01, 2004 4:56 PM > Subject: RE: [AccessD] test > > > > test ok:-) > > > > -----Original Message----- > > From: accessd-bounces at databaseadvisors.com > > [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of John W. Colby > > Sent: donderdag 1 januari 2004 21:13 > > To: AccessD > > Subject: [AccessD] test > > > > > > > > > > John W. Colby > > www.ColbyConsulting.com > > > > _______________________________________________ > > AccessD mailing list > > AccessD at databaseadvisors.com > > http://databaseadvisors.com/mailman/listinfo/accessd > > Website: http://www.databaseadvisors.com > > > > > > --- > > avast! Antivirus: Outbound message clean. > > Virus Database (VPS): 30-12-2003 > > Tested on: 1-1-2004 22:56:16 > > avast! is copyright (c) 2000-2003 ALWIL Software. > > http://www.avast.com > > > > > > > > _______________________________________________ > > 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 > > > > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com > From jwcolby at colbyconsulting.com Thu Jan 1 19:17:43 2004 From: jwcolby at colbyconsulting.com (John W. Colby) Date: Thu, 1 Jan 2004 20:17:43 -0500 Subject: [AccessD] Where do they store the toolbar info Message-ID: I am going through a database I inherited trying to make the thing look and act consistent. One thing that I am running across is that some forms have toolbars on such as "web design", "Form view" etc. If you go to design view / properties / others, there is no toolbar in any of the toolbar properties on this tab. This is something that has always puzzled me and I never really ever figured out. This (what toolbars are being displayed) is "context sensitive", i.e. if you click in the menu at the top of a form while in view mode (not design view) and select a toolbar from the menu that appears, then close the form, the form "retains" that toolbar as it opens next time. That is simply nuts to me, who wants the form design toolbar viewable to the user just because you used it yourself? Anyway, where the ^%*&^%(*^) is this stuff stored? Does anyone have code to go find and get rid of these things throughout an application (all forms). I'm currently opening every form and if they have any of these menus, right clicking on the top, unselecting the menu and saving (closing) the form which gets rid of it... until the next time it is closed with one of these menus selected. Help!!! John W. Colby www.ColbyConsulting.com From davesharpe2 at cox.net Thu Jan 1 19:28:44 2004 From: davesharpe2 at cox.net (Dave Sharpe) Date: Thu, 1 Jan 2004 20:28:44 -0500 Subject: [AccessD] Where do they store the toolbar info References: Message-ID: <005501c3d0cf$c3779e70$dd2f0a44@bcsext6137> John I've never worked in this area but the document below (" Programming in MS Access using Macros and Toolbars ") http://home.twcny.rr.com/accesssig/MS%20Access%20Macros.pdf might be of assistance Dave ----- Original Message ----- From: "John W. Colby" To: "AccessD" Sent: Thursday, January 01, 2004 8:17 PM Subject: [AccessD] Where do they store the toolbar info I am going through a database I inherited trying to make the thing look and act consistent. One thing that I am running across is that some forms have toolbars on such as "web design", "Form view" etc. If you go to design view / properties / others, there is no toolbar in any of the toolbar properties on this tab. This is something that has always puzzled me and I never really ever figured out. This (what toolbars are being displayed) is "context sensitive", i.e. if you click in the menu at the top of a form while in view mode (not design view) and select a toolbar from the menu that appears, then close the form, the form "retains" that toolbar as it opens next time. That is simply nuts to me, who wants the form design toolbar viewable to the user just because you used it yourself? Anyway, where the ^%*&^%(*^) is this stuff stored? Does anyone have code to go find and get rid of these things throughout an application (all forms). I'm currently opening every form and if they have any of these menus, right clicking on the top, unselecting the menu and saving (closing) the form which gets rid of it... until the next time it is closed with one of these menus selected. Help!!! John W. Colby www.ColbyConsulting.com _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From accessd at shaw.ca Fri Jan 2 05:58:26 2004 From: accessd at shaw.ca (Jim Lawrence (AccessD)) Date: Fri, 02 Jan 2004 03:58:26 -0800 Subject: [AccessD] Where do they store the toolbar info In-Reply-To: Message-ID: Hi John: I am not sure whether this is the case but when ever I have had some custom tool bars, all have been implemented through macros. (The only place in which I use those things.) There is a way to do in A2000 plus, through a 'command' code but I have never bothered to researched it myself. HTH Jim -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of John W. Colby Sent: Thursday, January 01, 2004 5:18 PM To: AccessD Subject: [AccessD] Where do they store the toolbar info I am going through a database I inherited trying to make the thing look and act consistent. One thing that I am running across is that some forms have toolbars on such as "web design", "Form view" etc. If you go to design view / properties / others, there is no toolbar in any of the toolbar properties on this tab. This is something that has always puzzled me and I never really ever figured out. This (what toolbars are being displayed) is "context sensitive", i.e. if you click in the menu at the top of a form while in view mode (not design view) and select a toolbar from the menu that appears, then close the form, the form "retains" that toolbar as it opens next time. That is simply nuts to me, who wants the form design toolbar viewable to the user just because you used it yourself? Anyway, where the ^%*&^%(*^) is this stuff stored? Does anyone have code to go find and get rid of these things throughout an application (all forms). I'm currently opening every form and if they have any of these menus, right clicking on the top, unselecting the menu and saving (closing) the form which gets rid of it... until the next time it is closed with one of these menus selected. Help!!! John W. Colby www.ColbyConsulting.com _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From glen_mcwilliams at msn.com Fri Jan 2 06:16:39 2004 From: glen_mcwilliams at msn.com (Glen McWilliams) Date: Fri, 2 Jan 2004 04:16:39 -0800 Subject: [AccessD] Where do they store the toolbar info References: Message-ID: John You should be able to walk through the CommandBars collection, setting the visible property for each to false. Somewhere code to do this, which I will post. HTH Glen McWilliams ----- Original Message ----- From: Jim Lawrence (AccessD) To: Access Developers discussion and problem solving Sent: Friday, January 02, 2004 3:58 AM Subject: RE: [AccessD] Where do they store the toolbar info Hi John: I am not sure whether this is the case but when ever I have had some custom tool bars, all have been implemented through macros. (The only place in which I use those things.) There is a way to do in A2000 plus, through a 'command' code but I have never bothered to researched it myself. HTH Jim -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of John W. Colby Sent: Thursday, January 01, 2004 5:18 PM To: AccessD Subject: [AccessD] Where do they store the toolbar info I am going through a database I inherited trying to make the thing look and act consistent. One thing that I am running across is that some forms have toolbars on such as "web design", "Form view" etc. If you go to design view / properties / others, there is no toolbar in any of the toolbar properties on this tab. This is something that has always puzzled me and I never really ever figured out. This (what toolbars are being displayed) is "context sensitive", i.e. if you click in the menu at the top of a form while in view mode (not design view) and select a toolbar from the menu that appears, then close the form, the form "retains" that toolbar as it opens next time. That is simply nuts to me, who wants the form design toolbar viewable to the user just because you used it yourself? Anyway, where the ^%*&^%(*^) is this stuff stored? Does anyone have code to go find and get rid of these things throughout an application (all forms). I'm currently opening every form and if they have any of these menus, right clicking on the top, unselecting the menu and saving (closing) the form which gets rid of it... until the next time it is closed with one of these menus selected. Help!!! John W. Colby www.ColbyConsulting.com _______________________________________________ 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 From jimdettman at earthlink.net Fri Jan 2 09:30:35 2004 From: jimdettman at earthlink.net (Jim Dettman) Date: Fri, 2 Jan 2004 10:30:35 -0500 Subject: [AccessD] Where do they store the toolbar info In-Reply-To: Message-ID: John, <> Depends on version as to the actual table name, but it's a system table. For example, for A97 it is MSysCmdBars. For A2000 and up, I believe it's MSysAccessObjects. <> I don't have any. I've always disabled all built-in toolbars and done my own via code since A2 days. Might want to check the MVP site or look at some of the command bar collection stuff for code. Jim Dettman President, Online Computer Services of WNY, Inc. (315) 699-3443 jimdettman at earthlink.net -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of John W. Colby Sent: Thursday, January 01, 2004 8:18 PM To: AccessD Subject: [AccessD] Where do they store the toolbar info I am going through a database I inherited trying to make the thing look and act consistent. One thing that I am running across is that some forms have toolbars on such as "web design", "Form view" etc. If you go to design view / properties / others, there is no toolbar in any of the toolbar properties on this tab. This is something that has always puzzled me and I never really ever figured out. This (what toolbars are being displayed) is "context sensitive", i.e. if you click in the menu at the top of a form while in view mode (not design view) and select a toolbar from the menu that appears, then close the form, the form "retains" that toolbar as it opens next time. That is simply nuts to me, who wants the form design toolbar viewable to the user just because you used it yourself? Does anyone have code to go find and get rid of these things throughout an application (all forms). I'm currently opening every form and if they have any of these menus, right clicking on the top, unselecting the menu and saving (closing) the form which gets rid of it... until the next time it is closed with one of these menus selected. Help!!! John W. Colby www.ColbyConsulting.com _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From markamatte at hotmail.com Fri Jan 2 10:18:35 2004 From: markamatte at hotmail.com (Mark A Matte) Date: Fri, 02 Jan 2004 16:18:35 +0000 Subject: AW: [AccessD] Hiding Main Access Window Message-ID: Hello All, I see this thread is still alive. My impression was that he wanted to hide the application window...but some of the suggestions seem to be towards the splash screen. I sent a sample DB that Drew Wutka created to Paul offline. I'm not sure if he received it...but it uses the function below to hide the application window. Hope it helps!!! Mark A. Matte Public Function fAccessWindow(Optional Procedure As String, Optional SwitchStatus As Boolean, Optional StatusCheck As Boolean) As Boolean If Procedure = "Hide" Then dwReturn = ShowWindow(Application.hWndAccessApp, SW_HIDE) End If If Procedure = "Show" Then dwReturn = ShowWindow(Application.hWndAccessApp, SW_SHOWMAXIMIZED) End If If Procedure = "Minimize" Then dwReturn = ShowWindow(Application.hWndAccessApp, SW_SHOWMINIMIZED) End If If SwitchStatus = True Then If IsWindowVisible(hWndAccessApp) = 1 Then dwReturn = ShowWindow(Application.hWndAccessApp, SW_HIDE) Else dwReturn = ShowWindow(Application.hWndAccessApp, SW_SHOWMAXIMIZED) End If End If If StatusCheck = True Then If IsWindowVisible(hWndAccessApp) = 0 Then fAccessWindow = False End If If IsWindowVisible(hWndAccessApp) = 1 Then fAccessWindow = True End If End If End Function >From: "MastercafeCTV" >Reply-To: Access Developers discussion and problem >solving >To: "'Access Developers discussion and problem >solving'" >Subject: RE: AW: [AccessD] Hiding Main Access Window >Date: Thu, 1 Jan 2004 20:29:40 +0100 > >Efectivelly we take a BMP file with same name that application (mdb/mde) >and >in the same directory that this and supply the main Access warning for our >logo. > >Thanks Arthur great information. > >Juan Menendez > > >=========================================== >MASTERCAFE SL - NIF B-82.617.614 >www.mastercafe.com >Deleg. Asturias >Tel 985.88.49.44 / 627.531.764 >Fax 627.500.205 >info at mastercafe.com >juan at mastercafe.com >Deleg. Madrid >Tel 627.474.285 >cecilia at mastercafe.com >=========================================== > > >-----Original Message----- >From: accessd-bounces at databaseadvisors.com >[mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Arthur Fuller >Sent: jueves, 01 de enero de 2004 11:06 >To: 'Access Developers discussion and problem solving' >Subject: RE: AW: [AccessD] Hiding Main Access Window > > >One way to do this is to create an image file having the same name as your >application MDB but with a different extension and place it in the same >directory as the MDB. Access will load this image instead of its native >logo. I have never tried to create a one-pixel image file but I'm guessing >that it would work too. > >Arthur > >-----Original Message----- >From: accessd-bounces at databaseadvisors.com >[mailto:accessd-bounces at databaseadvisors.com] On Behalf Of >paul.hartland at fsmail.net >Sent: Wednesday, December 31, 2003 1:45 AM >To: Access Developers discussion and problem solving >Subject: Re: AW: [AccessD] Hiding Main Access Window > > >Sorry but I don?t think I have explained correctly, when you first open >Access that?s the screen I want to hide I know I can hide database windows >etc from Tools/StartUp. Lets say we go to START/PROGRAMS and click on >Microsoft Access and you get the blank access screen from which you can >creat a new database, open existing etc. That?s the screen I want to hide, >the actual Access screen. > >Sorry for any confusion. > >Paul Hartland > > > > > > >Message date : Dec 31 2003, 09:39 AM > >From : Helmut Kotsch >To : Access Developers discussion and problem solving >Copy to : >Subject : AW: [AccessD] Hiding Main Access Window >Paul, >that's easy, even I can answer this one. >Tools => Start..=> uncheck the "Show Database Window" Checkbox. I took this >info from my installed German version of Access 2000, hope I translated the >fieldnames alright. > >Regards and have a nice day. > >Helmut Kotsch > > >-----Urspr?ngliche Nachricht----- >Von: accessd-bounces at databaseadvisors.com >[mailto:accessd-bounces at databaseadvisors.com]Im Auftrag von >paul.hartland at fsmail.net >Gesendet: Mittwoch, 31. Dezember 2003 10:17 >An: accessd >Betreff: [AccessD] Hiding Main Access Window > > >To all, > >I?m sure I have seen this somewhere but can?t for the life of me remember >where, I have an Access 2000 application that a few people have a shortcut >to on their machines, which when opened opens the main Access window (as >usual) and a switchboard. Is there anyway I can hide the main Access window >so that the application looks similar to a Visual Basic application ? > >Thanks in advance for all your help. > >Paul Hartland >Freeserve AnyTime - HALF PRICE for the first 3 months - Save ?7.50 a month >www.freeserve.com/anytime _______________________________________________ >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 >Freeserve AnyTime - HALF PRICE for the first 3 months - Save ?7.50 a month >www.freeserve.com/anytime _______________________________________________ >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 > >_______________________________________________ >AccessD mailing list >AccessD at databaseadvisors.com >http://databaseadvisors.com/mailman/listinfo/accessd >Website: http://www.databaseadvisors.com _________________________________________________________________ Take advantage of our limited-time introductory offer for dial-up Internet access. http://join.msn.com/?page=dept/dialup From john at winhaven.net Fri Jan 2 10:32:05 2004 From: john at winhaven.net (John Bartow) Date: Fri, 2 Jan 2004 10:32:05 -0600 Subject: [AccessD] Where do they store the toolbar info In-Reply-To: Message-ID: Hi John, I had a similar problem recently. Commandbars are wierd ducks for sure. Anyway, I used Speed Ferret to change all of the command bars references to the ones that I wanted (my own) for each type of object. I would imagine any search and replace tool could do the same, if you are using another one. Sorry, I don't have much in the way of code to manipulate command bars to address these types of problems. John B. > -----Original Message----- > From: accessd-bounces at databaseadvisors.com > [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of John W. Colby > Sent: Thursday, January 01, 2004 7:18 PM > To: AccessD > Subject: [AccessD] Where do they store the toolbar info > > > I am going through a database I inherited trying to make the > thing look and > act consistent. One thing that I am running across is that some > forms have > toolbars on such as "web design", "Form view" etc. If you go to > design view > / properties / others, there is no toolbar in any of the toolbar > properties > on this tab. > > This is something that has always puzzled me and I never really > ever figured > out. This (what toolbars are being displayed) is "context > sensitive", i.e. > if you click in the menu at the top of a form while in view mode > (not design > view) and select a toolbar from the menu that appears, then close > the form, > the form "retains" that toolbar as it opens next time. > > That is simply nuts to me, who wants the form design toolbar > viewable to the > user just because you used it yourself? > > Anyway, where the ^%*&^%(*^) is this stuff stored? Does anyone > have code to > go find and get rid of these things throughout an application (all forms). > I'm currently opening every form and if they have any of these > menus, right > clicking on the top, unselecting the menu and saving (closing) the form > which gets rid of it... until the next time it is closed with one of these > menus selected. > > Help!!! > > John W. Colby > www.ColbyConsulting.com > > > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com > > From gustav at cactus.dk Fri Jan 2 11:08:56 2004 From: gustav at cactus.dk (Gustav Brock) Date: Fri, 2 Jan 2004 18:08:56 +0100 Subject: [AccessD] Writing raw RTF document using VBA - Solved In-Reply-To: <7837311130.20031101202713@cactus.dk> References: <5614351436.20030524150347@cactus.dk> <1429226064.20031031183338@cactus.dk> <7837311130.20031101202713@cactus.dk> Message-ID: <17433585032.20040102180856@cactus.dk> Hi William, Tom et all Referring to my post from 2003-11-01, I did an implementation of this and it rocks. > First, here's one solution for extracting the RTF body: > Having reached this point it's a simple matter to assemble and write > the full RTF document .. > I'm pretty sure this won't be able concatenate any collection of RTF > documents whatever the size. But until further testing has been > carried out, I guess it will be able to concatenate a vast amount of > small RTF docs like those found and produced in an ocx controlled RTF > memobox. I modified the code slightly to write the RTF document item by item and that certainly speeds up the process. A test with 20.000 small items created in less than one minute a 8 MB RTF document which Word used longer time to open and - having done so - reported to have a size of 2.500 pages. Have in mind, that an RTF document written this way is extremely compact compared to a similar but bloated document created directly in Word. This is the modification (main structure only): If rst.RecordCount > 0 Then ' Build output filename. strRTFFile = FunctionToCreateFileName() ' Set RTF header. strRTF = cstrRTFBodyHeader ' Create RTF file. intFile = FreeFile Open strRTFFile For Output As #intFile ' Write RTF header. Print #intFile, strRTF ' Concatenate RTF bodies. With rst While .EOF = False varMemo = LookupMemo(!ID, !Description) If Not IsNull(varMemo) Then If Not IsRTF(varMemo) Then varMemo = ConvTexttoRTF(varMemo, False) Else Call ClearRTFNullEnd(varMemo) End If Call AppendRTFCrLf(varMemo) Call ClearRTFNewLineEnd(varMemo) strTxt = TrimTextBodyRTF(varMemo, True) & cstrRTFFontPlain If Len(strTxt) > 0 Then Call ClearRTFFontSize(strTxt) strRTF = cstrRTFFontPlain & Space(1) & strTxt & cstrRTFFontPlain & cstrRTFNewLine ' Append this RTF paragraph. Print #intFile, strRTF End If End If .MoveNext Wend .Close End With ' Append RTF closing bracket. strRTF = cstrRTFBodyEnd Print #intFile, strRTF ' Close RTF file. Close #intFile ' Reset RTB object. strRTF = ConvTexttoRTF(vbNullString, True) End If Happy New Year! /gustav From jwcolby at colbyconsulting.com Fri Jan 2 12:38:12 2004 From: jwcolby at colbyconsulting.com (John W. Colby) Date: Fri, 2 Jan 2004 13:38:12 -0500 Subject: [AccessD] Where do they store the toolbar info In-Reply-To: Message-ID: John, I've discovered that the toolbars I am discussing are either showing or not for EVERY form, though thinking back on it I'm a bit confused about this because I would go through a bunch of small forms in this app and one would display the toolbar, the next would not. In any case, at this specific moment the right click toolbar menu that opens when I right click the menu bar at the top of the app had 5 toolbars available to be clicked. Clipboard Form view Web ToolbarDataEntry (a custom toolbar) ToolBarMenu (a custom toolbar) Any one or ALL of these can be selected / deselected while a form is open. If you close the form and open another form, the toolbars are still open, although again I swear that some forms showed them, others didn't. At any rate, I discovered that if you right click the menu bar, then select customize, a slew of toolbars are available to be displayed by checking the check box to the left of each. However, if you select a toolbar and go into properties, there are several checkboxes available: Allow Customizing Allow Resizing Allow Moving Allow Show/Hiding If you unclick the Allow Show/hiding then you can't cause that toolbar to appear even if you select it, where normally you would be able to display the toolbar just by checking it's selector checkbox. So IF it is currently displayed, you can't cause it to go away. If it's not displayed, you can't cause it to display. It then turns out that you can customize your development environment by (for example): Going into design view of something like a form. Make sure Allow show/hiding is checked for a toolbar you want go into Customize and select the toolbars you want for that view (design / form). Deselect Allow show / hide for those toolbars. Now you can't get rid of the toolbars in that view (design forms) Go into View forms (viewing the form opened). make sure Allow show/hide is checked for the toolbar you want Go into customize and select the toolbar(s) you want displayed (or deselect any "problem" toolbars you DON'T want) Deselect Allow show/hide for those toolbars. Now the toolbars selected cannot be deselected and the ones you DON'T want can't be selected. It seems like a royal PITA to set this up. There are so many toolbars that you have to futz with to get things right, however it looks like when you are done this problem would go away. And I still don't know how Access stores what toolbars are being viewed in any view of any given access object (form/report/module etc). It looks like a form in view mode can have a set of toolbars, a different set in design view, reports have a set in view mode, a different set in design mode etc. all of which can then be "locked down" so that nothing can be taken away and likewise nothing extra can be added. But WHAT A PAIN doing it manually. John W. Colby www.ColbyConsulting.com -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of John Bartow Sent: Friday, January 02, 2004 11:32 AM To: Access Developers discussion and problem solving Subject: RE: [AccessD] Where do they store the toolbar info Hi John, I had a similar problem recently. Commandbars are wierd ducks for sure. Anyway, I used Speed Ferret to change all of the command bars references to the ones that I wanted (my own) for each type of object. I would imagine any search and replace tool could do the same, if you are using another one. Sorry, I don't have much in the way of code to manipulate command bars to address these types of problems. John B. > -----Original Message----- > From: accessd-bounces at databaseadvisors.com > [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of John W. Colby > Sent: Thursday, January 01, 2004 7:18 PM > To: AccessD > Subject: [AccessD] Where do they store the toolbar info > > > I am going through a database I inherited trying to make the > thing look and > act consistent. One thing that I am running across is that some > forms have > toolbars on such as "web design", "Form view" etc. If you go to > design view > / properties / others, there is no toolbar in any of the toolbar > properties > on this tab. > > This is something that has always puzzled me and I never really > ever figured > out. This (what toolbars are being displayed) is "context > sensitive", i.e. > if you click in the menu at the top of a form while in view mode > (not design > view) and select a toolbar from the menu that appears, then close > the form, > the form "retains" that toolbar as it opens next time. > > That is simply nuts to me, who wants the form design toolbar > viewable to the > user just because you used it yourself? > > Anyway, where the ^%*&^%(*^) is this stuff stored? Does anyone > have code to > go find and get rid of these things throughout an application (all forms). > I'm currently opening every form and if they have any of these > menus, right > clicking on the top, unselecting the menu and saving (closing) the form > which gets rid of it... until the next time it is closed with one of these > menus selected. > > Help!!! > > John W. Colby > www.ColbyConsulting.com > > > _______________________________________________ > 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 From DWUTKA at marlow.com Fri Jan 2 17:10:48 2004 From: DWUTKA at marlow.com (DWUTKA at marlow.com) Date: Fri, 2 Jan 2004 17:10:48 -0600 Subject: [AccessD] Msldbusr.dll Registration Error Message-ID: <2F8793082E00D4119A1700B0D0216BF8022276D6@main2.marlow.com> Now a post like that is going to get me off my butt and start building my site again! Just need to find the time! Actually had a friend create that image for me....not very artistic myself! Drew -----Original Message----- From: tortise at paradise.net.nz [mailto:tortise at paradise.net.nz] Sent: Tuesday, December 30, 2003 7:10 PM To: Access Developers discussion and problem solving Subject: Re: [AccessD] Msldbusr.dll Registration Error Drew That's a neat wolf icon on your site.... Have you considered adding a small sound file to your home page...of a wolf howling like they do? I was waiting for it...but it didn't come..... OK perhaps I should have sent this on Friday, but I plead Friday is a public holiday.... btw thanks for your site! Kind regards, Dr David Hingston Director Chequers Software Limited Wellington, New Zealand. www.cheqsoft.com Crafters of: Break Reminder - For safe and efficient PC use - www.breakreminder.com TimesOwn - International Time Zone Calculator a click away - http://www.cheqsoft.com/timesown.html Clipboard Express - Cut and paste storage and web form filler - http://www.cheqsoft.com/clipboard.html MP3Detective - MP3 Player manager - http://www.cheqsoft.com/mp3detective.html Engines2Go = E2Go Fast and friendly Internet searching - have you tried it? http://www.E2Go.com/ ----- Original Message ----- From: To: Sent: Wednesday, December 31, 2003 12:48 PM Subject: RE: [AccessD] Msldbusr.dll Registration Error > No problem. By the way, if you go to my site.. http://www.wolfwares.com and > go to the Microsoft Access section, on of the few things I have on my site > is my Database Users database, which probably does what you are looking for, > without that .dll. _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From john at winhaven.net Fri Jan 2 17:14:52 2004 From: john at winhaven.net (John Bartow) Date: Fri, 2 Jan 2004 17:14:52 -0600 Subject: [AccessD] Where do they store the toolbar info In-Reply-To: Message-ID: John, I think you've summed it up pretty well here. The CommandBar system seems to be a flexible system but not very developer friendly. It could definitely use a more comprehensive UI to configure options for each form/report object. Because I distribute apps using Access runtime, and built-in CommandBars aren't available under runtime, I have created a set of custom toolbars that I use for runtime use: tbrMenu; mbrMenu; sbrMenu for all menu forms tbrPopup; mbrPopup; sbrPopup for all pop-up forms tbrBasic; mbrBasic; sbrBasic for all standard forms tbrReport; mbrReport; sbrReport for all reports etc. I then customize a CommandBar if needed for a particular form or control. By doing this I can just import CommandBars from a previously built app and not have to spend time creating them. Before distributing for runtime use I set the "AllowBuiltinToolbars" property to false so my users will never get the built-in set of CommandBars. John B. PS: I think the same crew worked on the CommandBar UI that put the task options in Outlook 2k. I guess things could be worse! Here's a trick that might make you appreciate the CommandBar UI better: Try to find "Set Reminders on Tasks with Due Dates" in Outlook 2k - I guarantee that its on one of the four different dialogs boxes (each having three or less options on it) used to set task option. > -----Original Message----- > From: accessd-bounces at databaseadvisors.com > [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of John W. Colby > Sent: Friday, January 02, 2004 12:38 PM > To: Access Developers discussion and problem solving > Subject: RE: [AccessD] Where do they store the toolbar info > > > John, > > I've discovered that the toolbars I am discussing are either > showing or not > for EVERY form, though thinking back on it I'm a bit confused about this > because I would go through a bunch of small forms in this app and > one would > display the toolbar, the next would not. > > In any case, at this specific moment the right click toolbar menu > that opens > when I right click the menu bar at the top of the app had 5 toolbars > available to be clicked. > > Clipboard > Form view > Web > ToolbarDataEntry (a custom toolbar) > ToolBarMenu (a custom toolbar) > > Any one or ALL of these can be selected / deselected while a form is open. > If you close the form and open another form, the toolbars are still open, > although again I swear that some forms showed them, others didn't. > > At any rate, I discovered that if you right click the menu bar, > then select > customize, a slew of toolbars are available to be displayed by > checking the > check box to the left of each. However, if you select a toolbar > and go into > properties, there are several checkboxes available: > > Allow Customizing > Allow Resizing > Allow Moving > Allow Show/Hiding > > If you unclick the Allow Show/hiding then you can't cause that toolbar to > appear even if you select it, where normally you would be able to display > the toolbar just by checking it's selector checkbox. > > So IF it is currently displayed, you can't cause it to go away. > If it's not > displayed, you can't cause it to display. > > It then turns out that you can customize your development environment by > (for example): > > Going into design view of something like a form. > Make sure Allow show/hiding is checked for a toolbar you want > go into Customize and select the toolbars you want for that view (design / > form). > Deselect Allow show / hide for those toolbars. > > Now you can't get rid of the toolbars in that view (design forms) > > Go into View forms (viewing the form opened). > make sure Allow show/hide is checked for the toolbar you want > Go into customize and select the toolbar(s) you want displayed > (or deselect > any "problem" toolbars you DON'T want) > Deselect Allow show/hide for those toolbars. > > Now the toolbars selected cannot be deselected and the ones you DON'T want > can't be selected. > > It seems like a royal PITA to set this up. There are so many > toolbars that > you have to futz with to get things right, however it looks like when you > are done this problem would go away. > > And I still don't know how Access stores what toolbars are being viewed in > any view of any given access object (form/report/module etc). It > looks like > a form in view mode can have a set of toolbars, a different set in design > view, reports have a set in view mode, a different set in design mode etc. > all of which can then be "locked down" so that nothing can be > taken away and > likewise nothing extra can be added. > > But WHAT A PAIN doing it manually. > > John W. Colby > www.ColbyConsulting.com > > -----Original Message----- > From: accessd-bounces at databaseadvisors.com > [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of John Bartow > Sent: Friday, January 02, 2004 11:32 AM > To: Access Developers discussion and problem solving > Subject: RE: [AccessD] Where do they store the toolbar info > > > Hi John, > I had a similar problem recently. Commandbars are wierd ducks for sure. > Anyway, I used Speed Ferret to change all of the command bars > references to > the ones that I wanted (my own) for each type of object. I would > imagine any > search and replace tool could do the same, if you are using another one. > > Sorry, I don't have much in the way of code to manipulate command bars to > address these types of problems. > > John B. > > > -----Original Message----- > > From: accessd-bounces at databaseadvisors.com > > [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of John W. Colby > > Sent: Thursday, January 01, 2004 7:18 PM > > To: AccessD > > Subject: [AccessD] Where do they store the toolbar info > > > > > > I am going through a database I inherited trying to make the > > thing look and > > act consistent. One thing that I am running across is that some > > forms have > > toolbars on such as "web design", "Form view" etc. If you go to > > design view > > / properties / others, there is no toolbar in any of the toolbar > > properties > > on this tab. > > > > This is something that has always puzzled me and I never really > > ever figured > > out. This (what toolbars are being displayed) is "context > > sensitive", i.e. > > if you click in the menu at the top of a form while in view mode > > (not design > > view) and select a toolbar from the menu that appears, then close > > the form, > > the form "retains" that toolbar as it opens next time. > > > > That is simply nuts to me, who wants the form design toolbar > > viewable to the > > user just because you used it yourself? > > > > Anyway, where the ^%*&^%(*^) is this stuff stored? Does anyone > > have code to > > go find and get rid of these things throughout an application > (all forms). > > I'm currently opening every form and if they have any of these > > menus, right > > clicking on the top, unselecting the menu and saving (closing) the form > > which gets rid of it... until the next time it is closed with > one of these > > menus selected. > > > > Help!!! > > > > John W. Colby > > www.ColbyConsulting.com > > > > > > _______________________________________________ > > 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 > > > > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com > > From DWUTKA at marlow.com Fri Jan 2 17:18:51 2004 From: DWUTKA at marlow.com (DWUTKA at marlow.com) Date: Fri, 2 Jan 2004 17:18:51 -0600 Subject: [AccessD] Hiding Main Access Window Message-ID: <2F8793082E00D4119A1700B0D0216BF8022276D7@main2.marlow.com> Yes, you can do this, it requires the ShowWindow API call. It is commonly known that you also need to set all of the forms that you want visible to have their popup property set to yes, but also in 2000, that you need the modal property set to yes also. I have a method that does not require the modal property in 2000. Go to the Access section of my site (http://www.wolfwares.com) and download the Always On Top database. It does exactly what you want (and a little more, it puts the form 'always on top', kinda handy....). Susan and I actually published an article about that...should be out this month in Inside Microsoft Access. Drew -----Original Message----- From: paul.hartland at fsmail.net [mailto:paul.hartland at fsmail.net] Sent: Wednesday, December 31, 2003 3:17 AM To: accessd Subject: [AccessD] Hiding Main Access Window To all, I'm sure I have seen this somewhere but can't for the life of me remember where, I have an Access 2000 application that a few people have a shortcut to on their machines, which when opened opens the main Access window (as usual) and a switchboard. Is there anyway I can hide the main Access window so that the application looks similar to a Visual Basic application ? Thanks in advance for all your help. Paul Hartland Freeserve AnyTime - HALF PRICE for the first 3 months - Save ?7.50 a month www.freeserve.com/anytime _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From DWUTKA at marlow.com Fri Jan 2 17:19:17 2004 From: DWUTKA at marlow.com (DWUTKA at marlow.com) Date: Fri, 2 Jan 2004 17:19:17 -0600 Subject: [AccessD] Hiding Main Access Window Message-ID: <2F8793082E00D4119A1700B0D0216BF8022276D8@main2.marlow.com> Not true....just requires API calls... Drew -----Original Message----- From: MastercafeCTV [mailto:mastercafe at ctv.es] Sent: Wednesday, December 31, 2003 7:35 AM To: 'Access Developers discussion and problem solving' Subject: RE: [AccessD] Hiding Main Access Window We only can hide the main Access intro screen when you put only Runtime for Access (without any Access application). Then take parameters in the Intro application. On las version 2.0 we use and INI file to do this, but actually don't run. Happy new year for all developers and Access Groups from Asturias - SPAIN Juan Menendez =========================================== MASTERCAFE SL - NIF B-82.617.614 www.mastercafe.com Deleg. Asturias Tel 985.88.49.44 / 627.531.764 Fax 627.500.205 info at mastercafe.com juan at mastercafe.com Deleg. Madrid Tel 627.474.285 cecilia at mastercafe.com =========================================== -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of paul.hartland at fsmail.net Sent: mi?rcoles, 31 de diciembre de 2003 10:17 To: accessd Subject: [AccessD] Hiding Main Access Window To all, I'm sure I have seen this somewhere but can't for the life of me remember where, I have an Access 2000 application that a few people have a shortcut to on their machines, which when opened opens the main Access window (as usual) and a switchboard. Is there anyway I can hide the main Access window so that the application looks similar to a Visual Basic application ? Thanks in advance for all your help. Paul Hartland Freeserve AnyTime - HALF PRICE for the first 3 months - Save ?7.50 a month www.freeserve.com/anytime _______________________________________________ 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 From DWUTKA at marlow.com Fri Jan 2 17:26:38 2004 From: DWUTKA at marlow.com (DWUTKA at marlow.com) Date: Fri, 2 Jan 2004 17:26:38 -0600 Subject: AW: [AccessD] Hiding Main Access Window Message-ID: <2F8793082E00D4119A1700B0D0216BF8022276D9@main2.marlow.com> He's not talking splash screen. Paul, just an FYI, don't be surprised with the replies to your post. It's a common confusion with Access developers. Many people hide the db window, which can be done from the tools menu, however, to hide the Access window itself requires the ShowWindow API. It's not very difficult to do, because Application.hWndAccessWindow (I think) is the method to retrieve the hWnd of the Access Application window....very handy, let's you do all sorts of things to the Access Window if you want. However, the reason for the confusion is that a lot of developers (and this is NOT meant to be deragotory), develop specifically for Access, so there is no need to remove the Access window, since it is the tool in which the .mdb's are written for. Ironically, hiding the Access window was the first VBA code I ever messed with, because when I started in Access (back in 99), I was using all macros, and procedures. Worked great for what I needed. But I was creating a db for completely computer illiterate personnel, so I wanted as few things on the screen as possible, and there just was no way to hide the Access Window through non-VBA methods. (I even tried our companies help desk, who immediately gave me instructions to hide the db window......That night I figured out how to get the code on the Access Web to work, and when I let the help desk know how to solve that particular issue, I was told to never call them again...go figure...) Drew -----Original Message----- From: Arthur Fuller [mailto:artful at rogers.com] Sent: Thursday, January 01, 2004 4:06 AM To: 'Access Developers discussion and problem solving' Subject: RE: AW: [AccessD] Hiding Main Access Window One way to do this is to create an image file having the same name as your application MDB but with a different extension and place it in the same directory as the MDB. Access will load this image instead of its native logo. I have never tried to create a one-pixel image file but I'm guessing that it would work too. Arthur -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of paul.hartland at fsmail.net Sent: Wednesday, December 31, 2003 1:45 AM To: Access Developers discussion and problem solving Subject: Re: AW: [AccessD] Hiding Main Access Window Sorry but I don't think I have explained correctly, when you first open Access that's the screen I want to hide I know I can hide database windows etc from Tools/StartUp. Lets say we go to START/PROGRAMS and click on Microsoft Access and you get the blank access screen from which you can creat a new database, open existing etc. That's the screen I want to hide, the actual Access screen. Sorry for any confusion. Paul Hartland Message date : Dec 31 2003, 09:39 AM >From : Helmut Kotsch To : Access Developers discussion and problem solving Copy to : Subject : AW: [AccessD] Hiding Main Access Window Paul, that's easy, even I can answer this one. Tools => Start..=> uncheck the "Show Database Window" Checkbox. I took this info from my installed German version of Access 2000, hope I translated the fieldnames alright. Regards and have a nice day. Helmut Kotsch -----Urspr?ngliche Nachricht----- Von: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]Im Auftrag von paul.hartland at fsmail.net Gesendet: Mittwoch, 31. Dezember 2003 10:17 An: accessd Betreff: [AccessD] Hiding Main Access Window To all, I'm sure I have seen this somewhere but can't for the life of me remember where, I have an Access 2000 application that a few people have a shortcut to on their machines, which when opened opens the main Access window (as usual) and a switchboard. Is there anyway I can hide the main Access window so that the application looks similar to a Visual Basic application ? Thanks in advance for all your help. Paul Hartland Freeserve AnyTime - HALF PRICE for the first 3 months - Save ?7.50 a month www.freeserve.com/anytime _______________________________________________ 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 Freeserve AnyTime - HALF PRICE for the first 3 months - Save ?7.50 a month www.freeserve.com/anytime _______________________________________________ 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 From DWUTKA at marlow.com Fri Jan 2 17:28:38 2004 From: DWUTKA at marlow.com (DWUTKA at marlow.com) Date: Fri, 2 Jan 2004 17:28:38 -0600 Subject: AW: [AccessD] Hiding Main Access Window Message-ID: <2F8793082E00D4119A1700B0D0216BF8022276DA@main2.marlow.com> Ummm, that code won't work without the API declare statement! I posted a reply to a link of my Always on Top db, which actually works better.....hehehehe Drew -----Original Message----- From: Mark A Matte [mailto:markamatte at hotmail.com] Sent: Friday, January 02, 2004 10:19 AM To: accessd at databaseadvisors.com Subject: RE: AW: [AccessD] Hiding Main Access Window Hello All, I see this thread is still alive. My impression was that he wanted to hide the application window...but some of the suggestions seem to be towards the splash screen. I sent a sample DB that Drew Wutka created to Paul offline. I'm not sure if he received it...but it uses the function below to hide the application window. Hope it helps!!! Mark A. Matte Public Function fAccessWindow(Optional Procedure As String, Optional SwitchStatus As Boolean, Optional StatusCheck As Boolean) As Boolean If Procedure = "Hide" Then dwReturn = ShowWindow(Application.hWndAccessApp, SW_HIDE) End If If Procedure = "Show" Then dwReturn = ShowWindow(Application.hWndAccessApp, SW_SHOWMAXIMIZED) End If If Procedure = "Minimize" Then dwReturn = ShowWindow(Application.hWndAccessApp, SW_SHOWMINIMIZED) End If If SwitchStatus = True Then If IsWindowVisible(hWndAccessApp) = 1 Then dwReturn = ShowWindow(Application.hWndAccessApp, SW_HIDE) Else dwReturn = ShowWindow(Application.hWndAccessApp, SW_SHOWMAXIMIZED) End If End If If StatusCheck = True Then If IsWindowVisible(hWndAccessApp) = 0 Then fAccessWindow = False End If If IsWindowVisible(hWndAccessApp) = 1 Then fAccessWindow = True End If End If End Function >From: "MastercafeCTV" >Reply-To: Access Developers discussion and problem >solving >To: "'Access Developers discussion and problem >solving'" >Subject: RE: AW: [AccessD] Hiding Main Access Window >Date: Thu, 1 Jan 2004 20:29:40 +0100 > >Efectivelly we take a BMP file with same name that application (mdb/mde) >and >in the same directory that this and supply the main Access warning for our >logo. > >Thanks Arthur great information. > >Juan Menendez > > >=========================================== >MASTERCAFE SL - NIF B-82.617.614 >www.mastercafe.com >Deleg. Asturias >Tel 985.88.49.44 / 627.531.764 >Fax 627.500.205 >info at mastercafe.com >juan at mastercafe.com >Deleg. Madrid >Tel 627.474.285 >cecilia at mastercafe.com >=========================================== > > >-----Original Message----- >From: accessd-bounces at databaseadvisors.com >[mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Arthur Fuller >Sent: jueves, 01 de enero de 2004 11:06 >To: 'Access Developers discussion and problem solving' >Subject: RE: AW: [AccessD] Hiding Main Access Window > > >One way to do this is to create an image file having the same name as your >application MDB but with a different extension and place it in the same >directory as the MDB. Access will load this image instead of its native >logo. I have never tried to create a one-pixel image file but I'm guessing >that it would work too. > >Arthur > >-----Original Message----- >From: accessd-bounces at databaseadvisors.com >[mailto:accessd-bounces at databaseadvisors.com] On Behalf Of >paul.hartland at fsmail.net >Sent: Wednesday, December 31, 2003 1:45 AM >To: Access Developers discussion and problem solving >Subject: Re: AW: [AccessD] Hiding Main Access Window > > >Sorry but I don't think I have explained correctly, when you first open >Access that's the screen I want to hide I know I can hide database windows >etc from Tools/StartUp. Lets say we go to START/PROGRAMS and click on >Microsoft Access and you get the blank access screen from which you can >creat a new database, open existing etc. That's the screen I want to hide, >the actual Access screen. > >Sorry for any confusion. > >Paul Hartland > > > > > > >Message date : Dec 31 2003, 09:39 AM > >From : Helmut Kotsch >To : Access Developers discussion and problem solving >Copy to : >Subject : AW: [AccessD] Hiding Main Access Window >Paul, >that's easy, even I can answer this one. >Tools => Start..=> uncheck the "Show Database Window" Checkbox. I took this >info from my installed German version of Access 2000, hope I translated the >fieldnames alright. > >Regards and have a nice day. > >Helmut Kotsch > > >-----Urspr?ngliche Nachricht----- >Von: accessd-bounces at databaseadvisors.com >[mailto:accessd-bounces at databaseadvisors.com]Im Auftrag von >paul.hartland at fsmail.net >Gesendet: Mittwoch, 31. Dezember 2003 10:17 >An: accessd >Betreff: [AccessD] Hiding Main Access Window > > >To all, > >I'm sure I have seen this somewhere but can't for the life of me remember >where, I have an Access 2000 application that a few people have a shortcut >to on their machines, which when opened opens the main Access window (as >usual) and a switchboard. Is there anyway I can hide the main Access window >so that the application looks similar to a Visual Basic application ? > >Thanks in advance for all your help. > >Paul Hartland >Freeserve AnyTime - HALF PRICE for the first 3 months - Save ?7.50 a month >www.freeserve.com/anytime _______________________________________________ >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 >Freeserve AnyTime - HALF PRICE for the first 3 months - Save ?7.50 a month >www.freeserve.com/anytime _______________________________________________ >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 > >_______________________________________________ >AccessD mailing list >AccessD at databaseadvisors.com >http://databaseadvisors.com/mailman/listinfo/accessd >Website: http://www.databaseadvisors.com _________________________________________________________________ Take advantage of our limited-time introductory offer for dial-up Internet access. http://join.msn.com/?page=dept/dialup _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From jwcolby at colbyconsulting.com Fri Jan 2 18:53:37 2004 From: jwcolby at colbyconsulting.com (John W. Colby) Date: Fri, 2 Jan 2004 19:53:37 -0500 Subject: [AccessD] Mac address Message-ID: Does anyone have code for retrieving the Mac address of the network card in a PC? John W. Colby www.ColbyConsulting.com From stuart at lexacorp.com.pg Fri Jan 2 20:52:29 2004 From: stuart at lexacorp.com.pg (Stuart McLachlan) Date: Sat, 03 Jan 2004 12:52:29 +1000 Subject: [AccessD] Mac address In-Reply-To: Message-ID: <3FF6BB0D.2676.C3BB1D@localhost> On 2 Jan 2004 at 19:53, John W. Colby wrote: > Does anyone have code for retrieving the Mac address of the network card in > a PC? > This will do it. I got it from http://www.vbadmincode.btinternet.co.uk/code.htm: Private Const NCBASTAT = &H33 Private Const NCBNAMSZ = 16 Private Const HEAP_ZERO_MEMORY = &H8 Private Const HEAP_GENERATE_EXCEPTIONS = &H4 Private Const NCBRESET = &H32 Private Type NCB ncb_command As Byte 'Integer ncb_retcode As Byte 'Integer ncb_lsn As Byte 'Integer ncb_num As Byte ' Integer ncb_buffer As Long 'String ncb_length As Integer ncb_callname As String * NCBNAMSZ ncb_name As String * NCBNAMSZ ncb_rto As Byte 'Integer ncb_sto As Byte ' Integer ncb_post As Long ncb_lana_num As Byte 'Integer ncb_cmd_cplt As Byte 'Integer ncb_reserve(9) As Byte ' Reserved, must be 0 ncb_event As Long End Type Private Type ADAPTER_STATUS adapter_address(5) As Byte 'As String * 6 rev_major As Byte 'Integer reserved0 As Byte 'Integer adapter_type As Byte 'Integer rev_minor As Byte 'Integer duration As Integer frmr_recv As Integer frmr_xmit As Integer iframe_recv_err As Integer xmit_aborts As Integer xmit_success As Long recv_success As Long iframe_xmit_err As Integer recv_buff_unavail As Integer t1_timeouts As Integer ti_timeouts As Integer Reserved1 As Long free_ncbs As Integer max_cfg_ncbs As Integer max_ncbs As Integer xmit_buf_unavail As Integer max_dgram_size As Integer pending_sess As Integer max_cfg_sess As Integer max_sess As Integer max_sess_pkt_size As Integer name_count As Integer End Type Private Type NAME_BUFFER name As String * NCBNAMSZ name_num As Integer name_flags As Integer End Type Private Type ASTAT adapt As ADAPTER_STATUS NameBuff(30) As NAME_BUFFER End Type Private Declare Function Netbios Lib "netapi32.dll" _ (pncb As NCB) As Byte Private Declare Sub CopyMemory Lib "kernel32" Alias "RtlMoveMemory" ( _ hpvDest As Any, ByVal hpvSource As Long, ByVal cbCopy As Long) Private Declare Function GetProcessHeap Lib "kernel32" () As Long Private Declare Function HeapAlloc Lib "kernel32" _ (ByVal hHeap As Long, ByVal dwFlags As Long, _ ByVal dwBytes As Long) As Long Private Declare Function HeapFree Lib "kernel32" (ByVal hHeap As Long, _ ByVal dwFlags As Long, lpMem As Any) As Long Sub Command0_Click() Dim myNcb As NCB Dim bRet As Byte myNcb.ncb_command = NCBRESET bRet = Netbios(myNcb) myNcb.ncb_command = NCBASTAT myNcb.ncb_lana_num = 0 myNcb.ncb_callname = "* " Dim myASTAT As ASTAT, tempASTAT As ASTAT Dim pASTAT As Long myNcb.ncb_length = Len(myASTAT) Debug.Print Err.LastDllError pASTAT = HeapAlloc(GetProcessHeap(), HEAP_GENERATE_EXCEPTIONS _ Or HEAP_ZERO_MEMORY, myNcb.ncb_length) If pASTAT = 0 Then Debug.Print "memory allcoation failed!" Exit Sub End If myNcb.ncb_buffer = pASTAT bRet = Netbios(myNcb) Debug.Print Err.LastDllError CopyMemory myASTAT, myNcb.ncb_buffer, Len(myASTAT) MsgBox Hex(myASTAT.adapt.adapter_address(0)) & " " & _ Hex(myASTAT.adapt.adapter_address(1)) _ & " " & Hex(myASTAT.adapt.adapter_address(2)) & " " _ & Hex(myASTAT.adapt.adapter_address(3)) _ & " " & Hex(myASTAT.adapt.adapter_address(4)) & " " _ & Hex(myASTAT.adapt.adapter_address(5)) HeapFree GetProcessHeap(), 0, pASTAT End Sub -- Lexacorp Ltd http://www.lexacorp.com.pg Information Technology Consultancy, Software Development,System Support. From dwaters at usinternet.com Fri Jan 2 21:14:47 2004 From: dwaters at usinternet.com (Dan Waters) Date: Fri, 2 Jan 2004 21:14:47 -0600 Subject: [AccessD] Mac address In-Reply-To: <25416409.1073091540716.JavaMail.root@sniper.marix.com> Message-ID: <000001c3d1a7$c194e490$de1811d8@DanWaters> John - I don't have a clue what a Mac Address is but this API might do it. Private Declare Function GetMacAddressFromBlob Lib "npptools.dll" (ByRef hBlob As hBlob, ByVal pOwnerName As String, ByVal pCategoryName As String, ByVal pTagName As String, ByVal pMacAddress As String) As Long I found this in a utility call API Viewer at: http://www.activevb.de/rubriken/apiviewer/index-apiviewereng.html Dan Waters -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of John W. Colby Sent: Friday, January 02, 2004 6:54 PM To: AccessD Subject: [AccessD] Mac address Does anyone have code for retrieving the Mac address of the network card in a PC? John W. Colby www.ColbyConsulting.com _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From tinanfields at torchlake.com Sat Jan 3 03:44:11 2004 From: tinanfields at torchlake.com (Tina Norris Fields) Date: Sat, 03 Jan 2004 04:44:11 -0500 Subject: [AccessD] Form as Subform - Query Fails - Why? Message-ID: <3FF68EEB.30204@torchlake.com> Hi, Probably I am missing something but I don't understand why this bright idea of mine didn't work. Here's the picture: I have a little calendar form with textboxes BeginningDate and EndingDate. I have a little parameter query that uses a date range set Between BeginningDate And EndingDate to select the appropriate records. The query creates a table of records of people who have made contributions within the date range. This table is the data source for a Word document, the acknowledgement letter. I thought I'd be really clever and make a form with instructions - "select the beginning and ending dates on this calendar" "click this button to create the acknowledgement table" etc. So, I plugged the calendar form in as a subform on this clever instruction form, rather than popping open the calendar form. Setting the beginning and ending dates in the calendar, once it was a subform, did not provide the query with its parameters. I played around with setting the dates on the calendar-form-as-subform, then opening the calendar form independently - the dates were not set in the independent form, only in the subform. So, clearly, the instance of the calendar-form-as-subform to the instruction form is a new beast - sort of. Making design changes to the calendar-form-as-subform, such as background color, applies those changes to the independent calendar form. But, setting textbox values from within the calendar-form-as-subform does not set those values in the independent form. Do I really have two beasties here? If so, why can I not find a way to identify the textboxes in the subform so my query can use them? It looked like such a nice idea! What am I doing wrong? Thanks, Tina From papparuff at comcast.net Sat Jan 3 06:20:53 2004 From: papparuff at comcast.net (John Ruff) Date: Sat, 3 Jan 2004 04:20:53 -0800 Subject: [AccessD] Form as Subform - Query Fails - Why? In-Reply-To: <3FF68EEB.30204@torchlake.com> Message-ID: <000101c3d1f4$08452340$6501a8c0@papparuff> There are a couple of methods o set values on a main form (Independent form as you call it) from a subform) ' The txtDate is the name of the object in the subform that sets the date 1. Forms!NameOfIndependentForm!txtFromDate=txtDate 2. Parent!txtFromDate=txtDate I prefer the 2nd method myself. John V. Ruff - The Eternal Optimist :-) "Commit to the Lord whatever you do, and your plans will succeed." Proverbs 16:3 -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Tina Norris Fields Sent: Saturday, January 03, 2004 1:44 AM To: accessd at databaseadvisors.com Subject: [AccessD] Form as Subform - Query Fails - Why? Hi, Probably I am missing something but I don't understand why this bright idea of mine didn't work. Here's the picture: I have a little calendar form with textboxes BeginningDate and EndingDate. I have a little parameter query that uses a date range set Between BeginningDate And EndingDate to select the appropriate records. The query creates a table of records of people who have made contributions within the date range. This table is the data source for a Word document, the acknowledgement letter. I thought I'd be really clever and make a form with instructions - "select the beginning and ending dates on this calendar" "click this button to create the acknowledgement table" etc. So, I plugged the calendar form in as a subform on this clever instruction form, rather than popping open the calendar form. Setting the beginning and ending dates in the calendar, once it was a subform, did not provide the query with its parameters. I played around with setting the dates on the calendar-form-as-subform, then opening the calendar form independently - the dates were not set in the independent form, only in the subform. So, clearly, the instance of the calendar-form-as-subform to the instruction form is a new beast - sort of. Making design changes to the calendar-form-as-subform, such as background color, applies those changes to the independent calendar form. But, setting textbox values from within the calendar-form-as-subform does not set those values in the independent form. Do I really have two beasties here? If so, why can I not find a way to identify the textboxes in the subform so my query can use them? It looked like such a nice idea! What am I doing wrong? Thanks, Tina _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From jwcolby at colbyconsulting.com Sat Jan 3 09:37:02 2004 From: jwcolby at colbyconsulting.com (John W. Colby) Date: Sat, 3 Jan 2004 10:37:02 -0500 Subject: [AccessD] Mac address In-Reply-To: <3FF6BB0D.2676.C3BB1D@localhost> Message-ID: Nope, comes back 0:0:0:0 I have found a half dozen solutions, and all do this. It appears to be a case of which protocol you are bound to. This uses netbios which (apparently) my computer isn't using. It seems like a network card, or it's driver, could just be asked what the mac address is. John W. Colby www.ColbyConsulting.com -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Stuart McLachlan Sent: Friday, January 02, 2004 9:52 PM To: Access Developers discussion and problem solving Subject: Re: [AccessD] Mac address On 2 Jan 2004 at 19:53, John W. Colby wrote: > Does anyone have code for retrieving the Mac address of the network card in > a PC? > This will do it. I got it from http://www.vbadmincode.btinternet.co.uk/code.htm: Private Const NCBASTAT = &H33 Private Const NCBNAMSZ = 16 Private Const HEAP_ZERO_MEMORY = &H8 Private Const HEAP_GENERATE_EXCEPTIONS = &H4 Private Const NCBRESET = &H32 Private Type NCB ncb_command As Byte 'Integer ncb_retcode As Byte 'Integer ncb_lsn As Byte 'Integer ncb_num As Byte ' Integer ncb_buffer As Long 'String ncb_length As Integer ncb_callname As String * NCBNAMSZ ncb_name As String * NCBNAMSZ ncb_rto As Byte 'Integer ncb_sto As Byte ' Integer ncb_post As Long ncb_lana_num As Byte 'Integer ncb_cmd_cplt As Byte 'Integer ncb_reserve(9) As Byte ' Reserved, must be 0 ncb_event As Long End Type Private Type ADAPTER_STATUS adapter_address(5) As Byte 'As String * 6 rev_major As Byte 'Integer reserved0 As Byte 'Integer adapter_type As Byte 'Integer rev_minor As Byte 'Integer duration As Integer frmr_recv As Integer frmr_xmit As Integer iframe_recv_err As Integer xmit_aborts As Integer xmit_success As Long recv_success As Long iframe_xmit_err As Integer recv_buff_unavail As Integer t1_timeouts As Integer ti_timeouts As Integer Reserved1 As Long free_ncbs As Integer max_cfg_ncbs As Integer max_ncbs As Integer xmit_buf_unavail As Integer max_dgram_size As Integer pending_sess As Integer max_cfg_sess As Integer max_sess As Integer max_sess_pkt_size As Integer name_count As Integer End Type Private Type NAME_BUFFER name As String * NCBNAMSZ name_num As Integer name_flags As Integer End Type Private Type ASTAT adapt As ADAPTER_STATUS NameBuff(30) As NAME_BUFFER End Type Private Declare Function Netbios Lib "netapi32.dll" _ (pncb As NCB) As Byte Private Declare Sub CopyMemory Lib "kernel32" Alias "RtlMoveMemory" ( _ hpvDest As Any, ByVal hpvSource As Long, ByVal cbCopy As Long) Private Declare Function GetProcessHeap Lib "kernel32" () As Long Private Declare Function HeapAlloc Lib "kernel32" _ (ByVal hHeap As Long, ByVal dwFlags As Long, _ ByVal dwBytes As Long) As Long Private Declare Function HeapFree Lib "kernel32" (ByVal hHeap As Long, _ ByVal dwFlags As Long, lpMem As Any) As Long Sub Command0_Click() Dim myNcb As NCB Dim bRet As Byte myNcb.ncb_command = NCBRESET bRet = Netbios(myNcb) myNcb.ncb_command = NCBASTAT myNcb.ncb_lana_num = 0 myNcb.ncb_callname = "* " Dim myASTAT As ASTAT, tempASTAT As ASTAT Dim pASTAT As Long myNcb.ncb_length = Len(myASTAT) Debug.Print Err.LastDllError pASTAT = HeapAlloc(GetProcessHeap(), HEAP_GENERATE_EXCEPTIONS _ Or HEAP_ZERO_MEMORY, myNcb.ncb_length) If pASTAT = 0 Then Debug.Print "memory allcoation failed!" Exit Sub End If myNcb.ncb_buffer = pASTAT bRet = Netbios(myNcb) Debug.Print Err.LastDllError CopyMemory myASTAT, myNcb.ncb_buffer, Len(myASTAT) MsgBox Hex(myASTAT.adapt.adapter_address(0)) & " " & _ Hex(myASTAT.adapt.adapter_address(1)) _ & " " & Hex(myASTAT.adapt.adapter_address(2)) & " " _ & Hex(myASTAT.adapt.adapter_address(3)) _ & " " & Hex(myASTAT.adapt.adapter_address(4)) & " " _ & Hex(myASTAT.adapt.adapter_address(5)) HeapFree GetProcessHeap(), 0, pASTAT End Sub -- Lexacorp Ltd http://www.lexacorp.com.pg Information Technology Consultancy, Software Development,System Support. _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From accessd at shaw.ca Sat Jan 3 10:44:27 2004 From: accessd at shaw.ca (Jim Lawrence (AccessD)) Date: Sat, 03 Jan 2004 08:44:27 -0800 Subject: [AccessD] Mac address In-Reply-To: Message-ID: Hi John: Do you require the MAC address or are you just looking for an absolute way to uniquely identify a station? >From what I understand, there is no definitive method for obtaining a computer's MAC address. It depends on the OS, protocols installed and sometimes things can get confusing between other cards and modems. I have always used the station name to define a unique PC (no two computers can exist, on a particular network/domain with the same name, net and subnet)...and I have code for that, if you need it. HTH Jim -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of John W. Colby Sent: Saturday, January 03, 2004 7:37 AM To: Access Developers discussion and problem solving Subject: RE: [AccessD] Mac address Nope, comes back 0:0:0:0 I have found a half dozen solutions, and all do this. It appears to be a case of which protocol you are bound to. This uses netbios which (apparently) my computer isn't using. It seems like a network card, or it's driver, could just be asked what the mac address is. John W. Colby www.ColbyConsulting.com -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Stuart McLachlan Sent: Friday, January 02, 2004 9:52 PM To: Access Developers discussion and problem solving Subject: Re: [AccessD] Mac address On 2 Jan 2004 at 19:53, John W. Colby wrote: > Does anyone have code for retrieving the Mac address of the network card in > a PC? > This will do it. I got it from http://www.vbadmincode.btinternet.co.uk/code.htm: Private Const NCBASTAT = &H33 Private Const NCBNAMSZ = 16 Private Const HEAP_ZERO_MEMORY = &H8 Private Const HEAP_GENERATE_EXCEPTIONS = &H4 Private Const NCBRESET = &H32 Private Type NCB ncb_command As Byte 'Integer ncb_retcode As Byte 'Integer ncb_lsn As Byte 'Integer ncb_num As Byte ' Integer ncb_buffer As Long 'String ncb_length As Integer ncb_callname As String * NCBNAMSZ ncb_name As String * NCBNAMSZ ncb_rto As Byte 'Integer ncb_sto As Byte ' Integer ncb_post As Long ncb_lana_num As Byte 'Integer ncb_cmd_cplt As Byte 'Integer ncb_reserve(9) As Byte ' Reserved, must be 0 ncb_event As Long End Type Private Type ADAPTER_STATUS adapter_address(5) As Byte 'As String * 6 rev_major As Byte 'Integer reserved0 As Byte 'Integer adapter_type As Byte 'Integer rev_minor As Byte 'Integer duration As Integer frmr_recv As Integer frmr_xmit As Integer iframe_recv_err As Integer xmit_aborts As Integer xmit_success As Long recv_success As Long iframe_xmit_err As Integer recv_buff_unavail As Integer t1_timeouts As Integer ti_timeouts As Integer Reserved1 As Long free_ncbs As Integer max_cfg_ncbs As Integer max_ncbs As Integer xmit_buf_unavail As Integer max_dgram_size As Integer pending_sess As Integer max_cfg_sess As Integer max_sess As Integer max_sess_pkt_size As Integer name_count As Integer End Type Private Type NAME_BUFFER name As String * NCBNAMSZ name_num As Integer name_flags As Integer End Type Private Type ASTAT adapt As ADAPTER_STATUS NameBuff(30) As NAME_BUFFER End Type Private Declare Function Netbios Lib "netapi32.dll" _ (pncb As NCB) As Byte Private Declare Sub CopyMemory Lib "kernel32" Alias "RtlMoveMemory" ( _ hpvDest As Any, ByVal hpvSource As Long, ByVal cbCopy As Long) Private Declare Function GetProcessHeap Lib "kernel32" () As Long Private Declare Function HeapAlloc Lib "kernel32" _ (ByVal hHeap As Long, ByVal dwFlags As Long, _ ByVal dwBytes As Long) As Long Private Declare Function HeapFree Lib "kernel32" (ByVal hHeap As Long, _ ByVal dwFlags As Long, lpMem As Any) As Long Sub Command0_Click() Dim myNcb As NCB Dim bRet As Byte myNcb.ncb_command = NCBRESET bRet = Netbios(myNcb) myNcb.ncb_command = NCBASTAT myNcb.ncb_lana_num = 0 myNcb.ncb_callname = "* " Dim myASTAT As ASTAT, tempASTAT As ASTAT Dim pASTAT As Long myNcb.ncb_length = Len(myASTAT) Debug.Print Err.LastDllError pASTAT = HeapAlloc(GetProcessHeap(), HEAP_GENERATE_EXCEPTIONS _ Or HEAP_ZERO_MEMORY, myNcb.ncb_length) If pASTAT = 0 Then Debug.Print "memory allcoation failed!" Exit Sub End If myNcb.ncb_buffer = pASTAT bRet = Netbios(myNcb) Debug.Print Err.LastDllError CopyMemory myASTAT, myNcb.ncb_buffer, Len(myASTAT) MsgBox Hex(myASTAT.adapt.adapter_address(0)) & " " & _ Hex(myASTAT.adapt.adapter_address(1)) _ & " " & Hex(myASTAT.adapt.adapter_address(2)) & " " _ & Hex(myASTAT.adapt.adapter_address(3)) _ & " " & Hex(myASTAT.adapt.adapter_address(4)) & " " _ & Hex(myASTAT.adapt.adapter_address(5)) HeapFree GetProcessHeap(), 0, pASTAT End Sub -- Lexacorp Ltd http://www.lexacorp.com.pg Information Technology Consultancy, Software Development,System Support. _______________________________________________ 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 From jimdettman at earthlink.net Sat Jan 3 11:01:02 2004 From: jimdettman at earthlink.net (Jim Dettman) Date: Sat, 3 Jan 2004 12:01:02 -0500 Subject: [AccessD] Mac address In-Reply-To: Message-ID: John, I've send a code MDB off list. Jim Dettman President, Online Computer Services of WNY, Inc. (315) 699-3443 jimdettman at earthlink.net -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of John W. Colby Sent: Friday, January 02, 2004 7:54 PM To: AccessD Subject: [AccessD] Mac address Does anyone have code for retrieving the Mac address of the network card in a PC? John W. Colby www.ColbyConsulting.com _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From tinanfields at torchlake.com Sat Jan 3 11:09:28 2004 From: tinanfields at torchlake.com (Tina Norris Fields) Date: Sat, 03 Jan 2004 12:09:28 -0500 Subject: [AccessD] Form as Subform - Query Fails - Why? References: <000101c3d1f4$08452340$6501a8c0@papparuff> Message-ID: <3FF6F748.40804@torchlake.com> Hi John, Thanks for the reply. I think I have not been completely clear about my quandary. The parameter query selects records based on the following: Between [Forms]![fCalendar]![BeginningDate] And [Forms]![fCalendar]![EndingDate] - which works fine as long as one sets the dates by opening fCalendar as a stand-alone form. I made a form with a series of instructions, hoping to guide my user from step to step without having to remind the user to set the dates first in the fCalendar - the idea was to embed an instance of the fCalendar in the instruction form - set the dates right here in what is now a subform of the instruction form. If one sets the dates in the embedded instance of fCalendar, the query does not find its parameters. Well, say I to myself, I probably need to tell the query where to find those date textboxes, but I do not find a way to identify them other than as they are already identified . Is there a collection other than [Forms] I need to find? When I examine my fCalendar through the subform control, I see all the correct textbox names - it certainly appears to be the same form - why does setting its dates not provide the necessary parameters to the query? I don't see it. Tina Norris Fields also an optimist BTW I like your Proverbs choice :) John Ruff wrote: >There are a couple of methods o set values on a main form (Independent form >as you call it) from a subform) > >' The txtDate is the name of the object in the subform that sets the date > >1. Forms!NameOfIndependentForm!txtFromDate=txtDate >2. Parent!txtFromDate=txtDate > >I prefer the 2nd method myself. > > >John V. Ruff - The Eternal Optimist :-) > >"Commit to the Lord whatever you do, > and your plans will succeed." Proverbs 16:3 > > > >-----Original Message----- >From: accessd-bounces at databaseadvisors.com >[mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Tina Norris >Fields >Sent: Saturday, January 03, 2004 1:44 AM >To: accessd at databaseadvisors.com >Subject: [AccessD] Form as Subform - Query Fails - Why? > > >Hi, > >Probably I am missing something but I don't understand why this bright >idea of mine didn't work. Here's the picture: > >I have a little calendar form with textboxes BeginningDate and >EndingDate. I have a little parameter query that uses a date range set >Between BeginningDate And EndingDate to select the appropriate records. >The query creates a table of records of people who have made >contributions within the date range. This table is the data source for >a Word document, the acknowledgement letter. > >I thought I'd be really clever and make a form with instructions - >"select the beginning and ending dates on this calendar" "click this >button to create the acknowledgement table" etc. So, I plugged the >calendar form in as a subform on this clever instruction form, rather >than popping open the calendar form. Setting the beginning and ending >dates in the calendar, once it was a subform, did not provide the query >with its parameters. > >I played around with setting the dates on the calendar-form-as-subform, >then opening the calendar form independently - the dates were not set in >the independent form, only in the subform. So, clearly, the instance of >the calendar-form-as-subform to the instruction form is a new beast - >sort of. Making design changes to the calendar-form-as-subform, such as >background color, applies those changes to the independent calendar >form. But, setting textbox values from within the >calendar-form-as-subform does not set those values in the independent >form. Do I really have two beasties here? If so, why can I not find a >way to identify the textboxes in the subform so my query can use them? > >It looked like such a nice idea! What am I doing wrong? > >Thanks, >Tina > > > > > >_______________________________________________ >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 > > > From jwcolby at colbyconsulting.com Sat Jan 3 11:14:16 2004 From: jwcolby at colbyconsulting.com (John W. Colby) Date: Sat, 3 Jan 2004 12:14:16 -0500 Subject: [AccessD] Mac address In-Reply-To: Message-ID: Well... I'm looking at a machine specific piece for copy protection. The work station name might be specific to a network, but is created by the software (or user doing the install) so if the machine went down (as many of mine have over the last few years) if the user didn't select the same name then the key wouldn't work. John W. Colby www.ColbyConsulting.com -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Jim Lawrence (AccessD) Sent: Saturday, January 03, 2004 11:44 AM To: Access Developers discussion and problem solving Subject: RE: [AccessD] Mac address Hi John: Do you require the MAC address or are you just looking for an absolute way to uniquely identify a station? >From what I understand, there is no definitive method for obtaining a computer's MAC address. It depends on the OS, protocols installed and sometimes things can get confusing between other cards and modems. I have always used the station name to define a unique PC (no two computers can exist, on a particular network/domain with the same name, net and subnet)...and I have code for that, if you need it. HTH Jim -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of John W. Colby Sent: Saturday, January 03, 2004 7:37 AM To: Access Developers discussion and problem solving Subject: RE: [AccessD] Mac address Nope, comes back 0:0:0:0 I have found a half dozen solutions, and all do this. It appears to be a case of which protocol you are bound to. This uses netbios which (apparently) my computer isn't using. It seems like a network card, or it's driver, could just be asked what the mac address is. John W. Colby www.ColbyConsulting.com -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Stuart McLachlan Sent: Friday, January 02, 2004 9:52 PM To: Access Developers discussion and problem solving Subject: Re: [AccessD] Mac address On 2 Jan 2004 at 19:53, John W. Colby wrote: > Does anyone have code for retrieving the Mac address of the network card in > a PC? > This will do it. I got it from http://www.vbadmincode.btinternet.co.uk/code.htm: Private Const NCBASTAT = &H33 Private Const NCBNAMSZ = 16 Private Const HEAP_ZERO_MEMORY = &H8 Private Const HEAP_GENERATE_EXCEPTIONS = &H4 Private Const NCBRESET = &H32 Private Type NCB ncb_command As Byte 'Integer ncb_retcode As Byte 'Integer ncb_lsn As Byte 'Integer ncb_num As Byte ' Integer ncb_buffer As Long 'String ncb_length As Integer ncb_callname As String * NCBNAMSZ ncb_name As String * NCBNAMSZ ncb_rto As Byte 'Integer ncb_sto As Byte ' Integer ncb_post As Long ncb_lana_num As Byte 'Integer ncb_cmd_cplt As Byte 'Integer ncb_reserve(9) As Byte ' Reserved, must be 0 ncb_event As Long End Type Private Type ADAPTER_STATUS adapter_address(5) As Byte 'As String * 6 rev_major As Byte 'Integer reserved0 As Byte 'Integer adapter_type As Byte 'Integer rev_minor As Byte 'Integer duration As Integer frmr_recv As Integer frmr_xmit As Integer iframe_recv_err As Integer xmit_aborts As Integer xmit_success As Long recv_success As Long iframe_xmit_err As Integer recv_buff_unavail As Integer t1_timeouts As Integer ti_timeouts As Integer Reserved1 As Long free_ncbs As Integer max_cfg_ncbs As Integer max_ncbs As Integer xmit_buf_unavail As Integer max_dgram_size As Integer pending_sess As Integer max_cfg_sess As Integer max_sess As Integer max_sess_pkt_size As Integer name_count As Integer End Type Private Type NAME_BUFFER name As String * NCBNAMSZ name_num As Integer name_flags As Integer End Type Private Type ASTAT adapt As ADAPTER_STATUS NameBuff(30) As NAME_BUFFER End Type Private Declare Function Netbios Lib "netapi32.dll" _ (pncb As NCB) As Byte Private Declare Sub CopyMemory Lib "kernel32" Alias "RtlMoveMemory" ( _ hpvDest As Any, ByVal hpvSource As Long, ByVal cbCopy As Long) Private Declare Function GetProcessHeap Lib "kernel32" () As Long Private Declare Function HeapAlloc Lib "kernel32" _ (ByVal hHeap As Long, ByVal dwFlags As Long, _ ByVal dwBytes As Long) As Long Private Declare Function HeapFree Lib "kernel32" (ByVal hHeap As Long, _ ByVal dwFlags As Long, lpMem As Any) As Long Sub Command0_Click() Dim myNcb As NCB Dim bRet As Byte myNcb.ncb_command = NCBRESET bRet = Netbios(myNcb) myNcb.ncb_command = NCBASTAT myNcb.ncb_lana_num = 0 myNcb.ncb_callname = "* " Dim myASTAT As ASTAT, tempASTAT As ASTAT Dim pASTAT As Long myNcb.ncb_length = Len(myASTAT) Debug.Print Err.LastDllError pASTAT = HeapAlloc(GetProcessHeap(), HEAP_GENERATE_EXCEPTIONS _ Or HEAP_ZERO_MEMORY, myNcb.ncb_length) If pASTAT = 0 Then Debug.Print "memory allcoation failed!" Exit Sub End If myNcb.ncb_buffer = pASTAT bRet = Netbios(myNcb) Debug.Print Err.LastDllError CopyMemory myASTAT, myNcb.ncb_buffer, Len(myASTAT) MsgBox Hex(myASTAT.adapt.adapter_address(0)) & " " & _ Hex(myASTAT.adapt.adapter_address(1)) _ & " " & Hex(myASTAT.adapt.adapter_address(2)) & " " _ & Hex(myASTAT.adapt.adapter_address(3)) _ & " " & Hex(myASTAT.adapt.adapter_address(4)) & " " _ & Hex(myASTAT.adapt.adapter_address(5)) HeapFree GetProcessHeap(), 0, pASTAT End Sub -- Lexacorp Ltd http://www.lexacorp.com.pg Information Technology Consultancy, Software Development,System Support. _______________________________________________ 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 _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From gustav at cactus.dk Sat Jan 3 11:48:50 2004 From: gustav at cactus.dk (Gustav Brock) Date: Sat, 3 Jan 2004 18:48:50 +0100 Subject: [AccessD] Form as Subform - Query Fails - Why? In-Reply-To: <3FF6F748.40804@torchlake.com> References: <000101c3d1f4$08452340$6501a8c0@papparuff> <3FF6F748.40804@torchlake.com> Message-ID: <16831194214.20040103184850@cactus.dk> Hi Tina Try with Between [Forms]![fInstructions]![subYourSubformControlName].Form![BeginningDate] And [Forms]![fInstructions]![subYourSubformControlName].Form![EndingDate] /gustav > Hi John, > Thanks for the reply. I think I have not been completely clear about my > quandary. The parameter query selects records based on the following: > Between [Forms]![fCalendar]![BeginningDate] And > [Forms]![fCalendar]![EndingDate] > - which works fine as long as one sets the dates by opening fCalendar as > a stand-alone form. > I made a form with a series of instructions, hoping to guide my user > from step to step without having to remind the user to set the dates > first in the fCalendar - > the idea was to embed an instance of the fCalendar in the instruction > form - set the dates right here in what is now a subform of the > instruction form. > If one sets the dates in the embedded instance of fCalendar, the query > does not find its parameters. Well, say I to myself, I probably need to > tell the query where to find those date textboxes, but I do not find a > way to identify them other than as they are already identified . Is > there a collection other than [Forms] I need to find? When I examine my > fCalendar through the subform control, I see all the correct textbox > names - it certainly appears to be the same form - why does setting its > dates not provide the necessary parameters to the query? I don't see it. From gustav at cactus.dk Sat Jan 3 11:53:21 2004 From: gustav at cactus.dk (Gustav Brock) Date: Sat, 3 Jan 2004 18:53:21 +0100 Subject: [AccessD] Mac address In-Reply-To: References: Message-ID: <9731465094.20040103185321@cactus.dk> Hi John Hmm ... so the user changes his/hers NIC and is hosed ..? /gustav > Date: 2004-01-03 18:14 > Well... I'm looking at a machine specific piece for copy protection. The > work station name might be specific to a network, but is created by the > software (or user doing the install) so if the machine went down (as many of > mine have over the last few years) if the user didn't select the same name > then the key wouldn't work. From tinanfields at torchlake.com Sat Jan 3 12:03:07 2004 From: tinanfields at torchlake.com (Tina Norris Fields) Date: Sat, 03 Jan 2004 13:03:07 -0500 Subject: [AccessD] Form as Subform - Query Fails - Why? References: <000101c3d1f4$08452340$6501a8c0@papparuff> <3FF6F748.40804@torchlake.com> <16831194214.20040103184850@cactus.dk> Message-ID: <3FF703DB.9070707@torchlake.com> Thanks Gustav, I will try that - Tina Gustav Brock wrote: >Hi Tina > >Try with > > Between > [Forms]![fInstructions]![subYourSubformControlName].Form![BeginningDate] > And > [Forms]![fInstructions]![subYourSubformControlName].Form![EndingDate] > >/gustav > > > > >>Hi John, >> >> > > > >>Thanks for the reply. I think I have not been completely clear about my >>quandary. The parameter query selects records based on the following: >> >> > > > >>Between [Forms]![fCalendar]![BeginningDate] And >>[Forms]![fCalendar]![EndingDate] >> >> > > > >>- which works fine as long as one sets the dates by opening fCalendar as >>a stand-alone form. >> >> > > > >>I made a form with a series of instructions, hoping to guide my user >>from step to step without having to remind the user to set the dates >>first in the fCalendar - >>the idea was to embed an instance of the fCalendar in the instruction >>form - set the dates right here in what is now a subform of the >>instruction form. >> >> > > > >>If one sets the dates in the embedded instance of fCalendar, the query >>does not find its parameters. Well, say I to myself, I probably need to >>tell the query where to find those date textboxes, but I do not find a >>way to identify them other than as they are already identified . Is >>there a collection other than [Forms] I need to find? When I examine my >>fCalendar through the subform control, I see all the correct textbox >>names - it certainly appears to be the same form - why does setting its >>dates not provide the necessary parameters to the query? I don't see it. >> >> > >_______________________________________________ >AccessD mailing list >AccessD at databaseadvisors.com >http://databaseadvisors.com/mailman/listinfo/accessd >Website: http://www.databaseadvisors.com > > > From jwcolby at colbyconsulting.com Sat Jan 3 12:34:49 2004 From: jwcolby at colbyconsulting.com (John W. Colby) Date: Sat, 3 Jan 2004 13:34:49 -0500 Subject: [AccessD] Mac address In-Reply-To: <9731465094.20040103185321@cactus.dk> Message-ID: Yea, but you have to start somewhere. More and more NICs are embedded right in the motherboards so this is getting less and less likely. John W. Colby www.ColbyConsulting.com -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Gustav Brock Sent: Saturday, January 03, 2004 12:53 PM To: Access Developers discussion and problem solving Subject: Re: [AccessD] Mac address Hi John Hmm ... so the user changes his/hers NIC and is hosed ..? /gustav > Date: 2004-01-03 18:14 > Well... I'm looking at a machine specific piece for copy protection. The > work station name might be specific to a network, but is created by the > software (or user doing the install) so if the machine went down (as many of > mine have over the last few years) if the user didn't select the same name > then the key wouldn't work. _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From Subscriptions at servicexp.com Sat Jan 3 13:08:57 2004 From: Subscriptions at servicexp.com (Robert Gracie) Date: Sat, 3 Jan 2004 14:08:57 -0500 Subject: [AccessD] Mac address In-Reply-To: Message-ID: John, Will this get you started.. Paste in a Module....... Public Const MAX_HOSTNAME_LEN = 132 Public Const MAX_DOMAIN_NAME_LEN = 132 Public Const MAX_SCOPE_ID_LEN = 260 Public Const MAX_ADAPTER_NAME_LENGTH = 260 Public Const MAX_ADAPTER_ADDRESS_LENGTH = 8 Public Const MAX_ADAPTER_DESCRIPTION_LENGTH = 132 Public Const ERROR_BUFFER_OVERFLOW = 111 Public Const MIB_IF_TYPE_ETHERNET = 6 Public Const MIB_IF_TYPE_TOKENRING = 9 Public Const MIB_IF_TYPE_FDDI = 15 Public Const MIB_IF_TYPE_PPP = 23 Public Const MIB_IF_TYPE_LOOPBACK = 24 Public Const MIB_IF_TYPE_SLIP = 28 Type IP_ADDR_STRING Next As Long IpAddress As String * 16 IpMask As String * 16 Context As Long End Type Type IP_ADAPTER_INFO Next As Long ComboIndex As Long AdapterName As String * MAX_ADAPTER_NAME_LENGTH Description As String * MAX_ADAPTER_DESCRIPTION_LENGTH AddressLength As Long Address(MAX_ADAPTER_ADDRESS_LENGTH - 1) As Byte Index As Long Type As Long DhcpEnabled As Long CurrentIpAddress As Long IpAddressList As IP_ADDR_STRING GatewayList As IP_ADDR_STRING DhcpServer As IP_ADDR_STRING HaveWins As Byte PrimaryWinsServer As IP_ADDR_STRING SecondaryWinsServer As IP_ADDR_STRING LeaseObtained As Long LeaseExpires As Long End Type Type FIXED_INFO HostName As String * MAX_HOSTNAME_LEN DomainName As String * MAX_DOMAIN_NAME_LEN CurrentDnsServer As Long DnsServerList As IP_ADDR_STRING NodeType As Long ScopeId As String * MAX_SCOPE_ID_LEN EnableRouting As Long EnableProxy As Long EnableDns As Long End Type Public Declare Function GetNetworkParams Lib "IPHlpApi.dll" _ (FixedInfo As Any, pOutBufLen As Long) As Long Public Declare Function GetAdaptersInfo Lib "IPHlpApi.dll" _ (IpAdapterInfo As Any, pOutBufLen As Long) As Long Public Declare Sub CopyMemory Lib "kernel32" Alias "RtlMoveMemory" _ (Destination As Any, Source As Any, ByVal Length As Long) Sub main() Dim error As Long Dim FixedInfoSize As Long Dim AdapterInfoSize As Long Dim i As Integer Dim PhysicalAddress As String Dim NewTime As Date Dim AdapterInfo As IP_ADAPTER_INFO Dim AddrStr As IP_ADDR_STRING Dim FixedInfo As FIXED_INFO Dim Buffer As IP_ADDR_STRING Dim pAddrStr As Long Dim pAdapt As Long Dim Buffer2 As IP_ADAPTER_INFO Dim FixedInfoBuffer() As Byte Dim AdapterInfoBuffer() As Byte ' Get the main IP configuration information for this machine ' using a FIXED_INFO structure. FixedInfoSize = 0 error = GetNetworkParams(ByVal 0&, FixedInfoSize) If error <> 0 Then If error <> ERROR_BUFFER_OVERFLOW Then MsgBox "GetNetworkParams sizing failed with error " & error Exit Sub End If End If ReDim FixedInfoBuffer(FixedInfoSize - 1) error = GetNetworkParams(FixedInfoBuffer(0), FixedInfoSize) If error = 0 Then CopyMemory FixedInfo, FixedInfoBuffer(0), FixedInfoSize MsgBox "Host Name: " & FixedInfo.HostName MsgBox "DNS Servers: " & FixedInfo.DnsServerList.IpAddress pAddrStr = FixedInfo.DnsServerList.Next Do While pAddrStr <> 0 CopyMemory Buffer, ByVal pAddrStr, LenB(Buffer) MsgBox "DNS Servers: " & Buffer.IpAddress pAddrStr = Buffer.Next Loop Select Case FixedInfo.NodeType Case 1 MsgBox "Node type: Broadcast" Case 2 MsgBox "Node type: Peer to peer" Case 4 MsgBox "Node type: Mixed" Case 8 MsgBox "Node type: Hybrid" Case Else MsgBox "Unknown node type" End Select MsgBox "NetBIOS Scope ID: " & FixedInfo.ScopeId If FixedInfo.EnableRouting Then MsgBox "IP Routing Enabled " Else MsgBox "IP Routing not enabled" End If If FixedInfo.EnableProxy Then MsgBox "WINS Proxy Enabled " Else MsgBox "WINS Proxy not Enabled " End If If FixedInfo.EnableDns Then MsgBox "NetBIOS Resolution Uses DNS " Else MsgBox "NetBIOS Resolution Does not use DNS " End If Else MsgBox "GetNetworkParams failed with error " & error Exit Sub End If ' Enumerate all of the adapter specific information using the ' IP_ADAPTER_INFO structure. ' Note: IP_ADAPTER_INFO contains a linked list of adapter entries. AdapterInfoSize = 0 error = GetAdaptersInfo(ByVal 0&, AdapterInfoSize) If error <> 0 Then If error <> ERROR_BUFFER_OVERFLOW Then MsgBox "GetAdaptersInfo sizing failed with error " & error Exit Sub End If End If ReDim AdapterInfoBuffer(AdapterInfoSize - 1) ' Get actual adapter information error = GetAdaptersInfo(AdapterInfoBuffer(0), AdapterInfoSize) If error <> 0 Then MsgBox "GetAdaptersInfo failed with error " & error Exit Sub End If ' Allocate memory CopyMemory AdapterInfo, AdapterInfoBuffer(0), AdapterInfoSize pAdapt = AdapterInfo.Next Do CopyMemory Buffer2, AdapterInfo, AdapterInfoSize Select Case Buffer2.Type Case MIB_IF_TYPE_ETHERNET MsgBox "Adapter name: Ethernet adapter " Case MIB_IF_TYPE_TOKENRING MsgBox "Adapter name: Token Ring adapter " Case MIB_IF_TYPE_FDDI MsgBox "Adapter name: FDDI adapter " Case MIB_IF_TYPE_PPP MsgBox "Adapter name: PPP adapter" Case MIB_IF_TYPE_LOOPBACK MsgBox "Adapter name: Loopback adapter " Case MIB_IF_TYPE_SLIP MsgBox "Adapter name: Slip adapter " Case Else MsgBox "Adapter name: Other adapter " End Select MsgBox "AdapterDescription: " & Buffer2.Description PhysicalAddress = "" For i = 0 To Buffer2.AddressLength - 1 PhysicalAddress = PhysicalAddress & Hex(Buffer2.Address(i)) If i < Buffer2.AddressLength - 1 Then PhysicalAddress = PhysicalAddress & "-" End If Next MsgBox "Physical Address: " & PhysicalAddress If Buffer2.DhcpEnabled Then MsgBox "DHCP Enabled " Else MsgBox "DHCP disabled" End If MsgBox "IP Address: " & Buffer2.IpAddressList.IpAddress MsgBox "Subnet Mask: " & Buffer2.IpAddressList.IpMask pAddrStr = Buffer2.IpAddressList.Next Do While pAddrStr <> 0 CopyMemory Buffer, Buffer2.IpAddressList, LenB(Buffer) MsgBox "IP Address: " & Buffer.IpAddress MsgBox "Subnet Mask: " & Buffer.IpMask pAddrStr = Buffer.Next If pAddrStr <> 0 Then CopyMemory Buffer2.IpAddressList, ByVal pAddrStr, _ LenB(Buffer2.IpAddressList) End If Loop MsgBox "Default Gateway: " & Buffer2.GatewayList.IpAddress pAddrStr = Buffer2.GatewayList.Next Do While pAddrStr <> 0 CopyMemory Buffer, Buffer2.GatewayList, LenB(Buffer) MsgBox "IP Address: " & Buffer.IpAddress pAddrStr = Buffer.Next If pAddrStr <> 0 Then CopyMemory Buffer2.GatewayList, ByVal pAddrStr, _ LenB(Buffer2.GatewayList) End If Loop MsgBox "DHCP Server: " & Buffer2.DhcpServer.IpAddress MsgBox "Primary WINS Server: " & _ Buffer2.PrimaryWinsServer.IpAddress MsgBox "Secondary WINS Server: " & _ Buffer2.SecondaryWinsServer.IpAddress ' Display time. NewTime = DateAdd("s", Buffer2.LeaseObtained, #1/1/1970#) MsgBox "Lease Obtained: " & _ CStr(Format(NewTime, "dddd, mmm d hh:mm:ss yyyy")) NewTime = DateAdd("s", Buffer2.LeaseExpires, #1/1/1970#) MsgBox "Lease Expires : " & _ CStr(Format(NewTime, "dddd, mmm d hh:mm:ss yyyy")) pAdapt = Buffer2.Next If pAdapt <> 0 Then CopyMemory AdapterInfo, ByVal pAdapt, AdapterInfoSize End If Loop Until pAdapt = 0 End Sub Robert Gracie www.servicexp.com -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of John W. Colby Sent: Saturday, January 03, 2004 1:35 PM To: Access Developers discussion and problem solving Subject: RE: [AccessD] Mac address Yea, but you have to start somewhere. More and more NICs are embedded right in the motherboards so this is getting less and less likely. John W. Colby www.ColbyConsulting.com -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Gustav Brock Sent: Saturday, January 03, 2004 12:53 PM To: Access Developers discussion and problem solving Subject: Re: [AccessD] Mac address Hi John Hmm ... so the user changes his/hers NIC and is hosed ..? /gustav > Date: 2004-01-03 18:14 > Well... I'm looking at a machine specific piece for copy protection. The > work station name might be specific to a network, but is created by the > software (or user doing the install) so if the machine went down (as many of > mine have over the last few years) if the user didn't select the same name > then the key wouldn't work. _______________________________________________ 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 From tinanfields at torchlake.com Sat Jan 3 13:30:25 2004 From: tinanfields at torchlake.com (Tina Norris Fields) Date: Sat, 03 Jan 2004 14:30:25 -0500 Subject: [AccessD] Form as Subform - Query Fails - Why? References: <000101c3d1f4$08452340$6501a8c0@papparuff> <3FF6F748.40804@torchlake.com> <16831194214.20040103184850@cactus.dk> Message-ID: <3FF71851.7020309@torchlake.com> Hi Gustav, I tried the syntax you gave me, and although it is always possible I screwed up in the typing, I don't think I did. The message box still came up looking for the parameters. So, I tried another tack. I made a copy of my fCalendar, renamed it frmAcknowledgeCalendar, and expanded it to accommodate the other controls I want. Great! My queries all work. For the time being my needs on this are met, but I am still very curious about what I am missing to make the original idea work. This one ends up LOOKING like the original idea, but it isn't really what I started with. Now, on to the next bit. As the last step, I want my user to click a button to launch the Word form document, which will be kept in the same directory as the little database. Here is the wizard-created event procedure to simply launch Word: Private Sub cmdOpenWordDoc_Click() On Error GoTo Err_cmdOpenWordDoc_Click Dim oApp As Object Set oApp = CreateObject("Word.Application") oApp.Visible = True Exit_cmdOpenWordDoc_Click: Exit Sub Err_cmdOpenWordDoc_Click: MsgBox Err.Description Resume Exit_cmdOpenWordDoc_Click End Sub What I want to do is edit this sub to force it to open TLA_Acknowledge_Form.doc. I know this is eminently do-able, but I'm uncertain of my command language here. I think I saw something on this subject a little while back on this list, but I'll be lazy and ask - what do I need to do to tell it to open my form document? Thanks, Tina Gustav Brock wrote: >Hi Tina > >Try with > > Between > [Forms]![fInstructions]![subYourSubformControlName].Form![BeginningDate] > And > [Forms]![fInstructions]![subYourSubformControlName].Form![EndingDate] > >/gustav > > > > >>Hi John, >> >> > > > >>Thanks for the reply. I think I have not been completely clear about my >>quandary. The parameter query selects records based on the following: >> >> > > > >>Between [Forms]![fCalendar]![BeginningDate] And >>[Forms]![fCalendar]![EndingDate] >> >> > > > >>- which works fine as long as one sets the dates by opening fCalendar as >>a stand-alone form. >> >> > > > >>I made a form with a series of instructions, hoping to guide my user >>from step to step without having to remind the user to set the dates >>first in the fCalendar - >>the idea was to embed an instance of the fCalendar in the instruction >>form - set the dates right here in what is now a subform of the >>instruction form. >> >> > > > >>If one sets the dates in the embedded instance of fCalendar, the query >>does not find its parameters. Well, say I to myself, I probably need to >>tell the query where to find those date textboxes, but I do not find a >>way to identify them other than as they are already identified . Is >>there a collection other than [Forms] I need to find? When I examine my >>fCalendar through the subform control, I see all the correct textbox >>names - it certainly appears to be the same form - why does setting its >>dates not provide the necessary parameters to the query? I don't see it. >> >> > >_______________________________________________ >AccessD mailing list >AccessD at databaseadvisors.com >http://databaseadvisors.com/mailman/listinfo/accessd >Website: http://www.databaseadvisors.com > > > From martyconnelly at shaw.ca Sat Jan 3 14:06:35 2004 From: martyconnelly at shaw.ca (MartyConnelly) Date: Sat, 03 Jan 2004 12:06:35 -0800 Subject: [AccessD] Mac address References: Message-ID: <3FF720CB.8060602@shaw.ca> If you have WinXP Pro from cmd window Getmac /V /FO List You can also get via WMI with code John W. Colby wrote: >Nope, comes back 0:0:0:0 > >I have found a half dozen solutions, and all do this. It appears to be a >case of which protocol you are bound to. This uses netbios which >(apparently) my computer isn't using. > >It seems like a network card, or it's driver, could just be asked what the >mac address is. > >John W. Colby >www.ColbyConsulting.com > >-----Original Message----- >From: accessd-bounces at databaseadvisors.com >[mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Stuart >McLachlan >Sent: Friday, January 02, 2004 9:52 PM >To: Access Developers discussion and problem solving >Subject: Re: [AccessD] Mac address > > >On 2 Jan 2004 at 19:53, John W. Colby wrote: > > > >>Does anyone have code for retrieving the Mac address of the network card >> >> >in > > >>a PC? >> >> >> > >This will do it. I got it from >http://www.vbadmincode.btinternet.co.uk/code.htm: > > >Private Const NCBASTAT = &H33 >Private Const NCBNAMSZ = 16 >Private Const HEAP_ZERO_MEMORY = &H8 >Private Const HEAP_GENERATE_EXCEPTIONS = &H4 >Private Const NCBRESET = &H32 > >Private Type NCB > > ncb_command As Byte 'Integer > ncb_retcode As Byte 'Integer > ncb_lsn As Byte 'Integer > ncb_num As Byte ' Integer > ncb_buffer As Long 'String > ncb_length As Integer > ncb_callname As String * NCBNAMSZ > ncb_name As String * NCBNAMSZ > ncb_rto As Byte 'Integer > ncb_sto As Byte ' Integer > ncb_post As Long > ncb_lana_num As Byte 'Integer > ncb_cmd_cplt As Byte 'Integer > ncb_reserve(9) As Byte ' Reserved, must be 0 > ncb_event As Long > End Type > Private Type ADAPTER_STATUS > adapter_address(5) As Byte 'As String * 6 > rev_major As Byte 'Integer > reserved0 As Byte 'Integer > adapter_type As Byte 'Integer > rev_minor As Byte 'Integer > duration As Integer > frmr_recv As Integer > frmr_xmit As Integer > iframe_recv_err As Integer > xmit_aborts As Integer > xmit_success As Long > recv_success As Long > iframe_xmit_err As Integer > recv_buff_unavail As Integer > t1_timeouts As Integer > ti_timeouts As Integer > Reserved1 As Long > free_ncbs As Integer > max_cfg_ncbs As Integer > max_ncbs As Integer > xmit_buf_unavail As Integer > max_dgram_size As Integer > pending_sess As Integer > max_cfg_sess As Integer > max_sess As Integer > max_sess_pkt_size As Integer > name_count As Integer > End Type > Private Type NAME_BUFFER > name As String * NCBNAMSZ > name_num As Integer > name_flags As Integer > End Type > Private Type ASTAT > adapt As ADAPTER_STATUS > NameBuff(30) As NAME_BUFFER > End Type > > Private Declare Function Netbios Lib "netapi32.dll" _ > (pncb As NCB) As Byte > Private Declare Sub CopyMemory Lib "kernel32" Alias "RtlMoveMemory" ( _ > hpvDest As Any, ByVal hpvSource As Long, ByVal cbCopy As Long) > Private Declare Function GetProcessHeap Lib "kernel32" () As Long > Private Declare Function HeapAlloc Lib "kernel32" _ > (ByVal hHeap As Long, ByVal dwFlags As Long, _ > ByVal dwBytes As Long) As Long > Private Declare Function HeapFree Lib "kernel32" (ByVal hHeap As Long, _ > ByVal dwFlags As Long, lpMem As Any) As Long > > Sub Command0_Click() > Dim myNcb As NCB > Dim bRet As Byte > myNcb.ncb_command = NCBRESET > bRet = Netbios(myNcb) > > myNcb.ncb_command = NCBASTAT > myNcb.ncb_lana_num = 0 > myNcb.ncb_callname = "* " > > Dim myASTAT As ASTAT, tempASTAT As ASTAT > Dim pASTAT As Long > myNcb.ncb_length = Len(myASTAT) > Debug.Print Err.LastDllError > pASTAT = HeapAlloc(GetProcessHeap(), HEAP_GENERATE_EXCEPTIONS _ > Or HEAP_ZERO_MEMORY, myNcb.ncb_length) > If pASTAT = 0 Then > Debug.Print "memory allcoation failed!" > Exit Sub > End If > myNcb.ncb_buffer = pASTAT > bRet = Netbios(myNcb) > Debug.Print Err.LastDllError > CopyMemory myASTAT, myNcb.ncb_buffer, Len(myASTAT) > MsgBox Hex(myASTAT.adapt.adapter_address(0)) & " " & _ > Hex(myASTAT.adapt.adapter_address(1)) _ > & " " & Hex(myASTAT.adapt.adapter_address(2)) & " " _ > & Hex(myASTAT.adapt.adapter_address(3)) _ > & " " & Hex(myASTAT.adapt.adapter_address(4)) & " " _ > & Hex(myASTAT.adapt.adapter_address(5)) > HeapFree GetProcessHeap(), 0, pASTAT > End Sub > >-- >Lexacorp Ltd >http://www.lexacorp.com.pg >Information Technology Consultancy, Software Development,System >Support. > > > >_______________________________________________ >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 > > > -- Marty Connelly Victoria, B.C. Canada From jwcolby at colbyconsulting.com Sat Jan 3 14:47:01 2004 From: jwcolby at colbyconsulting.com (John W. Colby) Date: Sat, 3 Jan 2004 15:47:01 -0500 Subject: [AccessD] Mac address In-Reply-To: Message-ID: That may have done it, at least for my computer. This appears to be one of those things that may be windows version dependent. Thanks anyway, it does seem to work for mine! John W. Colby www.ColbyConsulting.com -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Robert Gracie Sent: Saturday, January 03, 2004 2:09 PM To: Access Developers discussion and problem solving Subject: RE: [AccessD] Mac address John, Will this get you started.. Paste in a Module....... Public Const MAX_HOSTNAME_LEN = 132 Public Const MAX_DOMAIN_NAME_LEN = 132 Public Const MAX_SCOPE_ID_LEN = 260 Public Const MAX_ADAPTER_NAME_LENGTH = 260 Public Const MAX_ADAPTER_ADDRESS_LENGTH = 8 Public Const MAX_ADAPTER_DESCRIPTION_LENGTH = 132 Public Const ERROR_BUFFER_OVERFLOW = 111 Public Const MIB_IF_TYPE_ETHERNET = 6 Public Const MIB_IF_TYPE_TOKENRING = 9 Public Const MIB_IF_TYPE_FDDI = 15 Public Const MIB_IF_TYPE_PPP = 23 Public Const MIB_IF_TYPE_LOOPBACK = 24 Public Const MIB_IF_TYPE_SLIP = 28 Type IP_ADDR_STRING Next As Long IpAddress As String * 16 IpMask As String * 16 Context As Long End Type Type IP_ADAPTER_INFO Next As Long ComboIndex As Long AdapterName As String * MAX_ADAPTER_NAME_LENGTH Description As String * MAX_ADAPTER_DESCRIPTION_LENGTH AddressLength As Long Address(MAX_ADAPTER_ADDRESS_LENGTH - 1) As Byte Index As Long Type As Long DhcpEnabled As Long CurrentIpAddress As Long IpAddressList As IP_ADDR_STRING GatewayList As IP_ADDR_STRING DhcpServer As IP_ADDR_STRING HaveWins As Byte PrimaryWinsServer As IP_ADDR_STRING SecondaryWinsServer As IP_ADDR_STRING LeaseObtained As Long LeaseExpires As Long End Type Type FIXED_INFO HostName As String * MAX_HOSTNAME_LEN DomainName As String * MAX_DOMAIN_NAME_LEN CurrentDnsServer As Long DnsServerList As IP_ADDR_STRING NodeType As Long ScopeId As String * MAX_SCOPE_ID_LEN EnableRouting As Long EnableProxy As Long EnableDns As Long End Type Public Declare Function GetNetworkParams Lib "IPHlpApi.dll" _ (FixedInfo As Any, pOutBufLen As Long) As Long Public Declare Function GetAdaptersInfo Lib "IPHlpApi.dll" _ (IpAdapterInfo As Any, pOutBufLen As Long) As Long Public Declare Sub CopyMemory Lib "kernel32" Alias "RtlMoveMemory" _ (Destination As Any, Source As Any, ByVal Length As Long) Sub main() Dim error As Long Dim FixedInfoSize As Long Dim AdapterInfoSize As Long Dim i As Integer Dim PhysicalAddress As String Dim NewTime As Date Dim AdapterInfo As IP_ADAPTER_INFO Dim AddrStr As IP_ADDR_STRING Dim FixedInfo As FIXED_INFO Dim Buffer As IP_ADDR_STRING Dim pAddrStr As Long Dim pAdapt As Long Dim Buffer2 As IP_ADAPTER_INFO Dim FixedInfoBuffer() As Byte Dim AdapterInfoBuffer() As Byte ' Get the main IP configuration information for this machine ' using a FIXED_INFO structure. FixedInfoSize = 0 error = GetNetworkParams(ByVal 0&, FixedInfoSize) If error <> 0 Then If error <> ERROR_BUFFER_OVERFLOW Then MsgBox "GetNetworkParams sizing failed with error " & error Exit Sub End If End If ReDim FixedInfoBuffer(FixedInfoSize - 1) error = GetNetworkParams(FixedInfoBuffer(0), FixedInfoSize) If error = 0 Then CopyMemory FixedInfo, FixedInfoBuffer(0), FixedInfoSize MsgBox "Host Name: " & FixedInfo.HostName MsgBox "DNS Servers: " & FixedInfo.DnsServerList.IpAddress pAddrStr = FixedInfo.DnsServerList.Next Do While pAddrStr <> 0 CopyMemory Buffer, ByVal pAddrStr, LenB(Buffer) MsgBox "DNS Servers: " & Buffer.IpAddress pAddrStr = Buffer.Next Loop Select Case FixedInfo.NodeType Case 1 MsgBox "Node type: Broadcast" Case 2 MsgBox "Node type: Peer to peer" Case 4 MsgBox "Node type: Mixed" Case 8 MsgBox "Node type: Hybrid" Case Else MsgBox "Unknown node type" End Select MsgBox "NetBIOS Scope ID: " & FixedInfo.ScopeId If FixedInfo.EnableRouting Then MsgBox "IP Routing Enabled " Else MsgBox "IP Routing not enabled" End If If FixedInfo.EnableProxy Then MsgBox "WINS Proxy Enabled " Else MsgBox "WINS Proxy not Enabled " End If If FixedInfo.EnableDns Then MsgBox "NetBIOS Resolution Uses DNS " Else MsgBox "NetBIOS Resolution Does not use DNS " End If Else MsgBox "GetNetworkParams failed with error " & error Exit Sub End If ' Enumerate all of the adapter specific information using the ' IP_ADAPTER_INFO structure. ' Note: IP_ADAPTER_INFO contains a linked list of adapter entries. AdapterInfoSize = 0 error = GetAdaptersInfo(ByVal 0&, AdapterInfoSize) If error <> 0 Then If error <> ERROR_BUFFER_OVERFLOW Then MsgBox "GetAdaptersInfo sizing failed with error " & error Exit Sub End If End If ReDim AdapterInfoBuffer(AdapterInfoSize - 1) ' Get actual adapter information error = GetAdaptersInfo(AdapterInfoBuffer(0), AdapterInfoSize) If error <> 0 Then MsgBox "GetAdaptersInfo failed with error " & error Exit Sub End If ' Allocate memory CopyMemory AdapterInfo, AdapterInfoBuffer(0), AdapterInfoSize pAdapt = AdapterInfo.Next Do CopyMemory Buffer2, AdapterInfo, AdapterInfoSize Select Case Buffer2.Type Case MIB_IF_TYPE_ETHERNET MsgBox "Adapter name: Ethernet adapter " Case MIB_IF_TYPE_TOKENRING MsgBox "Adapter name: Token Ring adapter " Case MIB_IF_TYPE_FDDI MsgBox "Adapter name: FDDI adapter " Case MIB_IF_TYPE_PPP MsgBox "Adapter name: PPP adapter" Case MIB_IF_TYPE_LOOPBACK MsgBox "Adapter name: Loopback adapter " Case MIB_IF_TYPE_SLIP MsgBox "Adapter name: Slip adapter " Case Else MsgBox "Adapter name: Other adapter " End Select MsgBox "AdapterDescription: " & Buffer2.Description PhysicalAddress = "" For i = 0 To Buffer2.AddressLength - 1 PhysicalAddress = PhysicalAddress & Hex(Buffer2.Address(i)) If i < Buffer2.AddressLength - 1 Then PhysicalAddress = PhysicalAddress & "-" End If Next MsgBox "Physical Address: " & PhysicalAddress If Buffer2.DhcpEnabled Then MsgBox "DHCP Enabled " Else MsgBox "DHCP disabled" End If MsgBox "IP Address: " & Buffer2.IpAddressList.IpAddress MsgBox "Subnet Mask: " & Buffer2.IpAddressList.IpMask pAddrStr = Buffer2.IpAddressList.Next Do While pAddrStr <> 0 CopyMemory Buffer, Buffer2.IpAddressList, LenB(Buffer) MsgBox "IP Address: " & Buffer.IpAddress MsgBox "Subnet Mask: " & Buffer.IpMask pAddrStr = Buffer.Next If pAddrStr <> 0 Then CopyMemory Buffer2.IpAddressList, ByVal pAddrStr, _ LenB(Buffer2.IpAddressList) End If Loop MsgBox "Default Gateway: " & Buffer2.GatewayList.IpAddress pAddrStr = Buffer2.GatewayList.Next Do While pAddrStr <> 0 CopyMemory Buffer, Buffer2.GatewayList, LenB(Buffer) MsgBox "IP Address: " & Buffer.IpAddress pAddrStr = Buffer.Next If pAddrStr <> 0 Then CopyMemory Buffer2.GatewayList, ByVal pAddrStr, _ LenB(Buffer2.GatewayList) End If Loop MsgBox "DHCP Server: " & Buffer2.DhcpServer.IpAddress MsgBox "Primary WINS Server: " & _ Buffer2.PrimaryWinsServer.IpAddress MsgBox "Secondary WINS Server: " & _ Buffer2.SecondaryWinsServer.IpAddress ' Display time. NewTime = DateAdd("s", Buffer2.LeaseObtained, #1/1/1970#) MsgBox "Lease Obtained: " & _ CStr(Format(NewTime, "dddd, mmm d hh:mm:ss yyyy")) NewTime = DateAdd("s", Buffer2.LeaseExpires, #1/1/1970#) MsgBox "Lease Expires : " & _ CStr(Format(NewTime, "dddd, mmm d hh:mm:ss yyyy")) pAdapt = Buffer2.Next If pAdapt <> 0 Then CopyMemory AdapterInfo, ByVal pAdapt, AdapterInfoSize End If Loop Until pAdapt = 0 End Sub Robert Gracie www.servicexp.com -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of John W. Colby Sent: Saturday, January 03, 2004 1:35 PM To: Access Developers discussion and problem solving Subject: RE: [AccessD] Mac address Yea, but you have to start somewhere. More and more NICs are embedded right in the motherboards so this is getting less and less likely. John W. Colby www.ColbyConsulting.com -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Gustav Brock Sent: Saturday, January 03, 2004 12:53 PM To: Access Developers discussion and problem solving Subject: Re: [AccessD] Mac address Hi John Hmm ... so the user changes his/hers NIC and is hosed ..? /gustav > Date: 2004-01-03 18:14 > Well... I'm looking at a machine specific piece for copy protection. The > work station name might be specific to a network, but is created by the > software (or user doing the install) so if the machine went down (as many of > mine have over the last few years) if the user didn't select the same name > then the key wouldn't work. _______________________________________________ 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 _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From DWUTKA at marlow.com Sat Jan 3 14:46:54 2004 From: DWUTKA at marlow.com (DWUTKA at marlow.com) Date: Sat, 3 Jan 2004 14:46:54 -0600 Subject: [AccessD] Mac address Message-ID: <2F8793082E00D4119A1700B0D0216BF8022276DB@main2.marlow.com> I am attaching a VB mod, one of the functions is fGetMACAddress. Should do what you want. Sorry for the attachment, but it is small. Drew -----Original Message----- From: John W. Colby [mailto:jwcolby at colbyconsulting.com] Sent: Friday, January 02, 2004 6:54 PM To: AccessD Subject: [AccessD] Mac address Does anyone have code for retrieving the Mac address of the network card in a PC? John W. Colby www.ColbyConsulting.com _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From Erwin.Craps at ithelps.be Sat Jan 3 15:51:00 2004 From: Erwin.Craps at ithelps.be (Erwin Craps - IT Helps) Date: Sat, 3 Jan 2004 22:51:00 +0100 Subject: [AccessD] Mac address Message-ID: <46B976F2B698FF46A4FE7636509B22DF03D075@stekelbes.ithelps.local> John, as an alternative you could use the serial number of the harddisk format. When a disk is formatted it receives a serialnumber that can be used for this purpose. If the disk is reformatted than you would get a new serial. This looks more appropriate to me then a mac address. I used a while ago in a app that needed protection. When is disk is re-formatted your software needs to be re-installed anyway. When using togheter with some easy challenge/response code you can re-activate the user by phone. I don't have the code overhere but if you need it please met me know? Erwin -----Oorspronkelijk bericht----- Van: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] Namens John W. Colby Verzonden: zaterdag 3 januari 2004 21:47 Aan: Access Developers discussion and problem solving Onderwerp: RE: [AccessD] Mac address That may have done it, at least for my computer. This appears to be one of those things that may be windows version dependent. Thanks anyway, it does seem to work for mine! John W. Colby www.ColbyConsulting.com -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Robert Gracie Sent: Saturday, January 03, 2004 2:09 PM To: Access Developers discussion and problem solving Subject: RE: [AccessD] Mac address John, Will this get you started.. Paste in a Module....... Public Const MAX_HOSTNAME_LEN = 132 Public Const MAX_DOMAIN_NAME_LEN = 132 Public Const MAX_SCOPE_ID_LEN = 260 Public Const MAX_ADAPTER_NAME_LENGTH = 260 Public Const MAX_ADAPTER_ADDRESS_LENGTH = 8 Public Const MAX_ADAPTER_DESCRIPTION_LENGTH = 132 Public Const ERROR_BUFFER_OVERFLOW = 111 Public Const MIB_IF_TYPE_ETHERNET = 6 Public Const MIB_IF_TYPE_TOKENRING = 9 Public Const MIB_IF_TYPE_FDDI = 15 Public Const MIB_IF_TYPE_PPP = 23 Public Const MIB_IF_TYPE_LOOPBACK = 24 Public Const MIB_IF_TYPE_SLIP = 28 Type IP_ADDR_STRING Next As Long IpAddress As String * 16 IpMask As String * 16 Context As Long End Type Type IP_ADAPTER_INFO Next As Long ComboIndex As Long AdapterName As String * MAX_ADAPTER_NAME_LENGTH Description As String * MAX_ADAPTER_DESCRIPTION_LENGTH AddressLength As Long Address(MAX_ADAPTER_ADDRESS_LENGTH - 1) As Byte Index As Long Type As Long DhcpEnabled As Long CurrentIpAddress As Long IpAddressList As IP_ADDR_STRING GatewayList As IP_ADDR_STRING DhcpServer As IP_ADDR_STRING HaveWins As Byte PrimaryWinsServer As IP_ADDR_STRING SecondaryWinsServer As IP_ADDR_STRING LeaseObtained As Long LeaseExpires As Long End Type Type FIXED_INFO HostName As String * MAX_HOSTNAME_LEN DomainName As String * MAX_DOMAIN_NAME_LEN CurrentDnsServer As Long DnsServerList As IP_ADDR_STRING NodeType As Long ScopeId As String * MAX_SCOPE_ID_LEN EnableRouting As Long EnableProxy As Long EnableDns As Long End Type Public Declare Function GetNetworkParams Lib "IPHlpApi.dll" _ (FixedInfo As Any, pOutBufLen As Long) As Long Public Declare Function GetAdaptersInfo Lib "IPHlpApi.dll" _ (IpAdapterInfo As Any, pOutBufLen As Long) As Long Public Declare Sub CopyMemory Lib "kernel32" Alias "RtlMoveMemory" _ (Destination As Any, Source As Any, ByVal Length As Long) Sub main() Dim error As Long Dim FixedInfoSize As Long Dim AdapterInfoSize As Long Dim i As Integer Dim PhysicalAddress As String Dim NewTime As Date Dim AdapterInfo As IP_ADAPTER_INFO Dim AddrStr As IP_ADDR_STRING Dim FixedInfo As FIXED_INFO Dim Buffer As IP_ADDR_STRING Dim pAddrStr As Long Dim pAdapt As Long Dim Buffer2 As IP_ADAPTER_INFO Dim FixedInfoBuffer() As Byte Dim AdapterInfoBuffer() As Byte ' Get the main IP configuration information for this machine ' using a FIXED_INFO structure. FixedInfoSize = 0 error = GetNetworkParams(ByVal 0&, FixedInfoSize) If error <> 0 Then If error <> ERROR_BUFFER_OVERFLOW Then MsgBox "GetNetworkParams sizing failed with error " & error Exit Sub End If End If ReDim FixedInfoBuffer(FixedInfoSize - 1) error = GetNetworkParams(FixedInfoBuffer(0), FixedInfoSize) If error = 0 Then CopyMemory FixedInfo, FixedInfoBuffer(0), FixedInfoSize MsgBox "Host Name: " & FixedInfo.HostName MsgBox "DNS Servers: " & FixedInfo.DnsServerList.IpAddress pAddrStr = FixedInfo.DnsServerList.Next Do While pAddrStr <> 0 CopyMemory Buffer, ByVal pAddrStr, LenB(Buffer) MsgBox "DNS Servers: " & Buffer.IpAddress pAddrStr = Buffer.Next Loop Select Case FixedInfo.NodeType Case 1 MsgBox "Node type: Broadcast" Case 2 MsgBox "Node type: Peer to peer" Case 4 MsgBox "Node type: Mixed" Case 8 MsgBox "Node type: Hybrid" Case Else MsgBox "Unknown node type" End Select MsgBox "NetBIOS Scope ID: " & FixedInfo.ScopeId If FixedInfo.EnableRouting Then MsgBox "IP Routing Enabled " Else MsgBox "IP Routing not enabled" End If If FixedInfo.EnableProxy Then MsgBox "WINS Proxy Enabled " Else MsgBox "WINS Proxy not Enabled " End If If FixedInfo.EnableDns Then MsgBox "NetBIOS Resolution Uses DNS " Else MsgBox "NetBIOS Resolution Does not use DNS " End If Else MsgBox "GetNetworkParams failed with error " & error Exit Sub End If ' Enumerate all of the adapter specific information using the ' IP_ADAPTER_INFO structure. ' Note: IP_ADAPTER_INFO contains a linked list of adapter entries. AdapterInfoSize = 0 error = GetAdaptersInfo(ByVal 0&, AdapterInfoSize) If error <> 0 Then If error <> ERROR_BUFFER_OVERFLOW Then MsgBox "GetAdaptersInfo sizing failed with error " & error Exit Sub End If End If ReDim AdapterInfoBuffer(AdapterInfoSize - 1) ' Get actual adapter information error = GetAdaptersInfo(AdapterInfoBuffer(0), AdapterInfoSize) If error <> 0 Then MsgBox "GetAdaptersInfo failed with error " & error Exit Sub End If ' Allocate memory CopyMemory AdapterInfo, AdapterInfoBuffer(0), AdapterInfoSize pAdapt = AdapterInfo.Next Do CopyMemory Buffer2, AdapterInfo, AdapterInfoSize Select Case Buffer2.Type Case MIB_IF_TYPE_ETHERNET MsgBox "Adapter name: Ethernet adapter " Case MIB_IF_TYPE_TOKENRING MsgBox "Adapter name: Token Ring adapter " Case MIB_IF_TYPE_FDDI MsgBox "Adapter name: FDDI adapter " Case MIB_IF_TYPE_PPP MsgBox "Adapter name: PPP adapter" Case MIB_IF_TYPE_LOOPBACK MsgBox "Adapter name: Loopback adapter " Case MIB_IF_TYPE_SLIP MsgBox "Adapter name: Slip adapter " Case Else MsgBox "Adapter name: Other adapter " End Select MsgBox "AdapterDescription: " & Buffer2.Description PhysicalAddress = "" For i = 0 To Buffer2.AddressLength - 1 PhysicalAddress = PhysicalAddress & Hex(Buffer2.Address(i)) If i < Buffer2.AddressLength - 1 Then PhysicalAddress = PhysicalAddress & "-" End If Next MsgBox "Physical Address: " & PhysicalAddress If Buffer2.DhcpEnabled Then MsgBox "DHCP Enabled " Else MsgBox "DHCP disabled" End If MsgBox "IP Address: " & Buffer2.IpAddressList.IpAddress MsgBox "Subnet Mask: " & Buffer2.IpAddressList.IpMask pAddrStr = Buffer2.IpAddressList.Next Do While pAddrStr <> 0 CopyMemory Buffer, Buffer2.IpAddressList, LenB(Buffer) MsgBox "IP Address: " & Buffer.IpAddress MsgBox "Subnet Mask: " & Buffer.IpMask pAddrStr = Buffer.Next If pAddrStr <> 0 Then CopyMemory Buffer2.IpAddressList, ByVal pAddrStr, _ LenB(Buffer2.IpAddressList) End If Loop MsgBox "Default Gateway: " & Buffer2.GatewayList.IpAddress pAddrStr = Buffer2.GatewayList.Next Do While pAddrStr <> 0 CopyMemory Buffer, Buffer2.GatewayList, LenB(Buffer) MsgBox "IP Address: " & Buffer.IpAddress pAddrStr = Buffer.Next If pAddrStr <> 0 Then CopyMemory Buffer2.GatewayList, ByVal pAddrStr, _ LenB(Buffer2.GatewayList) End If Loop MsgBox "DHCP Server: " & Buffer2.DhcpServer.IpAddress MsgBox "Primary WINS Server: " & _ Buffer2.PrimaryWinsServer.IpAddress MsgBox "Secondary WINS Server: " & _ Buffer2.SecondaryWinsServer.IpAddress ' Display time. NewTime = DateAdd("s", Buffer2.LeaseObtained, #1/1/1970#) MsgBox "Lease Obtained: " & _ CStr(Format(NewTime, "dddd, mmm d hh:mm:ss yyyy")) NewTime = DateAdd("s", Buffer2.LeaseExpires, #1/1/1970#) MsgBox "Lease Expires : " & _ CStr(Format(NewTime, "dddd, mmm d hh:mm:ss yyyy")) pAdapt = Buffer2.Next If pAdapt <> 0 Then CopyMemory AdapterInfo, ByVal pAdapt, AdapterInfoSize End If Loop Until pAdapt = 0 End Sub Robert Gracie www.servicexp.com -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of John W. Colby Sent: Saturday, January 03, 2004 1:35 PM To: Access Developers discussion and problem solving Subject: RE: [AccessD] Mac address Yea, but you have to start somewhere. More and more NICs are embedded right in the motherboards so this is getting less and less likely. John W. Colby www.ColbyConsulting.com -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Gustav Brock Sent: Saturday, January 03, 2004 12:53 PM To: Access Developers discussion and problem solving Subject: Re: [AccessD] Mac address Hi John Hmm ... so the user changes his/hers NIC and is hosed ..? /gustav > Date: 2004-01-03 18:14 > Well... I'm looking at a machine specific piece for copy protection. > The work station name might be specific to a network, but is created > by the software (or user doing the install) so if the machine went > down (as many of > mine have over the last few years) if the user didn't select the same > name then the key wouldn't work. _______________________________________________ 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 _______________________________________________ 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 From jwcolby at colbyconsulting.com Sat Jan 3 16:55:45 2004 From: jwcolby at colbyconsulting.com (John W. Colby) Date: Sat, 3 Jan 2004 17:55:45 -0500 Subject: [AccessD] Mac address In-Reply-To: <46B976F2B698FF46A4FE7636509B22DF03D075@stekelbes.ithelps.local> Message-ID: Erwin, I used the disk SN in my last copy protection system. In the end, if it exists at all, a NIC is virtually never changed so it works wonderfully for this. But yea, I know how to do the disk sn thing. John W. Colby www.ColbyConsulting.com -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Erwin Craps - IT Helps Sent: Saturday, January 03, 2004 4:51 PM To: Access Developers discussion and problem solving Subject: RE: [AccessD] Mac address John, as an alternative you could use the serial number of the harddisk format. When a disk is formatted it receives a serialnumber that can be used for this purpose. If the disk is reformatted than you would get a new serial. This looks more appropriate to me then a mac address. I used a while ago in a app that needed protection. When is disk is re-formatted your software needs to be re-installed anyway. When using togheter with some easy challenge/response code you can re-activate the user by phone. I don't have the code overhere but if you need it please met me know? Erwin -----Oorspronkelijk bericht----- Van: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] Namens John W. Colby Verzonden: zaterdag 3 januari 2004 21:47 Aan: Access Developers discussion and problem solving Onderwerp: RE: [AccessD] Mac address That may have done it, at least for my computer. This appears to be one of those things that may be windows version dependent. Thanks anyway, it does seem to work for mine! John W. Colby www.ColbyConsulting.com -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Robert Gracie Sent: Saturday, January 03, 2004 2:09 PM To: Access Developers discussion and problem solving Subject: RE: [AccessD] Mac address John, Will this get you started.. Paste in a Module....... Public Const MAX_HOSTNAME_LEN = 132 Public Const MAX_DOMAIN_NAME_LEN = 132 Public Const MAX_SCOPE_ID_LEN = 260 Public Const MAX_ADAPTER_NAME_LENGTH = 260 Public Const MAX_ADAPTER_ADDRESS_LENGTH = 8 Public Const MAX_ADAPTER_DESCRIPTION_LENGTH = 132 Public Const ERROR_BUFFER_OVERFLOW = 111 Public Const MIB_IF_TYPE_ETHERNET = 6 Public Const MIB_IF_TYPE_TOKENRING = 9 Public Const MIB_IF_TYPE_FDDI = 15 Public Const MIB_IF_TYPE_PPP = 23 Public Const MIB_IF_TYPE_LOOPBACK = 24 Public Const MIB_IF_TYPE_SLIP = 28 Type IP_ADDR_STRING Next As Long IpAddress As String * 16 IpMask As String * 16 Context As Long End Type Type IP_ADAPTER_INFO Next As Long ComboIndex As Long AdapterName As String * MAX_ADAPTER_NAME_LENGTH Description As String * MAX_ADAPTER_DESCRIPTION_LENGTH AddressLength As Long Address(MAX_ADAPTER_ADDRESS_LENGTH - 1) As Byte Index As Long Type As Long DhcpEnabled As Long CurrentIpAddress As Long IpAddressList As IP_ADDR_STRING GatewayList As IP_ADDR_STRING DhcpServer As IP_ADDR_STRING HaveWins As Byte PrimaryWinsServer As IP_ADDR_STRING SecondaryWinsServer As IP_ADDR_STRING LeaseObtained As Long LeaseExpires As Long End Type Type FIXED_INFO HostName As String * MAX_HOSTNAME_LEN DomainName As String * MAX_DOMAIN_NAME_LEN CurrentDnsServer As Long DnsServerList As IP_ADDR_STRING NodeType As Long ScopeId As String * MAX_SCOPE_ID_LEN EnableRouting As Long EnableProxy As Long EnableDns As Long End Type Public Declare Function GetNetworkParams Lib "IPHlpApi.dll" _ (FixedInfo As Any, pOutBufLen As Long) As Long Public Declare Function GetAdaptersInfo Lib "IPHlpApi.dll" _ (IpAdapterInfo As Any, pOutBufLen As Long) As Long Public Declare Sub CopyMemory Lib "kernel32" Alias "RtlMoveMemory" _ (Destination As Any, Source As Any, ByVal Length As Long) Sub main() Dim error As Long Dim FixedInfoSize As Long Dim AdapterInfoSize As Long Dim i As Integer Dim PhysicalAddress As String Dim NewTime As Date Dim AdapterInfo As IP_ADAPTER_INFO Dim AddrStr As IP_ADDR_STRING Dim FixedInfo As FIXED_INFO Dim Buffer As IP_ADDR_STRING Dim pAddrStr As Long Dim pAdapt As Long Dim Buffer2 As IP_ADAPTER_INFO Dim FixedInfoBuffer() As Byte Dim AdapterInfoBuffer() As Byte ' Get the main IP configuration information for this machine ' using a FIXED_INFO structure. FixedInfoSize = 0 error = GetNetworkParams(ByVal 0&, FixedInfoSize) If error <> 0 Then If error <> ERROR_BUFFER_OVERFLOW Then MsgBox "GetNetworkParams sizing failed with error " & error Exit Sub End If End If ReDim FixedInfoBuffer(FixedInfoSize - 1) error = GetNetworkParams(FixedInfoBuffer(0), FixedInfoSize) If error = 0 Then CopyMemory FixedInfo, FixedInfoBuffer(0), FixedInfoSize MsgBox "Host Name: " & FixedInfo.HostName MsgBox "DNS Servers: " & FixedInfo.DnsServerList.IpAddress pAddrStr = FixedInfo.DnsServerList.Next Do While pAddrStr <> 0 CopyMemory Buffer, ByVal pAddrStr, LenB(Buffer) MsgBox "DNS Servers: " & Buffer.IpAddress pAddrStr = Buffer.Next Loop Select Case FixedInfo.NodeType Case 1 MsgBox "Node type: Broadcast" Case 2 MsgBox "Node type: Peer to peer" Case 4 MsgBox "Node type: Mixed" Case 8 MsgBox "Node type: Hybrid" Case Else MsgBox "Unknown node type" End Select MsgBox "NetBIOS Scope ID: " & FixedInfo.ScopeId If FixedInfo.EnableRouting Then MsgBox "IP Routing Enabled " Else MsgBox "IP Routing not enabled" End If If FixedInfo.EnableProxy Then MsgBox "WINS Proxy Enabled " Else MsgBox "WINS Proxy not Enabled " End If If FixedInfo.EnableDns Then MsgBox "NetBIOS Resolution Uses DNS " Else MsgBox "NetBIOS Resolution Does not use DNS " End If Else MsgBox "GetNetworkParams failed with error " & error Exit Sub End If ' Enumerate all of the adapter specific information using the ' IP_ADAPTER_INFO structure. ' Note: IP_ADAPTER_INFO contains a linked list of adapter entries. AdapterInfoSize = 0 error = GetAdaptersInfo(ByVal 0&, AdapterInfoSize) If error <> 0 Then If error <> ERROR_BUFFER_OVERFLOW Then MsgBox "GetAdaptersInfo sizing failed with error " & error Exit Sub End If End If ReDim AdapterInfoBuffer(AdapterInfoSize - 1) ' Get actual adapter information error = GetAdaptersInfo(AdapterInfoBuffer(0), AdapterInfoSize) If error <> 0 Then MsgBox "GetAdaptersInfo failed with error " & error Exit Sub End If ' Allocate memory CopyMemory AdapterInfo, AdapterInfoBuffer(0), AdapterInfoSize pAdapt = AdapterInfo.Next Do CopyMemory Buffer2, AdapterInfo, AdapterInfoSize Select Case Buffer2.Type Case MIB_IF_TYPE_ETHERNET MsgBox "Adapter name: Ethernet adapter " Case MIB_IF_TYPE_TOKENRING MsgBox "Adapter name: Token Ring adapter " Case MIB_IF_TYPE_FDDI MsgBox "Adapter name: FDDI adapter " Case MIB_IF_TYPE_PPP MsgBox "Adapter name: PPP adapter" Case MIB_IF_TYPE_LOOPBACK MsgBox "Adapter name: Loopback adapter " Case MIB_IF_TYPE_SLIP MsgBox "Adapter name: Slip adapter " Case Else MsgBox "Adapter name: Other adapter " End Select MsgBox "AdapterDescription: " & Buffer2.Description PhysicalAddress = "" For i = 0 To Buffer2.AddressLength - 1 PhysicalAddress = PhysicalAddress & Hex(Buffer2.Address(i)) If i < Buffer2.AddressLength - 1 Then PhysicalAddress = PhysicalAddress & "-" End If Next MsgBox "Physical Address: " & PhysicalAddress If Buffer2.DhcpEnabled Then MsgBox "DHCP Enabled " Else MsgBox "DHCP disabled" End If MsgBox "IP Address: " & Buffer2.IpAddressList.IpAddress MsgBox "Subnet Mask: " & Buffer2.IpAddressList.IpMask pAddrStr = Buffer2.IpAddressList.Next Do While pAddrStr <> 0 CopyMemory Buffer, Buffer2.IpAddressList, LenB(Buffer) MsgBox "IP Address: " & Buffer.IpAddress MsgBox "Subnet Mask: " & Buffer.IpMask pAddrStr = Buffer.Next If pAddrStr <> 0 Then CopyMemory Buffer2.IpAddressList, ByVal pAddrStr, _ LenB(Buffer2.IpAddressList) End If Loop MsgBox "Default Gateway: " & Buffer2.GatewayList.IpAddress pAddrStr = Buffer2.GatewayList.Next Do While pAddrStr <> 0 CopyMemory Buffer, Buffer2.GatewayList, LenB(Buffer) MsgBox "IP Address: " & Buffer.IpAddress pAddrStr = Buffer.Next If pAddrStr <> 0 Then CopyMemory Buffer2.GatewayList, ByVal pAddrStr, _ LenB(Buffer2.GatewayList) End If Loop MsgBox "DHCP Server: " & Buffer2.DhcpServer.IpAddress MsgBox "Primary WINS Server: " & _ Buffer2.PrimaryWinsServer.IpAddress MsgBox "Secondary WINS Server: " & _ Buffer2.SecondaryWinsServer.IpAddress ' Display time. NewTime = DateAdd("s", Buffer2.LeaseObtained, #1/1/1970#) MsgBox "Lease Obtained: " & _ CStr(Format(NewTime, "dddd, mmm d hh:mm:ss yyyy")) NewTime = DateAdd("s", Buffer2.LeaseExpires, #1/1/1970#) MsgBox "Lease Expires : " & _ CStr(Format(NewTime, "dddd, mmm d hh:mm:ss yyyy")) pAdapt = Buffer2.Next If pAdapt <> 0 Then CopyMemory AdapterInfo, ByVal pAdapt, AdapterInfoSize End If Loop Until pAdapt = 0 End Sub Robert Gracie www.servicexp.com -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of John W. Colby Sent: Saturday, January 03, 2004 1:35 PM To: Access Developers discussion and problem solving Subject: RE: [AccessD] Mac address Yea, but you have to start somewhere. More and more NICs are embedded right in the motherboards so this is getting less and less likely. John W. Colby www.ColbyConsulting.com -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Gustav Brock Sent: Saturday, January 03, 2004 12:53 PM To: Access Developers discussion and problem solving Subject: Re: [AccessD] Mac address Hi John Hmm ... so the user changes his/hers NIC and is hosed ..? /gustav > Date: 2004-01-03 18:14 > Well... I'm looking at a machine specific piece for copy protection. > The work station name might be specific to a network, but is created > by the software (or user doing the install) so if the machine went > down (as many of > mine have over the last few years) if the user didn't select the same > name then the key wouldn't work. _______________________________________________ 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 _______________________________________________ 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 _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From stuart at lexacorp.com.pg Sat Jan 3 17:59:46 2004 From: stuart at lexacorp.com.pg (Stuart McLachlan) Date: Sun, 04 Jan 2004 09:59:46 +1000 Subject: [AccessD] Mac address In-Reply-To: References: <9731465094.20040103185321@cactus.dk> Message-ID: <3FF7E412.32402.29D45F@localhost> Take a look at http://www.klcconsulting.net/smac/ for a way to defeat this copy protection scheme. (Follow the link to "the research of Kyle Lai" for a lot of good info on MAC addresses) On 3 Jan 2004 at 13:34, John W. Colby wrote: > Yea, but you have to start somewhere. More and more NICs are embedded right > in the motherboards so this is getting less and less likely. > > John W. Colby > www.ColbyConsulting.com > > -----Original Message----- > From: accessd-bounces at databaseadvisors.com > [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Gustav Brock > Sent: Saturday, January 03, 2004 12:53 PM > To: Access Developers discussion and problem solving > Subject: Re: [AccessD] Mac address > > > Hi John > > Hmm ... so the user changes his/hers NIC and is hosed ..? > > /gustav > > > > Date: 2004-01-03 18:14 > > > Well... I'm looking at a machine specific piece for copy protection. The > > work station name might be specific to a network, but is created by the > > software (or user doing the install) so if the machine went down (as many > of > > mine have over the last few years) if the user didn't select the same name > > then the key wouldn't work. > -- Lexacorp Ltd http://www.lexacorp.com.pg Information Technology Consultancy, Software Development,System Support. From Subscriptions at servicexp.com Sat Jan 3 20:50:12 2004 From: Subscriptions at servicexp.com (Robert Gracie) Date: Sat, 3 Jan 2004 21:50:12 -0500 Subject: [AccessD] Anyone try Code Jack? In-Reply-To: <3FF7E412.32402.29D45F@localhost> Message-ID: Is anyone using this product/services? What do you think? http://www.artifactsoftware.com/ Robert Gracie www.servicexp.com From jwcolby at colbyconsulting.com Sat Jan 3 21:48:49 2004 From: jwcolby at colbyconsulting.com (John W. Colby) Date: Sat, 3 Jan 2004 22:48:49 -0500 Subject: [AccessD] Mac address In-Reply-To: <3FF7E412.32402.29D45F@localhost> Message-ID: LOL. I learned a long time ago not to sweat the small stuff. If there are hackers figuring out how to hack Microsoft's $100 million copy protection, I am not going to survive a determined attempt to get around my stuff. On the other hand, I assume you lock your front door. And I assume there is glass in the door that anyone who wants in could just smash to reach in and unlock your door. So why do you bother? Because the lock keeps 99% of the people out of your house. 99% is good enough for me. I will not even bat an eyelash nor give a second thought to the other 1%. 99% of the effort COULD be spent stopping (or failing to stop) that last 1%. John W. Colby www.ColbyConsulting.com -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Stuart McLachlan Sent: Saturday, January 03, 2004 7:00 PM To: Access Developers discussion and problem solving Subject: RE: [AccessD] Mac address Take a look at http://www.klcconsulting.net/smac/ for a way to defeat this copy protection scheme. (Follow the link to "the research of Kyle Lai" for a lot of good info on MAC addresses) On 3 Jan 2004 at 13:34, John W. Colby wrote: > Yea, but you have to start somewhere. More and more NICs are embedded right > in the motherboards so this is getting less and less likely. > > John W. Colby > www.ColbyConsulting.com > > -----Original Message----- > From: accessd-bounces at databaseadvisors.com > [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Gustav Brock > Sent: Saturday, January 03, 2004 12:53 PM > To: Access Developers discussion and problem solving > Subject: Re: [AccessD] Mac address > > > Hi John > > Hmm ... so the user changes his/hers NIC and is hosed ..? > > /gustav > > > > Date: 2004-01-03 18:14 > > > Well... I'm looking at a machine specific piece for copy protection. The > > work station name might be specific to a network, but is created by the > > software (or user doing the install) so if the machine went down (as many > of > > mine have over the last few years) if the user didn't select the same name > > then the key wouldn't work. > -- Lexacorp Ltd http://www.lexacorp.com.pg Information Technology Consultancy, Software Development,System Support. _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From carbonnb at sympatico.ca Sat Jan 3 21:55:13 2004 From: carbonnb at sympatico.ca (Bryan Carbonnell) Date: Sat, 03 Jan 2004 22:55:13 -0500 Subject: [AccessD] Mac address In-Reply-To: <2F8793082E00D4119A1700B0D0216BF8022276DB@main2.marlow.com> Message-ID: <3FF74851.11214.E5036@localhost> On 3 Jan 2004 at 14:46, DWUTKA at marlow.com wrote: > I am attaching a VB mod, one of the functions is fGetMACAddress. > Should do what you want. Sorry for the attachment, but it is small. Tsk, tsk tsk Drew. Attachemnts are a no-no on the list. Besides the list software strips everything but plain old text. You will need to resend your VB module to JC directly. -- Bryan Carbonnell - carbonnb at sympatico.ca On the keyboard of life, always keep one finger on the escape key. From d.dick at uws.edu.au Sun Jan 4 05:26:43 2004 From: d.dick at uws.edu.au (Darren DICK) Date: Sun, 4 Jan 2004 22:26:43 +1100 Subject: [AccessD] A2K: Trap Key stroke Message-ID: <000a01c3d2b5$a2890c70$20669a89@DDICK> Hello all I have some key down code to trap key strokes. Pretty basic stuff What do I type after I have trapped the key stoke eg F1 to stop any further processing? Many thanks in advance Darren EG Private Sub Form_KeyDown(KeyCode As Integer, Shift As Integer) Select Case KeyCode Case vbKeyF1 'What do I type here to stop the processing of (In this case F1) 'I DON'T wanna see the help screen Case vbKeyF2 blah blah blah From gustav at cactus.dk Sun Jan 4 05:39:23 2004 From: gustav at cactus.dk (Gustav Brock) Date: Sun, 4 Jan 2004 12:39:23 +0100 Subject: [AccessD] A2K: Trap Key stroke In-Reply-To: <000a01c3d2b5$a2890c70$20669a89@DDICK> References: <000a01c3d2b5$a2890c70$20669a89@DDICK> Message-ID: <10715453460.20040104123923@cactus.dk> Hi Darren KeyCode = 0 /gustav > Hello all > I have some key down code to trap key strokes. Pretty basic stuff > What do I type after I have trapped the key stoke eg F1 to stop any further processing? > Many thanks in advance > Darren > EG > Private Sub Form_KeyDown(KeyCode As Integer, Shift As Integer) > Select Case KeyCode > Case vbKeyF1 > 'What do I type here to stop the processing of (In this case F1) > 'I DON'T wanna see the help screen > Case vbKeyF2 > blah blah blah From d.dick at uws.edu.au Sun Jan 4 05:50:28 2004 From: d.dick at uws.edu.au (Darren DICK) Date: Sun, 4 Jan 2004 22:50:28 +1100 Subject: [AccessD] A2K: Trap Key stroke References: <000a01c3d2b5$a2890c70$20669a89@DDICK> <10715453460.20040104123923@cactus.dk> Message-ID: <008001c3d2b8$f3cb0590$20669a89@DDICK> Gustav You Da Man Thanks.....again Legend be thy name Many thanks Darren ----- Original Message ----- From: "Gustav Brock" To: "Access Developers discussion and problem solving" Sent: Sunday, January 04, 2004 10:39 PM Subject: Re: [AccessD] A2K: Trap Key stroke > Hi Darren > > KeyCode = 0 > > /gustav > > > > Hello all > > I have some key down code to trap key strokes. Pretty basic stuff > > What do I type after I have trapped the key stoke eg F1 to stop any further processing? > > > Many thanks in advance > > > Darren > > > EG > > Private Sub Form_KeyDown(KeyCode As Integer, Shift As Integer) > > > Select Case KeyCode > > Case vbKeyF1 > > 'What do I type here to stop the processing of (In this case F1) > > 'I DON'T wanna see the help screen > > Case vbKeyF2 > > blah blah blah > > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com From tinanfields at torchlake.com Sun Jan 4 06:35:33 2004 From: tinanfields at torchlake.com (Tina Norris Fields) Date: Sun, 04 Jan 2004 07:35:33 -0500 Subject: [AccessD] Form as Subform - Query Fails - Why? References: <000101c3d1f4$08452340$6501a8c0@papparuff> <3FF6F748.40804@torchlake.com> <16831194214.20040103184850@cactus.dk> Message-ID: <3FF80895.1090508@torchlake.com> Hi again Gustav, I ended up keeping the button to just launch Word. I created a little macro in Word to open the acknowledgement form letter, which already looks for its data source as the tblAcknowledgePay in the TLA database. My user has only to click to merge the document, and there are her acknowledgement letters! It all looks much more spiffy and easy now than what she was doing - seriously. It used to be advisable to close Access before launching Word and loading a document to merge data from a database - (A95, A97) since Word would open an instance of Access as part of the merge process, and having two copies of Access open at one time placed heavy demands on the system resources. That no longer appears to be the case. I'm delighted. However, during my work on this little modification, from time to time Word would fail to find the data source with which it has been linked forever and functionality would disappear, i.e., the merge toolbar dimmed and no commands worked, Closing the programs and relaunching them fixed that usually. Now that I've finished fiddling with it, just running the queries and launching the merge form document, things are behaving nicely. I did study the Microsoft Automation help file, but the things it suggested weren't recognized from within Access, so I still have some learning to do there. Objects such as wordApp and wordDoc were unrecognized from within Access - worked great from within Word. So there has to be an import statement or something like that to tell Access to look to another library of objects, too. Back to the books! Thanks for your help. I will work on the syntax until the thing does work for me, I can see the situation arising again sometime. Best regards, Tina Gustav Brock wrote: >Hi Tina > >Try with > > Between > [Forms]![fInstructions]![subYourSubformControlName].Form![BeginningDate] > And > [Forms]![fInstructions]![subYourSubformControlName].Form![EndingDate] > >/gustav > > > > >>Hi John, >> >> > > > >>Thanks for the reply. I think I have not been completely clear about my >>quandary. The parameter query selects records based on the following: >> >> > > > >>Between [Forms]![fCalendar]![BeginningDate] And >>[Forms]![fCalendar]![EndingDate] >> >> > > > >>- which works fine as long as one sets the dates by opening fCalendar as >>a stand-alone form. >> >> > > > >>I made a form with a series of instructions, hoping to guide my user >>from step to step without having to remind the user to set the dates >>first in the fCalendar - >>the idea was to embed an instance of the fCalendar in the instruction >>form - set the dates right here in what is now a subform of the >>instruction form. >> >> > > > >>If one sets the dates in the embedded instance of fCalendar, the query >>does not find its parameters. Well, say I to myself, I probably need to >>tell the query where to find those date textboxes, but I do not find a >>way to identify them other than as they are already identified . Is >>there a collection other than [Forms] I need to find? When I examine my >>fCalendar through the subform control, I see all the correct textbox >>names - it certainly appears to be the same form - why does setting its >>dates not provide the necessary parameters to the query? I don't see it. >> >> > >_______________________________________________ >AccessD mailing list >AccessD at databaseadvisors.com >http://databaseadvisors.com/mailman/listinfo/accessd >Website: http://www.databaseadvisors.com > > > From andrew.haslett at ilc.gov.au Sun Jan 4 08:01:43 2004 From: andrew.haslett at ilc.gov.au (Haslett, Andrew) Date: Mon, 5 Jan 2004 00:31:43 +1030 Subject: [AccessD] Mac address Message-ID: Hard Disk SN is far better than using the MAC address. Jees, some BIOS these days even allow you to change your MAC address yourself. -----Original Message----- From: John W. Colby [mailto:jwcolby at colbyconsulting.com] Sent: Sunday, 4 January 2004 2:19 PM To: Access Developers discussion and problem solving Subject: RE: [AccessD] Mac address LOL. I learned a long time ago not to sweat the small stuff. If there are hackers figuring out how to hack Microsoft's $100 million copy protection, I am not going to survive a determined attempt to get around my stuff. On the other hand, I assume you lock your front door. And I assume there is glass in the door that anyone who wants in could just smash to reach in and unlock your door. So why do you bother? Because the lock keeps 99% of the people out of your house. 99% is good enough for me. I will not even bat an eyelash nor give a second thought to the other 1%. 99% of the effort COULD be spent stopping (or failing to stop) that last 1%. John W. Colby www.ColbyConsulting.com -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Stuart McLachlan Sent: Saturday, January 03, 2004 7:00 PM To: Access Developers discussion and problem solving Subject: RE: [AccessD] Mac address Take a look at http://www.klcconsulting.net/smac/ for a way to defeat this copy protection scheme. (Follow the link to "the research of Kyle Lai" for a lot of good info on MAC addresses) On 3 Jan 2004 at 13:34, John W. Colby wrote: > Yea, but you have to start somewhere. More and more NICs are embedded right > in the motherboards so this is getting less and less likely. > > John W. Colby > www.ColbyConsulting.com > > -----Original Message----- > From: accessd-bounces at databaseadvisors.com > [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Gustav Brock > Sent: Saturday, January 03, 2004 12:53 PM > To: Access Developers discussion and problem solving > Subject: Re: [AccessD] Mac address > > > Hi John > > Hmm ... so the user changes his/hers NIC and is hosed ..? > > /gustav > > > > Date: 2004-01-03 18:14 > > > Well... I'm looking at a machine specific piece for copy protection. The > > work station name might be specific to a network, but is created by > > the software (or user doing the install) so if the machine went down > > (as many > of > > mine have over the last few years) if the user didn't select the > > same name > > then the key wouldn't work. > -- Lexacorp Ltd http://www.lexacorp.com.pg Information Technology Consultancy, Software Development,System Support. _______________________________________________ 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 IMPORTANT - PLEASE READ ******************** This email and any files transmitted with it are confidential and may contain information protected by law from disclosure. If you have received this message in error, please notify the sender immediately and delete this email from your system. No warranty is given that this email or files, if attached to this email, are free from computer viruses or other defects. They are provided on the basis the user assumes all responsibility for loss, damage or consequence resulting directly or indirectly from their use, whether caused by the negligence of the sender or not. From gustav at cactus.dk Sun Jan 4 08:17:58 2004 From: gustav at cactus.dk (Gustav Brock) Date: Sun, 4 Jan 2004 15:17:58 +0100 Subject: [AccessD] Form as Subform - Query Fails - Why? In-Reply-To: <3FF80895.1090508@torchlake.com> References: <000101c3d1f4$08452340$6501a8c0@papparuff> <3FF6F748.40804@torchlake.com> <16831194214.20040103184850@cactus.dk> <3FF80895.1090508@torchlake.com> Message-ID: <18324968683.20040104151758@cactus.dk> Hi Tina Oops, I'm not the Word guru, sorry - actually, I only touch Word when forced to ... so someone else will have to help you. Or look up the archive - I faintly recall several threads on Word automation and/or mail merge and Access. /gustav From jwcolby at colbyconsulting.com Sun Jan 4 10:52:31 2004 From: jwcolby at colbyconsulting.com (John W. Colby) Date: Sun, 4 Jan 2004 11:52:31 -0500 Subject: [AccessD] Mac address In-Reply-To: Message-ID: And how does that make the disk sn better. That DOES change with every format (and every new HD). When was the last time YOU changed your MAC address? As form myself, I've NEVER done so. When was the last YOU formatted (or replaced) your hard disk? As for myself, at LEAST half dozen times over 4 systems just in the last 4 or 5 years. Hmmm.... Never or 1/2 dozen times... John W. Colby www.ColbyConsulting.com -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Haslett, Andrew Sent: Sunday, January 04, 2004 9:02 AM To: 'Access Developers discussion and problem solving' Subject: RE: [AccessD] Mac address Hard Disk SN is far better than using the MAC address. Jees, some BIOS these days even allow you to change your MAC address yourself. -----Original Message----- From: John W. Colby [mailto:jwcolby at colbyconsulting.com] Sent: Sunday, 4 January 2004 2:19 PM To: Access Developers discussion and problem solving Subject: RE: [AccessD] Mac address LOL. I learned a long time ago not to sweat the small stuff. If there are hackers figuring out how to hack Microsoft's $100 million copy protection, I am not going to survive a determined attempt to get around my stuff. On the other hand, I assume you lock your front door. And I assume there is glass in the door that anyone who wants in could just smash to reach in and unlock your door. So why do you bother? Because the lock keeps 99% of the people out of your house. 99% is good enough for me. I will not even bat an eyelash nor give a second thought to the other 1%. 99% of the effort COULD be spent stopping (or failing to stop) that last 1%. John W. Colby www.ColbyConsulting.com -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Stuart McLachlan Sent: Saturday, January 03, 2004 7:00 PM To: Access Developers discussion and problem solving Subject: RE: [AccessD] Mac address Take a look at http://www.klcconsulting.net/smac/ for a way to defeat this copy protection scheme. (Follow the link to "the research of Kyle Lai" for a lot of good info on MAC addresses) On 3 Jan 2004 at 13:34, John W. Colby wrote: > Yea, but you have to start somewhere. More and more NICs are embedded right > in the motherboards so this is getting less and less likely. > > John W. Colby > www.ColbyConsulting.com > > -----Original Message----- > From: accessd-bounces at databaseadvisors.com > [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Gustav Brock > Sent: Saturday, January 03, 2004 12:53 PM > To: Access Developers discussion and problem solving > Subject: Re: [AccessD] Mac address > > > Hi John > > Hmm ... so the user changes his/hers NIC and is hosed ..? > > /gustav > > > > Date: 2004-01-03 18:14 > > > Well... I'm looking at a machine specific piece for copy protection. The > > work station name might be specific to a network, but is created by > > the software (or user doing the install) so if the machine went down > > (as many > of > > mine have over the last few years) if the user didn't select the > > same name > > then the key wouldn't work. > -- Lexacorp Ltd http://www.lexacorp.com.pg Information Technology Consultancy, Software Development,System Support. _______________________________________________ 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 IMPORTANT - PLEASE READ ******************** This email and any files transmitted with it are confidential and may contain information protected by law from disclosure. If you have received this message in error, please notify the sender immediately and delete this email from your system. No warranty is given that this email or files, if attached to this email, are free from computer viruses or other defects. They are provided on the basis the user assumes all responsibility for loss, damage or consequence resulting directly or indirectly from their use, whether caused by the negligence of the sender or not. _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From Developer at UltraDNT.com Sun Jan 4 11:06:02 2004 From: Developer at UltraDNT.com (Developer) Date: Sun, 4 Jan 2004 12:06:02 -0500 Subject: [AccessD] Form as Subform - Query Fails - Why? In-Reply-To: <3FF80895.1090508@torchlake.com> Message-ID: <000a01c3d2e5$08d311e0$7001a8c0@COA3> Tina: Your automation code was not recognized because, as I recall from an earlier post, your Access button was using the CreateObject method to open Word. This is the "late binding" approach, and is useful because it is version indepenedent. You have to add a reference in a module under Project/References to the version of Word you are using to get intellisense and recognizable constants. I posted earlier about this, also, concerning Access to Word MailMerge ... Basically, my preferred method is to have a form that takes the input parameters from the user, generate a recordset from their parameters, loop the recordset and write the data to a .CSV file (I always use "c:\temp\rpt.csv"), and then merge that to a .DOT. All the Word DOT's for my app are stored in the same folder as the BE .mdb, so I can dynamically generate a list box of available DOTs at run-time, and all look for "c:\temp\rpt.csv". This avoids that "toolbar" issue (which I have seen too many times) and as a CSV, the data is also "Excel-ready", so I can use the same code, and then open Excel instead of mail merging to Word. This method also lets the user develop new merge letters, without changing the application. Hth, Steve -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Tina Norris Fields Sent: Sunday, January 04, 2004 7:36 AM To: Access Developers discussion and problem solving Subject: Re: [AccessD] Form as Subform - Query Fails - Why? Hi again Gustav, I ended up keeping the button to just launch Word. I created a little macro in Word to open the acknowledgement form letter, which already looks for its data source as the tblAcknowledgePay in the TLA database. My user has only to click to merge the document, and there are her acknowledgement letters! It all looks much more spiffy and easy now than what she was doing - seriously. It used to be advisable to close Access before launching Word and loading a document to merge data from a database - (A95, A97) since Word would open an instance of Access as part of the merge process, and having two copies of Access open at one time placed heavy demands on the system resources. That no longer appears to be the case. I'm delighted. However, during my work on this little modification, from time to time Word would fail to find the data source with which it has been linked forever and functionality would disappear, i.e., the merge toolbar dimmed and no commands worked, Closing the programs and relaunching them fixed that usually. Now that I've finished fiddling with it, just running the queries and launching the merge form document, things are behaving nicely. I did study the Microsoft Automation help file, but the things it suggested weren't recognized from within Access, so I still have some learning to do there. Objects such as wordApp and wordDoc were unrecognized from within Access - worked great from within Word. So there has to be an import statement or something like that to tell Access to look to another library of objects, too. Back to the books! Thanks for your help. I will work on the syntax until the thing does work for me, I can see the situation arising again sometime. Best regards, Tina Gustav Brock wrote: >Hi Tina > >Try with > > Between > > [Forms]![fInstructions]![subYourSubformControlName].Form![BeginningDate] > And > [Forms]![fInstructions]![subYourSubformControlName].Form![EndingDate] > >/gustav > > > > >>Hi John, >> >> > > > >>Thanks for the reply. I think I have not been completely clear about >>my >>quandary. The parameter query selects records based on the following: >> >> > > > >>Between [Forms]![fCalendar]![BeginningDate] And >>[Forms]![fCalendar]![EndingDate] >> >> > > > >>- which works fine as long as one sets the dates by opening fCalendar >>as >>a stand-alone form. >> >> > > > >>I made a form with a series of instructions, hoping to guide my user >>from step to step without having to remind the user to set the dates >>first in the fCalendar - >>the idea was to embed an instance of the fCalendar in the instruction >>form - set the dates right here in what is now a subform of the >>instruction form. >> >> > > > >>If one sets the dates in the embedded instance of fCalendar, the query >>does not find its parameters. Well, say I to myself, I probably need to >>tell the query where to find those date textboxes, but I do not find a >>way to identify them other than as they are already identified . Is >>there a collection other than [Forms] I need to find? When I examine my >>fCalendar through the subform control, I see all the correct textbox >>names - it certainly appears to be the same form - why does setting its >>dates not provide the necessary parameters to the query? I don't see it. >> >> > >_______________________________________________ >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 From jimdettman at earthlink.net Sun Jan 4 11:57:11 2004 From: jimdettman at earthlink.net (Jim Dettman) Date: Sun, 4 Jan 2004 12:57:11 -0500 Subject: [AccessD] Mac address In-Reply-To: Message-ID: I would agree. A MAC address is usually a lot more stable then a HD serial number. I wasn't aware though that a spoof utility was out there. Looks like the code will need to dig a little deeper and get the actual hardware address. BTW I'm not sure why that code I sent you returned 0.0.0.0. did the same thing here on Win98SE. It's never failed before, but then it's been a few years since I used it. I looked it over real quick and I see it's making a NetBIOS call, which the success of might be dependant on the protocols loaded. Jim Dettman President, Online Computer Services of WNY, Inc. (315) 699-3443 jimdettman at earthlink.net -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of John W. Colby Sent: Sunday, January 04, 2004 11:53 AM To: Access Developers discussion and problem solving Subject: RE: [AccessD] Mac address And how does that make the disk sn better. That DOES change with every format (and every new HD). When was the last time YOU changed your MAC address? As form myself, I've NEVER done so. When was the last YOU formatted (or replaced) your hard disk? As for myself, at LEAST half dozen times over 4 systems just in the last 4 or 5 years. Hmmm.... Never or 1/2 dozen times... John W. Colby www.ColbyConsulting.com -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Haslett, Andrew Sent: Sunday, January 04, 2004 9:02 AM To: 'Access Developers discussion and problem solving' Subject: RE: [AccessD] Mac address Hard Disk SN is far better than using the MAC address. Jees, some BIOS these days even allow you to change your MAC address yourself. -----Original Message----- From: John W. Colby [mailto:jwcolby at colbyconsulting.com] Sent: Sunday, 4 January 2004 2:19 PM To: Access Developers discussion and problem solving Subject: RE: [AccessD] Mac address LOL. I learned a long time ago not to sweat the small stuff. If there are hackers figuring out how to hack Microsoft's $100 million copy protection, I am not going to survive a determined attempt to get around my stuff. On the other hand, I assume you lock your front door. And I assume there is glass in the door that anyone who wants in could just smash to reach in and unlock your door. So why do you bother? Because the lock keeps 99% of the people out of your house. 99% is good enough for me. I will not even bat an eyelash nor give a second thought to the other 1%. 99% of the effort COULD be spent stopping (or failing to stop) that last 1%. John W. Colby www.ColbyConsulting.com -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Stuart McLachlan Sent: Saturday, January 03, 2004 7:00 PM To: Access Developers discussion and problem solving Subject: RE: [AccessD] Mac address Take a look at http://www.klcconsulting.net/smac/ for a way to defeat this copy protection scheme. (Follow the link to "the research of Kyle Lai" for a lot of good info on MAC addresses) On 3 Jan 2004 at 13:34, John W. Colby wrote: > Yea, but you have to start somewhere. More and more NICs are embedded right > in the motherboards so this is getting less and less likely. > > John W. Colby > www.ColbyConsulting.com > > -----Original Message----- > From: accessd-bounces at databaseadvisors.com > [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Gustav Brock > Sent: Saturday, January 03, 2004 12:53 PM > To: Access Developers discussion and problem solving > Subject: Re: [AccessD] Mac address > > > Hi John > > Hmm ... so the user changes his/hers NIC and is hosed ..? > > /gustav > > > > Date: 2004-01-03 18:14 > > > Well... I'm looking at a machine specific piece for copy protection. The > > work station name might be specific to a network, but is created by > > the software (or user doing the install) so if the machine went down > > (as many > of > > mine have over the last few years) if the user didn't select the > > same name > > then the key wouldn't work. > -- Lexacorp Ltd http://www.lexacorp.com.pg Information Technology Consultancy, Software Development,System Support. _______________________________________________ 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 IMPORTANT - PLEASE READ ******************** This email and any files transmitted with it are confidential and may contain information protected by law from disclosure. If you have received this message in error, please notify the sender immediately and delete this email from your system. No warranty is given that this email or files, if attached to this email, are free from computer viruses or other defects. They are provided on the basis the user assumes all responsibility for loss, damage or consequence resulting directly or indirectly from their use, whether caused by the negligence of the sender or not. _______________________________________________ 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 From Erwin.Craps at ithelps.be Sun Jan 4 14:45:07 2004 From: Erwin.Craps at ithelps.be (Erwin Craps - IT Helps) Date: Sun, 4 Jan 2004 21:45:07 +0100 Subject: [AccessD] Mac address Message-ID: <46B976F2B698FF46A4FE7636509B22DF03D076@stekelbes.ithelps.local> This 0.0.0.0 could result from having multiple nic's in your pc. If you have a PPP connector you would receive a MAC address from that to, but when not connected this would be 0 I'm not compleetly sure of this but a PPP dial adapter is a nic to. And it could be wrongly set to the first nic in the binding. What I wanna say is that you would need to itterate trough the list of all nic's and verify which mac address you want to use. 2 or 3 nic's per pc are not uncommon. For example . 1x NIC 1x PPP modem dial 1x PPPoE ADSL modem If you wanna verify just type ipconfig /ALL in a dos window in NT/2K/XP, the result is a complete list of all adapters AND MAC address. Type winipcfg in W9X, you get a form where you can chose from the multiple nic's and see there MAC address. Erwin -----Oorspronkelijk bericht----- Van: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] Namens Jim Dettman Verzonden: zondag 4 januari 2004 18:57 Aan: Access Developers discussion and problem solving Onderwerp: RE: [AccessD] Mac address I would agree. A MAC address is usually a lot more stable then a HD serial number. I wasn't aware though that a spoof utility was out there. Looks like the code will need to dig a little deeper and get the actual hardware address. BTW I'm not sure why that code I sent you returned 0.0.0.0. did the same thing here on Win98SE. It's never failed before, but then it's been a few years since I used it. I looked it over real quick and I see it's making a NetBIOS call, which the success of might be dependant on the protocols loaded. Jim Dettman President, Online Computer Services of WNY, Inc. (315) 699-3443 jimdettman at earthlink.net -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of John W. Colby Sent: Sunday, January 04, 2004 11:53 AM To: Access Developers discussion and problem solving Subject: RE: [AccessD] Mac address And how does that make the disk sn better. That DOES change with every format (and every new HD). When was the last time YOU changed your MAC address? As form myself, I've NEVER done so. When was the last YOU formatted (or replaced) your hard disk? As for myself, at LEAST half dozen times over 4 systems just in the last 4 or 5 years. Hmmm.... Never or 1/2 dozen times... John W. Colby www.ColbyConsulting.com -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Haslett, Andrew Sent: Sunday, January 04, 2004 9:02 AM To: 'Access Developers discussion and problem solving' Subject: RE: [AccessD] Mac address Hard Disk SN is far better than using the MAC address. Jees, some BIOS these days even allow you to change your MAC address yourself. -----Original Message----- From: John W. Colby [mailto:jwcolby at colbyconsulting.com] Sent: Sunday, 4 January 2004 2:19 PM To: Access Developers discussion and problem solving Subject: RE: [AccessD] Mac address LOL. I learned a long time ago not to sweat the small stuff. If there are hackers figuring out how to hack Microsoft's $100 million copy protection, I am not going to survive a determined attempt to get around my stuff. On the other hand, I assume you lock your front door. And I assume there is glass in the door that anyone who wants in could just smash to reach in and unlock your door. So why do you bother? Because the lock keeps 99% of the people out of your house. 99% is good enough for me. I will not even bat an eyelash nor give a second thought to the other 1%. 99% of the effort COULD be spent stopping (or failing to stop) that last 1%. John W. Colby www.ColbyConsulting.com -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Stuart McLachlan Sent: Saturday, January 03, 2004 7:00 PM To: Access Developers discussion and problem solving Subject: RE: [AccessD] Mac address Take a look at http://www.klcconsulting.net/smac/ for a way to defeat this copy protection scheme. (Follow the link to "the research of Kyle Lai" for a lot of good info on MAC addresses) On 3 Jan 2004 at 13:34, John W. Colby wrote: > Yea, but you have to start somewhere. More and more NICs are embedded right > in the motherboards so this is getting less and less likely. > > John W. Colby > www.ColbyConsulting.com > > -----Original Message----- > From: accessd-bounces at databaseadvisors.com > [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Gustav Brock > Sent: Saturday, January 03, 2004 12:53 PM > To: Access Developers discussion and problem solving > Subject: Re: [AccessD] Mac address > > > Hi John > > Hmm ... so the user changes his/hers NIC and is hosed ..? > > /gustav > > > > Date: 2004-01-03 18:14 > > > Well... I'm looking at a machine specific piece for copy protection. The > > work station name might be specific to a network, but is created by > > the software (or user doing the install) so if the machine went down > > (as many > of > > mine have over the last few years) if the user didn't select the > > same name > > then the key wouldn't work. > -- Lexacorp Ltd http://www.lexacorp.com.pg Information Technology Consultancy, Software Development,System Support. _______________________________________________ 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 IMPORTANT - PLEASE READ ******************** This email and any files transmitted with it are confidential and may contain information protected by law from disclosure. If you have received this message in error, please notify the sender immediately and delete this email from your system. No warranty is given that this email or files, if attached to this email, are free from computer viruses or other defects. They are provided on the basis the user assumes all responsibility for loss, damage or consequence resulting directly or indirectly from their use, whether caused by the negligence of the sender or not. _______________________________________________ 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 _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From jwcolby at colbyconsulting.com Sun Jan 4 15:16:13 2004 From: jwcolby at colbyconsulting.com (John W. Colby) Date: Sun, 4 Jan 2004 16:16:13 -0500 Subject: [AccessD] Mac address In-Reply-To: Message-ID: Yep, I think it's exactly that - the protocols loaded. John W. Colby www.ColbyConsulting.com -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Jim Dettman Sent: Sunday, January 04, 2004 12:57 PM To: Access Developers discussion and problem solving Subject: RE: [AccessD] Mac address I would agree. A MAC address is usually a lot more stable then a HD serial number. I wasn't aware though that a spoof utility was out there. Looks like the code will need to dig a little deeper and get the actual hardware address. BTW I'm not sure why that code I sent you returned 0.0.0.0. did the same thing here on Win98SE. It's never failed before, but then it's been a few years since I used it. I looked it over real quick and I see it's making a NetBIOS call, which the success of might be dependant on the protocols loaded. Jim Dettman President, Online Computer Services of WNY, Inc. (315) 699-3443 jimdettman at earthlink.net -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of John W. Colby Sent: Sunday, January 04, 2004 11:53 AM To: Access Developers discussion and problem solving Subject: RE: [AccessD] Mac address And how does that make the disk sn better. That DOES change with every format (and every new HD). When was the last time YOU changed your MAC address? As form myself, I've NEVER done so. When was the last YOU formatted (or replaced) your hard disk? As for myself, at LEAST half dozen times over 4 systems just in the last 4 or 5 years. Hmmm.... Never or 1/2 dozen times... John W. Colby www.ColbyConsulting.com -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Haslett, Andrew Sent: Sunday, January 04, 2004 9:02 AM To: 'Access Developers discussion and problem solving' Subject: RE: [AccessD] Mac address Hard Disk SN is far better than using the MAC address. Jees, some BIOS these days even allow you to change your MAC address yourself. -----Original Message----- From: John W. Colby [mailto:jwcolby at colbyconsulting.com] Sent: Sunday, 4 January 2004 2:19 PM To: Access Developers discussion and problem solving Subject: RE: [AccessD] Mac address LOL. I learned a long time ago not to sweat the small stuff. If there are hackers figuring out how to hack Microsoft's $100 million copy protection, I am not going to survive a determined attempt to get around my stuff. On the other hand, I assume you lock your front door. And I assume there is glass in the door that anyone who wants in could just smash to reach in and unlock your door. So why do you bother? Because the lock keeps 99% of the people out of your house. 99% is good enough for me. I will not even bat an eyelash nor give a second thought to the other 1%. 99% of the effort COULD be spent stopping (or failing to stop) that last 1%. John W. Colby www.ColbyConsulting.com -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Stuart McLachlan Sent: Saturday, January 03, 2004 7:00 PM To: Access Developers discussion and problem solving Subject: RE: [AccessD] Mac address Take a look at http://www.klcconsulting.net/smac/ for a way to defeat this copy protection scheme. (Follow the link to "the research of Kyle Lai" for a lot of good info on MAC addresses) On 3 Jan 2004 at 13:34, John W. Colby wrote: > Yea, but you have to start somewhere. More and more NICs are embedded right > in the motherboards so this is getting less and less likely. > > John W. Colby > www.ColbyConsulting.com > > -----Original Message----- > From: accessd-bounces at databaseadvisors.com > [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Gustav Brock > Sent: Saturday, January 03, 2004 12:53 PM > To: Access Developers discussion and problem solving > Subject: Re: [AccessD] Mac address > > > Hi John > > Hmm ... so the user changes his/hers NIC and is hosed ..? > > /gustav > > > > Date: 2004-01-03 18:14 > > > Well... I'm looking at a machine specific piece for copy protection. The > > work station name might be specific to a network, but is created by > > the software (or user doing the install) so if the machine went down > > (as many > of > > mine have over the last few years) if the user didn't select the > > same name > > then the key wouldn't work. > -- Lexacorp Ltd http://www.lexacorp.com.pg Information Technology Consultancy, Software Development,System Support. _______________________________________________ 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 IMPORTANT - PLEASE READ ******************** This email and any files transmitted with it are confidential and may contain information protected by law from disclosure. If you have received this message in error, please notify the sender immediately and delete this email from your system. No warranty is given that this email or files, if attached to this email, are free from computer viruses or other defects. They are provided on the basis the user assumes all responsibility for loss, damage or consequence resulting directly or indirectly from their use, whether caused by the negligence of the sender or not. _______________________________________________ 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 _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From john at winhaven.net Sun Jan 4 17:43:09 2004 From: john at winhaven.net (John Bartow) Date: Sun, 4 Jan 2004 17:43:09 -0600 Subject: [AccessD] Mac address In-Reply-To: Message-ID: I was just wondering why the Main Circuit Board Serial Number isn't used for this. It would seem to me that this would be about the most stable unique ID number in a PC. I have no idea how you would read this number but it always shows up in my hardware asset inventories. Any comments? John B. > -----Original Message----- > From: accessd-bounces at databaseadvisors.com > [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of John W. Colby > Sent: Sunday, January 04, 2004 10:53 AM > To: Access Developers discussion and problem solving > Subject: RE: [AccessD] Mac address > > > And how does that make the disk sn better. That DOES change with every > format (and every new HD). When was the last time YOU changed your MAC > address? As form myself, I've NEVER done so. When was the last YOU > formatted (or replaced) your hard disk? As for myself, at LEAST > half dozen > times over 4 systems just in the last 4 or 5 years. > > Hmmm.... Never or 1/2 dozen times... > > John W. Colby > www.ColbyConsulting.com > > -----Original Message----- > From: accessd-bounces at databaseadvisors.com > [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Haslett, > Andrew > Sent: Sunday, January 04, 2004 9:02 AM > To: 'Access Developers discussion and problem solving' > Subject: RE: [AccessD] Mac address > > > Hard Disk SN is far better than using the MAC address. Jees, some BIOS > these days even allow you to change your MAC address yourself. > > -----Original Message----- > From: John W. Colby [mailto:jwcolby at colbyconsulting.com] > Sent: Sunday, 4 January 2004 2:19 PM > To: Access Developers discussion and problem solving > Subject: RE: [AccessD] Mac address > > LOL. I learned a long time ago not to sweat the small stuff. If > there are > hackers figuring out how to hack Microsoft's $100 million copy > protection, I > am not going to survive a determined attempt to get around my stuff. > > On the other hand, I assume you lock your front door. And I > assume there is > glass in the door that anyone who wants in could just smash to > reach in and > unlock your door. So why do you bother? Because the lock keeps > 99% of the > people out of your house. > > 99% is good enough for me. I will not even bat an eyelash nor > give a second > thought to the other 1%. > > 99% of the effort COULD be spent stopping (or failing to stop) > that last 1%. > > John W. Colby > www.ColbyConsulting.com > > -----Original Message----- > From: accessd-bounces at databaseadvisors.com > [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Stuart McLachlan > Sent: Saturday, January 03, 2004 7:00 PM > To: Access Developers discussion and problem solving > Subject: RE: [AccessD] Mac address > > > Take a look at http://www.klcconsulting.net/smac/ > for a way to defeat this copy protection scheme. > > (Follow the link to "the research of Kyle Lai" for a lot of good > info on MAC > addresses) > > > On 3 Jan 2004 at 13:34, John W. Colby wrote: > > > Yea, but you have to start somewhere. More and more NICs are embedded > right > > in the motherboards so this is getting less and less likely. > > > > John W. Colby > > www.ColbyConsulting.com > > > > -----Original Message----- > > From: accessd-bounces at databaseadvisors.com > > [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Gustav Brock > > Sent: Saturday, January 03, 2004 12:53 PM > > To: Access Developers discussion and problem solving > > Subject: Re: [AccessD] Mac address > > > > > > Hi John > > > > Hmm ... so the user changes his/hers NIC and is hosed ..? > > > > /gustav > > > > > > > Date: 2004-01-03 18:14 > > > > > Well... I'm looking at a machine specific piece for copy protection. > The > > > work station name might be specific to a network, but is created by > > > the software (or user doing the install) so if the machine went down > > > (as > many > > of > > > mine have over the last few years) if the user didn't select the > > > same > name > > > then the key wouldn't work. > > > > -- > Lexacorp Ltd > http://www.lexacorp.com.pg > Information Technology Consultancy, Software Development,System Support. > > > > _______________________________________________ > 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 > > IMPORTANT - PLEASE READ ******************** > This email and any files transmitted with it are confidential and may > contain information protected by law from disclosure. > If you have received this message in error, please notify the sender > immediately and delete this email from your system. > No warranty is given that this email or files, if attached to this > email, are free from computer viruses or other defects. They > are provided on the basis the user assumes all responsibility for > loss, damage or consequence resulting directly or indirectly from > their use, whether caused by the negligence of the sender or not. > _______________________________________________ > 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 > > From stuart at lexacorp.com.pg Sun Jan 4 18:40:11 2004 From: stuart at lexacorp.com.pg (Stuart McLachlan) Date: Mon, 05 Jan 2004 10:40:11 +1000 Subject: [AccessD] Mac address In-Reply-To: References: Message-ID: <3FF93F0B.19244.9A4103@localhost> On 4 Jan 2004 at 17:43, John Bartow wrote: > I was just wondering why the Main Circuit Board Serial Number isn't used for > this. It would seem to me that this would be about the most stable unique ID > number in a PC. I have no idea how you would read this number but it always > shows up in my hardware asset inventories. > > Any comments? Public Function MBSerialNumber() As String 'RETRIEVES SERIAL NUMBER OF MOTHERBOARD 'IF THERE IS MORE THAN ONE MOTHERBOARD, THE SERIAL 'NUMBERS WILL BE DELIMITED BY COMMAS 'YOU MUST HAVE WMI INSTALLED AND A REFERENCE TO 'Microsoft WMI Scripting Library IS REQUIRED Dim objs As Object Dim obj As Object Dim WMI As Object Dim sAns As String Set WMI = GetObject("WinMgmts:") Set objs = WMI.InstancesOf("Win32_BaseBoard") For Each obj In objs sAns = sAns & obj.SerialNumber If sAns < objs.Count Then sAns = sAns & "," Next MBSerialNumber = sAns End Function -- Lexacorp Ltd http://www.lexacorp.com.pg Information Technology Consultancy, Software Development,System Support. From actebs at actebs.com.au Sun Jan 4 23:46:30 2004 From: actebs at actebs.com.au (ACTEBS) Date: Mon, 5 Jan 2004 16:46:30 +1100 Subject: [AccessD] MDE to MDB Message-ID: <005501c3d34f$47e912c0$0c05a8c0@carlton.local> Guys, Is there any method of converting an MDE to an MDB? I have a client who employed a developer to create an application for their organisation. The developer has now disappeared and the app has started to experience problems accessing some forms - it just hangs. I obviously can't fix the problem if I can't get to the forms to have a look at what might be causing the issue. The app is a A2K MDE running under a AXP environment - I was surprised that it would even run as I thought AXP would only run an AXP MDE - learn something everyday. They have been running the app just fine for months and this has just reared it ugly head. Hope someone can point me in the right direction. I have searched the archives but no help there... Thanks Vlad From mastercafe at ctv.es Mon Jan 5 00:09:16 2004 From: mastercafe at ctv.es (MastercafeCTV) Date: Mon, 5 Jan 2004 07:09:16 +0100 Subject: [AccessD] Mac address In-Reply-To: <3FF93F0B.19244.9A4103@localhost> Message-ID: <000a01c3d352$73e592b0$69fa2250@servercafe> We check this function and can't obtain any serial from the mainboard. The AXP check ok for compiling but return only " ," (two character) Do you know why?? We use the serial HDD control to check the computer, and with this code Set fs = CreateObject("Scripting.filesystemobject") Set d = fs.getdrive(fs.getdrivename(fs.getabsolutepathname("C:"))) HDD = d.SerialNumber The lenght can be 6 or more characters Juan Menendez Mastercafe =========================================== MASTERCAFE SL - NIF B-82.617.614 www.mastercafe.com Deleg. Asturias Tel 985.88.49.44 / 627.531.764 Fax 627.500.205 info at mastercafe.com juan at mastercafe.com Deleg. Madrid Tel 627.474.285 cecilia at mastercafe.com =========================================== -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Stuart McLachlan Sent: lunes, 05 de enero de 2004 1:40 To: Access Developers discussion and problem solving Subject: RE: [AccessD] Mac address On 4 Jan 2004 at 17:43, John Bartow wrote: > I was just wondering why the Main Circuit Board Serial Number isn't > used for this. It would seem to me that this would be about the most > stable unique ID number in a PC. I have no idea how you would read > this number but it always shows up in my hardware asset inventories. > > Any comments? Public Function MBSerialNumber() As String 'RETRIEVES SERIAL NUMBER OF MOTHERBOARD 'IF THERE IS MORE THAN ONE MOTHERBOARD, THE SERIAL 'NUMBERS WILL BE DELIMITED BY COMMAS 'YOU MUST HAVE WMI INSTALLED AND A REFERENCE TO 'Microsoft WMI Scripting Library IS REQUIRED Dim objs As Object Dim obj As Object Dim WMI As Object Dim sAns As String Set WMI = GetObject("WinMgmts:") Set objs = WMI.InstancesOf("Win32_BaseBoard") For Each obj In objs sAns = sAns & obj.SerialNumber If sAns < objs.Count Then sAns = sAns & "," Next MBSerialNumber = sAns End Function -- Lexacorp Ltd http://www.lexacorp.com.pg Information Technology Consultancy, Software Development,System Support. _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From mastercafe at ctv.es Mon Jan 5 00:12:34 2004 From: mastercafe at ctv.es (MastercafeCTV) Date: Mon, 5 Jan 2004 07:12:34 +0100 Subject: [AccessD] MDE to MDB In-Reply-To: <005501c3d34f$47e912c0$0c05a8c0@carlton.local> Message-ID: <000b01c3d352$e91f56b0$69fa2250@servercafe> Sorry but we don't know and all articles over MDE to MDB conversion indicate that actually is imposible. Normally we take MDB programs with many comments of every developer who work with us, because in the future you could be many problems. Juan Menendez =========================================== MASTERCAFE SL - NIF B-82.617.614 www.mastercafe.com Deleg. Asturias Tel 985.88.49.44 / 627.531.764 Fax 627.500.205 info at mastercafe.com juan at mastercafe.com Deleg. Madrid Tel 627.474.285 cecilia at mastercafe.com =========================================== -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of ACTEBS Sent: lunes, 05 de enero de 2004 6:47 To: access group Subject: [AccessD] MDE to MDB Guys, Is there any method of converting an MDE to an MDB? I have a client who employed a developer to create an application for their organisation. The developer has now disappeared and the app has started to experience problems accessing some forms - it just hangs. I obviously can't fix the problem if I can't get to the forms to have a look at what might be causing the issue. The app is a A2K MDE running under a AXP environment - I was surprised that it would even run as I thought AXP would only run an AXP MDE - learn something everyday. They have been running the app just fine for months and this has just reared it ugly head. Hope someone can point me in the right direction. I have searched the archives but no help there... Thanks Vlad _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From mastercafe at ctv.es Mon Jan 5 00:36:46 2004 From: mastercafe at ctv.es (MastercafeCTV) Date: Mon, 5 Jan 2004 07:36:46 +0100 Subject: [AccessD] Taking Controls from another MDB In-Reply-To: <000a01c3d352$73e592b0$69fa2250@servercafe> Message-ID: <000301c3d356$4ac4b740$69fa2250@servercafe> Hi group we are trying to take all reports from another MDB, we use the next code to see our Reports/Tables/Forms, but how to change Application.CurrentProject for c:\MyApp\Sample.MDB?? Function CtlLista(TIPO As String) On Error GoTo ctlerror Dim obj As AccessObject, dbs As Object Set dbs = Application.CurrentProject Dim I As Integer Dim frm As Form Dim valores As String valores = "" Select Case TIPO Case "F" For Each obj In dbs.AllForms If valores = "" Then valores = valores & obj.Name Else valores = valores & ";" & obj.Name End If Next obj Case "R" For Each obj In dbs.AllReports If valores = "" Then valores = valores & obj.Name Else valores = valores & ";" & obj.Name End If Next obj Case "T" For Each obj In dbs.AllTables If valores = "" Then valores = valores & obj.Name Else valores = valores & ";" & obj.Name End If Next obj Etc........... Thanks Juan Menendez =========================================== MASTERCAFE SL - NIF B-82.617.614 www.mastercafe.com Deleg. Asturias Tel 985.88.49.44 / 627.531.764 Fax 627.500.205 info at mastercafe.com juan at mastercafe.com Deleg. Madrid Tel 627.474.285 cecilia at mastercafe.com =========================================== -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of MastercafeCTV Sent: lunes, 05 de enero de 2004 7:09 To: 'Access Developers discussion and problem solving' Subject: RE: [AccessD] Mac address We check this function and can't obtain any serial from the mainboard. The AXP check ok for compiling but return only " ," (two character) Do you know why?? We use the serial HDD control to check the computer, and with this code Set fs = CreateObject("Scripting.filesystemobject") Set d = fs.getdrive(fs.getdrivename(fs.getabsolutepathname("C:"))) HDD = d.SerialNumber The lenght can be 6 or more characters Juan Menendez Mastercafe =========================================== MASTERCAFE SL - NIF B-82.617.614 www.mastercafe.com Deleg. Asturias Tel 985.88.49.44 / 627.531.764 Fax 627.500.205 info at mastercafe.com juan at mastercafe.com Deleg. Madrid Tel 627.474.285 cecilia at mastercafe.com =========================================== -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Stuart McLachlan Sent: lunes, 05 de enero de 2004 1:40 To: Access Developers discussion and problem solving Subject: RE: [AccessD] Mac address On 4 Jan 2004 at 17:43, John Bartow wrote: > I was just wondering why the Main Circuit Board Serial Number isn't > used for this. It would seem to me that this would be about the most > stable unique ID number in a PC. I have no idea how you would read > this number but it always shows up in my hardware asset inventories. > > Any comments? Public Function MBSerialNumber() As String 'RETRIEVES SERIAL NUMBER OF MOTHERBOARD 'IF THERE IS MORE THAN ONE MOTHERBOARD, THE SERIAL 'NUMBERS WILL BE DELIMITED BY COMMAS 'YOU MUST HAVE WMI INSTALLED AND A REFERENCE TO 'Microsoft WMI Scripting Library IS REQUIRED Dim objs As Object Dim obj As Object Dim WMI As Object Dim sAns As String Set WMI = GetObject("WinMgmts:") Set objs = WMI.InstancesOf("Win32_BaseBoard") For Each obj In objs sAns = sAns & obj.SerialNumber If sAns < objs.Count Then sAns = sAns & "," Next MBSerialNumber = sAns End Function -- Lexacorp Ltd http://www.lexacorp.com.pg Information Technology Consultancy, Software Development,System Support. _______________________________________________ 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 From DWUTKA at marlow.com Mon Jan 5 02:31:30 2004 From: DWUTKA at marlow.com (DWUTKA at marlow.com) Date: Mon, 5 Jan 2004 02:31:30 -0600 Subject: [AccessD] Mac address Message-ID: <2F8793082E00D4119A1700B0D0216BF8022276DC@main2.marlow.com> It was just a LOT of code...didn't want to put it all in an email (Unzipped). JC, let me know if you want me to send it to you off list. Drew -----Original Message----- From: Bryan Carbonnell [mailto:carbonnb at sympatico.ca] Sent: Saturday, January 03, 2004 9:55 PM To: Access Developers discussion and problem solving Subject: RE: [AccessD] Mac address On 3 Jan 2004 at 14:46, DWUTKA at marlow.com wrote: > I am attaching a VB mod, one of the functions is fGetMACAddress. > Should do what you want. Sorry for the attachment, but it is small. Tsk, tsk tsk Drew. Attachemnts are a no-no on the list. Besides the list software strips everything but plain old text. You will need to resend your VB module to JC directly. -- Bryan Carbonnell - carbonnb at sympatico.ca On the keyboard of life, always keep one finger on the escape key. _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From subs1847 at solution-providers.ie Mon Jan 5 06:13:08 2004 From: subs1847 at solution-providers.ie (Mark L. Breen) Date: Mon, 5 Jan 2004 12:13:08 -0000 Subject: [AccessD] MDBs vs SQL Server References: <426071E0B0A6D311B3C0006008B0AB23AFE249@TAPPEEXCH01> Message-ID: <00e101c3d386$05730bd0$0101a8c0@D8TZHN0J> Hello Bret, I agree with you about the gui tools supplied, and for that reason I never use the Enterprise Manager for development any more, I always use Visual InteDev that comes with VS6.0. It is great for sproc generation also, you can insert and edit the SQL that you inject into the sprocs. Mark ----- Original Message ----- From: "Brett Barabash" To: "'Access Developers discussion and problem solving'" Sent: Monday, December 29, 2003 10:00 PM Subject: RE: [AccessD] MDBs vs SQL Server > 2 all the way for me. > > Given the choice of both DB platforms (which happens to be a luxury I enjoy > at this job), SQL Server almost always wins hands down. About the only time > I use an MDB is for quick 'n' dirty single-user apps. > > There are certainly valid reasons to continue using MDB files (ease of > deployment, price, low maintenance, price, ease of data access, price...). > But for a company that already uses SQL Server 2000 for 75% of its > applications, I can't find a compelling reason to use an MDB file instead. > > The learning curve was fairly easy for me. My biggest gripe was the lack of > good visual query design tools. In this department, Access is light years > ahead of the view designer packaged with Enterprise Manager. > > > -----Original Message----- > From: John W. Colby [mailto:jcolby at colbyconsulting.com] > Sent: Monday, December 22, 2003 7:23 PM > To: AccessD > Subject: [AccessD] MDBs vs SQL Server > > > I'd like to conduct a non-scientific poll to discover what you folks use. > Please pick one of the numbers and respond to the list. > > 1) I use SQL Server for all my data. I wouldn't touch an MDB BE with a 10 > foot pole. > 2) I use SQL Server mostly, but will touch an MDB BE with a 10 foot pole, as > long as I don't have to be responsible for the mess. > 3) I have used SQL Server in at least one actual client system but my bread > and butter is made with MDB BEs. > 4) I am fascinated with the possibilities of SQL server, have looked at it, > perhaps installed it at my office, but just don't have the call for it from > my clients. > 5) What's this here SQL Server thangie? All my database BEs are done with > MDBs. > 6) I prefer to do my data stores in Excel spreadsheets, but if I must an MDB > is at least within my grasp. SQL Server is for them big boys n they won't > talk to me. I would still be using Borland's Reflex if I could get a copy - > now THERE's a REAL MAN'S database!!! > > Just pick a number and put it in the first line of your response. > > As for me, I am a 4. I have SQL Server installed in my office, moved my > billing db to it in order to have a real live in use system using it, and > have regretted it ever since. In fact I yanked the data back out into an > MDB last week after having to rebuild my system twice and then ending up > with torn pages in my SQL Server database. > > John W. Colby > www.ColbyConsulting.com > > > -------------------------------------------------------------------------- ------------------------------------------ > This email and any files transmitted with it are confidential and > intended solely for the use of the individual or entity to whom > they are addressed. > If you have received this email in error please notify the > originator of the message. This footer also confirms that this > email message has been scanned for the presence of computer viruses. > > Any views expressed in this message are those of the individual > sender, except where the sender specifies and with authority, > states them to be the views of Tappe Construction Co. > > Scanning of this message and addition of this footer is performed > by SurfControl E-mail Filter software in conjunction with > virus detection software. > > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com > From Bryan_Carbonnell at cbc.ca Mon Jan 5 07:17:52 2004 From: Bryan_Carbonnell at cbc.ca (Bryan Carbonnell) Date: Mon, 05 Jan 2004 08:17:52 -0500 Subject: [AccessD] Mac address Message-ID: I would suspect that some MoBo's don't support reading the serial number from it. I can't get the S/N from my MoBo in my Dell desktop box either. Bryan Carbonnell bryan_carbonnell at cbc.ca >>> mastercafe at ctv.es 05-Jan-04 1:09:16 AM >>> We check this function and can't obtain any serial from the mainboard. The AXP check ok for compiling but return only " ," (two character) Do you know why?? We use the serial HDD control to check the computer, and with this code Set fs = CreateObject("Scripting.filesystemobject") Set d = fs.getdrive(fs.getdrivename(fs.getabsolutepathname("C:"))) HDD = d.SerialNumber The lenght can be 6 or more characters Juan Menendez Mastercafe =========================================== MASTERCAFE SL - NIF B-82.617.614 www.mastercafe.com Deleg. Asturias Tel 985.88.49.44 / 627.531.764 Fax 627.500.205 info at mastercafe.com juan at mastercafe.com Deleg. Madrid Tel 627.474.285 cecilia at mastercafe.com =========================================== -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Stuart McLachlan Sent: lunes, 05 de enero de 2004 1:40 To: Access Developers discussion and problem solving Subject: RE: [AccessD] Mac address On 4 Jan 2004 at 17:43, John Bartow wrote: > I was just wondering why the Main Circuit Board Serial Number isn't > used for this. It would seem to me that this would be about the most > stable unique ID number in a PC. I have no idea how you would read > this number but it always shows up in my hardware asset inventories. > > Any comments? Public Function MBSerialNumber() As String 'RETRIEVES SERIAL NUMBER OF MOTHERBOARD 'IF THERE IS MORE THAN ONE MOTHERBOARD, THE SERIAL 'NUMBERS WILL BE DELIMITED BY COMMAS 'YOU MUST HAVE WMI INSTALLED AND A REFERENCE TO 'Microsoft WMI Scripting Library IS REQUIRED Dim objs As Object Dim obj As Object Dim WMI As Object Dim sAns As String Set WMI = GetObject("WinMgmts:") Set objs = WMI.InstancesOf("Win32_BaseBoard") For Each obj In objs sAns = sAns & obj.SerialNumber If sAns < objs.Count Then sAns = sAns & "," Next MBSerialNumber = sAns End Function -- Lexacorp Ltd http://www.lexacorp.com.pg Information Technology Consultancy, Software Development,System Support. _______________________________________________ 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 From jimdettman at earthlink.net Mon Jan 5 07:52:36 2004 From: jimdettman at earthlink.net (Jim Dettman) Date: Mon, 5 Jan 2004 08:52:36 -0500 Subject: [AccessD] Mac address In-Reply-To: <46B976F2B698FF46A4FE7636509B22DF03D076@stekelbes.ithelps.local> Message-ID: Erwin, Yes, you nailed it dead on. I checked with winipcfg and I had a dialup adapter on LANA 0 and that's what the code was grabbing. The code I sent John needs to be modified to iterate through the LANA numbers. I did bump into this years ago and had forgotten all about it. Jim Dettman President, Online Computer Services of WNY, Inc. (315) 699-3443 jimdettman at earthlink.net -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Erwin Craps - IT Helps Sent: Sunday, January 04, 2004 3:45 PM To: Access Developers discussion and problem solving Subject: RE: [AccessD] Mac address This 0.0.0.0 could result from having multiple nic's in your pc. If you have a PPP connector you would receive a MAC address from that to, but when not connected this would be 0 I'm not compleetly sure of this but a PPP dial adapter is a nic to. And it could be wrongly set to the first nic in the binding. What I wanna say is that you would need to itterate trough the list of all nic's and verify which mac address you want to use. 2 or 3 nic's per pc are not uncommon. For example . 1x NIC 1x PPP modem dial 1x PPPoE ADSL modem If you wanna verify just type ipconfig /ALL in a dos window in NT/2K/XP, the result is a complete list of all adapters AND MAC address. Type winipcfg in W9X, you get a form where you can chose from the multiple nic's and see there MAC address. Erwin -----Oorspronkelijk bericht----- Van: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] Namens Jim Dettman Verzonden: zondag 4 januari 2004 18:57 Aan: Access Developers discussion and problem solving Onderwerp: RE: [AccessD] Mac address I would agree. A MAC address is usually a lot more stable then a HD serial number. I wasn't aware though that a spoof utility was out there. Looks like the code will need to dig a little deeper and get the actual hardware address. BTW I'm not sure why that code I sent you returned 0.0.0.0. did the same thing here on Win98SE. It's never failed before, but then it's been a few years since I used it. I looked it over real quick and I see it's making a NetBIOS call, which the success of might be dependant on the protocols loaded. Jim Dettman President, Online Computer Services of WNY, Inc. (315) 699-3443 jimdettman at earthlink.net -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of John W. Colby Sent: Sunday, January 04, 2004 11:53 AM To: Access Developers discussion and problem solving Subject: RE: [AccessD] Mac address And how does that make the disk sn better. That DOES change with every format (and every new HD). When was the last time YOU changed your MAC address? As form myself, I've NEVER done so. When was the last YOU formatted (or replaced) your hard disk? As for myself, at LEAST half dozen times over 4 systems just in the last 4 or 5 years. Hmmm.... Never or 1/2 dozen times... John W. Colby www.ColbyConsulting.com -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Haslett, Andrew Sent: Sunday, January 04, 2004 9:02 AM To: 'Access Developers discussion and problem solving' Subject: RE: [AccessD] Mac address Hard Disk SN is far better than using the MAC address. Jees, some BIOS these days even allow you to change your MAC address yourself. -----Original Message----- From: John W. Colby [mailto:jwcolby at colbyconsulting.com] Sent: Sunday, 4 January 2004 2:19 PM To: Access Developers discussion and problem solving Subject: RE: [AccessD] Mac address LOL. I learned a long time ago not to sweat the small stuff. If there are hackers figuring out how to hack Microsoft's $100 million copy protection, I am not going to survive a determined attempt to get around my stuff. On the other hand, I assume you lock your front door. And I assume there is glass in the door that anyone who wants in could just smash to reach in and unlock your door. So why do you bother? Because the lock keeps 99% of the people out of your house. 99% is good enough for me. I will not even bat an eyelash nor give a second thought to the other 1%. 99% of the effort COULD be spent stopping (or failing to stop) that last 1%. John W. Colby www.ColbyConsulting.com -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Stuart McLachlan Sent: Saturday, January 03, 2004 7:00 PM To: Access Developers discussion and problem solving Subject: RE: [AccessD] Mac address Take a look at http://www.klcconsulting.net/smac/ for a way to defeat this copy protection scheme. (Follow the link to "the research of Kyle Lai" for a lot of good info on MAC addresses) On 3 Jan 2004 at 13:34, John W. Colby wrote: > Yea, but you have to start somewhere. More and more NICs are embedded right > in the motherboards so this is getting less and less likely. > > John W. Colby > www.ColbyConsulting.com > > -----Original Message----- > From: accessd-bounces at databaseadvisors.com > [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Gustav Brock > Sent: Saturday, January 03, 2004 12:53 PM > To: Access Developers discussion and problem solving > Subject: Re: [AccessD] Mac address > > > Hi John > > Hmm ... so the user changes his/hers NIC and is hosed ..? > > /gustav > > > > Date: 2004-01-03 18:14 > > > Well... I'm looking at a machine specific piece for copy protection. The > > work station name might be specific to a network, but is created by > > the software (or user doing the install) so if the machine went down > > (as many > of > > mine have over the last few years) if the user didn't select the > > same name > > then the key wouldn't work. > -- Lexacorp Ltd http://www.lexacorp.com.pg Information Technology Consultancy, Software Development,System Support. _______________________________________________ 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 IMPORTANT - PLEASE READ ******************** This email and any files transmitted with it are confidential and may contain information protected by law from disclosure. If you have received this message in error, please notify the sender immediately and delete this email from your system. No warranty is given that this email or files, if attached to this email, are free from computer viruses or other defects. They are provided on the basis the user assumes all responsibility for loss, damage or consequence resulting directly or indirectly from their use, whether caused by the negligence of the sender or not. _______________________________________________ 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 _______________________________________________ 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 From jimdettman at earthlink.net Mon Jan 5 07:55:39 2004 From: jimdettman at earthlink.net (Jim Dettman) Date: Mon, 5 Jan 2004 08:55:39 -0500 Subject: [AccessD] Mac address In-Reply-To: Message-ID: John, Erwin hit the nail right on the head; it's multiple NIC's that are loaded. I had a dial-up adapter on LANA 0, which is what the code was grabbing. As soon as I deleted that, the code I sent you then correctly grabbed my MAC address. If I have a little free time later today, I'll research what it takes to iterate through all the LANA's. This question comes up Experts Exchange quite frequently and from the sounds of things, there is not a good solution out there. Jim Dettman President, Online Computer Services of WNY, Inc. (315) 699-3443 jimdettman at earthlink.net -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of John W. Colby Sent: Sunday, January 04, 2004 4:16 PM To: Access Developers discussion and problem solving Subject: RE: [AccessD] Mac address Yep, I think it's exactly that - the protocols loaded. John W. Colby www.ColbyConsulting.com -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Jim Dettman Sent: Sunday, January 04, 2004 12:57 PM To: Access Developers discussion and problem solving Subject: RE: [AccessD] Mac address I would agree. A MAC address is usually a lot more stable then a HD serial number. I wasn't aware though that a spoof utility was out there. Looks like the code will need to dig a little deeper and get the actual hardware address. BTW I'm not sure why that code I sent you returned 0.0.0.0. did the same thing here on Win98SE. It's never failed before, but then it's been a few years since I used it. I looked it over real quick and I see it's making a NetBIOS call, which the success of might be dependant on the protocols loaded. Jim Dettman President, Online Computer Services of WNY, Inc. (315) 699-3443 jimdettman at earthlink.net -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of John W. Colby Sent: Sunday, January 04, 2004 11:53 AM To: Access Developers discussion and problem solving Subject: RE: [AccessD] Mac address And how does that make the disk sn better. That DOES change with every format (and every new HD). When was the last time YOU changed your MAC address? As form myself, I've NEVER done so. When was the last YOU formatted (or replaced) your hard disk? As for myself, at LEAST half dozen times over 4 systems just in the last 4 or 5 years. Hmmm.... Never or 1/2 dozen times... John W. Colby www.ColbyConsulting.com -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Haslett, Andrew Sent: Sunday, January 04, 2004 9:02 AM To: 'Access Developers discussion and problem solving' Subject: RE: [AccessD] Mac address Hard Disk SN is far better than using the MAC address. Jees, some BIOS these days even allow you to change your MAC address yourself. -----Original Message----- From: John W. Colby [mailto:jwcolby at colbyconsulting.com] Sent: Sunday, 4 January 2004 2:19 PM To: Access Developers discussion and problem solving Subject: RE: [AccessD] Mac address LOL. I learned a long time ago not to sweat the small stuff. If there are hackers figuring out how to hack Microsoft's $100 million copy protection, I am not going to survive a determined attempt to get around my stuff. On the other hand, I assume you lock your front door. And I assume there is glass in the door that anyone who wants in could just smash to reach in and unlock your door. So why do you bother? Because the lock keeps 99% of the people out of your house. 99% is good enough for me. I will not even bat an eyelash nor give a second thought to the other 1%. 99% of the effort COULD be spent stopping (or failing to stop) that last 1%. John W. Colby www.ColbyConsulting.com -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Stuart McLachlan Sent: Saturday, January 03, 2004 7:00 PM To: Access Developers discussion and problem solving Subject: RE: [AccessD] Mac address Take a look at http://www.klcconsulting.net/smac/ for a way to defeat this copy protection scheme. (Follow the link to "the research of Kyle Lai" for a lot of good info on MAC addresses) On 3 Jan 2004 at 13:34, John W. Colby wrote: > Yea, but you have to start somewhere. More and more NICs are embedded right > in the motherboards so this is getting less and less likely. > > John W. Colby > www.ColbyConsulting.com > > -----Original Message----- > From: accessd-bounces at databaseadvisors.com > [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Gustav Brock > Sent: Saturday, January 03, 2004 12:53 PM > To: Access Developers discussion and problem solving > Subject: Re: [AccessD] Mac address > > > Hi John > > Hmm ... so the user changes his/hers NIC and is hosed ..? > > /gustav > > > > Date: 2004-01-03 18:14 > > > Well... I'm looking at a machine specific piece for copy protection. The > > work station name might be specific to a network, but is created by > > the software (or user doing the install) so if the machine went down > > (as many > of > > mine have over the last few years) if the user didn't select the > > same name > > then the key wouldn't work. > -- Lexacorp Ltd http://www.lexacorp.com.pg Information Technology Consultancy, Software Development,System Support. _______________________________________________ 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 IMPORTANT - PLEASE READ ******************** This email and any files transmitted with it are confidential and may contain information protected by law from disclosure. If you have received this message in error, please notify the sender immediately and delete this email from your system. No warranty is given that this email or files, if attached to this email, are free from computer viruses or other defects. They are provided on the basis the user assumes all responsibility for loss, damage or consequence resulting directly or indirectly from their use, whether caused by the negligence of the sender or not. _______________________________________________ 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 _______________________________________________ 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 From jimdettman at earthlink.net Mon Jan 5 07:57:59 2004 From: jimdettman at earthlink.net (Jim Dettman) Date: Mon, 5 Jan 2004 08:57:59 -0500 Subject: [AccessD] MDE to MDB In-Reply-To: <005501c3d34f$47e912c0$0c05a8c0@carlton.local> Message-ID: Vlad, Technically it is possible, but no one has bothered to take the time to write such a utility because of the amount of time it would take to do so. Lacking documentation on the p-code of VBA, it would take a considerable amount of time to figure it all out. It would be far less costly to simply rewrite the app. Besides which, you'd never get the comments back anyway. Those are impossible as they are not saved in a MDE. Jim Dettman President, Online Computer Services of WNY, Inc. (315) 699-3443 jimdettman at earthlink.net -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of ACTEBS Sent: Monday, January 05, 2004 12:47 AM To: access group Subject: [AccessD] MDE to MDB Guys, Is there any method of converting an MDE to an MDB? I have a client who employed a developer to create an application for their organisation. The developer has now disappeared and the app has started to experience problems accessing some forms - it just hangs. I obviously can't fix the problem if I can't get to the forms to have a look at what might be causing the issue. The app is a A2K MDE running under a AXP environment - I was surprised that it would even run as I thought AXP would only run an AXP MDE - learn something everyday. They have been running the app just fine for months and this has just reared it ugly head. Hope someone can point me in the right direction. I have searched the archives but no help there... Thanks Vlad _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From gustav at cactus.dk Mon Jan 5 08:19:46 2004 From: gustav at cactus.dk (Gustav Brock) Date: Mon, 5 Jan 2004 15:19:46 +0100 Subject: [AccessD] MDE to MDB In-Reply-To: <005501c3d34f$47e912c0$0c05a8c0@carlton.local> References: <005501c3d34f$47e912c0$0c05a8c0@carlton.local> Message-ID: <9422834414.20040105151946@cactus.dk> Hi Vlad There was a thread on this (prepare yourself for usergroup dialect): http://dbforums.com/arch/110/2003/3/386647 /gustav > Is there any method of converting an MDE to an MDB? .. From Bryan_Carbonnell at cbc.ca Mon Jan 5 08:46:32 2004 From: Bryan_Carbonnell at cbc.ca (Bryan Carbonnell) Date: Mon, 05 Jan 2004 09:46:32 -0500 Subject: [AccessD] MDE to MDB Message-ID: Actually, not entirely True. Shamil, who I haven't seen on the list in a bit, was able to get the design elements of an MDE out for me. He was able to get the layout of the forms and reports. Maybe even the queries, but I don't remeber. The only thing that he wasnt able to get out was the code, but for me that didn't matter, since there was virtually none in the MDE. It was a paid service, that he was starting up, IIRC. No affiliation other than he saved my butt. :-) Bryan Carbonnell bryan_carbonnell at cbc.ca >>> jimdettman at earthlink.net 05-Jan-04 8:57:59 AM >>> Vlad, Technically it is possible, but no one has bothered to take the time to write such a utility because of the amount of time it would take to do so. Lacking documentation on the p-code of VBA, it would take a considerable amount of time to figure it all out. It would be far less costly to simply rewrite the app. Besides which, you'd never get the comments back anyway. Those are impossible as they are not saved in a MDE. Jim Dettman President, Online Computer Services of WNY, Inc. (315) 699-3443 jimdettman at earthlink.net -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of ACTEBS Sent: Monday, January 05, 2004 12:47 AM To: access group Subject: [AccessD] MDE to MDB Guys, Is there any method of converting an MDE to an MDB? I have a client who employed a developer to create an application for their organisation. The developer has now disappeared and the app has started to experience problems accessing some forms - it just hangs. I obviously can't fix the problem if I can't get to the forms to have a look at what might be causing the issue. The app is a A2K MDE running under a AXP environment - I was surprised that it would even run as I thought AXP would only run an AXP MDE - learn something everyday. They have been running the app just fine for months and this has just reared it ugly head. Hope someone can point me in the right direction. I have searched the archives but no help there... Thanks Vlad _______________________________________________ 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 From jimdettman at earthlink.net Mon Jan 5 09:00:53 2004 From: jimdettman at earthlink.net (Jim Dettman) Date: Mon, 5 Jan 2004 10:00:53 -0500 Subject: [AccessD] MDE to MDB In-Reply-To: Message-ID: Bryan, <> Yes, I know what your referring to. With OLE automation, you can read the objects in a MDE file and enumerate all the properties, save that to a file, then use that to create new objects. Depending on the application, that may get you quite a leg up on getting it back. I wasn't aware though that he was planning to carry that further and write the second half. But in any case, I was speaking about the VBA code, which no one has bothered to do. Jim Dettman President, Online Computer Services of WNY, Inc. (315) 699-3443 jimdettman at earthlink.net -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Bryan Carbonnell Sent: Monday, January 05, 2004 9:47 AM To: accessd at databaseadvisors.com Subject: RE: [AccessD] MDE to MDB Actually, not entirely True. Shamil, who I haven't seen on the list in a bit, was able to get the design elements of an MDE out for me. He was able to get the layout of the forms and reports. Maybe even the queries, but I don't remeber. The only thing that he wasnt able to get out was the code, but for me that didn't matter, since there was virtually none in the MDE. It was a paid service, that he was starting up, IIRC. No affiliation other than he saved my butt. :-) Bryan Carbonnell bryan_carbonnell at cbc.ca >>> jimdettman at earthlink.net 05-Jan-04 8:57:59 AM >>> Vlad, Technically it is possible, but no one has bothered to take the time to write such a utility because of the amount of time it would take to do so. Lacking documentation on the p-code of VBA, it would take a considerable amount of time to figure it all out. It would be far less costly to simply rewrite the app. Besides which, you'd never get the comments back anyway. Those are impossible as they are not saved in a MDE. Jim Dettman President, Online Computer Services of WNY, Inc. (315) 699-3443 jimdettman at earthlink.net -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of ACTEBS Sent: Monday, January 05, 2004 12:47 AM To: access group Subject: [AccessD] MDE to MDB Guys, Is there any method of converting an MDE to an MDB? I have a client who employed a developer to create an application for their organisation. The developer has now disappeared and the app has started to experience problems accessing some forms - it just hangs. I obviously can't fix the problem if I can't get to the forms to have a look at what might be causing the issue. The app is a A2K MDE running under a AXP environment - I was surprised that it would even run as I thought AXP would only run an AXP MDE - learn something everyday. They have been running the app just fine for months and this has just reared it ugly head. Hope someone can point me in the right direction. I have searched the archives but no help there... Thanks Vlad _______________________________________________ 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 _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From Bryan_Carbonnell at cbc.ca Mon Jan 5 09:09:41 2004 From: Bryan_Carbonnell at cbc.ca (Bryan Carbonnell) Date: Mon, 05 Jan 2004 10:09:41 -0500 Subject: [AccessD] MDE to MDB Message-ID: < I wasn't aware though that he was planning to carry that further and write the second half. But in any case, I was speaking about the VBA code, which no one has bothered to do.> I don't know if he has gone the step further or not either. I was just pointing out the fact that at least SOME bits are extractable from an MDE. Bryan Carbonnell bryan_carbonnell at cbc.ca >>> jimdettman at earthlink.net 05-Jan-04 10:00:53 AM >>> Bryan, <> Yes, I know what your referring to. With OLE automation, you can read the objects in a MDE file and enumerate all the properties, save that to a file, then use that to create new objects. Depending on the application, that may get you quite a leg up on getting it back. I wasn't aware though that he was planning to carry that further and write the second half. But in any case, I was speaking about the VBA code, which no one has bothered to do. From bchacc at san.rr.com Mon Jan 5 10:48:12 2004 From: bchacc at san.rr.com (Rocky Smolin - Beach Access Software) Date: Mon, 5 Jan 2004 08:48:12 -0800 Subject: [AccessD] Mac address References: <46B976F2B698FF46A4FE7636509B22DF03D076@stekelbes.ithelps.local> Message-ID: <00d801c3d3ab$b5434960$6501a8c0@HAL9002> Erwin: I'm struggling with the copy protection thing myself on a product I'm getting ready to launch soon. I think the HD SN would be a good place to start. I'm using a date bomb now and need to add code to move the date bomb. But putting the HD SN in the loop would add an extra layer of protection. Did you say you have code to retrieve the HD SN? Would it be possible to get it from you off line at bchacc at san.rr.com? Thanks and regards, Rocky Smolin Beach Access Software ----- Original Message ----- From: "Erwin Craps - IT Helps" To: "Access Developers discussion and problem solving" Sent: Sunday, January 04, 2004 12:45 PM Subject: RE: [AccessD] Mac address > This 0.0.0.0 could result from having multiple nic's in your pc. > If you have a PPP connector you would receive a MAC address from that > to, but when not connected this would be 0 > I'm not compleetly sure of this but a PPP dial adapter is a nic to. > And it could be wrongly set to the first nic in the binding. > > What I wanna say is that you would need to itterate trough the list of > all nic's and verify which mac address you want to use. > > 2 or 3 nic's per pc are not uncommon. > For example . > 1x NIC > 1x PPP modem dial > 1x PPPoE ADSL modem > > If you wanna verify just type ipconfig /ALL in a dos window in NT/2K/XP, > the result is a complete list of all adapters AND MAC address. > Type winipcfg in W9X, you get a form where you can chose from the > multiple nic's and see there MAC address. > > Erwin > > > > > -----Oorspronkelijk bericht----- > Van: accessd-bounces at databaseadvisors.com > [mailto:accessd-bounces at databaseadvisors.com] Namens Jim Dettman > Verzonden: zondag 4 januari 2004 18:57 > Aan: Access Developers discussion and problem solving > Onderwerp: RE: [AccessD] Mac address > > I would agree. A MAC address is usually a lot more stable then a HD > serial number. I wasn't aware though that a spoof utility was out > there. > > Looks like the code will need to dig a little deeper and get the actual > hardware address. > > BTW I'm not sure why that code I sent you returned 0.0.0.0. did the > same thing here on Win98SE. It's never failed before, but then it's > been a few years since I used it. I looked it over real quick and I see > it's making a NetBIOS call, which the success of might be dependant on > the protocols loaded. > > Jim Dettman > President, > Online Computer Services of WNY, Inc. > (315) 699-3443 > jimdettman at earthlink.net > > -----Original Message----- > From: accessd-bounces at databaseadvisors.com > [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of John W. Colby > Sent: Sunday, January 04, 2004 11:53 AM > To: Access Developers discussion and problem solving > Subject: RE: [AccessD] Mac address > > > And how does that make the disk sn better. That DOES change with every > format (and every new HD). When was the last time YOU changed your MAC > address? As form myself, I've NEVER done so. When was the last YOU > formatted (or replaced) your hard disk? As for myself, at LEAST half > dozen times over 4 systems just in the last 4 or 5 years. > > Hmmm.... Never or 1/2 dozen times... > > John W. Colby > www.ColbyConsulting.com > > -----Original Message----- > From: accessd-bounces at databaseadvisors.com > [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Haslett, > Andrew > Sent: Sunday, January 04, 2004 9:02 AM > To: 'Access Developers discussion and problem solving' > Subject: RE: [AccessD] Mac address > > > Hard Disk SN is far better than using the MAC address. Jees, some BIOS > these days even allow you to change your MAC address yourself. > > -----Original Message----- > From: John W. Colby [mailto:jwcolby at colbyconsulting.com] > Sent: Sunday, 4 January 2004 2:19 PM > To: Access Developers discussion and problem solving > Subject: RE: [AccessD] Mac address > > LOL. I learned a long time ago not to sweat the small stuff. If there > are hackers figuring out how to hack Microsoft's $100 million copy > protection, I am not going to survive a determined attempt to get around > my stuff. > > On the other hand, I assume you lock your front door. And I assume > there is glass in the door that anyone who wants in could just smash to > reach in and unlock your door. So why do you bother? Because the lock > keeps 99% of the people out of your house. > > 99% is good enough for me. I will not even bat an eyelash nor give a > second thought to the other 1%. > > 99% of the effort COULD be spent stopping (or failing to stop) that last > 1%. > > John W. Colby > www.ColbyConsulting.com > > -----Original Message----- > From: accessd-bounces at databaseadvisors.com > [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Stuart > McLachlan > Sent: Saturday, January 03, 2004 7:00 PM > To: Access Developers discussion and problem solving > Subject: RE: [AccessD] Mac address > > > Take a look at http://www.klcconsulting.net/smac/ > for a way to defeat this copy protection scheme. > > (Follow the link to "the research of Kyle Lai" for a lot of good info on > MAC > addresses) > > > On 3 Jan 2004 at 13:34, John W. Colby wrote: > > > Yea, but you have to start somewhere. More and more NICs are embedded > right > > in the motherboards so this is getting less and less likely. > > > > John W. Colby > > www.ColbyConsulting.com > > > > -----Original Message----- > > From: accessd-bounces at databaseadvisors.com > > [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Gustav Brock > > Sent: Saturday, January 03, 2004 12:53 PM > > To: Access Developers discussion and problem solving > > Subject: Re: [AccessD] Mac address > > > > > > Hi John > > > > Hmm ... so the user changes his/hers NIC and is hosed ..? > > > > /gustav > > > > > > > Date: 2004-01-03 18:14 > > > > > Well... I'm looking at a machine specific piece for copy protection. > The > > > work station name might be specific to a network, but is created by > > > the software (or user doing the install) so if the machine went down > > > > (as > many > > of > > > mine have over the last few years) if the user didn't select the > > > same > name > > > then the key wouldn't work. > > > > -- > Lexacorp Ltd > http://www.lexacorp.com.pg > Information Technology Consultancy, Software Development,System Support. > > > > _______________________________________________ > 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 > > IMPORTANT - PLEASE READ ******************** This email and any files > transmitted with it are confidential and may contain information > protected by law from disclosure. > If you have received this message in error, please notify the sender > immediately and delete this email from your system. > No warranty is given that this email or files, if attached to this > email, are free from computer viruses or other defects. They are > provided on the basis the user assumes all responsibility for loss, > damage or consequence resulting directly or indirectly from their use, > whether caused by the negligence of the sender or not. > _______________________________________________ > 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 > > > _______________________________________________ > 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 > From Erwin.Craps at ithelps.be Mon Jan 5 11:06:48 2004 From: Erwin.Craps at ithelps.be (Erwin Craps - IT Helps) Date: Mon, 5 Jan 2004 18:06:48 +0100 Subject: [AccessD] Mac address Message-ID: <46B976F2B698FF46A4FE7636509B22DF03D0B8@stekelbes.ithelps.local> I got a whole module for softwarelicense checking, including activation from distance (by phone in case of troubles) with a chalenge/response key... I not sure If I compleetly finished it but but you need is certanly in there. I export the necesary stuff and mail you directly. Erwin -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Rocky Smolin - Beach Access Software Sent: Monday, January 05, 2004 5:48 PM To: Access Developers discussion and problem solving Subject: Re: [AccessD] Mac address Erwin: I'm struggling with the copy protection thing myself on a product I'm getting ready to launch soon. I think the HD SN would be a good place to start. I'm using a date bomb now and need to add code to move the date bomb. But putting the HD SN in the loop would add an extra layer of protection. Did you say you have code to retrieve the HD SN? Would it be possible to get it from you off line at bchacc at san.rr.com? Thanks and regards, Rocky Smolin Beach Access Software ----- Original Message ----- From: "Erwin Craps - IT Helps" To: "Access Developers discussion and problem solving" Sent: Sunday, January 04, 2004 12:45 PM Subject: RE: [AccessD] Mac address > This 0.0.0.0 could result from having multiple nic's in your pc. > If you have a PPP connector you would receive a MAC address from that > to, but when not connected this would be 0 > I'm not compleetly sure of this but a PPP dial adapter is a nic to. > And it could be wrongly set to the first nic in the binding. > > What I wanna say is that you would need to itterate trough the list of > all nic's and verify which mac address you want to use. > > 2 or 3 nic's per pc are not uncommon. > For example . > 1x NIC > 1x PPP modem dial > 1x PPPoE ADSL modem > > If you wanna verify just type ipconfig /ALL in a dos window in NT/2K/XP, > the result is a complete list of all adapters AND MAC address. > Type winipcfg in W9X, you get a form where you can chose from the > multiple nic's and see there MAC address. > > Erwin > > > > > -----Oorspronkelijk bericht----- > Van: accessd-bounces at databaseadvisors.com > [mailto:accessd-bounces at databaseadvisors.com] Namens Jim Dettman > Verzonden: zondag 4 januari 2004 18:57 > Aan: Access Developers discussion and problem solving > Onderwerp: RE: [AccessD] Mac address > > I would agree. A MAC address is usually a lot more stable then a HD > serial number. I wasn't aware though that a spoof utility was out > there. > > Looks like the code will need to dig a little deeper and get the actual > hardware address. > > BTW I'm not sure why that code I sent you returned 0.0.0.0. did the > same thing here on Win98SE. It's never failed before, but then it's > been a few years since I used it. I looked it over real quick and I see > it's making a NetBIOS call, which the success of might be dependant on > the protocols loaded. > > Jim Dettman > President, > Online Computer Services of WNY, Inc. > (315) 699-3443 > jimdettman at earthlink.net > > -----Original Message----- > From: accessd-bounces at databaseadvisors.com > [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of John W. Colby > Sent: Sunday, January 04, 2004 11:53 AM > To: Access Developers discussion and problem solving > Subject: RE: [AccessD] Mac address > > > And how does that make the disk sn better. That DOES change with every > format (and every new HD). When was the last time YOU changed your MAC > address? As form myself, I've NEVER done so. When was the last YOU > formatted (or replaced) your hard disk? As for myself, at LEAST half > dozen times over 4 systems just in the last 4 or 5 years. > > Hmmm.... Never or 1/2 dozen times... > > John W. Colby > www.ColbyConsulting.com > > -----Original Message----- > From: accessd-bounces at databaseadvisors.com > [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Haslett, > Andrew > Sent: Sunday, January 04, 2004 9:02 AM > To: 'Access Developers discussion and problem solving' > Subject: RE: [AccessD] Mac address > > > Hard Disk SN is far better than using the MAC address. Jees, some BIOS > these days even allow you to change your MAC address yourself. > > -----Original Message----- > From: John W. Colby [mailto:jwcolby at colbyconsulting.com] > Sent: Sunday, 4 January 2004 2:19 PM > To: Access Developers discussion and problem solving > Subject: RE: [AccessD] Mac address > > LOL. I learned a long time ago not to sweat the small stuff. If there > are hackers figuring out how to hack Microsoft's $100 million copy > protection, I am not going to survive a determined attempt to get around > my stuff. > > On the other hand, I assume you lock your front door. And I assume > there is glass in the door that anyone who wants in could just smash to > reach in and unlock your door. So why do you bother? Because the lock > keeps 99% of the people out of your house. > > 99% is good enough for me. I will not even bat an eyelash nor give a > second thought to the other 1%. > > 99% of the effort COULD be spent stopping (or failing to stop) that last > 1%. > > John W. Colby > www.ColbyConsulting.com > > -----Original Message----- > From: accessd-bounces at databaseadvisors.com > [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Stuart > McLachlan > Sent: Saturday, January 03, 2004 7:00 PM > To: Access Developers discussion and problem solving > Subject: RE: [AccessD] Mac address > > > Take a look at http://www.klcconsulting.net/smac/ > for a way to defeat this copy protection scheme. > > (Follow the link to "the research of Kyle Lai" for a lot of good info on > MAC > addresses) > > > On 3 Jan 2004 at 13:34, John W. Colby wrote: > > > Yea, but you have to start somewhere. More and more NICs are embedded > right > > in the motherboards so this is getting less and less likely. > > > > John W. Colby > > www.ColbyConsulting.com > > > > -----Original Message----- > > From: accessd-bounces at databaseadvisors.com > > [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Gustav Brock > > Sent: Saturday, January 03, 2004 12:53 PM > > To: Access Developers discussion and problem solving > > Subject: Re: [AccessD] Mac address > > > > > > Hi John > > > > Hmm ... so the user changes his/hers NIC and is hosed ..? > > > > /gustav > > > > > > > Date: 2004-01-03 18:14 > > > > > Well... I'm looking at a machine specific piece for copy protection. > The > > > work station name might be specific to a network, but is created by > > > the software (or user doing the install) so if the machine went down > > > > (as > many > > of > > > mine have over the last few years) if the user didn't select the > > > same > name > > > then the key wouldn't work. > > > > -- > Lexacorp Ltd > http://www.lexacorp.com.pg > Information Technology Consultancy, Software Development,System Support. > > > > _______________________________________________ > 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 > > IMPORTANT - PLEASE READ ******************** This email and any files > transmitted with it are confidential and may contain information > protected by law from disclosure. > If you have received this message in error, please notify the sender > immediately and delete this email from your system. > No warranty is given that this email or files, if attached to this > email, are free from computer viruses or other defects. They are > provided on the basis the user assumes all responsibility for loss, > damage or consequence resulting directly or indirectly from their use, > whether caused by the negligence of the sender or not. > _______________________________________________ > 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 > > > _______________________________________________ > 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 > _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From Mike.W.Gowey at doc.state.or.us Mon Jan 5 11:32:26 2004 From: Mike.W.Gowey at doc.state.or.us (Gowey Mike W) Date: Mon, 5 Jan 2004 10:32:26 -0700 Subject: [AccessD] Caps Lock Message-ID: <05EBB8A3BEB95B4F8216BE4EF486077801D9FEC7@srciml1.ds.doc.state.or.us> Hello Everyone, Is there a way in Access to make a field automatically be capitalized or a way to make the caps lock key come on when the database is opened? Thanks in advance for any help. Mike Gowey, MCSA, A+ Team Leader - SRCI Information Systems & Services Division From BBarabash at TappeConstruction.com Mon Jan 5 11:42:58 2004 From: BBarabash at TappeConstruction.com (Brett Barabash) Date: Mon, 5 Jan 2004 11:42:58 -0600 Subject: [AccessD] Caps Lock Message-ID: <426071E0B0A6D311B3C0006008B0AB23AFE26A@TAPPEEXCH01> Mike, You can specify this in the field's InputMask property with a > symbol (lookup input mask in help for further details). Or, in the KeyPress event, you can put the code: KeyAscii = Asc(UCase$(Chr$(KeyAscii))) While it is possible to set the Caps Lock state through an API call, this is considered a poor practice as it interferes with other apps. I'll keep my conscience clean by not posting that solution here. -----Original Message----- From: Gowey Mike W [mailto:Mike.W.Gowey at doc.state.or.us] Sent: Monday, January 05, 2004 11:32 AM To: Access Developers discussion and problem solving Subject: [AccessD] Caps Lock Hello Everyone, Is there a way in Access to make a field automatically be capitalized or a way to make the caps lock key come on when the database is opened? Thanks in advance for any help. Mike Gowey, MCSA, A+ Team Leader - SRCI Information Systems & Services Division _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -------------------------------------------------------------------------------------------------------------------- This email and any files transmitted with it are confidential and intended solely for the use of the individual or entity to whom they are addressed. If you have received this email in error please notify the originator of the message. This footer also confirms that this email message has been scanned for the presence of computer viruses. Any views expressed in this message are those of the individual sender, except where the sender specifies and with authority, states them to be the views of Tappe Construction Co. Scanning of this message and addition of this footer is performed by SurfControl E-mail Filter software in conjunction with virus detection software. From rbgajewski at adelphia.net Mon Jan 5 11:44:53 2004 From: rbgajewski at adelphia.net (Bob Gajewski) Date: Mon, 5 Jan 2004 12:44:53 -0500 Subject: [AccessD] Caps Lock In-Reply-To: <05EBB8A3BEB95B4F8216BE4EF486077801D9FEC7@srciml1.ds.doc.state.or.us> Message-ID: Mike If you only care about displaying upper case in a form or report, you can just use the Format property (" > ") of the field. If you want the data stored in upper case, you can always use CBF during input: *********************************** Private Sub YourField_AfterUpdate() YourField = UCase(YourField) End Sub *********************************** Regards, Bob Gajewski -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Gowey Mike W Sent: Monday, January 05, 2004 12:32 To: Access Developers discussion and problem solving Subject: [AccessD] Caps Lock Hello Everyone, Is there a way in Access to make a field automatically be capitalized or a way to make the caps lock key come on when the database is opened? Thanks in advance for any help. Mike Gowey, MCSA, A+ Team Leader - SRCI Information Systems & Services Division _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From Kenneth.Stoker at pnl.gov Mon Jan 5 12:14:56 2004 From: Kenneth.Stoker at pnl.gov (Stoker, Kenneth E) Date: Mon, 05 Jan 2004 10:14:56 -0800 Subject: [AccessD] MDBs vs SQL Server Message-ID: <249C1CB246997C48BB74963CCD361C1B014A0355@pnlmse28.pnl.gov> Sorry this is late, I have been on vacation and only sporadically checking e-mail, focusing only on what I had to. I would say I am between a 2 and 3, so 2.5. I support and program both. Ken Stoker Technology Commercialization Information Systems Administrator PH: (509) 375-3758 FAX: (509) 375-6731 E-mail: Kenneth.Stoker at pnl.gov -----Original Message----- From: John W. Colby [mailto:jcolby at colbyconsulting.com] Sent: Monday, December 22, 2003 5:23 PM To: AccessD Subject: [AccessD] MDBs vs SQL Server I'd like to conduct a non-scientific poll to discover what you folks use. Please pick one of the numbers and respond to the list. 1) I use SQL Server for all my data. I wouldn't touch an MDB BE with a 10 foot pole. 2) I use SQL Server mostly, but will touch an MDB BE with a 10 foot pole, as long as I don't have to be responsible for the mess. 3) I have used SQL Server in at least one actual client system but my bread and butter is made with MDB BEs. 4) I am fascinated with the possibilities of SQL server, have looked at it, perhaps installed it at my office, but just don't have the call for it from my clients. 5) What's this here SQL Server thangie? All my database BEs are done with MDBs. 6) I prefer to do my data stores in Excel spreadsheets, but if I must an MDB is at least within my grasp. SQL Server is for them big boys n they won't talk to me. I would still be using Borland's Reflex if I could get a copy - now THERE's a REAL MAN'S database!!! Just pick a number and put it in the first line of your response. As for me, I am a 4. I have SQL Server installed in my office, moved my billing db to it in order to have a real live in use system using it, and have regretted it ever since. In fact I yanked the data back out into an MDB last week after having to rebuild my system twice and then ending up with torn pages in my SQL Server database. John W. Colby www.ColbyConsulting.com _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From Mike.W.Gowey at doc.state.or.us Mon Jan 5 12:17:22 2004 From: Mike.W.Gowey at doc.state.or.us (Gowey Mike W) Date: Mon, 5 Jan 2004 11:17:22 -0700 Subject: [AccessD] Caps Lock Message-ID: <05EBB8A3BEB95B4F8216BE4EF486077801D9FEC9@srciml1.ds.doc.state.or.us> Thanks a lot Brett the KeyPress event works just great, just what I needed. Sometimes I just get a brain lock and it is great to have this list to help me get by it. Thanks again Mike Gowey, MCSA, A+ Team Leader - SRCI Information Systems & Services Division -----Original Message----- From: Brett Barabash [mailto:BBarabash at TappeConstruction.com] Sent: Monday, January 05, 2004 10:43 AM To: 'Access Developers discussion and problem solving' Subject: RE: [AccessD] Caps Lock Mike, You can specify this in the field's InputMask property with a > symbol (lookup input mask in help for further details). Or, in the KeyPress event, you can put the code: KeyAscii = Asc(UCase$(Chr$(KeyAscii))) While it is possible to set the Caps Lock state through an API call, this is considered a poor practice as it interferes with other apps. I'll keep my conscience clean by not posting that solution here. -----Original Message----- From: Gowey Mike W [mailto:Mike.W.Gowey at doc.state.or.us] Sent: Monday, January 05, 2004 11:32 AM To: Access Developers discussion and problem solving Subject: [AccessD] Caps Lock Hello Everyone, Is there a way in Access to make a field automatically be capitalized or a way to make the caps lock key come on when the database is opened? Thanks in advance for any help. Mike Gowey, MCSA, A+ Team Leader - SRCI Information Systems & Services Division _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com ------------------------------------------------------------------------ -------------------------------------------- This email and any files transmitted with it are confidential and intended solely for the use of the individual or entity to whom they are addressed. If you have received this email in error please notify the originator of the message. This footer also confirms that this email message has been scanned for the presence of computer viruses. Any views expressed in this message are those of the individual sender, except where the sender specifies and with authority, states them to be the views of Tappe Construction Co. Scanning of this message and addition of this footer is performed by SurfControl E-mail Filter software in conjunction with virus detection software. _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From sgeller at cce.umn.edu Mon Jan 5 12:28:57 2004 From: sgeller at cce.umn.edu (Susan Geller) Date: Mon, 5 Jan 2004 12:28:57 -0600 Subject: [AccessD] Access with VSS Message-ID: I am using Access 2002 adp with VSS. I am wondering how it can be that right after I create a file from VSS (Tools-SourceSafe-Create Database >From SourceSafe Project), when I click on "Get Latest Version", several items report to being updated? Wouldn't the newly created project already have all the items? It isn't possible that these items were changed because I did in 2 minutes later and there was nobody else even in the office who had access to it at the time. --Susan Susan B. Geller Office of Information Systems College of Continuing Education University of Minnesota 306 Wesbrook Hall 77 Pleasant Street SE Minneapolis, MN 55455 Phone: 612-626-4785 Fax: 612-625-2568 From martyconnelly at shaw.ca Mon Jan 5 14:06:24 2004 From: martyconnelly at shaw.ca (MartyConnelly) Date: Mon, 05 Jan 2004 12:06:24 -0800 Subject: [AccessD] Taking Controls from another MDB References: <000301c3d356$4ac4b740$69fa2250@servercafe> Message-ID: <3FF9C3C0.1000607@shaw.ca> Try using TransferDatabase or CopyObject To get all the names of reports in order to transfer; try mucking about with the following code 'OpenDatabase Method Example 'This example uses the OpenDatabase method to open one Microsoft Jet database Sub OpenDatabaseX() Dim wrkJet As Workspace Dim dbsNorthwind As Database Dim dbsPubs As Database Dim dbsPubs2 As Database Dim dbsLoop As Database Dim prpLoop As Property ' Create Microsoft Jet Workspace object. Set wrkJet = CreateWorkspace("", "admin", "", dbUseJet) ' Open Database object from saved Microsoft Jet database ' for exclusive use. MsgBox "Opening Northwind..." Set dbsNorthwind = wrkJet.OpenDatabase("C:\Program Files\Microsoft Office\Office\Samples\Northwind.mdb", _ True) ' Enumerate the Databases collection. For Each dbsLoop In wrkJet.Databases Debug.Print "Database properties for " & _ dbsLoop.Name & ":" On Error Resume Next ' Enumerate the Properties collection of each Database ' object. For Each prpLoop In dbsLoop.Properties If prpLoop.Name = "Connection" Then ' Property actually returns a Connection object. Debug.Print " Connection[.Name] = " & _ dbsLoop.Connection.Name Else Debug.Print " " & prpLoop.Name & " = " & _ prpLoop End If Next prpLoop On Error GoTo 0 Next dbsLoop 'Container Property Example 'This example displays the Container property for a variety of Document objects. ' Put report names in a array, can't have two copies of database open when 'using transferdatabase although I suppose you could use copyobject Dim dbsNorthwindA As Database Dim ctrLoop As Container Dim arrReports(30) As String Set dbsNorthwindA = OpenDatabase("C:\Program Files\Microsoft Office\Office\Samples\Northwind.mdb", , ReadOnly) ' Display the container name for the first Document ' object in each Container object's Documents collection. For Each ctrLoop In dbsNorthwindA.Containers Debug.Print "Document: " & ctrLoop.Documents(0).Name Debug.Print " Container = " & ctrLoop.Documents(0).Container Next ctrLoop Dim i As Long Dim strReportName As String Dim lNoOfReports As Long For i = 0 To dbsNorthwind.Containers("Reports").Documents.Count - 1 ' DoCmd.CopyObject "Insecure.mdb", Tmp, A_REPORT, Tmp strReportName = dbsNorthwind.Containers("Reports").Documents(i).Name arrReports(i) = strReportName Debug.Print dbsNorthwind.Containers("Reports").Documents(i).Name Next i lNoOfReports = dbsNorthwind.Containers("Reports").Documents.Count - 1 'close up database dbsNorthwind.Close dbsNorthwindA.Close wrkJet.Close Set dbsNorthwind = Nothing Set dbsNorthwindA = Nothing Set wrkJet = Nothing 'after closing import the reports For i = 0 To lNoOfReports DoCmd.TransferDatabase acImport, "Microsoft Access", _ "C:\Program Files\Microsoft Office\Office\Samples\Northwind.mdb", _ acReport, arrReports(i), arrReports(i) Next i End Sub MastercafeCTV wrote: >Hi group we are trying to take all reports from another MDB, we use the next >code to see our Reports/Tables/Forms, but how to change >Application.CurrentProject for c:\MyApp\Sample.MDB?? > >Function CtlLista(TIPO As String) >On Error GoTo ctlerror > Dim obj As AccessObject, dbs As Object > Set dbs = Application.CurrentProject > Dim I As Integer > Dim frm As Form > Dim valores As String > valores = "" > Select Case TIPO > Case "F" > For Each obj In dbs.AllForms > If valores = "" Then > valores = valores & obj.Name > Else > valores = valores & ";" & obj.Name > End If > Next obj > > Case "R" > For Each obj In dbs.AllReports > If valores = "" Then > valores = valores & obj.Name > Else > valores = valores & ";" & obj.Name > End If > Next obj > Case "T" > For Each obj In dbs.AllTables > If valores = "" Then > valores = valores & obj.Name > Else > valores = valores & ";" & obj.Name > End If > Next obj >Etc........... > > >Thanks > >Juan Menendez > > >=========================================== >MASTERCAFE SL - NIF B-82.617.614 >www.mastercafe.com >Deleg. Asturias >Tel 985.88.49.44 / 627.531.764 >Fax 627.500.205 >info at mastercafe.com >juan at mastercafe.com >Deleg. Madrid >Tel 627.474.285 >cecilia at mastercafe.com >=========================================== > > >-----Original Message----- >From: accessd-bounces at databaseadvisors.com >[mailto:accessd-bounces at databaseadvisors.com] On Behalf Of MastercafeCTV >Sent: lunes, 05 de enero de 2004 7:09 >To: 'Access Developers discussion and problem solving' >Subject: RE: [AccessD] Mac address > > >We check this function and can't obtain any serial from the mainboard. The >AXP check ok for compiling but return only " ," (two character) > >Do you know why?? > >We use the serial HDD control to check the computer, and with this code > >Set fs = CreateObject("Scripting.filesystemobject") >Set d = fs.getdrive(fs.getdrivename(fs.getabsolutepathname("C:"))) >HDD = d.SerialNumber > >The lenght can be 6 or more characters > >Juan Menendez >Mastercafe > >=========================================== >MASTERCAFE SL - NIF B-82.617.614 >www.mastercafe.com >Deleg. Asturias >Tel 985.88.49.44 / 627.531.764 >Fax 627.500.205 >info at mastercafe.com >juan at mastercafe.com >Deleg. Madrid >Tel 627.474.285 >cecilia at mastercafe.com =========================================== > > >-----Original Message----- >From: accessd-bounces at databaseadvisors.com >[mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Stuart McLachlan >Sent: lunes, 05 de enero de 2004 1:40 >To: Access Developers discussion and problem solving >Subject: RE: [AccessD] Mac address > > >On 4 Jan 2004 at 17:43, John Bartow wrote: > > > >>I was just wondering why the Main Circuit Board Serial Number isn't >>used for this. It would seem to me that this would be about the most >>stable unique ID number in a PC. I have no idea how you would read >>this number but it always shows up in my hardware asset inventories. >> >>Any comments? >> >> > >Public Function MBSerialNumber() As String > >'RETRIEVES SERIAL NUMBER OF MOTHERBOARD >'IF THERE IS MORE THAN ONE MOTHERBOARD, THE SERIAL >'NUMBERS WILL BE DELIMITED BY COMMAS > >'YOU MUST HAVE WMI INSTALLED AND A REFERENCE TO >'Microsoft WMI Scripting Library IS REQUIRED > >Dim objs As Object > >Dim obj As Object >Dim WMI As Object >Dim sAns As String > > >Set WMI = GetObject("WinMgmts:") >Set objs = WMI.InstancesOf("Win32_BaseBoard") >For Each obj In objs > sAns = sAns & obj.SerialNumber > If sAns < objs.Count Then sAns = sAns & "," >Next >MBSerialNumber = sAns >End Function > > > -- Marty Connelly Victoria, B.C. Canada From cfoust at infostatsystems.com Mon Jan 5 14:34:22 2004 From: cfoust at infostatsystems.com (Charlotte Foust) Date: Mon, 5 Jan 2004 12:34:22 -0800 Subject: [AccessD] Access with VSS Message-ID: What kind of items? Charlotte Foust -----Original Message----- From: Susan Geller [mailto:sgeller at cce.umn.edu] Sent: Monday, January 05, 2004 10:29 AM To: accessd at databaseadvisors.com Subject: [AccessD] Access with VSS I am using Access 2002 adp with VSS. I am wondering how it can be that right after I create a file from VSS (Tools-SourceSafe-Create Database >From SourceSafe Project), when I click on "Get Latest Version", several items report to being updated? Wouldn't the newly created project already have all the items? It isn't possible that these items were changed because I did in 2 minutes later and there was nobody else even in the office who had access to it at the time. --Susan Susan B. Geller Office of Information Systems College of Continuing Education University of Minnesota 306 Wesbrook Hall 77 Pleasant Street SE Minneapolis, MN 55455 Phone: 612-626-4785 Fax: 612-625-2568 _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From sgeller at cce.umn.edu Mon Jan 5 15:00:23 2004 From: sgeller at cce.umn.edu (Susan Geller) Date: Mon, 5 Jan 2004 15:00:23 -0600 Subject: [AccessD] Access with VSS Message-ID: Reports. -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Charlotte Foust Sent: Monday, January 05, 2004 2:34 PM To: Access Developers discussion and problem solving Subject: RE: [AccessD] Access with VSS What kind of items? Charlotte Foust -----Original Message----- From: Susan Geller [mailto:sgeller at cce.umn.edu] Sent: Monday, January 05, 2004 10:29 AM To: accessd at databaseadvisors.com Subject: [AccessD] Access with VSS I am using Access 2002 adp with VSS. I am wondering how it can be that right after I create a file from VSS (Tools-SourceSafe-Create Database >From SourceSafe Project), when I click on "Get Latest Version", several items report to being updated? Wouldn't the newly created project already have all the items? It isn't possible that these items were changed because I did in 2 minutes later and there was nobody else even in the office who had access to it at the time. --Susan Susan B. Geller Office of Information Systems College of Continuing Education University of Minnesota 306 Wesbrook Hall 77 Pleasant Street SE Minneapolis, MN 55455 Phone: 612-626-4785 Fax: 612-625-2568 _______________________________________________ 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 From bchacc at san.rr.com Mon Jan 5 17:00:16 2004 From: bchacc at san.rr.com (Rocky Smolin - Beach Access Software) Date: Mon, 5 Jan 2004 15:00:16 -0800 Subject: [AccessD] Mac address References: <46B976F2B698FF46A4FE7636509B22DF03D0B8@stekelbes.ithelps.local> Message-ID: <01f801c3d3df$af605680$6501a8c0@HAL9002> Erwin: I am really in your debt for that. Thanks. Rocky ----- Original Message ----- From: "Erwin Craps - IT Helps" To: "Access Developers discussion and problem solving" Sent: Monday, January 05, 2004 9:06 AM Subject: RE: [AccessD] Mac address > I got a whole module for softwarelicense checking, including activation > from distance (by phone in case of troubles) with a chalenge/response > key... > > I not sure If I compleetly finished it but but you need is certanly in > there. > > I export the necesary stuff and mail you directly. > > Erwin > > > -----Original Message----- > From: accessd-bounces at databaseadvisors.com > [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Rocky Smolin > - Beach Access Software > Sent: Monday, January 05, 2004 5:48 PM > To: Access Developers discussion and problem solving > Subject: Re: [AccessD] Mac address > > Erwin: > > I'm struggling with the copy protection thing myself on a product I'm > getting ready to launch soon. I think the HD SN would be a good place > to start. I'm using a date bomb now and need to add code to move the > date bomb. > But putting the HD SN in the loop would add an extra layer of > protection. > Did you say you have code to retrieve the HD SN? Would it be possible > to get it from you off line at bchacc at san.rr.com? > > Thanks and regards, > > Rocky Smolin > Beach Access Software > > ----- Original Message ----- > From: "Erwin Craps - IT Helps" > To: "Access Developers discussion and problem solving" > > Sent: Sunday, January 04, 2004 12:45 PM > Subject: RE: [AccessD] Mac address > > > > This 0.0.0.0 could result from having multiple nic's in your pc. > > If you have a PPP connector you would receive a MAC address from that > > to, but when not connected this would be 0 > > I'm not compleetly sure of this but a PPP dial adapter is a nic to. > > And it could be wrongly set to the first nic in the binding. > > > > What I wanna say is that you would need to itterate trough the list of > > all nic's and verify which mac address you want to use. > > > > 2 or 3 nic's per pc are not uncommon. > > For example . > > 1x NIC > > 1x PPP modem dial > > 1x PPPoE ADSL modem > > > > If you wanna verify just type ipconfig /ALL in a dos window in > NT/2K/XP, > > the result is a complete list of all adapters AND MAC address. > > Type winipcfg in W9X, you get a form where you can chose from the > > multiple nic's and see there MAC address. > > > > Erwin > > > > > > > > > > -----Oorspronkelijk bericht----- > > Van: accessd-bounces at databaseadvisors.com > > [mailto:accessd-bounces at databaseadvisors.com] Namens Jim Dettman > > Verzonden: zondag 4 januari 2004 18:57 > > Aan: Access Developers discussion and problem solving > > Onderwerp: RE: [AccessD] Mac address > > > > I would agree. A MAC address is usually a lot more stable then a HD > > serial number. I wasn't aware though that a spoof utility was out > > there. > > > > Looks like the code will need to dig a little deeper and get the > actual > > hardware address. > > > > BTW I'm not sure why that code I sent you returned 0.0.0.0. did the > > same thing here on Win98SE. It's never failed before, but then it's > > been a few years since I used it. I looked it over real quick and I > see > > it's making a NetBIOS call, which the success of might be dependant on > > the protocols loaded. > > > > Jim Dettman > > President, > > Online Computer Services of WNY, Inc. > > (315) 699-3443 > > jimdettman at earthlink.net > > > > -----Original Message----- > > From: accessd-bounces at databaseadvisors.com > > [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of John W. > Colby > > Sent: Sunday, January 04, 2004 11:53 AM > > To: Access Developers discussion and problem solving > > Subject: RE: [AccessD] Mac address > > > > > > And how does that make the disk sn better. That DOES change with > every > > format (and every new HD). When was the last time YOU changed your > MAC > > address? As form myself, I've NEVER done so. When was the last YOU > > formatted (or replaced) your hard disk? As for myself, at LEAST half > > dozen times over 4 systems just in the last 4 or 5 years. > > > > Hmmm.... Never or 1/2 dozen times... > > > > John W. Colby > > www.ColbyConsulting.com > > > > -----Original Message----- > > From: accessd-bounces at databaseadvisors.com > > [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Haslett, > > Andrew > > Sent: Sunday, January 04, 2004 9:02 AM > > To: 'Access Developers discussion and problem solving' > > Subject: RE: [AccessD] Mac address > > > > > > Hard Disk SN is far better than using the MAC address. Jees, some > BIOS > > these days even allow you to change your MAC address yourself. > > > > -----Original Message----- > > From: John W. Colby [mailto:jwcolby at colbyconsulting.com] > > Sent: Sunday, 4 January 2004 2:19 PM > > To: Access Developers discussion and problem solving > > Subject: RE: [AccessD] Mac address > > > > LOL. I learned a long time ago not to sweat the small stuff. If > there > > are hackers figuring out how to hack Microsoft's $100 million copy > > protection, I am not going to survive a determined attempt to get > around > > my stuff. > > > > On the other hand, I assume you lock your front door. And I assume > > there is glass in the door that anyone who wants in could just smash > to > > reach in and unlock your door. So why do you bother? Because the > lock > > keeps 99% of the people out of your house. > > > > 99% is good enough for me. I will not even bat an eyelash nor give a > > second thought to the other 1%. > > > > 99% of the effort COULD be spent stopping (or failing to stop) that > last > > 1%. > > > > John W. Colby > > www.ColbyConsulting.com > > > > -----Original Message----- > > From: accessd-bounces at databaseadvisors.com > > [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Stuart > > McLachlan > > Sent: Saturday, January 03, 2004 7:00 PM > > To: Access Developers discussion and problem solving > > Subject: RE: [AccessD] Mac address > > > > > > Take a look at http://www.klcconsulting.net/smac/ > > for a way to defeat this copy protection scheme. > > > > (Follow the link to "the research of Kyle Lai" for a lot of good info > on > > MAC > > addresses) > > > > > > On 3 Jan 2004 at 13:34, John W. Colby wrote: > > > > > Yea, but you have to start somewhere. More and more NICs are > embedded > > right > > > in the motherboards so this is getting less and less likely. > > > > > > John W. Colby > > > www.ColbyConsulting.com > > > > > > -----Original Message----- > > > From: accessd-bounces at databaseadvisors.com > > > [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Gustav > Brock > > > Sent: Saturday, January 03, 2004 12:53 PM > > > To: Access Developers discussion and problem solving > > > Subject: Re: [AccessD] Mac address > > > > > > > > > Hi John > > > > > > Hmm ... so the user changes his/hers NIC and is hosed ..? > > > > > > /gustav > > > > > > > > > > Date: 2004-01-03 18:14 > > > > > > > Well... I'm looking at a machine specific piece for copy > protection. > > The > > > > work station name might be specific to a network, but is created > by > > > > the software (or user doing the install) so if the machine went > down > > > > > > (as > > many > > > of > > > > mine have over the last few years) if the user didn't select the > > > > same > > name > > > > then the key wouldn't work. > > > > > > > -- > > Lexacorp Ltd > > http://www.lexacorp.com.pg > > Information Technology Consultancy, Software Development,System > Support. > > > > > > > > _______________________________________________ > > 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 > > > > IMPORTANT - PLEASE READ ******************** This email and any files > > transmitted with it are confidential and may contain information > > protected by law from disclosure. > > If you have received this message in error, please notify the sender > > immediately and delete this email from your system. > > No warranty is given that this email or files, if attached to this > > email, are free from computer viruses or other defects. They are > > provided on the basis the user assumes all responsibility for loss, > > damage or consequence resulting directly or indirectly from their use, > > whether caused by the negligence of the sender or not. > > _______________________________________________ > > 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 > > > > > > _______________________________________________ > > 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 > > > > _______________________________________________ > 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 From mastercafe at ctv.es Mon Jan 5 18:49:56 2004 From: mastercafe at ctv.es (MastercafeCTV) Date: Tue, 6 Jan 2004 01:49:56 +0100 Subject: [AccessD] MDB Stability vs Perfomance In-Reply-To: Message-ID: <000001c3d3ef$01ab3db0$69fa2250@servercafe> Hi group, on the last year we are changing all our applications from Access 2k to Access XP, but at this moment we have one problem on all applications that it take more time for maintenance and repair. MDB from Access 2k are much more stable VS MDB XP (better A2k) MDB from Access 2k have similar speed vs MDB XP (better A2k) Applications on A2k are much more stable vs MDB/MDE XP (better A2k) MDB A2k corrupted not always can be repaired vs MDB XP always was be repaired (Better AXP) On the last version for application FE we obtain sometimes a reset error, I explain: close tha Access XP with application without any error message or similar, simply close and then you can open renew. Anyone knows how to solve this problems wih AXP?? Is better program with AXP on MDB format A2k?? Is the AXP less stable than A2k?? Thanks in advance Juan Men?ndez =========================================== MASTERCAFE SL - NIF B-82.617.614 www.mastercafe.com Deleg. Asturias Tel 985.88.49.44 / 627.531.764 Fax 627.500.205 info at mastercafe.com juan at mastercafe.com Deleg. Madrid Tel 627.474.285 cecilia at mastercafe.com =========================================== From cfoust at infostatsystems.com Mon Jan 5 19:08:02 2004 From: cfoust at infostatsystems.com (Charlotte Foust) Date: Mon, 5 Jan 2004 17:08:02 -0800 Subject: [AccessD] MDB Stability vs Perfomance Message-ID: I haven't found AXP SP-1 to be any less stable or have more problems than A2k. Be aware, though, that if you switch to AXP, you will only be able to create an MDE in 2002 format, not in 2000 format. Charlotte Foust -----Original Message----- From: MastercafeCTV [mailto:mastercafe at ctv.es] Sent: Monday, January 05, 2004 4:50 PM To: 'Access Developers discussion and problem solving' Subject: [AccessD] MDB Stability vs Perfomance Hi group, on the last year we are changing all our applications from Access 2k to Access XP, but at this moment we have one problem on all applications that it take more time for maintenance and repair. MDB from Access 2k are much more stable VS MDB XP (better A2k) MDB from Access 2k have similar speed vs MDB XP (better A2k) Applications on A2k are much more stable vs MDB/MDE XP (better A2k) MDB A2k corrupted not always can be repaired vs MDB XP always was be repaired (Better AXP) On the last version for application FE we obtain sometimes a reset error, I explain: close tha Access XP with application without any error message or similar, simply close and then you can open renew. Anyone knows how to solve this problems wih AXP?? Is better program with AXP on MDB format A2k?? Is the AXP less stable than A2k?? Thanks in advance Juan Men?ndez =========================================== MASTERCAFE SL - NIF B-82.617.614 www.mastercafe.com Deleg. Asturias Tel 985.88.49.44 / 627.531.764 Fax 627.500.205 info at mastercafe.com juan at mastercafe.com Deleg. Madrid Tel 627.474.285 cecilia at mastercafe.com =========================================== _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From mastercafe at ctv.es Mon Jan 5 19:15:58 2004 From: mastercafe at ctv.es (MastercafeCTV) Date: Tue, 6 Jan 2004 02:15:58 +0100 Subject: [AccessD] MDB Stability vs Perfomance In-Reply-To: Message-ID: <000901c3d3f2$b1d0e6b0$69fa2250@servercafe> The MDE problem is correct, we saw months ago. And we have installed the 3 patches for AXP (SP-1 , Patch Office XP 2, and secur. Patches) but the most significant problem is our main program STEEL TPV that uses a STEELDAT.MDB only for data, this MDB have no problem with A2k format, and the last september change to AXP format, from this we repeat Compact & Repair every month. Juan Menendez =========================================== MASTERCAFE SL - NIF B-82.617.614 www.mastercafe.com Deleg. Asturias Tel 985.88.49.44 / 627.531.764 Fax 627.500.205 info at mastercafe.com juan at mastercafe.com Deleg. Madrid Tel 627.474.285 cecilia at mastercafe.com =========================================== -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Charlotte Foust Sent: martes, 06 de enero de 2004 2:08 To: Access Developers discussion and problem solving Subject: RE: [AccessD] MDB Stability vs Perfomance I haven't found AXP SP-1 to be any less stable or have more problems than A2k. Be aware, though, that if you switch to AXP, you will only be able to create an MDE in 2002 format, not in 2000 format. Charlotte Foust -----Original Message----- From: MastercafeCTV [mailto:mastercafe at ctv.es] Sent: Monday, January 05, 2004 4:50 PM To: 'Access Developers discussion and problem solving' Subject: [AccessD] MDB Stability vs Perfomance Hi group, on the last year we are changing all our applications from Access 2k to Access XP, but at this moment we have one problem on all applications that it take more time for maintenance and repair. MDB from Access 2k are much more stable VS MDB XP (better A2k) MDB from Access 2k have similar speed vs MDB XP (better A2k) Applications on A2k are much more stable vs MDB/MDE XP (better A2k) MDB A2k corrupted not always can be repaired vs MDB XP always was be repaired (Better AXP) On the last version for application FE we obtain sometimes a reset error, I explain: close tha Access XP with application without any error message or similar, simply close and then you can open renew. Anyone knows how to solve this problems wih AXP?? Is better program with AXP on MDB format A2k?? Is the AXP less stable than A2k?? Thanks in advance Juan Men?ndez =========================================== MASTERCAFE SL - NIF B-82.617.614 www.mastercafe.com Deleg. Asturias Tel 985.88.49.44 / 627.531.764 Fax 627.500.205 info at mastercafe.com juan at mastercafe.com Deleg. Madrid Tel 627.474.285 cecilia at mastercafe.com =========================================== _______________________________________________ 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 From mastercafe at ctv.es Mon Jan 5 19:21:33 2004 From: mastercafe at ctv.es (MastercafeCTV) Date: Tue, 6 Jan 2004 02:21:33 +0100 Subject: [AccessD] FMSINC Applications In-Reply-To: Message-ID: <000a01c3d3f3$795086a0$69fa2250@servercafe> We are study to buy the FMS Inc. Utilities for AXP (Componente, Source Code, Analizer, etc... Developers pack). Any have some experience over this utlities, or can be evaluates in front of other similar?? Thanks Juan Menendez =========================================== MASTERCAFE SL - NIF B-82.617.614 www.mastercafe.com Deleg. Asturias Tel 985.88.49.44 / 627.531.764 Fax 627.500.205 info at mastercafe.com juan at mastercafe.com Deleg. Madrid Tel 627.474.285 cecilia at mastercafe.com =========================================== From wdhindman at bellsouth.net Mon Jan 5 19:31:24 2004 From: wdhindman at bellsouth.net (William Hindman) Date: Mon, 5 Jan 2004 20:31:24 -0500 Subject: [AccessD] MDB Stability vs Perfomance References: <000901c3d3f2$b1d0e6b0$69fa2250@servercafe> Message-ID: <001b01c3d3f4$cc337070$6101a8c0@dejpolsys> ...noted no problems w/XP mdbs other than the bloat bug :) William Hindman - Next Year In The Free State! ----- Original Message ----- From: "MastercafeCTV" To: "'Access Developers discussion and problem solving'" Sent: Monday, January 05, 2004 8:15 PM Subject: RE: [AccessD] MDB Stability vs Perfomance > The MDE problem is correct, we saw months ago. And we have installed the 3 > patches for AXP (SP-1 , Patch Office XP 2, and secur. Patches) but the most > significant problem is our main program STEEL TPV that uses a STEELDAT.MDB > only for data, this MDB have no problem with A2k format, and the last > september change to AXP format, from this we repeat Compact & Repair every > month. > > Juan Menendez > > > =========================================== > MASTERCAFE SL - NIF B-82.617.614 > www.mastercafe.com > Deleg. Asturias > Tel 985.88.49.44 / 627.531.764 > Fax 627.500.205 > info at mastercafe.com > juan at mastercafe.com > Deleg. Madrid > Tel 627.474.285 > cecilia at mastercafe.com > =========================================== > > > -----Original Message----- > From: accessd-bounces at databaseadvisors.com > [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Charlotte Foust > Sent: martes, 06 de enero de 2004 2:08 > To: Access Developers discussion and problem solving > Subject: RE: [AccessD] MDB Stability vs Perfomance > > > I haven't found AXP SP-1 to be any less stable or have more problems than > A2k. Be aware, though, that if you switch to AXP, you will only be able to > create an MDE in 2002 format, not in 2000 format. > > Charlotte Foust > > -----Original Message----- > From: MastercafeCTV [mailto:mastercafe at ctv.es] > Sent: Monday, January 05, 2004 4:50 PM > To: 'Access Developers discussion and problem solving' > Subject: [AccessD] MDB Stability vs Perfomance > > > Hi group, on the last year we are changing all our applications from Access > 2k to Access XP, but at this moment we have one problem on all applications > that it take more time for maintenance and repair. > > MDB from Access 2k are much more stable VS MDB XP (better A2k) > MDB from Access 2k have similar speed vs MDB XP (better A2k) > Applications on A2k are much more stable vs MDB/MDE XP (better A2k) MDB A2k > corrupted not always can be repaired vs MDB XP always was be > repaired (Better AXP) > > On the last version for application FE we obtain sometimes a reset error, I > explain: close tha Access XP with application without any error message or > similar, simply close and then you can open renew. > > Anyone knows how to solve this problems wih AXP?? Is better program with AXP > on MDB format A2k?? Is the AXP less stable than A2k?? > > Thanks in advance > > Juan Men?ndez > > > =========================================== > MASTERCAFE SL - NIF B-82.617.614 > www.mastercafe.com > Deleg. Asturias > Tel 985.88.49.44 / 627.531.764 > Fax 627.500.205 > info at mastercafe.com > juan at mastercafe.com > Deleg. Madrid > Tel 627.474.285 > cecilia at mastercafe.com =========================================== > > _______________________________________________ > 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 > > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com From papparuff at comcast.net Mon Jan 5 19:48:55 2004 From: papparuff at comcast.net (John Ruff) Date: Mon, 5 Jan 2004 17:48:55 -0800 Subject: [AccessD] FMSINC Applications In-Reply-To: <000a01c3d3f3$795086a0$69fa2250@servercafe> Message-ID: <000601c3d3f7$3efb8640$6501a8c0@papparuff> I've been using their Analyzer, CodeTools, and Sourcebooks since Access 2.0 and find them invaluable. I've got the Components for Access 2.0 and Access 97 but never really used them. I learned to try and stay away from ActiveX controls as much as possible. John V. Ruff - The Eternal Optimist :-) "Commit to the Lord whatever you do, and your plans will succeed." Proverbs 16:3 -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of MastercafeCTV Sent: Monday, January 05, 2004 5:22 PM To: 'Access Developers discussion and problem solving' Subject: [AccessD] FMSINC Applications We are study to buy the FMS Inc. Utilities for AXP (Componente, Source Code, Analizer, etc... Developers pack). Any have some experience over this utlities, or can be evaluates in front of other similar?? Thanks Juan Menendez =========================================== MASTERCAFE SL - NIF B-82.617.614 www.mastercafe.com Deleg. Asturias Tel 985.88.49.44 / 627.531.764 Fax 627.500.205 info at mastercafe.com juan at mastercafe.com Deleg. Madrid Tel 627.474.285 cecilia at mastercafe.com =========================================== _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From cfoust at infostatsystems.com Mon Jan 5 20:02:07 2004 From: cfoust at infostatsystems.com (Charlotte Foust) Date: Mon, 5 Jan 2004 18:02:07 -0800 Subject: [AccessD] MDB Stability vs Perfomance Message-ID: I'm sorry, but it isn't clear to me whether you're talking about the file format or the version of Access you're using. If you have mixed versions updating the same database, you're likely to have corruption problems. What is your main program written in? Charlotte Foust -----Original Message----- From: MastercafeCTV [mailto:mastercafe at ctv.es] Sent: Monday, January 05, 2004 5:16 PM To: 'Access Developers discussion and problem solving' Subject: RE: [AccessD] MDB Stability vs Perfomance The MDE problem is correct, we saw months ago. And we have installed the 3 patches for AXP (SP-1 , Patch Office XP 2, and secur. Patches) but the most significant problem is our main program STEEL TPV that uses a STEELDAT.MDB only for data, this MDB have no problem with A2k format, and the last september change to AXP format, from this we repeat Compact & Repair every month. Juan Menendez =========================================== MASTERCAFE SL - NIF B-82.617.614 www.mastercafe.com Deleg. Asturias Tel 985.88.49.44 / 627.531.764 Fax 627.500.205 info at mastercafe.com juan at mastercafe.com Deleg. Madrid Tel 627.474.285 cecilia at mastercafe.com =========================================== -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Charlotte Foust Sent: martes, 06 de enero de 2004 2:08 To: Access Developers discussion and problem solving Subject: RE: [AccessD] MDB Stability vs Perfomance I haven't found AXP SP-1 to be any less stable or have more problems than A2k. Be aware, though, that if you switch to AXP, you will only be able to create an MDE in 2002 format, not in 2000 format. Charlotte Foust -----Original Message----- From: MastercafeCTV [mailto:mastercafe at ctv.es] Sent: Monday, January 05, 2004 4:50 PM To: 'Access Developers discussion and problem solving' Subject: [AccessD] MDB Stability vs Perfomance Hi group, on the last year we are changing all our applications from Access 2k to Access XP, but at this moment we have one problem on all applications that it take more time for maintenance and repair. MDB from Access 2k are much more stable VS MDB XP (better A2k) MDB from Access 2k have similar speed vs MDB XP (better A2k) Applications on A2k are much more stable vs MDB/MDE XP (better A2k) MDB A2k corrupted not always can be repaired vs MDB XP always was be repaired (Better AXP) On the last version for application FE we obtain sometimes a reset error, I explain: close tha Access XP with application without any error message or similar, simply close and then you can open renew. Anyone knows how to solve this problems wih AXP?? Is better program with AXP on MDB format A2k?? Is the AXP less stable than A2k?? Thanks in advance Juan Men?ndez =========================================== MASTERCAFE SL - NIF B-82.617.614 www.mastercafe.com Deleg. Asturias Tel 985.88.49.44 / 627.531.764 Fax 627.500.205 info at mastercafe.com juan at mastercafe.com Deleg. Madrid Tel 627.474.285 cecilia at mastercafe.com =========================================== _______________________________________________ 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 _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From cfoust at infostatsystems.com Mon Jan 5 20:05:20 2004 From: cfoust at infostatsystems.com (Charlotte Foust) Date: Mon, 5 Jan 2004 18:05:20 -0800 Subject: [AccessD] FMSINC Applications Message-ID: We have them, but I don't bother with them. We avoid activeX controls, anyhow. if you have XP developer, the codelibrarian has routines for a lot of their Source Code stuff (some of which is out of date), and I just basically can't see any point in spending the money for tools I don't use. The Anaylyzer seems like overkill to me, and most of the stuff they market you could do yourself or find less expensive tools that will do what you need. Charlotte Foust -----Original Message----- From: MastercafeCTV [mailto:mastercafe at ctv.es] Sent: Monday, January 05, 2004 5:22 PM To: 'Access Developers discussion and problem solving' Subject: [AccessD] FMSINC Applications We are study to buy the FMS Inc. Utilities for AXP (Componente, Source Code, Analizer, etc... Developers pack). Any have some experience over this utlities, or can be evaluates in front of other similar?? Thanks Juan Menendez =========================================== MASTERCAFE SL - NIF B-82.617.614 www.mastercafe.com Deleg. Asturias Tel 985.88.49.44 / 627.531.764 Fax 627.500.205 info at mastercafe.com juan at mastercafe.com Deleg. Madrid Tel 627.474.285 cecilia at mastercafe.com =========================================== _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From wdhindman at bellsouth.net Mon Jan 5 22:11:20 2004 From: wdhindman at bellsouth.net (William Hindman) Date: Mon, 5 Jan 2004 23:11:20 -0500 Subject: [AccessD] FMSINC Applications References: Message-ID: <000e01c3d40b$23fc9370$6101a8c0@dejpolsys> ...I'm with Charlotte ...I had their whole shebang through '97 and made good use of their Analyzer and Detective tools ...but better code is almost always available through this list, live or archived, than what's in their Source Code ...and I also avoid ActiveX like the plague ...and now that a number of freebie or low cost tools have become available that do 95% of what Analyzer does, I just can't justify the money they want any more ...HTH :) William Hindman - Next Year In The Free State! ----- Original Message ----- From: "Charlotte Foust" To: "Access Developers discussion and problem solving" Sent: Monday, January 05, 2004 9:05 PM Subject: RE: [AccessD] FMSINC Applications > We have them, but I don't bother with them. We avoid activeX controls, > anyhow. if you have XP developer, the codelibrarian has routines for a > lot of their Source Code stuff (some of which is out of date), and I > just basically can't see any point in spending the money for tools I > don't use. The Anaylyzer seems like overkill to me, and most of the > stuff they market you could do yourself or find less expensive tools > that will do what you need. > > Charlotte Foust > > -----Original Message----- > From: MastercafeCTV [mailto:mastercafe at ctv.es] > Sent: Monday, January 05, 2004 5:22 PM > To: 'Access Developers discussion and problem solving' > Subject: [AccessD] FMSINC Applications > > > We are study to buy the FMS Inc. Utilities for AXP (Componente, Source > Code, Analizer, etc... Developers pack). > > Any have some experience over this utlities, or can be evaluates in > front of other similar?? > > Thanks > > Juan Menendez > > > =========================================== > MASTERCAFE SL - NIF B-82.617.614 > www.mastercafe.com > Deleg. Asturias > Tel 985.88.49.44 / 627.531.764 > Fax 627.500.205 > info at mastercafe.com > juan at mastercafe.com > Deleg. Madrid > Tel 627.474.285 > cecilia at mastercafe.com =========================================== > > _______________________________________________ > 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 > From mastercafe at ctv.es Mon Jan 5 22:55:35 2004 From: mastercafe at ctv.es (MastercafeCTV) Date: Tue, 6 Jan 2004 05:55:35 +0100 Subject: [AccessD] MDB Stability vs Perfomance In-Reply-To: Message-ID: <000801c3d411$52c76e40$69fa2250@servercafe> Our main programs are AXP at this moment, all in MDE format, but on A2k we have the error message to screen and on AXP some of them close the Access in the computer (same problem on Runtime version or AXP standar). The data container was A2k just august'03 and then change to AXP then beginning the problems... Too high size for some MDB that compacted have 4 mb and working more than 18 mb. At this moment all Applications and data are AXP (2002) format... But with corruption problems. Juan Menendez =========================================== MASTERCAFE SL - NIF B-82.617.614 www.mastercafe.com Deleg. Asturias Tel 985.88.49.44 / 627.531.764 Fax 627.500.205 info at mastercafe.com juan at mastercafe.com Deleg. Madrid Tel 627.474.285 cecilia at mastercafe.com =========================================== -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Charlotte Foust Sent: martes, 06 de enero de 2004 3:02 To: Access Developers discussion and problem solving Subject: RE: [AccessD] MDB Stability vs Perfomance I'm sorry, but it isn't clear to me whether you're talking about the file format or the version of Access you're using. If you have mixed versions updating the same database, you're likely to have corruption problems. What is your main program written in? Charlotte Foust -----Original Message----- From: MastercafeCTV [mailto:mastercafe at ctv.es] Sent: Monday, January 05, 2004 5:16 PM To: 'Access Developers discussion and problem solving' Subject: RE: [AccessD] MDB Stability vs Perfomance The MDE problem is correct, we saw months ago. And we have installed the 3 patches for AXP (SP-1 , Patch Office XP 2, and secur. Patches) but the most significant problem is our main program STEEL TPV that uses a STEELDAT.MDB only for data, this MDB have no problem with A2k format, and the last september change to AXP format, from this we repeat Compact & Repair every month. Juan Menendez =========================================== MASTERCAFE SL - NIF B-82.617.614 www.mastercafe.com Deleg. Asturias Tel 985.88.49.44 / 627.531.764 Fax 627.500.205 info at mastercafe.com juan at mastercafe.com Deleg. Madrid Tel 627.474.285 cecilia at mastercafe.com =========================================== -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Charlotte Foust Sent: martes, 06 de enero de 2004 2:08 To: Access Developers discussion and problem solving Subject: RE: [AccessD] MDB Stability vs Perfomance I haven't found AXP SP-1 to be any less stable or have more problems than A2k. Be aware, though, that if you switch to AXP, you will only be able to create an MDE in 2002 format, not in 2000 format. Charlotte Foust -----Original Message----- From: MastercafeCTV [mailto:mastercafe at ctv.es] Sent: Monday, January 05, 2004 4:50 PM To: 'Access Developers discussion and problem solving' Subject: [AccessD] MDB Stability vs Perfomance Hi group, on the last year we are changing all our applications from Access 2k to Access XP, but at this moment we have one problem on all applications that it take more time for maintenance and repair. MDB from Access 2k are much more stable VS MDB XP (better A2k) MDB from Access 2k have similar speed vs MDB XP (better A2k) Applications on A2k are much more stable vs MDB/MDE XP (better A2k) MDB A2k corrupted not always can be repaired vs MDB XP always was be repaired (Better AXP) On the last version for application FE we obtain sometimes a reset error, I explain: close tha Access XP with application without any error message or similar, simply close and then you can open renew. Anyone knows how to solve this problems wih AXP?? Is better program with AXP on MDB format A2k?? Is the AXP less stable than A2k?? Thanks in advance Juan Men?ndez =========================================== MASTERCAFE SL - NIF B-82.617.614 www.mastercafe.com Deleg. Asturias Tel 985.88.49.44 / 627.531.764 Fax 627.500.205 info at mastercafe.com juan at mastercafe.com Deleg. Madrid Tel 627.474.285 cecilia at mastercafe.com =========================================== _______________________________________________ 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 _______________________________________________ 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 From mastercafe at ctv.es Mon Jan 5 23:03:20 2004 From: mastercafe at ctv.es (MastercafeCTV) Date: Tue, 6 Jan 2004 06:03:20 +0100 Subject: [AccessD] Connection Strings In-Reply-To: <000a01c3d3f3$795086a0$69fa2250@servercafe> Message-ID: <000a01c3d412$67f587b0$69fa2250@servercafe> HELP DATA FOR GROUP We solved some problems with this web, you can see all Connections String possibles for Access, Sql, MySql, Pervasive, etc... For newbies (like us) on ADO connections strings and similar is a good solution. Juan Menendez =========================================== MASTERCAFE SL - NIF B-82.617.614 www.mastercafe.com Deleg. Asturias Tel 985.88.49.44 / 627.531.764 Fax 627.500.205 info at mastercafe.com juan at mastercafe.com Deleg. Madrid Tel 627.474.285 cecilia at mastercafe.com =========================================== From Alun.Garraway at otto.de Tue Jan 6 05:08:57 2004 From: Alun.Garraway at otto.de (Garraway, Alun) Date: Tue, 6 Jan 2004 12:08:57 +0100 Subject: AW: [AccessD] Form as Subform - Query Fails - Why? Message-ID: hallo tina, if you need some material on word automation from access try the databaseadvisors web site http://www.databaseadvisors.com/newsletters.htm in news letter July 2002 is an article about word automation (parts i & II) by Bryan Carbonnell, Part III is in the current news letter. hth alun -----Urspr?ngliche Nachricht----- Von: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]Im Auftrag von Tina Norris Fields Gesendet: Sonntag, 4. Januar 2004 13:36 An: Access Developers discussion and problem solving Betreff: Re: [AccessD] Form as Subform - Query Fails - Why? Hi again Gustav, I ended up keeping the button to just launch Word. I created a little macro in Word to open the acknowledgement form letter, which already looks for its data source as the tblAcknowledgePay in the TLA database. My user has only to click to merge the document, and there are her acknowledgement letters! It all looks much more spiffy and easy now than what she was doing - seriously. It used to be advisable to close Access before launching Word and loading a document to merge data from a database - (A95, A97) since Word would open an instance of Access as part of the merge process, and having two copies of Access open at one time placed heavy demands on the system resources. That no longer appears to be the case. I'm delighted. However, during my work on this little modification, from time to time Word would fail to find the data source with which it has been linked forever and functionality would disappear, i.e., the merge toolbar dimmed and no commands worked, Closing the programs and relaunching them fixed that usually. Now that I've finished fiddling with it, just running the queries and launching the merge form document, things are behaving nicely. I did study the Microsoft Automation help file, but the things it suggested weren't recognized from within Access, so I still have some learning to do there. Objects such as wordApp and wordDoc were unrecognized from within Access - worked great from within Word. So there has to be an import statement or something like that to tell Access to look to another library of objects, too. Back to the books! Thanks for your help. I will work on the syntax until the thing does work for me, I can see the situation arising again sometime. Best regards, Tina Gustav Brock wrote: >Hi Tina > >Try with > > Between > [Forms]![fInstructions]![subYourSubformControlName].Form![BeginningDate] > And > [Forms]![fInstructions]![subYourSubformControlName].Form![EndingDate] > >/gustav > > > > >>Hi John, >> >> > > > >>Thanks for the reply. I think I have not been completely clear about my >>quandary. The parameter query selects records based on the following: >> >> > > > >>Between [Forms]![fCalendar]![BeginningDate] And >>[Forms]![fCalendar]![EndingDate] >> >> > > > >>- which works fine as long as one sets the dates by opening fCalendar as >>a stand-alone form. >> >> > > > >>I made a form with a series of instructions, hoping to guide my user >>from step to step without having to remind the user to set the dates >>first in the fCalendar - >>the idea was to embed an instance of the fCalendar in the instruction >>form - set the dates right here in what is now a subform of the >>instruction form. >> >> > > > >>If one sets the dates in the embedded instance of fCalendar, the query >>does not find its parameters. Well, say I to myself, I probably need to >>tell the query where to find those date textboxes, but I do not find a >>way to identify them other than as they are already identified . Is >>there a collection other than [Forms] I need to find? When I examine my >>fCalendar through the subform control, I see all the correct textbox >>names - it certainly appears to be the same form - why does setting its >>dates not provide the necessary parameters to the query? I don't see it. >> >> > >_______________________________________________ >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 From Mark.Mitsules at ngc.com Tue Jan 6 07:19:41 2004 From: Mark.Mitsules at ngc.com (Mitsules, Mark S. (Newport News)) Date: Tue, 6 Jan 2004 08:19:41 -0500 Subject: [AccessD] FMSINC Applications Message-ID: Juan, I am in a unique situation where I deliver a "new" database to a customer on-demand based on current data. I use FMS' Total Access Detective to track what has been added, deleted, or modified since the last release. It was a real time-saver for me. Mark -----Original Message----- From: MastercafeCTV [mailto:mastercafe at ctv.es] Sent: Monday, January 05, 2004 8:22 PM To: 'Access Developers discussion and problem solving' Subject: [AccessD] FMSINC Applications We are study to buy the FMS Inc. Utilities for AXP (Componente, Source Code, Analizer, etc... Developers pack). Any have some experience over this utlities, or can be evaluates in front of other similar?? Thanks Juan Menendez =========================================== MASTERCAFE SL - NIF B-82.617.614 www.mastercafe.com Deleg. Asturias Tel 985.88.49.44 / 627.531.764 Fax 627.500.205 info at mastercafe.com juan at mastercafe.com Deleg. Madrid Tel 627.474.285 cecilia at mastercafe.com =========================================== _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From Erwin.Craps at ithelps.be Tue Jan 6 08:49:52 2004 From: Erwin.Craps at ithelps.be (Erwin Craps - IT Helps) Date: Tue, 6 Jan 2004 15:49:52 +0100 Subject: [AccessD] Excel to Access by clicking cells. Message-ID: <46B976F2B698FF46A4FE7636509B22DF03D0C7@stekelbes.ithelps.local> Hi guys Just brainstorming with myself to improve some stuff... We receive on a daily basis (7x7) a lot of excel files with data in it from several sources. We can not standarise those files for several reasons so we print these files en type the data manualy in Access. I was wondering if anyone ever has written a function so you could click the cells with the data and then right-click something and the data is passed to a recordset in Access depending on your multiselect order in Excel. Importing is not an option because these files change to much and are often to complex (more data in the file then we need). The data are boxoffice figures from cinema theatres. So the data we need as a result looks like this. Date1 MovieA Tickets Amount Date1 MovieB Tickets Amount Date1 MovieC Tickets Amount Date2 MovieA Tickets Amount Date2 MovieC Tickets Amount Date2 MovieD Tickets Amount The excel sheets can vary, it can be horizontal, vertical, double vertical double horizontal... So I believe a multi select would be a solution. I think it will be faster than printing and manual typing. I just want some code that put me on the road with this multiselecting thing and passing to Access. Erwin Erwin Craps Zaakvoerder www.ithelps.be/jonathan This E-mail is confidential, may be legally privileged, and is for the intended recipient only. Access, disclosure, copying, distribution, or reliance on any of it by anyone else is prohibited and may be a criminal offence. Please delete if obtained in error and E-mail confirmation to the sender. IT Helps - I.T. Help Center *** Box Office Belgium & Luxembourg www.ithelps.be * www.boxoffice.be * www.stadleuven.be IT Helps bvba* ** Mercatorpad 3 ** 3000 Leuven IT Helps * Phone: +32 16 296 404 * Fax: +32 16 296 405 E-mail: Info at ithelps.be Box Office ** Fax: +32 16 296 406 ** Box Office E-mail: Staff at boxoffice.be From dwaters at usinternet.com Tue Jan 6 08:54:05 2004 From: dwaters at usinternet.com (Dan Waters) Date: Tue, 6 Jan 2004 08:54:05 -0600 Subject: [AccessD] FMSINC Applications In-Reply-To: <11732638.1073395321725.JavaMail.root@localhost.localdomain> Message-ID: <000501c3d464$f1d804b0$de1811d8@DanWaters> Juan, I've used Analyzer and like it quite a bit. You will definitely get your money back in time and problems found and resolved before delivery to a client. There are many reporting options. Dan Waters -----Original Message----- From: MastercafeCTV [mailto:mastercafe at ctv.es] Sent: Monday, January 05, 2004 8:22 PM To: 'Access Developers discussion and problem solving' Subject: [AccessD] FMSINC Applications We are study to buy the FMS Inc. Utilities for AXP (Componente, Source Code, Analizer, etc... Developers pack). Any have some experience over this utlities, or can be evaluates in front of other similar?? Thanks Juan Menendez =========================================== MASTERCAFE SL - NIF B-82.617.614 www.mastercafe.com Deleg. Asturias Tel 985.88.49.44 / 627.531.764 Fax 627.500.205 info at mastercafe.com juan at mastercafe.com Deleg. Madrid Tel 627.474.285 cecilia at mastercafe.com =========================================== _______________________________________________ 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 From dwaters at usinternet.com Tue Jan 6 08:54:05 2004 From: dwaters at usinternet.com (Dan Waters) Date: Tue, 6 Jan 2004 08:54:05 -0600 Subject: [AccessD] Surgical Strike - Any Users? Message-ID: <000001c3d464$ee3402f0$de1811d8@DanWaters> Another 'survey' question! Does anyone have experience with Surgical Strike? I would certainly like to use it's capabilities. Are there any alternatives or competitors? Thanks! Dan Waters Quality Process Solutions From gustav at cactus.dk Tue Jan 6 09:07:34 2004 From: gustav at cactus.dk (Gustav Brock) Date: Tue, 6 Jan 2004 16:07:34 +0100 Subject: [AccessD] Excel to Access by clicking cells. In-Reply-To: <46B976F2B698FF46A4FE7636509B22DF03D0C7@stekelbes.ithelps.local> References: <46B976F2B698FF46A4FE7636509B22DF03D0C7@stekelbes.ithelps.local> Message-ID: <3725390810.20040106160734@cactus.dk> Hi Erwin If you can (multi)select cells in a worksheet, you can copy and paste into an appropriate open select query. Or you could apply a Named Range to that selecting, save and close, then link this Named Range as a linked table in Access. You could even record a macro for each cinema's worksheet to perform this action ... /gustav > We receive on a daily basis (7x7) a lot of excel files with data in it > from several sources. > We can not standarise those files for several reasons so we print these > files en type the data manualy in Access. > I was wondering if anyone ever has written a function so you could click > the cells with the data and then right-click something and the data is > passed to a recordset in Access depending on your multiselect order in > Excel. > Importing is not an option because these files change to much and are > often to complex (more data in the file then we need). > The data are boxoffice figures from cinema theatres. > So the data we need as a result looks like this. > Date1 MovieA Tickets Amount > Date1 MovieB Tickets Amount > Date1 MovieC Tickets Amount > Date2 MovieA Tickets Amount > Date2 MovieC Tickets Amount > Date2 MovieD Tickets Amount > The excel sheets can vary, it can be horizontal, vertical, double > vertical double horizontal... > So I believe a multi select would be a solution. I think it will be > faster than printing and manual typing. > I just want some code that put me on the road with this multiselecting > thing and passing to Access. From JHewson at karta.com Tue Jan 6 09:29:43 2004 From: JHewson at karta.com (Jim Hewson) Date: Tue, 6 Jan 2004 09:29:43 -0600 Subject: [AccessD] FMSINC Applications Message-ID: <4AE733BBEEE72647A9F950F7275F262E1126A7@nt04.karta.com> I have Analyzer 2000, Total Access Memo and Total Access Components. I have used the Memo control on several databases. All but one in-house. The client had a requirement for comments on a report to be presented to the CEO, CFO, and others on a monthly basis. It has saved my client hours. The only problem I had was that, I had used the demo version before I installed the purchased version on my development machine. It didn't work on the client's machine. I uninstalled the demo version and reinstalled the licensed version... no more problems. Client loves it. I have only used the Components on one database (same client). I needed a Red button to tell them to relink the tables after a new FE was ftp'd to there directory. I also included the Progress Meter for a couple of items that seemed to take forever! Even though, the total time was longer, it seems shorter to the client because of the visual aide. Both have worked well. I like the Analyzer, especially for those databases that I have inherited. I like the documenter and the diagrams. For example, the data flow diagram will give you the table name where it's used in queries, forms and reports. It will also tell you where the query is used (form or report). Examples of the documenter are that a form doesn't have a caption or that a query is used. Jim -----Original Message----- From: MastercafeCTV [mailto:mastercafe at ctv.es] Sent: Monday, January 05, 2004 7:22 PM To: 'Access Developers discussion and problem solving' Subject: [AccessD] FMSINC Applications We are study to buy the FMS Inc. Utilities for AXP (Componente, Source Code, Analizer, etc... Developers pack). Any have some experience over this utlities, or can be evaluates in front of other similar?? Thanks Juan Menendez =========================================== MASTERCAFE SL - NIF B-82.617.614 www.mastercafe.com Deleg. Asturias Tel 985.88.49.44 / 627.531.764 Fax 627.500.205 info at mastercafe.com juan at mastercafe.com Deleg. Madrid Tel 627.474.285 cecilia at mastercafe.com =========================================== _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From actebs at actebs.com.au Tue Jan 6 09:35:31 2004 From: actebs at actebs.com.au (ACTEBS) Date: Wed, 7 Jan 2004 02:35:31 +1100 Subject: [AccessD] MDE to MDB In-Reply-To: <9422834414.20040105151946@cactus.dk> Message-ID: <000601c3d46a$b7cd1ac0$0c05a8c0@carlton.local> Hi Gustav, Thanks for that...Hopefully I can conjure up a solution amongst that lot.... Regards Vlad -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Gustav Brock Sent: Tuesday, 6 January 2004 1:20 AM To: Access Developers discussion and problem solving Subject: Re: [AccessD] MDE to MDB Hi Vlad There was a thread on this (prepare yourself for usergroup dialect): http://dbforums.com/arch/110/2003/3/386647 /gustav > Is there any method of converting an MDE to an MDB? .. _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From john at winhaven.net Tue Jan 6 09:43:57 2004 From: john at winhaven.net (John Bartow) Date: Tue, 6 Jan 2004 09:43:57 -0600 Subject: [AccessD] Surgical Strike - Any Users? In-Reply-To: <000001c3d464$ee3402f0$de1811d8@DanWaters> Message-ID: I have. It works just fine for situations where it is applicable. I did use it with one client (that had A97 set up on all of their PCs) and it makes the end user updates very easy and worry free. Unfortunately I can't use it much as I deliver my apps as .MDEs. Surgical Strike doesn't work with MDEs. If you are in a situation where you are updating MDBs. If not, I don't recommend it. John B. > -----Original Message----- > From: accessd-bounces at databaseadvisors.com > [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Dan Waters > Sent: Tuesday, January 06, 2004 8:54 AM > To: Database Advisors > Subject: [AccessD] Surgical Strike - Any Users? > > > Another 'survey' question! > > Does anyone have experience with Surgical Strike? I would > certainly like to > use it's capabilities. > > Are there any alternatives or competitors? > > Thanks! > Dan Waters > Quality Process Solutions > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com > > From andy at minstersystems.co.uk Tue Jan 6 09:41:55 2004 From: andy at minstersystems.co.uk (Andy Lacey) Date: Tue, 6 Jan 2004 15:41:55 +0000 Subject: [AccessD] Get Folder Name via API Message-ID: <20040106154152.230D5255E94@smithers.nildram.co.uk> Must've done thsi before but can't find it. I want to ask the user for a folder name (into which I'm going to store stuff). I want to use the Windows common file dialog so that it looks neat and offers to create a new folder and so on. However I don't want to put a Common Dialog control on the form (always has version issues) so want to use the API method. But the code I have (from Dev Ashish) insists on a filename not just a folder, and the other code on his site to browse a folder list doesn't use the normal dialog. Anyone got code for this? -- Andy Lacey http://www.minstersystems.co.uk ________________________________________________ Message sent using UebiMiau 2.7.2 From andy at minstersystems.co.uk Tue Jan 6 09:54:31 2004 From: andy at minstersystems.co.uk (Andy Lacey) Date: Tue, 6 Jan 2004 15:54:31 +0000 Subject: [AccessD] Surgical Strike - Any Users? Message-ID: <20040106155428.50DD9251A3F@smithers.nildram.co.uk> Dan, I take it you want to distribute FE mods, cos if it's just BE mods then our own very BEU (BackEnd Upgrader) will do that for you for free. See http://www.databaseadvisors.com/downloads.htm -- Andy Lacey http://www.minstersystems.co.uk --------- Original Message -------- From: "Access Developers discussion and problem solving" To: "Database Advisors" Subject: [AccessD] Surgical Strike - Any Users? Date: 06/01/04 20:56 Another 'survey' question! Does anyone have experience with Surgical Strike? I would certainly like to use it's capabilities. Are there any alternatives or competitors? Thanks! Dan Waters Quality Process Solutions _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com ________________________________________________ Message sent using UebiMiau 2.7.2 From bheid at appdevgrp.com Tue Jan 6 10:00:22 2004 From: bheid at appdevgrp.com (Bobby Heid) Date: Tue, 6 Jan 2004 11:00:22 -0500 Subject: [AccessD] Get Folder Name via API In-Reply-To: <916187228923D311A6FE00A0CC3FAA3071DB87@ADGSERVER> Message-ID: <916187228923D311A6FE00A0CC3FAA305BB139@ADGSERVER> Try this. Call by passing a reference to the calling form I.e. strFolder=GetFolder(Me) Let me know if this does not work as I am cutting and pasting from a module and may have left something out. Bobby Private Declare Function SHGetPathFromIDList Lib "shell32" _ (ByVal pidList As Long, ByVal lpBuffer As String) As Long Private Declare Sub CoTaskMemFree Lib "ole32.dll" (ByVal hMem As Long) Private Declare Function lstrcat Lib "kernel32" Alias "lstrcatA" _ (ByVal lpString1 As String, ByVal lpString2 As String) As Long Private Declare Function SHBrowseForFolder Lib "shell32" (lpbi As BrowseInfo) As Long Private Type BrowseInfo hWndOwner As Long pIDLRoot As Long pszDisplayName As Long lpszTitle As Long ulFlags As Long lpfnCallback As Long lParam As Long iImage As Long End Type Private Const BIF_RETURNONLYFSDIRS = 1 Private Const BIF_NEWDIALOGSTYLE = &H40 Private Const BIF_EDITBOX = &H10 Private Const BIF_USENEWUI = BIF_NEWDIALOGSTYLE Private Const BIF_STATUSTEXT As Integer = &H4 Public Function GetFolder(ByRef frmShow As Form) As String Dim iNull As Integer Dim lpIDList As Long Dim lResult As Long Dim sPath As String Dim udtBI As BrowseInfo With udtBI 'Set the owner window .hWndOwner = frmShow.Hwnd 'lstrcat appends the two strings and returns the memory address .lpszTitle = lstrcat("Directory to scan", "") 'Return only if the user selected a directory .ulFlags = BIF_RETURNONLYFSDIRS + BIF_USENEWUI End With 'Show the 'Browse for folder' dialog lpIDList = SHBrowseForFolder(udtBI) If lpIDList Then sPath = String$(MAX_PATH, 0) 'Get the path from the IDList SHGetPathFromIDList lpIDList, sPath 'free the block of memory CoTaskMemFree lpIDList iNull = InStr(sPath, vbNullChar) If iNull Then sPath = Left$(sPath, iNull - 1) End If End If GetFolder = "" & sPath End Function -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Andy Lacey Sent: Tuesday, January 06, 2004 10:42 AM To: Access Developers discussion and problem solving Subject: [AccessD] Get Folder Name via API Must've done thsi before but can't find it. I want to ask the user for a folder name (into which I'm going to store stuff). I want to use the Windows common file dialog so that it looks neat and offers to create a new folder and so on. However I don't want to put a Common Dialog control on the form (always has version issues) so want to use the API method. But the code I have (from Dev Ashish) insists on a filename not just a folder, and the other code on his site to browse a folder list doesn't use the normal dialog. Anyone got code for this? -- Andy Lacey http://www.minstersystems.co.uk ________________________________________________ Message sent using UebiMiau 2.7.2 _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From cfoust at infostatsystems.com Tue Jan 6 10:05:28 2004 From: cfoust at infostatsystems.com (Charlotte Foust) Date: Tue, 6 Jan 2004 08:05:28 -0800 Subject: [AccessD] MDB Stability vs Perfomance Message-ID: Access 2000 can't open 2002 format files. Is that the nature of the error message, corrupted database file? Or are you talking about problems you had when using the 2000 file format for the datafile with an AXP front end? I prefer to use the 2000 format for data files to avoid the unrecoverable bloat issue in 2002 format. We haven't had any problems with them in our commercial applications. You do need to make sure that all your machines have the same service packs of Office XP and Jet installed however. Maybe if you give more specific information about the kind of error messages you're getting, someone else will have some ideas. Charlotte Foust -----Original Message----- From: MastercafeCTV [mailto:mastercafe at ctv.es] Sent: Monday, January 05, 2004 8:56 PM To: 'Access Developers discussion and problem solving' Subject: RE: [AccessD] MDB Stability vs Perfomance Our main programs are AXP at this moment, all in MDE format, but on A2k we have the error message to screen and on AXP some of them close the Access in the computer (same problem on Runtime version or AXP standar). The data container was A2k just august'03 and then change to AXP then beginning the problems... Too high size for some MDB that compacted have 4 mb and working more than 18 mb. At this moment all Applications and data are AXP (2002) format... But with corruption problems. Juan Menendez =========================================== MASTERCAFE SL - NIF B-82.617.614 www.mastercafe.com Deleg. Asturias Tel 985.88.49.44 / 627.531.764 Fax 627.500.205 info at mastercafe.com juan at mastercafe.com Deleg. Madrid Tel 627.474.285 cecilia at mastercafe.com =========================================== -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Charlotte Foust Sent: martes, 06 de enero de 2004 3:02 To: Access Developers discussion and problem solving Subject: RE: [AccessD] MDB Stability vs Perfomance I'm sorry, but it isn't clear to me whether you're talking about the file format or the version of Access you're using. If you have mixed versions updating the same database, you're likely to have corruption problems. What is your main program written in? Charlotte Foust -----Original Message----- From: MastercafeCTV [mailto:mastercafe at ctv.es] Sent: Monday, January 05, 2004 5:16 PM To: 'Access Developers discussion and problem solving' Subject: RE: [AccessD] MDB Stability vs Perfomance The MDE problem is correct, we saw months ago. And we have installed the 3 patches for AXP (SP-1 , Patch Office XP 2, and secur. Patches) but the most significant problem is our main program STEEL TPV that uses a STEELDAT.MDB only for data, this MDB have no problem with A2k format, and the last september change to AXP format, from this we repeat Compact & Repair every month. Juan Menendez =========================================== MASTERCAFE SL - NIF B-82.617.614 www.mastercafe.com Deleg. Asturias Tel 985.88.49.44 / 627.531.764 Fax 627.500.205 info at mastercafe.com juan at mastercafe.com Deleg. Madrid Tel 627.474.285 cecilia at mastercafe.com =========================================== -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Charlotte Foust Sent: martes, 06 de enero de 2004 2:08 To: Access Developers discussion and problem solving Subject: RE: [AccessD] MDB Stability vs Perfomance I haven't found AXP SP-1 to be any less stable or have more problems than A2k. Be aware, though, that if you switch to AXP, you will only be able to create an MDE in 2002 format, not in 2000 format. Charlotte Foust -----Original Message----- From: MastercafeCTV [mailto:mastercafe at ctv.es] Sent: Monday, January 05, 2004 4:50 PM To: 'Access Developers discussion and problem solving' Subject: [AccessD] MDB Stability vs Perfomance Hi group, on the last year we are changing all our applications from Access 2k to Access XP, but at this moment we have one problem on all applications that it take more time for maintenance and repair. MDB from Access 2k are much more stable VS MDB XP (better A2k) MDB from Access 2k have similar speed vs MDB XP (better A2k) Applications on A2k are much more stable vs MDB/MDE XP (better A2k) MDB A2k corrupted not always can be repaired vs MDB XP always was be repaired (Better AXP) On the last version for application FE we obtain sometimes a reset error, I explain: close tha Access XP with application without any error message or similar, simply close and then you can open renew. Anyone knows how to solve this problems wih AXP?? Is better program with AXP on MDB format A2k?? Is the AXP less stable than A2k?? Thanks in advance Juan Men?ndez =========================================== MASTERCAFE SL - NIF B-82.617.614 www.mastercafe.com Deleg. Asturias Tel 985.88.49.44 / 627.531.764 Fax 627.500.205 info at mastercafe.com juan at mastercafe.com Deleg. Madrid Tel 627.474.285 cecilia at mastercafe.com =========================================== _______________________________________________ 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 _______________________________________________ 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 _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From actebs at actebs.com.au Tue Jan 6 10:07:28 2004 From: actebs at actebs.com.au (ACTEBS) Date: Wed, 7 Jan 2004 03:07:28 +1100 Subject: [AccessD] Get Folder Name via API In-Reply-To: <20040106154152.230D5255E94@smithers.nildram.co.uk> Message-ID: <000701c3d46f$2e81e930$0c05a8c0@carlton.local> Andy, This should help you out (Not sure where I got it from originally - apologies to the author): Private Type BrowseInfo hWndOwner As Long pIDLRoot As Long pszDisplayName As Long lpszTitle As Long ulFlags As Long lpfnCallback As Long lParam As Long iImage As Long End Type Private Const BIF_RETURNONLYFSDIRS = 1 Private Const MAX_PATH = 260 Private Declare Sub CoTaskMemFree Lib "ole32.dll" (ByVal hMem As Long) Private Declare Function lstrcat Lib "kernel32" Alias "lstrcatA" _ (ByVal lpString1 As String, ByVal lpString2 As String) As Long Private Declare Function SHBrowseForFolder Lib "shell32" _ (lpbi As BrowseInfo) As Long Private Declare Function SHGetPathFromIDList Lib "shell32" _ (ByVal pidList As Long, ByVal lpBuffer As String) As Long Public Function BrowseForFolder(hWndOwner As Long, sPrompt As String) As String Dim iNull As Integer Dim lpIDList As Long Dim lResult As Long Dim sPath As String Dim udtBI As BrowseInfo With udtBI .hWndOwner = hWndOwner .lpszTitle = lstrcat(sPrompt, "") .ulFlags = BIF_RETURNONLYFSDIRS End With lpIDList = SHBrowseForFolder(udtBI) If lpIDList Then sPath = String$(MAX_PATH, 0) lResult = SHGetPathFromIDList(lpIDList, sPath) Call CoTaskMemFree(lpIDList) iNull = InStr(sPath, vbNullChar) If iNull Then sPath = Left$(sPath, iNull - 1) End If End If BrowseForFolder = sPath End Function You can use it as in the following example: Me!YourTextBox = BrowseForFolder(0, "Heading For The Browse Dialogue Box") HTH Regards Vlad -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Andy Lacey Sent: Wednesday, 7 January 2004 2:42 AM To: Access Developers discussion and problem solving Subject: [AccessD] Get Folder Name via API Must've done thsi before but can't find it. I want to ask the user for a folder name (into which I'm going to store stuff). I want to use the Windows common file dialog so that it looks neat and offers to create a new folder and so on. However I don't want to put a Common Dialog control on the form (always has version issues) so want to use the API method. But the code I have (from Dev Ashish) insists on a filename not just a folder, and the other code on his site to browse a folder list doesn't use the normal dialog. Anyone got code for this? -- Andy Lacey http://www.minstersystems.co.uk ________________________________________________ Message sent using UebiMiau 2.7.2 _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From bheid at appdevgrp.com Tue Jan 6 10:18:24 2004 From: bheid at appdevgrp.com (Bobby Heid) Date: Tue, 6 Jan 2004 11:18:24 -0500 Subject: [AccessD] Get Folder Name via API In-Reply-To: <916187228923D311A6FE00A0CC3FAA3071DB9D@ADGSERVER> Message-ID: <916187228923D311A6FE00A0CC3FAA305BB13A@ADGSERVER> LOL, Probably the same place that I did! And I can't remember either. Bobby -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of ACTEBS Sent: Tuesday, January 06, 2004 11:07 AM To: 'Access Developers discussion and problem solving' Subject: RE: [AccessD] Get Folder Name via API Andy, This should help you out (Not sure where I got it from originally - apologies to the author): Private Type BrowseInfo hWndOwner As Long pIDLRoot As Long pszDisplayName As Long lpszTitle As Long ulFlags As Long lpfnCallback As Long lParam As Long iImage As Long End Type Private Const BIF_RETURNONLYFSDIRS = 1 Private Const MAX_PATH = 260 Private Declare Sub CoTaskMemFree Lib "ole32.dll" (ByVal hMem As Long) Private Declare Function lstrcat Lib "kernel32" Alias "lstrcatA" _ (ByVal lpString1 As String, ByVal lpString2 As String) As Long Private Declare Function SHBrowseForFolder Lib "shell32" _ (lpbi As BrowseInfo) As Long Private Declare Function SHGetPathFromIDList Lib "shell32" _ (ByVal pidList As Long, ByVal lpBuffer As String) As Long Public Function BrowseForFolder(hWndOwner As Long, sPrompt As String) As String Dim iNull As Integer Dim lpIDList As Long Dim lResult As Long Dim sPath As String Dim udtBI As BrowseInfo With udtBI .hWndOwner = hWndOwner .lpszTitle = lstrcat(sPrompt, "") .ulFlags = BIF_RETURNONLYFSDIRS End With lpIDList = SHBrowseForFolder(udtBI) If lpIDList Then sPath = String$(MAX_PATH, 0) lResult = SHGetPathFromIDList(lpIDList, sPath) Call CoTaskMemFree(lpIDList) iNull = InStr(sPath, vbNullChar) If iNull Then sPath = Left$(sPath, iNull - 1) End If End If BrowseForFolder = sPath End Function You can use it as in the following example: Me!YourTextBox = BrowseForFolder(0, "Heading For The Browse Dialogue Box") HTH Regards Vlad -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Andy Lacey Sent: Wednesday, 7 January 2004 2:42 AM To: Access Developers discussion and problem solving Subject: [AccessD] Get Folder Name via API Must've done thsi before but can't find it. I want to ask the user for a folder name (into which I'm going to store stuff). I want to use the Windows common file dialog so that it looks neat and offers to create a new folder and so on. However I don't want to put a Common Dialog control on the form (always has version issues) so want to use the API method. But the code I have (from Dev Ashish) insists on a filename not just a folder, and the other code on his site to browse a folder list doesn't use the normal dialog. Anyone got code for this? -- Andy Lacey http://www.minstersystems.co.uk ________________________________________________ Message sent using UebiMiau 2.7.2 _______________________________________________ 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 From Erwin.Craps at ithelps.be Tue Jan 6 10:19:05 2004 From: Erwin.Craps at ithelps.be (Erwin Craps - IT Helps) Date: Tue, 6 Jan 2004 17:19:05 +0100 Subject: [AccessD] Excel to Access by clicking cells. Message-ID: <46B976F2B698FF46A4FE7636509B22DF03D0C8@stekelbes.ithelps.local> I don't think so Gustav, it's not that easy (:- The source layout can be compleetly turned around, or even not structured (matrix based). Name range is not posible neither cause of layout and to slow (it has to be done every day). Linking/importing is out of the question, no way Jose... The structure of the Excel files will no permit me that. I must avoid at any cost to change anything to the files because it has to be done on a 7x7 daily base and just printing and typing it in manualy would be speedier. I don't see any other why than clicking on the appropriate cells making a multiselect and somehow with the clickorder decide which cell is what... You should see the file to fully understand my problem, but the data is confidential and preparing some dummies would take me half a day... Erwin -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Gustav Brock Sent: Tuesday, January 06, 2004 4:08 PM To: Access Developers discussion and problem solving Subject: Re: [AccessD] Excel to Access by clicking cells. Hi Erwin If you can (multi)select cells in a worksheet, you can copy and paste into an appropriate open select query. Or you could apply a Named Range to that selecting, save and close, then link this Named Range as a linked table in Access. You could even record a macro for each cinema's worksheet to perform this action ... /gustav > We receive on a daily basis (7x7) a lot of excel files with data in it > from several sources. > We can not standarise those files for several reasons so we print > these files en type the data manualy in Access. > I was wondering if anyone ever has written a function so you could > click the cells with the data and then right-click something and the > data is passed to a recordset in Access depending on your multiselect > order in Excel. > Importing is not an option because these files change to much and are > often to complex (more data in the file then we need). > The data are boxoffice figures from cinema theatres. > So the data we need as a result looks like this. > Date1 MovieA Tickets Amount > Date1 MovieB Tickets Amount > Date1 MovieC Tickets Amount > Date2 MovieA Tickets Amount > Date2 MovieC Tickets Amount > Date2 MovieD Tickets Amount > The excel sheets can vary, it can be horizontal, vertical, double > vertical double horizontal... > So I believe a multi select would be a solution. I think it will be > faster than printing and manual typing. > I just want some code that put me on the road with this multiselecting > thing and passing to Access. _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From rgilimited at btconnect.com Tue Jan 6 10:24:23 2004 From: rgilimited at btconnect.com (Robin Lawrence) Date: Tue, 6 Jan 2004 16:24:23 -0000 Subject: [AccessD] Get Folder Name via API In-Reply-To: <20040106154152.230D5255E94@smithers.nildram.co.uk> Message-ID: <000401c3d471$8c3a74a0$5373a8c0@local> Andy, I use this folder browser from Carl Tribble '.====================================================================== === '.Browse Folders Module '.Copyright 1999 Tribble Software. All rights reserved. '.Phone : (616) 455-2055 '.E-mail : carltribble at earthlink.net '.====================================================================== === ' DO NOT DELETE THE COMMENTS ABOVE. All other comments in this module ' may be deleted from production code, but lines above must remain. '----------------------------------------------------------------------- --- '.Description : This module calls three functions in shell32.dll to allow '. the user to browse for a folder. '. '.Written By : Carl Tribble '.Date Created : 10/05/1999 08:06:31 PM '.Rev. History : ' Comments : The public entry point is the procedure tsGetPathFromUser, ' The selected folder name is returned in the form of a full ' path but without the trailing "\". If the User presses ' Cancel, or an error occurs, the procedure returns Null. ' This module is completely self-contained. Simply copy it ' into your database to use it. '.---------------------------------------------------------------------- --- '. ' ADDITIONAL NOTES: ' ' If you want your user to browse for file names you must use the module ' basBrowseFiles instead, or the common dialog activeX control. ' ' TO STREAMLINE this module for production programs, you should remove: ' 1) Unnecessary comments ' 2) Flag and Root Folder Constants which you do not intend to use. ' 3) The test procedure tsGetPathFromUserTest ' *DO NOT REMOVE ANYTHING ELSE. Everything else is required. ' '----------------------------------------------------------------------- --- ' ' INSTRUCTIONS: ' ' ( For a working example, open the Debug window ) ' ( and enter tsGetPathFromUserTest. ) ' ( ) ' ( frmBrowseFoldersTest, if available, provides ) ' ( additional testing features. ) ' '.All the arguments for the function are optional. You may call it with no '.arguments whatsoever and simply assign its return value to a variable of '.the Variant type. For example: '. '. varFileName = tsGetPathFromUser() '. '.The function will return: '. the full path selected by the user, or '. Null if an error occurs or if the user presses Cancel. '. '.Optional arguments may include any of the following: '. rlngFlags : one or more of the tscBF* Flag constants (declared '. below). Combine multiple constants like this: '. tscBFReturnOnlyFSDirs Or tscBFDontGoBelowDomain '. lngRootFolder : a tscRF Root Folder constant (declared below) indicating '. what folder you want to start with. These constants are '. not to be combined, just pick the one you want to use. '. strHeaderMsg : a message you want to appear at the top of the dialog '. box. Note although it is refered to internally as the '. Title it is NOT the dialog title, aka caption (the ' caption is always "Browse for Folder"). The message ' can be up to about 110 characters in length and ' up to two lines. It appears below the Title bar, but ' above the actual folder box. ' '.---------------------------------------------------------------------- --- '. Option Compare Database Option Explicit Private Declare Function SHGetPathFromIDList Lib "shell32.dll" _ Alias "SHGetPathFromIDListA" (ByVal pidl As Long, _ ByVal pszPath As String) As Long Private Declare Function SHGetSpecialFolderLocation Lib "shell32.dll" _ (ByVal hwndOwner As Long, ByVal nFolder As Long, _ pidl As ITEMIDLIST) As Long Private Declare Function SHBrowseForFolder Lib "shell32.dll" Alias _ "SHBrowseForFolderA" (lpBrowseInfo As BROWSEINFO) As Long Private Type BROWSEINFO hOwner As Long pidlRoot As Long pszDisplayName As String lpszTitle As String ulFlags As Long lpfn As Long lParam As Long iImage As Long End Type Private Type SHITEMID cb As Long abID As Byte End Type Private Type ITEMIDLIST mkid As SHITEMID End Type ' Flag Constants Public Const tscBFReturnOnlyFSDirs = &H1 Public Const tscBFDontGoBelowDomain = &H2 Public Const tscBFStatusText = &H4 Public Const tscBFReturnFSAncestors = &H8 Public Const tscBFBrowseForComputer = &H1000 Public Const tscBFBrowseForPrinter = &H2000 ' Root Folder Constants Public Const tscRFDesktop = &H0 Public Const tscRFPrograms = &H2 Public Const tscRFControls = &H3 Public Const tscRFPrinters = &H4 Public Const tscRFPersonal = &H5 Public Const tscRFFavorites = &H6 Public Const tscRFRecent = &H8 Public Const tscRFBitBucket = &HA Public Const tscRFDesktopDirectory = &H10 Public Const tscRFDrives = &H11 Public Const tscRFNetwork = &H12 Public Const tscRFNethood = &H13 Public Const tscRFTemplates = &H15 Public Function tsGetPathFromUser( _ Optional ByRef rlngflags As Long = tscBFReturnOnlyFSDirs, _ Optional ByVal lngRootFolder As Long = tscRFDrives, _ Optional ByVal strHeaderMsg As String = "") As Variant On Error GoTo tsGetPathFromUser_Err Const conBufLen = 512 Dim bi As BROWSEINFO Dim idl As ITEMIDLIST Dim lngReturn As Long Dim pidl As Long Dim strpath As String bi.hOwner = Application.hWndAccessApp lngReturn = SHGetSpecialFolderLocation( _ ByVal Application.hWndAccessApp, lngRootFolder, idl) bi.pidlRoot = idl.mkid.cb bi.lpszTitle = strHeaderMsg bi.ulFlags = rlngflags pidl = SHBrowseForFolder(bi) strpath = Space(conBufLen) lngReturn = SHGetPathFromIDList(ByVal pidl, ByVal strpath) If lngReturn <> 0 Then tsGetPathFromUser = tsTrimNull(strpath) Else tsGetPathFromUser = Null End If tsGetPathFromUser_End: On Error GoTo 0 Exit Function tsGetPathFromUser_Err: Beep MsgBox Err.Description, , "Error: " & Err.Number _ & " in function basBrowseFolders.tsGetPathFromUser" Resume tsGetPathFromUser_End End Function ' Trim Nulls from a string returned by an API call. Private Function tsTrimNull(ByVal strItem As String) As String On Error GoTo tsTrimNull_Err Dim i As Integer i = InStr(strItem, vbNullChar) If i > 0 Then tsTrimNull = Left(strItem, i - 1) Else tsTrimNull = strItem End If tsTrimNull_End: On Error GoTo 0 Exit Function tsTrimNull_Err: Beep MsgBox Err.Description, , "Error: " & Err.Number _ & " in function basBrowseFolders.tsTrimNull" Resume tsTrimNull_End End Function '----------------------------------------------------------------------- --- ' Project : tsDeveloperTools ' Description : An example of how you can call tsGetPathFromUser() ' Calls : ' Accepts : ' Returns : ' Written By : Carl Tribble ' Date Created : 05/04/1999 11:19:41 AM ' Rev. History : ' Comments : This is provided merely as an example to the programmer ' It may be safely deleted from production code. '----------------------------------------------------------------------- --- Public Sub tsGetPathFromUserTest() On Error GoTo tsGetPathFromUserTest_Err Dim lngFlags As Long Dim lngRoot As Long Dim strHeaderMsg As String Dim varPath As Variant lngFlags = tscBFReturnOnlyFSDirs Or tscBFDontGoBelowDomain lngRoot = tscRFDrives strHeaderMsg = "This is where the header message displays. " _ & vbCrLf & "Note it only holds 2 full lines (about 100 " _ & "characters altogether)." varPath = tsGetPathFromUser(lngFlags, lngRoot, strHeaderMsg) If IsNull(varPath) Then Debug.Print "User pressed 'Cancel'." Else Debug.Print varPath End If tsGetPathFromUserTest_End: On Error GoTo 0 Exit Sub tsGetPathFromUserTest_Err: Beep MsgBox Err.Description, , "Error: " & Err.Number _ & " in sub basBrowseFolders.tsGetPathFromUserTest" Resume tsGetPathFromUserTest_End End Sub -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Andy Lacey Sent: 06 January 2004 15:42 To: Access Developers discussion and problem solving Subject: [AccessD] Get Folder Name via API Must've done thsi before but can't find it. I want to ask the user for a folder name (into which I'm going to store stuff). I want to use the Windows common file dialog so that it looks neat and offers to create a new folder and so on. However I don't want to put a Common Dialog control on the form (always has version issues) so want to use the API method. But the code I have (from Dev Ashish) insists on a filename not just a folder, and the other code on his site to browse a folder list doesn't use the normal dialog. Anyone got code for this? -- Andy Lacey http://www.minstersystems.co.uk ________________________________________________ Message sent using UebiMiau 2.7.2 _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From dwaters at usinternet.com Tue Jan 6 11:34:27 2004 From: dwaters at usinternet.com (Dan Waters) Date: Tue, 6 Jan 2004 11:34:27 -0600 Subject: [AccessD] Get Folder Name via API In-Reply-To: <12102777.1073404283807.JavaMail.root@sniper.marix.com> Message-ID: <000c01c3d47b$556cde90$de1811d8@DanWaters> Andy, This is what I use - credits are included. Cut and paste into a standard module. I use a global string variable to carry the path to a folder. Dan Waters '------------------------------- Option Compare Database Option Explicit Private Type BrowseInfo hWndOwner As Long pIDLRoot As Long pszDisplayName As Long lpszTitle As Long ulFlags As Long lpfnCallback As Long lParam As Long iImage As Long End Type Const BIF_RETURNONLYFSDIRS = 1 Const MAX_PATH = 260 Private Declare Sub CoTaskMemFree Lib "ole32.dll" (ByVal hMem As Long) Private Declare Function lstrcat Lib "kernel32" Alias "lstrcatA" (ByVal lpString1 As String, ByVal lpString2 As String) As Long Private Declare Function SHBrowseForFolder Lib "shell32" (lpbi As BrowseInfo) As Long Private Declare Function SHGetPathFromIDList Lib "shell32" (ByVal pidList As Long, ByVal lpBuffer As String) As Long '--------------------------------- Public Sub GetFolderName() On Error GoTo EH 'KPD-Team 1998 'URL: http://www.allapi.net/ 'KPDTeam at Allapi.net Dim intNull As Integer Dim lngIDList As Long Dim lngResult As Long Dim stgPath As String Dim udtBI As BrowseInfo With udtBI 'Set the owner window '.hWndOwner = Me.hwnd 'lstrcat appends the two strings and returns the memory address '.lpszTitle = lstrcat("C:\", "") 'Return only if the user selected a directory .ulFlags = BIF_RETURNONLYFSDIRS End With 'Show the 'Browse for folder' dialog lngIDList = SHBrowseForFolder(udtBI) If lngIDList Then stgPath = String$(MAX_PATH, 0) 'Get the path from the IDList SHGetPathFromIDList lngIDList, stgPath 'free the block of memory CoTaskMemFree lngIDList '-- Get location of first null value intNull = InStr(stgPath, vbNullChar) If intNull > 0 Then '-- Trim nulls from name GstgFolderName = Left$(stgPath, intNull - 1) Else GstgFolderName = "" End If Else GstgFolderName = "" End If Exit Sub EH: Application.Echo True Call GlobalErrors("", Err.Number, Err.Description, CurrentObjectName, "GetFolderName") End Sub -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Andy Lacey Sent: Tuesday, January 06, 2004 9:42 AM To: Access Developers discussion and problem solving Subject: [AccessD] Get Folder Name via API Must've done thsi before but can't find it. I want to ask the user for a folder name (into which I'm going to store stuff). I want to use the Windows common file dialog so that it looks neat and offers to create a new folder and so on. However I don't want to put a Common Dialog control on the form (always has version issues) so want to use the API method. But the code I have (from Dev Ashish) insists on a filename not just a folder, and the other code on his site to browse a folder list doesn't use the normal dialog. Anyone got code for this? -- Andy Lacey http://www.minstersystems.co.uk ________________________________________________ Message sent using UebiMiau 2.7.2 _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From dwaters at usinternet.com Tue Jan 6 11:34:27 2004 From: dwaters at usinternet.com (Dan Waters) Date: Tue, 6 Jan 2004 11:34:27 -0600 Subject: [AccessD] Surgical Strike - Any Users? In-Reply-To: <4221699.1073406440465.JavaMail.root@sniper.marix.com> Message-ID: <000d01c3d47b$58d6e490$de1811d8@DanWaters> Andy, So that's what the BEU does!! I should have understood. Actually, I will want to distribute both FE and BE mods to .mdb's. I'll look at the BEU in detail. Thanks! Dan Waters -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Andy Lacey Sent: Tuesday, January 06, 2004 9:55 AM To: Access Developers discussion and problem solving Subject: Re: [AccessD] Surgical Strike - Any Users? Dan, I take it you want to distribute FE mods, cos if it's just BE mods then our own very BEU (BackEnd Upgrader) will do that for you for free. See http://www.databaseadvisors.com/downloads.htm -- Andy Lacey http://www.minstersystems.co.uk --------- Original Message -------- From: "Access Developers discussion and problem solving" To: "Database Advisors" Subject: [AccessD] Surgical Strike - Any Users? Date: 06/01/04 20:56 Another 'survey' question! Does anyone have experience with Surgical Strike? I would certainly like to use it's capabilities. Are there any alternatives or competitors? Thanks! Dan Waters Quality Process Solutions _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com ________________________________________________ Message sent using UebiMiau 2.7.2 _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From dwaters at usinternet.com Tue Jan 6 11:46:31 2004 From: dwaters at usinternet.com (Dan Waters) Date: Tue, 6 Jan 2004 11:46:31 -0600 Subject: [AccessD] Surgical Strike - Any Users? In-Reply-To: <1981611.1073406440778.JavaMail.root@sniper.marix.com> Message-ID: <000e01c3d47d$07ded370$de1811d8@DanWaters> Thanks John! I'll be using .mdb's so this is good news! Dan -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of John Bartow Sent: Tuesday, January 06, 2004 9:44 AM To: Access Developers discussion and problem solving Subject: RE: [AccessD] Surgical Strike - Any Users? I have. It works just fine for situations where it is applicable. I did use it with one client (that had A97 set up on all of their PCs) and it makes the end user updates very easy and worry free. Unfortunately I can't use it much as I deliver my apps as .MDEs. Surgical Strike doesn't work with MDEs. If you are in a situation where you are updating MDBs. If not, I don't recommend it. John B. > -----Original Message----- > From: accessd-bounces at databaseadvisors.com > [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Dan Waters > Sent: Tuesday, January 06, 2004 8:54 AM > To: Database Advisors > Subject: [AccessD] Surgical Strike - Any Users? > > > Another 'survey' question! > > Does anyone have experience with Surgical Strike? I would certainly > like to use it's capabilities. > > Are there any alternatives or competitors? > > Thanks! > Dan Waters > Quality Process Solutions > _______________________________________________ > 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 From mastercafe at ctv.es Tue Jan 6 12:07:36 2004 From: mastercafe at ctv.es (MastercafeCTV) Date: Tue, 6 Jan 2004 19:07:36 +0100 Subject: [AccessD] MDB Stability vs Perfomance In-Reply-To: Message-ID: <002101c3d47f$f7913690$69fa2250@servercafe> The front end applications are all on AXP, only the data files was in A2k and now in AXP. What is the unrecoverable bloat?? Colud be the problem for our data files? ... Are this the problem that we find and need repair ? Juan Menendez =========================================== MASTERCAFE SL - NIF B-82.617.614 www.mastercafe.com Deleg. Asturias Tel 985.88.49.44 / 627.531.764 Fax 627.500.205 info at mastercafe.com juan at mastercafe.com Deleg. Madrid Tel 627.474.285 cecilia at mastercafe.com =========================================== -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Charlotte Foust Sent: martes, 06 de enero de 2004 17:05 To: Access Developers discussion and problem solving Subject: RE: [AccessD] MDB Stability vs Perfomance Access 2000 can't open 2002 format files. Is that the nature of the error message, corrupted database file? Or are you talking about problems you had when using the 2000 file format for the datafile with an AXP front end? I prefer to use the 2000 format for data files to avoid the unrecoverable bloat issue in 2002 format. We haven't had any problems with them in our commercial applications. You do need to make sure that all your machines have the same service packs of Office XP and Jet installed however. Maybe if you give more specific information about the kind of error messages you're getting, someone else will have some ideas. Charlotte Foust -----Original Message----- From: MastercafeCTV [mailto:mastercafe at ctv.es] Sent: Monday, January 05, 2004 8:56 PM To: 'Access Developers discussion and problem solving' Subject: RE: [AccessD] MDB Stability vs Perfomance Our main programs are AXP at this moment, all in MDE format, but on A2k we have the error message to screen and on AXP some of them close the Access in the computer (same problem on Runtime version or AXP standar). The data container was A2k just august'03 and then change to AXP then beginning the problems... Too high size for some MDB that compacted have 4 mb and working more than 18 mb. At this moment all Applications and data are AXP (2002) format... But with corruption problems. Juan Menendez =========================================== MASTERCAFE SL - NIF B-82.617.614 www.mastercafe.com Deleg. Asturias Tel 985.88.49.44 / 627.531.764 Fax 627.500.205 info at mastercafe.com juan at mastercafe.com Deleg. Madrid Tel 627.474.285 cecilia at mastercafe.com =========================================== -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Charlotte Foust Sent: martes, 06 de enero de 2004 3:02 To: Access Developers discussion and problem solving Subject: RE: [AccessD] MDB Stability vs Perfomance I'm sorry, but it isn't clear to me whether you're talking about the file format or the version of Access you're using. If you have mixed versions updating the same database, you're likely to have corruption problems. What is your main program written in? Charlotte Foust -----Original Message----- From: MastercafeCTV [mailto:mastercafe at ctv.es] Sent: Monday, January 05, 2004 5:16 PM To: 'Access Developers discussion and problem solving' Subject: RE: [AccessD] MDB Stability vs Perfomance The MDE problem is correct, we saw months ago. And we have installed the 3 patches for AXP (SP-1 , Patch Office XP 2, and secur. Patches) but the most significant problem is our main program STEEL TPV that uses a STEELDAT.MDB only for data, this MDB have no problem with A2k format, and the last september change to AXP format, from this we repeat Compact & Repair every month. Juan Menendez =========================================== MASTERCAFE SL - NIF B-82.617.614 www.mastercafe.com Deleg. Asturias Tel 985.88.49.44 / 627.531.764 Fax 627.500.205 info at mastercafe.com juan at mastercafe.com Deleg. Madrid Tel 627.474.285 cecilia at mastercafe.com =========================================== -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Charlotte Foust Sent: martes, 06 de enero de 2004 2:08 To: Access Developers discussion and problem solving Subject: RE: [AccessD] MDB Stability vs Perfomance I haven't found AXP SP-1 to be any less stable or have more problems than A2k. Be aware, though, that if you switch to AXP, you will only be able to create an MDE in 2002 format, not in 2000 format. Charlotte Foust -----Original Message----- From: MastercafeCTV [mailto:mastercafe at ctv.es] Sent: Monday, January 05, 2004 4:50 PM To: 'Access Developers discussion and problem solving' Subject: [AccessD] MDB Stability vs Perfomance Hi group, on the last year we are changing all our applications from Access 2k to Access XP, but at this moment we have one problem on all applications that it take more time for maintenance and repair. MDB from Access 2k are much more stable VS MDB XP (better A2k) MDB from Access 2k have similar speed vs MDB XP (better A2k) Applications on A2k are much more stable vs MDB/MDE XP (better A2k) MDB A2k corrupted not always can be repaired vs MDB XP always was be repaired (Better AXP) On the last version for application FE we obtain sometimes a reset error, I explain: close tha Access XP with application without any error message or similar, simply close and then you can open renew. Anyone knows how to solve this problems wih AXP?? Is better program with AXP on MDB format A2k?? Is the AXP less stable than A2k?? Thanks in advance Juan Men?ndez =========================================== MASTERCAFE SL - NIF B-82.617.614 www.mastercafe.com Deleg. Asturias Tel 985.88.49.44 / 627.531.764 Fax 627.500.205 info at mastercafe.com juan at mastercafe.com Deleg. Madrid Tel 627.474.285 cecilia at mastercafe.com =========================================== _______________________________________________ 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 _______________________________________________ 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 _______________________________________________ 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 From mastercafe at ctv.es Tue Jan 6 12:19:06 2004 From: mastercafe at ctv.es (MastercafeCTV) Date: Tue, 6 Jan 2004 19:19:06 +0100 Subject: [AccessD] Excel to Access by clicking cells. In-Reply-To: <46B976F2B698FF46A4FE7636509B22DF03D0C7@stekelbes.ithelps.local> Message-ID: <002201c3d481$92b597f0$69fa2250@servercafe> We had developed a similar function that you select the Excel.Column Data and assign to File.Field Data. The process was simple. Make a Form with this fields: Excel Origin / Excel Column / Access Database / Access Recordser / Access Field (dbText, 80) is better because you can convert this to Csng/Clng and use this. Design the main import form and then execute a Sub that open Excel and check main data to transfer to end Database. I will check our code to look for this and send you a copy of this. Juan Menendez =========================================== MASTERCAFE SL - NIF B-82.617.614 www.mastercafe.com Deleg. Asturias Tel 985.88.49.44 / 627.531.764 Fax 627.500.205 info at mastercafe.com juan at mastercafe.com Deleg. Madrid Tel 627.474.285 cecilia at mastercafe.com =========================================== -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Erwin Craps - IT Helps Sent: martes, 06 de enero de 2004 15:50 To: Access Developers discussion and problem solving Subject: [AccessD] Excel to Access by clicking cells. Hi guys Just brainstorming with myself to improve some stuff... We receive on a daily basis (7x7) a lot of excel files with data in it from several sources. We can not standarise those files for several reasons so we print these files en type the data manualy in Access. I was wondering if anyone ever has written a function so you could click the cells with the data and then right-click something and the data is passed to a recordset in Access depending on your multiselect order in Excel. Importing is not an option because these files change to much and are often to complex (more data in the file then we need). The data are boxoffice figures from cinema theatres. So the data we need as a result looks like this. Date1 MovieA Tickets Amount Date1 MovieB Tickets Amount Date1 MovieC Tickets Amount Date2 MovieA Tickets Amount Date2 MovieC Tickets Amount Date2 MovieD Tickets Amount The excel sheets can vary, it can be horizontal, vertical, double vertical double horizontal... So I believe a multi select would be a solution. I think it will be faster than printing and manual typing. I just want some code that put me on the road with this multiselecting thing and passing to Access. Erwin Erwin Craps Zaakvoerder www.ithelps.be/jonathan This E-mail is confidential, may be legally privileged, and is for the intended recipient only. Access, disclosure, copying, distribution, or reliance on any of it by anyone else is prohibited and may be a criminal offence. Please delete if obtained in error and E-mail confirmation to the sender. IT Helps - I.T. Help Center *** Box Office Belgium & Luxembourg www.ithelps.be * www.boxoffice.be * www.stadleuven.be IT Helps bvba* ** Mercatorpad 3 ** 3000 Leuven IT Helps * Phone: +32 16 296 404 * Fax: +32 16 296 405 E-mail: Info at ithelps.be Box Office ** Fax: +32 16 296 406 ** Box Office E-mail: Staff at boxoffice.be _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From andy at minstersystems.co.uk Tue Jan 6 12:24:53 2004 From: andy at minstersystems.co.uk (Andy Lacey) Date: Tue, 6 Jan 2004 18:24:53 -0000 Subject: [AccessD] Get Folder Name via API In-Reply-To: <000c01c3d47b$556cde90$de1811d8@DanWaters> Message-ID: <00c001c3d482$61547db0$b274d0d5@minster33c3r25> Thanks guys. You all have code that uses the same API (SHBrowseForFolder). Works well but I had hoped to find some way of using the File Save/Save As dialog but returning just a folder name. The advantage of that is that you can create a new folder on the hoof. But if it was possible then I'm sure you'd be using it too. Thanks for all your suggestions. Andy Lacey http://www.minstersystems.co.uk > -----Original Message----- > From: accessd-bounces at databaseadvisors.com > [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Dan Waters > Sent: 06 January 2004 17:34 > To: 'Access Developers discussion and problem solving' > Subject: RE: [AccessD] Get Folder Name via API > > > Andy, > > This is what I use - credits are included. Cut and paste > into a standard module. I use a global string variable to > carry the path to a folder. > > Dan Waters > > '------------------------------- > > Option Compare Database > Option Explicit > > Private Type BrowseInfo > hWndOwner As Long > pIDLRoot As Long > pszDisplayName As Long > lpszTitle As Long > ulFlags As Long > lpfnCallback As Long > lParam As Long > iImage As Long > End Type > > Const BIF_RETURNONLYFSDIRS = 1 > Const MAX_PATH = 260 > > Private Declare Sub CoTaskMemFree Lib "ole32.dll" (ByVal hMem > As Long) Private Declare Function lstrcat Lib "kernel32" > Alias "lstrcatA" (ByVal lpString1 As String, ByVal lpString2 > As String) As Long Private Declare Function SHBrowseForFolder > Lib "shell32" (lpbi As > BrowseInfo) As Long > Private Declare Function SHGetPathFromIDList Lib "shell32" > (ByVal pidList As Long, ByVal lpBuffer As String) As Long > > '--------------------------------- > > Public Sub GetFolderName() > On Error GoTo EH > > 'KPD-Team 1998 > 'URL: http://www.allapi.net/ > 'KPDTeam at Allapi.net > > Dim intNull As Integer > Dim lngIDList As Long > Dim lngResult As Long > Dim stgPath As String > Dim udtBI As BrowseInfo > > With udtBI > 'Set the owner window > '.hWndOwner = Me.hwnd > > 'lstrcat appends the two strings and returns the > memory address > '.lpszTitle = lstrcat("C:\", "") > > 'Return only if the user selected a directory > .ulFlags = BIF_RETURNONLYFSDIRS > > End With > > 'Show the 'Browse for folder' dialog > lngIDList = SHBrowseForFolder(udtBI) > > If lngIDList Then > > stgPath = String$(MAX_PATH, 0) > > 'Get the path from the IDList > SHGetPathFromIDList lngIDList, stgPath > > 'free the block of memory > CoTaskMemFree lngIDList > > '-- Get location of first null value > intNull = InStr(stgPath, vbNullChar) > > If intNull > 0 Then > '-- Trim nulls from name > GstgFolderName = Left$(stgPath, intNull - 1) > Else > GstgFolderName = "" > End If > Else > GstgFolderName = "" > End If > > Exit Sub > > EH: > Application.Echo True > Call GlobalErrors("", Err.Number, Err.Description, > CurrentObjectName, > "GetFolderName") > > End Sub > > > -----Original Message----- > From: accessd-bounces at databaseadvisors.com > [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Andy Lacey > Sent: Tuesday, January 06, 2004 9:42 AM > To: Access Developers discussion and problem solving > Subject: [AccessD] Get Folder Name via API > > > Must've done thsi before but can't find it. I want to ask the > user for a folder name (into which I'm going to store stuff). > I want to use the Windows common file dialog so that it looks > neat and offers to create a new folder and so on. However I > don't want to put a Common Dialog control on the form (always > has version issues) so want to use the API method. But the > code I have (from Dev Ashish) insists on a filename not just > a folder, and the other code on his site to browse a folder > list doesn't use the normal dialog. Anyone got code for this? > > -- > Andy Lacey > http://www.minstersystems.co.uk > > > ________________________________________________ > Message sent using UebiMiau 2.7.2 > > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/a> ccessd > Website: > http://www.databaseadvisors.com > > > > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/a> ccessd > Website: > http://www.databaseadvisors.com > > From gustav at cactus.dk Tue Jan 6 12:46:20 2004 From: gustav at cactus.dk (Gustav Brock) Date: Tue, 6 Jan 2004 19:46:20 +0100 Subject: [AccessD] Get Folder Name via API In-Reply-To: <00c001c3d482$61547db0$b274d0d5@minster33c3r25> References: <00c001c3d482$61547db0$b274d0d5@minster33c3r25> Message-ID: <4538516824.20040106194620@cactus.dk> Hi Andy You could try letting your code save the file: d:\somefolder\yournewfolder\NUL NUL is a valid filename but doesn't exist as NUL is the reserved name for the NUL device ... /gustav > Thanks guys. You all have code that uses the same API (SHBrowseForFolder). > Works well but I had hoped to find some way of using the File Save/Save As > dialog but returning just a folder name. The advantage of that is that you > can create a new folder on the hoof. But if it was possible then I'm sure > you'd be using it too. Thanks for all your suggestions. From cfoust at infostatsystems.com Tue Jan 6 13:16:15 2004 From: cfoust at infostatsystems.com (Charlotte Foust) Date: Tue, 6 Jan 2004 11:16:15 -0800 Subject: [AccessD] MDB Stability vs Perfomance Message-ID: The 2002 file format contains a system file, MSysAccessStorage, that doesn't exist in the 2000 format. This table NEVER compacts, it just keeps growing. The only cure is to import all the non-system objects into a new database. Charlotte Foust -----Original Message----- From: MastercafeCTV [mailto:mastercafe at ctv.es] Sent: Tuesday, January 06, 2004 10:08 AM To: 'Access Developers discussion and problem solving' Subject: RE: [AccessD] MDB Stability vs Perfomance The front end applications are all on AXP, only the data files was in A2k and now in AXP. What is the unrecoverable bloat?? Colud be the problem for our data files? ... Are this the problem that we find and need repair ? Juan Menendez =========================================== MASTERCAFE SL - NIF B-82.617.614 www.mastercafe.com Deleg. Asturias Tel 985.88.49.44 / 627.531.764 Fax 627.500.205 info at mastercafe.com juan at mastercafe.com Deleg. Madrid Tel 627.474.285 cecilia at mastercafe.com =========================================== -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Charlotte Foust Sent: martes, 06 de enero de 2004 17:05 To: Access Developers discussion and problem solving Subject: RE: [AccessD] MDB Stability vs Perfomance Access 2000 can't open 2002 format files. Is that the nature of the error message, corrupted database file? Or are you talking about problems you had when using the 2000 file format for the datafile with an AXP front end? I prefer to use the 2000 format for data files to avoid the unrecoverable bloat issue in 2002 format. We haven't had any problems with them in our commercial applications. You do need to make sure that all your machines have the same service packs of Office XP and Jet installed however. Maybe if you give more specific information about the kind of error messages you're getting, someone else will have some ideas. Charlotte Foust -----Original Message----- From: MastercafeCTV [mailto:mastercafe at ctv.es] Sent: Monday, January 05, 2004 8:56 PM To: 'Access Developers discussion and problem solving' Subject: RE: [AccessD] MDB Stability vs Perfomance Our main programs are AXP at this moment, all in MDE format, but on A2k we have the error message to screen and on AXP some of them close the Access in the computer (same problem on Runtime version or AXP standar). The data container was A2k just august'03 and then change to AXP then beginning the problems... Too high size for some MDB that compacted have 4 mb and working more than 18 mb. At this moment all Applications and data are AXP (2002) format... But with corruption problems. Juan Menendez =========================================== MASTERCAFE SL - NIF B-82.617.614 www.mastercafe.com Deleg. Asturias Tel 985.88.49.44 / 627.531.764 Fax 627.500.205 info at mastercafe.com juan at mastercafe.com Deleg. Madrid Tel 627.474.285 cecilia at mastercafe.com =========================================== -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Charlotte Foust Sent: martes, 06 de enero de 2004 3:02 To: Access Developers discussion and problem solving Subject: RE: [AccessD] MDB Stability vs Perfomance I'm sorry, but it isn't clear to me whether you're talking about the file format or the version of Access you're using. If you have mixed versions updating the same database, you're likely to have corruption problems. What is your main program written in? Charlotte Foust -----Original Message----- From: MastercafeCTV [mailto:mastercafe at ctv.es] Sent: Monday, January 05, 2004 5:16 PM To: 'Access Developers discussion and problem solving' Subject: RE: [AccessD] MDB Stability vs Perfomance The MDE problem is correct, we saw months ago. And we have installed the 3 patches for AXP (SP-1 , Patch Office XP 2, and secur. Patches) but the most significant problem is our main program STEEL TPV that uses a STEELDAT.MDB only for data, this MDB have no problem with A2k format, and the last september change to AXP format, from this we repeat Compact & Repair every month. Juan Menendez =========================================== MASTERCAFE SL - NIF B-82.617.614 www.mastercafe.com Deleg. Asturias Tel 985.88.49.44 / 627.531.764 Fax 627.500.205 info at mastercafe.com juan at mastercafe.com Deleg. Madrid Tel 627.474.285 cecilia at mastercafe.com =========================================== -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Charlotte Foust Sent: martes, 06 de enero de 2004 2:08 To: Access Developers discussion and problem solving Subject: RE: [AccessD] MDB Stability vs Perfomance I haven't found AXP SP-1 to be any less stable or have more problems than A2k. Be aware, though, that if you switch to AXP, you will only be able to create an MDE in 2002 format, not in 2000 format. Charlotte Foust -----Original Message----- From: MastercafeCTV [mailto:mastercafe at ctv.es] Sent: Monday, January 05, 2004 4:50 PM To: 'Access Developers discussion and problem solving' Subject: [AccessD] MDB Stability vs Perfomance Hi group, on the last year we are changing all our applications from Access 2k to Access XP, but at this moment we have one problem on all applications that it take more time for maintenance and repair. MDB from Access 2k are much more stable VS MDB XP (better A2k) MDB from Access 2k have similar speed vs MDB XP (better A2k) Applications on A2k are much more stable vs MDB/MDE XP (better A2k) MDB A2k corrupted not always can be repaired vs MDB XP always was be repaired (Better AXP) On the last version for application FE we obtain sometimes a reset error, I explain: close tha Access XP with application without any error message or similar, simply close and then you can open renew. Anyone knows how to solve this problems wih AXP?? Is better program with AXP on MDB format A2k?? Is the AXP less stable than A2k?? Thanks in advance Juan Men?ndez =========================================== MASTERCAFE SL - NIF B-82.617.614 www.mastercafe.com Deleg. Asturias Tel 985.88.49.44 / 627.531.764 Fax 627.500.205 info at mastercafe.com juan at mastercafe.com Deleg. Madrid Tel 627.474.285 cecilia at mastercafe.com =========================================== _______________________________________________ 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 _______________________________________________ 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 _______________________________________________ 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 _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From djkr at msn.com Tue Jan 6 13:35:20 2004 From: djkr at msn.com (DJK(John) Robinson) Date: Tue, 6 Jan 2004 19:35:20 -0000 Subject: [AccessD] Mac address In-Reply-To: <3FF93F0B.19244.9A4103@localhost> Message-ID: <003f01c3d48c$387cf890$bf00a8c0@dabsight> This gives me 1234567890 for my SuperMicro m'board (under WinXP Pro, AXP, MS WMI Scripting V1.2 Library). So ... maybe not so useful. John > -----Original Message----- > From: accessd-bounces at databaseadvisors.com > [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of > Stuart McLachlan > Sent: 05 January 2004 00:40 > To: Access Developers discussion and problem solving > Subject: RE: [AccessD] Mac address > > > On 4 Jan 2004 at 17:43, John Bartow wrote: > > > I was just wondering why the Main Circuit Board Serial Number isn't > > used for this. It would seem to me that this would be about > the most > > stable unique ID number in a PC. I have no idea how you would read > > this number but it always shows up in my hardware asset inventories. > > > > Any comments? > > Public Function MBSerialNumber() As String > > 'RETRIEVES SERIAL NUMBER OF MOTHERBOARD > 'IF THERE IS MORE THAN ONE MOTHERBOARD, THE SERIAL > 'NUMBERS WILL BE DELIMITED BY COMMAS > > 'YOU MUST HAVE WMI INSTALLED AND A REFERENCE TO > 'Microsoft WMI Scripting Library IS REQUIRED > > Dim objs As Object > > Dim obj As Object > Dim WMI As Object > Dim sAns As String > > > Set WMI = GetObject("WinMgmts:") > Set objs = WMI.InstancesOf("Win32_BaseBoard") > For Each obj In objs > sAns = sAns & obj.SerialNumber > If sAns < objs.Count Then sAns = sAns & "," > Next > MBSerialNumber = sAns > End Function > > -- > Lexacorp Ltd > http://www.lexacorp.com.pg > Information Technology Consultancy, Software > Development,System Support. > > > > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/a> ccessd > Website: > http://www.databaseadvisors.com > From mastercafe at ctv.es Tue Jan 6 14:14:49 2004 From: mastercafe at ctv.es (MastercafeCTV) Date: Tue, 6 Jan 2004 21:14:49 +0100 Subject: [AccessD] MDB Stability vs Perfomance In-Reply-To: Message-ID: <002701c3d491$bd2bda20$69fa2250@servercafe> Then I think that is better mainten the Data Files on A2k format and the applications on AXP format. I suposse that the perfomance between A2k & AXP formats is not the format but yes the ADO/DAO access from the FE application. Juan Menendez =========================================== MASTERCAFE SL - NIF B-82.617.614 www.mastercafe.com Deleg. Asturias Tel 985.88.49.44 / 627.531.764 Fax 627.500.205 info at mastercafe.com juan at mastercafe.com Deleg. Madrid Tel 627.474.285 cecilia at mastercafe.com =========================================== -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Charlotte Foust Sent: martes, 06 de enero de 2004 20:16 To: Access Developers discussion and problem solving Subject: RE: [AccessD] MDB Stability vs Perfomance The 2002 file format contains a system file, MSysAccessStorage, that doesn't exist in the 2000 format. This table NEVER compacts, it just keeps growing. The only cure is to import all the non-system objects into a new database. Charlotte Foust -----Original Message----- From: MastercafeCTV [mailto:mastercafe at ctv.es] Sent: Tuesday, January 06, 2004 10:08 AM To: 'Access Developers discussion and problem solving' Subject: RE: [AccessD] MDB Stability vs Perfomance The front end applications are all on AXP, only the data files was in A2k and now in AXP. What is the unrecoverable bloat?? Colud be the problem for our data files? ... Are this the problem that we find and need repair ? Juan Menendez =========================================== MASTERCAFE SL - NIF B-82.617.614 www.mastercafe.com Deleg. Asturias Tel 985.88.49.44 / 627.531.764 Fax 627.500.205 info at mastercafe.com juan at mastercafe.com Deleg. Madrid Tel 627.474.285 cecilia at mastercafe.com =========================================== -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Charlotte Foust Sent: martes, 06 de enero de 2004 17:05 To: Access Developers discussion and problem solving Subject: RE: [AccessD] MDB Stability vs Perfomance Access 2000 can't open 2002 format files. Is that the nature of the error message, corrupted database file? Or are you talking about problems you had when using the 2000 file format for the datafile with an AXP front end? I prefer to use the 2000 format for data files to avoid the unrecoverable bloat issue in 2002 format. We haven't had any problems with them in our commercial applications. You do need to make sure that all your machines have the same service packs of Office XP and Jet installed however. Maybe if you give more specific information about the kind of error messages you're getting, someone else will have some ideas. Charlotte Foust -----Original Message----- From: MastercafeCTV [mailto:mastercafe at ctv.es] Sent: Monday, January 05, 2004 8:56 PM To: 'Access Developers discussion and problem solving' Subject: RE: [AccessD] MDB Stability vs Perfomance Our main programs are AXP at this moment, all in MDE format, but on A2k we have the error message to screen and on AXP some of them close the Access in the computer (same problem on Runtime version or AXP standar). The data container was A2k just august'03 and then change to AXP then beginning the problems... Too high size for some MDB that compacted have 4 mb and working more than 18 mb. At this moment all Applications and data are AXP (2002) format... But with corruption problems. Juan Menendez =========================================== MASTERCAFE SL - NIF B-82.617.614 www.mastercafe.com Deleg. Asturias Tel 985.88.49.44 / 627.531.764 Fax 627.500.205 info at mastercafe.com juan at mastercafe.com Deleg. Madrid Tel 627.474.285 cecilia at mastercafe.com =========================================== -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Charlotte Foust Sent: martes, 06 de enero de 2004 3:02 To: Access Developers discussion and problem solving Subject: RE: [AccessD] MDB Stability vs Perfomance I'm sorry, but it isn't clear to me whether you're talking about the file format or the version of Access you're using. If you have mixed versions updating the same database, you're likely to have corruption problems. What is your main program written in? Charlotte Foust -----Original Message----- From: MastercafeCTV [mailto:mastercafe at ctv.es] Sent: Monday, January 05, 2004 5:16 PM To: 'Access Developers discussion and problem solving' Subject: RE: [AccessD] MDB Stability vs Perfomance The MDE problem is correct, we saw months ago. And we have installed the 3 patches for AXP (SP-1 , Patch Office XP 2, and secur. Patches) but the most significant problem is our main program STEEL TPV that uses a STEELDAT.MDB only for data, this MDB have no problem with A2k format, and the last september change to AXP format, from this we repeat Compact & Repair every month. Juan Menendez =========================================== MASTERCAFE SL - NIF B-82.617.614 www.mastercafe.com Deleg. Asturias Tel 985.88.49.44 / 627.531.764 Fax 627.500.205 info at mastercafe.com juan at mastercafe.com Deleg. Madrid Tel 627.474.285 cecilia at mastercafe.com =========================================== -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Charlotte Foust Sent: martes, 06 de enero de 2004 2:08 To: Access Developers discussion and problem solving Subject: RE: [AccessD] MDB Stability vs Perfomance I haven't found AXP SP-1 to be any less stable or have more problems than A2k. Be aware, though, that if you switch to AXP, you will only be able to create an MDE in 2002 format, not in 2000 format. Charlotte Foust -----Original Message----- From: MastercafeCTV [mailto:mastercafe at ctv.es] Sent: Monday, January 05, 2004 4:50 PM To: 'Access Developers discussion and problem solving' Subject: [AccessD] MDB Stability vs Perfomance Hi group, on the last year we are changing all our applications from Access 2k to Access XP, but at this moment we have one problem on all applications that it take more time for maintenance and repair. MDB from Access 2k are much more stable VS MDB XP (better A2k) MDB from Access 2k have similar speed vs MDB XP (better A2k) Applications on A2k are much more stable vs MDB/MDE XP (better A2k) MDB A2k corrupted not always can be repaired vs MDB XP always was be repaired (Better AXP) On the last version for application FE we obtain sometimes a reset error, I explain: close tha Access XP with application without any error message or similar, simply close and then you can open renew. Anyone knows how to solve this problems wih AXP?? Is better program with AXP on MDB format A2k?? Is the AXP less stable than A2k?? Thanks in advance Juan Men?ndez =========================================== MASTERCAFE SL - NIF B-82.617.614 www.mastercafe.com Deleg. Asturias Tel 985.88.49.44 / 627.531.764 Fax 627.500.205 info at mastercafe.com juan at mastercafe.com Deleg. Madrid Tel 627.474.285 cecilia at mastercafe.com =========================================== _______________________________________________ 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 _______________________________________________ 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 _______________________________________________ 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 _______________________________________________ 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 From michael.mattys at adelphia.net Tue Jan 6 14:25:57 2004 From: michael.mattys at adelphia.net (Michael R Mattys) Date: Tue, 6 Jan 2004 15:25:57 -0500 Subject: [AccessD] Get Folder Name via API References: <00c001c3d482$61547db0$b274d0d5@minster33c3r25> <4538516824.20040106194620@cactus.dk> Message-ID: <012b01c3d493$4bace950$6401a8c0@default> Better late than never ... try this page http://www.mentalis.org/apilist/MakeSureDirectoryPathExists.shtml Michael R. Mattys Try MattysMapLib for MapPoint at www.mattysconsulting.com ----- Original Message ----- From: "Gustav Brock" To: "Access Developers discussion and problem solving" Sent: Tuesday, January 06, 2004 1:46 PM Subject: Re: [AccessD] Get Folder Name via API > Hi Andy > > You could try letting your code save the file: > > d:\somefolder\yournewfolder\NUL > > NUL is a valid filename but doesn't exist as NUL is the reserved name > for the NUL device ... > > /gustav > > > > Thanks guys. You all have code that uses the same API (SHBrowseForFolder). > > Works well but I had hoped to find some way of using the File Save/Save As > > dialog but returning just a folder name. The advantage of that is that you > > can create a new folder on the hoof. But if it was possible then I'm sure > > you'd be using it too. Thanks for all your suggestions. > > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com From cfoust at infostatsystems.com Tue Jan 6 14:54:01 2004 From: cfoust at infostatsystems.com (Charlotte Foust) Date: Tue, 6 Jan 2004 12:54:01 -0800 Subject: [AccessD] MDB Stability vs Perfomance Message-ID: There shouldn't be any performance difference using a 2000 data file instead of a 2002 data file. ADO is going to provide slower access in some cases than DAO but there's no reason you can't use DAO in AXP. Charlotte Foust -----Original Message----- From: MastercafeCTV [mailto:mastercafe at ctv.es] Sent: Tuesday, January 06, 2004 12:15 PM To: 'Access Developers discussion and problem solving' Subject: RE: [AccessD] MDB Stability vs Perfomance Then I think that is better mainten the Data Files on A2k format and the applications on AXP format. I suposse that the perfomance between A2k & AXP formats is not the format but yes the ADO/DAO access from the FE application. Juan Menendez =========================================== MASTERCAFE SL - NIF B-82.617.614 www.mastercafe.com Deleg. Asturias Tel 985.88.49.44 / 627.531.764 Fax 627.500.205 info at mastercafe.com juan at mastercafe.com Deleg. Madrid Tel 627.474.285 cecilia at mastercafe.com =========================================== -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Charlotte Foust Sent: martes, 06 de enero de 2004 20:16 To: Access Developers discussion and problem solving Subject: RE: [AccessD] MDB Stability vs Perfomance The 2002 file format contains a system file, MSysAccessStorage, that doesn't exist in the 2000 format. This table NEVER compacts, it just keeps growing. The only cure is to import all the non-system objects into a new database. Charlotte Foust -----Original Message----- From: MastercafeCTV [mailto:mastercafe at ctv.es] Sent: Tuesday, January 06, 2004 10:08 AM To: 'Access Developers discussion and problem solving' Subject: RE: [AccessD] MDB Stability vs Perfomance The front end applications are all on AXP, only the data files was in A2k and now in AXP. What is the unrecoverable bloat?? Colud be the problem for our data files? ... Are this the problem that we find and need repair ? Juan Menendez =========================================== MASTERCAFE SL - NIF B-82.617.614 www.mastercafe.com Deleg. Asturias Tel 985.88.49.44 / 627.531.764 Fax 627.500.205 info at mastercafe.com juan at mastercafe.com Deleg. Madrid Tel 627.474.285 cecilia at mastercafe.com =========================================== -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Charlotte Foust Sent: martes, 06 de enero de 2004 17:05 To: Access Developers discussion and problem solving Subject: RE: [AccessD] MDB Stability vs Perfomance Access 2000 can't open 2002 format files. Is that the nature of the error message, corrupted database file? Or are you talking about problems you had when using the 2000 file format for the datafile with an AXP front end? I prefer to use the 2000 format for data files to avoid the unrecoverable bloat issue in 2002 format. We haven't had any problems with them in our commercial applications. You do need to make sure that all your machines have the same service packs of Office XP and Jet installed however. Maybe if you give more specific information about the kind of error messages you're getting, someone else will have some ideas. Charlotte Foust -----Original Message----- From: MastercafeCTV [mailto:mastercafe at ctv.es] Sent: Monday, January 05, 2004 8:56 PM To: 'Access Developers discussion and problem solving' Subject: RE: [AccessD] MDB Stability vs Perfomance Our main programs are AXP at this moment, all in MDE format, but on A2k we have the error message to screen and on AXP some of them close the Access in the computer (same problem on Runtime version or AXP standar). The data container was A2k just august'03 and then change to AXP then beginning the problems... Too high size for some MDB that compacted have 4 mb and working more than 18 mb. At this moment all Applications and data are AXP (2002) format... But with corruption problems. Juan Menendez =========================================== MASTERCAFE SL - NIF B-82.617.614 www.mastercafe.com Deleg. Asturias Tel 985.88.49.44 / 627.531.764 Fax 627.500.205 info at mastercafe.com juan at mastercafe.com Deleg. Madrid Tel 627.474.285 cecilia at mastercafe.com =========================================== -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Charlotte Foust Sent: martes, 06 de enero de 2004 3:02 To: Access Developers discussion and problem solving Subject: RE: [AccessD] MDB Stability vs Perfomance I'm sorry, but it isn't clear to me whether you're talking about the file format or the version of Access you're using. If you have mixed versions updating the same database, you're likely to have corruption problems. What is your main program written in? Charlotte Foust -----Original Message----- From: MastercafeCTV [mailto:mastercafe at ctv.es] Sent: Monday, January 05, 2004 5:16 PM To: 'Access Developers discussion and problem solving' Subject: RE: [AccessD] MDB Stability vs Perfomance The MDE problem is correct, we saw months ago. And we have installed the 3 patches for AXP (SP-1 , Patch Office XP 2, and secur. Patches) but the most significant problem is our main program STEEL TPV that uses a STEELDAT.MDB only for data, this MDB have no problem with A2k format, and the last september change to AXP format, from this we repeat Compact & Repair every month. Juan Menendez =========================================== MASTERCAFE SL - NIF B-82.617.614 www.mastercafe.com Deleg. Asturias Tel 985.88.49.44 / 627.531.764 Fax 627.500.205 info at mastercafe.com juan at mastercafe.com Deleg. Madrid Tel 627.474.285 cecilia at mastercafe.com =========================================== -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Charlotte Foust Sent: martes, 06 de enero de 2004 2:08 To: Access Developers discussion and problem solving Subject: RE: [AccessD] MDB Stability vs Perfomance I haven't found AXP SP-1 to be any less stable or have more problems than A2k. Be aware, though, that if you switch to AXP, you will only be able to create an MDE in 2002 format, not in 2000 format. Charlotte Foust -----Original Message----- From: MastercafeCTV [mailto:mastercafe at ctv.es] Sent: Monday, January 05, 2004 4:50 PM To: 'Access Developers discussion and problem solving' Subject: [AccessD] MDB Stability vs Perfomance Hi group, on the last year we are changing all our applications from Access 2k to Access XP, but at this moment we have one problem on all applications that it take more time for maintenance and repair. MDB from Access 2k are much more stable VS MDB XP (better A2k) MDB from Access 2k have similar speed vs MDB XP (better A2k) Applications on A2k are much more stable vs MDB/MDE XP (better A2k) MDB A2k corrupted not always can be repaired vs MDB XP always was be repaired (Better AXP) On the last version for application FE we obtain sometimes a reset error, I explain: close tha Access XP with application without any error message or similar, simply close and then you can open renew. Anyone knows how to solve this problems wih AXP?? Is better program with AXP on MDB format A2k?? Is the AXP less stable than A2k?? Thanks in advance Juan Men?ndez =========================================== MASTERCAFE SL - NIF B-82.617.614 www.mastercafe.com Deleg. Asturias Tel 985.88.49.44 / 627.531.764 Fax 627.500.205 info at mastercafe.com juan at mastercafe.com Deleg. Madrid Tel 627.474.285 cecilia at mastercafe.com =========================================== _______________________________________________ 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 _______________________________________________ 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 _______________________________________________ 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 _______________________________________________ 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 _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From dwaters at usinternet.com Tue Jan 6 15:16:45 2004 From: dwaters at usinternet.com (Dan Waters) Date: Tue, 6 Jan 2004 15:16:45 -0600 Subject: [AccessD] Get Folder Name via API In-Reply-To: <28825546.1073414270824.JavaMail.root@sniper.marix.com> Message-ID: <000201c3d49a$667e9650$de1811d8@DanWaters> Andy - I guess I'm not sure what you need. This code returns the path to a folder, and you can pull the last folder name out of that string. The dialog box to find the folder is different, but it does find and select folders. You can use File Search Objects to create a new folder in code. Maybe a combination of both would work out. Also, part of my system uses the Find File dialog box, and I am able to use it to create a new folder wherever I want. I'm not using the Find File dialog box that is an activex object, but the one that is called from a Windows API. I got the API code for the Find File dialog box from Candace Tripp's web site. HTH! Dan -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Andy Lacey Sent: Tuesday, January 06, 2004 12:25 PM To: 'Access Developers discussion and problem solving' Subject: RE: [AccessD] Get Folder Name via API Thanks guys. You all have code that uses the same API (SHBrowseForFolder). Works well but I had hoped to find some way of using the File Save/Save As dialog but returning just a folder name. The advantage of that is that you can create a new folder on the hoof. But if it was possible then I'm sure you'd be using it too. Thanks for all your suggestions. Andy Lacey http://www.minstersystems.co.uk > -----Original Message----- > From: accessd-bounces at databaseadvisors.com > [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Dan Waters > Sent: 06 January 2004 17:34 > To: 'Access Developers discussion and problem solving' > Subject: RE: [AccessD] Get Folder Name via API > > > Andy, > > This is what I use - credits are included. Cut and paste > into a standard module. I use a global string variable to > carry the path to a folder. > > Dan Waters > > '------------------------------- > > Option Compare Database > Option Explicit > > Private Type BrowseInfo > hWndOwner As Long > pIDLRoot As Long > pszDisplayName As Long > lpszTitle As Long > ulFlags As Long > lpfnCallback As Long > lParam As Long > iImage As Long > End Type > > Const BIF_RETURNONLYFSDIRS = 1 > Const MAX_PATH = 260 > > Private Declare Sub CoTaskMemFree Lib "ole32.dll" (ByVal hMem > As Long) Private Declare Function lstrcat Lib "kernel32" > Alias "lstrcatA" (ByVal lpString1 As String, ByVal lpString2 > As String) As Long Private Declare Function SHBrowseForFolder > Lib "shell32" (lpbi As > BrowseInfo) As Long > Private Declare Function SHGetPathFromIDList Lib "shell32" > (ByVal pidList As Long, ByVal lpBuffer As String) As Long > > '--------------------------------- > > Public Sub GetFolderName() > On Error GoTo EH > > 'KPD-Team 1998 > 'URL: http://www.allapi.net/ > 'KPDTeam at Allapi.net > > Dim intNull As Integer > Dim lngIDList As Long > Dim lngResult As Long > Dim stgPath As String > Dim udtBI As BrowseInfo > > With udtBI > 'Set the owner window > '.hWndOwner = Me.hwnd > > 'lstrcat appends the two strings and returns the > memory address > '.lpszTitle = lstrcat("C:\", "") > > 'Return only if the user selected a directory > .ulFlags = BIF_RETURNONLYFSDIRS > > End With > > 'Show the 'Browse for folder' dialog > lngIDList = SHBrowseForFolder(udtBI) > > If lngIDList Then > > stgPath = String$(MAX_PATH, 0) > > 'Get the path from the IDList > SHGetPathFromIDList lngIDList, stgPath > > 'free the block of memory > CoTaskMemFree lngIDList > > '-- Get location of first null value > intNull = InStr(stgPath, vbNullChar) > > If intNull > 0 Then > '-- Trim nulls from name > GstgFolderName = Left$(stgPath, intNull - 1) > Else > GstgFolderName = "" > End If > Else > GstgFolderName = "" > End If > > Exit Sub > > EH: > Application.Echo True > Call GlobalErrors("", Err.Number, Err.Description, > CurrentObjectName, > "GetFolderName") > > End Sub > > > -----Original Message----- > From: accessd-bounces at databaseadvisors.com > [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Andy Lacey > Sent: Tuesday, January 06, 2004 9:42 AM > To: Access Developers discussion and problem solving > Subject: [AccessD] Get Folder Name via API > > > Must've done thsi before but can't find it. I want to ask the > user for a folder name (into which I'm going to store stuff). > I want to use the Windows common file dialog so that it looks > neat and offers to create a new folder and so on. However I > don't want to put a Common Dialog control on the form (always > has version issues) so want to use the API method. But the > code I have (from Dev Ashish) insists on a filename not just > a folder, and the other code on his site to browse a folder > list doesn't use the normal dialog. Anyone got code for this? > > -- > Andy Lacey > http://www.minstersystems.co.uk > > > ________________________________________________ > Message sent using UebiMiau 2.7.2 > > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/a> ccessd > Website: > http://www.databaseadvisors.com > > > > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/a> ccessd > Website: > http://www.databaseadvisors.com > > _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From Lambert.Heenan at AIG.com Tue Jan 6 15:17:48 2004 From: Lambert.Heenan at AIG.com (Heenan, Lambert) Date: Tue, 6 Jan 2004 16:17:48 -0500 Subject: [AccessD] Get Folder Name via API Message-ID: <8B98F8EA48F8BA47A2F24E0D0AF40CF407AD7C33@xlivmbx12.aig.com> The browse for folder dialog can be used to create new folders too. Just set up the ulFlags item of the BrowseInfo structure like this... .ulFlags = .ulFlags Or BIF_USENEWUI OR BIF_RETURNONLYFSDIRS Or .ulFlags = .ulFlags Or BIF_NEWDIALOGSTYLE OR BIF_RETURNONLYFSDIRS And add these constants to the code Const BIF_NEWDIALOGSTYLE = 64 Const BIF_USENEWUI = 80 The BIF_NEWDIALOGSTYLE allows you to resize the dialog adds a "Make New Folder" button. BIF_USENEWUI provides an edit box to type the folder name in as well as a "Make New Folder" button. This second one only works with Shell32.dll version 5 and greater (Win 2000 and above). In older version clicking the new folder button will create the folder, and the user can then select it in the folder tree and rename it. Lambert -----Original Message----- From: Andy Lacey [mailto:andy at minstersystems.co.uk] Sent: Tuesday, January 06, 2004 1:25 PM To: 'Access Developers discussion and problem solving' Subject: RE: [AccessD] Get Folder Name via API Thanks guys. You all have code that uses the same API (SHBrowseForFolder). Works well but I had hoped to find some way of using the File Save/Save As dialog but returning just a folder name. The advantage of that is that you can create a new folder on the hoof. But if it was possible then I'm sure you'd be using it too. Thanks for all your suggestions. Andy Lacey http://www.minstersystems.co.uk > -----Original Message----- > From: accessd-bounces at databaseadvisors.com > [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Dan Waters > Sent: 06 January 2004 17:34 > To: 'Access Developers discussion and problem solving' > Subject: RE: [AccessD] Get Folder Name via API > > > Andy, > > This is what I use - credits are included. Cut and paste > into a standard module. I use a global string variable to > carry the path to a folder. > > Dan Waters > > '------------------------------- > > Option Compare Database > Option Explicit > > Private Type BrowseInfo > hWndOwner As Long > pIDLRoot As Long > pszDisplayName As Long > lpszTitle As Long > ulFlags As Long > lpfnCallback As Long > lParam As Long > iImage As Long > End Type > > Const BIF_RETURNONLYFSDIRS = 1 > Const MAX_PATH = 260 > > Private Declare Sub CoTaskMemFree Lib "ole32.dll" (ByVal hMem > As Long) Private Declare Function lstrcat Lib "kernel32" > Alias "lstrcatA" (ByVal lpString1 As String, ByVal lpString2 > As String) As Long Private Declare Function SHBrowseForFolder > Lib "shell32" (lpbi As > BrowseInfo) As Long > Private Declare Function SHGetPathFromIDList Lib "shell32" > (ByVal pidList As Long, ByVal lpBuffer As String) As Long > > '--------------------------------- > > Public Sub GetFolderName() > On Error GoTo EH > > 'KPD-Team 1998 > 'URL: http://www.allapi.net/ > 'KPDTeam at Allapi.net > > Dim intNull As Integer > Dim lngIDList As Long > Dim lngResult As Long > Dim stgPath As String > Dim udtBI As BrowseInfo > > With udtBI > 'Set the owner window > '.hWndOwner = Me.hwnd > > 'lstrcat appends the two strings and returns the > memory address > '.lpszTitle = lstrcat("C:\", "") > > 'Return only if the user selected a directory > .ulFlags = BIF_RETURNONLYFSDIRS > > End With > > 'Show the 'Browse for folder' dialog > lngIDList = SHBrowseForFolder(udtBI) > > If lngIDList Then > > stgPath = String$(MAX_PATH, 0) > > 'Get the path from the IDList > SHGetPathFromIDList lngIDList, stgPath > > 'free the block of memory > CoTaskMemFree lngIDList > > '-- Get location of first null value > intNull = InStr(stgPath, vbNullChar) > > If intNull > 0 Then > '-- Trim nulls from name > GstgFolderName = Left$(stgPath, intNull - 1) > Else > GstgFolderName = "" > End If > Else > GstgFolderName = "" > End If > > Exit Sub > > EH: > Application.Echo True > Call GlobalErrors("", Err.Number, Err.Description, > CurrentObjectName, > "GetFolderName") > > End Sub > > > -----Original Message----- > From: accessd-bounces at databaseadvisors.com > [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Andy Lacey > Sent: Tuesday, January 06, 2004 9:42 AM > To: Access Developers discussion and problem solving > Subject: [AccessD] Get Folder Name via API > > > Must've done thsi before but can't find it. I want to ask the > user for a folder name (into which I'm going to store stuff). > I want to use the Windows common file dialog so that it looks > neat and offers to create a new folder and so on. However I > don't want to put a Common Dialog control on the form (always > has version issues) so want to use the API method. But the > code I have (from Dev Ashish) insists on a filename not just > a folder, and the other code on his site to browse a folder > list doesn't use the normal dialog. Anyone got code for this? > > -- > Andy Lacey > http://www.minstersystems.co.uk > > > ________________________________________________ > Message sent using UebiMiau 2.7.2 > > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/a> ccessd > Website: > http://www.databaseadvisors.com > > > > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/a> ccessd > Website: > http://www.databaseadvisors.com > > _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From dfe at nudgeeinternational.com Tue Jan 6 16:22:23 2004 From: dfe at nudgeeinternational.com (David Fenton) Date: Wed, 7 Jan 2004 08:22:23 +1000 Subject: [AccessD] DoCmd.RunSQL or CurrentDb.Execute? Message-ID: Quick question... Which is better to use? Assuming an SQL string in a variable called strSQL Then... DoCmd.RunSQL strSQL Or CurrentDb.Execute strSQL They both have the same outcome; I was just wondering whether one was maybe faster or something? Cheers David Brisbane Australia From dfe at nudgeeinternational.com Tue Jan 6 16:29:53 2004 From: dfe at nudgeeinternational.com (David Fenton) Date: Wed, 7 Jan 2004 08:29:53 +1000 Subject: [AccessD] RE: MDBs vs SQL Server Message-ID: John, I'm a 4.5 - I would love to get into it, and although I understand and use SQL, from what I have read in Alison Balters books, you lose a lot of the ease of control when you move from an MDB to SQL Server. I would like to know more about ADP to see if that will get me closer to using SQL Server with an Access Front End. Currently all my coding is in an Access MDB. Will eventually create an MDE, but application is hovering around 12MB so seems unnecessary to move to SQL Server at this stage with only 25 staff using it. Cheers David Fenton Brisbane Australia -----Original Message----- From: John W. Colby [mailto:jcolby at colbyconsulting.com] Sent: Monday, December 22, 2003 5:23 PM To: AccessD Subject: [AccessD] MDBs vs SQL Server I'd like to conduct a non-scientific poll to discover what you folks use. Please pick one of the numbers and respond to the list. 1) I use SQL Server for all my data. I wouldn't touch an MDB BE with a 10 foot pole. 2) I use SQL Server mostly, but will touch an MDB BE with a 10 foot pole, as long as I don't have to be responsible for the mess. 3) I have used SQL Server in at least one actual client system but my bread and butter is made with MDB BEs. 4) I am fascinated with the possibilities of SQL server, have looked at it, perhaps installed it at my office, but just don't have the call for it from my clients. 5) What's this here SQL Server thangie? All my database BEs are done with MDBs. 6) I prefer to do my data stores in Excel spreadsheets, but if I must an MDB is at least within my grasp. SQL Server is for them big boys n they won't talk to me. I would still be using Borland's Reflex if I could get a copy - now THERE's a REAL MAN'S database!!! Just pick a number and put it in the first line of your response. As for me, I am a 4. I have SQL Server installed in my office, moved my billing db to it in order to have a real live in use system using it, and have regretted it ever since. In fact I yanked the data back out into an MDB last week after having to rebuild my system twice and then ending up with torn pages in my SQL Server database. John W. Colby www.ColbyConsulting.com From Developer at UltraDNT.com Tue Jan 6 16:42:40 2004 From: Developer at UltraDNT.com (Developer) Date: Tue, 6 Jan 2004 17:42:40 -0500 Subject: [AccessD] DoCmd.RunSQL or CurrentDb.Execute? In-Reply-To: Message-ID: <004601c3d4a6$643bdbd0$7001a8c0@COA3> Currentdb.execute will bypass the warnings if they are on, Docmd will still have the warnings. Currentdb has been faster for me, but I havent benchmarked anything specific. Hth Steve -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of David Fenton Sent: Tuesday, January 06, 2004 5:22 PM To: accessd at databaseadvisors.com Subject: [AccessD] DoCmd.RunSQL or CurrentDb.Execute? Quick question... Which is better to use? Assuming an SQL string in a variable called strSQL Then... DoCmd.RunSQL strSQL Or CurrentDb.Execute strSQL They both have the same outcome; I was just wondering whether one was maybe faster or something? Cheers David Brisbane Australia _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From stuart at lexacorp.com.pg Tue Jan 6 16:40:19 2004 From: stuart at lexacorp.com.pg (Stuart McLachlan) Date: Wed, 07 Jan 2004 08:40:19 +1000 Subject: [AccessD] DoCmd.RunSQL or CurrentDb.Execute? In-Reply-To: Message-ID: <3FFBC5F3.22232.16B2F9@localhost> On 7 Jan 2004 at 8:22, David Fenton wrote: > > Quick question... > Which is better to use? > Assuming an SQL string in a variable called strSQL > Then... > > DoCmd.RunSQL strSQL > Or > CurrentDb.Execute strSQL > > They both have the same outcome; I was just wondering whether one was > maybe faster or something? > WIth DoCmd.RunSQL, you get the standard messagebox 'You are about to...." If you want the update to happen without any user action, use CurrentDB.Execute. If you want the warning and the user to have the opportunity to cancel the action, user DoCmd.RunSQL Note that "DoCmd.SetWarnings False DoCmd.RunSQL strSQL DoCmdSetWarnings True" suppresses the update notice, but also has the effect of suppressing any error messages generated by a problem in strSQL. -- Lexacorp Ltd http://www.lexacorp.com.pg Information Technology Consultancy, Software Development,System Support. From Subscriptions at servicexp.com Tue Jan 6 20:26:35 2004 From: Subscriptions at servicexp.com (Robert Gracie) Date: Tue, 6 Jan 2004 21:26:35 -0500 Subject: [AccessD] Encryption In-Reply-To: <3FFBC5F3.22232.16B2F9@localhost> Message-ID: Hello All, Instead of re-inventing the wheel here, does anyone have some code that will allow me to pull the body of an e-mail (or a very large string even) and encrypt it with out first writing it to a text file? I've tried three different cipher routines, but they all want to break up the String. So I'm left with only the first section in the string.... Thanks Robert Gracie From stuart at lexacorp.com.pg Tue Jan 6 22:12:04 2004 From: stuart at lexacorp.com.pg (Stuart McLachlan) Date: Wed, 07 Jan 2004 14:12:04 +1000 Subject: [AccessD] Encryption In-Reply-To: References: <3FFBC5F3.22232.16B2F9@localhost> Message-ID: <3FFC13B4.19204.1466957@localhost> On 6 Jan 2004 at 21:26, Robert Gracie wrote: > Hello All, > Instead of re-inventing the wheel here, does anyone have some code that > will allow me to pull the body of an e-mail (or a very large string even) > and encrypt it with out first writing it to a text file? I've tried three > different cipher routines, but they all want to break up the String. So I'm > left with only the first section in the string.... > How large is large? Here are some routines that use PC1 (see http://membres.lycos.fr/pc1/) Theorectically, it will handle any length of string up to 1/2 the maximum allowable string length for your development environment. (The encryted string is always exactly twice as large as the original.) This VBA versions works fairly well up to about 30 - 40K on my PC (1 -2 secs to encode, virtually instantaneous decode), but as the original string gets bigger, it takes *a lot* longer to encrypt. (70K = 12 secs, 80K = 22 secs, 90K = 38 secs etc but decrypt is still only about 3 secs at 90K). If you want to use larger strings, I can let you have a DLL version of this which I built in PowerBasic. It is *much* faster Option Compare Database Option Explicit '----------------------------------------------------------------------------------------------------- '(A little) More info on this algo can be found at [URL=http://www.multimania.com/cuisinons/pc1/index.html]http://www.multimania.com/cuisinons/pc1/index.html[/URL] 'Ported from VB to PB by Wayne Diamond. The PC1 cipher uses a 128-bit key. 'It's a stream cipher with a retroaction function. 'Ported from PB to Access VBA by Stuart McLachlan '----------------------------------------------------------------------------------------------------- Global x1aZero() As Long, cle() As Long '---------------------------------------------------------------------------------- Function code(x1aTwo As Long, EDsi As Long, EDi As Long) As Long Dim EDax As Long, EDbx As Long, EDcx As Long, EDdx As Long, EDtemp As Long On Error Resume Next EDdx = (x1aTwo + EDi) Mod 65536 EDax = x1aZero(EDi) EDcx = &H15A EDbx = &H4E35 EDtemp = EDax EDax = EDsi EDsi = EDtemp EDtemp = EDax EDax = EDdx EDdx = EDtemp If (EDax <> 0) Then EDax = (EDax * EDbx) Mod 65536 End If EDtemp = EDax EDax = EDcx EDcx = EDtemp If (EDax <> 0) Then EDax = (EDax * EDsi) Mod 65536 EDcx = (EDax + EDcx) Mod 65536 End If EDtemp = EDax EDax = EDsi EDsi = EDtemp EDax = (EDax * EDbx) Mod 65536 EDdx = (EDcx + EDdx) Mod 65536 EDax = EDax + 1 x1aTwo = EDdx x1aZero(EDi) = EDax code = EDax Xor EDdx EDi = EDi + 1 End Function '---------------------------------------------------------------------------------- Function Assemble(x1aTwo As Long, EDsi As Long, EDi As Long) As Long On Error Resume Next Dim inter As Long x1aZero(0) = ((cle(1) * 256) + cle(2)) Mod 65536 inter = code(x1aTwo, EDsi, EDi) x1aZero(1) = x1aZero(0) Xor ((cle(3) * 256) + cle(4)) inter = inter Xor code(x1aTwo, EDsi, EDi) x1aZero(2) = x1aZero(1) Xor ((cle(5) * 256) + cle(6)) inter = inter Xor code(x1aTwo, EDsi, EDi) x1aZero(3) = x1aZero(2) Xor ((cle(7) * 256) + cle(8)) inter = inter Xor code(x1aTwo, EDsi, EDi) x1aZero(4) = x1aZero(3) Xor ((cle(9) * 256) + cle(10)) inter = inter Xor code(x1aTwo, EDsi, EDi) x1aZero(5) = x1aZero(4) Xor ((cle(11) * 256) + cle(12)) inter = inter Xor code(x1aTwo, EDsi, EDi) x1aZero(6) = x1aZero(5) Xor ((cle(13) * 256) + cle(14)) inter = inter Xor code(x1aTwo, EDsi, EDi) x1aZero(7) = x1aZero(6) Xor ((cle(15) * 256) + cle(16)) Assemble = inter Xor code(x1aTwo, EDsi, EDi) EDi = 0 End Function '---------------------------------------------------------------------------------- Function PC1ENC(encPassword As String, encStringOut As String) As String On Error Resume Next Dim encStringIn As String, ChmpStr As String Dim j As Long, cfc As Long, cfd As Long, c As Long, D As Long, E As Long Dim Chmp As Long, compte As Long Dim x1aTwo As Long, EDsi As Long, EDi As Long, inter As Long ReDim x1aZero(9) As Long, cle(17) As Long encStringIn = "" EDsi = 0 x1aTwo = 0 EDi = 0 For j = 1 To 16 cle(j) = 0 Next j ChmpStr = encPassword Chmp = Len(ChmpStr) For j = 1 To Chmp cle(j) = Asc(Mid$(ChmpStr, j, 1)) Next j ChmpStr = encStringOut Chmp = Len(ChmpStr) For j = 1 To Chmp c = Asc(Mid$(ChmpStr, j, 1)) inter = Assemble(x1aTwo, EDsi, EDi) cfc = (((inter / 256) * 256) - (inter Mod 256)) / 256 cfd = inter Mod 256 For compte = 1 To 16 cle(compte) = cle(compte) Xor c Next compte c = c Xor (cfc Xor cfd) D = (((c / 16) * 16) - (c Mod 16)) / 16 E = c Mod 16 encStringIn = encStringIn + Chr$(&H61 + D) ' d+&h61 give one letter range from a to p for the 4 high bits of c encStringIn = encStringIn + Chr$(&H61 + E) ' e+&h61 give one letter range from a to p for the 4 low bits of c Next j PC1ENC = encStringIn End Function '---------------------------------------------------------------------------------- Function PC1DEC(encPassword As String, encStringIn As String) As String On Error Resume Next Dim encStringOut As String, ChmpStr As String Dim j As Long, cfc As Long, cfd As Long, c As Long, D As Long, E As Long Dim Chmp As Long, compte As Long Dim x1aTwo As Long, EDsi As Long, EDi As Long, inter As Long ReDim x1aZero(9) As Long, cle(17) As Long encStringOut = "" EDsi = 0 x1aTwo = 0 EDi = 0 For j = 1 To 16 cle(j) = 0 Next j ChmpStr = encPassword Chmp = Len(ChmpStr) For j = 1 To Chmp cle(j) = Asc(Mid$(ChmpStr, j, 1)) Next j ChmpStr = encStringIn Chmp = Len(ChmpStr) For j = 1 To Chmp D = Asc(Mid$(ChmpStr, j, 1)) If (D - &H61) >= 0 Then D = D - &H61 ' to transform the letter to the 4 high bits of c If (D >= 0) And (D <= 15) Then D = D * 16 End If End If If (j <> Chmp) Then j = j + 1 End If E = Asc(Mid$(ChmpStr, j, 1)) If (E - &H61) >= 0 Then E = E - &H61 ' to transform the letter to the 4 low bits of c If (E >= 0) And (E <= 15) Then c = D + E End If End If inter = Assemble(x1aTwo, EDsi, EDi) cfc = (((inter / 256) * 256) - (inter Mod 256)) / 256 cfd = inter Mod 256 c = c Xor (cfc Xor cfd) For compte = 1 To 16 cle(compte) = cle(compte) Xor c Next compte encStringOut = encStringOut + Chr$(c) Next j PC1DEC = encStringOut End Function '---------------------------------------------------------------------------------- Function test() As Long Dim strPassword As String Dim strOriginal As String Dim strEncode As String Dim strDecode As String strPassword = "12345678901" ' Max 11 Numbers it seems or ... strPassword = "abcdefghijklmno" ' around 16 letters is maximum strOriginal = String$(32000, "A") starttime = Timer strEncode = PC1ENC(strPassword, strOriginal) Debug.Print "Encoded in " & CInt(Timer - starttime) & " secs" Open "c:\test1.txt" For Output As #1 Print #1, strEncode Close #1 starttime = Timer strDecode = PC1DEC(strPassword, strEncode) Debug.Print "Decoded in " & CInt(Timer - starttime) & " secs" Open "c:\test2.txt" For Output As #1 Print #1, strDecode Close #1 End Function '---------------------------------------------------------------------------------- -- Lexacorp Ltd http://www.lexacorp.com.pg Information Technology Consultancy, Software Development,System Support. From selina at easydatabases.com.au Tue Jan 6 22:38:36 2004 From: selina at easydatabases.com.au (Selina Iddon) Date: Wed, 7 Jan 2004 14:38:36 +1000 Subject: [AccessD] Queries with a mind of their own References: <3FFBC5F3.22232.16B2F9@localhost> <3FFC13B4.19204.1466957@localhost> Message-ID: <007701c3d4d8$1db7e000$6465000a@venus> Hi Everyone I've been away for quite a while, hope everyone had a Happy New Year. In the past day a couple of my databases have started going haywire. I create a query, add the field I want but if I try and group then it gives me the message you can group on "*" fields ... true, but I didn't add any and there are none showing in the design pane. So I run the results pane without grouping and sure enough, the field I did add is there in front, then every other field of every table is there too. I go into SQL view and sure enough there is an *, but I didn't do it, if I manually take this out it's then fine, but how did it get there in the first place. This is happening with all new queries I'm making it would seem ... and when editing some old ones. Any ideas? Thanks Selina From stuart at lexacorp.com.pg Tue Jan 6 23:53:59 2004 From: stuart at lexacorp.com.pg (Stuart McLachlan) Date: Wed, 07 Jan 2004 15:53:59 +1000 Subject: [AccessD] Queries with a mind of their own In-Reply-To: <007701c3d4d8$1db7e000$6465000a@venus> Message-ID: <3FFC2B97.3187.1A3BA03@localhost> On 7 Jan 2004 at 14:38, Selina Iddon wrote: > In the past day a couple of my databases have started going haywire. I > create a query, add the field I want but if I try and group then it gives me > the message you can group on "*" fields ... true, but I didn't add any and > there are none showing in the design pane. So I run the results pane > without grouping and sure enough, the field I did add is there in front, > then every other field of every table is there too. I go into SQL view and > sure enough there is an *, but I didn't do it, if I manually take this out > it's then fine, but how did it get there in the first place. This is > happening with all new queries I'm making it would seem ... and when editing > some old ones. Any ideas? > Go into Options | Tables/Queries. I'd guess that someone has ticked the box "Query Design: Output all fields". For existing queries that are doing this, open the query in Design View, select "View Properties" and set the property "Output All Fields" to "No" -- Lexacorp Ltd http://www.lexacorp.com.pg Information Technology Consultancy, Software Development,System Support. From gustav at cactus.dk Wed Jan 7 01:45:23 2004 From: gustav at cactus.dk (Gustav Brock) Date: Wed, 7 Jan 2004 08:45:23 +0100 Subject: [AccessD] Encryption In-Reply-To: <3FFC13B4.19204.1466957@localhost> References: <3FFBC5F3.22232.16B2F9@localhost> <3FFC13B4.19204.1466957@localhost> Message-ID: <982764405.20040107084523@cactus.dk> Hi Robert and Stuart Lookup my message: Re: [AccessD] Encryption/decryption (was: Registration Techniques) from 2002-09-18 for a complete high-speed PC1 Access 97 module. Should work for A2000/2003 as well. That said, a PowerBasic dll would probably run way faster ... /gustav >> Instead of re-inventing the wheel here, does anyone have some code that >> will allow me to pull the body of an e-mail (or a very large string even) >> and encrypt it with out first writing it to a text file? I've tried three >> different cipher routines, but they all want to break up the String. So I'm >> left with only the first section in the string.... >> > How large is large? > Here are some routines that use PC1 (see > http://membres.lycos.fr/pc1/) > Theorectically, it will handle any length of string up to 1/2 the > maximum allowable string length for your development environment. > (The encryted string is always exactly twice as large as the > original.) > This VBA versions works fairly well up to about 30 - 40K on my PC > (1 -2 secs to encode, virtually instantaneous decode), but as the > original string gets bigger, it takes *a lot* longer to encrypt. > (70K = 12 secs, 80K = 22 secs, 90K = 38 secs etc but decrypt is still > only about 3 secs at 90K). > If you want to use larger strings, I can let you have a DLL version > of this which I built in PowerBasic. It is *much* faster From AJAllen at mail.wvu.edu Wed Jan 7 08:13:51 2004 From: AJAllen at mail.wvu.edu (Amanda Allen) Date: Wed, 07 Jan 2004 09:13:51 -0500 Subject: [AccessD] Field - Can Grow - on a Form Message-ID: I'm using Access 2002 and I can't seem to get the fields on a form to grow to fit the size needed for the data in the table. For instance, most of the data is about 50 characters but there are some that are about 150 characters. Instead of wasting space on the form for the larger data, I would like the field to grow on the form. I selected Can Grow in the properties of the field, but it still does not allow the field to grow on the form. * Amanda From jwcolby at colbyconsulting.com Wed Jan 7 08:23:45 2004 From: jwcolby at colbyconsulting.com (John W. Colby) Date: Wed, 7 Jan 2004 09:23:45 -0500 Subject: [AccessD] Field - Can Grow - on a Form In-Reply-To: Message-ID: This only works on reports. John W. Colby www.ColbyConsulting.com -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Amanda Allen Sent: Wednesday, January 07, 2004 9:14 AM To: accessd at databaseadvisors.com Subject: [AccessD] Field - Can Grow - on a Form I'm using Access 2002 and I can't seem to get the fields on a form to grow to fit the size needed for the data in the table. For instance, most of the data is about 50 characters but there are some that are about 150 characters. Instead of wasting space on the form for the larger data, I would like the field to grow on the form. I selected Can Grow in the properties of the field, but it still does not allow the field to grow on the form. * Amanda _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From wdhindman at bellsouth.net Wed Jan 7 08:34:34 2004 From: wdhindman at bellsouth.net (William Hindman) Date: Wed, 7 Jan 2004 09:34:34 -0500 Subject: [AccessD] Field - Can Grow - on a Form References: Message-ID: <000901c3d52b$5f0c7db0$6101a8c0@dejpolsys> ...sorry ...that functionality is not native to forms in Access, only reports :( ...but Lebans has a demo mdb using the API to give forms the same grow/shrink functionality as reports ...HTH :) http://www.lebans.com/cangrow.htm William Hindman - Next Year In The Free State! ----- Original Message ----- From: "Amanda Allen" To: Sent: Wednesday, January 07, 2004 9:13 AM Subject: [AccessD] Field - Can Grow - on a Form > I'm using Access 2002 and I can't seem to get the fields on a form to > grow to fit the size needed for the data in the table. For instance, > most of the data is about 50 characters but there are some that are > about 150 characters. Instead of wasting space on the form for the > larger data, I would like the field to grow on the form. I selected > Can Grow in the properties of the field, but it still does not allow > the field to grow on the form. > > * Amanda > > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com > From gustav at cactus.dk Wed Jan 7 08:34:52 2004 From: gustav at cactus.dk (Gustav Brock) Date: Wed, 7 Jan 2004 15:34:52 +0100 Subject: [AccessD] Field - Can Grow - on a Form In-Reply-To: References: Message-ID: <9427333513.20040107153452@cactus.dk> Hi Amanda Pay a visit to Stephen Lebans's site: http://www.lebans.com/Form.htm Look for AutoSizeTextBox and TextHeightWidth. /gustav > I'm using Access 2002 and I can't seem to get the fields on a form to > grow to fit the size needed for the data in the table. For instance, > most of the data is about 50 characters but there are some that are > about 150 characters. Instead of wasting space on the form for the > larger data, I would like the field to grow on the form. I selected > Can Grow in the properties of the field, but it still does not allow > the field to grow on the form. > * Amanda From mwhittinghill at symphonyinfo.com Wed Jan 7 09:07:50 2004 From: mwhittinghill at symphonyinfo.com (Mark Whittinghill) Date: Wed, 7 Jan 2004 09:07:50 -0600 Subject: [AccessD] DoCmd.RunSQL or CurrentDb.Execute? References: <004601c3d4a6$643bdbd0$7001a8c0@COA3> Message-ID: <003301c3d530$0537df00$2501a8c0@PASCAL> One more thing on this, if you want to be able to rollback your changes in a workspace transaction, you need to run CurrentDb.Execute Mark Whittinghill Symphony Information Services 763-391-7400 mwhittinghill at symphonyinfo.com ----- Original Message ----- From: "Developer" To: "'Access Developers discussion and problem solving'" Sent: Tuesday, January 06, 2004 4:42 PM Subject: RE: [AccessD] DoCmd.RunSQL or CurrentDb.Execute? > Currentdb.execute will bypass the warnings if they are on, > Docmd will still have the warnings. > Currentdb has been faster for me, but I havent benchmarked anything > specific. > > Hth > Steve > > > -----Original Message----- > From: accessd-bounces at databaseadvisors.com > [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of David Fenton > Sent: Tuesday, January 06, 2004 5:22 PM > To: accessd at databaseadvisors.com > Subject: [AccessD] DoCmd.RunSQL or CurrentDb.Execute? > > > > Quick question... > Which is better to use? > Assuming an SQL string in a variable called strSQL > Then... > > DoCmd.RunSQL strSQL > Or > CurrentDb.Execute strSQL > > They both have the same outcome; I was just wondering whether one was > maybe faster or something? > > Cheers > David > Brisbane > Australia > > > _______________________________________________ > 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 > > From garykjos at hotmail.com Wed Jan 7 09:12:21 2004 From: garykjos at hotmail.com (Gary Kjos) Date: Wed, 07 Jan 2004 09:12:21 -0600 Subject: [AccessD] Queries with a mind of their own Message-ID: There is an option under Tools/Options/Tables Queries to "Output All Fields" I wonder if this has been mistakenly checked? Gary Kjos garykjos at hotmail.com >From: "Selina Iddon" >Reply-To: Access Developers discussion and problem >solving >To: "Access Developers discussion and problem >solving" >Subject: [AccessD] Queries with a mind of their own >Date: Wed, 7 Jan 2004 14:38:36 +1000 > >Hi Everyone > >I've been away for quite a while, hope everyone had a Happy New Year. >In the past day a couple of my databases have started going haywire. I >create a query, add the field I want but if I try and group then it gives >me >the message you can group on "*" fields ... true, but I didn't add any and >there are none showing in the design pane. So I run the results pane >without grouping and sure enough, the field I did add is there in front, >then every other field of every table is there too. I go into SQL view and >sure enough there is an *, but I didn't do it, if I manually take this out >it's then fine, but how did it get there in the first place. This is >happening with all new queries I'm making it would seem ... and when >editing >some old ones. Any ideas? > >Thanks > >Selina > > >_______________________________________________ >AccessD mailing list >AccessD at databaseadvisors.com >http://databaseadvisors.com/mailman/listinfo/accessd >Website: http://www.databaseadvisors.com _________________________________________________________________ Get reliable dial-up Internet access now with our limited-time introductory offer. http://join.msn.com/?page=dept/dialup From ssharkins at bellsouth.net Wed Jan 7 09:20:16 2004 From: ssharkins at bellsouth.net (Susan Harkins) Date: Wed, 7 Jan 2004 10:20:16 -0500 Subject: [AccessD] lines and Can Grow conflict Message-ID: <00fc01c3d531$c19950b0$210110ac@SUSANONE> I've got a small report that generates work orders. There's a line down the left side of the Detail section, which of course, keeps any controls with a Yes Can Grow setting from actually expanding, even if they need to. I know how to drop in lines and stuff programmatically for controls, so I can probably figure this one out, but if anyone already has code that drops in a line in the Detail section _after_ the controls expand, you could save me a little time if you're willing to share it. Thanks! :) Susan H. From DElam at jenkens.com Wed Jan 7 09:42:26 2004 From: DElam at jenkens.com (Elam, Debbie) Date: Wed, 7 Jan 2004 09:42:26 -0600 Subject: [AccessD] lines and Can Grow conflict Message-ID: <7B1961ED924D1A459E378C9B1BB22B4C0106B918@natexch.jenkens.com> Put this in the detail section on format Dim X As Single Me.ScaleMode = 5 Me.DrawWidth = 3 X = 0 Me.Line (X, 0)-(X, 22) X = 0.9604 Me.Line (X, 0)-(X, 22) X = 1.9083 Me.Line (X, 0)-(X, 22) X = 2.7604 Me.Line (X, 0)-(X, 22) X = 3.6271 Me.Line (X, 0)-(X, 22) X = 4.3354 Me.Line (X, 0)-(X, 22) X = 5.2111 Me.Line (X, 0)-(X, 22) X = 5.95 The value of X is the number of inches from the left you want the line to be. Debbie -----Original Message----- From: Susan Harkins [mailto:ssharkins at bellsouth.net] Sent: Wednesday, January 07, 2004 9:20 AM To: AccessD at databaseadvisors.com Subject: [AccessD] lines and Can Grow conflict I've got a small report that generates work orders. There's a line down the left side of the Detail section, which of course, keeps any controls with a Yes Can Grow setting from actually expanding, even if they need to. I know how to drop in lines and stuff programmatically for controls, so I can probably figure this one out, but if anyone already has code that drops in a line in the Detail section _after_ the controls expand, you could save me a little time if you're willing to share it. Thanks! :) Susan H. _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com - JENKENS & GILCHRIST E-MAIL NOTICE - This transmission may be: (1) subject to the Attorney-Client Privilege, (2) an attorney work product, or (3) strictly confidential. If you are not the intended recipient of this message, you may not disclose, print, copy or disseminate this information. If you have received this in error, please reply and notify the sender (only) and delete the message. Unauthorized interception of this e-mail is a violation of federal criminal law. This communication does not reflect an intention by the sender or the sender's client or principal to conduct a transaction or make any agreement by electronic means. Nothing contained in this message or in any attachment shall satisfy the requirements for a writing, and nothing contained herein shall constitute a contract or electronic signature under the Electronic Signatures in Global and National Commerce Act, any version of the Uniform Electronic Transactions Act or any other statute governing electronic transactions. From ssharkins at bellsouth.net Wed Jan 7 09:48:59 2004 From: ssharkins at bellsouth.net (Susan Harkins) Date: Wed, 7 Jan 2004 10:48:59 -0500 Subject: [AccessD] lines and Can Grow conflict References: <7B1961ED924D1A459E378C9B1BB22B4C0106B918@natexch.jenkens.com> Message-ID: <000701c3d536$8ad3ea40$210110ac@SUSANONE> Cool -- that was fast Debbie -- thank you. :) Susan H. > Put this in the detail section on format > > Dim X As Single > Me.ScaleMode = 5 > Me.DrawWidth = 3 > X = 0 > Me.Line (X, 0)-(X, 22) > X = 0.9604 > Me.Line (X, 0)-(X, 22) > X = 1.9083 > Me.Line (X, 0)-(X, 22) > X = 2.7604 > Me.Line (X, 0)-(X, 22) > X = 3.6271 > Me.Line (X, 0)-(X, 22) > X = 4.3354 > Me.Line (X, 0)-(X, 22) > X = 5.2111 > Me.Line (X, 0)-(X, 22) > X = 5.95 > > The value of X is the number of inches from the left you want the line to > be. > > Debbie > > -----Original Message----- > From: Susan Harkins [mailto:ssharkins at bellsouth.net] > Sent: Wednesday, January 07, 2004 9:20 AM > To: AccessD at databaseadvisors.com > Subject: [AccessD] lines and Can Grow conflict > > > I've got a small report that generates work orders. There's a line down the > left side of the Detail section, which of course, keeps any controls with a > Yes Can Grow setting from actually expanding, even if they need to. I know > how to drop in lines and stuff programmatically for controls, so I can > probably figure this one out, but if anyone already has code that drops in a > line in the Detail section _after_ the controls expand, you could save me a > little time if you're willing to share it. Thanks! :) > > Susan H. > > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com > - JENKENS & GILCHRIST E-MAIL NOTICE - This transmission may be: (1) subject > to the Attorney-Client Privilege, (2) an attorney work product, or (3) > strictly confidential. If you are not the intended recipient of this > message, you may not disclose, print, copy or disseminate this information. > If you have received this in error, please reply and notify the sender > (only) and delete the message. Unauthorized interception of this e-mail is a > violation of federal criminal law. > This communication does not reflect an intention by the sender or the > sender's client or principal to conduct a transaction or make any agreement > by electronic means. Nothing contained in this message or in any attachment > shall satisfy the requirements for a writing, and nothing contained herein > shall constitute a contract or electronic signature under the Electronic > Signatures in Global and National Commerce Act, any version of the Uniform > Electronic Transactions Act or any other statute governing electronic > transactions. > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com > From caa at highway.com.br Wed Jan 7 12:31:58 2004 From: caa at highway.com.br (Carlos Alberto Alves) Date: Wed, 07 Jan 2004 16:31:58 -0200 Subject: [AccessD] OT - Test Message-ID: Just a test... -- ************************************** * Carlos Alberto Alves * * Child Neurologist * * Systems Analyst/Programmer * * Rio de Janeiro, Brazil * * mailto:caa at highway.com.br * ************************************** From Oleg_123 at xuppa.com Wed Jan 7 15:21:51 2004 From: Oleg_123 at xuppa.com (Oleg_123 at xuppa.com) Date: Wed, 7 Jan 2004 16:21:51 -0500 (EST) Subject: [AccessD] make table query with empy fields In-Reply-To: References: <40590.12.3.132.98.1066926288.squirrel@heck.bay9.com> Message-ID: <42620.12.3.132.98.1073510511.squirrel@heck.bay9.com> How do I create empty fields in make table query ? I tried doing it this way -- [Expr1] AS [Insider Flag], [Expr1] AS [Sex Code], [Expr1] AS [Race Code], but this prompts me for what Expr1 is, also can I do it so it'l numeric field instead of text ? ----------------------------------------- Get Breaking News from CNN, ABC, NBC, CBS Now. http://www.xuppa.com/news/?link=webmail From ssharkins at bellsouth.net Wed Jan 7 15:26:50 2004 From: ssharkins at bellsouth.net (Susan Harkins) Date: Wed, 7 Jan 2004 16:26:50 -0500 Subject: [AccessD] make table query with empy fields References: <40590.12.3.132.98.1066926288.squirrel@heck.bay9.com> <42620.12.3.132.98.1073510511.squirrel@heck.bay9.com> Message-ID: <000f01c3d564$f7c7acd0$210110ac@SUSANONE> You want to add a new empty field or you want an existing field to not copy the existing data? Is it just the one field or are you trying to copy the table structure without data? Susan H. > How do I create empty fields in make table query ? > I tried doing it this way -- [Expr1] AS [Insider Flag], [Expr1] AS [Sex > Code], [Expr1] AS [Race Code], but this prompts me for what Expr1 is, also > can I do it so it'l numeric field instead of text ? > > > ----------------------------------------- > Get Breaking News from CNN, ABC, NBC, CBS Now. > http://www.xuppa.com/news/?link=webmail > > > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com > From mikedorism at adelphia.net Wed Jan 7 15:31:58 2004 From: mikedorism at adelphia.net (Mike & Doris Manning) Date: Wed, 7 Jan 2004 16:31:58 -0500 Subject: [AccessD] make table query with empy fields In-Reply-To: <42620.12.3.132.98.1073510511.squirrel@heck.bay9.com> Message-ID: <000001c3d565$ae8ee780$8b194244@hargrove.internal> Try it this way -- 0 AS [Insider Flag], 0 AS [Sex Code], 0 AS [Race Code] And replace the 0 with whatever default number you want... Doris Manning Database Administrator Hargrove Inc. www.hargroveinc.com -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Oleg_123 at xuppa.com Sent: Wednesday, January 07, 2004 4:22 PM To: accessd at databaseadvisors.com Subject: [AccessD] make table query with empy fields How do I create empty fields in make table query ? I tried doing it this way -- [Expr1] AS [Insider Flag], [Expr1] AS [Sex Code], [Expr1] AS [Race Code], but this prompts me for what Expr1 is, also can I do it so it'l numeric field instead of text ? ----------------------------------------- Get Breaking News from CNN, ABC, NBC, CBS Now. http://www.xuppa.com/news/?link=webmail _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From Oleg_123 at xuppa.com Wed Jan 7 15:47:33 2004 From: Oleg_123 at xuppa.com (Oleg_123 at xuppa.com) Date: Wed, 7 Jan 2004 16:47:33 -0500 (EST) Subject: [AccessD] make table query with empy fields In-Reply-To: <000001c3d565$ae8ee780$8b194244@hargrove.internal> References: <42620.12.3.132.98.1073510511.squirrel@heck.bay9.com> <000001c3d565$ae8ee780$8b194244@hargrove.internal> Message-ID: <42634.12.3.132.98.1073512053.squirrel@heck.bay9.com> thanks a lot Doris, thats exactly what i needed > Try it this way -- 0 AS [Insider Flag], 0 AS [Sex Code], 0 AS [Race > Code] > > And replace the 0 with whatever default number you want... > > Doris Manning > Database Administrator > Hargrove Inc. > www.hargroveinc.com > > > -----Original Message----- > From: accessd-bounces at databaseadvisors.com > [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of > Oleg_123 at xuppa.com > Sent: Wednesday, January 07, 2004 4:22 PM > To: accessd at databaseadvisors.com > Subject: [AccessD] make table query with empy fields > > > How do I create empty fields in make table query ? > I tried doing it this way -- [Expr1] AS [Insider Flag], [Expr1] AS [Sex > Code], [Expr1] AS [Race Code], but this prompts me for what Expr1 is, > also can I do it so it'l numeric field instead of text ? > > > ----------------------------------------- > Get Breaking News from CNN, ABC, NBC, CBS Now. > http://www.xuppa.com/news/?link=webmail > > > _______________________________________________ > 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 ----------------------------------------- Get Breaking News from CNN, ABC, NBC, CBS Now. http://www.xuppa.com/news/?link=webmail From selina at easydatabases.com.au Wed Jan 7 19:18:59 2004 From: selina at easydatabases.com.au (Selina Iddon) Date: Thu, 8 Jan 2004 11:18:59 +1000 Subject: [AccessD] Field - Can Grow - on a Form References: Message-ID: <003801c3d585$65de9b00$6465000a@venus> Hi Amanda The 'can grow' for forms only works (expands) when you go to print, not in normal view. Cheers Selina ----- Original Message ----- From: "Amanda Allen" To: Sent: Thursday, January 08, 2004 12:13 AM Subject: [AccessD] Field - Can Grow - on a Form > I'm using Access 2002 and I can't seem to get the fields on a form to > grow to fit the size needed for the data in the table. For instance, > most of the data is about 50 characters but there are some that are > about 150 characters. Instead of wasting space on the form for the > larger data, I would like the field to grow on the form. I selected > Can Grow in the properties of the field, but it still does not allow > the field to grow on the form. > > * Amanda > > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com > > From Subscriptions at servicexp.com Wed Jan 7 20:31:36 2004 From: Subscriptions at servicexp.com (Robert Gracie) Date: Wed, 7 Jan 2004 21:31:36 -0500 Subject: [AccessD] Encryption In-Reply-To: <982764405.20040107084523@cactus.dk> Message-ID: Thanks Guys, I'll check it out!! Robert Gracie -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Gustav Brock Sent: Wednesday, January 07, 2004 2:45 AM To: Access Developers discussion and problem solving Subject: Re: [AccessD] Encryption Hi Robert and Stuart Lookup my message: Re: [AccessD] Encryption/decryption (was: Registration Techniques) from 2002-09-18 for a complete high-speed PC1 Access 97 module. Should work for A2000/2003 as well. That said, a PowerBasic dll would probably run way faster ... /gustav >> Instead of re-inventing the wheel here, does anyone have some code that >> will allow me to pull the body of an e-mail (or a very large string even) >> and encrypt it with out first writing it to a text file? I've tried three >> different cipher routines, but they all want to break up the String. So I'm >> left with only the first section in the string.... >> > How large is large? > Here are some routines that use PC1 (see > http://membres.lycos.fr/pc1/) > Theorectically, it will handle any length of string up to 1/2 the > maximum allowable string length for your development environment. > (The encryted string is always exactly twice as large as the > original.) > This VBA versions works fairly well up to about 30 - 40K on my PC > (1 -2 secs to encode, virtually instantaneous decode), but as the > original string gets bigger, it takes *a lot* longer to encrypt. > (70K = 12 secs, 80K = 22 secs, 90K = 38 secs etc but decrypt is still > only about 3 secs at 90K). > If you want to use larger strings, I can let you have a DLL version > of this which I built in PowerBasic. It is *much* faster _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From dfe at nudgeeinternational.com Wed Jan 7 22:33:34 2004 From: dfe at nudgeeinternational.com (David Fenton) Date: Thu, 8 Jan 2004 14:33:34 +1000 Subject: [AccessD] RE: DoCmd.RunSQL or CurrentDb.Execute (Solved) Message-ID: Hi Folks, Thank you to Stuart and Steve for your help on this one. It kind of confirmed what I already knew and I think I like the CurrentDb.Execute. I have been switching off errors, using the DoCmd and switching errors back on. I leave errors on for testing purposes to eliminate as many SQL errors as I can, but if it is error free then I think the CurrentDb method will suit me better. Thanks again for your advice. Cheers David Fenton Brisbane Australia ............................................. Message: 14 Date: Tue, 6 Jan 2004 17:42:40 -0500 From: "Developer" Subject: RE: [AccessD] DoCmd.RunSQL or CurrentDb.Execute? To: "'Access Developers discussion and problem solving'" Message-ID: <004601c3d4a6$643bdbd0$7001a8c0 at COA3> Content-Type: text/plain; charset="us-ascii" Currentdb.execute will bypass the warnings if they are on, Docmd will still have the warnings. Currentdb has been faster for me, but I havent benchmarked anything specific. Hth Steve Message: 15 Date: Wed, 07 Jan 2004 08:40:19 +1000 From: "Stuart McLachlan" Subject: Re: [AccessD] DoCmd.RunSQL or CurrentDb.Execute? To: Access Developers discussion and problem solving Message-ID: <3FFBC5F3.22232.16B2F9 at localhost> Content-Type: text/plain; charset=US-ASCII On 7 Jan 2004 at 8:22, David Fenton wrote: With DoCmd.RunSQL, you get the standard messagebox 'You are about to...." If you want the update to happen without any user action, use CurrentDB.Execute. If you want the warning and the user to have the opportunity to cancel the action, user DoCmd.RunSQL Note that "DoCmd.SetWarnings False DoCmd.RunSQL strSQL DoCmdSetWarnings True" suppresses the update notice, but also has the effect of suppressing any error messages generated by a problem in strSQL. -- Lexacorp Ltd http://www.lexacorp.com.pg Information Technology Consultancy, Software Development,System Support. ****************************** From kost36 at otenet.gr Wed Jan 7 23:27:11 2004 From: kost36 at otenet.gr (Kostas Konstantinidis) Date: Thu, 8 Jan 2004 07:27:11 +0200 Subject: [AccessD] e-mailing to all the people at the same time References: <2F8793082E00D4119A1700B0D0216BF8022276DA@main2.marlow.com> Message-ID: <007a01c3d5a8$123d86f0$0100a8c0@kost36> Hi all, Is it possible to send a common e-mail message at the same time, to all the e-mail addresses which incloude into a field? The field design is "hyperling" and there I am keeping only e-mail addresses Thank's a lot Kostas Konstantinidis From martyconnelly at shaw.ca Thu Jan 8 00:23:25 2004 From: martyconnelly at shaw.ca (MartyConnelly) Date: Wed, 07 Jan 2004 22:23:25 -0800 Subject: [AccessD] e-mailing to all the people at the same time References: <2F8793082E00D4119A1700B0D0216BF8022276DA@main2.marlow.com> <007a01c3d5a8$123d86f0$0100a8c0@kost36> Message-ID: <3FFCF75D.1060200@shaw.ca> Well here is a starter email code using outlook, if you are using outlook see methods of accessing an outlook contact list at http://www.slipstick.com If you are using different mail method or server, you will have to tell us. Sub SendMessageTo(sEmailAddress As String, sMessageHdr As String, sMessage As String) Dim objOutlook As Outlook.Application Dim objOutlookMsg As Outlook.MailItem Dim objOutlookRecip As Outlook.Recipient ' Create the Outlook session. Set objOutlook = CreateObject("Outlook.Application") ' Create the message. Set objOutlookMsg = objOutlook.CreateItem(olMailItem) With objOutlookMsg ' Add the To recipient(s) to the message. Set objOutlookRecip = .Recipients.Add(sEmailAddress) ' Set objOutlookRecip = .Recipients.Add(sEmailAddress1) ' Set objOutlookRecip = .Recipients.Add(sEmailAddress2) objOutlookRecip.Type = olTo ' Set the Subject, Body, and Importance of the message. .Subject = sMessageHdr .Body = sMessage .Importance = olImportanceHigh 'High importance ' Resolve each Recipient's name. For Each objOutlookRecip In .Recipients objOutlookRecip.Resolve Next .Send End With Set objOutlook = Nothing End Sub Kostas Konstantinidis wrote: >Hi all, >Is it possible to send a common e-mail message at the same time, to all the >e-mail addresses which incloude into a field? >The field design is "hyperling" and there I am keeping only e-mail addresses > >Thank's a lot >Kostas Konstantinidis > > >_______________________________________________ >AccessD mailing list >AccessD at databaseadvisors.com >http://databaseadvisors.com/mailman/listinfo/accessd >Website: http://www.databaseadvisors.com > > > -- Marty Connelly Victoria, B.C. Canada From Erwin.Craps at ithelps.be Thu Jan 8 01:49:24 2004 From: Erwin.Craps at ithelps.be (Erwin Craps - IT Helps) Date: Thu, 8 Jan 2004 08:49:24 +0100 Subject: [AccessD] e-mailing to all the people at the same time Message-ID: <46B976F2B698FF46A4FE7636509B22DF03D0D3@stekelbes.ithelps.local> Please note that for security reasons it's better to put the recipients (in case of mass mailing) in he BCC and not in the regular TO. I'm using slightly another method than the code suggested by Marty, but I supose you only need to change the objOutlookRecip.Type = olTo line in smething like objOutlookRecip.Type = olBcc It's advisable to put your (an) own e-mail address in the to field. Erwin -----Oorspronkelijk bericht----- Van: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] Namens MartyConnelly Verzonden: donderdag 8 januari 2004 7:23 Aan: Access Developers discussion and problem solving Onderwerp: Re: [AccessD] e-mailing to all the people at the same time Well here is a starter email code using outlook, if you are using outlook see methods of accessing an outlook contact list at http://www.slipstick.com If you are using different mail method or server, you will have to tell us. Sub SendMessageTo(sEmailAddress As String, sMessageHdr As String, sMessage As String) Dim objOutlook As Outlook.Application Dim objOutlookMsg As Outlook.MailItem Dim objOutlookRecip As Outlook.Recipient ' Create the Outlook session. Set objOutlook = CreateObject("Outlook.Application") ' Create the message. Set objOutlookMsg = objOutlook.CreateItem(olMailItem) With objOutlookMsg ' Add the To recipient(s) to the message. Set objOutlookRecip = .Recipients.Add(sEmailAddress) ' Set objOutlookRecip = .Recipients.Add(sEmailAddress1) ' Set objOutlookRecip = .Recipients.Add(sEmailAddress2) objOutlookRecip.Type = olTo ' Set the Subject, Body, and Importance of the message. .Subject = sMessageHdr .Body = sMessage .Importance = olImportanceHigh 'High importance ' Resolve each Recipient's name. For Each objOutlookRecip In .Recipients objOutlookRecip.Resolve Next .Send End With Set objOutlook = Nothing End Sub Kostas Konstantinidis wrote: >Hi all, >Is it possible to send a common e-mail message at the same time, to all the >e-mail addresses which incloude into a field? >The field design is "hyperling" and there I am keeping only e-mail addresses > >Thank's a lot >Kostas Konstantinidis > > >_______________________________________________ >AccessD mailing list >AccessD at databaseadvisors.com >http://databaseadvisors.com/mailman/listinfo/accessd >Website: http://www.databaseadvisors.com > > > -- Marty Connelly Victoria, B.C. Canada _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From ebarro at afsweb.com Thu Jan 8 02:04:54 2004 From: ebarro at afsweb.com (Eric Barro) Date: Thu, 8 Jan 2004 00:04:54 -0800 Subject: [AccessD] list all fields in a table In-Reply-To: <46B976F2B698FF46A4FE7636509B22DF03D0D3@stekelbes.ithelps.local> Message-ID: Does anyone have any VB code handy that enumerates all fields in a table? ex: Field1 Field2 Field3 etc... I just need a text list that I can copy and paste into an ASP page. --- Eric Barro Senior Systems Analyst Advanced Field Services (208) 772-7060 http://www.afsweb.com --- Outgoing mail is certified Virus Free. Checked by AVG anti-virus system (http://www.grisoft.com). Version: 6.0.555 / Virus Database: 347 - Release Date: 12/23/2003 From gustav at cactus.dk Thu Jan 8 02:21:20 2004 From: gustav at cactus.dk (Gustav Brock) Date: Thu, 8 Jan 2004 09:21:20 +0100 Subject: [AccessD] list all fields in a table In-Reply-To: References: Message-ID: <1123663477.20040108092120@cactus.dk> Hi Eric Look up "ListFields function" from Charlotte 2003-12-30. /gustav > Does anyone have any VB code handy that enumerates all fields in a table? > ex: > Field1 > Field2 > Field3 > etc... > I just need a text list that I can copy and paste into an ASP page. > --- > Eric Barro > Senior Systems Analyst > Advanced Field Services > (208) 772-7060 > http://www.afsweb.com From stephen at bondsoftware.co.nz Thu Jan 8 02:21:16 2004 From: stephen at bondsoftware.co.nz (Stephen Bond) Date: Thu, 08 Jan 2004 21:21:16 +1300 Subject: [AccessD] Access 2003 issue Message-ID: <70F3D727890C784291D8433E9C418F298F4C@server.bondsoftware.co.nz> Thanks Joshua - I got to the bottom of it ... eventually. I have queries which reference fields on a Form as criteria (criteria:Forms!Form1!field1). Many of these fields are on sub-forms, in fact worse than that, subforms of a form which is the Page in a Tab Control. Access 2003 queries seem to be extremely fussy how you reference these fields. You must have the precise syntax. So, where this worked previously (Forms!MainForm!SubForm!Field), now I must have (Forms!MainForm!SubForm.Form!Field) in order for the queries to ReQuery correctly in 2003. The new syntax also works in A2000. Stephen Bond > -----Original Message----- > From: Joshua B [mailto:lists at jbsolutions.com.au] > Sent: Wednesday, 31 December 2003 9:49 a.m. > To: Access Developers discussion and problem solving > Subject: Re: [AccessD] Access 2003 issue > > > Hello Stephen Bond, > > I wrote in a week ago with a similar problem (the thread was > titled "Calculated Field Error A2003" if you want to have a > look). One workaround (which I'm still not really happy > about, but seems to alleviate the Me.Requery problem) was to > use the syntax Me.Recordsource = Me.Recordsource, this seems > to work the same as a requery, minus the errors. Another > thing to look at is unchecking all the references, > compacting, and then rechecking them again. I havent had a > chance to try this one as yet, because my client is on > holidays, and I dont have A2003. The way it's looking at the > moment, I think I'll be doing my best to steer clear of 2003 > for a while. If you try the reference refreshing option, > could you let me know how you go? Thanks. > > ======= At 2003-12-31, 05:48:00 you wrote: ======= > > >I have an app that is Access 2000 MDB and it runs fine under > both A2000 and A2002, in A2000 format. > > > >Today I loaded it to run under Access 2003 and there is a > problem. It appears that the syntax 'Me.Requery' does not > work. The Me.Requery is in the After_Update event of a combo > that serves to filter the records appearing on the continuous > form. The form's RecordSource is a query with the combo > boxes referenced like this: > > > >Field:IIF(IsNull(Forms!etc!cboFilter),True,underlyingField=Fo > rms!etc!cboFilter) > >Criteria:True > > > >I can't see anything in KB. Because the combo is on a > subform of a form that's part of a Tab control, I'm going to > mess around with the way the combo is declared in the Query, > but this is shootin' in the dark stuff. > > > >BTW, I tried converting the app to Access 2003 format, but > nothing changed, the problem still exists. > > > >Any ideas? TIA > > > > > >Stephen Bond > >Otatara, South Island, New Zealand > >_______________________________________________ > >AccessD mailing list > >AccessD at databaseadvisors.com > >http://databaseadvisors.com/mailman/listinfo/accessd > >Website: http://www.databaseadvisors.com > > = = = = = = = = = = = = = = = = = = = = > > > Best regards. > Joshua B > lists at jbsolutions.com.au > www.jbsolutions.com.au > 2003-12-31 > > > > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com > From gustav at cactus.dk Thu Jan 8 02:40:35 2004 From: gustav at cactus.dk (Gustav Brock) Date: Thu, 8 Jan 2004 09:40:35 +0100 Subject: [AccessD] Access 2003 issue In-Reply-To: <70F3D727890C784291D8433E9C418F298F4C@server.bondsoftware.co.nz> References: <70F3D727890C784291D8433E9C418F298F4C@server.bondsoftware.co.nz> Message-ID: <634817847.20040108094035@cactus.dk> Hi Stephen > Thanks Joshua - I got to the bottom of it ... eventually. I have queries which reference fields on a Form as criteria (criteria:Forms!Form1!field1). Many of these fields are on sub-forms, in fact > worse than that, subforms of a form which is the Page in a Tab Control. > Access 2003 queries seem to be extremely fussy how you reference these fields. You must have the precise syntax. So, where this worked previously > (Forms!MainForm!SubForm!Field), now I must have > (Forms!MainForm!SubForm.Form!Field) > in order for the queries to ReQuery correctly in 2003. > The new syntax also works in A2000. "New"? This syntax has been in use since Access 1.0. It has caused many grey hairs - perhaps that's why MS allowed the simpler syntax but later regretted for some reason. /gustav From markamatte at hotmail.com Thu Jan 8 08:55:07 2004 From: markamatte at hotmail.com (Mark A Matte) Date: Thu, 08 Jan 2004 14:55:07 +0000 Subject: [AccessD] Using Charts Message-ID: Hello All, I'm building a db in A97 (or in 2k if there is a difference in charts)...the values I am displaying are currency...and the ranges for each data set are different...is there away to have the charts MAX and MIN set to the MAX and MIN of the dataset...without having to edit the chart everytime? Thanks, Mark _________________________________________________________________ Check your PC for viruses with the FREE McAfee online computer scan. http://clinic.mcafee.com/clinic/ibuy/campaign.asp?cid=3963 From askolits at ot.com Thu Jan 8 10:04:09 2004 From: askolits at ot.com (John Skolits) Date: Thu, 8 Jan 2004 11:04:09 -0500 Subject: [AccessD] Using Charts In-Reply-To: Message-ID: This is not an exact answer to your question, but may help. If you place a chart on a form and give the chart object thge following name: "oleChart1" You can change various items in the chart through code as follows: (Values are for example only) Me.oleChart1.Object.Application.Chart.Axes(1).MinorUnit = 5.5 Me.oleChart1.Object.Application.Chart.Axes(1).MajorUnit = 10 Me.oleChart1.Object.Application.Chart.Axes(1).BaseUnit = 2 Me.oleChart1.chartTitle.Text = "This is my chart's title" Me.oleChart1.Object.Application.Chart.Axes(2).MaximumScaleIsAuto = True Me.oleChart1.Object.Application.Chart.Axes(2).maximumscale = 1 --- 'To get a count of different collections in the graph me.oleChart1.seriesCollection.Count --- Search for the Graph9 help file (GRAPH9.CHM) on your PC. I think this is for Access 2000 but is pretty much the same for A97. It has examples of the other properties and method. -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Mark A Matte Sent: Thursday, January 08, 2004 9:55 AM To: accessd at databaseadvisors.com Subject: [AccessD] Using Charts Hello All, I'm building a db in A97 (or in 2k if there is a difference in charts)...the values I am displaying are currency...and the ranges for each data set are different...is there away to have the charts MAX and MIN set to the MAX and MIN of the dataset...without having to edit the chart everytime? Thanks, Mark _________________________________________________________________ Check your PC for viruses with the FREE McAfee online computer scan. http://clinic.mcafee.com/clinic/ibuy/campaign.asp?cid=3963 _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From CSPELL at jhuccp.org Thu Jan 8 10:21:12 2004 From: CSPELL at jhuccp.org (CYNTHIA SPELL) Date: Thu, 08 Jan 2004 11:21:12 -0500 Subject: [AccessD] Formatting time - minutes to hour:minutes Message-ID: I have an application that tracks the amount of time spent on projects. I used DateDiff on the entry form in order to get the number of minutes between the start and end times. The number is held in a field called "Time." In a report, I sum "Time" in order to get the total number of minutes. I need to show the total minutes in hh:mm format on the report. I tried to simply format the field in the report, but that didn't work. I tried dividing the minutes by 60, which gave me the number of hours and a remainder. I then multiplied the remainder by 60 and then divided by 100 to get the number of seconds. This is getting ugly.... Am I making this harder than it is?? Cindy From gustav at cactus.dk Thu Jan 8 10:41:45 2004 From: gustav at cactus.dk (Gustav Brock) Date: Thu, 8 Jan 2004 17:41:45 +0100 Subject: [AccessD] Formatting time - minutes to hour:minutes In-Reply-To: References: Message-ID: <5033688681.20040108174145@cactus.dk> Hi Cynthia If you wish to use the features of formatting a date/time-value you need to convert the amount of minutes to a timevalue - like here where the amount of time is in hours: Function TimeHour(ByVal curHMS As Currency) As Date ' Rounds and converts curHMS (number of hours as decimalnumber). ' Returns a time value, hh:nn:ss. ' Gustav Brock, Cactus Data ApS. ' 1999-08-12. Dim lngH As Long Dim lngM As Long Dim lngS As Long Dim curR As Currency ' No error handling needed. On Error Resume Next ' Round to two decimals, and skip number of days if curHMS > 24. ' If day count is needed, omit modulus like this: ' curHMS = (CLng(curHMS * 10000) / 100 * 36) ' Mod 86400 curHMS = (CLng(curHMS * 10000) / 100 * 36) Mod 86400 ' Calculate hours, minutes, and seconds. lngH = Int(curHMS / 3600) curR = curHMS - (lngH * 3600) lngM = Int(curR / 60) curR = curR - (lngM * 60) lngS = CInt(curR) ' Create time value. TimeHour = TimeSerial(lngH, lngM, lngS) End Function Or you could try to simply feed your amount of minutes directly: datTime = TimeSerial(0, lngMinutes, 0) That may work - haven't tested it though. /gustav > I have an application that tracks the amount of time spent on projects. I used DateDiff on the entry form in order to get the number of minutes between the start and end times. The number is held > in a field called "Time." In a report, I sum "Time" in order to get the total number of minutes. I need to show the total minutes in hh:mm format on the report. I tried to simply format the > field in the report, but that didn't work. > I tried dividing the minutes by 60, which gave me the number of hours and a remainder. I then multiplied the remainder by 60 and then divided by 100 to get the number of seconds. This is getting > ugly.... Am I making this harder than it is?? From Lambert.Heenan at AIG.com Thu Jan 8 11:06:52 2004 From: Lambert.Heenan at AIG.com (Heenan, Lambert) Date: Thu, 8 Jan 2004 12:06:52 -0500 Subject: [AccessD] Formatting time - minutes to hour:minutes Message-ID: <8B98F8EA48F8BA47A2F24E0D0AF40CF407AD7C49@xlivmbx12.aig.com> If there's more that 24 * 60 minutes then TimeSerial will spit out a date/time like this... ? TimeSerial(26,1,1) 12/31/1899 2:01:01 AM The problem that Cynthia is having is simply that she is interested in Time DURATION, but all the Time formatting and TimeSerial, DateDiff stuff is concerned with POINTS in time (a date and a time of day). "Ugly" or not, when dealing with durations (which have nothing to do with dates) you always have to do the math yourself to get hour minutes and seconds displayed. All you need is a simple function that given a number of minutes (or seconds) will do the math and formatting and return the appropriate STRING value for display of reports and forms. Lambert > -----Original Message----- > From: Gustav Brock [SMTP:gustav at cactus.dk] > Sent: Thursday, January 08, 2004 11:42 AM > To: Access Developers discussion and problem solving > Subject: Re: [AccessD] Formatting time - minutes to hour:minutes > > Hi Cynthia > > If you wish to use the features of formatting a date/time-value you > need to convert the amount of minutes to a timevalue - like here where > the amount of time is in hours: > > > > Function TimeHour(ByVal curHMS As Currency) As Date > > ' Rounds and converts curHMS (number of hours as decimalnumber). > ' Returns a time value, hh:nn:ss. > ' Gustav Brock, Cactus Data ApS. > ' 1999-08-12. > > Dim lngH As Long > Dim lngM As Long > Dim lngS As Long > Dim curR As Currency > > ' No error handling needed. > On Error Resume Next > > ' Round to two decimals, and skip number of days if curHMS > 24. > ' If day count is needed, omit modulus like this: > ' curHMS = (CLng(curHMS * 10000) / 100 * 36) ' Mod 86400 > curHMS = (CLng(curHMS * 10000) / 100 * 36) Mod 86400 > > ' Calculate hours, minutes, and seconds. > lngH = Int(curHMS / 3600) > curR = curHMS - (lngH * 3600) > lngM = Int(curR / 60) > curR = curR - (lngM * 60) > lngS = CInt(curR) > > ' Create time value. > TimeHour = TimeSerial(lngH, lngM, lngS) > > End Function > > > > Or you could try to simply feed your amount of minutes directly: > > datTime = TimeSerial(0, lngMinutes, 0) > > That may work - haven't tested it though. > > /gustav > > > > I have an application that tracks the amount of time spent on projects. > I used DateDiff on the entry form in order to get the number of minutes > between the start and end times. The number is held > > in a field called "Time." In a report, I sum "Time" in order to get the > total number of minutes. I need to show the total minutes in hh:mm > format on the report. I tried to simply format the > > field in the report, but that didn't work. > > > I tried dividing the minutes by 60, which gave me the number of hours > and a remainder. I then multiplied the remainder by 60 and then divided > by 100 to get the number of seconds. This is getting > > ugly.... Am I making this harder than it is?? > > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com From andy at minstersystems.co.uk Thu Jan 8 12:08:42 2004 From: andy at minstersystems.co.uk (Andy Lacey) Date: Thu, 8 Jan 2004 18:08:42 -0000 Subject: [AccessD] Using Charts In-Reply-To: Message-ID: <013601c3d612$735cc1c0$b274d0d5@minster33c3r25> Yes, get the min and max values of the dataset and then With objGraph .Axes(2).MinimumScale = dblMin .Axes(2).MaximumScale = dblMax End With Andy Lacey http://www.minstersystems.co.uk > -----Original Message----- > From: accessd-bounces at databaseadvisors.com > [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of > Mark A Matte > Sent: 08 January 2004 14:55 > To: accessd at databaseadvisors.com > Subject: [AccessD] Using Charts > > > Hello All, > > I'm building a db in A97 (or in 2k if there is a difference > in charts)...the > values I am displaying are currency...and the ranges for each > data set are > different...is there away to have the charts MAX and MIN set > to the MAX and > MIN of the dataset...without having to edit the chart everytime? > > Thanks, > > Mark > > _________________________________________________________________ > Check your PC for viruses with the FREE McAfee online computer scan. > http://clinic.mcafee.com/clinic/ibuy/campaign.asp?cid=3963 > > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/a> ccessd > Website: > http://www.databaseadvisors.com > > From gustav at cactus.dk Thu Jan 8 12:15:52 2004 From: gustav at cactus.dk (Gustav Brock) Date: Thu, 8 Jan 2004 19:15:52 +0100 Subject: [AccessD] Formatting time - minutes to hour:minutes In-Reply-To: <8B98F8EA48F8BA47A2F24E0D0AF40CF407AD7C49@xlivmbx12.aig.com> References: <8B98F8EA48F8BA47A2F24E0D0AF40CF407AD7C49@xlivmbx12.aig.com> Message-ID: <1639335571.20040108191552@cactus.dk> Hi Lambert > If there's more that 24 * 60 minutes then TimeSerial will spit out a > date/time like this... > ? TimeSerial(26,1,1) > 12/31/1899 2:01:01 AM Of course, that's why I included the TimeHour() function. If you wish to count more than 24 hours, here's a quick solution for seconds. One line (no line break): = Format(622081 \ 3600, "00:") & Format((622081 Mod 3600) \ 60, "00:") & Format(622081 Mod 60, "00") The backslash rounds down, thus this will return a string: 172:48:01 > The problem that Cynthia is having is simply that she is interested in Time > DURATION, but all the Time formatting and TimeSerial, DateDiff stuff is > concerned with POINTS in time (a date and a time of day). > "Ugly" or not, when dealing with durations (which have nothing to do with > dates) you always have to do the math yourself to get hour minutes and > seconds displayed. All you need is a simple function that given a number of > minutes (or seconds) will do the math and formatting and return the > appropriate STRING value for display of reports and forms. For the "time duration" that is right. However, if you create a pseudo timevalue (a time from Access' time "zero"), you have the Format() function and all other formatting capabilities of Access ready at hand - thus you eliminate the need to create even a simple function. For "always do the math yourself" I see no reason to struggle with that; DateDiff() works fine except for a minor bug in the week count for some leap years. /gustav >> If you wish to use the features of formatting a date/time-value you >> need to convert the amount of minutes to a timevalue - like here where >> the amount of time is in hours: >> >> >> >> Function TimeHour(ByVal curHMS As Currency) As Date >> >> ' Rounds and converts curHMS (number of hours as decimalnumber). >> ' Returns a time value, hh:nn:ss. >> ' Gustav Brock, Cactus Data ApS. >> ' 1999-08-12. >> >> Dim lngH As Long >> Dim lngM As Long >> Dim lngS As Long >> Dim curR As Currency >> >> ' No error handling needed. >> On Error Resume Next >> >> ' Round to two decimals, and skip number of days if curHMS > 24. >> ' If day count is needed, omit modulus like this: >> ' curHMS = (CLng(curHMS * 10000) / 100 * 36) ' Mod 86400 >> curHMS = (CLng(curHMS * 10000) / 100 * 36) Mod 86400 >> >> ' Calculate hours, minutes, and seconds. >> lngH = Int(curHMS / 3600) >> curR = curHMS - (lngH * 3600) >> lngM = Int(curR / 60) >> curR = curR - (lngM * 60) >> lngS = CInt(curR) >> >> ' Create time value. >> TimeHour = TimeSerial(lngH, lngM, lngS) >> >> End Function >> >> >> >> Or you could try to simply feed your amount of minutes directly: >> >> datTime = TimeSerial(0, lngMinutes, 0) >> >> That may work - haven't tested it though. >> >> /gustav >> >> >> > I have an application that tracks the amount of time spent on projects. >> I used DateDiff on the entry form in order to get the number of minutes >> between the start and end times. The number is held >> > in a field called "Time." In a report, I sum "Time" in order to get the >> total number of minutes. I need to show the total minutes in hh:mm >> format on the report. I tried to simply format the >> > field in the report, but that didn't work. >> >> > I tried dividing the minutes by 60, which gave me the number of hours >> and a remainder. I then multiplied the remainder by 60 and then divided >> by 100 to get the number of seconds. This is getting >> > ugly.... Am I making this harder than it is?? From Lambert.Heenan at AIG.com Thu Jan 8 12:36:43 2004 From: Lambert.Heenan at AIG.com (Heenan, Lambert) Date: Thu, 8 Jan 2004 13:36:43 -0500 Subject: [AccessD] Formatting time - minutes to hour:minutes Message-ID: <8B98F8EA48F8BA47A2F24E0D0AF40CF407AD7C4C@xlivmbx12.aig.com> But your TimeHour function returns a Date data type, and it uses TimeSerial to generate the return value, so once again, if your input value is more the 24 * 60 minutes then you will get back a nonsense date and time value. I repeat, if you are interesting in time durations then you need to work with numerical values, not Date/Time values. The Access Date/Time data type is inherently tied to the concept of a date - a point on the time line, which has nothing to do with the idea of a duration. This is why DateDiff returns a Long value, not some kind of date value. "If you wish to count more than 24 hours, here's a quick solution for seconds. One line (no line break): = Format(622081 \ 3600, "00:") & Format((622081 Mod 3600) \ 60, "00:") & Format(622081 Mod 60, "00") " Exactly, this is just the type of code you would put in a custom function to format durations so they display as hr:min:sec. Why type all that code each time you want to format a duration (like 62,2081 seconds) when you can just call a function - FormatAsTime(622081) ???? Lambert > -----Original Message----- > From: Gustav Brock [SMTP:gustav at cactus.dk] > Sent: Thursday, January 08, 2004 1:16 PM > To: Access Developers discussion and problem solving > Subject: Re: [AccessD] Formatting time - minutes to hour:minutes > > Hi Lambert > > > If there's more that 24 * 60 minutes then TimeSerial will spit out a > > date/time like this... > > > ? TimeSerial(26,1,1) > > 12/31/1899 2:01:01 AM > > Of course, that's why I included the TimeHour() function. > If you wish to count more than 24 hours, here's a quick solution for > seconds. One line (no line break): > > = Format(622081 \ 3600, "00:") & > Format((622081 Mod 3600) \ 60, "00:") & > Format(622081 Mod 60, "00") > > The backslash rounds down, thus this will return a string: > 172:48:01 > > > The problem that Cynthia is having is simply that she is interested in > Time > > DURATION, but all the Time formatting and TimeSerial, DateDiff stuff is > > concerned with POINTS in time (a date and a time of day). > > > "Ugly" or not, when dealing with durations (which have nothing to do > with > > dates) you always have to do the math yourself to get hour minutes and > > seconds displayed. All you need is a simple function that given a number > of > > minutes (or seconds) will do the math and formatting and return the > > appropriate STRING value for display of reports and forms. > > For the "time duration" that is right. However, if you create a pseudo > timevalue (a time from Access' time "zero"), you have the Format() > function and all other formatting capabilities of Access ready at hand > - thus you eliminate the need to create even a simple function. > > For "always do the math yourself" I see no reason to struggle with > that; DateDiff() works fine except for a minor bug in the week count > for some leap years. > > /gustav > > > >> If you wish to use the features of formatting a date/time-value you > >> need to convert the amount of minutes to a timevalue - like here where > >> the amount of time is in hours: > >> > >> > >> > >> Function TimeHour(ByVal curHMS As Currency) As Date > >> > >> ' Rounds and converts curHMS (number of hours as decimalnumber). > >> ' Returns a time value, hh:nn:ss. > >> ' Gustav Brock, Cactus Data ApS. > >> ' 1999-08-12. > >> > >> Dim lngH As Long > >> Dim lngM As Long > >> Dim lngS As Long > >> Dim curR As Currency > >> > >> ' No error handling needed. > >> On Error Resume Next > >> > >> ' Round to two decimals, and skip number of days if curHMS > 24. > >> ' If day count is needed, omit modulus like this: > >> ' curHMS = (CLng(curHMS * 10000) / 100 * 36) ' Mod 86400 > >> curHMS = (CLng(curHMS * 10000) / 100 * 36) Mod 86400 > >> > >> ' Calculate hours, minutes, and seconds. > >> lngH = Int(curHMS / 3600) > >> curR = curHMS - (lngH * 3600) > >> lngM = Int(curR / 60) > >> curR = curR - (lngM * 60) > >> lngS = CInt(curR) > >> > >> ' Create time value. > >> TimeHour = TimeSerial(lngH, lngM, lngS) > >> > >> End Function > >> > >> > >> > >> Or you could try to simply feed your amount of minutes directly: > >> > >> datTime = TimeSerial(0, lngMinutes, 0) > >> > >> That may work - haven't tested it though. > >> > >> /gustav > >> > >> > >> > I have an application that tracks the amount of time spent on > projects. > >> I used DateDiff on the entry form in order to get the number of minutes > >> between the start and end times. The number is held > >> > in a field called "Time." In a report, I sum "Time" in order to get > the > >> total number of minutes. I need to show the total minutes in hh:mm > >> format on the report. I tried to simply format the > >> > field in the report, but that didn't work. > >> > >> > I tried dividing the minutes by 60, which gave me the number of hours > >> and a remainder. I then multiplied the remainder by 60 and then > divided > >> by 100 to get the number of seconds. This is getting > >> > ugly.... Am I making this harder than it is?? > > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com From markamatte at hotmail.com Thu Jan 8 12:44:49 2004 From: markamatte at hotmail.com (Mark A Matte) Date: Thu, 08 Jan 2004 18:44:49 +0000 Subject: [AccessD] Formatting time - minutes to hour:minutes Message-ID: Cindy, I wrote the following to calculate Minutes and Seconds...with a few changes...you could use it to calculate Hours and Minutes. I first calculate the SECONDS...then use a loop that increments a count by 1...multiply the counter by 60 and check againts SECONDS...when the Counter*60 is greater than SECONDS...Counter-1 = MINUTES and SECONDS-((counter-1)*60)=LeftOverSECONDS Hope it helps... Mark A. Matte Private Sub cmdStop_Click() Me!EndDTTM = Now() Dim Seconds Dim RMmin Dim RMsec Seconds = DateDiff("s", Me!StartDTTM, Me!EndDTTM) Dim Check, Counter Check = True: Counter = 0 Do Counter = Counter + 1 If Counter * 60 > Seconds Then RMmin = Counter - 1 RMsec = Seconds - ((Counter - 1) * 60) Check = False Exit Do End If Loop Until Check = False Forms!frmRecords!RMCallLengthM.Value = RMmin Forms!frmRecords!RMCallLengthS.Value = RMsec DoCmd.close End Sub >From: Gustav Brock >Reply-To: Access Developers discussion and problem >solving >To: Access Developers discussion and problem >solving >Subject: Re: [AccessD] Formatting time - minutes to hour:minutes >Date: Thu, 8 Jan 2004 19:15:52 +0100 > >Hi Lambert > > > If there's more that 24 * 60 minutes then TimeSerial will spit out a > > date/time like this... > > > ? TimeSerial(26,1,1) > > 12/31/1899 2:01:01 AM > >Of course, that's why I included the TimeHour() function. >If you wish to count more than 24 hours, here's a quick solution for >seconds. One line (no line break): > > = Format(622081 \ 3600, "00:") & > Format((622081 Mod 3600) \ 60, "00:") & > Format(622081 Mod 60, "00") > >The backslash rounds down, thus this will return a string: > 172:48:01 > > > The problem that Cynthia is having is simply that she is interested in >Time > > DURATION, but all the Time formatting and TimeSerial, DateDiff stuff is > > concerned with POINTS in time (a date and a time of day). > > > "Ugly" or not, when dealing with durations (which have nothing to do >with > > dates) you always have to do the math yourself to get hour minutes and > > seconds displayed. All you need is a simple function that given a number >of > > minutes (or seconds) will do the math and formatting and return the > > appropriate STRING value for display of reports and forms. > >For the "time duration" that is right. However, if you create a pseudo >timevalue (a time from Access' time "zero"), you have the Format() >function and all other formatting capabilities of Access ready at hand >- thus you eliminate the need to create even a simple function. > >For "always do the math yourself" I see no reason to struggle with >that; DateDiff() works fine except for a minor bug in the week count >for some leap years. > >/gustav > > > >> If you wish to use the features of formatting a date/time-value you > >> need to convert the amount of minutes to a timevalue - like here where > >> the amount of time is in hours: > >> > >> > >> > >> Function TimeHour(ByVal curHMS As Currency) As Date > >> > >> ' Rounds and converts curHMS (number of hours as decimalnumber). > >> ' Returns a time value, hh:nn:ss. > >> ' Gustav Brock, Cactus Data ApS. > >> ' 1999-08-12. > >> > >> Dim lngH As Long > >> Dim lngM As Long > >> Dim lngS As Long > >> Dim curR As Currency > >> > >> ' No error handling needed. > >> On Error Resume Next > >> > >> ' Round to two decimals, and skip number of days if curHMS > 24. > >> ' If day count is needed, omit modulus like this: > >> ' curHMS = (CLng(curHMS * 10000) / 100 * 36) ' Mod 86400 > >> curHMS = (CLng(curHMS * 10000) / 100 * 36) Mod 86400 > >> > >> ' Calculate hours, minutes, and seconds. > >> lngH = Int(curHMS / 3600) > >> curR = curHMS - (lngH * 3600) > >> lngM = Int(curR / 60) > >> curR = curR - (lngM * 60) > >> lngS = CInt(curR) > >> > >> ' Create time value. > >> TimeHour = TimeSerial(lngH, lngM, lngS) > >> > >> End Function > >> > >> > >> > >> Or you could try to simply feed your amount of minutes directly: > >> > >> datTime = TimeSerial(0, lngMinutes, 0) > >> > >> That may work - haven't tested it though. > >> > >> /gustav > >> > >> > >> > I have an application that tracks the amount of time spent on >projects. > >> I used DateDiff on the entry form in order to get the number of minutes > >> between the start and end times. The number is held > >> > in a field called "Time." In a report, I sum "Time" in order to get >the > >> total number of minutes. I need to show the total minutes in hh:mm > >> format on the report. I tried to simply format the > >> > field in the report, but that didn't work. > >> > >> > I tried dividing the minutes by 60, which gave me the number of hours > >> and a remainder. I then multiplied the remainder by 60 and then >divided > >> by 100 to get the number of seconds. This is getting > >> > ugly.... Am I making this harder than it is?? > >_______________________________________________ >AccessD mailing list >AccessD at databaseadvisors.com >http://databaseadvisors.com/mailman/listinfo/accessd >Website: http://www.databaseadvisors.com _________________________________________________________________ Check your PC for viruses with the FREE McAfee online computer scan. http://clinic.mcafee.com/clinic/ibuy/campaign.asp?cid=3963 From rl_stewart at highstream.net Thu Jan 8 13:08:07 2004 From: rl_stewart at highstream.net (Robert L. Stewart) Date: Thu, 08 Jan 2004 13:08:07 -0600 Subject: [AccessD] Re: Formatting time - minutes to hour:minutes In-Reply-To: <200401081800.i08I0lE10433@databaseadvisors.com> Message-ID: <5.1.0.14.2.20040108125804.02963678@pop3.highstream.net> Try this Function HoursMinutes(ByVal intMinutes As Integer) As String ' This function will take a number of minutes and ' convert it into the format HH:MM Dim intHrs As Integer Dim strReturn As String Dim intMinuteRemainder As Integer intHrs = Int(intMinutes / 60) strReturn = CStr(intHrs) & ":" intMinuteRemainder = intMinutes Mod 60 strReturn = strReturn & IIf(Len(CStr(intMinuteRemainder)) < 2, "0" & CStr(intMinuteRemainder), CStr(intMinuteRemainder)) HoursMinutes = strReturn End Function Watch out for line wrapping. Robert At 12:00 PM 1/8/2004 -0600, you wrote: >Date: Thu, 08 Jan 2004 11:21:12 -0500 >From: CYNTHIA SPELL >Subject: [AccessD] Formatting time - minutes to hour:minutes >To: accessd at databaseadvisors.com >Message-ID: >Content-Type: text/plain; charset=US-ASCII > >I have an application that tracks the amount of time spent on projects. I >used DateDiff on the entry form in order to get the number of minutes >between the start and end times. The number is held in a field called >"Time." In a report, I sum "Time" in order to get the total number of >minutes. I need to show the total minutes in hh:mm format on the >report. I tried to simply format the field in the report, but that didn't >work. > >I tried dividing the minutes by 60, which gave me the number of hours and >a remainder. I then multiplied the remainder by 60 and then divided by >100 to get the number of seconds. This is getting ugly.... Am I making >this harder than it is?? From jwcolby at colbyconsulting.com Thu Jan 8 13:35:52 2004 From: jwcolby at colbyconsulting.com (John W. Colby) Date: Thu, 8 Jan 2004 14:35:52 -0500 Subject: [AccessD] closing instances of the same form Message-ID: I need to open a given form multiple times, but I need to be able to close a specific instance of the form. Does anyone know how to do this. Normally you do a docmd.close acform, formname - however if you open the same form twice then the second form isn't called formname anymore. What is it called? John W. Colby www.ColbyConsulting.com From jwcolby at colbyconsulting.com Thu Jan 8 13:45:39 2004 From: jwcolby at colbyconsulting.com (John W. Colby) Date: Thu, 8 Jan 2004 14:45:39 -0500 Subject: [AccessD] closing instances of the same form In-Reply-To: Message-ID: Never mind. Apparently you have to reference these things in order to keep them in existence. Set that reference to nothing and they close. Sorry for the ring. John W. Colby www.ColbyConsulting.com -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of John W. Colby Sent: Thursday, January 08, 2004 2:36 PM To: AccessD Subject: [AccessD] closing instances of the same form I need to open a given form multiple times, but I need to be able to close a specific instance of the form. Does anyone know how to do this. Normally you do a docmd.close acform, formname - however if you open the same form twice then the second form isn't called formname anymore. What is it called? John W. Colby www.ColbyConsulting.com _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From DWUTKA at marlow.com Thu Jan 8 13:49:30 2004 From: DWUTKA at marlow.com (DWUTKA at marlow.com) Date: Thu, 8 Jan 2004 13:49:30 -0600 Subject: [AccessD] closing instances of the same form Message-ID: <2F8793082E00D4119A1700B0D0216BF8022276F9@main2.marlow.com> >From within the same form? Or from outside? >From within, I think you can just put DoCmd.Close Me I may be confusing that with Unload Me from VB though. Drew -----Original Message----- From: John W. Colby [mailto:jwcolby at colbyconsulting.com] Sent: Thursday, January 08, 2004 1:36 PM To: AccessD Subject: [AccessD] closing instances of the same form I need to open a given form multiple times, but I need to be able to close a specific instance of the form. Does anyone know how to do this. Normally you do a docmd.close acform, formname - however if you open the same form twice then the second form isn't called formname anymore. What is it called? John W. Colby www.ColbyConsulting.com _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From DWUTKA at marlow.com Thu Jan 8 13:59:04 2004 From: DWUTKA at marlow.com (DWUTKA at marlow.com) Date: Thu, 8 Jan 2004 13:59:04 -0600 Subject: [AccessD] OT: ASP Oddity Message-ID: <2F8793082E00D4119A1700B0D0216BF8022276FA@main2.marlow.com> Sorry for the OT post, but I ran into this last month, and was just flabbergasted that this worked this way. I was doing an ASP sub-contract for my sister, for a jewelry company (http://edlevinjewelry.com) . In the HTML of some of the pages, I found stuff like this: <% If so.type="merchant" then %> This is a test <% End if%> It wasn't coded (or worded, obviously) like that, but that is the gist of it. There was an If Then clause, with regular old HTML in the middle. Sure enough, if the criteria isn't met, the HTML isn't displayed. I never realized (until I saw that), that you could do that. Up until now, I have always done something like this: <% If This=True Then response.write "Test" End if %> In that case, the ASP is writing out the HTML. In some cases, it doesn't make much of a difference. However, I write most of my HTML by hand, using the Microsoft Script Editor, which does a lot of autocompletion, and makes writing raw HTML a breeze. But when I had to put out conditional HTML, I lost all of the advantages of the editor, because I was putting the HTML into a string. What's odd, is I have never run across this in ASP documentation. Once again, sorry for the OT post, but I know there are several listers out there that are either starting out in ASP, or have been using it for a while, and hopefully, this will be helpful to ya'all. Just out of curiousity, did anyone else know this? Drew From Erwin.Craps at ithelps.be Thu Jan 8 15:47:48 2004 From: Erwin.Craps at ithelps.be (Erwin Craps - IT Helps) Date: Thu, 8 Jan 2004 22:47:48 +0100 Subject: [AccessD] closing instances of the same form Message-ID: <46B976F2B698FF46A4FE7636509B22DF03D0DB@stekelbes.ithelps.local> Hi John Something like this. I'm not sure for the new keyword, it's with or without it. Dim frmYourForm1 as FORM_YourForm Dim frmYourForm1 as FORM_YourForm Set frmYourForm1 = new form_yourform frmYourForm1.visible = true frmYourForm1.control = "blabla" Set frmYourForm2 = new form_yourform frmYourForm2.visible = true frmYourForm2.control = "blabla" Set frmYourForm1 = nothing Set frmYourForm2 = nothing Erwin -----Oorspronkelijk bericht----- Van: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] Namens John W. Colby Verzonden: donderdag 8 januari 2004 20:36 Aan: AccessD Onderwerp: [AccessD] closing instances of the same form I need to open a given form multiple times, but I need to be able to close a specific instance of the form. Does anyone know how to do this. Normally you do a docmd.close acform, formname - however if you open the same form twice then the second form isn't called formname anymore. What is it called? John W. Colby www.ColbyConsulting.com _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From caa at highway.com.br Fri Jan 9 03:43:59 2004 From: caa at highway.com.br (Carlos Alberto Alves) Date: Fri, 09 Jan 2004 07:43:59 -0200 Subject: [AccessD] OT - Test Message-ID: Test -- ************************************** * Carlos Alberto Alves * * Child Neurologist * * Systems Analyst/Programmer * * Rio de Janeiro, Brazil * * mailto:caa at highway.com.br * ************************************** From paul.hartland at fsmail.net Fri Jan 9 04:24:13 2004 From: paul.hartland at fsmail.net (paul.hartland at fsmail.net) Date: Fri, 9 Jan 2004 11:24:13 +0100 (CET) Subject: [AccessD] Multiple-step operation generated errors - check each status value Message-ID: <21241280.1073643853716.JavaMail.www@wwinf3002> To all, I have a Visual Basic 6 FE which is connecting to a SQL Server 7.0 BE. One of my fields is called EthnicOrigin which is a TinyInt data type, which also allows Null. The control on the form is a DataCombo, with the list field being Ethnicity and the BoundColumn being EthnicityID. When a user selects an Ethnicity all is well no problem with updating etc as the EthnicityID is entered into the Field and the DataCombo display the Ethnicity. If the user deletes the entry from EthnicOrigin then when the record tries to update I get the error Multiple-step operation generated errors - check each status value Below is the code for updating: With rsPersonnel If (frmOrrPersonnel.PVEthnic <> "") Then .Fields("EthnicOrigin") = frmOrrPersonnel.PVEthnic.BoundText Else .Fields("EthnicOrigin") = 0 End If .Update End With Can anyone tell me what I am doing wrong ? Thanks in advance for any help as this is really starting to frustrate me. Paul Hartland Freeserve AnyTime - HALF PRICE for the first 3 months - Save ?7.50 a month www.freeserve.com/anytime From paul.hartland at fsmail.net Fri Jan 9 04:24:13 2004 From: paul.hartland at fsmail.net (paul.hartland at fsmail.net) Date: Fri, 9 Jan 2004 11:24:13 +0100 (CET) Subject: [AccessD] [dba-VB] Multiple-step operation generated errors - check each status value Message-ID: <21241280.1073643853716.JavaMail.www@wwinf3002> To all, I have a Visual Basic 6 FE which is connecting to a SQL Server 7.0 BE. One of my fields is called EthnicOrigin which is a TinyInt data type, which also allows Null. The control on the form is a DataCombo, with the list field being Ethnicity and the BoundColumn being EthnicityID. When a user selects an Ethnicity all is well no problem with updating etc as the EthnicityID is entered into the Field and the DataCombo display the Ethnicity. If the user deletes the entry from EthnicOrigin then when the record tries to update I get the error Multiple-step operation generated errors - check each status value Below is the code for updating: With rsPersonnel If (frmOrrPersonnel.PVEthnic <> "") Then .Fields("EthnicOrigin") = frmOrrPersonnel.PVEthnic.BoundText Else .Fields("EthnicOrigin") = 0 End If .Update End With Can anyone tell me what I am doing wrong ? Thanks in advance for any help as this is really starting to frustrate me. Paul Hartland Freeserve AnyTime - HALF PRICE for the first 3 months - Save ?7.50 a month www.freeserve.com/anytime _______________________________________________ dba-VB mailing list dba-VB at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/dba-vb http://www.databaseadvisors.com From gustav at cactus.dk Fri Jan 9 04:11:25 2004 From: gustav at cactus.dk (Gustav Brock) Date: Fri, 9 Jan 2004 11:11:25 +0100 Subject: [AccessD] Formatting time - minutes to hour:minutes In-Reply-To: References: Message-ID: <1497854063.20040109111125@cactus.dk> Hi Mark Are you aware that you can replace your creative counting loop with a boring division ..? /gustav > I wrote the following to calculate Minutes and Seconds...with a few > changes...you could use it to calculate Hours and Minutes. I first > calculate the SECONDS...then use a loop that increments a count by > 1...multiply the counter by 60 and check againts SECONDS...when the > Counter*60 is greater than SECONDS...Counter-1 = MINUTES and > SECONDS-((counter-1)*60)=LeftOverSECONDS > Hope it helps... > Mark A. Matte > Private Sub cmdStop_Click() > Me!EndDTTM = Now() > Dim Seconds > Dim RMmin > Dim RMsec > Seconds = DateDiff("s", Me!StartDTTM, Me!EndDTTM) > Dim Check, Counter > Check = True: Counter = 0 > Do > Counter = Counter + 1 > If Counter * 60 > Seconds Then > RMmin = Counter - 1 > RMsec = Seconds - ((Counter - 1) * 60) > Check = False > Exit Do > End If > Loop Until Check = False > Forms!frmRecords!RMCallLengthM.Value = RMmin > Forms!frmRecords!RMCallLengthS.Value = RMsec > DoCmd.close > End Sub From gustav at cactus.dk Fri Jan 9 04:47:07 2004 From: gustav at cactus.dk (Gustav Brock) Date: Fri, 9 Jan 2004 11:47:07 +0100 Subject: [AccessD] Formatting time - minutes to hour:minutes In-Reply-To: <8B98F8EA48F8BA47A2F24E0D0AF40CF407AD7C4C@xlivmbx12.aig.com> References: <8B98F8EA48F8BA47A2F24E0D0AF40CF407AD7C4C@xlivmbx12.aig.com> Message-ID: <1319995432.20040109114707@cactus.dk> Hi Lambert > But your TimeHour function returns a Date data type, and it uses TimeSerial > to generate the return value, so once again, if your input value is more the > 24 * 60 minutes then you will get back a nonsense date and time value. How do you figure this out? It will not - unless you specifically wish to by modifying a code line as explained in the in-line comment. Have in mind, please, that the TimeHour() function is not meant to represent some kind of "universal" function. It was made for summing time intervals which would never add to one day. There a many cases for this in real life, starting/stopping engines, billable hours etc. where you always group by date. Cynthia's need could very well be similar. > I repeat, if you are interesting in time durations then you need to work > with numerical values, not Date/Time values. The Access Date/Time data type > is inherently tied to the concept of a date - a point on the time line, > which has nothing to do with the idea of a duration. This is why DateDiff > returns a Long value, not some kind of date value. I do understand you and if you look up the archives you will find several messages from me stating the same; in fact, I prefer this method if for nothing else that you get rounded values by, say, the second and prevents the mess you can experience when doing algebra with Doubles and Singles. However, if you shift a time interval calculated from two absolute time values (start and stop) so that the start time value is at zero (which is what DateSerial() and TimeSerial() do) then the time interval can be expressed by the time value of the stop time. This doesn't trun the time interval into a "time" but it allows you to use the date/time datatype which again will allow you to use the standard date/time formatting capabilities of Access; this may or may not be advantageous - that depends on many factors including your own preferences. /gustav > "If you wish to count more than 24 hours, here's a quick solution for > seconds. One line (no line break): > = Format(622081 \ 3600, "00:") & > Format((622081 Mod 3600) \ 60, "00:") & > Format(622081 Mod 60, "00") > " > Exactly, this is just the type of code you would put in a custom function to > format durations so they display as hr:min:sec. Why type all that code each > time you want to format a duration (like 62,2081 seconds) when you can just > call a function - FormatAsTime(622081) ???? > Lambert >> -----Original Message----- >> From: Gustav Brock [SMTP:gustav at cactus.dk] >> Sent: Thursday, January 08, 2004 1:16 PM >> To: Access Developers discussion and problem solving >> Subject: Re: [AccessD] Formatting time - minutes to hour:minutes >> >> Hi Lambert >> >> > If there's more that 24 * 60 minutes then TimeSerial will spit out a >> > date/time like this... >> >> > ? TimeSerial(26,1,1) >> > 12/31/1899 2:01:01 AM >> >> Of course, that's why I included the TimeHour() function. >> If you wish to count more than 24 hours, here's a quick solution for >> seconds. One line (no line break): >> >> = Format(622081 \ 3600, "00:") & >> Format((622081 Mod 3600) \ 60, "00:") & >> Format(622081 Mod 60, "00") >> >> The backslash rounds down, thus this will return a string: >> 172:48:01 >> >> > The problem that Cynthia is having is simply that she is interested in >> > Time >> > DURATION, but all the Time formatting and TimeSerial, DateDiff stuff is >> > concerned with POINTS in time (a date and a time of day). >> >> > "Ugly" or not, when dealing with durations (which have nothing to do >> > with >> > dates) you always have to do the math yourself to get hour minutes and >> > seconds displayed. All you need is a simple function that given a number >> > of >> > minutes (or seconds) will do the math and formatting and return the >> > appropriate STRING value for display of reports and forms. >> >> For the "time duration" that is right. However, if you create a pseudo >> timevalue (a time from Access' time "zero"), you have the Format() >> function and all other formatting capabilities of Access ready at hand >> - thus you eliminate the need to create even a simple function. >> >> For "always do the math yourself" I see no reason to struggle with >> that; DateDiff() works fine except for a minor bug in the week count >> for some leap years. >> >> /gustav >> >> >> >> If you wish to use the features of formatting a date/time-value you >> >> need to convert the amount of minutes to a timevalue - like here where >> >> the amount of time is in hours: >> >> >> >> >> >> >> >> Function TimeHour(ByVal curHMS As Currency) As Date >> >> >> >> ' Rounds and converts curHMS (number of hours as decimalnumber). >> >> ' Returns a time value, hh:nn:ss. >> >> ' Gustav Brock, Cactus Data ApS. >> >> ' 1999-08-12. >> >> >> >> Dim lngH As Long >> >> Dim lngM As Long >> >> Dim lngS As Long >> >> Dim curR As Currency >> >> >> >> ' No error handling needed. >> >> On Error Resume Next >> >> >> >> ' Round to two decimals, and skip number of days if curHMS > 24. >> >> ' If day count is needed, omit modulus like this: >> >> ' curHMS = (CLng(curHMS * 10000) / 100 * 36) ' Mod 86400 >> >> curHMS = (CLng(curHMS * 10000) / 100 * 36) Mod 86400 >> >> >> >> ' Calculate hours, minutes, and seconds. >> >> lngH = Int(curHMS / 3600) >> >> curR = curHMS - (lngH * 3600) >> >> lngM = Int(curR / 60) >> >> curR = curR - (lngM * 60) >> >> lngS = CInt(curR) >> >> >> >> ' Create time value. >> >> TimeHour = TimeSerial(lngH, lngM, lngS) >> >> >> >> End Function >> >> >> >> >> >> >> >> Or you could try to simply feed your amount of minutes directly: >> >> >> >> datTime = TimeSerial(0, lngMinutes, 0) >> >> >> >> That may work - haven't tested it though. >> >> >> >> /gustav >> >> >> >> >> >> > I have an application that tracks the amount of time spent on >> >> > projects. >> >> > I used DateDiff on the entry form in order to get the number of minutes >> >> > between the start and end times. The number is held >> >> > in a field called "Time." In a report, I sum "Time" in order to get >> >> > the >> >> > total number of minutes. I need to show the total minutes in hh:mm >> >> > format on the report. I tried to simply format the >> >> > field in the report, but that didn't work. >> >> >> >> > I tried dividing the minutes by 60, which gave me the number of hours >> >> > and a remainder. I then multiplied the remainder by 60 and then >> >> > divided by 100 to get the number of seconds. This is getting >> >> > ugly.... Am I making this harder than it is?? From andy at minstersystems.co.uk Fri Jan 9 04:53:18 2004 From: andy at minstersystems.co.uk (Andy Lacey) Date: Fri, 9 Jan 2004 10:53:18 +0000 Subject: [AccessD] Best API references Message-ID: <20040109105316.5324B2566A4@smithers.nildram.co.uk> What web site(s) do any of you use as a reference for API calls, and how to use them from VBA? Lambert recently sent me some useful tips on the use of SHBrowseFolder and others among you have given detailed info on other API calls. But how do you know this stuff? Where can I go to find out for myself? Sites like Dev's 'The Access Web' have some great stuff, but not a comprehensive list. -- Andy Lacey http://www.minstersystems.co.uk ________________________________________________ Message sent using UebiMiau 2.7.2 From viner at eunet.yu Fri Jan 9 05:29:27 2004 From: viner at eunet.yu (Ervin Brindza) Date: Fri, 9 Jan 2004 12:29:27 +0100 Subject: [AccessD] Best API references References: <20040109105316.5324B2566A4@smithers.nildram.co.uk> Message-ID: <003401c3d6a4$2e504920$0100a8c0@razvoj> Take a look at API GUIDE on http://www.mentalis.org E. ----- Original Message ----- From: "Andy Lacey" To: "Access Developers discussion and problem solving" Sent: 09 January, 2004 11:53 AM Subject: [AccessD] Best API references > What web site(s) do any of you use as a reference for API calls, and how to > use them from VBA? Lambert recently sent me some useful tips on the use of > SHBrowseFolder and others among you have given detailed info on other API > calls. But how do you know this stuff? Where can I go to find out for > myself? Sites like Dev's 'The Access Web' have some great stuff, but not a > comprehensive list. > -- > Andy Lacey > http://www.minstersystems.co.uk > > > ________________________________________________ > Message sent using UebiMiau 2.7.2 > > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com From askolits at ot.com Fri Jan 9 05:37:46 2004 From: askolits at ot.com (John Skolits) Date: Fri, 9 Jan 2004 06:37:46 -0500 Subject: [AccessD] Best API references In-Reply-To: <20040109105316.5324B2566A4@smithers.nildram.co.uk> Message-ID: Is use http://vbnet.mvps.org Their search engine is pretty good. The examples are for mostly VB application, not VBA but many times it's easy to implement them into Access apps. The code is essentially the same. John Skolits -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Andy Lacey Sent: Friday, January 09, 2004 5:53 AM To: Access Developers discussion and problem solving Subject: [AccessD] Best API references What web site(s) do any of you use as a reference for API calls, and how to use them from VBA? Lambert recently sent me some useful tips on the use of SHBrowseFolder and others among you have given detailed info on other API calls. But how do you know this stuff? Where can I go to find out for myself? Sites like Dev's 'The Access Web' have some great stuff, but not a comprehensive list. -- Andy Lacey http://www.minstersystems.co.uk ________________________________________________ Message sent using UebiMiau 2.7.2 _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From andrew.haslett at ilc.gov.au Fri Jan 9 05:37:26 2004 From: andrew.haslett at ilc.gov.au (Haslett, Andrew) Date: Fri, 9 Jan 2004 22:07:26 +1030 Subject: [AccessD] OT: ASP Oddity (Context Switching) Message-ID: Yeah there was a big argument regarding 'context-switching' in the asp community, especially with ASP2.0. The performance difference in ASP3.0 is negligible so it really boils down to your preference, what is easier to read/debug etc. I think the infamous MS article "Top 25 techniques for ASP" or the like included a statement about context switching, although a couple of the issues raised in that article were debateable. Cheers, Andrew -----Original Message----- From: DWUTKA at marlow.com [mailto:DWUTKA at marlow.com] Sent: Friday, 9 January 2004 6:29 AM To: AccessD at databaseadvisors.com Subject: [AccessD] OT: ASP Oddity Sorry for the OT post, but I ran into this last month, and was just flabbergasted that this worked this way. I was doing an ASP sub-contract for my sister, for a jewelry company (http://edlevinjewelry.com) . In the HTML of some of the pages, I found stuff like this: <% If so.type="merchant" then %> This is a test <% End if%> It wasn't coded (or worded, obviously) like that, but that is the gist of it. There was an If Then clause, with regular old HTML in the middle. Sure enough, if the criteria isn't met, the HTML isn't displayed. I never realized (until I saw that), that you could do that. Up until now, I have always done something like this: <% If This=True Then response.write "Test" End if %> In that case, the ASP is writing out the HTML. In some cases, it doesn't make much of a difference. However, I write most of my HTML by hand, using the Microsoft Script Editor, which does a lot of autocompletion, and makes writing raw HTML a breeze. But when I had to put out conditional HTML, I lost all of the advantages of the editor, because I was putting the HTML into a string. What's odd, is I have never run across this in ASP documentation. Once again, sorry for the OT post, but I know there are several listers out there that are either starting out in ASP, or have been using it for a while, and hopefully, this will be helpful to ya'all. Just out of curiousity, did anyone else know this? Drew _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com IMPORTANT - PLEASE READ ******************** This email and any files transmitted with it are confidential and may contain information protected by law from disclosure. If you have received this message in error, please notify the sender immediately and delete this email from your system. No warranty is given that this email or files, if attached to this email, are free from computer viruses or other defects. They are provided on the basis the user assumes all responsibility for loss, damage or consequence resulting directly or indirectly from their use, whether caused by the negligence of the sender or not. From CSPELL at jhuccp.org Fri Jan 9 06:34:00 2004 From: CSPELL at jhuccp.org (CYNTHIA SPELL) Date: Fri, 09 Jan 2004 07:34:00 -0500 Subject: [AccessD] Formatting time - minutes to hour:minutes Message-ID: My application is working correctly now - thanks to your suggestions. Once again, I've learned a lot from the discussion. cindy >>> gustav at cactus.dk 01/09/04 05:47AM >>> Hi Lambert > But your TimeHour function returns a Date data type, and it uses TimeSerial > to generate the return value, so once again, if your input value is more the > 24 * 60 minutes then you will get back a nonsense date and time value. How do you figure this out? It will not - unless you specifically wish to by modifying a code line as explained in the in-line comment. Have in mind, please, that the TimeHour() function is not meant to represent some kind of "universal" function. It was made for summing time intervals which would never add to one day. There a many cases for this in real life, starting/stopping engines, billable hours etc. where you always group by date. Cynthia's need could very well be similar. > I repeat, if you are interesting in time durations then you need to work > with numerical values, not Date/Time values. The Access Date/Time data type > is inherently tied to the concept of a date - a point on the time line, > which has nothing to do with the idea of a duration. This is why DateDiff > returns a Long value, not some kind of date value. I do understand you and if you look up the archives you will find several messages from me stating the same; in fact, I prefer this method if for nothing else that you get rounded values by, say, the second and prevents the mess you can experience when doing algebra with Doubles and Singles. However, if you shift a time interval calculated from two absolute time values (start and stop) so that the start time value is at zero (which is what DateSerial() and TimeSerial() do) then the time interval can be expressed by the time value of the stop time. This doesn't trun the time interval into a "time" but it allows you to use the date/time datatype which again will allow you to use the standard date/time formatting capabilities of Access; this may or may not be advantageous - that depends on many factors including your own preferences. /gustav > "If you wish to count more than 24 hours, here's a quick solution for > seconds. One line (no line break): > = Format(622081 \ 3600, "00:") & > Format((622081 Mod 3600) \ 60, "00:") & > Format(622081 Mod 60, "00") > " > Exactly, this is just the type of code you would put in a custom function to > format durations so they display as hr:min:sec. Why type all that code each > time you want to format a duration (like 62,2081 seconds) when you can just > call a function - FormatAsTime(622081) ???? > Lambert >> -----Original Message----- >> From: Gustav Brock [SMTP:gustav at cactus.dk] >> Sent: Thursday, January 08, 2004 1:16 PM >> To: Access Developers discussion and problem solving >> Subject: Re: [AccessD] Formatting time - minutes to hour:minutes >> >> Hi Lambert >> >> > If there's more that 24 * 60 minutes then TimeSerial will spit out a >> > date/time like this... >> >> > ? TimeSerial(26,1,1) >> > 12/31/1899 2:01:01 AM >> >> Of course, that's why I included the TimeHour() function. >> If you wish to count more than 24 hours, here's a quick solution for >> seconds. One line (no line break): >> >> = Format(622081 \ 3600, "00:") & >> Format((622081 Mod 3600) \ 60, "00:") & >> Format(622081 Mod 60, "00") >> >> The backslash rounds down, thus this will return a string: >> 172:48:01 >> >> > The problem that Cynthia is having is simply that she is interested in >> > Time >> > DURATION, but all the Time formatting and TimeSerial, DateDiff stuff is >> > concerned with POINTS in time (a date and a time of day). >> >> > "Ugly" or not, when dealing with durations (which have nothing to do >> > with >> > dates) you always have to do the math yourself to get hour minutes and >> > seconds displayed. All you need is a simple function that given a number >> > of >> > minutes (or seconds) will do the math and formatting and return the >> > appropriate STRING value for display of reports and forms. >> >> For the "time duration" that is right. However, if you create a pseudo >> timevalue (a time from Access' time "zero"), you have the Format() >> function and all other formatting capabilities of Access ready at hand >> - thus you eliminate the need to create even a simple function. >> >> For "always do the math yourself" I see no reason to struggle with >> that; DateDiff() works fine except for a minor bug in the week count >> for some leap years. >> >> /gustav >> >> >> >> If you wish to use the features of formatting a date/time-value you >> >> need to convert the amount of minutes to a timevalue - like here where >> >> the amount of time is in hours: >> >> >> >> >> >> >> >> Function TimeHour(ByVal curHMS As Currency) As Date >> >> >> >> ' Rounds and converts curHMS (number of hours as decimalnumber). >> >> ' Returns a time value, hh:nn:ss. >> >> ' Gustav Brock, Cactus Data ApS. >> >> ' 1999-08-12. >> >> >> >> Dim lngH As Long >> >> Dim lngM As Long >> >> Dim lngS As Long >> >> Dim curR As Currency >> >> >> >> ' No error handling needed. >> >> On Error Resume Next >> >> >> >> ' Round to two decimals, and skip number of days if curHMS > 24. >> >> ' If day count is needed, omit modulus like this: >> >> ' curHMS = (CLng(curHMS * 10000) / 100 * 36) ' Mod 86400 >> >> curHMS = (CLng(curHMS * 10000) / 100 * 36) Mod 86400 >> >> >> >> ' Calculate hours, minutes, and seconds. >> >> lngH = Int(curHMS / 3600) >> >> curR = curHMS - (lngH * 3600) >> >> lngM = Int(curR / 60) >> >> curR = curR - (lngM * 60) >> >> lngS = CInt(curR) >> >> >> >> ' Create time value. >> >> TimeHour = TimeSerial(lngH, lngM, lngS) >> >> >> >> End Function >> >> >> >> >> >> >> >> Or you could try to simply feed your amount of minutes directly: >> >> >> >> datTime = TimeSerial(0, lngMinutes, 0) >> >> >> >> That may work - haven't tested it though. >> >> >> >> /gustav >> >> >> >> >> >> > I have an application that tracks the amount of time spent on >> >> > projects. >> >> > I used DateDiff on the entry form in order to get the number of minutes >> >> > between the start and end times. The number is held >> >> > in a field called "Time." In a report, I sum "Time" in order to get >> >> > the >> >> > total number of minutes. I need to show the total minutes in hh:mm >> >> > format on the report. I tried to simply format the >> >> > field in the report, but that didn't work. >> >> >> >> > I tried dividing the minutes by 60, which gave me the number of hours >> >> > and a remainder. I then multiplied the remainder by 60 and then >> >> > divided by 100 to get the number of seconds. This is getting >> >> > ugly.... Am I making this harder than it is?? _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From bheid at appdevgrp.com Fri Jan 9 06:37:54 2004 From: bheid at appdevgrp.com (Bobby Heid) Date: Fri, 9 Jan 2004 07:37:54 -0500 Subject: [AccessD] Best API references In-Reply-To: <916187228923D311A6FE00A0CC3FAA30729BCC@ADGSERVER> Message-ID: <916187228923D311A6FE00A0CC3FAA305BB159@ADGSERVER> I use All-API at http://www.mentalis.org/index2.shtml. Although I do not think that they are actively updating their site. Bobby -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Andy Lacey Sent: Friday, January 09, 2004 5:53 AM To: Access Developers discussion and problem solving Subject: [AccessD] Best API references What web site(s) do any of you use as a reference for API calls, and how to use them from VBA? Lambert recently sent me some useful tips on the use of SHBrowseFolder and others among you have given detailed info on other API calls. But how do you know this stuff? Where can I go to find out for myself? Sites like Dev's 'The Access Web' have some great stuff, but not a comprehensive list. -- Andy Lacey http://www.minstersystems.co.uk ________________________________________________ Message sent using UebiMiau 2.7.2 _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From Bryan_Carbonnell at cbc.ca Fri Jan 9 06:51:09 2004 From: Bryan_Carbonnell at cbc.ca (Bryan Carbonnell) Date: Fri, 09 Jan 2004 07:51:09 -0500 Subject: [AccessD] Best API references Message-ID: An even easier URL to remeber is: http://www.allapi.net And you are correct Bobby. The site isn't being actively being updated. If you are looking for a book then Dan Appleman Visual Basic Programmer's Guide to the Win32 API is a great reference. It's pretty deep reading, but a good reference. (http://www.amazon.co.uk/exec/obidos/ASIN/0672315904/qid=1073652549/sr=1-1/ref=sr_1_10_1/202-3516410-8804667) Bryan Carbonnell bryan_carbonnell at cbc.ca >>> bheid at appdevgrp.com 09-Jan-04 7:37:54 AM >>> I use All-API at http://www.mentalis.org/index2.shtml. Although I do not think that they are actively updating their site. Bobby -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Andy Lacey Sent: Friday, January 09, 2004 5:53 AM To: Access Developers discussion and problem solving Subject: [AccessD] Best API references What web site(s) do any of you use as a reference for API calls, and how to use them from VBA? Lambert recently sent me some useful tips on the use of SHBrowseFolder and others among you have given detailed info on other API calls. But how do you know this stuff? Where can I go to find out for myself? Sites like Dev's 'The Access Web' have some great stuff, but not a comprehensive list. From ssharkins at bellsouth.net Fri Jan 9 06:54:15 2004 From: ssharkins at bellsouth.net (Susan Harkins) Date: Fri, 9 Jan 2004 07:54:15 -0500 Subject: [AccessD] Best API references References: Message-ID: <006901c3d6af$b16baab0$210110ac@SUSANONE> > > If you are looking for a book then Dan Appleman Visual Basic > Programmer's Guide to the Win32 API is a great reference. It's pretty > deep reading, but a good reference. > (http://www.amazon.co.uk/exec/obidos/ASIN/0672315904/qid=1073652549/sr=1-1/r ef=sr_1_10_1/202-3516410-8804667) ====FWIW, I can recommend this book as well -- has a good section on actually using them as well, which is often missing in other references. Some good practical information. Susan H. From mikedorism at adelphia.net Fri Jan 9 07:01:33 2004 From: mikedorism at adelphia.net (Mike & Doris Manning) Date: Fri, 9 Jan 2004 08:01:33 -0500 Subject: [AccessD] [dba-VB] Multiple-step operation generated errors - check each status value In-Reply-To: <21241280.1073643853716.JavaMail.www@wwinf3002> Message-ID: <000001c3d6b0$b5668990$8b194244@hargrove.internal> A combo box bound to an Integer field will have a 0 after the user deletes the entry. Doris Manning Database Administrator Hargrove Inc. www.hargroveinc.com -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of paul.hartland at fsmail.net Sent: Friday, January 09, 2004 5:24 AM To: dba-vb Cc: accessd Subject: [AccessD] [dba-VB] Multiple-step operation generated errors - check each status value To all, I have a Visual Basic 6 FE which is connecting to a SQL Server 7.0 BE. One of my fields is called EthnicOrigin which is a TinyInt data type, which also allows Null. The control on the form is a DataCombo, with the list field being Ethnicity and the BoundColumn being EthnicityID. When a user selects an Ethnicity all is well no problem with updating etc as the EthnicityID is entered into the Field and the DataCombo display the Ethnicity. If the user deletes the entry from EthnicOrigin then when the record tries to update I get the error Multiple-step operation generated errors - check each status value Below is the code for updating: With rsPersonnel If (frmOrrPersonnel.PVEthnic <> "") Then .Fields("EthnicOrigin") = frmOrrPersonnel.PVEthnic.BoundText Else .Fields("EthnicOrigin") = 0 End If .Update End With Can anyone tell me what I am doing wrong ? Thanks in advance for any help as this is really starting to frustrate me. Paul Hartland Freeserve AnyTime - HALF PRICE for the first 3 months - Save ?7.50 a month www.freeserve.com/anytime _______________________________________________ dba-VB mailing list dba-VB at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/dba-vb http://www.databaseadvisors.com _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From paul.hartland at fsmail.net Fri Jan 9 07:15:44 2004 From: paul.hartland at fsmail.net (paul.hartland at fsmail.net) Date: Fri, 9 Jan 2004 14:15:44 +0100 (CET) Subject: [AccessD] [dba-VB] Multiple-step operation generated errors - check each status value Message-ID: <8308534.1073654144304.JavaMail.www@wwinf3006> I know, but surely the tinyint data type accepts zero's or am I still missing something ? Message date : Jan 09 2004, 01:04 PM >From : Mike & Doris Manning To : 'Access Developers discussion and problem solving' Copy to : Subject : RE: [AccessD] [dba-VB] Multiple-step operation generated errors - check each status value A combo box bound to an Integer field will have a 0 after the user deletes the entry. Doris Manning Database Administrator Hargrove Inc. www.hargroveinc.com -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of paul.hartland at fsmail.net Sent: Friday, January 09, 2004 5:24 AM To: dba-vb Cc: accessd Subject: [AccessD] [dba-VB] Multiple-step operation generated errors - check each status value To all, I have a Visual Basic 6 FE which is connecting to a SQL Server 7.0 BE. One of my fields is called EthnicOrigin which is a TinyInt data type, which also allows Null. The control on the form is a DataCombo, with the list field being Ethnicity and the BoundColumn being EthnicityID. When a user selects an Ethnicity all is well no problem with updating etc as the EthnicityID is entered into the Field and the DataCombo display the Ethnicity. If the user deletes the entry from EthnicOrigin then when the record tries to update I get the error Multiple-step operation generated errors - check each status value Below is the code for updating: With rsPersonnel If (frmOrrPersonnel.PVEthnic <> "") Then .Fields("EthnicOrigin") = frmOrrPersonnel.PVEthnic.BoundText Else .Fields("EthnicOrigin") = 0 End If .Update End With Can anyone tell me what I am doing wrong ? Thanks in advance for any help as this is really starting to frustrate me. Paul Hartland Freeserve AnyTime - HALF PRICE for the first 3 months - Save ?7.50 a month www.freeserve.com/anytime _______________________________________________ dba-VB mailing list dba-VB at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/dba-vb http://www.databaseadvisors.com _______________________________________________ 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 Freeserve AnyTime - HALF PRICE for the first 3 months - Save ?7.50 a month www.freeserve.com/anytime From gustav at cactus.dk Fri Jan 9 08:07:59 2004 From: gustav at cactus.dk (Gustav Brock) Date: Fri, 9 Jan 2004 15:07:59 +0100 Subject: [AccessD] A2K: Drag and Drop with Access In-Reply-To: <007401c32b7a$59eb6770$6401a8c0@papparuff> References: <007401c32b7a$59eb6770$6401a8c0@papparuff> Message-ID: <7622047232.20040109150759@cactus.dk> Hi John, Dick Here's another article on that subject. This, however, deals with the content of a control. The link terminates ultimo January: What a Drag it is: Drag and Drop in Access This month, Doug Steele shows you how to add drag-and-drop to your Access application using combinations of multi-value and single-value controls. http://www.pinpub.com/html/main.isx?sub=62&story=2604 This implementation though "screams" to be wrapped into WithEvents ... /gustav > Go to Peter DeBaets website and check out his Drag-N-Dropper program. > It works very well > http://www.peterssoftware.com > -----Original Message----- > From: accessd-bounces at databaseadvisors.com > [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Darren DICK > Sent: Wednesday, June 04, 2003 9:59 PM > To: AccessD List > Subject: [AccessD] A2K: Drag and Drop with Access > Anyone have any success with dragging and dropping of controls onto > Access forms? Eg I have an Image control displaying an image and say > it's in the top left corner of the form. I want to 'click' onto the > image control and 'drag' it to say... the bottom left corner of the > form. > I have found heaps of samples for VB but they use VB only events etc, > that I can't replicate or fudge in Access. From mikedorism at adelphia.net Fri Jan 9 08:18:53 2004 From: mikedorism at adelphia.net (Mike & Doris Manning) Date: Fri, 9 Jan 2004 09:18:53 -0500 Subject: [AccessD] [dba-VB] Multiple-step operation generated errors - check each status value In-Reply-To: <8308534.1073654144304.JavaMail.www@wwinf3006> Message-ID: <000001c3d6bb$82df5a50$8b194244@hargrove.internal> Look at your comparison, you are comparing to vbnullstring ("") and not 0. Also you are trying to store a string into an int -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of paul.hartland at fsmail.net Sent: Friday, January 09, 2004 8:16 AM To: Access Developers discussion and problem solving Subject: Re: RE: [AccessD] [dba-VB] Multiple-step operation generated errors - check each status value I know, but surely the tinyint data type accepts zero's or am I still missing something ? Message date : Jan 09 2004, 01:04 PM >From : Mike & Doris Manning To : 'Access Developers discussion and problem solving' Copy to : Subject : RE: [AccessD] [dba-VB] Multiple-step operation generated errors - check each status value A combo box bound to an Integer field will have a 0 after the user deletes the entry. Doris Manning Database Administrator Hargrove Inc. www.hargroveinc.com -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of paul.hartland at fsmail.net Sent: Friday, January 09, 2004 5:24 AM To: dba-vb Cc: accessd Subject: [AccessD] [dba-VB] Multiple-step operation generated errors - check each status value To all, I have a Visual Basic 6 FE which is connecting to a SQL Server 7.0 BE. One of my fields is called EthnicOrigin which is a TinyInt data type, which also allows Null. The control on the form is a DataCombo, with the list field being Ethnicity and the BoundColumn being EthnicityID. When a user selects an Ethnicity all is well no problem with updating etc as the EthnicityID is entered into the Field and the DataCombo display the Ethnicity. If the user deletes the entry from EthnicOrigin then when the record tries to update I get the error Multiple-step operation generated errors - check each status value Below is the code for updating: With rsPersonnel If (frmOrrPersonnel.PVEthnic <> "") Then .Fields("EthnicOrigin") = frmOrrPersonnel.PVEthnic.BoundText Else .Fields("EthnicOrigin") = 0 End If .Update End With Can anyone tell me what I am doing wrong ? Thanks in advance for any help as this is really starting to frustrate me. Paul Hartland Freeserve AnyTime - HALF PRICE for the first 3 months - Save ?7.50 a month www.freeserve.com/anytime _______________________________________________ dba-VB mailing list dba-VB at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/dba-vb http://www.databaseadvisors.com _______________________________________________ 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 Freeserve AnyTime - HALF PRICE for the first 3 months - Save ?7.50 a month www.freeserve.com/anytime _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From markamatte at hotmail.com Fri Jan 9 08:40:59 2004 From: markamatte at hotmail.com (Mark A Matte) Date: Fri, 09 Jan 2004 14:40:59 +0000 Subject: [AccessD] Best API references Message-ID: I used http://www.vbapi.com/index.html...but it was going away...and they offered a download of the list...its not often I have to outside of that list. Thanks, Mark A. Matte >From: "Bobby Heid" >Reply-To: Access Developers discussion and problem >solving >To: "'Access Developers discussion and problem >solving'" >Subject: RE: [AccessD] Best API references >Date: Fri, 9 Jan 2004 07:37:54 -0500 > >I use All-API at http://www.mentalis.org/index2.shtml. Although I do not >think that they are actively updating their site. > >Bobby > >-----Original Message----- >From: accessd-bounces at databaseadvisors.com >[mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Andy Lacey >Sent: Friday, January 09, 2004 5:53 AM >To: Access Developers discussion and problem solving >Subject: [AccessD] Best API references > > >What web site(s) do any of you use as a reference for API calls, and how to >use them from VBA? Lambert recently sent me some useful tips on the use of >SHBrowseFolder and others among you have given detailed info on other API >calls. But how do you know this stuff? Where can I go to find out for >myself? Sites like Dev's 'The Access Web' have some great stuff, but not a >comprehensive list. >-- >Andy Lacey >http://www.minstersystems.co.uk > > >________________________________________________ >Message sent using UebiMiau 2.7.2 > >_______________________________________________ >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 _________________________________________________________________ Take advantage of our limited-time introductory offer for dial-up Internet access. http://join.msn.com/?page=dept/dialup From markamatte at hotmail.com Fri Jan 9 08:52:40 2004 From: markamatte at hotmail.com (Mark A Matte) Date: Fri, 09 Jan 2004 14:52:40 +0000 Subject: [AccessD] Formatting time - minutes to hour:minutes Message-ID: Gustav, I could answer 1 of 2 ways... 1. I never really was good at division. or 2. I didn't know about the MOD operator. Either way...thanks for the insight. Thanks, Mark >From: Gustav Brock >Reply-To: Access Developers discussion and problem >solving >To: Access Developers discussion and problem >solving >Subject: Re: [AccessD] Formatting time - minutes to hour:minutes >Date: Fri, 9 Jan 2004 11:11:25 +0100 > >Hi Mark > >Are you aware that you can replace your creative counting loop with a >boring division ..? > >/gustav > > > > I wrote the following to calculate Minutes and Seconds...with a few > > changes...you could use it to calculate Hours and Minutes. I first > > calculate the SECONDS...then use a loop that increments a count by > > 1...multiply the counter by 60 and check againts SECONDS...when the > > Counter*60 is greater than SECONDS...Counter-1 = MINUTES and > > SECONDS-((counter-1)*60)=LeftOverSECONDS > > > Hope it helps... > > > Mark A. Matte > > > Private Sub cmdStop_Click() > > Me!EndDTTM = Now() > > Dim Seconds > > Dim RMmin > > Dim RMsec > > Seconds = DateDiff("s", Me!StartDTTM, Me!EndDTTM) > > Dim Check, Counter > > Check = True: Counter = 0 > > > Do > > Counter = Counter + 1 > > If Counter * 60 > Seconds Then > > RMmin = Counter - 1 > > RMsec = Seconds - ((Counter - 1) * 60) > > Check = False > > Exit Do > > End If > > Loop Until Check = False > > Forms!frmRecords!RMCallLengthM.Value = RMmin > > Forms!frmRecords!RMCallLengthS.Value = RMsec > > DoCmd.close > > End Sub > >_______________________________________________ >AccessD mailing list >AccessD at databaseadvisors.com >http://databaseadvisors.com/mailman/listinfo/accessd >Website: http://www.databaseadvisors.com _________________________________________________________________ Get reliable dial-up Internet access now with our limited-time introductory offer. http://join.msn.com/?page=dept/dialup From DWUTKA at marlow.com Fri Jan 9 10:39:06 2004 From: DWUTKA at marlow.com (DWUTKA at marlow.com) Date: Fri, 9 Jan 2004 10:39:06 -0600 Subject: [AccessD] OT: ASP Oddity (Context Switching) Message-ID: <2F8793082E00D4119A1700B0D0216BF802227708@main2.marlow.com> Never saw that article. Drew -----Original Message----- From: Haslett, Andrew [mailto:andrew.haslett at ilc.gov.au] Sent: Friday, January 09, 2004 5:37 AM To: 'Access Developers discussion and problem solving' Subject: RE: [AccessD] OT: ASP Oddity (Context Switching) Yeah there was a big argument regarding 'context-switching' in the asp community, especially with ASP2.0. The performance difference in ASP3.0 is negligible so it really boils down to your preference, what is easier to read/debug etc. I think the infamous MS article "Top 25 techniques for ASP" or the like included a statement about context switching, although a couple of the issues raised in that article were debateable. Cheers, Andrew -----Original Message----- From: DWUTKA at marlow.com [mailto:DWUTKA at marlow.com] Sent: Friday, 9 January 2004 6:29 AM To: AccessD at databaseadvisors.com Subject: [AccessD] OT: ASP Oddity Sorry for the OT post, but I ran into this last month, and was just flabbergasted that this worked this way. I was doing an ASP sub-contract for my sister, for a jewelry company (http://edlevinjewelry.com) . In the HTML of some of the pages, I found stuff like this: <% If so.type="merchant" then %> This is a test <% End if%> It wasn't coded (or worded, obviously) like that, but that is the gist of it. There was an If Then clause, with regular old HTML in the middle. Sure enough, if the criteria isn't met, the HTML isn't displayed. I never realized (until I saw that), that you could do that. Up until now, I have always done something like this: <% If This=True Then response.write "Test" End if %> In that case, the ASP is writing out the HTML. In some cases, it doesn't make much of a difference. However, I write most of my HTML by hand, using the Microsoft Script Editor, which does a lot of autocompletion, and makes writing raw HTML a breeze. But when I had to put out conditional HTML, I lost all of the advantages of the editor, because I was putting the HTML into a string. What's odd, is I have never run across this in ASP documentation. Once again, sorry for the OT post, but I know there are several listers out there that are either starting out in ASP, or have been using it for a while, and hopefully, this will be helpful to ya'all. Just out of curiousity, did anyone else know this? Drew _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com IMPORTANT - PLEASE READ ******************** This email and any files transmitted with it are confidential and may contain information protected by law from disclosure. If you have received this message in error, please notify the sender immediately and delete this email from your system. No warranty is given that this email or files, if attached to this email, are free from computer viruses or other defects. They are provided on the basis the user assumes all responsibility for loss, damage or consequence resulting directly or indirectly from their use, whether caused by the negligence of the sender or not. _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From Erwin.Craps at ithelps.be Fri Jan 9 10:46:31 2004 From: Erwin.Craps at ithelps.be (Erwin Craps - IT Helps) Date: Fri, 9 Jan 2004 17:46:31 +0100 Subject: [AccessD] Best API references Message-ID: <46B976F2B698FF46A4FE7636509B22DF03D0E5@stekelbes.ithelps.local> Ha funny.... I just downloaded the API-Guide. I noticed a European Download link here in Leuven my hometown. When opening the application, the credits of the applications goes to some company a few streets away from where I am... They say it's "postcard software" and you should send a card from the city where you are if you wanna use the app. I don't know if they gonna be happy to get a postcard from 500 meter away ?! Erwin -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Bryan Carbonnell Sent: Friday, January 09, 2004 1:51 PM To: accessd at databaseadvisors.com Subject: RE: [AccessD] Best API references An even easier URL to remeber is: http://www.allapi.net And you are correct Bobby. The site isn't being actively being updated. If you are looking for a book then Dan Appleman Visual Basic Programmer's Guide to the Win32 API is a great reference. It's pretty deep reading, but a good reference. (http://www.amazon.co.uk/exec/obidos/ASIN/0672315904/qid=1073652549/sr=1 -1/ref=sr_1_10_1/202-3516410-8804667) Bryan Carbonnell bryan_carbonnell at cbc.ca >>> bheid at appdevgrp.com 09-Jan-04 7:37:54 AM >>> I use All-API at http://www.mentalis.org/index2.shtml. Although I do not think that they are actively updating their site. Bobby -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Andy Lacey Sent: Friday, January 09, 2004 5:53 AM To: Access Developers discussion and problem solving Subject: [AccessD] Best API references What web site(s) do any of you use as a reference for API calls, and how to use them from VBA? Lambert recently sent me some useful tips on the use of SHBrowseFolder and others among you have given detailed info on other API calls. But how do you know this stuff? Where can I go to find out for myself? Sites like Dev's 'The Access Web' have some great stuff, but not a comprehensive list. _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From Mark.Mitsules at ngc.com Fri Jan 9 10:49:56 2004 From: Mark.Mitsules at ngc.com (Mitsules, Mark S. (Newport News)) Date: Fri, 9 Jan 2004 11:49:56 -0500 Subject: [AccessD] OT: ASP Oddity (Context Switching) Message-ID: I tried a very quick search yesterday on that quoted title...didn't come across it. Don't spend any time on it, but if someone does find the article for their own purposes, I'd appreciate a link. Mark -----Original Message----- From: DWUTKA at marlow.com [mailto:DWUTKA at marlow.com] Sent: Friday, January 09, 2004 11:39 AM To: accessd at databaseadvisors.com Subject: RE: [AccessD] OT: ASP Oddity (Context Switching) Never saw that article. Drew -----Original Message----- From: Haslett, Andrew [mailto:andrew.haslett at ilc.gov.au] Sent: Friday, January 09, 2004 5:37 AM To: 'Access Developers discussion and problem solving' Subject: RE: [AccessD] OT: ASP Oddity (Context Switching) Yeah there was a big argument regarding 'context-switching' in the asp community, especially with ASP2.0. The performance difference in ASP3.0 is negligible so it really boils down to your preference, what is easier to read/debug etc. I think the infamous MS article "Top 25 techniques for ASP" or the like included a statement about context switching, although a couple of the issues raised in that article were debateable. Cheers, Andrew -----Original Message----- From: DWUTKA at marlow.com [mailto:DWUTKA at marlow.com] Sent: Friday, 9 January 2004 6:29 AM To: AccessD at databaseadvisors.com Subject: [AccessD] OT: ASP Oddity Sorry for the OT post, but I ran into this last month, and was just flabbergasted that this worked this way. I was doing an ASP sub-contract for my sister, for a jewelry company (http://edlevinjewelry.com) . In the HTML of some of the pages, I found stuff like this: <% If so.type="merchant" then %> This is a test <% End if%> It wasn't coded (or worded, obviously) like that, but that is the gist of it. There was an If Then clause, with regular old HTML in the middle. Sure enough, if the criteria isn't met, the HTML isn't displayed. I never realized (until I saw that), that you could do that. Up until now, I have always done something like this: <% If This=True Then response.write "Test" End if %> In that case, the ASP is writing out the HTML. In some cases, it doesn't make much of a difference. However, I write most of my HTML by hand, using the Microsoft Script Editor, which does a lot of autocompletion, and makes writing raw HTML a breeze. But when I had to put out conditional HTML, I lost all of the advantages of the editor, because I was putting the HTML into a string. What's odd, is I have never run across this in ASP documentation. Once again, sorry for the OT post, but I know there are several listers out there that are either starting out in ASP, or have been using it for a while, and hopefully, this will be helpful to ya'all. Just out of curiousity, did anyone else know this? Drew _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com IMPORTANT - PLEASE READ ******************** This email and any files transmitted with it are confidential and may contain information protected by law from disclosure. If you have received this message in error, please notify the sender immediately and delete this email from your system. No warranty is given that this email or files, if attached to this email, are free from computer viruses or other defects. They are provided on the basis the user assumes all responsibility for loss, damage or consequence resulting directly or indirectly from their use, whether caused by the negligence of the sender or not. _______________________________________________ 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 From dw-murphy at cox.net Fri Jan 9 11:51:12 2004 From: dw-murphy at cox.net (Doug Murphy) Date: Fri, 9 Jan 2004 09:51:12 -0800 Subject: [AccessD] OT: ASP Oddity In-Reply-To: <2F8793082E00D4119A1700B0D0216BF8022276FA@main2.marlow.com> Message-ID: <001601c3d6d9$2ea999a0$8500a8c0@CX615377a> Hi Drew, Yes I use this approach when writing pages that are the ASP version of a continuous form, e.g., many records listed in form controls. The if/else/then structure allows for testing for conditions and then writing the correct html. I think I first saw this in one of the ASP books I use, or it may have been some code I got off the web. I'll take it from wherever I find it. Doug -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of DWUTKA at marlow.com Sent: Thursday, January 08, 2004 11:59 AM To: AccessD at databaseadvisors.com Subject: [AccessD] OT: ASP Oddity Sorry for the OT post, but I ran into this last month, and was just flabbergasted that this worked this way. I was doing an ASP sub-contract for my sister, for a jewelry company (http://edlevinjewelry.com) . In the HTML of some of the pages, I found stuff like this: <% If so.type="merchant" then %> This is a test <% End if%> It wasn't coded (or worded, obviously) like that, but that is the gist of it. There was an If Then clause, with regular old HTML in the middle. Sure enough, if the criteria isn't met, the HTML isn't displayed. I never realized (until I saw that), that you could do that. Up until now, I have always done something like this: <% If This=True Then response.write "Test" End if %> In that case, the ASP is writing out the HTML. In some cases, it doesn't make much of a difference. However, I write most of my HTML by hand, using the Microsoft Script Editor, which does a lot of autocompletion, and makes writing raw HTML a breeze. But when I had to put out conditional HTML, I lost all of the advantages of the editor, because I was putting the HTML into a string. What's odd, is I have never run across this in ASP documentation. Once again, sorry for the OT post, but I know there are several listers out there that are either starting out in ASP, or have been using it for a while, and hopefully, this will be helpful to ya'all. Just out of curiousity, did anyone else know this? Drew _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From artful at rogers.com Fri Jan 9 14:22:52 2004 From: artful at rogers.com (Arthur Fuller) Date: Fri, 9 Jan 2004 15:22:52 -0500 Subject: [AccessD] OT: ASP Oddity In-Reply-To: <2F8793082E00D4119A1700B0D0216BF8022276FA@main2.marlow.com> Message-ID: I think so. This is mixed-language logic. A little weird first time you encounter it but quite logical IMO. Arthur -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of DWUTKA at marlow.com Sent: Thursday, January 08, 2004 2:59 PM To: AccessD at databaseadvisors.com Subject: [AccessD] OT: ASP Oddity Sorry for the OT post, but I ran into this last month, and was just flabbergasted that this worked this way. I was doing an ASP sub-contract for my sister, for a jewelry company (http://edlevinjewelry.com) . In the HTML of some of the pages, I found stuff like this: <% If so.type="merchant" then %> This is a test <% End if%> It wasn't coded (or worded, obviously) like that, but that is the gist of it. There was an If Then clause, with regular old HTML in the middle. Sure enough, if the criteria isn't met, the HTML isn't displayed. I never realized (until I saw that), that you could do that. Up until now, I have always done something like this: <% If This=True Then response.write "Test" End if %> In that case, the ASP is writing out the HTML. In some cases, it doesn't make much of a difference. However, I write most of my HTML by hand, using the Microsoft Script Editor, which does a lot of autocompletion, and makes writing raw HTML a breeze. But when I had to put out conditional HTML, I lost all of the advantages of the editor, because I was putting the HTML into a string. What's odd, is I have never run across this in ASP documentation. Once again, sorry for the OT post, but I know there are several listers out there that are either starting out in ASP, or have been using it for a while, and hopefully, this will be helpful to ya'all. Just out of curiousity, did anyone else know this? Drew _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com --- Incoming mail is certified Virus Free. Checked by AVG anti-virus system (http://www.grisoft.com). Version: 6.0.558 / Virus Database: 350 - Release Date: 1/2/2004 --- Outgoing mail is certified Virus Free. Checked by AVG anti-virus system (http://www.grisoft.com). Version: 6.0.558 / Virus Database: 350 - Release Date: 1/2/2004 From Mark.Mitsules at ngc.com Fri Jan 9 14:40:03 2004 From: Mark.Mitsules at ngc.com (Mitsules, Mark S. (Newport News)) Date: Fri, 9 Jan 2004 15:40:03 -0500 Subject: [AccessD] Access Security - Web Based ASP Message-ID: I have an existing .mdb "protected" only by an API call to GetUserName...very limited access. It contains time charging data for the entire department ("company confidential...need to know" type stuff). In the simplest of terms, what is the minimum necessary to achieve the following scenario? I would like a user to be able to access ONLY THEIR time charging data through a web page interface. Are there alternatives? Mark From DWUTKA at marlow.com Fri Jan 9 15:06:27 2004 From: DWUTKA at marlow.com (DWUTKA at marlow.com) Date: Fri, 9 Jan 2004 15:06:27 -0600 Subject: [AccessD] Access Security - Web Based ASP Message-ID: <2F8793082E00D4119A1700B0D0216BF80222770E@main2.marlow.com> With ASP, you can get the users logged in account, either with Integrated Windows Authentication, or plain text password. No need to have security on the db itself, if you don't put it into a directory 'visible' from the web. Drew -----Original Message----- From: Mitsules, Mark S. (Newport News) [mailto:Mark.Mitsules at ngc.com] Sent: Friday, January 09, 2004 2:40 PM To: '[AccessD]' Subject: [AccessD] Access Security - Web Based ASP I have an existing .mdb "protected" only by an API call to GetUserName...very limited access. It contains time charging data for the entire department ("company confidential...need to know" type stuff). In the simplest of terms, what is the minimum necessary to achieve the following scenario? I would like a user to be able to access ONLY THEIR time charging data through a web page interface. Are there alternatives? Mark _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From Mark.Mitsules at ngc.com Fri Jan 9 15:32:39 2004 From: Mark.Mitsules at ngc.com (Mitsules, Mark S. (Newport News)) Date: Fri, 9 Jan 2004 16:32:39 -0500 Subject: [AccessD] Access Security - Web Based ASP Message-ID: Thanks. I will research Integrated Windows Authentication as an option. Mark -----Original Message----- From: DWUTKA at marlow.com [mailto:DWUTKA at marlow.com] Sent: Friday, January 09, 2004 4:06 PM To: accessd at databaseadvisors.com Subject: RE: [AccessD] Access Security - Web Based ASP With ASP, you can get the users logged in account, either with Integrated Windows Authentication, or plain text password. No need to have security on the db itself, if you don't put it into a directory 'visible' from the web. Drew -----Original Message----- From: Mitsules, Mark S. (Newport News) [mailto:Mark.Mitsules at ngc.com] Sent: Friday, January 09, 2004 2:40 PM To: '[AccessD]' Subject: [AccessD] Access Security - Web Based ASP I have an existing .mdb "protected" only by an API call to GetUserName...very limited access. It contains time charging data for the entire department ("company confidential...need to know" type stuff). In the simplest of terms, what is the minimum necessary to achieve the following scenario? I would like a user to be able to access ONLY THEIR time charging data through a web page interface. Are there alternatives? Mark _______________________________________________ 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 From Erwin.Craps at ithelps.be Fri Jan 9 15:45:22 2004 From: Erwin.Craps at ithelps.be (Erwin Craps - IT Helps) Date: Fri, 9 Jan 2004 22:45:22 +0100 Subject: [AccessD] Access Security - Web Based ASP Message-ID: <46B976F2B698FF46A4FE7636509B22DF03D0E7@stekelbes.ithelps.local> I have a small little trick I used for same reasons. I'm using a seperate MDB file which has linked tables to the backend database. Only the tables I really need are in the WEB database. If it ain't there you can get in.... But I supose that you the data of the people are all in the same table. You need a password system to login via the web, these user/password are stored in a table in your db. When a correct match you store the ID of the person into the session. If you build SQL string than you always use the persons ID stored in the session. So don't use any parameters with the URL string for person identification. You should be reasonably safe with that, but not 100%, you never are 100% safe.... Erwin -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Mitsules, Mark S. (Newport News) Sent: Friday, January 09, 2004 10:33 PM To: 'Access Developers discussion and problem solving' Subject: RE: [AccessD] Access Security - Web Based ASP Thanks. I will research Integrated Windows Authentication as an option. Mark -----Original Message----- From: DWUTKA at marlow.com [mailto:DWUTKA at marlow.com] Sent: Friday, January 09, 2004 4:06 PM To: accessd at databaseadvisors.com Subject: RE: [AccessD] Access Security - Web Based ASP With ASP, you can get the users logged in account, either with Integrated Windows Authentication, or plain text password. No need to have security on the db itself, if you don't put it into a directory 'visible' from the web. Drew -----Original Message----- From: Mitsules, Mark S. (Newport News) [mailto:Mark.Mitsules at ngc.com] Sent: Friday, January 09, 2004 2:40 PM To: '[AccessD]' Subject: [AccessD] Access Security - Web Based ASP I have an existing .mdb "protected" only by an API call to GetUserName...very limited access. It contains time charging data for the entire department ("company confidential...need to know" type stuff). In the simplest of terms, what is the minimum necessary to achieve the following scenario? I would like a user to be able to access ONLY THEIR time charging data through a web page interface. Are there alternatives? Mark _______________________________________________ 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 _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From artful at rogers.com Fri Jan 9 17:07:25 2004 From: artful at rogers.com (Arthur Fuller) Date: Fri, 9 Jan 2004 18:07:25 -0500 Subject: [AccessD] Outlook.pst Hosed In-Reply-To: Message-ID: I sent a message on this subject a few days ago, but maybe I missed its posting. At any rate, a sudden power outage hosed my PST file and now I can read some of it but cannot send or receive. Further, when I try to extract the contents using Access I can get only a few of the (numerous) folders. Ideas? TIA, Arthur --- Outgoing mail is certified Virus Free. Checked by AVG anti-virus system (http://www.grisoft.com). Version: 6.0.558 / Virus Database: 350 - Release Date: 1/2/2004 From martyconnelly at shaw.ca Fri Jan 9 17:46:49 2004 From: martyconnelly at shaw.ca (MartyConnelly) Date: Fri, 09 Jan 2004 15:46:49 -0800 Subject: [AccessD] Outlook.pst Hosed References: Message-ID: <3FFF3D69.7090702@shaw.ca> This shows you how to use Scanpst.exe to repair it if possible http://www.slipstick.com/problems/scanpst.htm If your PST goes above 2 gig this will muck it up too. Arthur Fuller wrote: >I sent a message on this subject a few days ago, but maybe I missed its >posting. At any rate, a sudden power outage hosed my PST file and now I can >read some of it but cannot send or receive. Further, when I try to extract >the contents using Access I can get only a few of the (numerous) folders. > >Ideas? > >TIA, >Arthur > >--- >Outgoing mail is certified Virus Free. >Checked by AVG anti-virus system (http://www.grisoft.com). >Version: 6.0.558 / Virus Database: 350 - Release Date: 1/2/2004 > > >_______________________________________________ >AccessD mailing list >AccessD at databaseadvisors.com >http://databaseadvisors.com/mailman/listinfo/accessd >Website: http://www.databaseadvisors.com > > > -- Marty Connelly Victoria, B.C. Canada From drboz at pacbell.net Fri Jan 9 18:03:29 2004 From: drboz at pacbell.net (Don Bozarth) Date: Fri, 9 Jan 2004 16:03:29 -0800 Subject: [AccessD] Outlook.pst Hosed References: Message-ID: <004101c3d70d$2da83190$6501a8c0@don> Arthur, Try the .pst repair tool (scanpst.exe) normally located in \program files\common files\system\mapi\1033\NT. This puppy scans the .pst and will fix most (but not all) errors. Don B. ----- Original Message ----- From: "Arthur Fuller" To: "Access Developers discussion and problem solving" Sent: Friday, January 09, 2004 3:07 PM Subject: [AccessD] Outlook.pst Hosed > I sent a message on this subject a few days ago, but maybe I missed its > posting. At any rate, a sudden power outage hosed my PST file and now I can > read some of it but cannot send or receive. Further, when I try to extract > the contents using Access I can get only a few of the (numerous) folders. > > Ideas? > > TIA, > Arthur > > --- > Outgoing mail is certified Virus Free. > Checked by AVG anti-virus system (http://www.grisoft.com). > Version: 6.0.558 / Virus Database: 350 - Release Date: 1/2/2004 > > > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com > From stuart at lexacorp.com.pg Fri Jan 9 20:51:10 2004 From: stuart at lexacorp.com.pg (Stuart McLachlan) Date: Sat, 10 Jan 2004 12:51:10 +1000 Subject: [AccessD] Best API references In-Reply-To: <20040109105316.5324B2566A4@smithers.nildram.co.uk> Message-ID: <3FFFF53E.9392.936045@localhost> On 9 Jan 2004 at 10:53, Andy Lacey wrote: > What web site(s) do any of you use as a reference for API calls, and how to > use them from VBA? Lambert recently sent me some useful tips on the use of > SHBrowseFolder and others among you have given detailed info on other API > calls. But how do you know this stuff? Where can I go to find out for > myself? Sites like Dev's 'The Access Web' have some great stuff, but not a > comprehensive list. > -- To get the VB/VBA declarations grab APIViewer from http://www.mentalis.org/agnet/apiviewer.shtml For a comprehensive set of references download: ftp://ftp.borland.com/pub/bcppbuilder/techpubs/bcb5/b5ms.zip It's a 17MB download which contains: Microsoft Programmer's Guide to Windows 95 95GUIDE.HLP Microsoft Knowledge Base KBASE.HLP Microsoft Win32 Message (MAPI) Reference MAPI.HLP MIDL Programmer's Reference MIDL.HLP ISAPI Programmer's Reference MISAPI.HLP Multimedia Programmer's Reference MMEDIA.HLP OLE 2.0 Programmer's Reference OLE.HLP OpenGL Programmer's Reference OPENGL.HLP MS Windows Performance Data Helper Reference PDH.HLP MS Windows Pen API Programmer's Reference PENAPI.HLP Win32 Programming Techniques PROGTECH.HLP Remote Procedure Calls Reference RPC.HLP MS Windows Setup API Programmer's Reference SETUPAPI.HLP MS Windows Sockets 2 Reference SOCK2.HLP MS Windows Telephony API Programmer's Reference TAPI.HLP Win32 Programmer's Reference WIN32.HLP Win32s Programmer's Reference WIN32S.HLP Multimedia API Reference MM.HLP Microsoft Windows Developer's Guide GUIDE.HLP Microsoft Tools Reference MSTOOLS.HLP Resource Compiler User's Guide RC.HLP -- Lexacorp Ltd http://www.lexacorp.com.pg Information Technology Consultancy, Software Development,System Support. From kost36 at otenet.gr Sat Jan 10 01:12:24 2004 From: kost36 at otenet.gr (Kostas Konstantinidis) Date: Sat, 10 Jan 2004 09:12:24 +0200 Subject: [AccessD] e-mailing to all the people at the same time References: <2F8793082E00D4119A1700B0D0216BF8022276DA@main2.marlow.com> <007a01c3d5a8$123d86f0$0100a8c0@kost36> Message-ID: <005c01c3d749$1b59cbc0$0100a8c0@kost36> Marty and Erwin, thank's for your help Kostas Konstantinidis From andrew.haslett at ilc.gov.au Sat Jan 10 04:00:07 2004 From: andrew.haslett at ilc.gov.au (Haslett, Andrew) Date: Sat, 10 Jan 2004 20:30:07 +1030 Subject: [AccessD] OT: ASP Oddity (Context Switching) Message-ID: http://msdn.microsoft.com/library/default.asp?URL=/library/en-us/dnasp/html/ ASPtips.asp -----Original Message----- From: Mitsules, Mark S. (Newport News) [mailto:Mark.Mitsules at ngc.com] Sent: Saturday, 10 January 2004 3:20 AM To: 'Access Developers discussion and problem solving' Subject: RE: [AccessD] OT: ASP Oddity (Context Switching) I tried a very quick search yesterday on that quoted title...didn't come across it. Don't spend any time on it, but if someone does find the article for their own purposes, I'd appreciate a link. Mark -----Original Message----- From: DWUTKA at marlow.com [mailto:DWUTKA at marlow.com] Sent: Friday, January 09, 2004 11:39 AM To: accessd at databaseadvisors.com Subject: RE: [AccessD] OT: ASP Oddity (Context Switching) Never saw that article. Drew -----Original Message----- From: Haslett, Andrew [mailto:andrew.haslett at ilc.gov.au] Sent: Friday, January 09, 2004 5:37 AM To: 'Access Developers discussion and problem solving' Subject: RE: [AccessD] OT: ASP Oddity (Context Switching) Yeah there was a big argument regarding 'context-switching' in the asp community, especially with ASP2.0. The performance difference in ASP3.0 is negligible so it really boils down to your preference, what is easier to read/debug etc. I think the infamous MS article "Top 25 techniques for ASP" or the like included a statement about context switching, although a couple of the issues raised in that article were debateable. Cheers, Andrew -----Original Message----- From: DWUTKA at marlow.com [mailto:DWUTKA at marlow.com] Sent: Friday, 9 January 2004 6:29 AM To: AccessD at databaseadvisors.com Subject: [AccessD] OT: ASP Oddity Sorry for the OT post, but I ran into this last month, and was just flabbergasted that this worked this way. I was doing an ASP sub-contract for my sister, for a jewelry company (http://edlevinjewelry.com) . In the HTML of some of the pages, I found stuff like this: <% If so.type="merchant" then %> This is a test <% End if%> It wasn't coded (or worded, obviously) like that, but that is the gist of it. There was an If Then clause, with regular old HTML in the middle. Sure enough, if the criteria isn't met, the HTML isn't displayed. I never realized (until I saw that), that you could do that. Up until now, I have always done something like this: <% If This=True Then response.write "Test" End if %> In that case, the ASP is writing out the HTML. In some cases, it doesn't make much of a difference. However, I write most of my HTML by hand, using the Microsoft Script Editor, which does a lot of autocompletion, and makes writing raw HTML a breeze. But when I had to put out conditional HTML, I lost all of the advantages of the editor, because I was putting the HTML into a string. What's odd, is I have never run across this in ASP documentation. Once again, sorry for the OT post, but I know there are several listers out there that are either starting out in ASP, or have been using it for a while, and hopefully, this will be helpful to ya'all. Just out of curiousity, did anyone else know this? Drew _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com IMPORTANT - PLEASE READ ******************** This email and any files transmitted with it are confidential and may contain information protected by law from disclosure. If you have received this message in error, please notify the sender immediately and delete this email from your system. No warranty is given that this email or files, if attached to this email, are free from computer viruses or other defects. They are provided on the basis the user assumes all responsibility for loss, damage or consequence resulting directly or indirectly from their use, whether caused by the negligence of the sender or not. _______________________________________________ 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 _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com IMPORTANT - PLEASE READ ******************** This email and any files transmitted with it are confidential and may contain information protected by law from disclosure. If you have received this message in error, please notify the sender immediately and delete this email from your system. No warranty is given that this email or files, if attached to this email, are free from computer viruses or other defects. They are provided on the basis the user assumes all responsibility for loss, damage or consequence resulting directly or indirectly from their use, whether caused by the negligence of the sender or not. From andy at minstersystems.co.uk Sat Jan 10 10:13:31 2004 From: andy at minstersystems.co.uk (Andy Lacey) Date: Sat, 10 Jan 2004 16:13:31 -0000 Subject: [AccessD] Best API references In-Reply-To: <3FFFF53E.9392.936045@localhost> Message-ID: <018001c3d794$b0c44410$b274d0d5@minster33c3r25> Thanks to everyone for ideas on API info. I'll be looking at all your suggestions. Andy Lacey http://www.minstersystems.co.uk > -----Original Message----- > From: accessd-bounces at databaseadvisors.com > [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of > Stuart McLachlan > Sent: 10 January 2004 02:51 > To: Access Developers discussion and problem solving > Subject: Re: [AccessD] Best API references > > > On 9 Jan 2004 at 10:53, Andy Lacey wrote: > > > What web site(s) do any of you use as a reference for API > calls, and > > how to use them from VBA? Lambert recently sent me some > useful tips on > > the use of SHBrowseFolder and others among you have given detailed > > info on other API calls. But how do you know this stuff? > Where can I > > go to find out for myself? Sites like Dev's 'The Access > Web' have some > > great stuff, but not a comprehensive list. > > -- > > To get the VB/VBA declarations grab APIViewer from > http://www.mentalis.org/agnet/apiviewer.shtml > > For a comprehensive set of references download: > ftp://ftp.borland.com/pub/bcppbuilder/techpubs/bcb5/b5ms.zip > > It's a 17MB download which contains: > Microsoft Programmer's Guide to Windows 95 95GUIDE.HLP > Microsoft Knowledge Base KBASE.HLP > Microsoft Win32 Message (MAPI) Reference MAPI.HLP > MIDL Programmer's Reference MIDL.HLP > ISAPI Programmer's Reference MISAPI.HLP > Multimedia Programmer's Reference MMEDIA.HLP > OLE 2.0 Programmer's Reference OLE.HLP > OpenGL Programmer's Reference OPENGL.HLP > MS Windows Performance Data Helper Reference PDH.HLP > MS Windows Pen API Programmer's Reference PENAPI.HLP > Win32 Programming Techniques PROGTECH.HLP > Remote Procedure Calls Reference RPC.HLP > MS Windows Setup API Programmer's Reference SETUPAPI.HLP > MS Windows Sockets 2 Reference SOCK2.HLP > MS Windows Telephony API Programmer's Reference TAPI.HLP > Win32 Programmer's Reference WIN32.HLP > Win32s Programmer's Reference WIN32S.HLP > Multimedia API Reference MM.HLP > Microsoft Windows Developer's Guide GUIDE.HLP > Microsoft Tools Reference MSTOOLS.HLP > Resource Compiler User's Guide RC.HLP > > > -- > Lexacorp Ltd > http://www.lexacorp.com.pg > Information Technology Consultancy, Software Development,System > Support. > > > > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/a> ccessd > Website: > http://www.databaseadvisors.com > > From rbgajewski at adelphia.net Sat Jan 10 17:06:01 2004 From: rbgajewski at adelphia.net (Bob Gajewski) Date: Sat, 10 Jan 2004 18:06:01 -0500 Subject: [AccessD] Populate a form with a list of streets In-Reply-To: <001601c3c1c4$7fbefe40$6101a8c0@dejpolsys> Message-ID: Dear List: I have an A2K database that has two tables: tblCardex PK CardexID Autonumber CardexHouseNumber Long FK CardexStreetID Long tblStreets PK StreetID Autonumber StreetName Text The Cardex is a list of addresses, using an index of STREETNAME, HOUSENUMBER as the default sort. I want to allow users to automatically advance to the first record (lowest house number) for any desired street (name). Right now, I have a command button that they can click to popup a modal form listing all of the streets (in alphabetical order) with the record number of the first (lowest) house number; after closing the form, they navigate using the F5 function to input the record number. Not only is this cheap and sloppy, addresses get added quite often and the record numbers keep changing. Should I be using a combobox of the streets to perform this navigation? If so, a push in right CBF direction would be greatly appreciated! TIA, Bob Gajewski --------------------------------------------------------------------- Eliminate annoying spam! My mailbox is protected by iHateSpam, the #1-rated spam buster. http://www.ihatespam.net From martyconnelly at shaw.ca Sat Jan 10 20:03:36 2004 From: martyconnelly at shaw.ca (MartyConnelly) Date: Sat, 10 Jan 2004 18:03:36 -0800 Subject: [AccessD] Populate a form with a list of streets References: Message-ID: <4000AEF8.6010005@shaw.ca> I don't know if this will suit you but how about cascading comboboxes see http://www.rogersaccesslibrary.com/TableOfContents2k.asp for a couple of samples. Bob Gajewski wrote: >Dear List: > >I have an A2K database that has two tables: > > tblCardex > PK CardexID Autonumber > CardexHouseNumber Long > FK CardexStreetID Long > > tblStreets > PK StreetID Autonumber > StreetName Text > >The Cardex is a list of addresses, using an index of STREETNAME, HOUSENUMBER >as the default sort. > >I want to allow users to automatically advance to the first record (lowest >house number) for any desired street (name). Right now, I have a command >button that they can click to popup a modal form listing all of the streets >(in alphabetical order) with the record number of the first (lowest) house >number; after closing the form, they navigate using the F5 function to input >the record number. Not only is this cheap and sloppy, addresses get added >quite often and the record numbers keep changing. Should I be using a >combobox of the streets to perform this navigation? If so, a push in right >CBF direction would be greatly appreciated! > >TIA, > >Bob Gajewski > > > >--------------------------------------------------------------------- >Eliminate annoying spam! > >My mailbox is protected by iHateSpam, the #1-rated spam buster. >http://www.ihatespam.net > > > >_______________________________________________ >AccessD mailing list >AccessD at databaseadvisors.com >http://databaseadvisors.com/mailman/listinfo/accessd >Website: http://www.databaseadvisors.com > > > -- Marty Connelly Victoria, B.C. Canada From starkey at wanadoo.nl Sun Jan 11 10:35:58 2004 From: starkey at wanadoo.nl (StaRKeY) Date: Sun, 11 Jan 2004 17:35:58 +0100 Subject: [AccessD] Database growth Message-ID: Hi all, One question: - Do linked tables also make the host mdb file grow? I figure it's only the tables (linked or not) that are being filled with data which make a mdb file grow but maybe there are other reasons? Regards, Eric Starkenburg --- avast! Antivirus: Outbound message clean. Virus Database (VPS): 8-1-2004 Tested on: 11-1-2004 17:35:58 avast! is copyright (c) 2000-2003 ALWIL Software. http://www.avast.com From wdhindman at bellsouth.net Sun Jan 11 12:22:05 2004 From: wdhindman at bellsouth.net (William Hindman) Date: Sun, 11 Jan 2004 13:22:05 -0500 Subject: [AccessD] Database growth References: Message-ID: <003201c3d86f$d0fb5e90$6101a8c0@dejpolsys> ...are you on XP? William Hindman - Next Year In The Free State! ----- Original Message ----- From: "StaRKeY" To: "AccessD at databaseadvisors. com" Sent: Sunday, January 11, 2004 11:35 AM Subject: [AccessD] Database growth > Hi all, > > One question: > - Do linked tables also make the host mdb file grow? > > I figure it's only the tables (linked or not) that are being filled with > data which make a mdb file grow but maybe there are other reasons? > > > Regards, > Eric Starkenburg > > > > --- > avast! Antivirus: Outbound message clean. > Virus Database (VPS): 8-1-2004 > Tested on: 11-1-2004 17:35:58 > avast! is copyright (c) 2000-2003 ALWIL Software. > http://www.avast.com > > > > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com > From starkey at wanadoo.nl Sun Jan 11 13:48:27 2004 From: starkey at wanadoo.nl (StaRKeY) Date: Sun, 11 Jan 2004 20:48:27 +0100 Subject: [AccessD] Database growth In-Reply-To: <003201c3d86f$d0fb5e90$6101a8c0@dejpolsys> Message-ID: Hi William, no on 2K. -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of William Hindman Sent: zondag 11 januari 2004 19:22 To: Access Developers discussion and problem solving Subject: Re: [AccessD] Database growth ...are you on XP? William Hindman - Next Year In The Free State! ----- Original Message ----- From: "StaRKeY" To: "AccessD at databaseadvisors. com" Sent: Sunday, January 11, 2004 11:35 AM Subject: [AccessD] Database growth > Hi all, > > One question: > - Do linked tables also make the host mdb file grow? > > I figure it's only the tables (linked or not) that are being filled with > data which make a mdb file grow but maybe there are other reasons? > > > Regards, > Eric Starkenburg > > > > --- > avast! Antivirus: Outbound message clean. > Virus Database (VPS): 8-1-2004 > Tested on: 11-1-2004 17:35:58 > avast! is copyright (c) 2000-2003 ALWIL Software. > http://www.avast.com > > > > _______________________________________________ > 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 --- avast! Antivirus: Outbound message clean. Virus Database (VPS): 8-1-2004 Tested on: 11-1-2004 20:48:27 avast! is copyright (c) 2000-2003 ALWIL Software. http://www.avast.com From ssharkins at bellsouth.net Sun Jan 11 20:25:07 2004 From: ssharkins at bellsouth.net (Susan Harkins) Date: Sun, 11 Jan 2004 21:25:07 -0500 Subject: [AccessD] error questions Message-ID: <006f01c3d8b3$b90edb10$210110ac@SUSANONE> Any of you work with a generic error-handler for an entire module or perhaps even a public function instead of repeating possibilities in individual functions? Repeating error solutions and it seems inefficient. Susan H. From jwcolby at colbyconsulting.com Sun Jan 11 21:57:06 2004 From: jwcolby at colbyconsulting.com (John W. Colby) Date: Sun, 11 Jan 2004 22:57:06 -0500 Subject: [AccessD] error questions In-Reply-To: <006f01c3d8b3$b90edb10$210110ac@SUSANONE> Message-ID: Susan, The problem with that perspective is that the function that handles the error knows the context of the error, i.e. specifically what the program was doing at the time it happened. Sure, a "disk full" is a disk full regardless, but even then it may be on a zip where you want to prompt the user to change disks or something. OTOH, a "can't save the record because a field doesn't meet the criteria" is very specific to the table / field / form etc. I have a generic error handler but it is only to handle things like jet errors that occur during a query when other error handlers fail to trap the error. Things like that. John W. Colby www.ColbyConsulting.com -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Susan Harkins Sent: Sunday, January 11, 2004 9:25 PM To: AccessD at databaseadvisors.com Subject: [AccessD] error questions Any of you work with a generic error-handler for an entire module or perhaps even a public function instead of repeating possibilities in individual functions? Repeating error solutions and it seems inefficient. Susan H. _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From paul.hartland at fsmail.net Mon Jan 12 03:09:33 2004 From: paul.hartland at fsmail.net (paul.hartland at fsmail.net) Date: Mon, 12 Jan 2004 10:09:33 +0100 (CET) Subject: [AccessD] [dba-VB] Multiple-step operation generated errors - check each status value Message-ID: <16471030.1073898573219.JavaMail.www@wwinf3004> I'm a little puzzled now, I have just tried removing those lines of code from my program and I still get the Multiple step operation error ????, and it looks like it's the Ethnicity field. Anyone have a possible solution to this. Thanks in advance. Paul Hartland Message date : Jan 09 2004, 02:20 PM >From : Mike & Doris Manning To : 'Access Developers discussion and problem solving' Copy to : Subject : RE: RE: [AccessD] [dba-VB] Multiple-step operation generated errors - check each status value Look at your comparison, you are comparing to vbnullstring ("") and not 0. Also you are trying to store a string into an int -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of paul.hartland at fsmail.net Sent: Friday, January 09, 2004 8:16 AM To: Access Developers discussion and problem solving Subject: Re: RE: [AccessD] [dba-VB] Multiple-step operation generated errors - check each status value I know, but surely the tinyint data type accepts zero's or am I still missing something ? Message date : Jan 09 2004, 01:04 PM >From : Mike & Doris Manning To : 'Access Developers discussion and problem solving' Copy to : Subject : RE: [AccessD] [dba-VB] Multiple-step operation generated errors - check each status value A combo box bound to an Integer field will have a 0 after the user deletes the entry. Doris Manning Database Administrator Hargrove Inc. www.hargroveinc.com -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of paul.hartland at fsmail.net Sent: Friday, January 09, 2004 5:24 AM To: dba-vb Cc: accessd Subject: [AccessD] [dba-VB] Multiple-step operation generated errors - check each status value To all, I have a Visual Basic 6 FE which is connecting to a SQL Server 7.0 BE. One of my fields is called EthnicOrigin which is a TinyInt data type, which also allows Null. The control on the form is a DataCombo, with the list field being Ethnicity and the BoundColumn being EthnicityID. When a user selects an Ethnicity all is well no problem with updating etc as the EthnicityID is entered into the Field and the DataCombo display the Ethnicity. If the user deletes the entry from EthnicOrigin then when the record tries to update I get the error Multiple-step operation generated errors - check each status value Below is the code for updating: With rsPersonnel If (frmOrrPersonnel.PVEthnic <> "") Then .Fields("EthnicOrigin") = frmOrrPersonnel.PVEthnic.BoundText Else .Fields("EthnicOrigin") = 0 End If .Update End With Can anyone tell me what I am doing wrong ? Thanks in advance for any help as this is really starting to frustrate me. Paul Hartland Freeserve AnyTime - HALF PRICE for the first 3 months - Save ?7.50 a month www.freeserve.com/anytime _______________________________________________ dba-VB mailing list dba-VB at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/dba-vb http://www.databaseadvisors.com _______________________________________________ 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 Freeserve AnyTime - HALF PRICE for the first 3 months - Save ?7.50 a month www.freeserve.com/anytime _______________________________________________ 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 Freeserve AnyTime - HALF PRICE for the first 3 months - Save ?7.50 a month www.freeserve.com/anytime From LChristian at MassMutual.com Mon Jan 12 05:51:52 2004 From: LChristian at MassMutual.com (Christian, Lorraine) Date: Mon, 12 Jan 2004 06:51:52 -0500 Subject: [AccessD] Outlook SP3 Message-ID: <5B898D9F0627974EB82D0645E52B1E7D035CBA6B@EXMBPR03.na.mmfg.net> Hi - I have a 2000 Access database that fires off an automatic email. Everything was working fine until I upgraded Outlook to SP3. The code that creates the email message returns this error. "A program is trying to access e-mail addresses you have stored in Outlook. Do you want to allow this? If this is unexpected, it may be a virus and you should choose "No"." There is also a check box on the message that says Allow access for and then you choose the amount of time. Below is the code I am using: Private Sub cmdPositiveEmail_Click() If txtEmailDate.Value <> " " Then MsgBox "Email was already sent on " & Format(txtEmailDate.Value, "mm/dd/yyyy"), vbOKOnly Else Call SendPositiveMessage(False) txtEmailDate.Value = Now() txtTypeOfEmail.Value = "Without Errors" End If End Sub Private Sub SendPositiveMessage(DisplayMsg As Boolean) Dim objOutlook As Object Dim objOutlookMsg As Object Dim i As Integer Dim strTo As String Dim strSubject As String Dim strBody As String On Error GoTo errorhandler 'On Error Resume Next ' Create the Outlook session. Set objOutlook = CreateObject("Outlook.Application") ' Create the message. Set objOutlookMsg = objOutlook.CreateItem(olMailItem) ' Retrieves the value from the txtCAName on the form and is assigned ' to the variable myTo to be used in an Outlook message. strTo = Me.txtCAName.Value ' Retrieves the value from the txtCIPolNo on the form and is assigned ' to the variable mySubject to be used in an Outlook message. strSubject = "Quality Assurance Results: Policy #: " & txtCIPolNo.Value ' Assigns' variable myBody to be used in an Outlook message. strBody = "This case was processed correctly and met all expectations and guidelines." & vbNewLine & vbNewLine & _ "Great job!. " With objOutlookMsg .To = strTo .Recipients.ResolveAll .Subject = strSubject .Body = strBody .Importance = olImportanceHigh .PrintOut .Send End With Set objOutlook = Nothing Set objOutlookMsg = Nothing MsgBox "Message sent successfully...", vbOKOnly, "Email Notification" cmdMainDetail.SetFocus Exit Sub errorhandler: MsgBox "Outlook could not find sender's name.", vbOKOnly + vbCritical, "Outlook Message" With objOutlookMsg .Display End With Set objOutlook = Nothing Set objOutlookMsg = Nothing MsgBox "Message sent successfully...", vbOKOnly, "Email Notification" cmdMainDetail.SetFocus cmdEmail.Visible = True cmdSend.Visible = False cmdPositiveEmail.ForeColor = vbBlack Exit Sub End Sub I believe the message is a precaution set up through Microsoft that comes with SP3. My problem is that I have to click this message several times until my code continues to run. I believe that it is trying to access address book on .resolveall and .send. Not sure how I can fix this problem. I can live with clicking "Yes" once, but would like if the message does not appear at all. Does any one know how to get around this? Thanks in advance. Lorraine Christian MassMutual Financial Group New Business Operations 413.744.5335 lchristian at massmutual.com --------------------------------------------------------- This e-mail transmission may contain information that is proprietary, privileged and/or confidential and is intended exclusively for the person(s) to whom it is addressed. Any use, copying, retention or disclosure by any person other than the intended recipient or the intended recipient's designees is strictly prohibited. If you are not the intended recipient or their designee, please notify the sender immediately by return e-mail and delete all copies. --------------------------------------------------------- From bheid at appdevgrp.com Mon Jan 12 06:22:25 2004 From: bheid at appdevgrp.com (Bobby Heid) Date: Mon, 12 Jan 2004 07:22:25 -0500 Subject: [AccessD] Outlook SP3 In-Reply-To: <916187228923D311A6FE00A0CC3FAA3072A163@ADGSERVER> Message-ID: <916187228923D311A6FE00A0CC3FAA305BB16C@ADGSERVER> Ahhh, the great MS Outlook security gotcha. I believe that if you are on an Exchange system, that your Exchange administrator can set it up so that your account (or the one the application is using) can bypass the security stuff. Look at www.slipstick.com for much more information on this. Also look at http://www.dimastr.com/redemption/ for the Redemption package that lets you bypass the security stuff. BTW, you get to work too early. LOL. HTH, Bobby -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Christian, Lorraine Sent: Monday, January 12, 2004 6:52 AM To: Access Developers discussion and problem solving Subject: [AccessD] Outlook SP3 Hi - I have a 2000 Access database that fires off an automatic email. Everything was working fine until I upgraded Outlook to SP3. The code that creates the email message returns this error. "A program is trying to access e-mail addresses you have stored in Outlook. Do you want to allow this? If this is unexpected, it may be a virus and you should choose "No"." There is also a check box on the message that says Allow access for and then you choose the amount of time. Below is the code I am using: Private Sub cmdPositiveEmail_Click() If txtEmailDate.Value <> " " Then MsgBox "Email was already sent on " & Format(txtEmailDate.Value, "mm/dd/yyyy"), vbOKOnly Else Call SendPositiveMessage(False) txtEmailDate.Value = Now() txtTypeOfEmail.Value = "Without Errors" End If End Sub Private Sub SendPositiveMessage(DisplayMsg As Boolean) Dim objOutlook As Object Dim objOutlookMsg As Object Dim i As Integer Dim strTo As String Dim strSubject As String Dim strBody As String On Error GoTo errorhandler 'On Error Resume Next ' Create the Outlook session. Set objOutlook = CreateObject("Outlook.Application") ' Create the message. Set objOutlookMsg = objOutlook.CreateItem(olMailItem) ' Retrieves the value from the txtCAName on the form and is assigned ' to the variable myTo to be used in an Outlook message. strTo = Me.txtCAName.Value ' Retrieves the value from the txtCIPolNo on the form and is assigned ' to the variable mySubject to be used in an Outlook message. strSubject = "Quality Assurance Results: Policy #: " & txtCIPolNo.Value ' Assigns' variable myBody to be used in an Outlook message. strBody = "This case was processed correctly and met all expectations and guidelines." & vbNewLine & vbNewLine & _ "Great job!. " With objOutlookMsg .To = strTo .Recipients.ResolveAll .Subject = strSubject .Body = strBody .Importance = olImportanceHigh .PrintOut .Send End With Set objOutlook = Nothing Set objOutlookMsg = Nothing MsgBox "Message sent successfully...", vbOKOnly, "Email Notification" cmdMainDetail.SetFocus Exit Sub errorhandler: MsgBox "Outlook could not find sender's name.", vbOKOnly + vbCritical, "Outlook Message" With objOutlookMsg .Display End With Set objOutlook = Nothing Set objOutlookMsg = Nothing MsgBox "Message sent successfully...", vbOKOnly, "Email Notification" cmdMainDetail.SetFocus cmdEmail.Visible = True cmdSend.Visible = False cmdPositiveEmail.ForeColor = vbBlack Exit Sub End Sub I believe the message is a precaution set up through Microsoft that comes with SP3. My problem is that I have to click this message several times until my code continues to run. I believe that it is trying to access address book on .resolveall and .send. Not sure how I can fix this problem. I can live with clicking "Yes" once, but would like if the message does not appear at all. Does any one know how to get around this? Thanks in advance. Lorraine Christian MassMutual Financial Group New Business Operations 413.744.5335 lchristian at massmutual.com --------------------------------------------------------- This e-mail transmission may contain information that is proprietary, privileged and/or confidential and is intended exclusively for the person(s) to whom it is addressed. Any use, copying, retention or disclosure by any person other than the intended recipient or the intended recipient's designees is strictly prohibited. If you are not the intended recipient or their designee, please notify the sender immediately by return e-mail and delete all copies. --------------------------------------------------------- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From mikedorism at adelphia.net Mon Jan 12 06:25:33 2004 From: mikedorism at adelphia.net (Mike & Doris Manning) Date: Mon, 12 Jan 2004 07:25:33 -0500 Subject: [AccessD] error questions In-Reply-To: <006f01c3d8b3$b90edb10$210110ac@SUSANONE> Message-ID: <000001c3d907$2cef8900$8b194244@hargrove.internal> John is right that you wouldn't always want to do this because sometimes it is better to handle the issue within the calling procedure or function. However, I do handle some of the more common errors (such as lost SQL connection or printer problems) within my generic error handling function because that made more sense to me. Doris Manning Database Administrator Hargrove Inc. www.hargroveinc.com -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Susan Harkins Sent: Sunday, January 11, 2004 9:25 PM To: AccessD at databaseadvisors.com Subject: [AccessD] error questions Any of you work with a generic error-handler for an entire module or perhaps even a public function instead of repeating possibilities in individual functions? Repeating error solutions and it seems inefficient. Susan H. _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From bheid at appdevgrp.com Mon Jan 12 06:26:12 2004 From: bheid at appdevgrp.com (Bobby Heid) Date: Mon, 12 Jan 2004 07:26:12 -0500 Subject: [AccessD] Outlook.pst Hosed In-Reply-To: <916187228923D311A6FE00A0CC3FAA30729D84@ADGSERVER> Message-ID: <916187228923D311A6FE00A0CC3FAA305BB16D@ADGSERVER> I just recently had an archive PST file that was at about 450MB and about 60,000 e-mails all of a sudden saying it had about 2000 e-mails. After backing it up, I ran scanpst and it said that there were no problems. After compacting the PST, I only had 8MB. I had to restore back to a 12/10/03 backup, which thoroughly sucked. Bobby -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Don Bozarth Sent: Friday, January 09, 2004 7:03 PM To: Access Developers discussion and problem solving Subject: Re: [AccessD] Outlook.pst Hosed Arthur, Try the .pst repair tool (scanpst.exe) normally located in \program files\common files\system\mapi\1033\NT. This puppy scans the .pst and will fix most (but not all) errors. Don B. ----- Original Message ----- From: "Arthur Fuller" To: "Access Developers discussion and problem solving" Sent: Friday, January 09, 2004 3:07 PM Subject: [AccessD] Outlook.pst Hosed > I sent a message on this subject a few days ago, but maybe I missed > its posting. At any rate, a sudden power outage hosed my PST file and > now I can > read some of it but cannot send or receive. Further, when I try to > extract the contents using Access I can get only a few of the > (numerous) folders. > > Ideas? > > TIA, > Arthur > > --- > Outgoing mail is certified Virus Free. > Checked by AVG anti-virus system (http://www.grisoft.com). > Version: 6.0.558 / Virus Database: 350 - Release Date: 1/2/2004 > > > _______________________________________________ > 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 From Mark.Mitsules at ngc.com Mon Jan 12 06:52:09 2004 From: Mark.Mitsules at ngc.com (Mitsules, Mark S. (Newport News)) Date: Mon, 12 Jan 2004 07:52:09 -0500 Subject: [AccessD] OT: ASP Oddity (Context Switching) Message-ID: Thank you Andrew. Mark -----Original Message----- From: Haslett, Andrew [mailto:andrew.haslett at ilc.gov.au] Sent: Saturday, January 10, 2004 5:00 AM To: 'Access Developers discussion and problem solving' Subject: RE: [AccessD] OT: ASP Oddity (Context Switching) http://msdn.microsoft.com/library/default.asp?URL=/library/en-us/dnasp/html/ ASPtips.asp -----Original Message----- From: Mitsules, Mark S. (Newport News) [mailto:Mark.Mitsules at ngc.com] Sent: Saturday, 10 January 2004 3:20 AM To: 'Access Developers discussion and problem solving' Subject: RE: [AccessD] OT: ASP Oddity (Context Switching) I tried a very quick search yesterday on that quoted title...didn't come across it. Don't spend any time on it, but if someone does find the article for their own purposes, I'd appreciate a link. Mark -----Original Message----- From: DWUTKA at marlow.com [mailto:DWUTKA at marlow.com] Sent: Friday, January 09, 2004 11:39 AM To: accessd at databaseadvisors.com Subject: RE: [AccessD] OT: ASP Oddity (Context Switching) Never saw that article. Drew -----Original Message----- From: Haslett, Andrew [mailto:andrew.haslett at ilc.gov.au] Sent: Friday, January 09, 2004 5:37 AM To: 'Access Developers discussion and problem solving' Subject: RE: [AccessD] OT: ASP Oddity (Context Switching) Yeah there was a big argument regarding 'context-switching' in the asp community, especially with ASP2.0. The performance difference in ASP3.0 is negligible so it really boils down to your preference, what is easier to read/debug etc. I think the infamous MS article "Top 25 techniques for ASP" or the like included a statement about context switching, although a couple of the issues raised in that article were debateable. Cheers, Andrew -----Original Message----- From: DWUTKA at marlow.com [mailto:DWUTKA at marlow.com] Sent: Friday, 9 January 2004 6:29 AM To: AccessD at databaseadvisors.com Subject: [AccessD] OT: ASP Oddity Sorry for the OT post, but I ran into this last month, and was just flabbergasted that this worked this way. I was doing an ASP sub-contract for my sister, for a jewelry company (http://edlevinjewelry.com) . In the HTML of some of the pages, I found stuff like this: <% If so.type="merchant" then %> This is a test <% End if%> It wasn't coded (or worded, obviously) like that, but that is the gist of it. There was an If Then clause, with regular old HTML in the middle. Sure enough, if the criteria isn't met, the HTML isn't displayed. I never realized (until I saw that), that you could do that. Up until now, I have always done something like this: <% If This=True Then response.write "Test" End if %> In that case, the ASP is writing out the HTML. In some cases, it doesn't make much of a difference. However, I write most of my HTML by hand, using the Microsoft Script Editor, which does a lot of autocompletion, and makes writing raw HTML a breeze. But when I had to put out conditional HTML, I lost all of the advantages of the editor, because I was putting the HTML into a string. What's odd, is I have never run across this in ASP documentation. Once again, sorry for the OT post, but I know there are several listers out there that are either starting out in ASP, or have been using it for a while, and hopefully, this will be helpful to ya'all. Just out of curiousity, did anyone else know this? Drew _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com IMPORTANT - PLEASE READ ******************** This email and any files transmitted with it are confidential and may contain information protected by law from disclosure. If you have received this message in error, please notify the sender immediately and delete this email from your system. No warranty is given that this email or files, if attached to this email, are free from computer viruses or other defects. They are provided on the basis the user assumes all responsibility for loss, damage or consequence resulting directly or indirectly from their use, whether caused by the negligence of the sender or not. _______________________________________________ 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 _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com IMPORTANT - PLEASE READ ******************** This email and any files transmitted with it are confidential and may contain information protected by law from disclosure. If you have received this message in error, please notify the sender immediately and delete this email from your system. No warranty is given that this email or files, if attached to this email, are free from computer viruses or other defects. They are provided on the basis the user assumes all responsibility for loss, damage or consequence resulting directly or indirectly from their use, whether caused by the negligence of the sender or not. _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From jwcolby at colbyconsulting.com Mon Jan 12 07:36:12 2004 From: jwcolby at colbyconsulting.com (John W. Colby) Date: Mon, 12 Jan 2004 08:36:12 -0500 Subject: [AccessD] A2K: Drag and Drop with Access In-Reply-To: <7622047232.20040109150759@cactus.dk> Message-ID: Gustav, Thanks for that link. I think (from a quick scan) that I am at least capable of understanding what he is up to. It will be a natural to drop into my framework which uses a class for each control and withevents for all control events. John W. Colby www.ColbyConsulting.com -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Gustav Brock Sent: Friday, January 09, 2004 9:08 AM To: accessd at databaseadvisors.com Subject: Re: [AccessD] A2K: Drag and Drop with Access Hi John, Dick Here's another article on that subject. This, however, deals with the content of a control. The link terminates ultimo January: What a Drag it is: Drag and Drop in Access This month, Doug Steele shows you how to add drag-and-drop to your Access application using combinations of multi-value and single-value controls. http://www.pinpub.com/html/main.isx?sub=62&story=2604 This implementation though "screams" to be wrapped into WithEvents ... /gustav > Go to Peter DeBaets website and check out his Drag-N-Dropper program. > It works very well > http://www.peterssoftware.com > -----Original Message----- > From: accessd-bounces at databaseadvisors.com > [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Darren DICK > Sent: Wednesday, June 04, 2003 9:59 PM > To: AccessD List > Subject: [AccessD] A2K: Drag and Drop with Access > Anyone have any success with dragging and dropping of controls onto > Access forms? Eg I have an Image control displaying an image and say > it's in the top left corner of the form. I want to 'click' onto the > image control and 'drag' it to say... the bottom left corner of the > form. > I have found heaps of samples for VB but they use VB only events etc, > that I can't replicate or fudge in Access. _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From LChristian at MassMutual.com Mon Jan 12 08:46:47 2004 From: LChristian at MassMutual.com (Christian, Lorraine) Date: Mon, 12 Jan 2004 09:46:47 -0500 Subject: [AccessD] Outlook SP3 Message-ID: <5B898D9F0627974EB82D0645E52B1E7D035CBA6F@EXMBPR03.na.mmfg.net> Thanks Bobby.... Ahhhh, you know what they say...the early bird gets the worm :) Lorraine -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Bobby Heid Sent: Monday, January 12, 2004 7:22 AM To: 'Access Developers discussion and problem solving' Subject: RE: [AccessD] Outlook SP3 Ahhh, the great MS Outlook security gotcha. I believe that if you are on an Exchange system, that your Exchange administrator can set it up so that your account (or the one the application is using) can bypass the security stuff. Look at www.slipstick.com for much more information on this. Also look at http://www.dimastr.com/redemption/ for the Redemption package that lets you bypass the security stuff. BTW, you get to work too early. LOL. HTH, Bobby -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Christian, Lorraine Sent: Monday, January 12, 2004 6:52 AM To: Access Developers discussion and problem solving Subject: [AccessD] Outlook SP3 Hi - I have a 2000 Access database that fires off an automatic email. Everything was working fine until I upgraded Outlook to SP3. The code that creates the email message returns this error. "A program is trying to access e-mail addresses you have stored in Outlook. Do you want to allow this? If this is unexpected, it may be a virus and you should choose "No"." There is also a check box on the message that says Allow access for and then you choose the amount of time. Below is the code I am using: Private Sub cmdPositiveEmail_Click() If txtEmailDate.Value <> " " Then MsgBox "Email was already sent on " & Format(txtEmailDate.Value, "mm/dd/yyyy"), vbOKOnly Else Call SendPositiveMessage(False) txtEmailDate.Value = Now() txtTypeOfEmail.Value = "Without Errors" End If End Sub Private Sub SendPositiveMessage(DisplayMsg As Boolean) Dim objOutlook As Object Dim objOutlookMsg As Object Dim i As Integer Dim strTo As String Dim strSubject As String Dim strBody As String On Error GoTo errorhandler 'On Error Resume Next ' Create the Outlook session. Set objOutlook = CreateObject("Outlook.Application") ' Create the message. Set objOutlookMsg = objOutlook.CreateItem(olMailItem) ' Retrieves the value from the txtCAName on the form and is assigned ' to the variable myTo to be used in an Outlook message. strTo = Me.txtCAName.Value ' Retrieves the value from the txtCIPolNo on the form and is assigned ' to the variable mySubject to be used in an Outlook message. strSubject = "Quality Assurance Results: Policy #: " & txtCIPolNo.Value ' Assigns' variable myBody to be used in an Outlook message. strBody = "This case was processed correctly and met all expectations and guidelines." & vbNewLine & vbNewLine & _ "Great job!. " With objOutlookMsg .To = strTo .Recipients.ResolveAll .Subject = strSubject .Body = strBody .Importance = olImportanceHigh .PrintOut .Send End With Set objOutlook = Nothing Set objOutlookMsg = Nothing MsgBox "Message sent successfully...", vbOKOnly, "Email Notification" cmdMainDetail.SetFocus Exit Sub errorhandler: MsgBox "Outlook could not find sender's name.", vbOKOnly + vbCritical, "Outlook Message" With objOutlookMsg .Display End With Set objOutlook = Nothing Set objOutlookMsg = Nothing MsgBox "Message sent successfully...", vbOKOnly, "Email Notification" cmdMainDetail.SetFocus cmdEmail.Visible = True cmdSend.Visible = False cmdPositiveEmail.ForeColor = vbBlack Exit Sub End Sub I believe the message is a precaution set up through Microsoft that comes with SP3. My problem is that I have to click this message several times until my code continues to run. I believe that it is trying to access address book on .resolveall and .send. Not sure how I can fix this problem. I can live with clicking "Yes" once, but would like if the message does not appear at all. Does any one know how to get around this? Thanks in advance. Lorraine Christian MassMutual Financial Group New Business Operations 413.744.5335 lchristian at massmutual.com --------------------------------------------------------- This e-mail transmission may contain information that is proprietary, privileged and/or confidential and is intended exclusively for the person(s) to whom it is addressed. Any use, copying, retention or disclosure by any person other than the intended recipient or the intended recipient's designees is strictly prohibited. If you are not the intended recipient or their designee, please notify the sender immediately by return e-mail and delete all copies. --------------------------------------------------------- _______________________________________________ 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 From mwhittinghill at symphonyinfo.com Mon Jan 12 09:09:33 2004 From: mwhittinghill at symphonyinfo.com (Mark Whittinghill) Date: Mon, 12 Jan 2004 09:09:33 -0600 Subject: [AccessD] Using Access 2000 apps on Access 2003 Message-ID: <001201c3d91e$16721f50$2501a8c0@PASCAL> Are there any problems in using an application built in A2K on a computer with Access 2003? Mark Whittinghill Symphony Information Services 763-391-7400 mwhittinghill at symphonyinfo.com From ssharkins at bellsouth.net Mon Jan 12 09:07:49 2004 From: ssharkins at bellsouth.net (Susan Harkins) Date: Mon, 12 Jan 2004 10:07:49 -0500 Subject: [AccessD] error questions References: <000001c3d907$2cef8900$8b194244@hargrove.internal> Message-ID: <003d01c3d91d$e3c51990$210110ac@SUSANONE> Doris -- I'd like to see that sometime. I do agree with you both that it wouldn't always be appropriate, but geez Louise ... give me a break! Please!!!!!!!!!! ;) Somewhere I've got a whole book on error handling, I really ought to read it. Susan H. > John is right that you wouldn't always want to do this because sometimes it > is better to handle the issue within the calling procedure or function. > However, I do handle some of the more common errors (such as lost SQL > connection or printer problems) within my generic error handling function > because that made more sense to me. From dbcfour at triad.rr.com Mon Jan 12 10:21:27 2004 From: dbcfour at triad.rr.com (dbcfour at triad.rr.com) Date: Mon, 12 Jan 2004 11:21:27 -0500 Subject: [AccessD] Smolin Memorial Contribution Message-ID: <3cfb2b3cd09f.3cd09f3cfb2b@southeast.rr.com> On Sunday January 11, 2004 Bernard Smolin, father of our long time and much respected fellow member Rocky Smolin, passed away. After a number of members expressed a desire to share an expression of sympathy, arrangements have been made for Keith Williamson to collect Memorial Contribution(s), and present a check to the National Jewish Medical & Research Center (http://www.njc.org/fr/joymem.html) on our behalf. Those wishing to express their sincere and heartfelt sympathy to the Family in this manner can contribute via the website at http://www.databaseadvisors.com/donations.htm It is important, however, that you clearly indicate in the notes section of the Paypal form, the nature of the contribution. For those that prefer to mail a check, please do so by mailing a check to: Database Advisors Inc. c/o Keith Williamson 450 Franklin Street Apt B Havre de Grace, MD 21078 All contributions should be made no later than Friday January 16th, and be clearly marked as Smolin Memorial Fund. A special Thank You to Keith for his willingness to assist us in this effort. Donna Cook From Mark.Mitsules at ngc.com Mon Jan 12 10:21:52 2004 From: Mark.Mitsules at ngc.com (Mitsules, Mark S. (Newport News)) Date: Mon, 12 Jan 2004 11:21:52 -0500 Subject: [AccessD] Access Security - Web Based ASP Message-ID: Drew, Susan, ;) Surprising what a little research on "Integrated Windows Authentication" turns up... http://techrepublic.com.com/5102-6329-5069829.html Mark -----Original Message----- From: DWUTKA at marlow.com [mailto:DWUTKA at marlow.com] Sent: Friday, January 09, 2004 4:06 PM To: accessd at databaseadvisors.com Subject: RE: [AccessD] Access Security - Web Based ASP With ASP, you can get the users logged in account, either with Integrated Windows Authentication, or plain text password. No need to have security on the db itself, if you don't put it into a directory 'visible' from the web. Drew -----Original Message----- From: Mitsules, Mark S. (Newport News) [mailto:Mark.Mitsules at ngc.com] Sent: Friday, January 09, 2004 2:40 PM To: '[AccessD]' Subject: [AccessD] Access Security - Web Based ASP I have an existing .mdb "protected" only by an API call to GetUserName...very limited access. It contains time charging data for the entire department ("company confidential...need to know" type stuff). In the simplest of terms, what is the minimum necessary to achieve the following scenario? I would like a user to be able to access ONLY THEIR time charging data through a web page interface. Are there alternatives? Mark _______________________________________________ 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 From joconnell at indy.rr.com Mon Jan 12 10:23:29 2004 From: joconnell at indy.rr.com (Joseph O'Connell) Date: Mon, 12 Jan 2004 11:23:29 -0500 Subject: [AccessD] Change printer Message-ID: <000e01c3d928$6bab1800$6701a8c0@joe> Cross posted to Access-L and AccessD I thought this was discussed recently, but I cannot find the solution in the archives. Win 2000 Access 2000 Is there an easy way to change the output device for a report? An application has several reports that are normally sent to a specific printer. Now the client wants the ability to selectively create a PDF using Adobe Distiller and have the PDF sent as an attachment to an email message. Because this procedure must be totally automated, having the print dialog box popup is not a viable solution. I know that this could be accomplished by having a second set of reports that are already set to output to Distiller, but this would create a maintenance problem to ensure that any changes made to a printed report are also made to the Distiller report. What I am looking for is code that can change the destination to Distiller and then change it back to the original destination after the PDF is created. Does anyone have the code to to this? Or can someone point me to the API that can read and set the printer for a specific report? Thanks. Joe O'Connell From wdhindman at bellsouth.net Mon Jan 12 10:29:56 2004 From: wdhindman at bellsouth.net (William Hindman) Date: Mon, 12 Jan 2004 11:29:56 -0500 Subject: [AccessD] OT - Smolin Memorial Fund References: <000001c3d907$2cef8900$8b194244@hargrove.internal> <003d01c3d91d$e3c51990$210110ac@SUSANONE> Message-ID: <004201c3d929$50a2d100$6101a8c0@dejpolsys> List ...bringing this over from the OT list because Rocky Smolin has been such a long time contributor here and many of you think of him as I do, a good friend that I've never laid eyes on but know and value more than many I have. ...Rocky lost his father yesterday ...many of the regulars on OT are contributing to a memorial donation made in his father's name ...I though some of the AccessD listers may be interested as well ...the details are quoted below. "Keith has offered/agreed to collect the Memorial Contribution(s) , and present a check to the National Jewish Medical & Research Center (http://www.njc.org/fr/joymem.html) on behalf of OT Those wishing to express their sincere and heartfelt sympathy to the Family in this manner can contribute via the website at http://www.databaseadvisors.com/donations.htm It is important, however, that you clearly indicate in the notes section of the Paypal form, the nature of the contribution. For those that prefer to mail a check: Database Advisors Inc. c/o Keith Williamson 450 Franklin Street Apt B Havre de Grace, MD 21078 All contributions should be made no later than Friday January 16th, and be clearly marked as Smolin Memorial Fund. A special Thank You to Keith for his willingness to assist us in this effort. Donna" William Hindman From martyconnelly at shaw.ca Mon Jan 12 12:34:31 2004 From: martyconnelly at shaw.ca (MartyConnelly) Date: Mon, 12 Jan 2004 10:34:31 -0800 Subject: [AccessD] Outlook SP3 References: <5B898D9F0627974EB82D0645E52B1E7D035CBA6F@EXMBPR03.na.mmfg.net> Message-ID: <4002E8B7.7080207@shaw.ca> Or conversely ... the early worm is for the birds. This is another quick and dirty method. Express ClickYes is a tiny program that sits in the taskbar and clicks the Yes button on behalf of you. It is free but I am not sure if it works with Outlook 2000 SP3 it says it works with SP2 and 2002 and 2003 http://www.express-soft.com/mailmate/clickyes.html Christian, Lorraine wrote: >Thanks Bobby.... > >Ahhhh, you know what they say...the early bird gets the worm :) > >Lorraine > >-----Original Message----- >From: accessd-bounces at databaseadvisors.com >[mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Bobby Heid >Sent: Monday, January 12, 2004 7:22 AM >To: 'Access Developers discussion and problem solving' >Subject: RE: [AccessD] Outlook SP3 > > >Ahhh, the great MS Outlook security gotcha. > >I believe that if you are on an Exchange system, that your Exchange >administrator can set it up so that your account (or the one the application >is using) can bypass the security stuff. > >Look at www.slipstick.com for much more information on this. Also look at >http://www.dimastr.com/redemption/ for the Redemption package that lets you >bypass the security stuff. > >BTW, you get to work too early. LOL. > >HTH, >Bobby > >-----Original Message----- >From: accessd-bounces at databaseadvisors.com >[mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Christian, >Lorraine >Sent: Monday, January 12, 2004 6:52 AM >To: Access Developers discussion and problem solving >Subject: [AccessD] Outlook SP3 > > >Hi - >I have a 2000 Access database that fires off an automatic email. Everything >was working fine until I upgraded Outlook to SP3. The code that creates the >email message returns this error. > >"A program is trying to access e-mail addresses you have stored in Outlook. >Do you want to allow this? > >If this is unexpected, it may be a virus and you should choose "No"." > >There is also a check box on the message that says Allow access for and then >you choose the amount of time. > >Below is the code I am using: > >Private Sub cmdPositiveEmail_Click() > If txtEmailDate.Value <> " " Then > MsgBox "Email was already sent on " & Format(txtEmailDate.Value, >"mm/dd/yyyy"), vbOKOnly > Else > Call SendPositiveMessage(False) > txtEmailDate.Value = Now() > txtTypeOfEmail.Value = "Without Errors" > End If >End Sub > >Private Sub SendPositiveMessage(DisplayMsg As Boolean) >Dim objOutlook As Object >Dim objOutlookMsg As Object >Dim i As Integer >Dim strTo As String >Dim strSubject As String >Dim strBody As String > >On Error GoTo errorhandler >'On Error Resume Next >' Create the Outlook session. >Set objOutlook = CreateObject("Outlook.Application") > >' Create the message. >Set objOutlookMsg = objOutlook.CreateItem(olMailItem) > >' Retrieves the value from the txtCAName on the form and is assigned >' to the variable myTo to be used in an Outlook message. >strTo = Me.txtCAName.Value > >' Retrieves the value from the txtCIPolNo on the form and is assigned >' to the variable mySubject to be used in an Outlook message. >strSubject = "Quality Assurance Results: Policy #: " & txtCIPolNo.Value > >' Assigns' variable myBody to be used in an Outlook message. >strBody = "This case was processed correctly and met all expectations and >guidelines." & vbNewLine & vbNewLine & _ >"Great job!. " > >With objOutlookMsg > .To = strTo > .Recipients.ResolveAll > .Subject = strSubject > .Body = strBody > .Importance = olImportanceHigh > .PrintOut > .Send >End With > > Set objOutlook = Nothing > Set objOutlookMsg = Nothing > MsgBox "Message sent successfully...", vbOKOnly, "Email Notification" > cmdMainDetail.SetFocus > Exit Sub > >errorhandler: > MsgBox "Outlook could not find sender's name.", vbOKOnly + vbCritical, >"Outlook Message" > With objOutlookMsg > .Display > End With > Set objOutlook = Nothing > Set objOutlookMsg = Nothing > MsgBox "Message sent successfully...", vbOKOnly, "Email Notification" > cmdMainDetail.SetFocus > cmdEmail.Visible = True > cmdSend.Visible = False > cmdPositiveEmail.ForeColor = vbBlack > Exit Sub >End Sub > >I believe the message is a precaution set up through Microsoft that comes >with SP3. My problem is >that I have to click this message several times until my code continues to >run. I believe that it is trying to access address book on .resolveall and >.send. Not sure how I can fix this problem. I can live with clicking "Yes" >once, but would like if the message does not appear at all. Does any one >know how to get around this? > >Thanks in advance. > >Lorraine Christian >MassMutual Financial Group >New Business Operations >413.744.5335 >lchristian at massmutual.com > >--------------------------------------------------------- >This e-mail transmission may contain information that is proprietary, >privileged and/or confidential and is intended exclusively for the person(s) >to whom it is addressed. Any use, copying, retention or disclosure by any >person other than the intended recipient or the intended recipient's >designees is strictly prohibited. If you are not the intended recipient or >their designee, please notify the sender immediately by return e-mail and >delete all copies. > >--------------------------------------------------------- > >_______________________________________________ >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 > > >_______________________________________________ >AccessD mailing list >AccessD at databaseadvisors.com >http://databaseadvisors.com/mailman/listinfo/accessd >Website: http://www.databaseadvisors.com > > > -- Marty Connelly Victoria, B.C. Canada From Mark.Mitsules at ngc.com Mon Jan 12 13:44:36 2004 From: Mark.Mitsules at ngc.com (Mitsules, Mark S. (Newport News)) Date: Mon, 12 Jan 2004 14:44:36 -0500 Subject: [AccessD] Access Security - Web Based ASP Message-ID: Erwin, Drew, et. al. or et. aliae., Since my application will reside on our company intranet, I've been looking into using Integrated Windows Authentication. I've yet to submit the request to have this implemented...I need to clarify a few things. If I'm reading this correctly, when an ASP page is requested, the "actual" LAN username and password are not sent...merely a hash. I can understand about the password, but the reason I'm going through this in the first place is to determine the actual user. I was hoping that this method would provide me with their LAN login name so that I can filter the available records and return only the user's records. Since I can not test this out, I was hoping someone can verify...with Integrated Windows Authentication in place, can I retrieve the LAN login name through an ASP page and use that as a parameter for a stored procedure? In other words, once they are on the LAN they can access my data, but I want to make sure they access only THEIR data. Is this possible? Mark -----Original Message----- From: Erwin Craps - IT Helps [mailto:Erwin.Craps at ithelps.be] Sent: Friday, January 09, 2004 4:45 PM To: Access Developers discussion and problem solving Subject: RE: [AccessD] Access Security - Web Based ASP I have a small little trick I used for same reasons. I'm using a seperate MDB file which has linked tables to the backend database. Only the tables I really need are in the WEB database. If it ain't there you can get in.... But I supose that you the data of the people are all in the same table. You need a password system to login via the web, these user/password are stored in a table in your db. When a correct match you store the ID of the person into the session. If you build SQL string than you always use the persons ID stored in the session. So don't use any parameters with the URL string for person identification. You should be reasonably safe with that, but not 100%, you never are 100% safe.... Erwin -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Mitsules, Mark S. (Newport News) Sent: Friday, January 09, 2004 10:33 PM To: 'Access Developers discussion and problem solving' Subject: RE: [AccessD] Access Security - Web Based ASP Thanks. I will research Integrated Windows Authentication as an option. Mark -----Original Message----- From: DWUTKA at marlow.com [mailto:DWUTKA at marlow.com] Sent: Friday, January 09, 2004 4:06 PM To: accessd at databaseadvisors.com Subject: RE: [AccessD] Access Security - Web Based ASP With ASP, you can get the users logged in account, either with Integrated Windows Authentication, or plain text password. No need to have security on the db itself, if you don't put it into a directory 'visible' from the web. Drew -----Original Message----- From: Mitsules, Mark S. (Newport News) [mailto:Mark.Mitsules at ngc.com] Sent: Friday, January 09, 2004 2:40 PM To: '[AccessD]' Subject: [AccessD] Access Security - Web Based ASP I have an existing .mdb "protected" only by an API call to GetUserName...very limited access. It contains time charging data for the entire department ("company confidential...need to know" type stuff). In the simplest of terms, what is the minimum necessary to achieve the following scenario? I would like a user to be able to access ONLY THEIR time charging data through a web page interface. Are there alternatives? Mark _______________________________________________ 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 _______________________________________________ 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 From LChristian at MassMutual.com Mon Jan 12 13:45:30 2004 From: LChristian at MassMutual.com (Christian, Lorraine) Date: Mon, 12 Jan 2004 14:45:30 -0500 Subject: [AccessD] Outlook SP3 Message-ID: <5B898D9F0627974EB82D0645E52B1E7D035CBA92@EXMBPR03.na.mmfg.net> <<<>>> Cute :) Thanks for your help. I will take a look at this also. I appreciate it Marty and thanks again Bobby! Have a sparkling afternoon :) Lorraine -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of MartyConnelly Sent: Monday, January 12, 2004 1:35 PM To: Access Developers discussion and problem solving Subject: Re: [AccessD] Outlook SP3 Or conversely ... the early worm is for the birds. This is another quick and dirty method. Express ClickYes is a tiny program that sits in the taskbar and clicks the Yes button on behalf of you. It is free but I am not sure if it works with Outlook 2000 SP3 it says it works with SP2 and 2002 and 2003 http://www.express-soft.com/mailmate/clickyes.html Christian, Lorraine wrote: >Thanks Bobby.... > >Ahhhh, you know what they say...the early bird gets the worm :) > >Lorraine > >-----Original Message----- >From: accessd-bounces at databaseadvisors.com >[mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Bobby Heid >Sent: Monday, January 12, 2004 7:22 AM >To: 'Access Developers discussion and problem solving' >Subject: RE: [AccessD] Outlook SP3 > > >Ahhh, the great MS Outlook security gotcha. > >I believe that if you are on an Exchange system, that your Exchange >administrator can set it up so that your account (or the one the application >is using) can bypass the security stuff. > >Look at www.slipstick.com for much more information on this. Also look at >http://www.dimastr.com/redemption/ for the Redemption package that lets you >bypass the security stuff. > >BTW, you get to work too early. LOL. > >HTH, >Bobby > >-----Original Message----- >From: accessd-bounces at databaseadvisors.com >[mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Christian, >Lorraine >Sent: Monday, January 12, 2004 6:52 AM >To: Access Developers discussion and problem solving >Subject: [AccessD] Outlook SP3 > > >Hi - >I have a 2000 Access database that fires off an automatic email. Everything >was working fine until I upgraded Outlook to SP3. The code that creates the >email message returns this error. > >"A program is trying to access e-mail addresses you have stored in Outlook. >Do you want to allow this? > >If this is unexpected, it may be a virus and you should choose "No"." > >There is also a check box on the message that says Allow access for and then >you choose the amount of time. > >Below is the code I am using: > >Private Sub cmdPositiveEmail_Click() > If txtEmailDate.Value <> " " Then > MsgBox "Email was already sent on " & Format(txtEmailDate.Value, >"mm/dd/yyyy"), vbOKOnly > Else > Call SendPositiveMessage(False) > txtEmailDate.Value = Now() > txtTypeOfEmail.Value = "Without Errors" > End If >End Sub > >Private Sub SendPositiveMessage(DisplayMsg As Boolean) >Dim objOutlook As Object >Dim objOutlookMsg As Object >Dim i As Integer >Dim strTo As String >Dim strSubject As String >Dim strBody As String > >On Error GoTo errorhandler >'On Error Resume Next >' Create the Outlook session. >Set objOutlook = CreateObject("Outlook.Application") > >' Create the message. >Set objOutlookMsg = objOutlook.CreateItem(olMailItem) > >' Retrieves the value from the txtCAName on the form and is assigned >' to the variable myTo to be used in an Outlook message. >strTo = Me.txtCAName.Value > >' Retrieves the value from the txtCIPolNo on the form and is assigned >' to the variable mySubject to be used in an Outlook message. >strSubject = "Quality Assurance Results: Policy #: " & txtCIPolNo.Value > >' Assigns' variable myBody to be used in an Outlook message. >strBody = "This case was processed correctly and met all expectations and >guidelines." & vbNewLine & vbNewLine & _ >"Great job!. " > >With objOutlookMsg > .To = strTo > .Recipients.ResolveAll > .Subject = strSubject > .Body = strBody > .Importance = olImportanceHigh > .PrintOut > .Send >End With > > Set objOutlook = Nothing > Set objOutlookMsg = Nothing > MsgBox "Message sent successfully...", vbOKOnly, "Email Notification" > cmdMainDetail.SetFocus > Exit Sub > >errorhandler: > MsgBox "Outlook could not find sender's name.", vbOKOnly + vbCritical, >"Outlook Message" > With objOutlookMsg > .Display > End With > Set objOutlook = Nothing > Set objOutlookMsg = Nothing > MsgBox "Message sent successfully...", vbOKOnly, "Email Notification" > cmdMainDetail.SetFocus > cmdEmail.Visible = True > cmdSend.Visible = False > cmdPositiveEmail.ForeColor = vbBlack > Exit Sub >End Sub > >I believe the message is a precaution set up through Microsoft that comes >with SP3. My problem is >that I have to click this message several times until my code continues to >run. I believe that it is trying to access address book on .resolveall and >.send. Not sure how I can fix this problem. I can live with clicking "Yes" >once, but would like if the message does not appear at all. Does any one >know how to get around this? > >Thanks in advance. > >Lorraine Christian >MassMutual Financial Group >New Business Operations >413.744.5335 >lchristian at massmutual.com > >--------------------------------------------------------- >This e-mail transmission may contain information that is proprietary, >privileged and/or confidential and is intended exclusively for the person(s) >to whom it is addressed. Any use, copying, retention or disclosure by any >person other than the intended recipient or the intended recipient's >designees is strictly prohibited. If you are not the intended recipient or >their designee, please notify the sender immediately by return e-mail and >delete all copies. > >--------------------------------------------------------- > >_______________________________________________ >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 > > >_______________________________________________ >AccessD mailing list >AccessD at databaseadvisors.com >http://databaseadvisors.com/mailman/listinfo/accessd >Website: http://www.databaseadvisors.com > > > -- Marty Connelly Victoria, B.C. Canada _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From stephen at bondsoftware.co.nz Mon Jan 12 13:48:08 2004 From: stephen at bondsoftware.co.nz (Stephen Bond) Date: Tue, 13 Jan 2004 08:48:08 +1300 Subject: [AccessD] Using Access 2000 apps on Access 2003 Message-ID: <70F3D727890C784291D8433E9C418F2908858E@server.bondsoftware.co.nz> I found one - A2003 requires precise syntax for referencing forms in a query - A2000 let you away with being less precise. > -----Original Message----- > From: Mark Whittinghill [mailto:mwhittinghill at symphonyinfo.com] > Sent: Tuesday, 13 January 2004 4:10 a.m. > To: accessd at databaseadvisors.com > Subject: [AccessD] Using Access 2000 apps on Access 2003 > > > Are there any problems in using an application built in A2K > on a computer > with Access 2003? > > Mark Whittinghill > Symphony Information Services > 763-391-7400 > mwhittinghill at symphonyinfo.com > > > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com > From Mark.Mitsules at ngc.com Mon Jan 12 13:50:29 2004 From: Mark.Mitsules at ngc.com (Mitsules, Mark S. (Newport News)) Date: Mon, 12 Jan 2004 14:50:29 -0500 Subject: [AccessD] Access Security - Web Based ASP Message-ID: Oops...forgot to ask...If I can retrieve the LAN login name, which server variable would it be? Mark -----Original Message----- From: Mitsules, Mark S. (Newport News) [mailto:Mark.Mitsules at ngc.com] Sent: Monday, January 12, 2004 2:45 PM To: 'Access Developers discussion and problem solving' Subject: RE: [AccessD] Access Security - Web Based ASP Erwin, Drew, et. al. or et. aliae., Since my application will reside on our company intranet, I've been looking into using Integrated Windows Authentication. I've yet to submit the request to have this implemented...I need to clarify a few things. If I'm reading this correctly, when an ASP page is requested, the "actual" LAN username and password are not sent...merely a hash. I can understand about the password, but the reason I'm going through this in the first place is to determine the actual user. I was hoping that this method would provide me with their LAN login name so that I can filter the available records and return only the user's records. Since I can not test this out, I was hoping someone can verify...with Integrated Windows Authentication in place, can I retrieve the LAN login name through an ASP page and use that as a parameter for a stored procedure? In other words, once they are on the LAN they can access my data, but I want to make sure they access only THEIR data. Is this possible? Mark -----Original Message----- From: Erwin Craps - IT Helps [mailto:Erwin.Craps at ithelps.be] Sent: Friday, January 09, 2004 4:45 PM To: Access Developers discussion and problem solving Subject: RE: [AccessD] Access Security - Web Based ASP I have a small little trick I used for same reasons. I'm using a seperate MDB file which has linked tables to the backend database. Only the tables I really need are in the WEB database. If it ain't there you can get in.... But I supose that you the data of the people are all in the same table. You need a password system to login via the web, these user/password are stored in a table in your db. When a correct match you store the ID of the person into the session. If you build SQL string than you always use the persons ID stored in the session. So don't use any parameters with the URL string for person identification. You should be reasonably safe with that, but not 100%, you never are 100% safe.... Erwin -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Mitsules, Mark S. (Newport News) Sent: Friday, January 09, 2004 10:33 PM To: 'Access Developers discussion and problem solving' Subject: RE: [AccessD] Access Security - Web Based ASP Thanks. I will research Integrated Windows Authentication as an option. Mark -----Original Message----- From: DWUTKA at marlow.com [mailto:DWUTKA at marlow.com] Sent: Friday, January 09, 2004 4:06 PM To: accessd at databaseadvisors.com Subject: RE: [AccessD] Access Security - Web Based ASP With ASP, you can get the users logged in account, either with Integrated Windows Authentication, or plain text password. No need to have security on the db itself, if you don't put it into a directory 'visible' from the web. Drew -----Original Message----- From: Mitsules, Mark S. (Newport News) [mailto:Mark.Mitsules at ngc.com] Sent: Friday, January 09, 2004 2:40 PM To: '[AccessD]' Subject: [AccessD] Access Security - Web Based ASP I have an existing .mdb "protected" only by an API call to GetUserName...very limited access. It contains time charging data for the entire department ("company confidential...need to know" type stuff). In the simplest of terms, what is the minimum necessary to achieve the following scenario? I would like a user to be able to access ONLY THEIR time charging data through a web page interface. Are there alternatives? Mark _______________________________________________ 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 _______________________________________________ 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 _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From DWUTKA at marlow.com Mon Jan 12 14:19:37 2004 From: DWUTKA at marlow.com (DWUTKA at marlow.com) Date: Mon, 12 Jan 2004 14:19:37 -0600 Subject: [AccessD] Access Security - Web Based ASP Message-ID: <2F8793082E00D4119A1700B0D0216BF802227717@main2.marlow.com> Yes, with integrated windows security, you can get their login name, with one of the server variables in ASP. You CANNOT get their password that way. If you use plain text, both login name and password are available. One word of caution, Integrated Windows Security will not pass the authentication over to other network resources, so if you database is not directly on the webserver, users will not be able to reach it, thus your application will not work. Drew -----Original Message----- From: Mitsules, Mark S. (Newport News) [mailto:Mark.Mitsules at ngc.com] Sent: Monday, January 12, 2004 1:45 PM To: 'Access Developers discussion and problem solving' Subject: RE: [AccessD] Access Security - Web Based ASP Erwin, Drew, et. al. or et. aliae., Since my application will reside on our company intranet, I've been looking into using Integrated Windows Authentication. I've yet to submit the request to have this implemented...I need to clarify a few things. If I'm reading this correctly, when an ASP page is requested, the "actual" LAN username and password are not sent...merely a hash. I can understand about the password, but the reason I'm going through this in the first place is to determine the actual user. I was hoping that this method would provide me with their LAN login name so that I can filter the available records and return only the user's records. Since I can not test this out, I was hoping someone can verify...with Integrated Windows Authentication in place, can I retrieve the LAN login name through an ASP page and use that as a parameter for a stored procedure? In other words, once they are on the LAN they can access my data, but I want to make sure they access only THEIR data. Is this possible? Mark -----Original Message----- From: Erwin Craps - IT Helps [mailto:Erwin.Craps at ithelps.be] Sent: Friday, January 09, 2004 4:45 PM To: Access Developers discussion and problem solving Subject: RE: [AccessD] Access Security - Web Based ASP I have a small little trick I used for same reasons. I'm using a seperate MDB file which has linked tables to the backend database. Only the tables I really need are in the WEB database. If it ain't there you can get in.... But I supose that you the data of the people are all in the same table. You need a password system to login via the web, these user/password are stored in a table in your db. When a correct match you store the ID of the person into the session. If you build SQL string than you always use the persons ID stored in the session. So don't use any parameters with the URL string for person identification. You should be reasonably safe with that, but not 100%, you never are 100% safe.... Erwin -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Mitsules, Mark S. (Newport News) Sent: Friday, January 09, 2004 10:33 PM To: 'Access Developers discussion and problem solving' Subject: RE: [AccessD] Access Security - Web Based ASP Thanks. I will research Integrated Windows Authentication as an option. Mark -----Original Message----- From: DWUTKA at marlow.com [mailto:DWUTKA at marlow.com] Sent: Friday, January 09, 2004 4:06 PM To: accessd at databaseadvisors.com Subject: RE: [AccessD] Access Security - Web Based ASP With ASP, you can get the users logged in account, either with Integrated Windows Authentication, or plain text password. No need to have security on the db itself, if you don't put it into a directory 'visible' from the web. Drew -----Original Message----- From: Mitsules, Mark S. (Newport News) [mailto:Mark.Mitsules at ngc.com] Sent: Friday, January 09, 2004 2:40 PM To: '[AccessD]' Subject: [AccessD] Access Security - Web Based ASP I have an existing .mdb "protected" only by an API call to GetUserName...very limited access. It contains time charging data for the entire department ("company confidential...need to know" type stuff). In the simplest of terms, what is the minimum necessary to achieve the following scenario? I would like a user to be able to access ONLY THEIR time charging data through a web page interface. Are there alternatives? Mark _______________________________________________ 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 _______________________________________________ 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 _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From DWUTKA at marlow.com Mon Jan 12 14:22:36 2004 From: DWUTKA at marlow.com (DWUTKA at marlow.com) Date: Mon, 12 Jan 2004 14:22:36 -0600 Subject: [AccessD] Access Security - Web Based ASP Message-ID: <2F8793082E00D4119A1700B0D0216BF802227718@main2.marlow.com> AUTH_USER -----Original Message----- From: Mitsules, Mark S. (Newport News) [mailto:Mark.Mitsules at ngc.com] Sent: Monday, January 12, 2004 1:50 PM To: 'Access Developers discussion and problem solving' Subject: RE: [AccessD] Access Security - Web Based ASP Oops...forgot to ask...If I can retrieve the LAN login name, which server variable would it be? Mark -----Original Message----- From: Mitsules, Mark S. (Newport News) [mailto:Mark.Mitsules at ngc.com] Sent: Monday, January 12, 2004 2:45 PM To: 'Access Developers discussion and problem solving' Subject: RE: [AccessD] Access Security - Web Based ASP Erwin, Drew, et. al. or et. aliae., Since my application will reside on our company intranet, I've been looking into using Integrated Windows Authentication. I've yet to submit the request to have this implemented...I need to clarify a few things. If I'm reading this correctly, when an ASP page is requested, the "actual" LAN username and password are not sent...merely a hash. I can understand about the password, but the reason I'm going through this in the first place is to determine the actual user. I was hoping that this method would provide me with their LAN login name so that I can filter the available records and return only the user's records. Since I can not test this out, I was hoping someone can verify...with Integrated Windows Authentication in place, can I retrieve the LAN login name through an ASP page and use that as a parameter for a stored procedure? In other words, once they are on the LAN they can access my data, but I want to make sure they access only THEIR data. Is this possible? Mark -----Original Message----- From: Erwin Craps - IT Helps [mailto:Erwin.Craps at ithelps.be] Sent: Friday, January 09, 2004 4:45 PM To: Access Developers discussion and problem solving Subject: RE: [AccessD] Access Security - Web Based ASP I have a small little trick I used for same reasons. I'm using a seperate MDB file which has linked tables to the backend database. Only the tables I really need are in the WEB database. If it ain't there you can get in.... But I supose that you the data of the people are all in the same table. You need a password system to login via the web, these user/password are stored in a table in your db. When a correct match you store the ID of the person into the session. If you build SQL string than you always use the persons ID stored in the session. So don't use any parameters with the URL string for person identification. You should be reasonably safe with that, but not 100%, you never are 100% safe.... Erwin -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Mitsules, Mark S. (Newport News) Sent: Friday, January 09, 2004 10:33 PM To: 'Access Developers discussion and problem solving' Subject: RE: [AccessD] Access Security - Web Based ASP Thanks. I will research Integrated Windows Authentication as an option. Mark -----Original Message----- From: DWUTKA at marlow.com [mailto:DWUTKA at marlow.com] Sent: Friday, January 09, 2004 4:06 PM To: accessd at databaseadvisors.com Subject: RE: [AccessD] Access Security - Web Based ASP With ASP, you can get the users logged in account, either with Integrated Windows Authentication, or plain text password. No need to have security on the db itself, if you don't put it into a directory 'visible' from the web. Drew -----Original Message----- From: Mitsules, Mark S. (Newport News) [mailto:Mark.Mitsules at ngc.com] Sent: Friday, January 09, 2004 2:40 PM To: '[AccessD]' Subject: [AccessD] Access Security - Web Based ASP I have an existing .mdb "protected" only by an API call to GetUserName...very limited access. It contains time charging data for the entire department ("company confidential...need to know" type stuff). In the simplest of terms, what is the minimum necessary to achieve the following scenario? I would like a user to be able to access ONLY THEIR time charging data through a web page interface. Are there alternatives? Mark _______________________________________________ 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 _______________________________________________ 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 _______________________________________________ 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 From Oleg_123 at xuppa.com Mon Jan 12 14:49:43 2004 From: Oleg_123 at xuppa.com (Oleg_123 at xuppa.com) Date: Mon, 12 Jan 2004 15:49:43 -0500 (EST) Subject: [AccessD] mail merge In-Reply-To: <2F8793082E00D4119A1700B0D0216BF802227718@main2.marlow.com> References: <2F8793082E00D4119A1700B0D0216BF802227718@main2.marlow.com> Message-ID: <53376.12.3.132.98.1073940583.squirrel@heck.bay9.com> Guys, when I run it I get an error , "Word was unable to open data source" everitihng is in its place, what should I do ? sCon = "DSN=ChoicePoint" If Len(sSQL) > 2 Then objWord.Application.ActiveDocument.MailMerge.OpenDataSource Name:="\\lsfp3\HRShare\recruiting\choicepoint\choicepnt.mdb", _ LinkToSource:=True, Connection:=sCon, SQLStatement:=sSQL objWord.ActiveDocument.MailMerge.Execute End If ----------------------------------------- Get Breaking News from CNN, ABC, NBC, CBS Now. http://www.xuppa.com/news/?link=webmail From cfoust at infostatsystems.com Mon Jan 12 14:52:58 2004 From: cfoust at infostatsystems.com (Charlotte Foust) Date: Mon, 12 Jan 2004 12:52:58 -0800 Subject: [AccessD] Change printer Message-ID: The GetPrinter API call will allow you to retrieve infromation on printers and the SetPrinter API call allows you to change the settings on a printer. They require the use of a custom type to handle the DevMode values, and you can find code for this at www.allapi.net and other places. However, you have to open the report itself in design view in code and change the printer, since this is saved as part of the design. Then when you print the report, it will go to the right printer. We do this in our applications using the PDF printer as the selected printer when we want to create PDF files. That means, you have to capture the choice before you create the PDF file, which means, you need to decide in advance what you're going to call that file and where you want to put it. Charlotte Foust -----Original Message----- From: Joseph O'Connell [mailto:joconnell at indy.rr.com] Sent: Monday, January 12, 2004 8:23 AM To: ACCESS-L at PEACH.EASE.LSOFT.COM; AccessD at databaseadvisors.com Subject: [AccessD] Change printer Cross posted to Access-L and AccessD I thought this was discussed recently, but I cannot find the solution in the archives. Win 2000 Access 2000 Is there an easy way to change the output device for a report? An application has several reports that are normally sent to a specific printer. Now the client wants the ability to selectively create a PDF using Adobe Distiller and have the PDF sent as an attachment to an email message. Because this procedure must be totally automated, having the print dialog box popup is not a viable solution. I know that this could be accomplished by having a second set of reports that are already set to output to Distiller, but this would create a maintenance problem to ensure that any changes made to a printed report are also made to the Distiller report. What I am looking for is code that can change the destination to Distiller and then change it back to the original destination after the PDF is created. Does anyone have the code to to this? Or can someone point me to the API that can read and set the printer for a specific report? Thanks. Joe O'Connell _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From Mark.Mitsules at ngc.com Mon Jan 12 14:53:10 2004 From: Mark.Mitsules at ngc.com (Mitsules, Mark S. (Newport News)) Date: Mon, 12 Jan 2004 15:53:10 -0500 Subject: [AccessD] Access Security - Web Based ASP Message-ID: Thank you Drew, that sounds feasible. I've been looking over http://www.w3schools.com/asp/default.asp most of the day...any other suggestions for examples or tutorials? Mark -----Original Message----- From: DWUTKA at marlow.com [mailto:DWUTKA at marlow.com] Sent: Monday, January 12, 2004 3:20 PM To: accessd at databaseadvisors.com Subject: RE: [AccessD] Access Security - Web Based ASP Yes, with integrated windows security, you can get their login name, with one of the server variables in ASP. You CANNOT get their password that way. If you use plain text, both login name and password are available. One word of caution, Integrated Windows Security will not pass the authentication over to other network resources, so if you database is not directly on the webserver, users will not be able to reach it, thus your application will not work. Drew -----Original Message----- From: Mitsules, Mark S. (Newport News) [mailto:Mark.Mitsules at ngc.com] Sent: Monday, January 12, 2004 1:45 PM To: 'Access Developers discussion and problem solving' Subject: RE: [AccessD] Access Security - Web Based ASP Erwin, Drew, et. al. or et. aliae., Since my application will reside on our company intranet, I've been looking into using Integrated Windows Authentication. I've yet to submit the request to have this implemented...I need to clarify a few things. If I'm reading this correctly, when an ASP page is requested, the "actual" LAN username and password are not sent...merely a hash. I can understand about the password, but the reason I'm going through this in the first place is to determine the actual user. I was hoping that this method would provide me with their LAN login name so that I can filter the available records and return only the user's records. Since I can not test this out, I was hoping someone can verify...with Integrated Windows Authentication in place, can I retrieve the LAN login name through an ASP page and use that as a parameter for a stored procedure? In other words, once they are on the LAN they can access my data, but I want to make sure they access only THEIR data. Is this possible? Mark -----Original Message----- From: Erwin Craps - IT Helps [mailto:Erwin.Craps at ithelps.be] Sent: Friday, January 09, 2004 4:45 PM To: Access Developers discussion and problem solving Subject: RE: [AccessD] Access Security - Web Based ASP I have a small little trick I used for same reasons. I'm using a seperate MDB file which has linked tables to the backend database. Only the tables I really need are in the WEB database. If it ain't there you can get in.... But I supose that you the data of the people are all in the same table. You need a password system to login via the web, these user/password are stored in a table in your db. When a correct match you store the ID of the person into the session. If you build SQL string than you always use the persons ID stored in the session. So don't use any parameters with the URL string for person identification. You should be reasonably safe with that, but not 100%, you never are 100% safe.... Erwin -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Mitsules, Mark S. (Newport News) Sent: Friday, January 09, 2004 10:33 PM To: 'Access Developers discussion and problem solving' Subject: RE: [AccessD] Access Security - Web Based ASP Thanks. I will research Integrated Windows Authentication as an option. Mark -----Original Message----- From: DWUTKA at marlow.com [mailto:DWUTKA at marlow.com] Sent: Friday, January 09, 2004 4:06 PM To: accessd at databaseadvisors.com Subject: RE: [AccessD] Access Security - Web Based ASP With ASP, you can get the users logged in account, either with Integrated Windows Authentication, or plain text password. No need to have security on the db itself, if you don't put it into a directory 'visible' from the web. Drew -----Original Message----- From: Mitsules, Mark S. (Newport News) [mailto:Mark.Mitsules at ngc.com] Sent: Friday, January 09, 2004 2:40 PM To: '[AccessD]' Subject: [AccessD] Access Security - Web Based ASP I have an existing .mdb "protected" only by an API call to GetUserName...very limited access. It contains time charging data for the entire department ("company confidential...need to know" type stuff). In the simplest of terms, what is the minimum necessary to achieve the following scenario? I would like a user to be able to access ONLY THEIR time charging data through a web page interface. Are there alternatives? Mark _______________________________________________ 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 _______________________________________________ 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 _______________________________________________ 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 From cfoust at infostatsystems.com Mon Jan 12 14:56:41 2004 From: cfoust at infostatsystems.com (Charlotte Foust) Date: Mon, 12 Jan 2004 12:56:41 -0800 Subject: [AccessD] Database growth Message-ID: If you haven't turned off subdatasheets, that will make the front end grow, but it will also grow if you make design changes and if you do a lot of action queries. Charlotte Foust -----Original Message----- From: StaRKeY [mailto:starkey at wanadoo.nl] Sent: Sunday, January 11, 2004 8:36 AM To: AccessD at databaseadvisors. com Subject: [AccessD] Database growth Hi all, One question: - Do linked tables also make the host mdb file grow? I figure it's only the tables (linked or not) that are being filled with data which make a mdb file grow but maybe there are other reasons? Regards, Eric Starkenburg --- avast! Antivirus: Outbound message clean. Virus Database (VPS): 8-1-2004 Tested on: 11-1-2004 17:35:58 avast! is copyright (c) 2000-2003 ALWIL Software. http://www.avast.com _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From DWUTKA at marlow.com Mon Jan 12 15:21:19 2004 From: DWUTKA at marlow.com (DWUTKA at marlow.com) Date: Mon, 12 Jan 2004 15:21:19 -0600 Subject: [AccessD] Access Security - Web Based ASP Message-ID: <2F8793082E00D4119A1700B0D0216BF802227719@main2.marlow.com> Took their quiz, and got 16 out of 20. The four I missed were odd (to me). I don't use javascript, so I got the question on how to set that as the ASP scripting language wrong, it asked how to identify the user, and I think it wanted to know 'cookie', but that's not true either.... the other two were BS (like AdRotator.....) Anyhow, I started ASP with a little tutorial I found on Planet Source code. It wasn't bad. Gave me the basics. The rest I learned simply by trial and error, and the MSDN. Drew -----Original Message----- From: Mitsules, Mark S. (Newport News) [mailto:Mark.Mitsules at ngc.com] Sent: Monday, January 12, 2004 2:53 PM To: 'Access Developers discussion and problem solving' Subject: RE: [AccessD] Access Security - Web Based ASP Thank you Drew, that sounds feasible. I've been looking over http://www.w3schools.com/asp/default.asp most of the day...any other suggestions for examples or tutorials? Mark -----Original Message----- From: DWUTKA at marlow.com [mailto:DWUTKA at marlow.com] Sent: Monday, January 12, 2004 3:20 PM To: accessd at databaseadvisors.com Subject: RE: [AccessD] Access Security - Web Based ASP Yes, with integrated windows security, you can get their login name, with one of the server variables in ASP. You CANNOT get their password that way. If you use plain text, both login name and password are available. One word of caution, Integrated Windows Security will not pass the authentication over to other network resources, so if you database is not directly on the webserver, users will not be able to reach it, thus your application will not work. Drew -----Original Message----- From: Mitsules, Mark S. (Newport News) [mailto:Mark.Mitsules at ngc.com] Sent: Monday, January 12, 2004 1:45 PM To: 'Access Developers discussion and problem solving' Subject: RE: [AccessD] Access Security - Web Based ASP Erwin, Drew, et. al. or et. aliae., Since my application will reside on our company intranet, I've been looking into using Integrated Windows Authentication. I've yet to submit the request to have this implemented...I need to clarify a few things. If I'm reading this correctly, when an ASP page is requested, the "actual" LAN username and password are not sent...merely a hash. I can understand about the password, but the reason I'm going through this in the first place is to determine the actual user. I was hoping that this method would provide me with their LAN login name so that I can filter the available records and return only the user's records. Since I can not test this out, I was hoping someone can verify...with Integrated Windows Authentication in place, can I retrieve the LAN login name through an ASP page and use that as a parameter for a stored procedure? In other words, once they are on the LAN they can access my data, but I want to make sure they access only THEIR data. Is this possible? Mark -----Original Message----- From: Erwin Craps - IT Helps [mailto:Erwin.Craps at ithelps.be] Sent: Friday, January 09, 2004 4:45 PM To: Access Developers discussion and problem solving Subject: RE: [AccessD] Access Security - Web Based ASP I have a small little trick I used for same reasons. I'm using a seperate MDB file which has linked tables to the backend database. Only the tables I really need are in the WEB database. If it ain't there you can get in.... But I supose that you the data of the people are all in the same table. You need a password system to login via the web, these user/password are stored in a table in your db. When a correct match you store the ID of the person into the session. If you build SQL string than you always use the persons ID stored in the session. So don't use any parameters with the URL string for person identification. You should be reasonably safe with that, but not 100%, you never are 100% safe.... Erwin -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Mitsules, Mark S. (Newport News) Sent: Friday, January 09, 2004 10:33 PM To: 'Access Developers discussion and problem solving' Subject: RE: [AccessD] Access Security - Web Based ASP Thanks. I will research Integrated Windows Authentication as an option. Mark -----Original Message----- From: DWUTKA at marlow.com [mailto:DWUTKA at marlow.com] Sent: Friday, January 09, 2004 4:06 PM To: accessd at databaseadvisors.com Subject: RE: [AccessD] Access Security - Web Based ASP With ASP, you can get the users logged in account, either with Integrated Windows Authentication, or plain text password. No need to have security on the db itself, if you don't put it into a directory 'visible' from the web. Drew -----Original Message----- From: Mitsules, Mark S. (Newport News) [mailto:Mark.Mitsules at ngc.com] Sent: Friday, January 09, 2004 2:40 PM To: '[AccessD]' Subject: [AccessD] Access Security - Web Based ASP I have an existing .mdb "protected" only by an API call to GetUserName...very limited access. It contains time charging data for the entire department ("company confidential...need to know" type stuff). In the simplest of terms, what is the minimum necessary to achieve the following scenario? I would like a user to be able to access ONLY THEIR time charging data through a web page interface. Are there alternatives? Mark _______________________________________________ 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 _______________________________________________ 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 _______________________________________________ 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 _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From DWUTKA at marlow.com Mon Jan 12 15:33:26 2004 From: DWUTKA at marlow.com (DWUTKA at marlow.com) Date: Mon, 12 Jan 2004 15:33:26 -0600 Subject: [AccessD] Presenting our archives tomorrow night. (Tuesday) Message-ID: <2F8793082E00D4119A1700B0D0216BF80222771D@main2.marlow.com> For those of you in the Dallas/Fort Worth Metroplex, I will be giving a presentation for MAD (Metroplex Access Developers) this Tuesday night. Meetings start at 6, I think my presentation is at 6:45. My presentation is on indexing memo fields, which is what I did for the AccessD archives that I host at home. Only place I ever used that too, so it's going to be my only live example. MAD's website is http://www.madtx.org which has meeting times/location. They meet the second tuesday of every month. Drew From andy at minstersystems.co.uk Mon Jan 12 17:11:50 2004 From: andy at minstersystems.co.uk (Andy Lacey) Date: Mon, 12 Jan 2004 23:11:50 -0000 Subject: [AccessD] Change printer In-Reply-To: <000e01c3d928$6bab1800$6701a8c0@joe> Message-ID: <008a01c3d961$75fa2a10$b274d0d5@minster33c3r25> Hi Joe This crops up regularly on the list. If you search the archives on PDF you'll find a bunch of hits with lots of advice. And I'd suggest you rename this thread to put PDF in it somewhere because there are solutions to creating a PDF which don't involve changing printers, basically by using 3rd-party products to do so, and other listers who know about those products may not spot the thread otherwise. Andy Lacey http://www.minstersystems.co.uk > -----Original Message----- > From: accessd-bounces at databaseadvisors.com > [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of > Joseph O'Connell > Sent: 12 January 2004 16:23 > To: ACCESS-L at PEACH.EASE.LSOFT.COM; AccessD at databaseadvisors.com > Subject: [AccessD] Change printer > > > Cross posted to Access-L and AccessD > > I thought this was discussed recently, but I cannot find the > solution in the archives. > > Win 2000 > Access 2000 > > Is there an easy way to change the output device for a > report? An application has several reports that are normally > sent to a specific printer. Now the client wants the ability > to selectively create a PDF using Adobe Distiller and have > the PDF sent as an attachment to an email message. Because > this procedure must be totally automated, having the print > dialog box popup is not a viable solution. > > I know that this could be accomplished by having a second set > of reports that are already set to output to Distiller, but > this would create a maintenance problem to ensure that any > changes made to a printed report are also made to the > Distiller report. What I am looking for is code that can > change the destination to Distiller and then change it back > to the original destination after the PDF is created. > > Does anyone have the code to to this? Or can someone point > me to the API that can read and set the printer for a specific report? > > Thanks. > > Joe O'Connell > > > > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/a> ccessd > Website: > http://www.databaseadvisors.com > > From lists at jbsolutions.com.au Mon Jan 12 18:06:54 2004 From: lists at jbsolutions.com.au (Joshua B) Date: Tue, 13 Jan 2004 10:06:54 +1000 Subject: [AccessD] Change printer Message-ID: <200401130007.i0D07wm31666@databaseadvisors.com> Hello Joseph O'Connell, Have a look here... http://www.mvps.org/access/reports/rpt0009.htm HTH ======= At 2004-01-12, 11:23:00 you wrote: ======= >Cross posted to Access-L and AccessD > >I thought this was discussed recently, but I cannot find the solution in the >archives. > >Win 2000 >Access 2000 > >Is there an easy way to change the output device for a report? An >application has several reports that are normally sent to a specific >printer. Now the client wants the ability to selectively create a PDF using >Adobe Distiller and have the PDF sent as an attachment to an email message. >Because this procedure must be totally automated, having the print dialog >box popup is not a viable solution. > >I know that this could be accomplished by having a second set of reports >that are already set to output to Distiller, but this would create a >maintenance problem to ensure that any changes made to a printed report are >also made to the Distiller report. What I am looking for is code that can >change the destination to Distiller and then change it back to the original >destination after the PDF is created. > >Does anyone have the code to to this? Or can someone point me to the API >that can read and set the printer for a specific report? > >Thanks. > >Joe O'Connell = = = = = = = = = = = = = = = = = = = = Best regards. Joshua B lists at jbsolutions.com.au www.jbsolutions.com.au 2004-01-13 From accessd at shaw.ca Mon Jan 12 19:38:37 2004 From: accessd at shaw.ca (Jim Lawrence (AccessD)) Date: Mon, 12 Jan 2004 17:38:37 -0800 Subject: [AccessD] error questions In-Reply-To: <006f01c3d8b3$b90edb10$210110ac@SUSANONE> Message-ID: Hi Susan: I always have a universal error handler but the 'module' name and any other specific/local errors are sent from the caller function/subroutine to the error handler where there is an exact error message display and even an error logging routine. Jim -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Susan Harkins Sent: Sunday, January 11, 2004 6:25 PM To: AccessD at databaseadvisors.com Subject: [AccessD] error questions Any of you work with a generic error-handler for an entire module or perhaps even a public function instead of repeating possibilities in individual functions? Repeating error solutions and it seems inefficient. Susan H. _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From andrew.haslett at ilc.gov.au Mon Jan 12 21:04:53 2004 From: andrew.haslett at ilc.gov.au (Haslett, Andrew) Date: Tue, 13 Jan 2004 13:34:53 +1030 Subject: [AccessD] Access Security - Web Based ASP Message-ID: >> Integrated Windows Security will not pass the authentication over to other network resources, Another feature I love about ASP.Net. Impersonation.. -----Original Message----- From: DWUTKA at marlow.com [mailto:DWUTKA at marlow.com] Sent: Tuesday, 13 January 2004 6:50 AM To: accessd at databaseadvisors.com Subject: RE: [AccessD] Access Security - Web Based ASP Yes, with integrated windows security, you can get their login name, with one of the server variables in ASP. You CANNOT get their password that way. If you use plain text, both login name and password are available. One word of caution, Integrated Windows Security will not pass the authentication over to other network resources, so if you database is not directly on the webserver, users will not be able to reach it, thus your application will not work. Drew -----Original Message----- From: Mitsules, Mark S. (Newport News) [mailto:Mark.Mitsules at ngc.com] Sent: Monday, January 12, 2004 1:45 PM To: 'Access Developers discussion and problem solving' Subject: RE: [AccessD] Access Security - Web Based ASP Erwin, Drew, et. al. or et. aliae., Since my application will reside on our company intranet, I've been looking into using Integrated Windows Authentication. I've yet to submit the request to have this implemented...I need to clarify a few things. If I'm reading this correctly, when an ASP page is requested, the "actual" LAN username and password are not sent...merely a hash. I can understand about the password, but the reason I'm going through this in the first place is to determine the actual user. I was hoping that this method would provide me with their LAN login name so that I can filter the available records and return only the user's records. Since I can not test this out, I was hoping someone can verify...with Integrated Windows Authentication in place, can I retrieve the LAN login name through an ASP page and use that as a parameter for a stored procedure? In other words, once they are on the LAN they can access my data, but I want to make sure they access only THEIR data. Is this possible? Mark -----Original Message----- From: Erwin Craps - IT Helps [mailto:Erwin.Craps at ithelps.be] Sent: Friday, January 09, 2004 4:45 PM To: Access Developers discussion and problem solving Subject: RE: [AccessD] Access Security - Web Based ASP I have a small little trick I used for same reasons. I'm using a seperate MDB file which has linked tables to the backend database. Only the tables I really need are in the WEB database. If it ain't there you can get in.... But I supose that you the data of the people are all in the same table. You need a password system to login via the web, these user/password are stored in a table in your db. When a correct match you store the ID of the person into the session. If you build SQL string than you always use the persons ID stored in the session. So don't use any parameters with the URL string for person identification. You should be reasonably safe with that, but not 100%, you never are 100% safe.... Erwin -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Mitsules, Mark S. (Newport News) Sent: Friday, January 09, 2004 10:33 PM To: 'Access Developers discussion and problem solving' Subject: RE: [AccessD] Access Security - Web Based ASP Thanks. I will research Integrated Windows Authentication as an option. Mark -----Original Message----- From: DWUTKA at marlow.com [mailto:DWUTKA at marlow.com] Sent: Friday, January 09, 2004 4:06 PM To: accessd at databaseadvisors.com Subject: RE: [AccessD] Access Security - Web Based ASP With ASP, you can get the users logged in account, either with Integrated Windows Authentication, or plain text password. No need to have security on the db itself, if you don't put it into a directory 'visible' from the web. Drew -----Original Message----- From: Mitsules, Mark S. (Newport News) [mailto:Mark.Mitsules at ngc.com] Sent: Friday, January 09, 2004 2:40 PM To: '[AccessD]' Subject: [AccessD] Access Security - Web Based ASP I have an existing .mdb "protected" only by an API call to GetUserName...very limited access. It contains time charging data for the entire department ("company confidential...need to know" type stuff). In the simplest of terms, what is the minimum necessary to achieve the following scenario? I would like a user to be able to access ONLY THEIR time charging data through a web page interface. Are there alternatives? Mark _______________________________________________ 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 _______________________________________________ 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 _______________________________________________ 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 IMPORTANT - PLEASE READ ******************** This email and any files transmitted with it are confidential and may contain information protected by law from disclosure. If you have received this message in error, please notify the sender immediately and delete this email from your system. No warranty is given that this email or files, if attached to this email, are free from computer viruses or other defects. They are provided on the basis the user assumes all responsibility for loss, damage or consequence resulting directly or indirectly from their use, whether caused by the negligence of the sender or not. From DWUTKA at marlow.com Mon Jan 12 21:13:54 2004 From: DWUTKA at marlow.com (DWUTKA at marlow.com) Date: Mon, 12 Jan 2004 21:13:54 -0600 Subject: [AccessD] Access Security - Web Based ASP Message-ID: <2F8793082E00D4119A1700B0D0216BF80222772A@main2.marlow.com> Does it really apply in this case? I thought it was a function of the IIS server, the thread the IIS server is running under. If it does, you can do the same thing with a VB .dll, since you can impersonate accounts in VB. Drew -----Original Message----- From: Haslett, Andrew [mailto:andrew.haslett at ilc.gov.au] Sent: Monday, January 12, 2004 9:05 PM To: 'Access Developers discussion and problem solving' Subject: RE: [AccessD] Access Security - Web Based ASP >> Integrated Windows Security will not pass the authentication over to other network resources, Another feature I love about ASP.Net. Impersonation.. -----Original Message----- From: DWUTKA at marlow.com [mailto:DWUTKA at marlow.com] Sent: Tuesday, 13 January 2004 6:50 AM To: accessd at databaseadvisors.com Subject: RE: [AccessD] Access Security - Web Based ASP Yes, with integrated windows security, you can get their login name, with one of the server variables in ASP. You CANNOT get their password that way. If you use plain text, both login name and password are available. One word of caution, Integrated Windows Security will not pass the authentication over to other network resources, so if you database is not directly on the webserver, users will not be able to reach it, thus your application will not work. Drew -----Original Message----- From: Mitsules, Mark S. (Newport News) [mailto:Mark.Mitsules at ngc.com] Sent: Monday, January 12, 2004 1:45 PM To: 'Access Developers discussion and problem solving' Subject: RE: [AccessD] Access Security - Web Based ASP Erwin, Drew, et. al. or et. aliae., Since my application will reside on our company intranet, I've been looking into using Integrated Windows Authentication. I've yet to submit the request to have this implemented...I need to clarify a few things. If I'm reading this correctly, when an ASP page is requested, the "actual" LAN username and password are not sent...merely a hash. I can understand about the password, but the reason I'm going through this in the first place is to determine the actual user. I was hoping that this method would provide me with their LAN login name so that I can filter the available records and return only the user's records. Since I can not test this out, I was hoping someone can verify...with Integrated Windows Authentication in place, can I retrieve the LAN login name through an ASP page and use that as a parameter for a stored procedure? In other words, once they are on the LAN they can access my data, but I want to make sure they access only THEIR data. Is this possible? Mark -----Original Message----- From: Erwin Craps - IT Helps [mailto:Erwin.Craps at ithelps.be] Sent: Friday, January 09, 2004 4:45 PM To: Access Developers discussion and problem solving Subject: RE: [AccessD] Access Security - Web Based ASP I have a small little trick I used for same reasons. I'm using a seperate MDB file which has linked tables to the backend database. Only the tables I really need are in the WEB database. If it ain't there you can get in.... But I supose that you the data of the people are all in the same table. You need a password system to login via the web, these user/password are stored in a table in your db. When a correct match you store the ID of the person into the session. If you build SQL string than you always use the persons ID stored in the session. So don't use any parameters with the URL string for person identification. You should be reasonably safe with that, but not 100%, you never are 100% safe.... Erwin -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Mitsules, Mark S. (Newport News) Sent: Friday, January 09, 2004 10:33 PM To: 'Access Developers discussion and problem solving' Subject: RE: [AccessD] Access Security - Web Based ASP Thanks. I will research Integrated Windows Authentication as an option. Mark -----Original Message----- From: DWUTKA at marlow.com [mailto:DWUTKA at marlow.com] Sent: Friday, January 09, 2004 4:06 PM To: accessd at databaseadvisors.com Subject: RE: [AccessD] Access Security - Web Based ASP With ASP, you can get the users logged in account, either with Integrated Windows Authentication, or plain text password. No need to have security on the db itself, if you don't put it into a directory 'visible' from the web. Drew -----Original Message----- From: Mitsules, Mark S. (Newport News) [mailto:Mark.Mitsules at ngc.com] Sent: Friday, January 09, 2004 2:40 PM To: '[AccessD]' Subject: [AccessD] Access Security - Web Based ASP I have an existing .mdb "protected" only by an API call to GetUserName...very limited access. It contains time charging data for the entire department ("company confidential...need to know" type stuff). In the simplest of terms, what is the minimum necessary to achieve the following scenario? I would like a user to be able to access ONLY THEIR time charging data through a web page interface. Are there alternatives? Mark _______________________________________________ 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 _______________________________________________ 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 _______________________________________________ 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 IMPORTANT - PLEASE READ ******************** This email and any files transmitted with it are confidential and may contain information protected by law from disclosure. If you have received this message in error, please notify the sender immediately and delete this email from your system. No warranty is given that this email or files, if attached to this email, are free from computer viruses or other defects. They are provided on the basis the user assumes all responsibility for loss, damage or consequence resulting directly or indirectly from their use, whether caused by the negligence of the sender or not. _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From joconnell at indy.rr.com Mon Jan 12 23:31:47 2004 From: joconnell at indy.rr.com (Joseph O'Connell) Date: Tue, 13 Jan 2004 00:31:47 -0500 Subject: [AccessD] Change printer Message-ID: <00cd01c3d996$8c164f60$6701a8c0@joe> Andy, Unfortunately I am locked into Distiller for creating the PDF. Joe -----Original Message----- From: Andy Lacey To: 'Access Developers discussion and problem solving' Date: Monday, January 12, 2004 6:17 PM Subject: RE: [AccessD] Change printer |Hi Joe |This crops up regularly on the list. If you search the archives on PDF |you'll find a bunch of hits with lots of advice. And I'd suggest you rename |this thread to put PDF in it somewhere because there are solutions to |creating a PDF which don't involve changing printers, basically by using |3rd-party products to do so, and other listers who know about those products |may not spot the thread otherwise. | |Andy Lacey |http://www.minstersystems.co.uk | |> -----Original Message----- |> From: accessd-bounces at databaseadvisors.com |> [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of |> Joseph O'Connell |> Sent: 12 January 2004 16:23 |> To: ACCESS-L at PEACH.EASE.LSOFT.COM; AccessD at databaseadvisors.com |> Subject: [AccessD] Change printer |> |> |> Cross posted to Access-L and AccessD |> |> I thought this was discussed recently, but I cannot find the |> solution in the archives. |> |> Win 2000 |> Access 2000 |> |> Is there an easy way to change the output device for a |> report? An application has several reports that are normally |> sent to a specific printer. Now the client wants the ability |> to selectively create a PDF using Adobe Distiller and have |> the PDF sent as an attachment to an email message. Because |> this procedure must be totally automated, having the print |> dialog box popup is not a viable solution. |> |> I know that this could be accomplished by having a second set |> of reports that are already set to output to Distiller, but |> this would create a maintenance problem to ensure that any |> changes made to a printed report are also made to the |> Distiller report. What I am looking for is code that can |> change the destination to Distiller and then change it back |> to the original destination after the PDF is created. |> |> Does anyone have the code to to this? Or can someone point |> me to the API that can read and set the printer for a specific report? |> |> Thanks. |> |> Joe O'Connell |> |> |> |> _______________________________________________ |> AccessD mailing list |> AccessD at databaseadvisors.com |> http://databaseadvisors.com/mailman/listinfo/a> ccessd |> Website: |> http://www.databaseadvisors.com |> |> | |_______________________________________________ |AccessD mailing list |AccessD at databaseadvisors.com |http://databaseadvisors.com/mailman/listinfo/accessd |Website: http://www.databaseadvisors.com From joconnell at indy.rr.com Mon Jan 12 23:33:09 2004 From: joconnell at indy.rr.com (Joseph O'Connell) Date: Tue, 13 Jan 2004 00:33:09 -0500 Subject: [AccessD] Change printer Message-ID: <00da01c3d996$d53a5ec0$6701a8c0@joe> Joshua, Thank you. This site has a lot of good information. Joe -----Original Message----- From: Joshua B To: Access Developers discussion and Date: Monday, January 12, 2004 7:20 PM Subject: Re: [AccessD] Change printer |Hello Joseph O'Connell, | |Have a look here... http://www.mvps.org/access/reports/rpt0009.htm | |HTH | |======= At 2004-01-12, 11:23:00 you wrote: ======= | |>Cross posted to Access-L and AccessD |> |>I thought this was discussed recently, but I cannot find the solution in the |>archives. |> |>Win 2000 |>Access 2000 |> |>Is there an easy way to change the output device for a report? An |>application has several reports that are normally sent to a specific |>printer. Now the client wants the ability to selectively create a PDF using |>Adobe Distiller and have the PDF sent as an attachment to an email message. |>Because this procedure must be totally automated, having the print dialog |>box popup is not a viable solution. |> |>I know that this could be accomplished by having a second set of reports |>that are already set to output to Distiller, but this would create a |>maintenance problem to ensure that any changes made to a printed report are |>also made to the Distiller report. What I am looking for is code that can |>change the destination to Distiller and then change it back to the original |>destination after the PDF is created. |> |>Does anyone have the code to to this? Or can someone point me to the API |>that can read and set the printer for a specific report? |> |>Thanks. |> |>Joe O'Connell |= = = = = = = = = = = = = = = = = = = = | | |Best regards. |Joshua B |lists at jbsolutions.com.au |www.jbsolutions.com.au |2004-01-13 | | |_______________________________________________ |AccessD mailing list |AccessD at databaseadvisors.com |http://databaseadvisors.com/mailman/listinfo/accessd |Website: http://www.databaseadvisors.com From andrew.haslett at ilc.gov.au Tue Jan 13 03:11:01 2004 From: andrew.haslett at ilc.gov.au (Haslett, Andrew) Date: Tue, 13 Jan 2004 19:41:01 +1030 Subject: [AccessD] Access Security - Web Based ASP Message-ID: ASP.Net can impersonate under the context of a specified account or the account passed to it by IIS. Therefore you can pass authentication credentials automatically to a db connection (although you'd rarely want to do this as a different conn string will negate connection pooling), or any other resources. Cheers, A -----Original Message----- From: DWUTKA at marlow.com [mailto:DWUTKA at marlow.com] Sent: Tuesday, 13 January 2004 1:44 PM To: accessd at databaseadvisors.com Subject: RE: [AccessD] Access Security - Web Based ASP Does it really apply in this case? I thought it was a function of the IIS server, the thread the IIS server is running under. If it does, you can do the same thing with a VB .dll, since you can impersonate accounts in VB. Drew -----Original Message----- From: Haslett, Andrew [mailto:andrew.haslett at ilc.gov.au] Sent: Monday, January 12, 2004 9:05 PM To: 'Access Developers discussion and problem solving' Subject: RE: [AccessD] Access Security - Web Based ASP >> Integrated Windows Security will not pass the authentication over to other network resources, Another feature I love about ASP.Net. Impersonation.. -----Original Message----- From: DWUTKA at marlow.com [mailto:DWUTKA at marlow.com] Sent: Tuesday, 13 January 2004 6:50 AM To: accessd at databaseadvisors.com Subject: RE: [AccessD] Access Security - Web Based ASP Yes, with integrated windows security, you can get their login name, with one of the server variables in ASP. You CANNOT get their password that way. If you use plain text, both login name and password are available. One word of caution, Integrated Windows Security will not pass the authentication over to other network resources, so if you database is not directly on the webserver, users will not be able to reach it, thus your application will not work. Drew -----Original Message----- From: Mitsules, Mark S. (Newport News) [mailto:Mark.Mitsules at ngc.com] Sent: Monday, January 12, 2004 1:45 PM To: 'Access Developers discussion and problem solving' Subject: RE: [AccessD] Access Security - Web Based ASP Erwin, Drew, et. al. or et. aliae., Since my application will reside on our company intranet, I've been looking into using Integrated Windows Authentication. I've yet to submit the request to have this implemented...I need to clarify a few things. If I'm reading this correctly, when an ASP page is requested, the "actual" LAN username and password are not sent...merely a hash. I can understand about the password, but the reason I'm going through this in the first place is to determine the actual user. I was hoping that this method would provide me with their LAN login name so that I can filter the available records and return only the user's records. Since I can not test this out, I was hoping someone can verify...with Integrated Windows Authentication in place, can I retrieve the LAN login name through an ASP page and use that as a parameter for a stored procedure? In other words, once they are on the LAN they can access my data, but I want to make sure they access only THEIR data. Is this possible? Mark -----Original Message----- From: Erwin Craps - IT Helps [mailto:Erwin.Craps at ithelps.be] Sent: Friday, January 09, 2004 4:45 PM To: Access Developers discussion and problem solving Subject: RE: [AccessD] Access Security - Web Based ASP I have a small little trick I used for same reasons. I'm using a seperate MDB file which has linked tables to the backend database. Only the tables I really need are in the WEB database. If it ain't there you can get in.... But I supose that you the data of the people are all in the same table. You need a password system to login via the web, these user/password are stored in a table in your db. When a correct match you store the ID of the person into the session. If you build SQL string than you always use the persons ID stored in the session. So don't use any parameters with the URL string for person identification. You should be reasonably safe with that, but not 100%, you never are 100% safe.... Erwin -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Mitsules, Mark S. (Newport News) Sent: Friday, January 09, 2004 10:33 PM To: 'Access Developers discussion and problem solving' Subject: RE: [AccessD] Access Security - Web Based ASP Thanks. I will research Integrated Windows Authentication as an option. Mark -----Original Message----- From: DWUTKA at marlow.com [mailto:DWUTKA at marlow.com] Sent: Friday, January 09, 2004 4:06 PM To: accessd at databaseadvisors.com Subject: RE: [AccessD] Access Security - Web Based ASP With ASP, you can get the users logged in account, either with Integrated Windows Authentication, or plain text password. No need to have security on the db itself, if you don't put it into a directory 'visible' from the web. Drew -----Original Message----- From: Mitsules, Mark S. (Newport News) [mailto:Mark.Mitsules at ngc.com] Sent: Friday, January 09, 2004 2:40 PM To: '[AccessD]' Subject: [AccessD] Access Security - Web Based ASP I have an existing .mdb "protected" only by an API call to GetUserName...very limited access. It contains time charging data for the entire department ("company confidential...need to know" type stuff). In the simplest of terms, what is the minimum necessary to achieve the following scenario? I would like a user to be able to access ONLY THEIR time charging data through a web page interface. Are there alternatives? Mark _______________________________________________ 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 _______________________________________________ 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 _______________________________________________ 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 IMPORTANT - PLEASE READ ******************** This email and any files transmitted with it are confidential and may contain information protected by law from disclosure. If you have received this message in error, please notify the sender immediately and delete this email from your system. No warranty is given that this email or files, if attached to this email, are free from computer viruses or other defects. They are provided on the basis the user assumes all responsibility for loss, damage or consequence resulting directly or indirectly from their use, whether caused by the negligence of the sender or not. _______________________________________________ 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 IMPORTANT - PLEASE READ ******************** This email and any files transmitted with it are confidential and may contain information protected by law from disclosure. If you have received this message in error, please notify the sender immediately and delete this email from your system. No warranty is given that this email or files, if attached to this email, are free from computer viruses or other defects. They are provided on the basis the user assumes all responsibility for loss, damage or consequence resulting directly or indirectly from their use, whether caused by the negligence of the sender or not. From chris at thecube.net Tue Jan 13 04:24:13 2004 From: chris at thecube.net (chris at thecube.net) Date: Tue, 13 Jan 2004 05:24:13 -0500 Subject: [AccessD] =function() in .onclick Message-ID: <3C80C40F0C7A466483B5961EA3EE00F5.MAI@freeparking.co.uk> Hi All, Instead of writing 54 event procedures, i simply iterate through a collection of checkboxes and set their AfterUpdate property to a function like so: for index = 1 to 54 me("chkTemplate" & index).Afterupdate = "=toggleTemplate(" & index & ")" next now, on some Access 2000 installs this works fine, yet on others it baulks at trying to put a function straight into the event like above. Am I doing anything wrong? Cheers Chris From jwcolby at colbyconsulting.com Tue Jan 13 04:39:56 2004 From: jwcolby at colbyconsulting.com (John W. Colby) Date: Tue, 13 Jan 2004 05:39:56 -0500 Subject: [AccessD] =function() in .onclick In-Reply-To: <3C80C40F0C7A466483B5961EA3EE00F5.MAI@freeparking.co.uk> Message-ID: I can't help you as to why it sometimes works and others it doesn't. However I'd like to say I HATE it when developers do this (and I have to maintain it). I routinely use the find dialog to find instances of code. Doing it like that means that I have to use a find and replace utility instead which is much more intrusive to my development effort. Another thing is that if you ever intend to use Withevents, they don't fire unless the words [Event Procedure] are in the property. If you have an event stub, you can use withevents (sink the event in a class) and the event handler in the form at the same time - the event handler in the class simply gets control first. Doing it with the function call in the property prevents sinking that control's events anywhere else. Now... If you ever handed that application off to someone like myself (who uses withevents), I build a class that directly pokes the words [Event Procedure] into the control's event property (to make sure the event fires) and now MY class works but your functionality abruptly ceases to work. Just thought I'd throw that out there. If I were you I'd probably write a class that handles those checkboxes, either individually or en mass. John W. Colby www.ColbyConsulting.com -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of chris at thecube.net Sent: Tuesday, January 13, 2004 5:24 AM To: accessd at databaseadvisors.com Subject: [AccessD] =function() in .onclick Hi All, Instead of writing 54 event procedures, i simply iterate through a collection of checkboxes and set their AfterUpdate property to a function like so: for index = 1 to 54 me("chkTemplate" & index).Afterupdate = "=toggleTemplate(" & index & ")" next now, on some Access 2000 installs this works fine, yet on others it baulks at trying to put a function straight into the event like above. Am I doing anything wrong? Cheers Chris From chris at thecube.net Tue Jan 13 05:08:06 2004 From: chris at thecube.net (chris at thecube.net) Date: Tue, 13 Jan 2004 06:08:06 -0500 Subject: [AccessD] =function() in .onclick Message-ID: <621FDD9DA76A46FA837FEB7CF6EB31E8.MAI@freeparking.co.uk> John, Thanks for the 'warm' response . I think i will get on and write the checkbox class to handle all of the checkboxes, on the subject of WithEvents/DEEP, do you have a lot of variants for say textboxes or do you prefer to add parameters at runtime to sink different events / control behaiviour? Cheers John Chris ----- Original Message ----- From: John W. Colby To: "Access Developers discussion and problem solving" Sent: Tue, 13 Jan 2004 05:39:56 -0500 Subject: RE: [AccessD] =function() in .onclick I can't help you as to why it sometimes works and others it doesn't. However I'd like to say I HATE it when developers do this (and I have to maintain it). I routinely use the find dialog to find instances of code. Doing it like that means that I have to use a find and replace utility instead which is much more intrusive to my development effort. Another thing is that if you ever intend to use Withevents, they don't fire unless the words [Event Procedure] are in the property. If you have an event stub, you can use withevents (sink the event in a class) and the event handler in the form at the same time - the event handler in the class simply gets control first. Doing it with the function call in the property prevents sinking that control's events anywhere else. Now... If you ever handed that application off to someone like myself (who uses withevents), I build a class that directly pokes the words [Event Procedure] into the control's event property (to make sure the event fires) and now MY class works but your functionality abruptly ceases to work. Just thought I'd throw that out there. If I were you I'd probably write a class that handles those checkboxes, either individually or en mass. John W. Colby www.ColbyConsulting.com -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of chris at thecube.net Sent: Tuesday, January 13, 2004 5:24 AM To: accessd at databaseadvisors.com Subject: [AccessD] =function() in .onclick Hi All, Instead of writing 54 event procedures, i simply iterate through a collection of checkboxes and set their AfterUpdate property to a function like so: for index = 1 to 54 me("chkTemplate" & index).Afterupdate = "=toggleTemplate(" & index & ")" next now, on some Access 2000 installs this works fine, yet on others it baulks at trying to put a function straight into the event like above. Am I doing anything wrong? Cheers Chris _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From jwcolby at colbyconsulting.com Tue Jan 13 05:32:48 2004 From: jwcolby at colbyconsulting.com (John W. Colby) Date: Tue, 13 Jan 2004 06:32:48 -0500 Subject: [AccessD] =function() in .onclick In-Reply-To: <621FDD9DA76A46FA837FEB7CF6EB31E8.MAI@freeparking.co.uk> Message-ID: Chris, >do you have a lot of variants for say textboxes or do you prefer to add parameters at runtime to sink different events / control behavior? I actually have an entire framework that does all of this stuff. I have a form class that sinks all of the form's events. That class has a collection which holds a class instance for each control found on the form. I then have classes for each control type which implement standard behaviors which I find useful - dblclick for a combo can open a list form for entering or correcting data contained in the combo, NotInList can add data to the table behind the combo and requery the combo when done etc. The form class has a scanner that cycles through all the controls in its form's control collection, instantiating a class for each control found (that I have a class for anyway). IOW, as the form loads, it scans for all controls, loads a class for each control found and saves a pointer to that control in the control class collection in the form's header. I then use what I call SysVars or System Variables to enable / disable specific form / control functionality. It turns out I have to "set up" things like the double click and NotInList for a combo anyway, i.e. I have to tell the combo the name of the form or the name of the table and the field in the table to place data in NotInList. My form open ends up looking something like: Option Compare Database Option Explicit Public WithEvents fclsFrm As dclsFrm Private Sub Form_Open(Cancel As Integer) On Error GoTo Err_Form_Open Set fclsFrm = New dclsFrm fclsFrm.Init Nothing, Me, Cancel If Cancel Then Exit Sub 'init the combo dbl-click and NotInList On Error Resume Next With fclsFrm.Children .Item("cboCountry").NotInListData "", "", "lfrmCountry" .Item("cboState").NotInListData "", "", "lfrmState" End With 'look for the lfrm used by these combos. 'fclsFrm.Children("cboCountry").LFrm = "lfrmCountry" 'fclsFrm.Children("cboState").LFrm = "lfrmState" Exit_Form_Open: Exit Sub Err_Form_Open: Select Case Err Case 0 '.insert Errors you wish to ignore here Resume Next Case Else '.All other errors will trap Beep MsgBox Err.Description, , "Error in Sub tfrmClients.Form_Open" Resume Exit_Form_Open End Select Resume 0 '.FOR TROUBLESHOOTING End Sub As you can see, I dim a class for the form (fclsFrm), then in OnOpen I instantiate it. By the time the form class init returns all the control classes have been loaded and are sitting in the children collection keyed on control name. I then "set up" things like NotInList by calling a function in the combo's class passing in the name of the form (and also table / field for single field list tables). Sometimes I want the NotInList to open a form (it is complex data with many fields), sometimes I want it to just enter the data into a specific field in the table (it is a simple list like titles or colors). So, the answer to your question is, I have the generic functionality I need for the controls already in the class for that control type. I can use it or not depending on whether I tell the class to do so. Very form / application specific behaviors I will generally program out in a separate class. John W. Colby www.ColbyConsulting.com -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of chris at thecube.net Sent: Tuesday, January 13, 2004 6:08 AM To: accessd at databaseadvisors.com Subject: RE: [AccessD] =function() in .onclick John, Thanks for the 'warm' response . I think i will get on and write the checkbox class to handle all of the checkboxes, on the subject of WithEvents/DEEP, do you have a lot of variants for say textboxes or do you prefer to add parameters at runtime to sink different events / control behaiviour? Cheers John Chris ----- Original Message ----- From: John W. Colby To: "Access Developers discussion and problem solving" Sent: Tue, 13 Jan 2004 05:39:56 -0500 Subject: RE: [AccessD] =function() in .onclick I can't help you as to why it sometimes works and others it doesn't. However I'd like to say I HATE it when developers do this (and I have to maintain it). I routinely use the find dialog to find instances of code. Doing it like that means that I have to use a find and replace utility instead which is much more intrusive to my development effort. Another thing is that if you ever intend to use Withevents, they don't fire unless the words [Event Procedure] are in the property. If you have an event stub, you can use withevents (sink the event in a class) and the event handler in the form at the same time - the event handler in the class simply gets control first. Doing it with the function call in the property prevents sinking that control's events anywhere else. Now... If you ever handed that application off to someone like myself (who uses withevents), I build a class that directly pokes the words [Event Procedure] into the control's event property (to make sure the event fires) and now MY class works but your functionality abruptly ceases to work. Just thought I'd throw that out there. If I were you I'd probably write a class that handles those checkboxes, either individually or en mass. John W. Colby www.ColbyConsulting.com -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of chris at thecube.net Sent: Tuesday, January 13, 2004 5:24 AM To: accessd at databaseadvisors.com Subject: [AccessD] =function() in .onclick Hi All, Instead of writing 54 event procedures, i simply iterate through a collection of checkboxes and set their AfterUpdate property to a function like so: for index = 1 to 54 me("chkTemplate" & index).Afterupdate = "=toggleTemplate(" & index & ")" next now, on some Access 2000 installs this works fine, yet on others it baulks at trying to put a function straight into the event like above. Am I doing anything wrong? Cheers Chris _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From chris at thecube.net Tue Jan 13 07:00:30 2004 From: chris at thecube.net (chris at thecube.net) Date: Tue, 13 Jan 2004 08:00:30 -0500 Subject: [AccessD] =function() in .onclick Message-ID: John, Very similar to my method, but with a few slight differences, i may have missed out on new methods of using withevents, but i instantiate a class for the form, and instantiate classes for each of the controls (unless i exclude them) i control the behaviour of the controls using a list of parameters in the tag property so an entire data form could look like this behind the scenes. Dim DEEP As New clsFormControls Private Sub Form_Load() DEEP.Init Me End Sub Private Sub Form_Close() DEEP.Terminate End Sub and then i have a range of parameters for each of the controls: Text Boxes: DateControl=True applies a common input mask and formatting, as well as adding double-click functionality that pops up a calendar FilterForm=True;FilterField= Dynamically filters the Form Data QuickSearch=True;SearchCtl=ControlName for doing a quick search (suprisingly) I have made various of other additions but i must mention that my code is largely based on Shamil Salakhetdinov's external events programming but i feel quite pleased with my modifications ----- Original Message ----- From: John W. Colby To: "Access Developers discussion and problem solving" Sent: Tue, 13 Jan 2004 06:32:48 -0500 Subject: RE: [AccessD] =function() in .onclick Chris, >do you have a lot of variants for say textboxes or do you prefer to add parameters at runtime to sink different events / control behavior? I actually have an entire framework that does all of this stuff. I have a form class that sinks all of the form's events. That class has a collection which holds a class instance for each control found on the form. I then have classes for each control type which implement standard behaviors which I find useful - dblclick for a combo can open a list form for entering or correcting data contained in the combo, NotInList can add data to the table behind the combo and requery the combo when done etc. The form class has a scanner that cycles through all the controls in its form's control collection, instantiating a class for each control found (that I have a class for anyway). IOW, as the form loads, it scans for all controls, loads a class for each control found and saves a pointer to that control in the control class collection in the form's header. I then use what I call SysVars or System Variables to enable / disable specific form / control functionality. It turns out I have to "set up" things like the double click and NotInList for a combo anyway, i.e. I have to tell the combo the name of the form or the name of the table and the field in the table to place data in NotInList. My form open ends up looking something like: Option Compare Database Option Explicit Public WithEvents fclsFrm As dclsFrm Private Sub Form_Open(Cancel As Integer) On Error GoTo Err_Form_Open Set fclsFrm = New dclsFrm fclsFrm.Init Nothing, Me, Cancel If Cancel Then Exit Sub 'init the combo dbl-click and NotInList On Error Resume Next With fclsFrm.Children .Item("cboCountry").NotInListData "", "", "lfrmCountry" .Item("cboState").NotInListData "", "", "lfrmState" End With 'look for the lfrm used by these combos. 'fclsFrm.Children("cboCountry").LFrm = "lfrmCountry" 'fclsFrm.Children("cboState").LFrm = "lfrmState" Exit_Form_Open: Exit Sub Err_Form_Open: Select Case Err Case 0 '.insert Errors you wish to ignore here Resume Next Case Else '.All other errors will trap Beep MsgBox Err.Description, , "Error in Sub tfrmClients.Form_Open" Resume Exit_Form_Open End Select Resume 0 '.FOR TROUBLESHOOTING End Sub As you can see, I dim a class for the form (fclsFrm), then in OnOpen I instantiate it. By the time the form class init returns all the control classes have been loaded and are sitting in the children collection keyed on control name. I then "set up" things like NotInList by calling a function in the combo's class passing in the name of the form (and also table / field for single field list tables). Sometimes I want the NotInList to open a form (it is complex data with many fields), sometimes I want it to just enter the data into a specific field in the table (it is a simple list like titles or colors). So, the answer to your question is, I have the generic functionality I need for the controls already in the class for that control type. I can use it or not depending on whether I tell the class to do so. Very form / application specific behaviors I will generally program out in a separate class. John W. Colby www.ColbyConsulting.com -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of chris at thecube.net Sent: Tuesday, January 13, 2004 6:08 AM To: accessd at databaseadvisors.com Subject: RE: [AccessD] =function() in .onclick John, Thanks for the 'warm' response . I think i will get on and write the checkbox class to handle all of the checkboxes, on the subject of WithEvents/DEEP, do you have a lot of variants for say textboxes or do you prefer to add parameters at runtime to sink different events / control behaiviour? Cheers John Chris ----- Original Message ----- From: John W. Colby To: "Access Developers discussion and problem solving" Sent: Tue, 13 Jan 2004 05:39:56 -0500 Subject: RE: [AccessD] =function() in .onclick I can't help you as to why it sometimes works and others it doesn't. However I'd like to say I HATE it when developers do this (and I have to maintain it). I routinely use the find dialog to find instances of code. Doing it like that means that I have to use a find and replace utility instead which is much more intrusive to my development effort. Another thing is that if you ever intend to use Withevents, they don't fire unless the words [Event Procedure] are in the property. If you have an event stub, you can use withevents (sink the event in a class) and the event handler in the form at the same time - the event handler in the class simply gets control first. Doing it with the function call in the property prevents sinking that control's events anywhere else. Now... If you ever handed that application off to someone like myself (who uses withevents), I build a class that directly pokes the words [Event Procedure] into the control's event property (to make sure the event fires) and now MY class works but your functionality abruptly ceases to work. Just thought I'd throw that out there. If I were you I'd probably write a class that handles those checkboxes, either individually or en mass. John W. Colby www.ColbyConsulting.com -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of chris at thecube.net Sent: Tuesday, January 13, 2004 5:24 AM To: accessd at databaseadvisors.com Subject: [AccessD] =function() in .onclick Hi All, Instead of writing 54 event procedures, i simply iterate through a collection of checkboxes and set their AfterUpdate property to a function like so: for index = 1 to 54 me("chkTemplate" & index).Afterupdate = "=toggleTemplate(" & index & ")" next now, on some Access 2000 installs this works fine, yet on others it baulks at trying to put a function straight into the event like above. Am I doing anything wrong? Cheers Chris From jwcolby at colbyconsulting.com Tue Jan 13 08:23:10 2004 From: jwcolby at colbyconsulting.com (John W. Colby) Date: Tue, 13 Jan 2004 09:23:10 -0500 Subject: [AccessD] Enumerated constants Message-ID: Can enumerated constant VALUES be strings? public enum numbers one = "one" end enum Etc? I can't seem to get this to work. John W. Colby www.ColbyConsulting.com From jwcolby at colbyconsulting.com Tue Jan 13 08:43:42 2004 From: jwcolby at colbyconsulting.com (John W. Colby) Date: Tue, 13 Jan 2004 09:43:42 -0500 Subject: [AccessD] =function() in .onclick In-Reply-To: Message-ID: Chris, I credit Shamil with teaching me everything I know about Withevents. I would never have discovered them, and would not be where I am today in Access without his examples and his prodding to look at WithEvents. If you looked at Shamil's stuff you will see where he places the [Event Procedure] in the control's event procedure using code inside the Init event of the class itself as the class instantiates. That is where I learned to do this and one reason I so dislike developers putting function calls in those properties. I used to use the tag property a lot using ADH code to set and read them. Once I started using classes I moved away from that to either setting properties directly in the class init or (in the case of my scanner, where it's more generic) using class properties to set these values later. There are pluses and minuses to using the tag - the control carries it's initialization properties with it, but if any other developer uses the tag yours can get trashed. I finally just stopped using it although there is still ONE place I do, and that is in my Just In Time form loading, where I place the form name in the tag. If it's there it will do JIT, otherwise it just loads normally. I would like to thank you though for the hint about input masks. My users have been pushing me to "standardize" the date inputmasks and using my framework I can do just that quite easily. John W. Colby www.ColbyConsulting.com -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of chris at thecube.net Sent: Tuesday, January 13, 2004 8:00 AM To: accessd at databaseadvisors.com Subject: RE: [AccessD] =function() in .onclick John, Very similar to my method, but with a few slight differences, i may have missed out on new methods of using withevents, but i instantiate a class for the form, and instantiate classes for each of the controls (unless i exclude them) i control the behaviour of the controls using a list of parameters in the tag property so an entire data form could look like this behind the scenes. Dim DEEP As New clsFormControls Private Sub Form_Load() DEEP.Init Me End Sub Private Sub Form_Close() DEEP.Terminate End Sub and then i have a range of parameters for each of the controls: Text Boxes: DateControl=True applies a common input mask and formatting, as well as adding double-click functionality that pops up a calendar FilterForm=True;FilterField= Dynamically filters the Form Data QuickSearch=True;SearchCtl=ControlName for doing a quick search (suprisingly) I have made various of other additions but i must mention that my code is largely based on Shamil Salakhetdinov's external events programming but i feel quite pleased with my modifications ----- Original Message ----- From: John W. Colby To: "Access Developers discussion and problem solving" Sent: Tue, 13 Jan 2004 06:32:48 -0500 Subject: RE: [AccessD] =function() in .onclick Chris, >do you have a lot of variants for say textboxes or do you prefer to add parameters at runtime to sink different events / control behavior? I actually have an entire framework that does all of this stuff. I have a form class that sinks all of the form's events. That class has a collection which holds a class instance for each control found on the form. I then have classes for each control type which implement standard behaviors which I find useful - dblclick for a combo can open a list form for entering or correcting data contained in the combo, NotInList can add data to the table behind the combo and requery the combo when done etc. The form class has a scanner that cycles through all the controls in its form's control collection, instantiating a class for each control found (that I have a class for anyway). IOW, as the form loads, it scans for all controls, loads a class for each control found and saves a pointer to that control in the control class collection in the form's header. I then use what I call SysVars or System Variables to enable / disable specific form / control functionality. It turns out I have to "set up" things like the double click and NotInList for a combo anyway, i.e. I have to tell the combo the name of the form or the name of the table and the field in the table to place data in NotInList. My form open ends up looking something like: Option Compare Database Option Explicit Public WithEvents fclsFrm As dclsFrm Private Sub Form_Open(Cancel As Integer) On Error GoTo Err_Form_Open Set fclsFrm = New dclsFrm fclsFrm.Init Nothing, Me, Cancel If Cancel Then Exit Sub 'init the combo dbl-click and NotInList On Error Resume Next With fclsFrm.Children .Item("cboCountry").NotInListData "", "", "lfrmCountry" .Item("cboState").NotInListData "", "", "lfrmState" End With 'look for the lfrm used by these combos. 'fclsFrm.Children("cboCountry").LFrm = "lfrmCountry" 'fclsFrm.Children("cboState").LFrm = "lfrmState" Exit_Form_Open: Exit Sub Err_Form_Open: Select Case Err Case 0 '.insert Errors you wish to ignore here Resume Next Case Else '.All other errors will trap Beep MsgBox Err.Description, , "Error in Sub tfrmClients.Form_Open" Resume Exit_Form_Open End Select Resume 0 '.FOR TROUBLESHOOTING End Sub As you can see, I dim a class for the form (fclsFrm), then in OnOpen I instantiate it. By the time the form class init returns all the control classes have been loaded and are sitting in the children collection keyed on control name. I then "set up" things like NotInList by calling a function in the combo's class passing in the name of the form (and also table / field for single field list tables). Sometimes I want the NotInList to open a form (it is complex data with many fields), sometimes I want it to just enter the data into a specific field in the table (it is a simple list like titles or colors). So, the answer to your question is, I have the generic functionality I need for the controls already in the class for that control type. I can use it or not depending on whether I tell the class to do so. Very form / application specific behaviors I will generally program out in a separate class. John W. Colby www.ColbyConsulting.com -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of chris at thecube.net Sent: Tuesday, January 13, 2004 6:08 AM To: accessd at databaseadvisors.com Subject: RE: [AccessD] =function() in .onclick John, Thanks for the 'warm' response . I think i will get on and write the checkbox class to handle all of the checkboxes, on the subject of WithEvents/DEEP, do you have a lot of variants for say textboxes or do you prefer to add parameters at runtime to sink different events / control behaiviour? Cheers John Chris ----- Original Message ----- From: John W. Colby To: "Access Developers discussion and problem solving" Sent: Tue, 13 Jan 2004 05:39:56 -0500 Subject: RE: [AccessD] =function() in .onclick I can't help you as to why it sometimes works and others it doesn't. However I'd like to say I HATE it when developers do this (and I have to maintain it). I routinely use the find dialog to find instances of code. Doing it like that means that I have to use a find and replace utility instead which is much more intrusive to my development effort. Another thing is that if you ever intend to use Withevents, they don't fire unless the words [Event Procedure] are in the property. If you have an event stub, you can use withevents (sink the event in a class) and the event handler in the form at the same time - the event handler in the class simply gets control first. Doing it with the function call in the property prevents sinking that control's events anywhere else. Now... If you ever handed that application off to someone like myself (who uses withevents), I build a class that directly pokes the words [Event Procedure] into the control's event property (to make sure the event fires) and now MY class works but your functionality abruptly ceases to work. Just thought I'd throw that out there. If I were you I'd probably write a class that handles those checkboxes, either individually or en mass. John W. Colby www.ColbyConsulting.com -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of chris at thecube.net Sent: Tuesday, January 13, 2004 5:24 AM To: accessd at databaseadvisors.com Subject: [AccessD] =function() in .onclick Hi All, Instead of writing 54 event procedures, i simply iterate through a collection of checkboxes and set their AfterUpdate property to a function like so: for index = 1 to 54 me("chkTemplate" & index).Afterupdate = "=toggleTemplate(" & index & ")" next now, on some Access 2000 installs this works fine, yet on others it baulks at trying to put a function straight into the event like above. Am I doing anything wrong? Cheers Chris From James at fcidms.com Tue Jan 13 08:43:15 2004 From: James at fcidms.com (James Barash) Date: Tue, 13 Jan 2004 09:43:15 -0500 Subject: [AccessD] Enumerated constants In-Reply-To: Message-ID: No, enums can only be Longs. James Barash -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of John W. Colby Sent: Tuesday, January 13, 2004 9:23 AM To: AccessD Subject: [AccessD] Enumerated constants Can enumerated constant VALUES be strings? public enum numbers one = "one" end enum Etc? I can't seem to get this to work. John W. Colby www.ColbyConsulting.com _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From jwcolby at colbyconsulting.com Tue Jan 13 08:58:21 2004 From: jwcolby at colbyconsulting.com (John W. Colby) Date: Tue, 13 Jan 2004 09:58:21 -0500 Subject: [AccessD] Enumerated constants In-Reply-To: Message-ID: I was afraid of that. Thanks, John W. Colby www.ColbyConsulting.com -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of James Barash Sent: Tuesday, January 13, 2004 9:43 AM To: 'Access Developers discussion and problem solving' Subject: RE: [AccessD] Enumerated constants No, enums can only be Longs. James Barash -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of John W. Colby Sent: Tuesday, January 13, 2004 9:23 AM To: AccessD Subject: [AccessD] Enumerated constants Can enumerated constant VALUES be strings? public enum numbers one = "one" end enum Etc? I can't seem to get this to work. John W. Colby www.ColbyConsulting.com _______________________________________________ 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 From wdhindman at bellsouth.net Tue Jan 13 09:14:33 2004 From: wdhindman at bellsouth.net (William Hindman) Date: Tue, 13 Jan 2004 10:14:33 -0500 Subject: [AccessD] =function() in .onclick References: Message-ID: <001001c3d9e7$f3453e20$6101a8c0@dejpolsys> ...great thread ...every once in a while I still manage to learn something from you :) William Hindman ----- Original Message ----- From: "John W. Colby" To: "Access Developers discussion and problem solving" Sent: Tuesday, January 13, 2004 9:43 AM Subject: RE: [AccessD] =function() in .onclick > Chris, > > I credit Shamil with teaching me everything I know about Withevents. I > would never have discovered them, and would not be where I am today in > Access without his examples and his prodding to look at WithEvents. > > If you looked at Shamil's stuff you will see where he places the [Event > Procedure] in the control's event procedure using code inside the Init event > of the class itself as the class instantiates. That is where I learned to > do this and one reason I so dislike developers putting function calls in > those properties. > > I used to use the tag property a lot using ADH code to set and read them. > Once I started using classes I moved away from that to either setting > properties directly in the class init or (in the case of my scanner, where > it's more generic) using class properties to set these values later. There > are pluses and minuses to using the tag - the control carries it's > initialization properties with it, but if any other developer uses the tag > yours can get trashed. I finally just stopped using it although there is > still ONE place I do, and that is in my Just In Time form loading, where I > place the form name in the tag. If it's there it will do JIT, otherwise it > just loads normally. > > I would like to thank you though for the hint about input masks. My users > have been pushing me to "standardize" the date inputmasks and using my > framework I can do just that quite easily. > > John W. Colby > www.ColbyConsulting.com > > -----Original Message----- > From: accessd-bounces at databaseadvisors.com > [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of > chris at thecube.net > Sent: Tuesday, January 13, 2004 8:00 AM > To: accessd at databaseadvisors.com > Subject: RE: [AccessD] =function() in .onclick > > > John, > > Very similar to my method, but with a few slight differences, i may have > missed out on new methods > of using withevents, but i instantiate a class for the form, and instantiate > classes for each of > the controls (unless i exclude them) i control the behaviour of the controls > using a list of > parameters in the tag property so an entire data form could look like this > behind the scenes. > > Dim DEEP As New clsFormControls > > Private Sub Form_Load() > DEEP.Init Me > End Sub > > Private Sub Form_Close() > DEEP.Terminate > End Sub > > and then i have a range of parameters for each of the controls: > > Text Boxes: > > DateControl=True applies a common input mask and formatting, as well as > adding double-click > functionality that pops up a calendar > > FilterForm=True;FilterField= Dynamically filters the Form Data > > QuickSearch=True;SearchCtl=ControlName for doing a quick search > (suprisingly) > > I have made various of other additions but i must mention that my code is > largely based on Shamil > Salakhetdinov's external events programming but i feel quite pleased with my > modifications > > ----- Original Message ----- > From: John W. Colby > To: "Access Developers discussion and problem > solving" > Sent: Tue, 13 Jan 2004 06:32:48 -0500 > Subject: RE: [AccessD] =function() in .onclick > > Chris, > > >do you have a lot of variants for say textboxes or do you prefer to add > parameters at runtime to sink different events / control behavior? > > I actually have an entire framework that does all of this stuff. I have a > form class that sinks all of the form's events. That class has a collection > which holds a class instance for each control found on the form. I then > have classes for each control type which implement standard behaviors which > I find useful - dblclick for a combo can open a list form for entering or > correcting data contained in the combo, NotInList can add data to the table > behind the combo and requery the combo when done etc. The form class has a > scanner that cycles through all the controls in its form's control > collection, instantiating a class for each control found (that I have a > class for anyway). > > IOW, as the form loads, it scans for all controls, loads a class for each > control found and saves a pointer to that control in the control class > collection in the form's header. > > I then use what I call SysVars or System Variables to enable / disable > specific form / control functionality. It turns out I have to "set up" > things like the double click and NotInList for a combo anyway, i.e. I have > to tell the combo the name of the form or the name of the table and the > field in the table to place data in NotInList. My form open ends up looking > something like: > > Option Compare Database > Option Explicit > Public WithEvents fclsFrm As dclsFrm > > Private Sub Form_Open(Cancel As Integer) > On Error GoTo Err_Form_Open > Set fclsFrm = New dclsFrm > fclsFrm.Init Nothing, Me, Cancel > If Cancel Then Exit Sub > 'init the combo dbl-click and NotInList > On Error Resume Next > With fclsFrm.Children > .Item("cboCountry").NotInListData "", "", "lfrmCountry" > .Item("cboState").NotInListData "", "", "lfrmState" > End With > 'look for the lfrm used by these combos. > 'fclsFrm.Children("cboCountry").LFrm = "lfrmCountry" > 'fclsFrm.Children("cboState").LFrm = "lfrmState" > Exit_Form_Open: > Exit Sub > Err_Form_Open: > Select Case Err > Case 0 '.insert Errors you wish to ignore here > Resume Next > Case Else '.All other errors will trap > Beep > MsgBox Err.Description, , "Error in Sub tfrmClients.Form_Open" > Resume Exit_Form_Open > End Select > Resume 0 '.FOR TROUBLESHOOTING > End Sub > > As you can see, I dim a class for the form (fclsFrm), then in OnOpen I > instantiate it. By the time the form class init returns all the control > classes have been loaded and are sitting in the children collection keyed on > control name. I then "set up" things like NotInList by calling a function > in the combo's class passing in the name of the form (and also table / field > for single field list tables). Sometimes I want the NotInList to open a > form (it is complex data with many fields), sometimes I want it to just > enter the data into a specific field in the table (it is a simple list like > titles or colors). > > So, the answer to your question is, I have the generic functionality I need > for the controls already in the class for that control type. I can use it > or not depending on whether I tell the class to do so. Very form / > application specific behaviors I will generally program out in a separate > class. > > John W. Colby > www.ColbyConsulting.com > > -----Original Message----- > From: accessd-bounces at databaseadvisors.com > [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of > chris at thecube.net > Sent: Tuesday, January 13, 2004 6:08 AM > To: accessd at databaseadvisors.com > Subject: RE: [AccessD] =function() in .onclick > > > John, > > Thanks for the 'warm' response . > > I think i will get on and write the checkbox class to handle all of the > checkboxes, on the subject > of WithEvents/DEEP, do you have a lot of variants for say textboxes or do > you prefer to add > parameters at runtime to sink different events / control behaiviour? > > Cheers John > > Chris > ----- Original Message ----- > From: John W. Colby > To: "Access Developers discussion and problem > solving" > Sent: Tue, 13 Jan 2004 05:39:56 -0500 > Subject: RE: [AccessD] =function() in .onclick > > I can't help you as to why it sometimes works and others it doesn't. > However I'd like to say I HATE it when developers do this (and I have to > maintain it). I routinely use the find dialog to find instances of code. > Doing it like that means that I have to use a find and replace utility > instead which is much more intrusive to my development effort. > > Another thing is that if you ever intend to use Withevents, they don't fire > unless the words [Event Procedure] are in the property. If you have an > event stub, you can use withevents (sink the event in a class) and the event > handler in the form at the same time - the event handler in the class simply > gets control first. Doing it with the function call in the property > prevents sinking that control's events anywhere else. > > Now... > > If you ever handed that application off to someone like myself (who uses > withevents), I build a class that directly pokes the words [Event Procedure] > into the control's event property (to make sure the event fires) and now MY > class works but your functionality abruptly ceases to work. > > Just thought I'd throw that out there. > > If I were you I'd probably write a class that handles those checkboxes, > either individually or en mass. > > John W. Colby > www.ColbyConsulting.com > > -----Original Message----- > From: accessd-bounces at databaseadvisors.com > [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of > chris at thecube.net > Sent: Tuesday, January 13, 2004 5:24 AM > To: accessd at databaseadvisors.com > Subject: [AccessD] =function() in .onclick > > > Hi All, > > Instead of writing 54 event procedures, i simply iterate through a > collection of checkboxes and set > their AfterUpdate property to a function like so: > > for index = 1 to 54 > me("chkTemplate" & index).Afterupdate = "=toggleTemplate(" & index & ")" > next > > now, on some Access 2000 installs this works fine, yet on others it baulks > at trying to put a > function straight into the event like above. > > Am I doing anything wrong? > > Cheers > > Chris > > > > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com From jwcolby at colbyconsulting.com Tue Jan 13 09:17:42 2004 From: jwcolby at colbyconsulting.com (John W. Colby) Date: Tue, 13 Jan 2004 10:17:42 -0500 Subject: [AccessD] datatype underlying bound control Message-ID: Is there any way to (easily) determine the datatype of the field that a control is bound to? John W. Colby www.ColbyConsulting.com From bheid at appdevgrp.com Tue Jan 13 09:26:29 2004 From: bheid at appdevgrp.com (Bobby Heid) Date: Tue, 13 Jan 2004 10:26:29 -0500 Subject: [AccessD] Archive results display problem. In-Reply-To: <916187228923D311A6FE00A0CC3FAA3072A465@ADGSERVER> Message-ID: <916187228923D311A6FE00A0CC3FAA305BB182@ADGSERVER> Hey all, I went to search the archives and the results were over many pages. The problem is that there are no scroll bars to allow me to see past the first 4 or 5 returned results. I was not sure who to report this to. Thanks, Bobby From jwcolby at colbyconsulting.com Tue Jan 13 09:36:51 2004 From: jwcolby at colbyconsulting.com (John W. Colby) Date: Tue, 13 Jan 2004 10:36:51 -0500 Subject: [AccessD] =function() in .onclick In-Reply-To: <001001c3d9e7$f3453e20$6101a8c0@dejpolsys> Message-ID: LOL. That's especially amusing William because it is you who kept telling me "stop it with the tag stuff and just give me a function to load these things". See, I do listen occasionally. John W. Colby www.ColbyConsulting.com -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of William Hindman Sent: Tuesday, January 13, 2004 10:15 AM To: Access Developers discussion and problem solving Subject: Re: [AccessD] =function() in .onclick ...great thread ...every once in a while I still manage to learn something from you :) William Hindman ----- Original Message ----- From: "John W. Colby" To: "Access Developers discussion and problem solving" Sent: Tuesday, January 13, 2004 9:43 AM Subject: RE: [AccessD] =function() in .onclick > Chris, > > I credit Shamil with teaching me everything I know about Withevents. I > would never have discovered them, and would not be where I am today in > Access without his examples and his prodding to look at WithEvents. > > If you looked at Shamil's stuff you will see where he places the [Event > Procedure] in the control's event procedure using code inside the Init event > of the class itself as the class instantiates. That is where I learned to > do this and one reason I so dislike developers putting function calls in > those properties. > > I used to use the tag property a lot using ADH code to set and read them. > Once I started using classes I moved away from that to either setting > properties directly in the class init or (in the case of my scanner, where > it's more generic) using class properties to set these values later. There > are pluses and minuses to using the tag - the control carries it's > initialization properties with it, but if any other developer uses the tag > yours can get trashed. I finally just stopped using it although there is > still ONE place I do, and that is in my Just In Time form loading, where I > place the form name in the tag. If it's there it will do JIT, otherwise it > just loads normally. > > I would like to thank you though for the hint about input masks. My users > have been pushing me to "standardize" the date inputmasks and using my > framework I can do just that quite easily. > > John W. Colby > www.ColbyConsulting.com From bheid at appdevgrp.com Tue Jan 13 09:38:09 2004 From: bheid at appdevgrp.com (Bobby Heid) Date: Tue, 13 Jan 2004 10:38:09 -0500 Subject: [AccessD] Archive results display problem. ADDENDUM In-Reply-To: <916187228923D311A6FE00A0CC3FAA3072A46E@ADGSERVER> Message-ID: <916187228923D311A6FE00A0CC3FAA305BB184@ADGSERVER> The 4 or 5 results is per page. I could get to each of the pages. Bobby -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Bobby Heid Sent: Tuesday, January 13, 2004 10:26 AM To: 'Access Developers discussion and problem solving' Subject: [AccessD] Archive results display problem. Hey all, I went to search the archives and the results were over many pages. The problem is that there are no scroll bars to allow me to see past the first 4 or 5 returned results. I was not sure who to report this to. Thanks, Bobby _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From EdTesiny at oasas.state.ny.us Tue Jan 13 09:38:09 2004 From: EdTesiny at oasas.state.ny.us (Tesiny, Ed) Date: Tue, 13 Jan 2004 10:38:09 -0500 Subject: [AccessD] Archive results display problem. Message-ID: I was just in the archives about a half hour ago and had no problems, scroll bars there and working. I'm using IE 6.0 SP1. Ed Tesiny EdTesiny at oasas.state.ny.us -----Original Message----- From: Bobby Heid [mailto:bheid at appdevgrp.com] Sent: Tuesday, January 13, 2004 10:26 AM To: 'Access Developers discussion and problem solving' Subject: [AccessD] Archive results display problem. Hey all, I went to search the archives and the results were over many pages. The problem is that there are no scroll bars to allow me to see past the first 4 or 5 returned results. I was not sure who to report this to. Thanks, Bobby _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From bheid at appdevgrp.com Tue Jan 13 09:42:32 2004 From: bheid at appdevgrp.com (Bobby Heid) Date: Tue, 13 Jan 2004 10:42:32 -0500 Subject: [AccessD] Archive results display problem. In-Reply-To: <916187228923D311A6FE00A0CC3FAA3072A47C@ADGSERVER> Message-ID: <916187228923D311A6FE00A0CC3FAA305BB185@ADGSERVER> Same version of IE here also. I will try again. Bobby -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Tesiny, Ed Sent: Tuesday, January 13, 2004 10:38 AM To: Access Developers discussion and problem solving Subject: RE: [AccessD] Archive results display problem. I was just in the archives about a half hour ago and had no problems, scroll bars there and working. I'm using IE 6.0 SP1. Ed Tesiny EdTesiny at oasas.state.ny.us -----Original Message----- From: Bobby Heid [mailto:bheid at appdevgrp.com] Sent: Tuesday, January 13, 2004 10:26 AM To: 'Access Developers discussion and problem solving' Subject: [AccessD] Archive results display problem. Hey all, I went to search the archives and the results were over many pages. The problem is that there are no scroll bars to allow me to see past the first 4 or 5 returned results. I was not sure who to report this to. Thanks, Bobby _______________________________________________ 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 From bheid at appdevgrp.com Tue Jan 13 09:44:28 2004 From: bheid at appdevgrp.com (Bobby Heid) Date: Tue, 13 Jan 2004 10:44:28 -0500 Subject: [AccessD] Archive results display problem. In-Reply-To: <916187228923D311A6FE00A0CC3FAA3072A47C@ADGSERVER> Message-ID: <916187228923D311A6FE00A0CC3FAA305BB186@ADGSERVER> Ok. I went back to the archives and performed the same search and all worked fine this time. Must have been some sort of glitch. Sorry for the interruption. Thanks, Bobby -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Tesiny, Ed Sent: Tuesday, January 13, 2004 10:38 AM To: Access Developers discussion and problem solving Subject: RE: [AccessD] Archive results display problem. I was just in the archives about a half hour ago and had no problems, scroll bars there and working. I'm using IE 6.0 SP1. Ed Tesiny EdTesiny at oasas.state.ny.us -----Original Message----- From: Bobby Heid [mailto:bheid at appdevgrp.com] Sent: Tuesday, January 13, 2004 10:26 AM To: 'Access Developers discussion and problem solving' Subject: [AccessD] Archive results display problem. Hey all, I went to search the archives and the results were over many pages. The problem is that there are no scroll bars to allow me to see past the first 4 or 5 returned results. I was not sure who to report this to. Thanks, Bobby _______________________________________________ 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 From markamatte at hotmail.com Tue Jan 13 09:50:02 2004 From: markamatte at hotmail.com (Mark A Matte) Date: Tue, 13 Jan 2004 15:50:02 +0000 Subject: [AccessD] DESPERATE problem with indexes Message-ID: Hello All, In A97 I have a db giving the error " isn't an index in this table. Look in the Indexes collection of the TableDef object to determine the valid index names. (Error 3015)"...I get the error when trying to link to ,import from ,compact or repair this db...I desperately need to get the data out of the db...any ideas? Thanks, Mark A. Matte _________________________________________________________________ Learn how to choose, serve, and enjoy wine at Wine @ MSN. http://wine.msn.com/ From wdhindman at bellsouth.net Tue Jan 13 10:01:02 2004 From: wdhindman at bellsouth.net (William Hindman) Date: Tue, 13 Jan 2004 11:01:02 -0500 Subject: [AccessD] =function() in .onclick References: Message-ID: <006401c3d9ee$7319cb60$6101a8c0@dejpolsys> ...I learned the hard way to loathe tag use ...nothing like writing reams of cbf using tags only to have some #$%#$'s library write right over them ...it was a sobering exercise and wearing on my expletives vocabulary :)))) William Hindman - Next Year In The Free State! ----- Original Message ----- From: "John W. Colby" To: "Access Developers discussion and problem solving" Sent: Tuesday, January 13, 2004 10:36 AM Subject: RE: [AccessD] =function() in .onclick > LOL. That's especially amusing William because it is you who kept telling > me "stop it with the tag stuff and just give me a function to load these > things". > > See, I do listen occasionally. > > John W. Colby > www.ColbyConsulting.com > > -----Original Message----- > From: accessd-bounces at databaseadvisors.com > [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of William > Hindman > Sent: Tuesday, January 13, 2004 10:15 AM > To: Access Developers discussion and problem solving > Subject: Re: [AccessD] =function() in .onclick > > > ...great thread ...every once in a while I still manage to learn something > from you :) > > William Hindman > > > ----- Original Message ----- > From: "John W. Colby" > To: "Access Developers discussion and problem solving" > > Sent: Tuesday, January 13, 2004 9:43 AM > Subject: RE: [AccessD] =function() in .onclick > > > > Chris, > > > > I credit Shamil with teaching me everything I know about Withevents. I > > would never have discovered them, and would not be where I am today in > > Access without his examples and his prodding to look at WithEvents. > > > > If you looked at Shamil's stuff you will see where he places the [Event > > Procedure] in the control's event procedure using code inside the Init > event > > of the class itself as the class instantiates. That is where I learned to > > do this and one reason I so dislike developers putting function calls in > > those properties. > > > > I used to use the tag property a lot using ADH code to set and read them. > > Once I started using classes I moved away from that to either setting > > properties directly in the class init or (in the case of my scanner, where > > it's more generic) using class properties to set these values later. > There > > are pluses and minuses to using the tag - the control carries it's > > initialization properties with it, but if any other developer uses the tag > > yours can get trashed. I finally just stopped using it although there is > > still ONE place I do, and that is in my Just In Time form loading, where I > > place the form name in the tag. If it's there it will do JIT, otherwise > it > > just loads normally. > > > > I would like to thank you though for the hint about input masks. My users > > have been pushing me to "standardize" the date inputmasks and using my > > framework I can do just that quite easily. > > > > John W. Colby > > www.ColbyConsulting.com > > > > > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com > From andy at minstersystems.co.uk Tue Jan 13 10:05:09 2004 From: andy at minstersystems.co.uk (Andy Lacey) Date: Tue, 13 Jan 2004 16:05:09 +0000 Subject: [AccessD] DESPERATE problem with indexes Message-ID: <20040113160506.A374924CEDC@smithers.nildram.co.uk> Not much consolation Mark but see http://dbforums.com/arch/106/2002/11/563477 Sounds like MDB's knackered and you'll need specialist help. Although more optimistic view at http://www.mvps.org/access/bugs/bugs0006.htm , but that does relate to A95. You may want to look at other refs that Google found on a search for "isn't an index in this table". -- Andy Lacey http://www.minstersystems.co.uk --------- Original Message -------- From: Access Developers discussion and problem solving To: accessd at databaseadvisors.com Subject: [AccessD] DESPERATE problem with indexes Date: 13/01/04 15:52 > > Hello All, > > In A97 I have a db giving the error "<Index name> isn't an index in this > table. Look in the Indexes collection of the TableDef object to determine > the valid index names. (Error 3015)"...I get the error when trying to link > to ,import from ,compact or repair this db...I desperately need to get the > data out of the db...any ideas? > > Thanks, > > Mark A. Matte > > _________________________________________________________________ > Learn how to choose, serve, and enjoy wine at Wine @ MSN. > http://wine.msn.com/ > > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com > > > > > ________________________________________________ Message sent using UebiMiau 2.7.2 From bheygood at abestsystems.com Tue Jan 13 10:07:59 2004 From: bheygood at abestsystems.com (Bob Heygood) Date: Tue, 13 Jan 2004 08:07:59 -0800 Subject: [AccessD] Access n Front Page In-Reply-To: <000001c3d6bb$82df5a50$8b194244@hargrove.internal> Message-ID: Hey to the group, Hopefully this is not too far off. But so much here now has to do with the web. I am looking for some info on editing a record in an Access db from a web browser using Front Page. I have found enough on displaying records, but not on editing existing data. I suspect asp or some such will be involved. best, bob From Lambert.Heenan at AIG.com Tue Jan 13 10:13:15 2004 From: Lambert.Heenan at AIG.com (Heenan, Lambert) Date: Tue, 13 Jan 2004 11:13:15 -0500 Subject: [AccessD] DESPERATE problem with indexes Message-ID: <8B98F8EA48F8BA47A2F24E0D0AF40CF407AD7CA5@xlivmbx12.aig.com> Have you tried opening the table in question and removing the Index setting from the offending field. Then save the table design. Next reinstate the index and save the table design again. With a bit of luck Access will simply rebuild the index and all will be well. Lambert -----Original Message----- From: Mark A Matte [mailto:markamatte at hotmail.com] Sent: Tuesday, January 13, 2004 10:50 AM To: accessd at databaseadvisors.com Subject: [AccessD] DESPERATE problem with indexes Hello All, In A97 I have a db giving the error " isn't an index in this table. Look in the Indexes collection of the TableDef object to determine the valid index names. (Error 3015)"...I get the error when trying to link to ,import from ,compact or repair this db...I desperately need to get the data out of the db...any ideas? Thanks, Mark A. Matte _________________________________________________________________ Learn how to choose, serve, and enjoy wine at Wine @ MSN. http://wine.msn.com/ _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From wdhindman at bellsouth.net Tue Jan 13 10:34:08 2004 From: wdhindman at bellsouth.net (William Hindman) Date: Tue, 13 Jan 2004 11:34:08 -0500 Subject: [AccessD] Access n Front Page References: Message-ID: <008501c3d9f3$116248c0$6101a8c0@dejpolsys> Bob ...try http://www.outfront.net/spooky/index.htm ...and http://spiderwebwoman.com/resources/dbrwtipsandtricks.asp ...you might also want to join the FPlist-subscribe at yahoogroups.com which is very similar to AccessD and has a huge, searchable archive. William Hindman - Next Year In The Free State! ----- Original Message ----- From: "Bob Heygood" To: "Access Developers discussion and problem solving" Sent: Tuesday, January 13, 2004 11:07 AM Subject: [AccessD] Access n Front Page > Hey to the group, > > Hopefully this is not too far off. But so much here now has to do with the > web. > > I am looking for some info on editing a record in an Access db from a web > browser using Front Page. I have found enough on displaying records, but not > on editing existing data. I suspect asp or some such will be involved. > > best, > > bob > > > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com > From jimdettman at earthlink.net Tue Jan 13 10:59:48 2004 From: jimdettman at earthlink.net (Jim Dettman) Date: Tue, 13 Jan 2004 11:59:48 -0500 Subject: [AccessD] DESPERATE problem with indexes In-Reply-To: Message-ID: Mark, As Andy said, the database is hosed. You can try JETCOMP.EXE on it and that might straighten it out, but it also might not. I'd simply go to a backup. Jim Dettman President, Online Computer Services of WNY, Inc. (315) 699-3443 jimdettman at earthlink.net -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Mark A Matte Sent: Tuesday, January 13, 2004 10:50 AM To: accessd at databaseadvisors.com Subject: [AccessD] DESPERATE problem with indexes Hello All, In A97 I have a db giving the error " isn't an index in this table. Look in the Indexes collection of the TableDef object to determine the valid index names. (Error 3015)"...I get the error when trying to link to ,import from ,compact or repair this db...I desperately need to get the data out of the db...any ideas? Thanks, Mark A. Matte _________________________________________________________________ Learn how to choose, serve, and enjoy wine at Wine @ MSN. http://wine.msn.com/ _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From DWUTKA at marlow.com Tue Jan 13 12:03:31 2004 From: DWUTKA at marlow.com (DWUTKA at marlow.com) Date: Tue, 13 Jan 2004 12:03:31 -0600 Subject: [AccessD] Enumerated constants Message-ID: <2F8793082E00D4119A1700B0D0216BF80222772E@main2.marlow.com> No, direct from the MSDN... constantexpression Optional. Value of the element (evaluates to a Long). If no constantexpression is specified, the value assigned is either zero (if it is the first membername), or 1 greater than the value of the immediately preceding membername. Drew -----Original Message----- From: John W. Colby [mailto:jwcolby at colbyconsulting.com] Sent: Tuesday, January 13, 2004 8:23 AM To: AccessD Subject: [AccessD] Enumerated constants Can enumerated constant VALUES be strings? public enum numbers one = "one" end enum Etc? I can't seem to get this to work. John W. Colby www.ColbyConsulting.com _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From DWUTKA at marlow.com Tue Jan 13 12:05:04 2004 From: DWUTKA at marlow.com (DWUTKA at marlow.com) Date: Tue, 13 Jan 2004 12:05:04 -0600 Subject: [AccessD] datatype underlying bound control Message-ID: <2F8793082E00D4119A1700B0D0216BF80222772F@main2.marlow.com> Yep, you can determine the field, and you can determine the source (that the form is bound too), so using those two pieces of information, you can open the source with ADO (or DAO) and determine it's data type. Let me know if you need help with the code. Drew -----Original Message----- From: John W. Colby [mailto:jwcolby at colbyconsulting.com] Sent: Tuesday, January 13, 2004 9:18 AM To: AccessD Subject: [AccessD] datatype underlying bound control Is there any way to (easily) determine the datatype of the field that a control is bound to? John W. Colby www.ColbyConsulting.com _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From DWUTKA at marlow.com Tue Jan 13 12:06:00 2004 From: DWUTKA at marlow.com (DWUTKA at marlow.com) Date: Tue, 13 Jan 2004 12:06:00 -0600 Subject: [AccessD] Archive results display problem. Message-ID: <2F8793082E00D4119A1700B0D0216BF802227730@main2.marlow.com> Which archives? The ones on my site? http://www.wolfwares.com/AccessD? Drew -----Original Message----- From: Bobby Heid [mailto:bheid at appdevgrp.com] Sent: Tuesday, January 13, 2004 9:26 AM To: 'Access Developers discussion and problem solving' Subject: [AccessD] Archive results display problem. Hey all, I went to search the archives and the results were over many pages. The problem is that there are no scroll bars to allow me to see past the first 4 or 5 returned results. I was not sure who to report this to. Thanks, Bobby _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From DWUTKA at marlow.com Tue Jan 13 12:09:09 2004 From: DWUTKA at marlow.com (DWUTKA at marlow.com) Date: Tue, 13 Jan 2004 12:09:09 -0600 Subject: [AccessD] Access n Front Page Message-ID: <2F8793082E00D4119A1700B0D0216BF802227731@main2.marlow.com> This is down and dirty, but the following is a relatively simple .asp page, which displays an .mdb table in HTML format. You can then edit the values, and submit it, and it will change the values in the table. It requires that you have an ID field (the code is currently set to use field 0 as the ID). <% dim cnn dim rs dim i dim strSQL dim intCount if request.Form("Submit")="Submit" then set cnn=server.CreateObject("ADODB.Connection") set rs=server.CreateObject("ADODB.Recordset") cnn.Provider="Microsoft.Jet.OLEDB.4.0" cnn.Open "C:\Inetpub\domains\airs\Air2000_be.mdb" rs.Open "tblWebFields",cnn,1,3,512 intCount=rs.Fields.Count-1 rs.MoveFirst do until rs.EOF=True for i=1 to intCount rs.Fields(i).value=request.Form(rs.Fields(0).value & "-" & rs.Fields(i).Name) next rs.Update rs.MoveNext loop rs.Close set rs=nothing cnn.Close set cnn=nothing end if %> Dyncorp Field Settings
<% set cnn=server.CreateObject("ADODB.Connection") set rs=server.CreateObject("ADODB.Recordset") cnn.Provider="Microsoft.Jet.OLEDB.4.0" cnn.Open "C:\Inetpub\domains\airs\Air2000_be.mdb" rs.Open "tblWebFields",cnn,1,1,512 response.Write "" & vbcrlf intCount=rs.Fields.Count-1 for i=1 to intCount response.Write "" & vbcrlf next response.Write "" & vbcrlf rs.MoveFirst do until rs.EOF=True response.Write "" & vbcrlf for i=1 to intCount response.Write "" & vbcrlf next response.Write "" & vbcrlf rs.MoveNext loop rs.Close set rs=nothing cnn.Close set cnn=nothing %>
" & rs.Fields(i).Name & "
" & vbcrlf response.Write "
-----Original Message----- From: Bob Heygood [mailto:bheygood at abestsystems.com] Sent: Tuesday, January 13, 2004 10:08 AM To: Access Developers discussion and problem solving Subject: [AccessD] Access n Front Page Hey to the group, Hopefully this is not too far off. But so much here now has to do with the web. I am looking for some info on editing a record in an Access db from a web browser using Front Page. I have found enough on displaying records, but not on editing existing data. I suspect asp or some such will be involved. best, bob _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From prosoft6 at hotmail.com Tue Jan 13 12:26:06 2004 From: prosoft6 at hotmail.com (Julie Reardon-Taylor) Date: Tue, 13 Jan 2004 13:26:06 -0500 Subject: [AccessD] UnDelete Message-ID: Can someone point me to a quick utility to "undelete" some records that were accidentally deleted in a table? The database table is still open and the database has not been compacted yet. Help! Julie Reardon-Taylor PRO-SOFT OF NY, INC. www.pro-soft.net _________________________________________________________________ Rethink your business approach for the new year with the helpful tips here. http://special.msn.com/bcentral/prep04.armx From bheid at appdevgrp.com Tue Jan 13 12:33:38 2004 From: bheid at appdevgrp.com (Bobby Heid) Date: Tue, 13 Jan 2004 13:33:38 -0500 Subject: [AccessD] Archive results display problem. In-Reply-To: <916187228923D311A6FE00A0CC3FAA3072A4FD@ADGSERVER> Message-ID: <916187228923D311A6FE00A0CC3FAA305BB18C@ADGSERVER> Yes. Sorry, I did not know that there was more than one. All seems to be doing well now though. Bobby -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of DWUTKA at marlow.com Sent: Tuesday, January 13, 2004 1:06 PM To: accessd at databaseadvisors.com Subject: RE: [AccessD] Archive results display problem. Which archives? The ones on my site? http://www.wolfwares.com/AccessD? Drew -----Original Message----- From: Bobby Heid [mailto:bheid at appdevgrp.com] Sent: Tuesday, January 13, 2004 9:26 AM To: 'Access Developers discussion and problem solving' Subject: [AccessD] Archive results display problem. Hey all, I went to search the archives and the results were over many pages. The problem is that there are no scroll bars to allow me to see past the first 4 or 5 returned results. I was not sure who to report this to. Thanks, Bobby _______________________________________________ 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 From jwcolby at colbyconsulting.com Tue Jan 13 12:34:28 2004 From: jwcolby at colbyconsulting.com (John W. Colby) Date: Tue, 13 Jan 2004 13:34:28 -0500 Subject: [AccessD] datatype underlying bound control In-Reply-To: <2F8793082E00D4119A1700B0D0216BF80222772F@main2.marlow.com> Message-ID: Drew, If the source is a complex query of 2 or 3 joined tables, how (other than parsing SQL text) do I determine the source table of the field? John W. Colby www.ColbyConsulting.com -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of DWUTKA at marlow.com Sent: Tuesday, January 13, 2004 1:05 PM To: accessd at databaseadvisors.com Subject: RE: [AccessD] datatype underlying bound control Yep, you can determine the field, and you can determine the source (that the form is bound too), so using those two pieces of information, you can open the source with ADO (or DAO) and determine it's data type. Let me know if you need help with the code. Drew -----Original Message----- From: John W. Colby [mailto:jwcolby at colbyconsulting.com] Sent: Tuesday, January 13, 2004 9:18 AM To: AccessD Subject: [AccessD] datatype underlying bound control Is there any way to (easily) determine the datatype of the field that a control is bound to? John W. Colby www.ColbyConsulting.com _______________________________________________ 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 From mikedorism at adelphia.net Tue Jan 13 12:43:03 2004 From: mikedorism at adelphia.net (Mike & Doris Manning) Date: Tue, 13 Jan 2004 13:43:03 -0500 Subject: [AccessD] error questions In-Reply-To: <003d01c3d91d$e3c51990$210110ac@SUSANONE> Message-ID: <000001c3da05$13c7aad0$8b194244@hargrove.internal> Susan, Here is the function I use. The calling procedure passes in the error, procedure name, and calling form/rept. Several standard SQL Server errors are handled. At the end, a form is popped up to let the user know what happened and allow them to add comments, and then an email gets sent to a specified user for corrective action. Doris Manning Database Administrator Hargrove Inc. www.hargroveinc.com ------------------------------- Public Function HandleErrors(lngError As Long, ObjName As String, _ ObjFrom As String) On Error Resume Next bolHandle = False OSUserName = fcnOSUserName() Err.Raise lngError Select Case Err Case Is = -2147467259 strMsgTxt = "Connection to SQL Server has been lost. " strMsgTxt = strMsgTxt & "Try restarting Production Manager. " strMsgTxt = strMsgTxt & "If the problem continues then " strMsgTxt = strMsgTxt & "reboot your computer." MsgBox strMsgTxt, vbOKOnly, "Lost Connection" DoCmd.Quit Case Is = 2202, 2205, 2214 'Printer problems strMsgTxt = "There is a problem with your printer connection. " strMsgTxt = strMsgTxt & "Please reboot your computer. " strMsgTxt = strMsgTxt & "If the problem persists, email the " strMsgTxt = strMsgTxt & "Help Desk for assistance." MsgBox strMsgTxt, vbOKOnly, "Printer Connection Problem" bolHandle = True Case Is = 2212 'Printer not available strMsgTxt = "The printer you have chosen is currently " strMsgTxt = strMsgTxt & "offline. Please select another " strMsgTxt = strMsgTxt & "printer for your report." MsgBox strMsgTxt, vbOKOnly, "Printer Offline" bolHandle = True Case Is = 2950 'Network connection lost strMsgTxt = "There is a problem with your connection to " strMsgTxt = strMsgTxt & "the network. Please reboot your " strMsgTxt = strMsgTxt & "computer." MsgBox strMsgTxt, vbOKOnly, "Lost Network Connection" bolHandle = True End Select strSendSubj = " 0 Then strLeadin = strLeadin & vbCrLf & vbCrLf strLeadin = strLeadin & "ADO/DAO Buffer contains " strLeadin = strLeadin & CurrentProject.Connection.Errors.Count If CurrentProject.Connection.Errors.Count < 2 Then strLeadin = strLeadin & " error" & vbCrLf Else strLeadin = strLeadin & " errors" & vbCrLf End If End If ElseIf Err.Description = vbNullString Then strLeadin = strLeadin & "Unknown Error " & Err & " with no " strLeadin = strLeadin & " description on file." Else strLeadin = strLeadin & "Unhandled Error " & Err & ": " & Err.Description End If strMsgTxt = strLeadin & strError If bolHandle = True Then Call SendSafeEmail(strSendTo, strSendSubj, strMsgTxt, False) Else DoCmd.OpenForm "frmErrorInfo" End If End Function Public Function SendErrorMessage() Dim strErrorInfo As String If IsNull(Forms!frmErrorInfo!msgDoing) Then strErrorInfo = "" Else strErrorInfo = Forms!frmErrorInfo!msgDoing End If If Forms!frmErrorInfo!chkShowError = True Then MsgBox strMsgTxt, vbOKOnly, "Display Error" strMsgTxt = strMsgTxt & vbCrLf & vbCrLf & "User description of problem:" & vbCrLf & strErrorInfo Call SendSafeEmail(strSendTo, strSendSubj, strMsgTxt, False) DoCmd.Close acForm, "frmErrorInfo" DoCmd.Echo True End Function -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Susan Harkins Sent: Monday, January 12, 2004 10:08 AM To: Access Developers discussion and problem solving Subject: Re: [AccessD] error questions Doris -- I'd like to see that sometime. I do agree with you both that it wouldn't always be appropriate, but geez Louise ... give me a break! Please!!!!!!!!!! ;) Somewhere I've got a whole book on error handling, I really ought to read it. Susan H. > John is right that you wouldn't always want to do this because > sometimes it > is better to handle the issue within the calling procedure or > function. However, I do handle some of the more common errors (such as > lost SQL connection or printer problems) within my generic error > handling function because that made more sense to me. _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From my.lists at verizon.net Tue Jan 13 12:42:55 2004 From: my.lists at verizon.net (Francisco H Tapia) Date: Tue, 13 Jan 2004 10:42:55 -0800 Subject: [AccessD] UnDelete In-Reply-To: References: Message-ID: <40043C2F.8000708@verizon.net> WinZip to restore your backup? :D Julie Reardon-Taylor wrote: > Can someone point me to a quick utility to "undelete" some records > that were accidentally deleted in a table? The database table is > still open and the database has not been compacted yet. > > Help! > > > > Julie Reardon-Taylor > > -- -Francisco From DWUTKA at marlow.com Tue Jan 13 12:45:54 2004 From: DWUTKA at marlow.com (DWUTKA at marlow.com) Date: Tue, 13 Jan 2004 12:45:54 -0600 Subject: [AccessD] Archive results display problem. Message-ID: <2F8793082E00D4119A1700B0D0216BF802227736@main2.marlow.com> Yep, there is an archive on the DBA site, but it only goes back to when the new server went up. I rebooted my home server about 30 minutes ago, because it looks like my memory was running close to full (my firewall does that after a while, cause it doesn't flush things right....have to look into that). That may have been a possible cause. Drew -----Original Message----- From: Bobby Heid [mailto:bheid at appdevgrp.com] Sent: Tuesday, January 13, 2004 12:34 PM To: 'Access Developers discussion and problem solving' Subject: RE: [AccessD] Archive results display problem. Yes. Sorry, I did not know that there was more than one. All seems to be doing well now though. Bobby -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of DWUTKA at marlow.com Sent: Tuesday, January 13, 2004 1:06 PM To: accessd at databaseadvisors.com Subject: RE: [AccessD] Archive results display problem. Which archives? The ones on my site? http://www.wolfwares.com/AccessD? Drew -----Original Message----- From: Bobby Heid [mailto:bheid at appdevgrp.com] Sent: Tuesday, January 13, 2004 9:26 AM To: 'Access Developers discussion and problem solving' Subject: [AccessD] Archive results display problem. Hey all, I went to search the archives and the results were over many pages. The problem is that there are no scroll bars to allow me to see past the first 4 or 5 returned results. I was not sure who to report this to. Thanks, Bobby _______________________________________________ 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 _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From DWUTKA at marlow.com Tue Jan 13 12:47:00 2004 From: DWUTKA at marlow.com (DWUTKA at marlow.com) Date: Tue, 13 Jan 2004 12:47:00 -0600 Subject: [AccessD] datatype underlying bound control Message-ID: <2F8793082E00D4119A1700B0D0216BF802227737@main2.marlow.com> Who cares what the source is. If it shows in the form as SQL, then just open a recordset with that SQL. If it shows as a saved query, just open the saved query, etc. Drew -----Original Message----- From: John W. Colby [mailto:jwcolby at colbyconsulting.com] Sent: Tuesday, January 13, 2004 12:34 PM To: Access Developers discussion and problem solving Subject: RE: [AccessD] datatype underlying bound control Drew, If the source is a complex query of 2 or 3 joined tables, how (other than parsing SQL text) do I determine the source table of the field? John W. Colby www.ColbyConsulting.com -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of DWUTKA at marlow.com Sent: Tuesday, January 13, 2004 1:05 PM To: accessd at databaseadvisors.com Subject: RE: [AccessD] datatype underlying bound control Yep, you can determine the field, and you can determine the source (that the form is bound too), so using those two pieces of information, you can open the source with ADO (or DAO) and determine it's data type. Let me know if you need help with the code. Drew -----Original Message----- From: John W. Colby [mailto:jwcolby at colbyconsulting.com] Sent: Tuesday, January 13, 2004 9:18 AM To: AccessD Subject: [AccessD] datatype underlying bound control Is there any way to (easily) determine the datatype of the field that a control is bound to? John W. Colby www.ColbyConsulting.com _______________________________________________ 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 _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From bheid at appdevgrp.com Tue Jan 13 12:52:10 2004 From: bheid at appdevgrp.com (Bobby Heid) Date: Tue, 13 Jan 2004 13:52:10 -0500 Subject: [AccessD] Archive results display problem. In-Reply-To: <916187228923D311A6FE00A0CC3FAA3072A516@ADGSERVER> Message-ID: <916187228923D311A6FE00A0CC3FAA305BB18D@ADGSERVER> Thanks! -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of DWUTKA at marlow.com Sent: Tuesday, January 13, 2004 1:46 PM To: accessd at databaseadvisors.com Subject: RE: [AccessD] Archive results display problem. Yep, there is an archive on the DBA site, but it only goes back to when the new server went up. I rebooted my home server about 30 minutes ago, because it looks like my memory was running close to full (my firewall does that after a while, cause it doesn't flush things right....have to look into that). That may have been a possible cause. Drew -----Original Message----- From: Bobby Heid [mailto:bheid at appdevgrp.com] Sent: Tuesday, January 13, 2004 12:34 PM To: 'Access Developers discussion and problem solving' Subject: RE: [AccessD] Archive results display problem. Yes. Sorry, I did not know that there was more than one. All seems to be doing well now though. Bobby -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of DWUTKA at marlow.com Sent: Tuesday, January 13, 2004 1:06 PM To: accessd at databaseadvisors.com Subject: RE: [AccessD] Archive results display problem. Which archives? The ones on my site? http://www.wolfwares.com/AccessD? Drew -----Original Message----- From: Bobby Heid [mailto:bheid at appdevgrp.com] Sent: Tuesday, January 13, 2004 9:26 AM To: 'Access Developers discussion and problem solving' Subject: [AccessD] Archive results display problem. Hey all, I went to search the archives and the results were over many pages. The problem is that there are no scroll bars to allow me to see past the first 4 or 5 returned results. I was not sure who to report this to. Thanks, Bobby _______________________________________________ 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 _______________________________________________ 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 From gustav at cactus.dk Tue Jan 13 12:58:12 2004 From: gustav at cactus.dk (Gustav Brock) Date: Tue, 13 Jan 2004 19:58:12 +0100 Subject: [AccessD] datatype underlying bound control In-Reply-To: References: Message-ID: <5240458135.20040113195812@cactus.dk> Hi John Returning to your original question, you can use VarType(): intVarType = VarType(Forms("frmSomeForm")!txtTextBox.Value) This requires, of course, that the form is open. Your second question is another matter ... What are you trying to do? /gustav > If the source is a complex query of 2 or 3 joined tables, how (other than > parsing SQL text) do I determine the source table of the field? > Yep, you can determine the field, and you can determine the source (that the > form is bound too), so using those two pieces of information, you can open > the source with ADO (or DAO) and determine it's data type. > Let me know if you need help with the code. > Is there any way to (easily) determine the datatype of the field that a > control is bound to? From jmwayne at moordri.com Tue Jan 13 13:25:01 2004 From: jmwayne at moordri.com (JM Wayne) Date: Tue, 13 Jan 2004 14:25:01 -0500 Subject: [AccessD] A curious problem... Message-ID: <000401c3da0a$f197ee60$87c9040a@direcway.com> I have an A2K database that has been in use for over 2 years. All of a sudden the forms are resizing themselves. In one case the user enters data on one form and by clicking a button opens another form for data input. In another form the user double clicks an item in a list box and opens a form to enter data. In both cases when they close the second form the initial form is no longer maximized. I entered DoCmd.Maximize in the second form's On Close event but it is kind of clumsy. There has been no change in the code that should cause this to happen. I should mention that the forms that are having this problem have a great number of controls on them. Any advice or explanation would be appreciated. Judy Judith M Wayne Shefford-Meade, Inc. From Lambert.Heenan at AIG.com Tue Jan 13 13:50:34 2004 From: Lambert.Heenan at AIG.com (Heenan, Lambert) Date: Tue, 13 Jan 2004 14:50:34 -0500 Subject: [AccessD] A curious problem... Message-ID: <8B98F8EA48F8BA47A2F24E0D0AF40CF407AD7CAC@xlivmbx12.aig.com> First make a backup copy of the MDB file. Then try repairing. No joy? Try decompiling. Still no luck? Try importing all the objects in the database to a new mdb file. Lambert -----Original Message----- From: JM Wayne [mailto:jmwayne at moordri.com] Sent: Tuesday, January 13, 2004 2:25 PM To: AccessD (E-mail) Subject: [AccessD] A curious problem... I have an A2K database that has been in use for over 2 years. All of a sudden the forms are resizing themselves. In one case the user enters data on one form and by clicking a button opens another form for data input. In another form the user double clicks an item in a list box and opens a form to enter data. In both cases when they close the second form the initial form is no longer maximized. I entered DoCmd.Maximize in the second form's On Close event but it is kind of clumsy. There has been no change in the code that should cause this to happen. I should mention that the forms that are having this problem have a great number of controls on them. Any advice or explanation would be appreciated. Judy Judith M Wayne Shefford-Meade, Inc. _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From markamatte at hotmail.com Tue Jan 13 14:11:20 2004 From: markamatte at hotmail.com (Mark A Matte) Date: Tue, 13 Jan 2004 20:11:20 +0000 Subject: [AccessD] DESPERATE problem with indexes Message-ID: Hello All, I wanted to share what just happen...and maybe get some feedback as to why it worked. >In A97 I have a db giving the error " isn't an index in this >table. Look in the Indexes collection of the TableDef object to determine >the valid index names. (Error 3015)"...I get the error when trying to open, >link >to ,import from ,compact or repair this db... In doing some research, I saw it mentioned several times...that the reason the REPAIR would not work...was that it tried to open the db before repairing...the same with importing, linking, and TRANSFERDATABASE. I tried to create links and importing the data with just VBA...unsuccessfully. Next I tried to edit the DATABASE field in the MSysObjects table...(desperate)...thinking I could force the link...(unsuccessful) At this point I had the corrupt BE on my local machine...and could not open, create a link or anything to it...then I got a copy of the FE...which already had the links defined for an old location...but same tables...used the "Linked Table Manager"...and the links refreshed successfully...I was able to use these links to import 100% of the data. Is my assumption correct...the reason the table manager worked is because it did not try to open the db before refreshing the links? Also...is this a good idea...or just wishful thinking: Before sending out a self contained db...or even a FE/BE db...create a db with copies of the empty tables and links to tables in the actual db(location doesn't matter as long as you refresh the links and NOT recreate them)...this would make for an easy recovery of a corrupt db. Any insight would be greatly appreciated. Thanks for all the suggestions, Mark A. Matte >From: "Jim Dettman" >Reply-To: Access Developers discussion and problem >solving >To: "Access Developers discussion and problem >solving" >Subject: RE: [AccessD] DESPERATE problem with indexes >Date: Tue, 13 Jan 2004 11:59:48 -0500 > >Mark, > > As Andy said, the database is hosed. You can try JETCOMP.EXE on it and >that might straighten it out, but it also might not. > >I'd simply go to a backup. > >Jim Dettman >President, >Online Computer Services of WNY, Inc. >(315) 699-3443 >jimdettman at earthlink.net > >-----Original Message----- >From: accessd-bounces at databaseadvisors.com >[mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Mark A Matte >Sent: Tuesday, January 13, 2004 10:50 AM >To: accessd at databaseadvisors.com >Subject: [AccessD] DESPERATE problem with indexes > > >Hello All, > >In A97 I have a db giving the error " isn't an index in this >table. Look in the Indexes collection of the TableDef object to determine >the valid index names. (Error 3015)"...I get the error when trying to link >to ,import from ,compact or repair this db...I desperately need to get the >data out of the db...any ideas? > >Thanks, > >Mark A. Matte > >_________________________________________________________________ >Learn how to choose, serve, and enjoy wine at Wine @ MSN. >http://wine.msn.com/ > >_______________________________________________ >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 _________________________________________________________________ Learn how to choose, serve, and enjoy wine at Wine @ MSN. http://wine.msn.com/ From prosoft6 at hotmail.com Tue Jan 13 14:45:11 2004 From: prosoft6 at hotmail.com (Julie Reardon-Taylor) Date: Tue, 13 Jan 2004 15:45:11 -0500 Subject: [AccessD] UnDelete Message-ID: Aren't Access records marked for deletion, and not actually deleted until the database is compacted? Shouldn't these records still be in the table? Can't I unmark these records for deletion? Julie Reardon-Taylor PRO-SOFT OF NY, INC. www.pro-soft.net _________________________________________________________________ Get a FREE online virus check for your PC here, from McAfee. http://clinic.mcafee.com/clinic/ibuy/campaign.asp?cid=3963 From subs1847 at solution-providers.ie Tue Jan 13 14:54:32 2004 From: subs1847 at solution-providers.ie (Mark L. Breen) Date: Tue, 13 Jan 2004 20:54:32 -0000 Subject: [AccessD] Looking for any data you can give me References: <008501c3d9f3$116248c0$6101a8c0@dejpolsys> Message-ID: <000d01c3da17$750ac950$0101a8c0@D8TZHN0J> Hello All, Firstly, I have posted it to AccessD and OT because it is nearly not database related, so if your filter gives you two copies of the email, apologies in advance. I am looking for some data with which to do some analysis in relation to the 80/20 rule. What I would like to have is hundreds, but preferably thousands, and any qty greater than that of real world data. For example, a list of Orders, including product codes and preferably prices, dates, sales person / Id, Call outs for a service company including duration, reason for call out, region, engineer assigned List of incident records in an insurance company including causes, cost of claim, age of claimant, geographical location of claimant / accident Results of voting for election results, broken down by area and any other categories available. I am fully aware that usually when someone has such data it is confidential, I do not need to know the source, I do not need to know what the actual products are, I am only interested in them from an analytical perspective. The reason I am asking for the small amount of backup data is so that I can make some detailed analysis of what I am looking at. Eg, not just order size, but revenue versus order qty versus product regularity etc. If you have such data and wanted to just change the look tables to Product 1, product 2, etc it would also be fine for me. Needless to say, I will not show the data to anyone else at all, but I know that certain data is private and thats that. However, if you have anything that you would not mind giving out, I would be grateful. Alternatively, if you know of anywhere I can get a file of records like I am referring to, it would be great also. Thanks in advance for you time, Mark Breen Solution Providers Ireland From cfoust at infostatsystems.com Tue Jan 13 14:55:27 2004 From: cfoust at infostatsystems.com (Charlotte Foust) Date: Tue, 13 Jan 2004 12:55:27 -0800 Subject: [AccessD] UnDelete Message-ID: *Objects* are marked for deletion and removed with the database is compacted. Records are deleted as you go. Charlotte Foust -----Original Message----- From: Julie Reardon-Taylor [mailto:prosoft6 at hotmail.com] Sent: Tuesday, January 13, 2004 12:45 PM To: accessd at databaseadvisors.com Subject: Re: [AccessD] UnDelete Aren't Access records marked for deletion, and not actually deleted until the database is compacted? Shouldn't these records still be in the table? Can't I unmark these records for deletion? Julie Reardon-Taylor PRO-SOFT OF NY, INC. www.pro-soft.net _________________________________________________________________ Get a FREE online virus check for your PC here, from McAfee. http://clinic.mcafee.com/clinic/ibuy/campaign.asp?cid=3963 _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From jimdettman at earthlink.net Tue Jan 13 15:11:18 2004 From: jimdettman at earthlink.net (Jim Dettman) Date: Tue, 13 Jan 2004 16:11:18 -0500 Subject: [AccessD] UnDelete In-Reply-To: Message-ID: Julie, yes they are there, but there is no functionality in Access/JET to undelete them. Part of the reason is the LV (Long Value Pages) are recycled (depending on a registry setting), so it may not always be possible to bring a record back if records have been saved. Because of that, an undelete has never been built into Access. Jim Dettman President, Online Computer Services of WNY, Inc. (315) 699-3443 jimdettman at earthlink.net -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Julie Reardon-Taylor Sent: Tuesday, January 13, 2004 3:45 PM To: accessd at databaseadvisors.com Subject: Re: [AccessD] UnDelete Aren't Access records marked for deletion, and not actually deleted until the database is compacted? Shouldn't these records still be in the table? Can't I unmark these records for deletion? Julie Reardon-Taylor PRO-SOFT OF NY, INC. www.pro-soft.net _________________________________________________________________ Get a FREE online virus check for your PC here, from McAfee. http://clinic.mcafee.com/clinic/ibuy/campaign.asp?cid=3963 _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From Paul.Millard at freight.fedex.com Tue Jan 13 15:38:41 2004 From: Paul.Millard at freight.fedex.com (Millard, Paul --- Sr. Developer Analyst ---WGO) Date: Tue, 13 Jan 2004 13:38:41 -0800 Subject: [AccessD] SQL Query Grouping Message-ID: <67B2D43A2067B248A36B007650A2312C14530F@PSJOE2K1.fxfwest.freight.fedex.com> Folks, I need help with an SQL querying using SQL Server. The query below works fine...it's a simple grouping query that displays count of records, sum of revenue etc. However, what I'm trying to accomplish is to force each grouping such as 1, 2, and 3 (see below) even when records do not exist. Normally, a group query only shows the groupings where records exist. How can I accomplish this? My initial thoughts are to create the groupings in separate table and try to link them. Not sure how that can be done in SQL. Thanks in advance. Paul Millard San Jose, CA sSQL = "SELECT " & _ "Case " & _ "When StdDays = 1 Then 1 " & _ "When StdDays = 2 Then 2 " & _ "When StdDays >= 3 Then 3 " & _ "Else 0 End As StdDays, " & _ "Count(Pro) As Bills, " & _ "Sum(Rev) As Rev, " & _ "Sum(Wt) As Wt " & _ "FROM tblOpus " & _ "WHERE Rpt = 'R' " & _ "GROUP BY " & _ "Case " & _ "When StdDays = 1 Then 1 " & _ "When StdDays = 2 Then 2 " & _ "When StdDays >= 3 Then 3 " & _ "Else 0 End " & _ "ORDER BY StdDays" ********************************************************** This message contains information that is confidential and proprietary to FedEx Freight or its affiliates. It is intended only for the recipient named and for the express purpose(s) described therein. Any other use is prohibited. **************************************************************** From Subscriptions at servicexp.com Tue Jan 13 15:45:00 2004 From: Subscriptions at servicexp.com (Robert Gracie) Date: Tue, 13 Jan 2004 16:45:00 -0500 Subject: [AccessD] =function() in .onclick In-Reply-To: Message-ID: Hello All, Since I'm just learning this type of programming technique I thought I would ask a question... Why not use Implements instead of WithEvents? My limited understand of WithEvents is that they will not return functionality unit they (the event) has completed processing... Since I'm just at the "door" so to speak with learning how to use and incorporate these new (to me) programming techniques into my work, I really want to start out using the "best" technique... Robert Gracie www.servicexp.com -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of John W. Colby Sent: Tuesday, January 13, 2004 9:44 AM To: Access Developers discussion and problem solving Subject: RE: [AccessD] =function() in .onclick Chris, I credit Shamil with teaching me everything I know about Withevents. I would never have discovered them, and would not be where I am today in Access without his examples and his prodding to look at WithEvents. If you looked at Shamil's stuff you will see where he places the [Event Procedure] in the control's event procedure using code inside the Init event of the class itself as the class instantiates. That is where I learned to do this and one reason I so dislike developers putting function calls in those properties. I used to use the tag property a lot using ADH code to set and read them. Once I started using classes I moved away from that to either setting properties directly in the class init or (in the case of my scanner, where it's more generic) using class properties to set these values later. There are pluses and minuses to using the tag - the control carries it's initialization properties with it, but if any other developer uses the tag yours can get trashed. I finally just stopped using it although there is still ONE place I do, and that is in my Just In Time form loading, where I place the form name in the tag. If it's there it will do JIT, otherwise it just loads normally. I would like to thank you though for the hint about input masks. My users have been pushing me to "standardize" the date inputmasks and using my framework I can do just that quite easily. John W. Colby www.ColbyConsulting.com From cfoust at infostatsystems.com Tue Jan 13 15:56:03 2004 From: cfoust at infostatsystems.com (Charlotte Foust) Date: Tue, 13 Jan 2004 13:56:03 -0800 Subject: [AccessD] =function() in .onclick Message-ID: They have somewhat different purposes. Implements allows you to subclass an existing object/class and give it additional or different functionality, so you can have a class Dog and a subclass Spaniel that has a property Retriever. WithEvents allows you to monitor the events of an object/class. You can intercept and respond to specific events when they happen in the object. Did the Bark event trigger? WithEvents lets you find out and respond from another class/object. Charlotte Foust -----Original Message----- From: Robert Gracie [mailto:Subscriptions at servicexp.com] Sent: Tuesday, January 13, 2004 1:45 PM To: Access Developers discussion and problem solving Subject: RE: [AccessD] =function() in .onclick Hello All, Since I'm just learning this type of programming technique I thought I would ask a question... Why not use Implements instead of WithEvents? My limited understand of WithEvents is that they will not return functionality unit they (the event) has completed processing... Since I'm just at the "door" so to speak with learning how to use and incorporate these new (to me) programming techniques into my work, I really want to start out using the "best" technique... Robert Gracie www.servicexp.com -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of John W. Colby Sent: Tuesday, January 13, 2004 9:44 AM To: Access Developers discussion and problem solving Subject: RE: [AccessD] =function() in .onclick Chris, I credit Shamil with teaching me everything I know about Withevents. I would never have discovered them, and would not be where I am today in Access without his examples and his prodding to look at WithEvents. If you looked at Shamil's stuff you will see where he places the [Event Procedure] in the control's event procedure using code inside the Init event of the class itself as the class instantiates. That is where I learned to do this and one reason I so dislike developers putting function calls in those properties. I used to use the tag property a lot using ADH code to set and read them. Once I started using classes I moved away from that to either setting properties directly in the class init or (in the case of my scanner, where it's more generic) using class properties to set these values later. There are pluses and minuses to using the tag - the control carries it's initialization properties with it, but if any other developer uses the tag yours can get trashed. I finally just stopped using it although there is still ONE place I do, and that is in my Just In Time form loading, where I place the form name in the tag. If it's there it will do JIT, otherwise it just loads normally. I would like to thank you though for the hint about input masks. My users have been pushing me to "standardize" the date inputmasks and using my framework I can do just that quite easily. John W. Colby www.ColbyConsulting.com _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From jmwayne at moordri.com Tue Jan 13 16:04:58 2004 From: jmwayne at moordri.com (JM Wayne) Date: Tue, 13 Jan 2004 17:04:58 -0500 Subject: [AccessD] A curious problem... In-Reply-To: <8B98F8EA48F8BA47A2F24E0D0AF40CF407AD7CAC@xlivmbx12.aig.com> Message-ID: <000001c3da21$4a8df8a0$87c9040a@direcway.com> Lambert, I'm losin' it. I repaired, decompiled and imported and still no luck. Any more ideas short of jumping off a bridge ? Thanks. Judy -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Heenan, Lambert Sent: Tuesday, January 13, 2004 2:51 PM To: 'Access Developers discussion and problem solving' Subject: RE: [AccessD] A curious problem... First make a backup copy of the MDB file. Then try repairing. No joy? Try decompiling. Still no luck? Try importing all the objects in the database to a new mdb file. Lambert -----Original Message----- From: JM Wayne [mailto:jmwayne at moordri.com] Sent: Tuesday, January 13, 2004 2:25 PM To: AccessD (E-mail) Subject: [AccessD] A curious problem... I have an A2K database that has been in use for over 2 years. All of a sudden the forms are resizing themselves. In one case the user enters data on one form and by clicking a button opens another form for data input. In another form the user double clicks an item in a list box and opens a form to enter data. In both cases when they close the second form the initial form is no longer maximized. I entered DoCmd.Maximize in the second form's On Close event but it is kind of clumsy. There has been no change in the code that should cause this to happen. I should mention that the forms that are having this problem have a great number of controls on them. Any advice or explanation would be appreciated. Judy Judith M Wayne Shefford-Meade, Inc. _______________________________________________ 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 From martyconnelly at shaw.ca Tue Jan 13 16:27:07 2004 From: martyconnelly at shaw.ca (MartyConnelly) Date: Tue, 13 Jan 2004 14:27:07 -0800 Subject: [AccessD] UnDelete References: Message-ID: <400470BB.9020403@shaw.ca> Here is Peter Millers explantion from pksolutions.com In general, its not possible to recover more than a very small percentage of deleted records when the records are deleted but the table is not. This has been true for all recent versions of Access. The reason for this is that Access/Jet copy the first deleted record over the remaining deleted records on a data page, so even though the file does not decrease in size, most of the data (usually >95% of it) is still completely overwritten. If there is doubt about this, I encourage anyone with questions to make a copy of a database they use frequently, open the copy, delete all the data from a key table (noting some of the record values), then close the copy and open it in a hex editor. Most of the file contents will appear garbled, but scroll through until you find data from the table you deleted records from. You will see numerous copies of a few of the deleted records. Can these records be recovered? Yes, but when you see, say 20 copies of the same deleted record, while all twenty copies can be recovered, there should have been twenty distinct records and not twenty copies of the same record. In other words, 19 of the deleted records have been overwriten. I would strongly advise Ronley and anyone else reading this thread to not trust someone like Marcus who lies about this. If there is any doubt, and you don't mind sending your file in to someone like Marcus, and you'll soon find out that he can't in fact do what he claims. Only a small number of distinct deleted records can be recovered. Its not a question of skill - its a question of whether or not all the deleted records exist to be recovered in any state at all, and unfortunately, they do not. This is not an issue if the entire table was deleted (ie, not the records alone, but the table definition itself). Any and all deleted tables can always be recovered, but deleted records from within a table that is itself not deleted are not recoverable in any meaningful sense. Peter Miller PK Solutions _____________________________________________________ Jim Dettman wrote: >Julie, > > yes they are there, but there is no functionality in Access/JET to >undelete them. Part of the reason is the LV (Long Value Pages) are recycled >(depending on a registry setting), so it may not always be possible to bring >a record back if records have been saved. > > Because of that, an undelete has never been built into Access. > >Jim Dettman >President, >Online Computer Services of WNY, Inc. >(315) 699-3443 >jimdettman at earthlink.net > >-----Original Message----- >From: accessd-bounces at databaseadvisors.com >[mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Julie >Reardon-Taylor >Sent: Tuesday, January 13, 2004 3:45 PM >To: accessd at databaseadvisors.com >Subject: Re: [AccessD] UnDelete > > >Aren't Access records marked for deletion, and not actually deleted until >the database is compacted? Shouldn't these records still be in the table? >Can't I unmark these records for deletion? > > > >Julie Reardon-Taylor >PRO-SOFT OF NY, INC. >www.pro-soft.net > >_________________________________________________________________ >Get a FREE online virus check for your PC here, from McAfee. >http://clinic.mcafee.com/clinic/ibuy/campaign.asp?cid=3963 > >_______________________________________________ >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 > > > -- Marty Connelly Victoria, B.C. Canada From prosoft6 at hotmail.com Tue Jan 13 17:51:43 2004 From: prosoft6 at hotmail.com (Julie Reardon-Taylor) Date: Tue, 13 Jan 2004 18:51:43 -0500 Subject: [AccessD] UnDelete Message-ID: Thank you Francisco, Charlotte, Marty, and Jim for answering my question. Guess my junior associate is SOL. Lost five days worth of work! I'll be sure to rub it in just a little bit! Wish there was some way around it, but I guess he'll just have to re-do the work. I really appreciate all of the answers that I recieve on this list. Thank you so much for being there ;) Julie Reardon-Taylor PRO-SOFT OF NY, INC. www.pro-soft.net _________________________________________________________________ Scope out the new MSN Plus Internet Software ? optimizes dial-up to the max! http://join.msn.com/?pgmarket=en-us&page=byoa/plus&ST=1 From mike.tope at dsl.pipex.com Tue Jan 13 17:52:05 2004 From: mike.tope at dsl.pipex.com (Mike Tope) Date: Tue, 13 Jan 2004 23:52:05 -0000 Subject: [AccessD] Access v2 on XP Find First Message-ID: <00e901c3da30$dfc634a0$0207a8c0@TopEnergy> Dear All I believe there are people on this list who persevere with Access 2 - I've hit a little snagette and wonder if anyone else has ? In Windows XP with Office XP installed, the user is running Access 2 from a file server. The find box (the binoculars button) is failing when you use Find First. This is on a primary key field. Occasionally it gives a syntax error (no details); more usually it reports "Search succeeded" but continues to display the record you started on. Using Find Next is a much more effective option that usually achieves the required effect (maybe always, if the record truly exists). I've tried this same database from the same shortcut in NT and 2000 with Office 2000 installed, and both have no problem with Find First. And it has worked on Win 95/Office 97 machines for many years. I've repaired and compacted. I've fiddled with fields and primary keys to remove the index and rebuild it. It remains the case that the XP machines can't operate Access 2's Find First in any reliable fashion. Any ideas ? Would service packs be relevant ? TIA Mike Tope PS late night (GMT) user only due to child on Nexus ... From BBarabash at TappeConstruction.com Tue Jan 13 18:12:59 2004 From: BBarabash at TappeConstruction.com (Brett Barabash) Date: Tue, 13 Jan 2004 18:12:59 -0600 Subject: [AccessD] Access v2 on XP Find First Message-ID: <426071E0B0A6D311B3C0006008B0AB23AFE2A9@TAPPEEXCH01> We are running A2 applications here on Win2k machines, and have the same problem. I just told the users to use the Find Next button (which is hilighted by default anyways). AFAIK, there is nothing you can change that will fix this. Nothing is wrong with your db or app per se, just a quirk of the 16-bit VM that runs MSACCESS.EXE (or MSARN200.EXE), I guess. -----Original Message----- From: Mike Tope [mailto:mike.tope at dsl.pipex.com] Sent: Tuesday, January 13, 2004 5:52 PM To: accessd Subject: [AccessD] Access v2 on XP Find First Dear All I believe there are people on this list who persevere with Access 2 - I've hit a little snagette and wonder if anyone else has ? In Windows XP with Office XP installed, the user is running Access 2 from a file server. The find box (the binoculars button) is failing when you use Find First. This is on a primary key field. Occasionally it gives a syntax error (no details); more usually it reports "Search succeeded" but continues to display the record you started on. Using Find Next is a much more effective option that usually achieves the required effect (maybe always, if the record truly exists). I've tried this same database from the same shortcut in NT and 2000 with Office 2000 installed, and both have no problem with Find First. And it has worked on Win 95/Office 97 machines for many years. I've repaired and compacted. I've fiddled with fields and primary keys to remove the index and rebuild it. It remains the case that the XP machines can't operate Access 2's Find First in any reliable fashion. Any ideas ? Would service packs be relevant ? TIA Mike Tope PS late night (GMT) user only due to child on Nexus ... _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -------------------------------------------------------------------------------------------------------------------- This email and any files transmitted with it are confidential and intended solely for the use of the individual or entity to whom they are addressed. If you have received this email in error please notify the originator of the message. This footer also confirms that this email message has been scanned for the presence of computer viruses. Any views expressed in this message are those of the individual sender, except where the sender specifies and with authority, states them to be the views of Tappe Construction Co. Scanning of this message and addition of this footer is performed by SurfControl E-mail Filter software in conjunction with virus detection software. From jwcolby at colbyconsulting.com Tue Jan 13 18:54:12 2004 From: jwcolby at colbyconsulting.com (John W. Colby) Date: Tue, 13 Jan 2004 19:54:12 -0500 Subject: [AccessD] Implements vs WithEvents In-Reply-To: Message-ID: Charlotte, >They have somewhat different purposes. No, they have completely different purposes. >Implements allows you to subclass an existing object/class and give it additional or different functionality, so you can have a class Dog and a subclass Spaniel that has a property Retriever. Well... true but not exactly. My issue with that statement is the term subclass as you use it. Yes you are subclassing the original but ONLY the interface. IMHO that is almost useless Implements is an interface ONLY inheritance, i.e. it allows (forces) you to start with the same public data and method DEFINITION but does not actually inherit the behaviors (methods) themselves. I.e. the code that runs in the class that is being subclassed is NOT inherited into the subclass. Access' inheritance (interface) is not very useful except as a template kind of thing. I find it useless enough that I personally don't bother. On the other hand Shamil is a proponent so it must have its uses. When you move to VB.NET (or any of the other .net languages I believe) TRUE inheritance is available. I.e. if you have a method with a thousand lines of code, when you subclass that object the new object inherits that code as well as the data. In our Implements subclassing, you would have to cut and paste that thousand lines of code into the subclass. Can you say maintenance nightmare? >You can intercept and respond to specific events when they happen in the object. Did the Bark event trigger? WithEvents lets you find out and respond from another class/object. Exactly correct. One of the MAJOR shortcomings of Access / VBA (in fact VB prior to VB.Net) is that Inheritance is virtually non-existent, and even worse, objects other than forms don't have a built in class that you can get at to add functionality directly to. What WithEvents really does is allow you to build class wrappers for objects so that you can encapsulate behaviors (functionality) in your class. In essence you still have two objects, the control (or even another class or OCX) and your class, but now you can put all of the common functionality in your class along with the event stubs of the control/class/ocx that generates the event. This does not get you any further down the road towards inheritance, sadly it simply doesn't appear to be possible in Access / VBA. But it does provide a huge step up in encapsulation. John W. Colby www.ColbyConsulting.com -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Charlotte Foust Sent: Tuesday, January 13, 2004 4:56 PM To: Access Developers discussion and problem solving Subject: RE: [AccessD] =function() in .onclick They have somewhat different purposes. Implements allows you to subclass an existing object/class and give it additional or different functionality, so you can have a class Dog and a subclass Spaniel that has a property Retriever. WithEvents allows you to monitor the events of an object/class. You can intercept and respond to specific events when they happen in the object. Did the Bark event trigger? WithEvents lets you find out and respond from another class/object. Charlotte Foust -----Original Message----- From: Robert Gracie [mailto:Subscriptions at servicexp.com] Sent: Tuesday, January 13, 2004 1:45 PM To: Access Developers discussion and problem solving Subject: RE: [AccessD] =function() in .onclick Hello All, Since I'm just learning this type of programming technique I thought I would ask a question... Why not use Implements instead of WithEvents? My limited understand of WithEvents is that they will not return functionality unit they (the event) has completed processing... Since I'm just at the "door" so to speak with learning how to use and incorporate these new (to me) programming techniques into my work, I really want to start out using the "best" technique... Robert Gracie www.servicexp.com From mike.tope at dsl.pipex.com Tue Jan 13 19:14:22 2004 From: mike.tope at dsl.pipex.com (Mike Tope) Date: Wed, 14 Jan 2004 01:14:22 -0000 Subject: [AccessD] Access v2 on XP Find First References: <426071E0B0A6D311B3C0006008B0AB23AFE2A9@TAPPEEXCH01> Message-ID: <01d701c3da3b$c0625020$0207a8c0@TopEnergy> Thanks Brett, I thought as much. This is a database of archives, so it looks like it'll have to migrate to a later format rather than trying to persuade various coming and going users to get used to (not) pressing a particular button. No rush, though. Mike Tope ----- Original Message ----- From: "Brett Barabash" To: "'Access Developers discussion and problem solving'" Sent: 14 January 2004 00:12 Subject: RE: [AccessD] Access v2 on XP Find First > We are running A2 applications here on Win2k machines, and have the same > problem. > I just told the users to use the Find Next button (which is hilighted by > default anyways). > AFAIK, there is nothing you can change that will fix this. Nothing is wrong > with your db or app per se, just a quirk of the 16-bit VM that runs > MSACCESS.EXE (or MSARN200.EXE), I guess. > > > -----Original Message----- > From: Mike Tope [mailto:mike.tope at dsl.pipex.com] > Sent: Tuesday, January 13, 2004 5:52 PM > To: accessd > Subject: [AccessD] Access v2 on XP Find First > > > Dear All > > I believe there are people on this list who persevere with Access 2 - I've > hit a little snagette and wonder if anyone else has ? > > In Windows XP with Office XP installed, the user is running Access 2 from a > file server. The find box (the binoculars button) is failing when you use > Find First. This is on a primary key field. > > Occasionally it gives a syntax error (no details); more usually it reports > "Search succeeded" but continues to display the record you started on. > > Using Find Next is a much more effective option that usually achieves the > required effect (maybe always, if the record truly exists). > > I've tried this same database from the same shortcut in NT and 2000 with > Office 2000 installed, and both have no problem with Find First. And it has > worked on Win 95/Office 97 machines for many years. > > I've repaired and compacted. I've fiddled with fields and primary keys to > remove the index and rebuild it. It remains the case that the XP machines > can't operate Access 2's Find First in any reliable fashion. > > Any ideas ? Would service packs be relevant ? > > TIA > Mike Tope > PS late night (GMT) user only due to child on Nexus ... > > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com > > -------------------------------------------------------------------------- ------------------------------------------ > This email and any files transmitted with it are confidential and > intended solely for the use of the individual or entity to whom > they are addressed. > If you have received this email in error please notify the > originator of the message. This footer also confirms that this > email message has been scanned for the presence of computer viruses. > > Any views expressed in this message are those of the individual > sender, except where the sender specifies and with authority, > states them to be the views of Tappe Construction Co. > > Scanning of this message and addition of this footer is performed > by SurfControl E-mail Filter software in conjunction with > virus detection software. > > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com > From cfoust at infostatsystems.com Tue Jan 13 19:16:56 2004 From: cfoust at infostatsystems.com (Charlotte Foust) Date: Tue, 13 Jan 2004 17:16:56 -0800 Subject: [AccessD] Implements vs WithEvents Message-ID: John, Would you have understood your response when *you* were first getting your feet wet in this kind of programming? I wasn't trying to provide the definitive answer, just a frame of reference. VB/VBA isn't fully object-oriented, so it can't really support Implements in all its glory. Charlotte Foust -----Original Message----- From: John W. Colby [mailto:jwcolby at colbyconsulting.com] Sent: Tuesday, January 13, 2004 4:54 PM To: Access Developers discussion and problem solving Subject: [AccessD] Implements vs WithEvents Charlotte, >They have somewhat different purposes. No, they have completely different purposes. >Implements allows you to subclass an existing object/class and give it additional or different functionality, so you can have a class Dog and a subclass Spaniel that has a property Retriever. Well... true but not exactly. My issue with that statement is the term subclass as you use it. Yes you are subclassing the original but ONLY the interface. IMHO that is almost useless Implements is an interface ONLY inheritance, i.e. it allows (forces) you to start with the same public data and method DEFINITION but does not actually inherit the behaviors (methods) themselves. I.e. the code that runs in the class that is being subclassed is NOT inherited into the subclass. Access' inheritance (interface) is not very useful except as a template kind of thing. I find it useless enough that I personally don't bother. On the other hand Shamil is a proponent so it must have its uses. When you move to VB.NET (or any of the other .net languages I believe) TRUE inheritance is available. I.e. if you have a method with a thousand lines of code, when you subclass that object the new object inherits that code as well as the data. In our Implements subclassing, you would have to cut and paste that thousand lines of code into the subclass. Can you say maintenance nightmare? >You can intercept and respond to specific events when they happen in >the object. Did the Bark event trigger? WithEvents lets you find out and respond from another class/object. Exactly correct. One of the MAJOR shortcomings of Access / VBA (in fact VB prior to VB.Net) is that Inheritance is virtually non-existent, and even worse, objects other than forms don't have a built in class that you can get at to add functionality directly to. What WithEvents really does is allow you to build class wrappers for objects so that you can encapsulate behaviors (functionality) in your class. In essence you still have two objects, the control (or even another class or OCX) and your class, but now you can put all of the common functionality in your class along with the event stubs of the control/class/ocx that generates the event. This does not get you any further down the road towards inheritance, sadly it simply doesn't appear to be possible in Access / VBA. But it does provide a huge step up in encapsulation. John W. Colby www.ColbyConsulting.com -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Charlotte Foust Sent: Tuesday, January 13, 2004 4:56 PM To: Access Developers discussion and problem solving Subject: RE: [AccessD] =function() in .onclick They have somewhat different purposes. Implements allows you to subclass an existing object/class and give it additional or different functionality, so you can have a class Dog and a subclass Spaniel that has a property Retriever. WithEvents allows you to monitor the events of an object/class. You can intercept and respond to specific events when they happen in the object. Did the Bark event trigger? WithEvents lets you find out and respond from another class/object. Charlotte Foust -----Original Message----- From: Robert Gracie [mailto:Subscriptions at servicexp.com] Sent: Tuesday, January 13, 2004 1:45 PM To: Access Developers discussion and problem solving Subject: RE: [AccessD] =function() in .onclick Hello All, Since I'm just learning this type of programming technique I thought I would ask a question... Why not use Implements instead of WithEvents? My limited understand of WithEvents is that they will not return functionality unit they (the event) has completed processing... Since I'm just at the "door" so to speak with learning how to use and incorporate these new (to me) programming techniques into my work, I really want to start out using the "best" technique... Robert Gracie www.servicexp.com _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From Subscriptions at servicexp.com Tue Jan 13 19:47:24 2004 From: Subscriptions at servicexp.com (Robert Gracie) Date: Tue, 13 Jan 2004 20:47:24 -0500 Subject: [AccessD] Implements vs WithEvents In-Reply-To: Message-ID: "Hmmmmmmm, As confusion sets in, he takes and stabs himself in the chest with his keyboard...:-)" I'm trying to understand why the VBA DHB is teaching that using INTERFACE inheritance classes (by way of the Implements Keyword and such) is much better then simply using Event, RaiseEvent, and WithEvents... The problem, for me at least, is getting my mind around the larger concept, and knowing which structure to use and why. With my very limited understanding, the way they have presented, it seems reasonable to go this route if only to help keep control over code execution... I guess I just need to keep pounding away at these concepts....... Robert Gracie www.servicexp.com -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of John W. Colby Sent: Tuesday, January 13, 2004 7:54 PM To: Access Developers discussion and problem solving Subject: [AccessD] Implements vs WithEvents Charlotte, >They have somewhat different purposes. No, they have completely different purposes. >Implements allows you to subclass an existing object/class and give it additional or different functionality, so you can have a class Dog and a subclass Spaniel that has a property Retriever. Well... true but not exactly. My issue with that statement is the term subclass as you use it. Yes you are subclassing the original but ONLY the interface. IMHO that is almost useless Implements is an interface ONLY inheritance, i.e. it allows (forces) you to start with the same public data and method DEFINITION but does not actually inherit the behaviors (methods) themselves. I.e. the code that runs in the class that is being subclassed is NOT inherited into the subclass. Access' inheritance (interface) is not very useful except as a template kind of thing. I find it useless enough that I personally don't bother. On the other hand Shamil is a proponent so it must have its uses. When you move to VB.NET (or any of the other .net languages I believe) TRUE inheritance is available. I.e. if you have a method with a thousand lines of code, when you subclass that object the new object inherits that code as well as the data. In our Implements subclassing, you would have to cut and paste that thousand lines of code into the subclass. Can you say maintenance nightmare? >You can intercept and respond to specific events when they happen in the object. Did the Bark event trigger? WithEvents lets you find out and respond from another class/object. Exactly correct. One of the MAJOR shortcomings of Access / VBA (in fact VB prior to VB.Net) is that Inheritance is virtually non-existent, and even worse, objects other than forms don't have a built in class that you can get at to add functionality directly to. What WithEvents really does is allow you to build class wrappers for objects so that you can encapsulate behaviors (functionality) in your class. In essence you still have two objects, the control (or even another class or OCX) and your class, but now you can put all of the common functionality in your class along with the event stubs of the control/class/ocx that generates the event. This does not get you any further down the road towards inheritance, sadly it simply doesn't appear to be possible in Access / VBA. But it does provide a huge step up in encapsulation. John W. Colby www.ColbyConsulting.com -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Charlotte Foust Sent: Tuesday, January 13, 2004 4:56 PM To: Access Developers discussion and problem solving Subject: RE: [AccessD] =function() in .onclick They have somewhat different purposes. Implements allows you to subclass an existing object/class and give it additional or different functionality, so you can have a class Dog and a subclass Spaniel that has a property Retriever. WithEvents allows you to monitor the events of an object/class. You can intercept and respond to specific events when they happen in the object. Did the Bark event trigger? WithEvents lets you find out and respond from another class/object. Charlotte Foust -----Original Message----- From: Robert Gracie [mailto:Subscriptions at servicexp.com] Sent: Tuesday, January 13, 2004 1:45 PM To: Access Developers discussion and problem solving Subject: RE: [AccessD] =function() in .onclick Hello All, Since I'm just learning this type of programming technique I thought I would ask a question... Why not use Implements instead of WithEvents? My limited understand of WithEvents is that they will not return functionality unit they (the event) has completed processing... Since I'm just at the "door" so to speak with learning how to use and incorporate these new (to me) programming techniques into my work, I really want to start out using the "best" technique... Robert Gracie www.servicexp.com _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From jwcolby at colbyconsulting.com Tue Jan 13 19:54:25 2004 From: jwcolby at colbyconsulting.com (John W. Colby) Date: Tue, 13 Jan 2004 20:54:25 -0500 Subject: [AccessD] Implements vs WithEvents In-Reply-To: Message-ID: Hmm... well I hope so as I am also responding directly, in detail. ;-) John W. Colby www.ColbyConsulting.com -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Charlotte Foust Sent: Tuesday, January 13, 2004 8:17 PM To: Access Developers discussion and problem solving Subject: RE: [AccessD] Implements vs WithEvents John, Would you have understood your response when *you* were first getting your feet wet in this kind of programming? I wasn't trying to provide the definitive answer, just a frame of reference. VB/VBA isn't fully object-oriented, so it can't really support Implements in all its glory. Charlotte Foust -----Original Message----- From: John W. Colby [mailto:jwcolby at colbyconsulting.com] Sent: Tuesday, January 13, 2004 4:54 PM To: Access Developers discussion and problem solving Subject: [AccessD] Implements vs WithEvents Charlotte, >They have somewhat different purposes. No, they have completely different purposes. >Implements allows you to subclass an existing object/class and give it additional or different functionality, so you can have a class Dog and a subclass Spaniel that has a property Retriever. Well... true but not exactly. My issue with that statement is the term subclass as you use it. Yes you are subclassing the original but ONLY the interface. IMHO that is almost useless Implements is an interface ONLY inheritance, i.e. it allows (forces) you to start with the same public data and method DEFINITION but does not actually inherit the behaviors (methods) themselves. I.e. the code that runs in the class that is being subclassed is NOT inherited into the subclass. Access' inheritance (interface) is not very useful except as a template kind of thing. I find it useless enough that I personally don't bother. On the other hand Shamil is a proponent so it must have its uses. When you move to VB.NET (or any of the other .net languages I believe) TRUE inheritance is available. I.e. if you have a method with a thousand lines of code, when you subclass that object the new object inherits that code as well as the data. In our Implements subclassing, you would have to cut and paste that thousand lines of code into the subclass. Can you say maintenance nightmare? >You can intercept and respond to specific events when they happen in >the object. Did the Bark event trigger? WithEvents lets you find out and respond from another class/object. Exactly correct. One of the MAJOR shortcomings of Access / VBA (in fact VB prior to VB.Net) is that Inheritance is virtually non-existent, and even worse, objects other than forms don't have a built in class that you can get at to add functionality directly to. What WithEvents really does is allow you to build class wrappers for objects so that you can encapsulate behaviors (functionality) in your class. In essence you still have two objects, the control (or even another class or OCX) and your class, but now you can put all of the common functionality in your class along with the event stubs of the control/class/ocx that generates the event. This does not get you any further down the road towards inheritance, sadly it simply doesn't appear to be possible in Access / VBA. But it does provide a huge step up in encapsulation. John W. Colby www.ColbyConsulting.com -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Charlotte Foust Sent: Tuesday, January 13, 2004 4:56 PM To: Access Developers discussion and problem solving Subject: RE: [AccessD] =function() in .onclick They have somewhat different purposes. Implements allows you to subclass an existing object/class and give it additional or different functionality, so you can have a class Dog and a subclass Spaniel that has a property Retriever. WithEvents allows you to monitor the events of an object/class. You can intercept and respond to specific events when they happen in the object. Did the Bark event trigger? WithEvents lets you find out and respond from another class/object. Charlotte Foust -----Original Message----- From: Robert Gracie [mailto:Subscriptions at servicexp.com] Sent: Tuesday, January 13, 2004 1:45 PM To: Access Developers discussion and problem solving Subject: RE: [AccessD] =function() in .onclick Hello All, Since I'm just learning this type of programming technique I thought I would ask a question... Why not use Implements instead of WithEvents? My limited understand of WithEvents is that they will not return functionality unit they (the event) has completed processing... Since I'm just at the "door" so to speak with learning how to use and incorporate these new (to me) programming techniques into my work, I really want to start out using the "best" technique... Robert Gracie www.servicexp.com _______________________________________________ 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 From jwcolby at colbyconsulting.com Tue Jan 13 20:04:37 2004 From: jwcolby at colbyconsulting.com (John W. Colby) Date: Tue, 13 Jan 2004 21:04:37 -0500 Subject: [AccessD] Withevents vs Implements In-Reply-To: Message-ID: Robert, >Why not use Implements instead of WithEvents? They are not the same thing at all. Implements is interface inheritance, i.e. subclassing the exposed global data and method DEFINITIONS of an object. In some circles it is also called a Contract - "I agree to provide similar functionality and data as the object that I am implementing - plus something additional that I want to add". Unfortunately, unlike real inheritance where you also get the actual code of the parent object (if you don't override it), in Implements you don't. If you want that code you have to cut and paste it into you own subclassed object (if the source is even available to you). Yuk. Withevents is nothing more than the ability to sink events from one OR MORE objects in your own class. I am wrapping an entire object (or at least some of it's events) inside my class. One of the objectives of object oriented programming (of which inheritance is a technique), is encapsulation of all of the data and code required to implement an "object". Encapsulation simply means placing everything in one place, but it also means hiding implementation details from view. When a combo box double click event occurs (in my framework) my class for the combo control MAY open a form to allow the user to add new items to the table that contains the data for the combo. Likewise that same form can be used to EDIT (or delete) the data in that table. Either way, the form is opened modal (you can't do anything outside the form) and when that form closes, the combo is requeried so that the latest contents of the table are contained in the combo. How is all that done? Who cares? All that the developer needs to know is how to cause the combo class to use that functionality. In the case of my framework, it is caused by passing a form name to the combo class through one of it's methods. Doing that sets up the combo to "know" that if a double click occurs it should open that form. So my class has a variable to hold the name of the form to open and has a method to pass in the name of the form. Equally importantly, my combo class sinks the double click itself and runs code that opens that form IF the variable contains a string of length > 0. If it DOESN'T have a form name to open, it puts up a message box telling the user they don't have permission to edit the data behind the combo. It happens that I use autonumber PKs throughout my databases. As a result the column(0) of the bound combo contains the PK of the record currently selected in the combo. When (if) the form opens, the combo class passes that PK of the record that is currently selected in the combo to the form (as an openarg, in the same format that ADH used for tags) , and the form's class "moves" the recordset of the form being opened to display that record and sets the focus into that record. This allows the user to not only open the form using a DblClick, but be right there at the data they need to edit (if for example the data is wrong - a misspelled name for example). As you can see, having a class to wrap a combo up in can be a pretty useful thing. All this functionality is just there, available to me at all times. I write this kind of code once, then all combos throughout my application have this functionality. How it happens is hidden from the developer (me in this case), I don't have to remember how to do all this stuff, the class knows how. I don't have to remember to call a function in an event stub in a form somewhere, if a class is instantiated for that combo it has that functionality. Withevents is the key that allows me to sink that DblClick right inside my class so that I am not having to remember to call functions to get this stuff to happen. Believe me, I used to do pretty much the same thing without classes, just calling functions from event stubs in the form itself. In fact I wrote an event stub insertion wizard to build these function calls specifically for my framework (C2DbFrameWiz) and insert them into the form. Believe me again when I say that method of programming isn't even in the same league as classes and Withevents. LEARN THIS STUFF, you won't regret it. BTW, Withevents is available in VBA (Excel, Word etc.), VB as well as VB.NET so it's not something you will learn just for Access. Again my sincere thanks to Shamil who prodded me to figure this stuff out and provided sample code to get me started. I repeat, I would not be where I am today as an Access programmer without Withevents and Classes. BTW, I wrote a chapter for this stuff (Withevents) for Beginning Access 2002 VBA, Wrox publishers, ISBN 1-86100-821-X. The entire chapter was published in Advisor (published on my birthday in fact). http://accessvbsqladvisor.com/Articles.nsf/dp/A6CBCC9F0ED68B2E88256DD4007C2F DD Watch for line wrap. Of course you could just buy the book. John W. Colby www.ColbyConsulting.com -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Robert Gracie Sent: Tuesday, January 13, 2004 4:45 PM To: Access Developers discussion and problem solving Subject: RE: [AccessD] =function() in .onclick Hello All, Since I'm just learning this type of programming technique I thought I would ask a question... Why not use Implements instead of WithEvents? My limited understand of WithEvents is that they will not return functionality unit they (the event) has completed processing... Since I'm just at the "door" so to speak with learning how to use and incorporate these new (to me) programming techniques into my work, I really want to start out using the "best" technique... Robert Gracie www.servicexp.com From Subscriptions at servicexp.com Tue Jan 13 20:39:18 2004 From: Subscriptions at servicexp.com (Robert Gracie) Date: Tue, 13 Jan 2004 21:39:18 -0500 Subject: [AccessD] Withevents vs Implements In-Reply-To: Message-ID: John, Thank you for your help, it's very much appreciated. I'm not quite there yet but I am starting to "Get" the concepts at least. Is the example db they used in that article available outside of purchasing the book...? Or do you have any examples of what you where specifically explaining? Thanks Again Robert Gracie www.servicexp.com -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of John W. Colby Sent: Tuesday, January 13, 2004 9:05 PM To: Access Developers discussion and problem solving Subject: [AccessD] Withevents vs Implements Robert, >Why not use Implements instead of WithEvents? They are not the same thing at all. Implements is interface inheritance, i.e. subclassing the exposed global data and method DEFINITIONS of an object. In some circles it is also called a Contract - "I agree to provide similar functionality and data as the object that I am implementing - plus something additional that I want to add". Unfortunately, unlike real inheritance where you also get the actual code of the parent object (if you don't override it), in Implements you don't. If you want that code you have to cut and paste it into you own subclassed object (if the source is even available to you). Yuk. Withevents is nothing more than the ability to sink events from one OR MORE objects in your own class. I am wrapping an entire object (or at least some of it's events) inside my class. One of the objectives of object oriented programming (of which inheritance is a technique), is encapsulation of all of the data and code required to implement an "object". Encapsulation simply means placing everything in one place, but it also means hiding implementation details from view. When a combo box double click event occurs (in my framework) my class for the combo control MAY open a form to allow the user to add new items to the table that contains the data for the combo. Likewise that same form can be used to EDIT (or delete) the data in that table. Either way, the form is opened modal (you can't do anything outside the form) and when that form closes, the combo is requeried so that the latest contents of the table are contained in the combo. How is all that done? Who cares? All that the developer needs to know is how to cause the combo class to use that functionality. In the case of my framework, it is caused by passing a form name to the combo class through one of it's methods. Doing that sets up the combo to "know" that if a double click occurs it should open that form. So my class has a variable to hold the name of the form to open and has a method to pass in the name of the form. Equally importantly, my combo class sinks the double click itself and runs code that opens that form IF the variable contains a string of length > 0. If it DOESN'T have a form name to open, it puts up a message box telling the user they don't have permission to edit the data behind the combo. It happens that I use autonumber PKs throughout my databases. As a result the column(0) of the bound combo contains the PK of the record currently selected in the combo. When (if) the form opens, the combo class passes that PK of the record that is currently selected in the combo to the form (as an openarg, in the same format that ADH used for tags) , and the form's class "moves" the recordset of the form being opened to display that record and sets the focus into that record. This allows the user to not only open the form using a DblClick, but be right there at the data they need to edit (if for example the data is wrong - a misspelled name for example). As you can see, having a class to wrap a combo up in can be a pretty useful thing. All this functionality is just there, available to me at all times. I write this kind of code once, then all combos throughout my application have this functionality. How it happens is hidden from the developer (me in this case), I don't have to remember how to do all this stuff, the class knows how. I don't have to remember to call a function in an event stub in a form somewhere, if a class is instantiated for that combo it has that functionality. Withevents is the key that allows me to sink that DblClick right inside my class so that I am not having to remember to call functions to get this stuff to happen. Believe me, I used to do pretty much the same thing without classes, just calling functions from event stubs in the form itself. In fact I wrote an event stub insertion wizard to build these function calls specifically for my framework (C2DbFrameWiz) and insert them into the form. Believe me again when I say that method of programming isn't even in the same league as classes and Withevents. LEARN THIS STUFF, you won't regret it. BTW, Withevents is available in VBA (Excel, Word etc.), VB as well as VB.NET so it's not something you will learn just for Access. Again my sincere thanks to Shamil who prodded me to figure this stuff out and provided sample code to get me started. I repeat, I would not be where I am today as an Access programmer without Withevents and Classes. BTW, I wrote a chapter for this stuff (Withevents) for Beginning Access 2002 VBA, Wrox publishers, ISBN 1-86100-821-X. The entire chapter was published in Advisor (published on my birthday in fact). http://accessvbsqladvisor.com/Articles.nsf/dp/A6CBCC9F0ED68B2E88256DD4007C2F DD Watch for line wrap. Of course you could just buy the book. John W. Colby www.ColbyConsulting.com -SNIP From jwcolby at colbyconsulting.com Tue Jan 13 21:02:46 2004 From: jwcolby at colbyconsulting.com (John W. Colby) Date: Tue, 13 Jan 2004 22:02:46 -0500 Subject: [AccessD] Implements vs WithEvents In-Reply-To: Message-ID: Robert, Risking sounding ignorant, I don't know what the VBA DHB is so I can't help you there. However AFAIK you can't use Implements for something like a control or form. These objects have code inside them that cause things to happen, properties to modify their behavior etc. ALL THAT STUFF can actually be inherited in VB.NET. That is, you can actually start with a combo box, subclass that combo box, GET ALL OF IT'S FUNCTIONALITY, all of it's code, all of its properties and methods, plus add your own!!! Or even override things to change the way the combo box functions. THAT is true inheritance. Not so in Access / VBA. An object like a combo box is a self contained unit that you simply cannot get inside of or modify in any meaningful way. It appears to us Access programmers almost like an ocx, i.e. a black box that does things. IMPORTANT... one of the things these objects do is raise Events! IOW, they tell you when a user clicks the mouse, double clicks the mouse etc. "inside" their boundaries on the screen. Knowing this, every Access programmer ALREADY USES WITHEVENTS. How? By creating an event stub in a form's class, and inserting code in that event stub to do something that the programmer wants to do when that event happens. The confusing thing is that a form's class DOES NOT REQUIRE a withevents dimension statement for any controls contained in the form (or for itself - the form - for that matter). However there is an IMPLICIT dim statement in the class, invisible, but there none the less. So every Access programmer already knows all about handling events for combos, command buttons etc. They (most of us anyway) use the built-in wizards in the form's builder interface to insert event handler stubs into the form's class and insert code there. THAT IS WITHEVENT PROGRAMMING, with all the details taken care of for you. Well guess what, ANY CLASS can have those same event handlers in them!!! The only differenc is that if the class is not a form class, there must be an EXPLICIT dim Withevents statement for any control (any object actually) that you wish to sink events for. 'inside my own combo class header... 'Dim a combo withevents Private WithEvents mcbo As ComboBox Having the dim statement does nothing more than tell my combo class that a control of a specific type MAY be transferring control of one or more of it's events to the class directly. It does NOT say WHICH control. To do that you have to pass in a control to the class and inside the class, SET the dimmed control = the passed in control. 'inside my own combo class... 'Pass in a control and SET the internal control variable function Init(lcbo as ComboBox) set mcbo = lcbo end init THAT tells the class which combo to sink events for (the one being passed in of course). Once you do that, the class can sink ANY of the control's events. But you still haven't told the class WHICH events to sink. IOW, Even having done this, nothing will happen in your class unless you create an event stub for the control event you wish to process inside the class. 'inside my own combo class... 'create an event stub to which control will be passed when a specific event fires. Private Sub mcbo_AfterUpdate() 'Do Something really cool Msgbox "Something really cool" End Sub THAT tells the combo class WHICH event(s) to sink. Now you must of course instantiate your own combo class in your form and pass in a specific control to it. 'inside my FORM'S class header... 'dimension my own combo class dim fclsMyCombo as clsMyCombo 'inside my FORM'S class Private Sub Form_Open(Cancel As Integer) 'CREATE AN INSTANCE OF MY COOL COMBO CLASS Set fclsMyCombo = new clsMyCombo 'PASS A REFERENCE TO A SPECIFIC COMBO ON MY FORM fclsMyCombo.Init cboStates 'a combo displaying all the states in the union End Sub THAT tells Access to dimension a class, create a class instance and WHICH combo to pass off to the class instance. NOW, with ALL THESE THINGS IN PLACE, if that combo AfterUpdate fires, control will EVENTUALLY get to your class and your message box will display it's message. Notice that your form doesn't need any event stub in it for the control. Even though the ONLY sub in your form's class is the Form_Open, the event stub in your class will sink the event and the message box will display its message. I know full well that all this sounds like a LOT of work just to get control into a class but after you've done it a few times it will be 2nd nature. And of course you can then have a combo class that (see my other post) handles the double click, opens a form, allows your user to edit the data, and when the form closes, requeries the combo, all neatly encapsulated in a class. Plus all the other neato keenarino stuff you can imagine your combo doing. Hang in there. It took me three tries, each six months apart to finally "get" Shamil's stuff and understand Withevents. Looking back I can't understand why, but life is like that sometimes. And no, the demos for the book are copyrighted by Wrox and I can't legally distribute them, however there are many demos (by me of course) on DatabaseAdvisors' web site. I also have a bunch on my own site. This stuff is important, keep trying. John W. Colby www.ColbyConsulting.com -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Robert Gracie Sent: Tuesday, January 13, 2004 8:47 PM To: Access Developers discussion and problem solving Subject: RE: [AccessD] Implements vs WithEvents "Hmmmmmmm, As confusion sets in, he takes and stabs himself in the chest with his keyboard...:-)" I'm trying to understand why the VBA DHB is teaching that using INTERFACE inheritance classes (by way of the Implements Keyword and such) is much better then simply using Event, RaiseEvent, and WithEvents... The problem, for me at least, is getting my mind around the larger concept, and knowing which structure to use and why. With my very limited understanding, the way they have presented, it seems reasonable to go this route if only to help keep control over code execution... I guess I just need to keep pounding away at these concepts....... Robert Gracie www.servicexp.com -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of John W. Colby Sent: Tuesday, January 13, 2004 7:54 PM To: Access Developers discussion and problem solving Subject: [AccessD] Implements vs WithEvents Charlotte, >They have somewhat different purposes. No, they have completely different purposes. >Implements allows you to subclass an existing object/class and give it additional or different functionality, so you can have a class Dog and a subclass Spaniel that has a property Retriever. Well... true but not exactly. My issue with that statement is the term subclass as you use it. Yes you are subclassing the original but ONLY the interface. IMHO that is almost useless Implements is an interface ONLY inheritance, i.e. it allows (forces) you to start with the same public data and method DEFINITION but does not actually inherit the behaviors (methods) themselves. I.e. the code that runs in the class that is being subclassed is NOT inherited into the subclass. Access' inheritance (interface) is not very useful except as a template kind of thing. I find it useless enough that I personally don't bother. On the other hand Shamil is a proponent so it must have its uses. When you move to VB.NET (or any of the other .net languages I believe) TRUE inheritance is available. I.e. if you have a method with a thousand lines of code, when you subclass that object the new object inherits that code as well as the data. In our Implements subclassing, you would have to cut and paste that thousand lines of code into the subclass. Can you say maintenance nightmare? >You can intercept and respond to specific events when they happen in the object. Did the Bark event trigger? WithEvents lets you find out and respond from another class/object. Exactly correct. One of the MAJOR shortcomings of Access / VBA (in fact VB prior to VB.Net) is that Inheritance is virtually non-existent, and even worse, objects other than forms don't have a built in class that you can get at to add functionality directly to. What WithEvents really does is allow you to build class wrappers for objects so that you can encapsulate behaviors (functionality) in your class. In essence you still have two objects, the control (or even another class or OCX) and your class, but now you can put all of the common functionality in your class along with the event stubs of the control/class/ocx that generates the event. This does not get you any further down the road towards inheritance, sadly it simply doesn't appear to be possible in Access / VBA. But it does provide a huge step up in encapsulation. John W. Colby www.ColbyConsulting.com -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Charlotte Foust Sent: Tuesday, January 13, 2004 4:56 PM To: Access Developers discussion and problem solving Subject: RE: [AccessD] =function() in .onclick They have somewhat different purposes. Implements allows you to subclass an existing object/class and give it additional or different functionality, so you can have a class Dog and a subclass Spaniel that has a property Retriever. WithEvents allows you to monitor the events of an object/class. You can intercept and respond to specific events when they happen in the object. Did the Bark event trigger? WithEvents lets you find out and respond from another class/object. Charlotte Foust -----Original Message----- From: Robert Gracie [mailto:Subscriptions at servicexp.com] Sent: Tuesday, January 13, 2004 1:45 PM To: Access Developers discussion and problem solving Subject: RE: [AccessD] =function() in .onclick Hello All, Since I'm just learning this type of programming technique I thought I would ask a question... Why not use Implements instead of WithEvents? My limited understand of WithEvents is that they will not return functionality unit they (the event) has completed processing... Since I'm just at the "door" so to speak with learning how to use and incorporate these new (to me) programming techniques into my work, I really want to start out using the "best" technique... Robert Gracie www.servicexp.com _______________________________________________ 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 From gustav at cactus.dk Wed Jan 14 03:07:49 2004 From: gustav at cactus.dk (Gustav Brock) Date: Wed, 14 Jan 2004 10:07:49 +0100 Subject: [AccessD] Access v2 on XP Find First In-Reply-To: <426071E0B0A6D311B3C0006008B0AB23AFE2A9@TAPPEEXCH01> References: <426071E0B0A6D311B3C0006008B0AB23AFE2A9@TAPPEEXCH01> Message-ID: <1614194240.20040114100749@cactus.dk> Hi Mike and Brett We are experiencing this scenario as well. /gustav > We are running A2 applications here on Win2k machines, and have the same > problem. > I just told the users to use the Find Next button (which is hilighted by > default anyways). > AFAIK, there is nothing you can change that will fix this. Nothing is wrong > with your db or app per se, just a quirk of the 16-bit VM that runs > MSACCESS.EXE (or MSARN200.EXE), I guess. > -----Original Message----- > From: Mike Tope [mailto:mike.tope at dsl.pipex.com] > Sent: Tuesday, January 13, 2004 5:52 PM > To: accessd > Subject: [AccessD] Access v2 on XP Find First > Dear All > I believe there are people on this list who persevere with Access 2 - I've > hit a little snagette and wonder if anyone else has ? > In Windows XP with Office XP installed, the user is running Access 2 from a > file server. The find box (the binoculars button) is failing when you use > Find First. This is on a primary key field. > Occasionally it gives a syntax error (no details); more usually it reports > "Search succeeded" but continues to display the record you started on. > Using Find Next is a much more effective option that usually achieves the > required effect (maybe always, if the record truly exists). > I've tried this same database from the same shortcut in NT and 2000 with > Office 2000 installed, and both have no problem with Find First. And it has > worked on Win 95/Office 97 machines for many years. > I've repaired and compacted. I've fiddled with fields and primary keys to > remove the index and rebuild it. It remains the case that the XP machines > can't operate Access 2's Find First in any reliable fashion. > Any ideas ? Would service packs be relevant ? > TIA > Mike Tope From paul.hartland at fsmail.net Wed Jan 14 05:10:19 2004 From: paul.hartland at fsmail.net (paul.hartland at fsmail.net) Date: Wed, 14 Jan 2004 12:10:19 +0100 (CET) Subject: [AccessD] OT - Starting On My Own Message-ID: <20111798.1074078619262.JavaMail.www@wwinf3002> To all, I?m in the process of thinking about starting up on my own (part-time at first to see how it goes) as possibly a freelance Database Developer, I know some of you on this list are self-employed and just wondered if you would have any advice etc especially with regards to costing a project etc. Thanks in advance for any help you can give. Paul Hartland P.S. feel free to contact me off-list Freeserve AnyTime - HALF PRICE for the first 3 months - Save ?7.50 a month www.freeserve.com/anytime From jwcolby at colbyconsulting.com Wed Jan 14 05:22:36 2004 From: jwcolby at colbyconsulting.com (John W. Colby) Date: Wed, 14 Jan 2004 06:22:36 -0500 Subject: [AccessD] OT: Compaq vs. Dell Message-ID: A client is looking to buy a server and has always favored Compaq servers, but is asking me and others their opinions of Dell vs. Compaq. I am not knowledgeable where servers are concerned, and I know that you folks are an opinionated bunch so I'd like to get your opinion on whether Dell is as good as / better than / worse than Compaq when it comes to servers. Thanks, John W. Colby www.ColbyConsulting.com From mwp.reid at qub.ac.uk Wed Jan 14 05:33:53 2004 From: mwp.reid at qub.ac.uk (Martin Reid) Date: Wed, 14 Jan 2004 11:33:53 -0000 Subject: [AccessD] OT: Compaq vs. Dell References: Message-ID: <009801c3da92$49eac970$9111758f@aine> We have several of each. Will ask our Ops Room guy which he prefers Martin ----- Original Message ----- From: "John W. Colby" To: "DBA - Tech" ; "AccessD" Sent: Wednesday, January 14, 2004 11:22 AM Subject: [AccessD] OT: Compaq vs. Dell > A client is looking to buy a server and has always favored Compaq servers, > but is asking me and others their opinions of Dell vs. Compaq. I am not > knowledgeable where servers are concerned, and I know that you folks are an > opinionated bunch so I'd like to get your opinion on whether Dell is > as good as / better than / worse than Compaq when it comes to servers. > > Thanks, > > John W. Colby > www.ColbyConsulting.com > > > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com > From mwp.reid at qub.ac.uk Wed Jan 14 05:38:54 2004 From: mwp.reid at qub.ac.uk (Martin Reid) Date: Wed, 14 Jan 2004 11:38:54 -0000 Subject: [AccessD] OT: Compaq vs. Dell References: Message-ID: <00a601c3da92$fd2b4e60$9111758f@aine> John I Quote Compaq now HP and are very good. Dell also very good and server support is good - at least here. He says there is little in it and it really comes down to price and support required. Dell patches and software upgrades have been 100% with some problems with Compaq Dell works out slightly cheaper in the long term as you are not working with a reseller. His judgement based on the support we get is to go with Dell. Martin ----- Original Message ----- From: "John W. Colby" To: "DBA - Tech" ; "AccessD" Sent: Wednesday, January 14, 2004 11:22 AM Subject: [AccessD] OT: Compaq vs. Dell > A client is looking to buy a server and has always favored Compaq servers, > but is asking me and others their opinions of Dell vs. Compaq. I am not > knowledgeable where servers are concerned, and I know that you folks are an > opinionated bunch so I'd like to get your opinion on whether Dell is > as good as / better than / worse than Compaq when it comes to servers. > > Thanks, > > John W. Colby > www.ColbyConsulting.com > > > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com > From Erwin.Craps at ithelps.be Wed Jan 14 05:52:58 2004 From: Erwin.Craps at ithelps.be (Erwin Craps - IT Helps) Date: Wed, 14 Jan 2004 12:52:58 +0100 Subject: [AccessD] A curious problem... Message-ID: <46B976F2B698FF46A4FE7636509B22DF03D110@stekelbes.ithelps.local> Very strange. If I where you I would virusscan your file with a up-to-date scanner. I never encountered a virus in an access database, but is is posible and I supose they exist. It's a long shot, but this would be definitly the first thing I would do after a decompile. Erwin -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of JM Wayne Sent: Tuesday, January 13, 2004 11:05 PM To: 'Access Developers discussion and problem solving' Subject: RE: [AccessD] A curious problem... Lambert, I'm losin' it. I repaired, decompiled and imported and still no luck. Any more ideas short of jumping off a bridge ? Thanks. Judy -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Heenan, Lambert Sent: Tuesday, January 13, 2004 2:51 PM To: 'Access Developers discussion and problem solving' Subject: RE: [AccessD] A curious problem... First make a backup copy of the MDB file. Then try repairing. No joy? Try decompiling. Still no luck? Try importing all the objects in the database to a new mdb file. Lambert -----Original Message----- From: JM Wayne [mailto:jmwayne at moordri.com] Sent: Tuesday, January 13, 2004 2:25 PM To: AccessD (E-mail) Subject: [AccessD] A curious problem... I have an A2K database that has been in use for over 2 years. All of a sudden the forms are resizing themselves. In one case the user enters data on one form and by clicking a button opens another form for data input. In another form the user double clicks an item in a list box and opens a form to enter data. In both cases when they close the second form the initial form is no longer maximized. I entered DoCmd.Maximize in the second form's On Close event but it is kind of clumsy. There has been no change in the code that should cause this to happen. I should mention that the forms that are having this problem have a great number of controls on them. Any advice or explanation would be appreciated. Judy Judith M Wayne Shefford-Meade, Inc. _______________________________________________ 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 _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From tinanfields at torchlake.com Wed Jan 14 09:46:32 2004 From: tinanfields at torchlake.com (Tina Fields) Date: Wed, 14 Jan 2004 07:46:32 -0800 Subject: [AccessD] Smolin Memorial Contribution References: <3cfb2b3cd09f.3cd09f3cfb2b@southeast.rr.com> Message-ID: <40056458.1010603@torchlake.com> I went to the databaseadvisors.com website and tried to make my contribution directly from the donations.htm page. I have a PayPal account and expected this transaction to be easy. The input form kept insisting on an auction ID and I had no clue what to put in there. So, I went directly to my PayPal account and used the Send Money feature, using the email address of the treasurer at databaseadvisors.com. As of this morning, that transaction is unclaimed according to my PayPal account records. It's a small gift, but I do want it included in the gift from this wonderful group, honoring the father of a man who has been friend and help to all of us. Please, somebody take a quick look into the PayPal receipts of yesterday for my little gift. Thanks dbcfour at triad.rr.com wrote: >On Sunday January 11, 2004 Bernard Smolin, father of our long time and much respected fellow member Rocky Smolin, passed away. > >After a number of members expressed a desire to share an expression of sympathy, arrangements have been made for Keith Williamson to collect Memorial Contribution(s), and present a check to the National Jewish Medical & Research Center >(http://www.njc.org/fr/joymem.html) on our behalf. > >Those wishing to express their sincere and heartfelt sympathy to the Family >in this manner can contribute via the website at >http://www.databaseadvisors.com/donations.htm It is important, however, that you clearly indicate in the notes section of the Paypal form, the nature of the contribution. > >For those that prefer to mail a check, please do so by mailing a check to: > >Database Advisors Inc. >c/o Keith Williamson >450 Franklin Street Apt B >Havre de Grace, MD 21078 > >All contributions should be made no later than Friday January 16th, and be >clearly marked as Smolin Memorial Fund. > >A special Thank You to Keith for his willingness to assist us in this effort. > >Donna Cook > > > >_______________________________________________ >AccessD mailing list >AccessD at databaseadvisors.com >http://databaseadvisors.com/mailman/listinfo/accessd >Website: http://www.databaseadvisors.com > > From djkr at msn.com Wed Jan 14 06:50:24 2004 From: djkr at msn.com (DJK(John) Robinson) Date: Wed, 14 Jan 2004 12:50:24 -0000 Subject: [AccessD] OT - Starting On My Own In-Reply-To: <20111798.1074078619262.JavaMail.www@wwinf3002> Message-ID: <004501c3da9c$fa734ec0$bf00a8c0@dabsight> Whereabouts, Paul? You seem to be somewhere between the UK and Central Europe... John > -----Original Message----- > From: accessd-bounces at databaseadvisors.com > [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of > paul.hartland at fsmail.net > Sent: 14 January 2004 11:10 > To: accessd > Subject: [AccessD] OT - Starting On My Own > > > To all, > > I?m in the process of thinking about starting up on my own > (part-time at first to see how it goes) as possibly a > freelance Database Developer, I know some of you on this list > are self-employed and just wondered if you would have any > advice etc especially with regards to costing a project etc. > > Thanks in advance for any help you can give. > > Paul Hartland > > P.S. feel free to contact me off-list > Freeserve AnyTime - HALF PRICE for the first 3 months - Save > ?7.50 a month > www.freeserve.com/anytime > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/a> ccessd > Website: > http://www.databaseadvisors.com > From paul.hartland at fsmail.net Wed Jan 14 07:03:21 2004 From: paul.hartland at fsmail.net (paul.hartland at fsmail.net) Date: Wed, 14 Jan 2004 14:03:21 +0100 (CET) Subject: [AccessD] OT - Starting On My Own Message-ID: <20572664.1074085401043.JavaMail.www@wwinf3004> I live in Birmingham, England Message date : Jan 14 2004, 12:54 PM >From : DJK(John) Robinson To : 'Access Developers discussion and problem solving' Copy to : Subject : RE: [AccessD] OT - Starting On My Own Whereabouts, Paul? You seem to be somewhere between the UK and Central Europe... John > -----Original Message----- > From: accessd-bounces at databaseadvisors.com > [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of > paul.hartland at fsmail.net > Sent: 14 January 2004 11:10 > To: accessd > Subject: [AccessD] OT - Starting On My Own > > > To all, > > I?m in the process of thinking about starting up on my own > (part-time at first to see how it goes) as possibly a > freelance Database Developer, I know some of you on this list > are self-employed and just wondered if you would have any > advice etc especially with regards to costing a project etc. > > Thanks in advance for any help you can give. > > Paul Hartland > > P.S. feel free to contact me off-list > Freeserve AnyTime - HALF PRICE for the first 3 months - Save > ?7.50 a month > www.freeserve.com/anytime > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/a> ccessd > Website: > http://www.databaseadvisors.com > _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com Freeserve AnyTime - HALF PRICE for the first 3 months - Save ?7.50 a month www.freeserve.com/anytime From stuart at lexacorp.com.pg Wed Jan 14 07:06:28 2004 From: stuart at lexacorp.com.pg (Stuart McLachlan) Date: Wed, 14 Jan 2004 23:06:28 +1000 Subject: [AccessD] OT: Compaq vs. Dell In-Reply-To: Message-ID: <4005CB74.31262.337FBD1@localhost> On 14 Jan 2004 at 6:22, John W. Colby wrote: > A client is looking to buy a server and has always favored Compaq servers, > but is asking me and others their opinions of Dell vs. Compaq. I am not > knowledgeable where servers are concerned, and I know that you folks are an > opinionated bunch so I'd like to get your opinion on whether Dell is > as good as / better than / worse than Compaq when it comes to servers. > I've worked with quite a few Dell, Compaq ( and now HP servers). They've all proved very reliable. My Backup/service experience is irrelevant because my situation is totally different to you I much prefer to work with Dell servers because Compaq/HP tend to stick a lot of their own proprietary management software all over the place (all the way from their hidden system management partitions through to add-ons to the OS.) At times it can be a real PITA. I currently recommend Dell to my clients for servers. -- Lexacorp Ltd http://www.lexacorp.com.pg Information Technology Consultancy, Software Development,System Support. From kwilliam at ashlandnet.com Wed Jan 14 07:14:18 2004 From: kwilliam at ashlandnet.com (Keith Williamson) Date: Wed, 14 Jan 2004 08:14:18 -0500 Subject: [AccessD] OT: Compaq vs. Dell In-Reply-To: <00a601c3da92$fd2b4e60$9111758f@aine> Message-ID: <000401c3daa0$51783200$64aba8c0@ashlandnet.com> In my opinion, over the years, Dell is definitely the way to go. Just recently, Dell had a problem with one of the chips in some of their servers (nearly all of them in a couple of their lines).....they sent a technician out to each and every location that had an affected problem (unless the in-house IT guys thought they could handle it) and replaced/fixed each one. THAT is service. I have had Compaq PC's at home, since my first one (four in all), and almost exclusively Dell at work (over the past 8 years.) I have never had a problem with a Dell.....and every one of my home PC's has given me problems. I have sworn off Compaq, now......only Dell, from now on. Keith E. Williamson Ashland Equipment, Inc phone # (410) 273-1856 fax # (410) 273-1859 -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Martin Reid Sent: Wednesday, January 14, 2004 6:39 AM To: Access Developers discussion and problem solving Subject: Re: [AccessD] OT: Compaq vs. Dell John I Quote Compaq now HP and are very good. Dell also very good and server support is good - at least here. He says there is little in it and it really comes down to price and support required. Dell patches and software upgrades have been 100% with some problems with Compaq Dell works out slightly cheaper in the long term as you are not working with a reseller. His judgement based on the support we get is to go with Dell. Martin ----- Original Message ----- From: "John W. Colby" To: "DBA - Tech" ; "AccessD" Sent: Wednesday, January 14, 2004 11:22 AM Subject: [AccessD] OT: Compaq vs. Dell > A client is looking to buy a server and has always favored Compaq servers, > but is asking me and others their opinions of Dell vs. Compaq. I am not > knowledgeable where servers are concerned, and I know that you folks are an > opinionated bunch so I'd like to get your opinion on whether Dell is > as good as / better than / worse than Compaq when it comes to servers. > > Thanks, > > John W. Colby > www.ColbyConsulting.com > > > _______________________________________________ > 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 From wdhindman at bellsouth.net Wed Jan 14 07:23:52 2004 From: wdhindman at bellsouth.net (William Hindman) Date: Wed, 14 Jan 2004 08:23:52 -0500 Subject: [AccessD] OT: Compaq vs. Dell References: Message-ID: <001401c3daa1$a7737f60$6101a8c0@dejpolsys> ...I've worked with Dell, HP, and Compaq (now HP) in the past and now use nothing but Dell ...my biggest problem with Compaq and HP is their use of custom parts which creates support problems down the road ...Dell uses OTS components but has been extremely reliable in my experience ...out of eleven servers, I've had one CD fail on a Dell in the three years since switching to them ...but be sure you buy their extended warranty and software support or buy the OS from MS ...I prefer not buying the OS pre-installed since I've had to reformat the drive and do a complete reinstall anyway on each ...HTH :) William Hindman - Next Year In The Free State! ----- Original Message ----- From: "John W. Colby" To: "DBA - Tech" ; "AccessD" Sent: Wednesday, January 14, 2004 6:22 AM Subject: [AccessD] OT: Compaq vs. Dell > A client is looking to buy a server and has always favored Compaq servers, > but is asking me and others their opinions of Dell vs. Compaq. I am not > knowledgeable where servers are concerned, and I know that you folks are an > opinionated bunch so I'd like to get your opinion on whether Dell is > as good as / better than / worse than Compaq when it comes to servers. > > Thanks, > > John W. Colby > www.ColbyConsulting.com > > > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com > From stuart at lexacorp.com.pg Wed Jan 14 07:21:50 2004 From: stuart at lexacorp.com.pg (Stuart McLachlan) Date: Wed, 14 Jan 2004 23:21:50 +1000 Subject: [AccessD] OT - Starting On My Own In-Reply-To: <20111798.1074078619262.JavaMail.www@wwinf3002> Message-ID: <4005CF0E.12482.3460D61@localhost> On 14 Jan 2004 at 12:10, paul.hartland at fsmail.net wrote: > To all, I?m in the process of thinking about starting up on my own > (part-time at first to see how it goes) as possibly a freelance > Database Developer, I know some of you on this list are self-employed > and just wondered if you would have any advice etc especially with > regards to costing a project etc. Thanks in advance for any help you > can give. Hard to give any relevant advice on how to operate in a different place, but costing is pretty much the same wherever you are. We've had a few discussions about it in the past. Whether you are working on a fixed price project or on a time/materials basis, you need to work out your hourly rate first. If you are looking at trying a fixed price project, you need to estimate the time involved, build in a large "fudge factor" and then make sure that you have the scope *really* well tied down with agreement as to how variations will be costed. As far as hourly rate is concerned, one rule of thumb is to work out your *total* annual requirement including an annual salary, all overheads, superannuation contributions, holiday requirements etc. Then add a percentage on top of that of say 10% profit (after all, you are not in business just to pay yourself wages are you?). Then divide that figure by 1000 to arrive at your hourly rate. At first glance, that may looks a bit much - it's only working 20 hours a week for 50 weeks a year. But when you get down to it, you will realise just how much non-billable time is involved over a year when you are self employed. Just compare the figure that you come up with to the charge out rate which the big boys use for their consultants (not what they are paying them ). Odds are you will still come in considerably lower than they are - which gives you a bargaining point when trying to sell your services. -- Lexacorp Ltd http://www.lexacorp.com.pg Information Technology Consultancy, Software Development,System Support. From kwilliam at ashlandnet.com Wed Jan 14 07:25:19 2004 From: kwilliam at ashlandnet.com (Keith Williamson) Date: Wed, 14 Jan 2004 08:25:19 -0500 Subject: [AccessD] Smolin Memorial Contribution In-Reply-To: <40056458.1010603@torchlake.com> Message-ID: <000701c3daa1$dbb507d0$64aba8c0@ashlandnet.com> Tina, I did receive an email from PayPal that you sent this. I'm not sure what the problem was through the web site. I'm sorry you had problems. However, the email you sent the payment to was not set up in our PayPal. So, I just added it, and your payment has been credited. Sorry, it just took me a little while to figure out how to get it, without having to setup a new account. Keith E. Williamson Ashland Equipment, Inc phone # (410) 273-1856 fax # (410) 273-1859 -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Tina Fields Sent: Wednesday, January 14, 2004 10:47 AM To: Access Developers discussion and problem solving Subject: Re: [AccessD] Smolin Memorial Contribution I went to the databaseadvisors.com website and tried to make my contribution directly from the donations.htm page. I have a PayPal account and expected this transaction to be easy. The input form kept insisting on an auction ID and I had no clue what to put in there. So, I went directly to my PayPal account and used the Send Money feature, using the email address of the treasurer at databaseadvisors.com. As of this morning, that transaction is unclaimed according to my PayPal account records. It's a small gift, but I do want it included in the gift from this wonderful group, honoring the father of a man who has been friend and help to all of us. Please, somebody take a quick look into the PayPal receipts of yesterday for my little gift. Thanks dbcfour at triad.rr.com wrote: >On Sunday January 11, 2004 Bernard Smolin, father of our long time and much respected fellow member Rocky Smolin, passed away. > >After a number of members expressed a desire to share an expression of sympathy, arrangements have been made for Keith Williamson to collect Memorial Contribution(s), and present a check to the National Jewish Medical & Research Center >(http://www.njc.org/fr/joymem.html) on our behalf. > >Those wishing to express their sincere and heartfelt sympathy to the Family >in this manner can contribute via the website at >http://www.databaseadvisors.com/donations.htm It is important, however, that you clearly indicate in the notes section of the Paypal form, the nature of the contribution. > >For those that prefer to mail a check, please do so by mailing a check to: > >Database Advisors Inc. >c/o Keith Williamson >450 Franklin Street Apt B >Havre de Grace, MD 21078 > >All contributions should be made no later than Friday January 16th, and be >clearly marked as Smolin Memorial Fund. > >A special Thank You to Keith for his willingness to assist us in this effort. > >Donna Cook > > > >_______________________________________________ >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 From andy at minstersystems.co.uk Wed Jan 14 07:43:53 2004 From: andy at minstersystems.co.uk (Andy Lacey) Date: Wed, 14 Jan 2004 13:43:53 -0000 Subject: [AccessD] OT - Starting On My Own In-Reply-To: <20572664.1074085401043.JavaMail.www@wwinf3004> Message-ID: <000701c3daa4$7351ac90$b274d0d5@minster33c3r25> Another brummie! Or are you an interloper? Me. I escaped long ago before the city was gentrified. Hope you're a Villa fan. Anyway I digress. Firstly good luck if you do it Paul. I took the plunge many, many years ago. Never regretted it but that's not to say there won't be bad days ahead - Just that for me the advantages outweigh the diadvantages. I would say, however, that you shouldn't go it alone if you're of a nervous disposition. Not knowing when you'll next earn a bean can be pretty stressful. You have to trust to lady luck and believe that the next contract is round the corner. And definitely don't do it, as I overheard someone once say, in order to "get more time on the golf-course". Ha, ha, ha is all I can say to that one. As to advice on costing, I'm afraid I still find it difficult. I would though refer you to an article William wrote in the first Many2Many newsletter (see dba site) in July 2001 called 'Consultant's Corner'. Some good stuff there. Like William my experience is that it's damned difficult, if not impossible, to raise your rate much once you're in at a customer. If you quote low for one project and they have a second one they will not accept you quoting high for that one. Once you're perceived as cheap you're stuck with that perception. So always (I know it's obvious) pitch your quotes as high as you possibly can. If circumstances (no money to pay mortgage, kids on the streets begging, etc) dictate that you have to go low to get a contract then you must fully understand the implications of doing so. Try to make it clear it's a special deal - it's probably a waste of breath but still worth saying - and, as William says, keep the rate high and reduce the time you're quoting. You may know full well it's going to take much longer, and you certainly want to make it clear it did so, but better that than letting the customer think your rate is laughable. The problem comes when you knowingly quote a short time and they jump on that and want it delivered next day/week/whatever. Then you think on your feet and talk quick (other calls on your time, several family funerals in the next few days etc). As to calculating just how long you actually think it will take.....well I've always found a blindfold and a pin useful. Seriously though, only time and experience will tell you. HTH a little bit. Andy Lacey http://www.minstersystems.co.uk > -----Original Message----- > From: accessd-bounces at databaseadvisors.com > [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of > paul.hartland at fsmail.net > Sent: 14 January 2004 13:03 > To: Access Developers discussion and problem solving > Subject: Re: RE: [AccessD] OT - Starting On My Own > > > I live in Birmingham, England > > > > > > Message date : Jan 14 2004, 12:54 PM > >From : DJK(John) Robinson > To : 'Access Developers discussion and problem solving' > Copy to : > Subject : RE: [AccessD] OT - Starting On My Own > Whereabouts, Paul? You seem to be somewhere between the UK > and Central Europe... > > John > > > > -----Original Message----- > > From: accessd-bounces at databaseadvisors.com > > [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of > > paul.hartland at fsmail.net > > Sent: 14 January 2004 11:10 > > To: accessd > > Subject: [AccessD] OT - Starting On My Own > > > > > > To all, > > > > I?m in the process of thinking about starting up on my own > > (part-time at first to see how it goes) as possibly a > > freelance Database Developer, I know some of you on this list > > are self-employed and just wondered if you would have any > > advice etc especially with regards to costing a project etc. > > > > Thanks in advance for any help you can give. > > > > Paul Hartland > > > > P.S. feel free to contact me off-list > > Freeserve AnyTime - HALF PRICE for the first 3 months - Save > > ?7.50 a month > > www.freeserve.com/anytime > > _______________________________________________ > > AccessD mailing list > > AccessD at databaseadvisors.com > > http://databaseadvisors.com/mailman/listinfo/a> ccessd > > Website: > > http://www.databaseadvisors.com > > > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/a> ccessd > Website: > http://www.databaseadvisors.com > Freeserve > AnyTime - HALF PRICE for the first 3 months - Save ?7.50 a month > www.freeserve.com/anytime > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/a> ccessd > Website: > http://www.databaseadvisors.com > > > From wdhindman at bellsouth.net Wed Jan 14 07:44:52 2004 From: wdhindman at bellsouth.net (William Hindman) Date: Wed, 14 Jan 2004 08:44:52 -0500 Subject: [AccessD] OT - Starting On My Own References: <20111798.1074078619262.JavaMail.www@wwinf3002> Message-ID: <004f01c3daa4$96384e30$6101a8c0@dejpolsys> Paul ...lots of solid discussion on this in our archives and the dba newsletter ...a search of both will turn up reams of information and advice ...HTH :) William Hindman - Next Year In The Free State! ----- Original Message ----- From: To: "accessd" Sent: Wednesday, January 14, 2004 6:10 AM Subject: [AccessD] OT - Starting On My Own To all, I'm in the process of thinking about starting up on my own (part-time at first to see how it goes) as possibly a freelance Database Developer, I know some of you on this list are self-employed and just wondered if you would have any advice etc especially with regards to costing a project etc. Thanks in advance for any help you can give. Paul Hartland P.S. feel free to contact me off-list Freeserve AnyTime - HALF PRICE for the first 3 months - Save ?7.50 a month www.freeserve.com/anytime _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From pedro at plex.nl Wed Jan 14 15:08:38 2004 From: pedro at plex.nl (pedro at plex.nl) Date: Wed, 14 Jan 2004 15:08:38 (MET) Subject: [AccessD] error after converting (mailmerge) Message-ID: <200401141408.i0EE8cNA020272@mailhostC.plex.net> Hello Group, i converted a A97 secured database to A2K. After making the changes in Wrkgadmin.exe and the ODBC Data Sources, i changed the names in the module. After running the mailmerge i get an error: Run-time error '5922' Word was unable to open the data source. The debug selects the .OpenDataSource from the code below. I figure out why this error occurs. TIA Pedro Janssen Sub CreateMergeDoc(UseDDE As Boolean, PrintDoc As Boolean) Dim WordDoc As Word.Document Dim strLetter As String Dim strConnect As String Dim WordApp As Word.Application Set WordApp = CreateObject("Word.Application") Set WordDoc = WordApp.Documents.Add With WordDoc.MailMerge If UseDDE Then strConnect = "QUERY Uitvoer" Else strConnect = "DSN=MS Access 2000 " _ & "Database;DBQ=E:\Cytologie\positieven\" _ & "BeveiligdPOSITIEVEN(A2K).mdb;" _ & "FIL=MS Access;" End If .OpenDataSource _ Name:="E:\Cytologie\positieven\BeveiligdPOSITIEVEN(A2K).mdb", _ ReadOnly:=True, LinkToSource:=True, _ Connection:=strConnect, _ SQLStatement:="SELECT * FROM [Uitvoer], [Aanvrager] WHERE Uitvoer.AanvragerID = Aanvrager.AanvragerID AND Uitvoer.ControleID = " & Forms![Brief]![veld] & ";" With Fields ............... End With With WordApp.Selection ............... End With With WordDoc.MailMerge .DataSource.FirstRecord = 1 .Destination = wdSendToNewDocument .Execute If PrintDoc Then .Application.Options.PrintBackground = False .Application.ActiveDocument.PrintOut End If End With WordApp.Visible = True End With End Sub From wdhindman at bellsouth.net Wed Jan 14 08:14:03 2004 From: wdhindman at bellsouth.net (William Hindman) Date: Wed, 14 Jan 2004 09:14:03 -0500 Subject: [AccessD] OT - Starting On My Own References: <20111798.1074078619262.JavaMail.www@wwinf3002> <004f01c3daa4$96384e30$6101a8c0@dejpolsys> Message-ID: <001001c3daa8$a9c6e110$6101a8c0@dejpolsys> ...one more thing Paul ...the below list is oriented toward SBS Consultants and always has lots of good, practical business advice immediately available from your peers on the ground actually making a living at it ...its a pretty good place to bounce business questions and ideas off of. http://groups.yahoo.com/group/smallbizIT/ ...also ...the best book available imnsho is Harry Brelsford's "SMB Consulting Best Practices" ...its recent, down to earth advice from one of the best in the business ...well worth what it costs you ...HTH :) William Hindman From tinanfields at torchlake.com Wed Jan 14 13:05:43 2004 From: tinanfields at torchlake.com (Tina Fields) Date: Wed, 14 Jan 2004 11:05:43 -0800 Subject: [AccessD] Smolin Memorial Contribution References: <000701c3daa1$dbb507d0$64aba8c0@ashlandnet.com> Message-ID: <40059307.3000502@torchlake.com> Thanks Keith :) T Keith Williamson wrote: >Tina, > >I did receive an email from PayPal that you sent this. I'm not sure what >the problem was through the web site. I'm sorry you had problems. However, >the email you sent the payment to was not set up in our PayPal. So, I just >added it, and your payment has been credited. > >Sorry, it just took me a little while to figure out how to get it, without >having to setup a new account. > >Keith E. Williamson >Ashland Equipment, Inc >phone # (410) 273-1856 >fax # (410) 273-1859 > >-----Original Message----- >From: accessd-bounces at databaseadvisors.com >[mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Tina Fields >Sent: Wednesday, January 14, 2004 10:47 AM >To: Access Developers discussion and problem solving >Subject: Re: [AccessD] Smolin Memorial Contribution > >I went to the databaseadvisors.com website and tried to make my >contribution directly from the donations.htm page. I have a PayPal >account and expected this transaction to be easy. The input form kept >insisting on an auction ID and I had no clue what to put in there. So, >I went directly to my PayPal account and used the Send Money feature, >using the email address of the treasurer at databaseadvisors.com. As of >this morning, that transaction is unclaimed according to my PayPal >account records. It's a small gift, but I do want it included in the >gift from this wonderful group, honoring the father of a man who has >been friend and help to all of us. Please, somebody take a quick look >into the PayPal receipts of yesterday for my little gift. Thanks > >dbcfour at triad.rr.com wrote: > > > >>On Sunday January 11, 2004 Bernard Smolin, father of our long time and much >> >> >respected fellow member Rocky Smolin, passed away. > > >>After a number of members expressed a desire to share an expression of >> >> >sympathy, arrangements have been made for Keith Williamson to collect >Memorial Contribution(s), and present a check to the National Jewish Medical >& Research Center > > >>(http://www.njc.org/fr/joymem.html) on our behalf. >> >>Those wishing to express their sincere and heartfelt sympathy to the Family >> >> > > > >>in this manner can contribute via the website at >>http://www.databaseadvisors.com/donations.htm It is important, however, >> >> >that you clearly indicate in the notes section of the Paypal form, the >nature of the contribution. > > >>For those that prefer to mail a check, please do so by mailing a check to: >> >>Database Advisors Inc. >>c/o Keith Williamson >>450 Franklin Street Apt B >>Havre de Grace, MD 21078 >> >>All contributions should be made no later than Friday January 16th, and be >>clearly marked as Smolin Memorial Fund. >> >>A special Thank You to Keith for his willingness to assist us in this >> >> >effort. > > >>Donna Cook >> >> >> >>_______________________________________________ >>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 > >_______________________________________________ >AccessD mailing list >AccessD at databaseadvisors.com >http://databaseadvisors.com/mailman/listinfo/accessd >Website: http://www.databaseadvisors.com > > > From ebarro at afsweb.com Wed Jan 14 10:02:20 2004 From: ebarro at afsweb.com (Eric Barro) Date: Wed, 14 Jan 2004 08:02:20 -0800 Subject: [AccessD] OT: Compaq vs. Dell In-Reply-To: Message-ID: I am biased in favor of COMPAQ servers. I hated COMPAQ desktops in the past because of the custom stuff they did with either the components or the OS. The servers however are another story. I have worked with the ML350s, ML530s, DL320s and DL380s. Each one was better than its predecessor. The COMPAQ servers look really heavy duty whilst the DELL servers look really lightweight. I have popped the hood on COMPAQ servers (out of curiosity at what the "engine" looks like inside the machine) but have not done so with the DELL servers. In my limited experience of using tech support I have found COMPAQ support to be easier to reach. DELL support put us on hold and gave us the run around quite a number of times. --- Eric Barro Senior Systems Analyst Advanced Field Services (208) 772-7060 http://www.afsweb.com -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of John W. Colby Sent: Wednesday, January 14, 2004 3:23 AM To: DBA - Tech; AccessD Subject: [AccessD] OT: Compaq vs. Dell A client is looking to buy a server and has always favored Compaq servers, but is asking me and others their opinions of Dell vs. Compaq. I am not knowledgeable where servers are concerned, and I know that you folks are an opinionated bunch so I'd like to get your opinion on whether Dell is as good as / better than / worse than Compaq when it comes to servers. Thanks, John W. Colby www.ColbyConsulting.com --- Outgoing mail is certified Virus Free. Checked by AVG anti-virus system (http://www.grisoft.com). Version: 6.0.560 / Virus Database: 352 - Release Date: 1/8/2004 From markamatte at hotmail.com Wed Jan 14 11:19:58 2004 From: markamatte at hotmail.com (Mark A Matte) Date: Wed, 14 Jan 2004 17:19:58 +0000 Subject: [AccessD] OT: Looking for info on DB Message-ID: Hello All, Sorry for the OT...Does anyone have any knowledge or a company smartFOCUS, Ltd and their product "Viper" (aka "smartANALYZER)...this thing will supposedly query/index/return millions or records in a matter of seconds. It creates its own files from the data for this process(.XMF , .VIX , .IDX , .CDX). The main reason I am asking this group is because they offer a "VBA Developers Kit". Supposedly this thing was built with/on MS technology. What exactly is a VBA developers kit...or is this probably just a name they gave to one of their tools? Any insight, ideas, or anything will be greatly appreciated. Thanks, Mark _________________________________________________________________ Scope out the new MSN Plus Internet Software ? optimizes dial-up to the max! http://join.msn.com/?pgmarket=en-us&page=byoa/plus&ST=1 From jmwayne at moordri.com Wed Jan 14 11:31:58 2004 From: jmwayne at moordri.com (JM Wayne) Date: Wed, 14 Jan 2004 12:31:58 -0500 Subject: [AccessD] A curious problem... In-Reply-To: <46B976F2B698FF46A4FE7636509B22DF03D110@stekelbes.ithelps.local> Message-ID: <000801c3dac4$532b55e0$87c9040a@direcway.com> Very strange, indeed. I tried a virus scan. I also tried copying the code to a txt file , changing 'has module' to no and repairing the database then putting the code back in. No luck. -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Erwin Craps - IT Helps Sent: Wednesday, January 14, 2004 6:53 AM To: Access Developers discussion and problem solving Subject: RE: [AccessD] A curious problem... Very strange. If I where you I would virusscan your file with a up-to-date scanner. I never encountered a virus in an access database, but is is posible and I supose they exist. It's a long shot, but this would be definitly the first thing I would do after a decompile. Erwin -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of JM Wayne Sent: Tuesday, January 13, 2004 11:05 PM To: 'Access Developers discussion and problem solving' Subject: RE: [AccessD] A curious problem... Lambert, I'm losin' it. I repaired, decompiled and imported and still no luck. Any more ideas short of jumping off a bridge ? Thanks. Judy -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Heenan, Lambert Sent: Tuesday, January 13, 2004 2:51 PM To: 'Access Developers discussion and problem solving' Subject: RE: [AccessD] A curious problem... First make a backup copy of the MDB file. Then try repairing. No joy? Try decompiling. Still no luck? Try importing all the objects in the database to a new mdb file. Lambert -----Original Message----- From: JM Wayne [mailto:jmwayne at moordri.com] Sent: Tuesday, January 13, 2004 2:25 PM To: AccessD (E-mail) Subject: [AccessD] A curious problem... I have an A2K database that has been in use for over 2 years. All of a sudden the forms are resizing themselves. In one case the user enters data on one form and by clicking a button opens another form for data input. In another form the user double clicks an item in a list box and opens a form to enter data. In both cases when they close the second form the initial form is no longer maximized. I entered DoCmd.Maximize in the second form's On Close event but it is kind of clumsy. There has been no change in the code that should cause this to happen. I should mention that the forms that are having this problem have a great number of controls on them. Any advice or explanation would be appreciated. Judy Judith M Wayne Shefford-Meade, Inc. _______________________________________________ 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 _______________________________________________ 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 From john at winhaven.net Wed Jan 14 12:01:10 2004 From: john at winhaven.net (John Bartow) Date: Wed, 14 Jan 2004 12:01:10 -0600 Subject: [AccessD] A curious problem... In-Reply-To: <000801c3dac4$532b55e0$87c9040a@direcway.com> Message-ID: FYI: FMS has a free Access db virus checker on their web site. Personally don't know much about it. > -----Original Message----- > From: accessd-bounces at databaseadvisors.com > [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of JM Wayne > Sent: Wednesday, January 14, 2004 11:32 AM > To: 'Access Developers discussion and problem solving' > Subject: RE: [AccessD] A curious problem... > > > Very strange, indeed. I tried a virus scan. I also tried copying the code > to a txt file , changing 'has module' to no and repairing the > database then > putting the code back in. No luck. > > -----Original Message----- > From: accessd-bounces at databaseadvisors.com > [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Erwin Craps - > IT Helps > Sent: Wednesday, January 14, 2004 6:53 AM > To: Access Developers discussion and problem solving > Subject: RE: [AccessD] A curious problem... > > > Very strange. > > If I where you I would virusscan your file with a up-to-date scanner. > I never encountered a virus in an access database, but is is posible and > I supose they exist. > > It's a long shot, but this would be definitly the first thing I would do > after a decompile. > > Erwin > > -----Original Message----- > From: accessd-bounces at databaseadvisors.com > [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of JM Wayne > Sent: Tuesday, January 13, 2004 11:05 PM > To: 'Access Developers discussion and problem solving' > Subject: RE: [AccessD] A curious problem... > > Lambert, > I'm losin' it. I repaired, decompiled and imported and still no > luck. > Any more ideas short of jumping off a bridge ? > > Thanks. > Judy > > > -----Original Message----- > From: accessd-bounces at databaseadvisors.com > [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Heenan, > Lambert > Sent: Tuesday, January 13, 2004 2:51 PM > To: 'Access Developers discussion and problem solving' > Subject: RE: [AccessD] A curious problem... > > > First make a backup copy of the MDB file. > > Then try repairing. > > No joy? Try decompiling. > > Still no luck? Try importing all the objects in the database to a new > mdb file. > > Lambert > > -----Original Message----- > From: JM Wayne [mailto:jmwayne at moordri.com] > Sent: Tuesday, January 13, 2004 2:25 PM > To: AccessD (E-mail) > Subject: [AccessD] A curious problem... > > > I have an A2K database that has been in use for over 2 years. All > of a sudden the forms are resizing themselves. In one case the user > enters data on one form and by clicking a button opens another form for > data input. In another form the user double clicks an item in a list box > and opens a form to enter data. In both cases when they close the > second form the initial form is no longer maximized. I entered > DoCmd.Maximize in the second form's On Close event but it is kind of > clumsy. > There has been no change in the code that should cause this to happen. > I should mention that the forms that are having this problem have a > great number of controls on them. > Any advice or explanation would be appreciated. > > Judy > > > Judith M Wayne > Shefford-Meade, Inc. > > _______________________________________________ > 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 > > _______________________________________________ > 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 > From my.lists at verizon.net Wed Jan 14 12:13:29 2004 From: my.lists at verizon.net (Francisco H Tapia) Date: Wed, 14 Jan 2004 10:13:29 -0800 Subject: [AccessD] Form Life... Message-ID: <400586C9.7040302@verizon.net> A while back there was a link that was posted that explained how many "edits" or "changes" can occur over the life of a form, after which you can no longer make any additional changes. Is there any way to check this life cycle? or has anyone tried? -- -Francisco From cfoust at infostatsystems.com Wed Jan 14 12:35:49 2004 From: cfoust at infostatsystems.com (Charlotte Foust) Date: Wed, 14 Jan 2004 10:35:49 -0800 Subject: [AccessD] Form Life... Message-ID: Do you mean the limits on the number of controls that can be added to a form or report over its life? As far as I know there is no limit on "edits", only on the number of controls. I don't recall the exact number, although I've hit it in the past, but it's somewhere around 750. Charlotte Foust -----Original Message----- From: Francisco H Tapia [mailto:my.lists at verizon.net] Sent: Wednesday, January 14, 2004 10:13 AM To: AccessD Subject: [AccessD] Form Life... A while back there was a link that was posted that explained how many "edits" or "changes" can occur over the life of a form, after which you can no longer make any additional changes. Is there any way to check this life cycle? or has anyone tried? -- -Francisco _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From Mark.Mitsules at ngc.com Wed Jan 14 12:36:08 2004 From: Mark.Mitsules at ngc.com (Mitsules, Mark S. (Newport News)) Date: Wed, 14 Jan 2004 13:36:08 -0500 Subject: [AccessD] Form Life... Message-ID: I believe the discussion was about the total number of controls that had ever been added to a form that was the problem...see quotes below. Mark "...it's not necessarily the number of controls currently on your form ...Access has a built in limitation of 754 controls that can be added over the lifetime of a form ...so even if your form currently has only 20 controls on it, if you've added and deleted controls frequently over its lifetime, you'll most likely have to recreate the form ...HTH :) http://office.microsoft.com/assistance/offhelp/offxp/access/acmain10/html/ac decLookUpMicrosoftAccessSpecificationsS.htm ...watch for the wrap :)" -William Hindman -----Original Message----- From: Francisco H Tapia [mailto:my.lists at verizon.net] Sent: Wednesday, January 14, 2004 1:13 PM To: AccessD Subject: [AccessD] Form Life... A while back there was a link that was posted that explained how many "edits" or "changes" can occur over the life of a form, after which you can no longer make any additional changes. Is there any way to check this life cycle? or has anyone tried? -- -Francisco _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From martyconnelly at shaw.ca Wed Jan 14 13:18:10 2004 From: martyconnelly at shaw.ca (MartyConnelly) Date: Wed, 14 Jan 2004 11:18:10 -0800 Subject: [AccessD] OT - Starting On My Own References: <20111798.1074078619262.JavaMail.www@wwinf3002> <004f01c3daa4$96384e30$6101a8c0@dejpolsys> Message-ID: <400595F2.4040805@shaw.ca> Make sure you have all your ducks in a row before you start out with regards to incorporation or sole proprietorship (see accountant especially with regards to taxes), get a corporate bank account after establishing incorporation, get your corporate VAT number. If I remember right Inland Revenue takes some odd views on whether you are self employed or not (check this out). All these little things may take up to two months to sort out. http://www.ukonline.gov.uk/QuickFind/BusinessIndustryTopic/fs/en PS don't be reticent to walk away from a project you are unsure of, especially when starting out. William Hindman wrote: >Paul > >...lots of solid discussion on this in our archives and the dba newsletter >...a search of both will turn up reams of information and advice ...HTH :) > >William Hindman > - Next Year In The Free State! > > >----- Original Message ----- >From: >To: "accessd" >Sent: Wednesday, January 14, 2004 6:10 AM >Subject: [AccessD] OT - Starting On My Own > > >To all, > >I'm in the process of thinking about starting up on my own (part-time at >first to see how it goes) as possibly a freelance Database Developer, I know >some of you on this list are self-employed and just wondered if you would >have any advice etc especially with regards to costing a project etc. > >Thanks in advance for any help you can give. > >Paul Hartland > >P.S. feel free to contact me off-list >Freeserve AnyTime - HALF PRICE for the first 3 months - Save ?7.50 a month >www.freeserve.com/anytime >_______________________________________________ >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 > > > -- Marty Connelly Victoria, B.C. Canada From my.lists at verizon.net Wed Jan 14 13:27:31 2004 From: my.lists at verizon.net (Francisco H Tapia) Date: Wed, 14 Jan 2004 11:27:31 -0800 Subject: [AccessD] Form Life... In-Reply-To: References: Message-ID: <40059823.4010504@verizon.net> That was it, I'm wondering if there is a method to programatically find this information out? If I get a chance I'll start tinkering w/ it. I was wondering if anyone has already beat me to that wheel is all ;o) Thanks, -- -Francisco Mitsules, Mark S. (Newport News) wrote: >I believe the discussion was about the total number of controls that had >ever been added to a form that was the problem...see quotes below. > >Mark > > >"...it's not necessarily the number of controls currently on your form >...Access has a built in limitation of 754 controls that can be added over >the lifetime of a form ...so even if your form currently has only 20 >controls on it, if you've added and deleted controls frequently over its >lifetime, you'll most likely have to recreate the form ...HTH :) > >http://office.microsoft.com/assistance/offhelp/offxp/access/acmain10/html/ac >decLookUpMicrosoftAccessSpecificationsS.htm ...watch for the wrap :)" >-William Hindman > > > > >-----Original Message----- >From: Francisco H Tapia [mailto:my.lists at verizon.net] >Sent: Wednesday, January 14, 2004 1:13 PM >To: AccessD >Subject: [AccessD] Form Life... > > >A while back there was a link that was posted that explained how many >"edits" or "changes" can occur over the life of a form, after which you >can no longer make any additional changes. Is there any way to check >this life cycle? or has anyone tried? > > > From jmwayne at moordri.com Wed Jan 14 13:23:29 2004 From: jmwayne at moordri.com (JM Wayne) Date: Wed, 14 Jan 2004 14:23:29 -0500 Subject: [AccessD] A curious problem... In-Reply-To: Message-ID: <000f01c3dad5$11586200$87c9040a@direcway.com> John, Do you have the web address for FMS? Thanks -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of John Bartow Sent: Wednesday, January 14, 2004 1:01 PM To: Access Developers discussion and problem solving Subject: RE: [AccessD] A curious problem... FYI: FMS has a free Access db virus checker on their web site. Personally don't know much about it. > -----Original Message----- > From: accessd-bounces at databaseadvisors.com > [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of JM Wayne > Sent: Wednesday, January 14, 2004 11:32 AM > To: 'Access Developers discussion and problem solving' > Subject: RE: [AccessD] A curious problem... > > > Very strange, indeed. I tried a virus scan. I also tried copying the code > to a txt file , changing 'has module' to no and repairing the > database then > putting the code back in. No luck. > > -----Original Message----- > From: accessd-bounces at databaseadvisors.com > [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Erwin Craps - > IT Helps > Sent: Wednesday, January 14, 2004 6:53 AM > To: Access Developers discussion and problem solving > Subject: RE: [AccessD] A curious problem... > > > Very strange. > > If I where you I would virusscan your file with a up-to-date scanner. > I never encountered a virus in an access database, but is is posible and > I supose they exist. > > It's a long shot, but this would be definitly the first thing I would do > after a decompile. > > Erwin > > -----Original Message----- > From: accessd-bounces at databaseadvisors.com > [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of JM Wayne > Sent: Tuesday, January 13, 2004 11:05 PM > To: 'Access Developers discussion and problem solving' > Subject: RE: [AccessD] A curious problem... > > Lambert, > I'm losin' it. I repaired, decompiled and imported and still no > luck. > Any more ideas short of jumping off a bridge ? > > Thanks. > Judy > > > -----Original Message----- > From: accessd-bounces at databaseadvisors.com > [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Heenan, > Lambert > Sent: Tuesday, January 13, 2004 2:51 PM > To: 'Access Developers discussion and problem solving' > Subject: RE: [AccessD] A curious problem... > > > First make a backup copy of the MDB file. > > Then try repairing. > > No joy? Try decompiling. > > Still no luck? Try importing all the objects in the database to a new > mdb file. > > Lambert > > -----Original Message----- > From: JM Wayne [mailto:jmwayne at moordri.com] > Sent: Tuesday, January 13, 2004 2:25 PM > To: AccessD (E-mail) > Subject: [AccessD] A curious problem... > > > I have an A2K database that has been in use for over 2 years. All > of a sudden the forms are resizing themselves. In one case the user > enters data on one form and by clicking a button opens another form for > data input. In another form the user double clicks an item in a list box > and opens a form to enter data. In both cases when they close the > second form the initial form is no longer maximized. I entered > DoCmd.Maximize in the second form's On Close event but it is kind of > clumsy. > There has been no change in the code that should cause this to happen. > I should mention that the forms that are having this problem have a > great number of controls on them. > Any advice or explanation would be appreciated. > > Judy > > > Judith M Wayne > Shefford-Meade, Inc. > > _______________________________________________ > 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 > > _______________________________________________ > 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 > _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From JHewson at karta.com Wed Jan 14 13:55:00 2004 From: JHewson at karta.com (Jim Hewson) Date: Wed, 14 Jan 2004 13:55:00 -0600 Subject: [AccessD] A curious problem... Message-ID: <4AE733BBEEE72647A9F950F7275F262E1126E6@nt04.karta.com> Web address for FMS is: www.fmsinc.com The virus scanner is for Access 97, can be located at: http://www.fmsinc.com/free/utilities/fmsavs10.htm HTH Jim -----Original Message----- From: JM Wayne [mailto:jmwayne at moordri.com] Sent: Wednesday, January 14, 2004 1:23 PM To: 'Access Developers discussion and problem solving' Subject: RE: [AccessD] A curious problem... John, Do you have the web address for FMS? Thanks -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of John Bartow Sent: Wednesday, January 14, 2004 1:01 PM To: Access Developers discussion and problem solving Subject: RE: [AccessD] A curious problem... FYI: FMS has a free Access db virus checker on their web site. Personally don't know much about it. > -----Original Message----- > From: accessd-bounces at databaseadvisors.com > [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of JM Wayne > Sent: Wednesday, January 14, 2004 11:32 AM > To: 'Access Developers discussion and problem solving' > Subject: RE: [AccessD] A curious problem... > > > Very strange, indeed. I tried a virus scan. I also tried copying the code > to a txt file , changing 'has module' to no and repairing the > database then > putting the code back in. No luck. > > -----Original Message----- > From: accessd-bounces at databaseadvisors.com > [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Erwin Craps - > IT Helps > Sent: Wednesday, January 14, 2004 6:53 AM > To: Access Developers discussion and problem solving > Subject: RE: [AccessD] A curious problem... > > > Very strange. > > If I where you I would virusscan your file with a up-to-date scanner. > I never encountered a virus in an access database, but is is posible and > I supose they exist. > > It's a long shot, but this would be definitly the first thing I would do > after a decompile. > > Erwin > > -----Original Message----- > From: accessd-bounces at databaseadvisors.com > [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of JM Wayne > Sent: Tuesday, January 13, 2004 11:05 PM > To: 'Access Developers discussion and problem solving' > Subject: RE: [AccessD] A curious problem... > > Lambert, > I'm losin' it. I repaired, decompiled and imported and still no > luck. > Any more ideas short of jumping off a bridge ? > > Thanks. > Judy > > > -----Original Message----- > From: accessd-bounces at databaseadvisors.com > [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Heenan, > Lambert > Sent: Tuesday, January 13, 2004 2:51 PM > To: 'Access Developers discussion and problem solving' > Subject: RE: [AccessD] A curious problem... > > > First make a backup copy of the MDB file. > > Then try repairing. > > No joy? Try decompiling. > > Still no luck? Try importing all the objects in the database to a new > mdb file. > > Lambert > > -----Original Message----- > From: JM Wayne [mailto:jmwayne at moordri.com] > Sent: Tuesday, January 13, 2004 2:25 PM > To: AccessD (E-mail) > Subject: [AccessD] A curious problem... > > > I have an A2K database that has been in use for over 2 years. All > of a sudden the forms are resizing themselves. In one case the user > enters data on one form and by clicking a button opens another form for > data input. In another form the user double clicks an item in a list box > and opens a form to enter data. In both cases when they close the > second form the initial form is no longer maximized. I entered > DoCmd.Maximize in the second form's On Close event but it is kind of > clumsy. > There has been no change in the code that should cause this to happen. > I should mention that the forms that are having this problem have a > great number of controls on them. > Any advice or explanation would be appreciated. > > Judy > > > Judith M Wayne > Shefford-Meade, Inc. > > _______________________________________________ > 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 > > _______________________________________________ > 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 > _______________________________________________ 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 From wdhindman at bellsouth.net Wed Jan 14 14:23:27 2004 From: wdhindman at bellsouth.net (William Hindman) Date: Wed, 14 Jan 2004 15:23:27 -0500 Subject: [AccessD] OT - Starting On My Own References: <20111798.1074078619262.JavaMail.www@wwinf3002> <004f01c3daa4$96384e30$6101a8c0@dejpolsys> <400595F2.4040805@shaw.ca> Message-ID: <000901c3dadc$44c86570$6101a8c0@dejpolsys> "don't be reticent to walk away from a project you are unsure of, especially when starting out" Marty ...solid advice ...knowing what NOT to do may be more important than what to do when starting off ...competition is fierce and you can't survive competing on price alone ...someone hungrier will always come along ...but in order to compete successfully with them while charging more, you have to build a reputation that says you're worth more ...and that HAS to come from your very first client ...you must be willing to swallow sand to make that first client VERY happy with your work ...and that takes it back to Marty's advice ...if you have any doubts, walk away ...which can be damn hard to do sometimes but will pay enormous dividends later ...if you can build your clientele through word of mouth you've got 80% of your work done ...the rest is writing code which is the easy part ...there are a LOT of very good programmers out there who are not working because they think small business database consulting is about writing code ...it is, but its only a small part of a successful consultant's repertoire ...marketing, managing, budgeting, and a long list of other things that you'd not believe at the moment are at least as if not more important than your individual coding skills. William Hindman From jimdettman at earthlink.net Wed Jan 14 14:37:39 2004 From: jimdettman at earthlink.net (Jim Dettman) Date: Wed, 14 Jan 2004 15:37:39 -0500 Subject: [AccessD] OT: Looking for info on DB In-Reply-To: Message-ID: Mark, <> A VBA developers kit is what one uses when you want to make a VBA interface for your product. It's the same concept as you writing a OLE DB provider for some database you wrote. <> Never heard of them, but from the extensions, they've probably built something using the DB engine from FoxPro. Lot's of small database companies like this floating around. Most work in the area of embedded products. Jim Dettman President, Online Computer Services of WNY, Inc. (315) 699-3443 jimdettman at earthlink.net -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Mark A Matte Sent: Wednesday, January 14, 2004 12:20 PM To: accessd at databaseadvisors.com Subject: [AccessD] OT: Looking for info on DB Hello All, Sorry for the OT...Does anyone have any knowledge or a company smartFOCUS, Ltd and their product "Viper" (aka "smartANALYZER)...this thing will supposedly query/index/return millions or records in a matter of seconds. It creates its own files from the data for this process(.XMF , .VIX , .IDX , .CDX). The main reason I am asking this group is because they offer a "VBA Developers Kit". Supposedly this thing was built with/on MS technology. What exactly is a VBA developers kit...or is this probably just a name they gave to one of their tools? Any insight, ideas, or anything will be greatly appreciated. Thanks, Mark _________________________________________________________________ Scope out the new MSN Plus Internet Software ? optimizes dial-up to the max! http://join.msn.com/?pgmarket=en-us&page=byoa/plus&ST=1 _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From Subscriptions at servicexp.com Wed Jan 14 15:07:42 2004 From: Subscriptions at servicexp.com (Robert Gracie) Date: Wed, 14 Jan 2004 16:07:42 -0500 Subject: [AccessD] Implements vs WithEvents In-Reply-To: Message-ID: John, Thanks A Million, You have helped allot!! VBA DHB = VBA Developers Handbook 2nd Edition by Ken Getz and Mike Gilbert Thanks Again!! Robert Gracie www.servicexp.com -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of John W. Colby Sent: Tuesday, January 13, 2004 10:03 PM To: Access Developers discussion and problem solving Subject: RE: [AccessD] Implements vs WithEvents Robert, Risking sounding ignorant, I don't know what the VBA DHB is so I can't help you there. However AFAIK you can't use Implements for something like a control or form. These objects have code inside them that cause things to happen, properties to modify their behavior etc. ALL THAT STUFF can actually be inherited in VB.NET. That is, you can actually start with a combo box, subclass that combo box, GET ALL OF IT'S FUNCTIONALITY, all of it's code, all of its properties and methods, plus add your own!!! Or even override things to change the way the combo box functions. THAT is true inheritance. Not so in Access / VBA. An object like a combo box is a self contained unit that you simply cannot get inside of or modify in any meaningful way. It appears to us Access programmers almost like an ocx, i.e. a black box that does things. IMPORTANT... one of the things these objects do is raise Events! IOW, they tell you when a user clicks the mouse, double clicks the mouse etc. "inside" their boundaries on the screen. Knowing this, every Access programmer ALREADY USES WITHEVENTS. How? By creating an event stub in a form's class, and inserting code in that event stub to do something that the programmer wants to do when that event happens. The confusing thing is that a form's class DOES NOT REQUIRE a withevents dimension statement for any controls contained in the form (or for itself - the form - for that matter). However there is an IMPLICIT dim statement in the class, invisible, but there none the less. So every Access programmer already knows all about handling events for combos, command buttons etc. They (most of us anyway) use the built-in wizards in the form's builder interface to insert event handler stubs into the form's class and insert code there. THAT IS WITHEVENT PROGRAMMING, with all the details taken care of for you. Well guess what, ANY CLASS can have those same event handlers in them!!! The only differenc is that if the class is not a form class, there must be an EXPLICIT dim Withevents statement for any control (any object actually) that you wish to sink events for. 'inside my own combo class header... 'Dim a combo withevents Private WithEvents mcbo As ComboBox Having the dim statement does nothing more than tell my combo class that a control of a specific type MAY be transferring control of one or more of it's events to the class directly. It does NOT say WHICH control. To do that you have to pass in a control to the class and inside the class, SET the dimmed control = the passed in control. 'inside my own combo class... 'Pass in a control and SET the internal control variable function Init(lcbo as ComboBox) set mcbo = lcbo end init THAT tells the class which combo to sink events for (the one being passed in of course). Once you do that, the class can sink ANY of the control's events. But you still haven't told the class WHICH events to sink. IOW, Even having done this, nothing will happen in your class unless you create an event stub for the control event you wish to process inside the class. 'inside my own combo class... 'create an event stub to which control will be passed when a specific event fires. Private Sub mcbo_AfterUpdate() 'Do Something really cool Msgbox "Something really cool" End Sub THAT tells the combo class WHICH event(s) to sink. Now you must of course instantiate your own combo class in your form and pass in a specific control to it. 'inside my FORM'S class header... 'dimension my own combo class dim fclsMyCombo as clsMyCombo 'inside my FORM'S class Private Sub Form_Open(Cancel As Integer) 'CREATE AN INSTANCE OF MY COOL COMBO CLASS Set fclsMyCombo = new clsMyCombo 'PASS A REFERENCE TO A SPECIFIC COMBO ON MY FORM fclsMyCombo.Init cboStates 'a combo displaying all the states in the union End Sub THAT tells Access to dimension a class, create a class instance and WHICH combo to pass off to the class instance. NOW, with ALL THESE THINGS IN PLACE, if that combo AfterUpdate fires, control will EVENTUALLY get to your class and your message box will display it's message. Notice that your form doesn't need any event stub in it for the control. Even though the ONLY sub in your form's class is the Form_Open, the event stub in your class will sink the event and the message box will display its message. I know full well that all this sounds like a LOT of work just to get control into a class but after you've done it a few times it will be 2nd nature. And of course you can then have a combo class that (see my other post) handles the double click, opens a form, allows your user to edit the data, and when the form closes, requeries the combo, all neatly encapsulated in a class. Plus all the other neato keenarino stuff you can imagine your combo doing. Hang in there. It took me three tries, each six months apart to finally "get" Shamil's stuff and understand Withevents. Looking back I can't understand why, but life is like that sometimes. And no, the demos for the book are copyrighted by Wrox and I can't legally distribute them, however there are many demos (by me of course) on DatabaseAdvisors' web site. I also have a bunch on my own site. This stuff is important, keep trying. John W. Colby www.ColbyConsulting.com -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Robert Gracie Sent: Tuesday, January 13, 2004 8:47 PM To: Access Developers discussion and problem solving Subject: RE: [AccessD] Implements vs WithEvents "Hmmmmmmm, As confusion sets in, he takes and stabs himself in the chest with his keyboard...:-)" I'm trying to understand why the VBA DHB is teaching that using INTERFACE inheritance classes (by way of the Implements Keyword and such) is much better then simply using Event, RaiseEvent, and WithEvents... The problem, for me at least, is getting my mind around the larger concept, and knowing which structure to use and why. With my very limited understanding, the way they have presented, it seems reasonable to go this route if only to help keep control over code execution... I guess I just need to keep pounding away at these concepts....... Robert Gracie www.servicexp.com -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of John W. Colby Sent: Tuesday, January 13, 2004 7:54 PM To: Access Developers discussion and problem solving Subject: [AccessD] Implements vs WithEvents Charlotte, >They have somewhat different purposes. No, they have completely different purposes. >Implements allows you to subclass an existing object/class and give it additional or different functionality, so you can have a class Dog and a subclass Spaniel that has a property Retriever. Well... true but not exactly. My issue with that statement is the term subclass as you use it. Yes you are subclassing the original but ONLY the interface. IMHO that is almost useless Implements is an interface ONLY inheritance, i.e. it allows (forces) you to start with the same public data and method DEFINITION but does not actually inherit the behaviors (methods) themselves. I.e. the code that runs in the class that is being subclassed is NOT inherited into the subclass. Access' inheritance (interface) is not very useful except as a template kind of thing. I find it useless enough that I personally don't bother. On the other hand Shamil is a proponent so it must have its uses. When you move to VB.NET (or any of the other .net languages I believe) TRUE inheritance is available. I.e. if you have a method with a thousand lines of code, when you subclass that object the new object inherits that code as well as the data. In our Implements subclassing, you would have to cut and paste that thousand lines of code into the subclass. Can you say maintenance nightmare? >You can intercept and respond to specific events when they happen in the object. Did the Bark event trigger? WithEvents lets you find out and respond from another class/object. Exactly correct. One of the MAJOR shortcomings of Access / VBA (in fact VB prior to VB.Net) is that Inheritance is virtually non-existent, and even worse, objects other than forms don't have a built in class that you can get at to add functionality directly to. What WithEvents really does is allow you to build class wrappers for objects so that you can encapsulate behaviors (functionality) in your class. In essence you still have two objects, the control (or even another class or OCX) and your class, but now you can put all of the common functionality in your class along with the event stubs of the control/class/ocx that generates the event. This does not get you any further down the road towards inheritance, sadly it simply doesn't appear to be possible in Access / VBA. But it does provide a huge step up in encapsulation. John W. Colby www.ColbyConsulting.com -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Charlotte Foust Sent: Tuesday, January 13, 2004 4:56 PM To: Access Developers discussion and problem solving Subject: RE: [AccessD] =function() in .onclick They have somewhat different purposes. Implements allows you to subclass an existing object/class and give it additional or different functionality, so you can have a class Dog and a subclass Spaniel that has a property Retriever. WithEvents allows you to monitor the events of an object/class. You can intercept and respond to specific events when they happen in the object. Did the Bark event trigger? WithEvents lets you find out and respond from another class/object. Charlotte Foust -----Original Message----- From: Robert Gracie [mailto:Subscriptions at servicexp.com] Sent: Tuesday, January 13, 2004 1:45 PM To: Access Developers discussion and problem solving Subject: RE: [AccessD] =function() in .onclick Hello All, Since I'm just learning this type of programming technique I thought I would ask a question... Why not use Implements instead of WithEvents? My limited understand of WithEvents is that they will not return functionality unit they (the event) has completed processing... Since I'm just at the "door" so to speak with learning how to use and incorporate these new (to me) programming techniques into my work, I really want to start out using the "best" technique... Robert Gracie www.servicexp.com _______________________________________________ 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 _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From BBarabash at TappeConstruction.com Wed Jan 14 16:04:56 2004 From: BBarabash at TappeConstruction.com (Brett Barabash) Date: Wed, 14 Jan 2004 16:04:56 -0600 Subject: [AccessD] A2K: ADP subreport field linking Message-ID: <426071E0B0A6D311B3C0006008B0AB23AFE2AD@TAPPEEXCH01> I am in the process of upsizing a bunch of our older reports to an A2K data project. So far, everything has worked smoothly but I have run into a small problem. I have a report based on a stored procedure, with a subreport based on a different stored procedure. For some reason, the Link Master Fields and Link Child Fields settings have no effect on the subreport. It displays the entire subreport contents no matter what I do. I tried binding the link fields to textboxes on the form, making them visible, etc. No joy. I have Googled the web and newsgroups, and can't seem to find any helpful info on this. Couldn't find any Microsoft KB pages either. BTW, I can get around the problem by passing additional arguments to the subreport's stored procedure and referencing the main report controls in the Input Parameters property of the subreport. Just seems like I'm missing something here. Brett Barabash, MCP Tappe Construction, Co. Eagan, MN bbarabash at tappeconstruction.com (651) 256-6831 "One thing a computer can do that most humans can't is be sealed up in a cardboard box and sit in a warehouse." -Jack Handey -------------------------------------------------------------------------------------------------------------------- This email and any files transmitted with it are confidential and intended solely for the use of the individual or entity to whom they are addressed. If you have received this email in error please notify the originator of the message. This footer also confirms that this email message has been scanned for the presence of computer viruses. Any views expressed in this message are those of the individual sender, except where the sender specifies and with authority, states them to be the views of Tappe Construction Co. Scanning of this message and addition of this footer is performed by SurfControl E-mail Filter software in conjunction with virus detection software. From martyconnelly at shaw.ca Wed Jan 14 17:03:00 2004 From: martyconnelly at shaw.ca (MartyConnelly) Date: Wed, 14 Jan 2004 15:03:00 -0800 Subject: [AccessD] OT: Looking for info on DB References: Message-ID: <4005CAA4.1010403@shaw.ca> Licensees of Visual Basic for Applications embed the VBA IDE, the VBA language engine, Microsoft Forms, IntelliSense technology productivity features and development tools (including a debugger, an object browser and a code editor). In addition, ISVs can take advantage of the new multithreading capabilities of VBA 6.0, as well as support for digital signatures. I don't know the license price but you are starting around $10,000 +. I have an old VBA CD but is circa 1997. Given the IDX CDX files, they are probably using a C-ISAM database engine, these databases can go memory resident so they are blazingly fast They might be using something like CodeBase from Sequiter Software, I have used this engine more than 10 years ago via C code. http://www.sequiter.com/products/ For VBA info see below or I believe it comes with MSDN http://www.microsoft.com/europe/vba/ Mark A Matte wrote: > Hello All, > > Sorry for the OT...Does anyone have any knowledge or a company > smartFOCUS, Ltd and their product "Viper" (aka "smartANALYZER)...this > thing will supposedly query/index/return millions or records in a > matter of seconds. It creates its own files from the data for this > process(.XMF , .VIX , .IDX , .CDX). > > The main reason I am asking this group is because they offer a "VBA > Developers Kit". Supposedly this thing was built with/on MS technology. > > What exactly is a VBA developers kit...or is this probably just a name > they gave to one of their tools? > > Any insight, ideas, or anything will be greatly appreciated. > > Thanks, > > Mark > > _________________________________________________________________ > Scope out the new MSN Plus Internet Software  optimizes dial-up to > the max! http://join.msn.com/?pgmarket=en-us&page=byoa/plus&ST=1 > > -- Marty Connelly Victoria, B.C. Canada From martyconnelly at shaw.ca Wed Jan 14 17:13:25 2004 From: martyconnelly at shaw.ca (MartyConnelly) Date: Wed, 14 Jan 2004 15:13:25 -0800 Subject: [AccessD] error after converting (mailmerge) References: <200401141408.i0EE8cNA020272@mailhostC.plex.net> Message-ID: <4005CD15.60401@shaw.ca> How about trying strConnect = "Provider=Microsoft.Jet.OLEDB.4.0;" & _ "Data Source=c:\somepath\mydb.mdb;" & _ "Jet OLEDB:System Database=MySystem.mdw", _ "myUsername", "myPassword" Note, remember to convert both the MDB and the MDW to the 4.0 database format when using the 4.0 OLE DB Provider. Make a new copy of 97 mdw to handle 2000. pedro at plex.nl wrote: >Hello Group, > >i converted a A97 secured database to A2K. >After making the changes in Wrkgadmin.exe and the ODBC Data Sources, i changed the names in the module. After running the mailmerge i get an error: Run-time error '5922' Word was unable to open the data source. The debug selects the .OpenDataSource from the code below. > >I figure out why this error occurs. > >TIA > >Pedro Janssen > > > > >Sub CreateMergeDoc(UseDDE As Boolean, PrintDoc As Boolean) > > Dim WordDoc As Word.Document > Dim strLetter As String > Dim strConnect As String > Dim WordApp As Word.Application > > Set WordApp = CreateObject("Word.Application") > > Set WordDoc = WordApp.Documents.Add > With WordDoc.MailMerge > If UseDDE Then > strConnect = "QUERY Uitvoer" > Else > strConnect = "DSN=MS Access 2000 " _ > & "Database;DBQ=E:\Cytologie\positieven\" _ > & "BeveiligdPOSITIEVEN(A2K).mdb;" _ > & "FIL=MS Access;" > End If > .OpenDataSource _ > Name:="E:\Cytologie\positieven\BeveiligdPOSITIEVEN(A2K).mdb", _ > ReadOnly:=True, LinkToSource:=True, _ > Connection:=strConnect, _ > SQLStatement:="SELECT * FROM [Uitvoer], [Aanvrager] WHERE Uitvoer.AanvragerID = Aanvrager.AanvragerID AND Uitvoer.ControleID = " & Forms![Brief]![veld] & ";" > > With Fields > ............... > End With > > With WordApp.Selection > ............... > End With > > > With WordDoc.MailMerge > .DataSource.FirstRecord = 1 > > .Destination = wdSendToNewDocument > > .Execute > > If PrintDoc Then > .Application.Options.PrintBackground = False > .Application.ActiveDocument.PrintOut > End If > End With > > WordApp.Visible = True > End With >End Sub > > > > -- Marty Connelly Victoria, B.C. Canada From DWUTKA at marlow.com Wed Jan 14 18:22:43 2004 From: DWUTKA at marlow.com (DWUTKA at marlow.com) Date: Wed, 14 Jan 2004 18:22:43 -0600 Subject: [AccessD] Testing... Message-ID: <2F8793082E00D4119A1700B0D0216BF802227743@main2.marlow.com> Just testing my outlook rules.....may have goofed them up.... Drew From Subscriptions at servicexp.com Wed Jan 14 22:25:41 2004 From: Subscriptions at servicexp.com (Robert Gracie) Date: Wed, 14 Jan 2004 23:25:41 -0500 Subject: [AccessD] Reporting Question In-Reply-To: <2F8793082E00D4119A1700B0D0216BF802227743@main2.marlow.com> Message-ID: Hello All, Is there a way to make use of a report that is located in a an external mdb and provide that report with a recordset, or an array. Bottom line is I would like to have a "report library" that is not tied to any data structure and reference that mdb in other projects. I can do everything with the exception of providing the recordset for the report from an un-linked data structure.. Preferably in A2K but open to AXP Any ideas...? Thanks! Robert Gracie www.servicexp.com From bheygood at abestsystems.com Wed Jan 14 22:32:23 2004 From: bheygood at abestsystems.com (Bob Heygood) Date: Wed, 14 Jan 2004 20:32:23 -0800 Subject: [AccessD] Access n Front Page In-Reply-To: <008501c3d9f3$116248c0$6101a8c0@dejpolsys> Message-ID: Thanks William I will checkout these links. -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of William Hindman Sent: Tuesday, January 13, 2004 8:34 AM To: Access Developers discussion and problem solving Subject: Re: [AccessD] Access n Front Page Bob ...try http://www.outfront.net/spooky/index.htm ...and http://spiderwebwoman.com/resources/dbrwtipsandtricks.asp ...you might also want to join the FPlist-subscribe at yahoogroups.com which is very similar to AccessD and has a huge, searchable archive. William Hindman - Next Year In The Free State! ----- Original Message ----- From: "Bob Heygood" To: "Access Developers discussion and problem solving" Sent: Tuesday, January 13, 2004 11:07 AM Subject: [AccessD] Access n Front Page > Hey to the group, > > Hopefully this is not too far off. But so much here now has to do with the > web. > > I am looking for some info on editing a record in an Access db from a web > browser using Front Page. I have found enough on displaying records, but not > on editing existing data. I suspect asp or some such will be involved. > > best, > > bob > > > _______________________________________________ > 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 From bheygood at abestsystems.com Wed Jan 14 22:34:07 2004 From: bheygood at abestsystems.com (Bob Heygood) Date: Wed, 14 Jan 2004 20:34:07 -0800 Subject: [AccessD] Access n Front Page In-Reply-To: <2F8793082E00D4119A1700B0D0216BF802227731@main2.marlow.com> Message-ID: Thanks Drew More and more I think that whatever I can do without Front Page's help is best. -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of DWUTKA at marlow.com Sent: Tuesday, January 13, 2004 10:09 AM To: accessd at databaseadvisors.com Subject: RE: [AccessD] Access n Front Page This is down and dirty, but the following is a relatively simple .asp page, which displays an .mdb table in HTML format. You can then edit the values, and submit it, and it will change the values in the table. It requires that you have an ID field (the code is currently set to use field 0 as the ID). <% dim cnn dim rs dim i dim strSQL dim intCount if request.Form("Submit")="Submit" then set cnn=server.CreateObject("ADODB.Connection") set rs=server.CreateObject("ADODB.Recordset") cnn.Provider="Microsoft.Jet.OLEDB.4.0" cnn.Open "C:\Inetpub\domains\airs\Air2000_be.mdb" rs.Open "tblWebFields",cnn,1,3,512 intCount=rs.Fields.Count-1 rs.MoveFirst do until rs.EOF=True for i=1 to intCount rs.Fields(i).value=request.Form(rs.Fields(0).value & "-" & rs.Fields(i).Name) next rs.Update rs.MoveNext loop rs.Close set rs=nothing cnn.Close set cnn=nothing end if %> Dyncorp Field Settings
<% set cnn=server.CreateObject("ADODB.Connection") set rs=server.CreateObject("ADODB.Recordset") cnn.Provider="Microsoft.Jet.OLEDB.4.0" cnn.Open "C:\Inetpub\domains\airs\Air2000_be.mdb" rs.Open "tblWebFields",cnn,1,1,512 response.Write "" & vbcrlf intCount=rs.Fields.Count-1 for i=1 to intCount response.Write "" & vbcrlf next response.Write "" & vbcrlf rs.MoveFirst do until rs.EOF=True response.Write "" & vbcrlf for i=1 to intCount response.Write "" & vbcrlf next response.Write "" & vbcrlf rs.MoveNext loop rs.Close set rs=nothing cnn.Close set cnn=nothing %>
" & rs.Fields(i).Name & "
" & vbcrlf response.Write "
-----Original Message----- From: Bob Heygood [mailto:bheygood at abestsystems.com] Sent: Tuesday, January 13, 2004 10:08 AM To: Access Developers discussion and problem solving Subject: [AccessD] Access n Front Page Hey to the group, Hopefully this is not too far off. But so much here now has to do with the web. I am looking for some info on editing a record in an Access db from a web browser using Front Page. I have found enough on displaying records, but not on editing existing data. I suspect asp or some such will be involved. best, bob _______________________________________________ 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 From wdhindman at bellsouth.net Thu Jan 15 00:17:11 2004 From: wdhindman at bellsouth.net (William Hindman) Date: Thu, 15 Jan 2004 01:17:11 -0500 Subject: [AccessD] Access n Front Page References: Message-ID: <000801c3db2f$3673a400$6101a8c0@dejpolsys> ...actually Bob, FP2003 is quite capable of writing most of the asp for you if that's the way you choose to go ...its a big step up from previous versions and the code it writes, html or asp, is no longer the bloated excrement FP'98 used to produce. William Hindman - Next Year In The Free State! ----- Original Message ----- From: "Bob Heygood" To: "Access Developers discussion and problem solving" Sent: Wednesday, January 14, 2004 11:34 PM Subject: RE: [AccessD] Access n Front Page > Thanks Drew > More and more I think that whatever I can do without Front Page's help is > best. > > > > -----Original Message----- > From: accessd-bounces at databaseadvisors.com > [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of > DWUTKA at marlow.com > Sent: Tuesday, January 13, 2004 10:09 AM > To: accessd at databaseadvisors.com > Subject: RE: [AccessD] Access n Front Page > > > This is down and dirty, but the following is a relatively simple .asp page, > which displays an .mdb table in HTML format. You can then edit the values, > and submit it, and it will change the values in the table. It requires that > you have an ID field (the code is currently set to use field 0 as the ID). > > > <% > dim cnn > dim rs > dim i > dim strSQL > dim intCount > if request.Form("Submit")="Submit" then > set cnn=server.CreateObject("ADODB.Connection") > set rs=server.CreateObject("ADODB.Recordset") > cnn.Provider="Microsoft.Jet.OLEDB.4.0" > cnn.Open "C:\Inetpub\domains\airs\Air2000_be.mdb" > rs.Open "tblWebFields",cnn,1,3,512 > intCount=rs.Fields.Count-1 > rs.MoveFirst > do until rs.EOF=True > for i=1 to intCount > rs.Fields(i).value=request.Form(rs.Fields(0).value & > "-" & rs.Fields(i).Name) > next > rs.Update > rs.MoveNext > loop > rs.Close > set rs=nothing > cnn.Close > set cnn=nothing > end if > %> > > Dyncorp Field Settings > > >
> > > <% > set cnn=server.CreateObject("ADODB.Connection") > set rs=server.CreateObject("ADODB.Recordset") > cnn.Provider="Microsoft.Jet.OLEDB.4.0" > cnn.Open "C:\Inetpub\domains\airs\Air2000_be.mdb" > rs.Open "tblWebFields",cnn,1,1,512 > response.Write "" & vbcrlf > intCount=rs.Fields.Count-1 > for i=1 to intCount > response.Write "" & vbcrlf > next > response.Write "" & vbcrlf > rs.MoveFirst > do until rs.EOF=True > response.Write "" & vbcrlf > for i=1 to intCount > response.Write "" & vbcrlf > next > response.Write "" & vbcrlf > rs.MoveNext > loop > rs.Close > set rs=nothing > cnn.Close > set cnn=nothing > %> >
" & > rs.Fields(i).Name & "
" & > vbcrlf > response.Write " rs.Fields(0).Value & "-" & rs.Fields(i).Name & """ value=""" & > rs.Fields(i).Value & """>
> >
> > > -----Original Message----- > From: Bob Heygood [mailto:bheygood at abestsystems.com] > Sent: Tuesday, January 13, 2004 10:08 AM > To: Access Developers discussion and problem solving > Subject: [AccessD] Access n Front Page > > > Hey to the group, > > Hopefully this is not too far off. But so much here now has to do with the > web. > > I am looking for some info on editing a record in an Access db from a web > browser using Front Page. I have found enough on displaying records, but not > on editing existing data. I suspect asp or some such will be involved. > > best, > > bob > > > _______________________________________________ > 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 > > > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com > From gustav at cactus.dk Thu Jan 15 03:32:11 2004 From: gustav at cactus.dk (Gustav Brock) Date: Thu, 15 Jan 2004 10:32:11 +0100 Subject: [AccessD] Implements vs WithEvents In-Reply-To: References: Message-ID: <1426347957.20040115103211@cactus.dk> Hi Robert Yes, it's right to credit John for leaving obtuse mode and, again, taking the time to explain this important topic. I'm certainly not mastering DEEP myself but like John I received expert advice - even a demobase - from Shamil which helped me combining the big picture and the hand work (nuts and bolts) which add up to this great but well hidden feature of Access. /gustav > John, Thanks A Million, You have helped allot!! From JOHNWARDBELL at aol.com Thu Jan 15 05:19:39 2004 From: JOHNWARDBELL at aol.com (JOHNWARDBELL at aol.com) Date: Thu, 15 Jan 2004 06:19:39 EST Subject: [AccessD] Pivot Tables Book Message-ID: <119.2de061da.2d37d14b@aol.com> I am looking for a book on programming Pivot tables using vba. Has anyone got a recommendation? using A2k or later. TIA johnb From Kenneth.Stoker at pnl.gov Thu Jan 15 11:29:20 2004 From: Kenneth.Stoker at pnl.gov (Stoker, Kenneth E) Date: Thu, 15 Jan 2004 09:29:20 -0800 Subject: [AccessD] Message-ID: <249C1CB246997C48BB74963CCD361C1B07C944@pnlmse28.pnl.gov> I have a coworker who is getting the following error message when trying to output 17K+ records from a query to Excel. There are too many rows to output, based on the limitation specified by the output format or by Microsoft Access. Is there a setting that can be changed to increase the amount output? Is she hitting a limitation? Can anyone help here. Thanks. Ken Stoker Technology Commercialization Information Systems Administrator PH: (509) 375-3758 FAX: (509) 375-6731 E-mail: Kenneth.Stoker at pnl.gov From John.Clark at niagaracounty.com Thu Jan 15 11:46:51 2004 From: John.Clark at niagaracounty.com (John Clark) Date: Thu, 15 Jan 2004 12:46:51 -0500 Subject: [AccessD] MDW file Message-ID: This group has helped me so much over the past two years. My confidence has increased 1000%, which I attribute directly to my involvement with this list. Just yesterday, my boss made some crack about an external programmer that they have used...basically saying that if I get as good as him I could do what he does (he is currently taking a year off and traveling the country in an RV)...and for the first time, I stood up and said, "I am just as good, if not better, than [that guy]." Anyhow, now that I have explained how 'good' I have become, I was thrown a twist. Because this guy is out of town, he cannot respond to a call that they have regarding a program he wrote. It needs to be placed on the desktops, of another department. "No problem," I said, "I can handle it." But I notice in the shortcut that exists, in the original department, it uses an .MDW file in the target line (ms.mdw" "c:\program files\cms\cmssecure.mdb"). I just called to verify this line, because I thought that at least a "c was missing from the front...I don't get the one quote mark. I have never used workgroup features of Access, and I really don't plan to. What do I need to do to set this up? Thanks! John W Clark John W. Clark Computer Programmer / Asst. Network Administrator Niagara County Central Data Processing From jwcolby at colbyconsulting.com Thu Jan 15 11:49:57 2004 From: jwcolby at colbyconsulting.com (John W. Colby) Date: Thu, 15 Jan 2004 12:49:57 -0500 Subject: [AccessD] In-Reply-To: <249C1CB246997C48BB74963CCD361C1B07C944@pnlmse28.pnl.gov> Message-ID: Back it off to 16K and try again. It may be a limitation in Excel. John W. Colby www.ColbyConsulting.com -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Stoker, Kenneth E Sent: Thursday, January 15, 2004 12:29 PM To: AccessD at databaseadvisors.com Subject: [AccessD] I have a coworker who is getting the following error message when trying to output 17K+ records from a query to Excel. There are too many rows to output, based on the limitation specified by the output format or by Microsoft Access. Is there a setting that can be changed to increase the amount output? Is she hitting a limitation? Can anyone help here. Thanks. Ken Stoker Technology Commercialization Information Systems Administrator PH: (509) 375-3758 FAX: (509) 375-6731 E-mail: Kenneth.Stoker at pnl.gov _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From Lambert.Heenan at AIG.com Thu Jan 15 11:50:28 2004 From: Lambert.Heenan at AIG.com (Heenan, Lambert) Date: Thu, 15 Jan 2004 12:50:28 -0500 Subject: [AccessD] Message-ID: <8B98F8EA48F8BA47A2F24E0D0AF40CF407AD7CCF@xlivmbx12.aig.com> I assume that s/he is using TransferSpreadsheet to export to Excel as in... docmd.TransferSpreadsheet acExport ,etc. etc. The second parameter (the one after acExport) defaults to acSpreadsheetTypeExcel3 which cannot handle the 17k rows. If you choose acSpreadsheetTypeExcel97 or higher for this parameter it should work fine. Lambert > -----Original Message----- > From: Stoker, Kenneth E [SMTP:Kenneth.Stoker at pnl.gov] > Sent: Thursday, January 15, 2004 12:29 PM > To: AccessD at databaseadvisors.com > Subject: [AccessD] > > I have a coworker who is getting the following error message when trying > to output 17K+ records from a query to Excel. > > There are too many rows to output, based on the limitation > specified by the output format or by Microsoft Access. > > Is there a setting that can be changed to increase the amount output? > Is she hitting a limitation? Can anyone help here. > > Thanks. > > Ken Stoker > Technology Commercialization > Information Systems Administrator > PH: (509) 375-3758 > FAX: (509) 375-6731 > E-mail: Kenneth.Stoker at pnl.gov > > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com From jwcolby at colbyconsulting.com Thu Jan 15 12:06:12 2004 From: jwcolby at colbyconsulting.com (John W. Colby) Date: Thu, 15 Jan 2004 13:06:12 -0500 Subject: [AccessD] MDW file In-Reply-To: Message-ID: Do you find an ms.mdw anywhere? How about a CMS.mdw? AFAIK the name isn't critical, i.e. it can be anything. I can't explain the missing quote, other than maybe the parser doesn't need it and so it happens to work. John W. Colby www.ColbyConsulting.com -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of John Clark Sent: Thursday, January 15, 2004 12:47 PM To: accessd at databaseadvisors.com Subject: [AccessD] MDW file This group has helped me so much over the past two years. My confidence has increased 1000%, which I attribute directly to my involvement with this list. Just yesterday, my boss made some crack about an external programmer that they have used...basically saying that if I get as good as him I could do what he does (he is currently taking a year off and traveling the country in an RV)...and for the first time, I stood up and said, "I am just as good, if not better, than [that guy]." Anyhow, now that I have explained how 'good' I have become, I was thrown a twist. Because this guy is out of town, he cannot respond to a call that they have regarding a program he wrote. It needs to be placed on the desktops, of another department. "No problem," I said, "I can handle it." But I notice in the shortcut that exists, in the original department, it uses an .MDW file in the target line (ms.mdw" "c:\program files\cms\cmssecure.mdb"). I just called to verify this line, because I thought that at least a "c was missing from the front...I don't get the one quote mark. I have never used workgroup features of Access, and I really don't plan to. What do I need to do to set this up? Thanks! John W Clark John W. Clark Computer Programmer / Asst. Network Administrator Niagara County Central Data Processing _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From jwcolby at colbyconsulting.com Thu Jan 15 12:07:54 2004 From: jwcolby at colbyconsulting.com (John W. Colby) Date: Thu, 15 Jan 2004 13:07:54 -0500 Subject: [AccessD] Implements vs WithEvents In-Reply-To: <1426347957.20040115103211@cactus.dk> Message-ID: Gustav, Obtuse? Me? You must be talking about some other John? ;-) John W. Colby www.ColbyConsulting.com -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Gustav Brock Sent: Thursday, January 15, 2004 4:32 AM To: Access Developers discussion and problem solving Subject: Re: [AccessD] Implements vs WithEvents Hi Robert Yes, it's right to credit John for leaving obtuse mode and, again, taking the time to explain this important topic. I'm certainly not mastering DEEP myself but like John I received expert advice - even a demobase - from Shamil which helped me combining the big picture and the hand work (nuts and bolts) which add up to this great but well hidden feature of Access. /gustav > John, Thanks A Million, You have helped allot!! _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From KIsmert at TexasSystems.com Thu Jan 15 12:13:00 2004 From: KIsmert at TexasSystems.com (Ken Ismert) Date: Thu, 15 Jan 2004 12:13:00 -0600 Subject: [AccessD] Implements vs WithEvents In-Reply-To: Message-ID: <002c01c3db93$36704a30$2a3ca8c0@TEXASSYSTEMS.COM> Well, I couldn't resist putting in my own (tardy) views on Implements in VBA: An interface is a communication protocol - a set of signatures denoting the public properties and methods of a class. Every class has its default interface, which is just its own properties and methods. In A2K and later, you can have a class support any published interface available to it. For example, IDTExtensibility2 is a published interface that allows you to write Office COM Add-ins. Part of writing an Add-in is implementing this interface. You can also design and implement your own custom interfaces. An interface is simply a class module with the desired properties and methods defined - but no code or variables. I prefix interfaces with an I, like ITreeClient, and use C for standard classes, like CTree. Implementing an interface COM-enables your class. While that doesn't make much practical difference in VBA, interfaces are the foundation of COM programming. Interfaces differ from contracts in that a contract guarantees a certain result for a given set of inputs. The interface simply guarantees that a certain set of properties and methods are present - but says nothing about results. While Implements has little to do with inheritance, it has lots to do with polymorphism. The most common use of Implements in VBA is to define a custom interface that is shared across many objects. So, every Dog class can implement IObedience, and thus accept the commands Sit, Rollover and Fetch. Note that the interface doesn't guarantee that the individual classes will do anything useful or correct with the commands (much like real dogs). No functionality is inherited. For that, as has been pointed out, you will have to go to VB.Net. It is also worth noting that most of what you can do with interfaces you can also do with late binding. For instance, the Dog classes could each have the methods Sit, Rollover and Fetch defined in their default interfaces. You would use them like this: Dim rDog as Object Set rDog = New CPoodle ' or CHusky, etc rDog.Fetch ' late bound With a custom interface, the same code would be: Dim rDog as IObedience Set rDog = New CPoodle rDog.Fetch There are at least three advantages to the interface approach: 1. Early binding - can be significantly more efficient 2. Compile-time checking - protects against incomplete/incorrect interface implementations 3. Early trapping of runtime errors - if an object doesn't implement IObedience, say CSiamese, you will know immediately on the Set command - you'll get a Type Mismatch error. You can also query an object to see if it supports a particular interface: If TypeOf rObj Is IObedience Then Set rDog = rObj ' do dog things As for interfaces and events, the advantages of each are a little more subtle. Events are broadcast, so every object subscribing to an event using WithEvents will get the message. A problem can arise when you are managing a group of objects, and want to send a message to only one of them. Using events, every object in the group would have to ask 'Is this for me?' when they received the event. This can get cumbersome, especially if there is a lot of communication going on. Interfaces allow you to define your own custom callback scheme. You can then select an object out of a group, and send a message only to it. This is more efficient and reliable than the broadcast method. I use this, among other things, to control interactions between forms. Form class modules support Implements beautifully. So, when defining your object communication scheme, interfaces give you more options. If everybody needs the message, an event would be a good choice. If only a few members out of the group need it, perhaps an interface-based callback would be better. Another limitation to be aware of: you can't define useable shared events in a VB custom interface. I have found interfaces to be quite handy in situations where I want many objects to behave the same way, or when I want to control specific objects in a group, rather than talk to all of them. While they are not ideal, interfaces are still a useful and powerful concept in their present form. Thinking in terms of interfaces helps me introduce rigor into my object structures. In closing, I'd like to credit the authors of Effective Visual Basic, by DevelopMentor, for their excellent introduction to interfaces. -Ken From donald.a.Mcgillivray at mail.sprint.com Thu Jan 15 12:15:24 2004 From: donald.a.Mcgillivray at mail.sprint.com (Mcgillivray, Donald [ITS]) Date: Thu, 15 Jan 2004 12:15:24 -0600 Subject: [AccessD] MDW file Message-ID: <6FC1C7A6E7BD5540AB0A8436713C43BF065C5FCA@PKDWB01C.ad.sprint.com> John, Is it possible that you're seeing only part (the last part) of the command line in the shortcut? The syntax for passing the workgroup on the command line is: Path to msaccess.exe, followed by path and filename of target mdb, followed by the workgroup switch (/wrkgrp), followed by the path and filename of target mdw. For example: "c:\program files\msoffice\office\msaccess.exe" "c:\MyDatabases\target.mdb" /wrkgrp "c:\MyDatabases\target.mdw" Note that quotes around the segments are only critical if there are spaces in the strings (doesn't hurt to include them, though), and that the positions of the path to the mdb and the workgroup segment are interchangeable. Thus, if the other programmer had put the workgroup segment before the mdb segment, you might be seeing just the tail end of the one followed by the entirety of the other. Hope this helps. Don McGillivray -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of John Clark Sent: Thursday, January 15, 2004 9:47 AM To: accessd at databaseadvisors.com Subject: [AccessD] MDW file This group has helped me so much over the past two years. My confidence has increased 1000%, which I attribute directly to my involvement with this list. Just yesterday, my boss made some crack about an external programmer that they have used...basically saying that if I get as good as him I could do what he does (he is currently taking a year off and traveling the country in an RV)...and for the first time, I stood up and said, "I am just as good, if not better, than [that guy]." Anyhow, now that I have explained how 'good' I have become, I was thrown a twist. Because this guy is out of town, he cannot respond to a call that they have regarding a program he wrote. It needs to be placed on the desktops, of another department. "No problem," I said, "I can handle it." But I notice in the shortcut that exists, in the original department, it uses an .MDW file in the target line (ms.mdw" "c:\program files\cms\cmssecure.mdb"). I just called to verify this line, because I thought that at least a "c was missing from the front...I don't get the one quote mark. I have never used workgroup features of Access, and I really don't plan to. What do I need to do to set this up? Thanks! John W Clark John W. Clark Computer Programmer / Asst. Network Administrator Niagara County Central Data Processing _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From jwcolby at colbyconsulting.com Thu Jan 15 12:53:39 2004 From: jwcolby at colbyconsulting.com (John W. Colby) Date: Thu, 15 Jan 2004 13:53:39 -0500 Subject: [AccessD] Implements vs WithEvents In-Reply-To: <002c01c3db93$36704a30$2a3ca8c0@TEXASSYSTEMS.COM> Message-ID: Ken, Thanks for that. As I said, I don't use Implements, never having found a use for them. I therefore don't really understand the ins and outs as I do withevents. Indeed, having been focusing so long on Access which does not have inheritance I have pretty much lost my ability to speak intelligently about the subject although I am getting back into it with VB.NET. I guess back when I used this stuff (early 90s with Object Pascal and C from Borland), interfaces weren't really used much? I studied, used and became comfortable with inheritance and miss it sorely in Access / VBA. Coming from a background where you do indeed inherit EVERYTHING from the parent class I guess I failed to see enough use for Implements to take a close look. One thing you say intrigues me though. You mention Implements allowing a custom callback scheme and sending messages. How does this work? How does the callback communicate between class instances? I wrote a messaging class using Withevents and RaiseEvents. Set up one or more global instance(s) of the class and off you go. The class has a method that accepts a message and raises an event passing the message on to any listeners. Thus I can instantiate the class for a specific purpose, only the classes that care to listen do so, although of course if there are 1000 instances of that class then they all listen and must, as you say, decide whether the message is for them. In the case of forms however, I can set up a private message channel between any two or more forms. The message class also can broadcast a "from/to/subject/message" so that any listeners can just check the to:. In fact that is exactly how I use it between forms, I just include the form name that is the intended recipient and all forms check the to: for their own name and accept the message if they need to. How is this stuff done with Implements? And BTW, a little less OBTUSE if you would. ;-) John W. Colby www.ColbyConsulting.com -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Ken Ismert Sent: Thursday, January 15, 2004 1:13 PM To: 'Access Developers discussion and problem solving' Subject: RE: [AccessD] Implements vs WithEvents Well, I couldn't resist putting in my own (tardy) views on Implements in VBA: An interface is a communication protocol - a set of signatures denoting the public properties and methods of a class. Every class has its default interface, which is just its own properties and methods. In A2K and later, you can have a class support any published interface available to it. For example, IDTExtensibility2 is a published interface that allows you to write Office COM Add-ins. Part of writing an Add-in is implementing this interface. You can also design and implement your own custom interfaces. An interface is simply a class module with the desired properties and methods defined - but no code or variables. I prefix interfaces with an I, like ITreeClient, and use C for standard classes, like CTree. Implementing an interface COM-enables your class. While that doesn't make much practical difference in VBA, interfaces are the foundation of COM programming. Interfaces differ from contracts in that a contract guarantees a certain result for a given set of inputs. The interface simply guarantees that a certain set of properties and methods are present - but says nothing about results. While Implements has little to do with inheritance, it has lots to do with polymorphism. The most common use of Implements in VBA is to define a custom interface that is shared across many objects. So, every Dog class can implement IObedience, and thus accept the commands Sit, Rollover and Fetch. Note that the interface doesn't guarantee that the individual classes will do anything useful or correct with the commands (much like real dogs). No functionality is inherited. For that, as has been pointed out, you will have to go to VB.Net. It is also worth noting that most of what you can do with interfaces you can also do with late binding. For instance, the Dog classes could each have the methods Sit, Rollover and Fetch defined in their default interfaces. You would use them like this: Dim rDog as Object Set rDog = New CPoodle ' or CHusky, etc rDog.Fetch ' late bound With a custom interface, the same code would be: Dim rDog as IObedience Set rDog = New CPoodle rDog.Fetch There are at least three advantages to the interface approach: 1. Early binding - can be significantly more efficient 2. Compile-time checking - protects against incomplete/incorrect interface implementations 3. Early trapping of runtime errors - if an object doesn't implement IObedience, say CSiamese, you will know immediately on the Set command - you'll get a Type Mismatch error. You can also query an object to see if it supports a particular interface: If TypeOf rObj Is IObedience Then Set rDog = rObj ' do dog things As for interfaces and events, the advantages of each are a little more subtle. Events are broadcast, so every object subscribing to an event using WithEvents will get the message. A problem can arise when you are managing a group of objects, and want to send a message to only one of them. Using events, every object in the group would have to ask 'Is this for me?' when they received the event. This can get cumbersome, especially if there is a lot of communication going on. Interfaces allow you to define your own custom callback scheme. You can then select an object out of a group, and send a message only to it. This is more efficient and reliable than the broadcast method. I use this, among other things, to control interactions between forms. Form class modules support Implements beautifully. So, when defining your object communication scheme, interfaces give you more options. If everybody needs the message, an event would be a good choice. If only a few members out of the group need it, perhaps an interface-based callback would be better. Another limitation to be aware of: you can't define useable shared events in a VB custom interface. I have found interfaces to be quite handy in situations where I want many objects to behave the same way, or when I want to control specific objects in a group, rather than talk to all of them. While they are not ideal, interfaces are still a useful and powerful concept in their present form. Thinking in terms of interfaces helps me introduce rigor into my object structures. In closing, I'd like to credit the authors of Effective Visual Basic, by DevelopMentor, for their excellent introduction to interfaces. -Ken _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From jwcolby at colbyconsulting.com Thu Jan 15 12:59:44 2004 From: jwcolby at colbyconsulting.com (John W. Colby) Date: Thu, 15 Jan 2004 13:59:44 -0500 Subject: [AccessD] Access shuts down Message-ID: Folks, A client is having an Access app just shut down, no GPF, no "by your leave", just gone. I am wondering if it is because I am doing work on it here at my house where I have Office 2K and Office XP both on the same machine. I installed the "widget" (update) that MS designed to supposedly allow the two to co-exist but I still have my doubts. Has anyone seen this? John W. Colby www.ColbyConsulting.com From John.Clark at niagaracounty.com Thu Jan 15 13:21:04 2004 From: John.Clark at niagaracounty.com (John Clark) Date: Thu, 15 Jan 2004 14:21:04 -0500 Subject: [AccessD] MDW file Message-ID: Yes, I do find a CMS.mdw, in the data directory (i.e. where those program files are). I opened it at one time and seen a couple of tables with some user info, but now I cannot get into those again either. Its bad enough that they had someone in doing my job, but the dude could at least work with me and conform to 'our' system. Thanks John W Clark >>> jwcolby at colbyconsulting.com 01/15/04 01:06PM >>> Do you find an ms.mdw anywhere? How about a CMS.mdw? AFAIK the name isn't critical, i.e. it can be anything. I can't explain the missing quote, other than maybe the parser doesn't need it and so it happens to work. John W. Colby www.ColbyConsulting.com -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of John Clark Sent: Thursday, January 15, 2004 12:47 PM To: accessd at databaseadvisors.com Subject: [AccessD] MDW file This group has helped me so much over the past two years. My confidence has increased 1000%, which I attribute directly to my involvement with this list. Just yesterday, my boss made some crack about an external programmer that they have used...basically saying that if I get as good as him I could do what he does (he is currently taking a year off and traveling the country in an RV)...and for the first time, I stood up and said, "I am just as good, if not better, than [that guy]." Anyhow, now that I have explained how 'good' I have become, I was thrown a twist. Because this guy is out of town, he cannot respond to a call that they have regarding a program he wrote. It needs to be placed on the desktops, of another department. "No problem," I said, "I can handle it." But I notice in the shortcut that exists, in the original department, it uses an .MDW file in the target line (ms.mdw" "c:\program files\cms\cmssecure.mdb"). I just called to verify this line, because I thought that at least a "c was missing from the front...I don't get the one quote mark. I have never used workgroup features of Access, and I really don't plan to. What do I need to do to set this up? Thanks! John W Clark John W. Clark Computer Programmer / Asst. Network Administrator Niagara County Central Data Processing _______________________________________________ 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 From Erwin.Craps at ithelps.be Thu Jan 15 13:31:23 2004 From: Erwin.Craps at ithelps.be (Erwin Craps - IT Helps) Date: Thu, 15 Jan 2004 20:31:23 +0100 Subject: [AccessD] Access shuts down Message-ID: <46B976F2B698FF46A4FE7636509B22DF03D11B@stekelbes.ithelps.local> It is posible with the Access Runtime maybe alsowith the MDE in full access (but I'm not sure about the MDE in full access). What concerns the Access runtime I'm sure that if you have an error in a function/module with no error trapping, the runtime just terminates the program without any message. Erwin -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of John W. Colby Sent: Thursday, January 15, 2004 8:00 PM To: AccessD Subject: [AccessD] Access shuts down Folks, A client is having an Access app just shut down, no GPF, no "by your leave", just gone. I am wondering if it is because I am doing work on it here at my house where I have Office 2K and Office XP both on the same machine. I installed the "widget" (update) that MS designed to supposedly allow the two to co-exist but I still have my doubts. Has anyone seen this? John W. Colby www.ColbyConsulting.com _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From DWUTKA at marlow.com Thu Jan 15 13:37:31 2004 From: DWUTKA at marlow.com (DWUTKA at marlow.com) Date: Thu, 15 Jan 2004 13:37:31 -0600 Subject: [AccessD] Access n Front Page Message-ID: <2F8793082E00D4119A1700B0D0216BF802227744@main2.marlow.com> FP is a good tool. I used it to become familiar with HTML. I let it write the HTML, then I would take a look at what it did. From time to time I still use FP to make quick formatting changes. However, FP XP comes with Microsoft Scripting Editor 9. (I know FP 2000 had an older version, which was nice, but 9 is WAY cool). That MSE will auto complete, and auto tag stuff as you are righting raw HTML. It is extremely handy to create web pages with it. Plus, it acts almost exactly like VB, when it comes to writing code (VBScript or ASP). Drew -----Original Message----- From: Bob Heygood [mailto:bheygood at abestsystems.com] Sent: Wednesday, January 14, 2004 10:34 PM To: Access Developers discussion and problem solving Subject: RE: [AccessD] Access n Front Page Thanks Drew More and more I think that whatever I can do without Front Page's help is best. -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of DWUTKA at marlow.com Sent: Tuesday, January 13, 2004 10:09 AM To: accessd at databaseadvisors.com Subject: RE: [AccessD] Access n Front Page This is down and dirty, but the following is a relatively simple .asp page, which displays an .mdb table in HTML format. You can then edit the values, and submit it, and it will change the values in the table. It requires that you have an ID field (the code is currently set to use field 0 as the ID). <% dim cnn dim rs dim i dim strSQL dim intCount if request.Form("Submit")="Submit" then set cnn=server.CreateObject("ADODB.Connection") set rs=server.CreateObject("ADODB.Recordset") cnn.Provider="Microsoft.Jet.OLEDB.4.0" cnn.Open "C:\Inetpub\domains\airs\Air2000_be.mdb" rs.Open "tblWebFields",cnn,1,3,512 intCount=rs.Fields.Count-1 rs.MoveFirst do until rs.EOF=True for i=1 to intCount rs.Fields(i).value=request.Form(rs.Fields(0).value & "-" & rs.Fields(i).Name) next rs.Update rs.MoveNext loop rs.Close set rs=nothing cnn.Close set cnn=nothing end if %> Dyncorp Field Settings
<% set cnn=server.CreateObject("ADODB.Connection") set rs=server.CreateObject("ADODB.Recordset") cnn.Provider="Microsoft.Jet.OLEDB.4.0" cnn.Open "C:\Inetpub\domains\airs\Air2000_be.mdb" rs.Open "tblWebFields",cnn,1,1,512 response.Write "" & vbcrlf intCount=rs.Fields.Count-1 for i=1 to intCount response.Write "" & vbcrlf next response.Write "" & vbcrlf rs.MoveFirst do until rs.EOF=True response.Write "" & vbcrlf for i=1 to intCount response.Write "" & vbcrlf next response.Write "" & vbcrlf rs.MoveNext loop rs.Close set rs=nothing cnn.Close set cnn=nothing %>
" & rs.Fields(i).Name & "
" & vbcrlf response.Write "
-----Original Message----- From: Bob Heygood [mailto:bheygood at abestsystems.com] Sent: Tuesday, January 13, 2004 10:08 AM To: Access Developers discussion and problem solving Subject: [AccessD] Access n Front Page Hey to the group, Hopefully this is not too far off. But so much here now has to do with the web. I am looking for some info on editing a record in an Access db from a web browser using Front Page. I have found enough on displaying records, but not on editing existing data. I suspect asp or some such will be involved. best, bob _______________________________________________ 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 _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From DWUTKA at marlow.com Thu Jan 15 13:38:49 2004 From: DWUTKA at marlow.com (DWUTKA at marlow.com) Date: Thu, 15 Jan 2004 13:38:49 -0600 Subject: [AccessD] Message-ID: <2F8793082E00D4119A1700B0D0216BF802227745@main2.marlow.com> That is a limitation of excel. It can only handle 16k 'records'. Drew -----Original Message----- From: Stoker, Kenneth E [mailto:Kenneth.Stoker at pnl.gov] Sent: Thursday, January 15, 2004 11:29 AM To: AccessD at databaseadvisors.com Subject: [AccessD] I have a coworker who is getting the following error message when trying to output 17K+ records from a query to Excel. There are too many rows to output, based on the limitation specified by the output format or by Microsoft Access. Is there a setting that can be changed to increase the amount output? Is she hitting a limitation? Can anyone help here. Thanks. Ken Stoker Technology Commercialization Information Systems Administrator PH: (509) 375-3758 FAX: (509) 375-6731 E-mail: Kenneth.Stoker at pnl.gov _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From Jim.Hale at FleetPride.com Thu Jan 15 13:33:00 2004 From: Jim.Hale at FleetPride.com (Hale, Jim) Date: Thu, 15 Jan 2004 13:33:00 -0600 Subject: [AccessD] Message-ID: <6A6AA9DF57E4F046BDA1E273BDDB677201A9FC@corp-es01.fleetpride.com> Using the Excel export icon on the toolbar limits the output to approx 16k records, a limitation that goes back (as best as I can remember) to Excel 5. Use file export and select Excel 2000 to export up to the max of 63k records. HTH Jim Hale -----Original Message----- From: Stoker, Kenneth E [mailto:Kenneth.Stoker at pnl.gov] Sent: Thursday, January 15, 2004 11:29 AM To: AccessD at databaseadvisors.com Subject: [AccessD] I have a coworker who is getting the following error message when trying to output 17K+ records from a query to Excel. There are too many rows to output, based on the limitation specified by the output format or by Microsoft Access. Is there a setting that can be changed to increase the amount output? Is she hitting a limitation? Can anyone help here. Thanks. Ken Stoker Technology Commercialization Information Systems Administrator PH: (509) 375-3758 FAX: (509) 375-6731 E-mail: Kenneth.Stoker at pnl.gov _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From Kenneth.Stoker at pnl.gov Thu Jan 15 13:38:45 2004 From: Kenneth.Stoker at pnl.gov (Stoker, Kenneth E) Date: Thu, 15 Jan 2004 11:38:45 -0800 Subject: [AccessD] Problem Exporting Query Data to Excel. Message-ID: <249C1CB246997C48BB74963CCD361C1B07C946@pnlmse28.pnl.gov> Actually, no, she is not a programmer, just trying to create her own queries and then export them to Excel using Tools --> Office Links --> Analyze in Microsoft Excel. Using this option worked at 16K records (showed her how to use the TOP keyword for this), but failed on 17K+ records. That wasn't acceptable, so we tried to just copy the results from the query into the clipboard and then paste the clipboard contents into the Excel spreadsheet. Surprise, we got almost 31K records into the spreadsheet with this approach, which is what her query returned when all the criteria was removed. She said that she will try to remember if it is over 16K records, to follow the last option above. Ken Stoker Technology Commercialization Information Systems Administrator PH: (509) 375-3758 FAX: (509) 375-6731 E-mail: Kenneth.Stoker at pnl.gov -----Original Message----- From: Heenan, Lambert [mailto:Lambert.Heenan at AIG.com] Sent: Thursday, January 15, 2004 9:50 AM To: 'Access Developers discussion and problem solving' Subject: RE: [AccessD] I assume that s/he is using TransferSpreadsheet to export to Excel as in... docmd.TransferSpreadsheet acExport ,etc. etc. The second parameter (the one after acExport) defaults to acSpreadsheetTypeExcel3 which cannot handle the 17k rows. If you choose acSpreadsheetTypeExcel97 or higher for this parameter it should work fine. Lambert > -----Original Message----- > From: Stoker, Kenneth E [SMTP:Kenneth.Stoker at pnl.gov] > Sent: Thursday, January 15, 2004 12:29 PM > To: AccessD at databaseadvisors.com > Subject: [AccessD] > > I have a coworker who is getting the following error message when > trying to output 17K+ records from a query to Excel. > > There are too many rows to output, based on the limitation specified > by the output format or by Microsoft Access. > > Is there a setting that can be changed to increase the amount output? > Is she hitting a limitation? Can anyone help here. > > Thanks. > > Ken Stoker > Technology Commercialization > Information Systems Administrator > PH: (509) 375-3758 > FAX: (509) 375-6731 > E-mail: Kenneth.Stoker at pnl.gov > > _______________________________________________ > 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 From Oleg_123 at xuppa.com Thu Jan 15 13:44:57 2004 From: Oleg_123 at xuppa.com (Oleg_123 at xuppa.com) Date: Thu, 15 Jan 2004 14:44:57 -0500 (EST) Subject: [AccessD] Saving as *.rpt In-Reply-To: <000f01c3dad5$11586200$87c9040a@direcway.com> References: <000f01c3dad5$11586200$87c9040a@direcway.com> Message-ID: <59767.12.3.132.98.1074195897.squirrel@heck.bay9.com> Good afternoon group, How do I save a file as *.rpt ? should I reference CR somehow ? I am in 97 (can reference CR export, and viewr control) I have no problem saving as *.xls using the same code Oleg Function file_rename() Dim objE As excel.Application Dim sDate As String Dim sEmail As String Dim sTMail As String Set fs = New FileSystemObject If WeekDay(Now()) = vbMonday Then sDate = Format(Now() - 2, "mmddyyyy") Else sDate = Format(Now(), "mmddyyyy") End If Set objE = CreateObject("Excel.Application") With objE .Visible = False .Application.Workbooks.Open empfileloc & org_filename .Application.ActiveWorkbook.SaveAs filename:=empfileloc & new_filename & sDate & ".rpt", _ ReadOnlyRecommended:=False, AccessMode:=xlNoChange .Application.ActiveWorkbook.Close End With objE.Quit End Function ----------------------------------------- Get Breaking News from CNN, ABC, NBC, CBS Now. http://www.xuppa.com/news/?link=webmail From Mike.W.Gowey at doc.state.or.us Thu Jan 15 13:53:24 2004 From: Mike.W.Gowey at doc.state.or.us (Gowey Mike W) Date: Thu, 15 Jan 2004 12:53:24 -0700 Subject: [AccessD] Access Support in 2006 Message-ID: <05EBB8A3BEB95B4F8216BE4EF486077801D9FF01@srciml1.ds.doc.state.or.us> Just a fast question to everyone. I have been told that there is a rumor that Microsoft is not going to support Access anymore come 2006. Has anyone else heard anything else about this and if true what they plan on replacing it with????? I hope this don't cause too much of a string, I was just surprised and caught off guard. Thanks, Mike Gowey, MCSA, A+ Team Leader - SRCI Information Systems & Services Division From mwp.reid at qub.ac.uk Thu Jan 15 14:01:12 2004 From: mwp.reid at qub.ac.uk (Martin Reid) Date: Thu, 15 Jan 2004 20:01:12 -0000 Subject: [AccessD] Access Support in 2006 References: <05EBB8A3BEB95B4F8216BE4EF486077801D9FF01@srciml1.ds.doc.state.or.us> Message-ID: <000b01c3dba2$552d1a70$740c6351@martin1> Far as I know they are currently working on Version 12 Martin ----- Original Message ----- From: "Gowey Mike W" To: "Access Developers discussion and problem solving" Sent: Thursday, January 15, 2004 7:53 PM Subject: [AccessD] Access Support in 2006 > > > Just a fast question to everyone. I have been told that there is a > rumor that Microsoft is not going to support Access anymore come 2006. > > Has anyone else heard anything else about this and if true what they > plan on replacing it with????? > > I hope this don't cause too much of a string, I was just surprised and > caught off guard. > > > Thanks, > > Mike Gowey, MCSA, A+ > Team Leader - SRCI > Information Systems & Services Division > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com > From Erwin.Craps at ithelps.be Thu Jan 15 14:03:14 2004 From: Erwin.Craps at ithelps.be (Erwin Craps - IT Helps) Date: Thu, 15 Jan 2004 21:03:14 +0100 Subject: [AccessD] Access Support in 2006 Message-ID: <46B976F2B698FF46A4FE7636509B22DF03D11D@stekelbes.ithelps.local> Not at my knownledge... But I'm pretty sure (based on personal experiance and signs) they gonna drop the JET Engine one of these years. 2006 would be a logical time... They have been and stil are pushing SQL server and MDSE so much this is very clear to me. But Access will always be there, maybe in another format.... Erwin -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Gowey Mike W Sent: Thursday, January 15, 2004 8:53 PM To: Access Developers discussion and problem solving Subject: [AccessD] Access Support in 2006 Just a fast question to everyone. I have been told that there is a rumor that Microsoft is not going to support Access anymore come 2006. Has anyone else heard anything else about this and if true what they plan on replacing it with????? I hope this don't cause too much of a string, I was just surprised and caught off guard. Thanks, Mike Gowey, MCSA, A+ Team Leader - SRCI Information Systems & Services Division _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From michael.mattys at adelphia.net Thu Jan 15 14:03:48 2004 From: michael.mattys at adelphia.net (Michael R Mattys) Date: Thu, 15 Jan 2004 15:03:48 -0500 Subject: [AccessD] Access Support in 2006 References: <05EBB8A3BEB95B4F8216BE4EF486077801D9FF01@srciml1.ds.doc.state.or.us> Message-ID: <02c401c3dba2$b135e4f0$6401a8c0@default> I've never asked Microsoft for support anyway :) Michael R. Mattys Try MattysMapLib for MapPoint at www.mattysconsulting.com ----- Original Message ----- From: "Gowey Mike W" To: "Access Developers discussion and problem solving" Sent: Thursday, January 15, 2004 2:53 PM Subject: [AccessD] Access Support in 2006 > > > Just a fast question to everyone. I have been told that there is a > rumor that Microsoft is not going to support Access anymore come 2006. > > Has anyone else heard anything else about this and if true what they > plan on replacing it with????? > > I hope this don't cause too much of a string, I was just surprised and > caught off guard. > > > Thanks, > > Mike Gowey, MCSA, A+ > Team Leader - SRCI > Information Systems & Services Division > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com From Oleg_123 at xuppa.com Thu Jan 15 14:08:30 2004 From: Oleg_123 at xuppa.com (Oleg_123 at xuppa.com) Date: Thu, 15 Jan 2004 15:08:30 -0500 (EST) Subject: [AccessD] Access Support in 2006 In-Reply-To: <02c401c3dba2$b135e4f0$6401a8c0@default> References: <05EBB8A3BEB95B4F8216BE4EF486077801D9FF01@srciml1.ds.doc.state.or.us> <02c401c3dba2$b135e4f0$6401a8c0@default> Message-ID: <10011.12.3.132.98.1074197310.squirrel@heck.bay9.com> lol, same here > I've never asked Microsoft for support anyway :) > > Michael R. Mattys > Try MattysMapLib for MapPoint at > www.mattysconsulting.com > > > > ----- Original Message ----- > From: "Gowey Mike W" > To: "Access Developers discussion and problem solving" > > Sent: Thursday, January 15, 2004 2:53 PM > Subject: [AccessD] Access Support in 2006 > > >> >> >> Just a fast question to everyone. I have been told that there is a >> rumor that Microsoft is not going to support Access anymore come 2006. >> >> Has anyone else heard anything else about this and if true what they >> plan on replacing it with????? >> >> I hope this don't cause too much of a string, I was just surprised and >> caught off guard. >> >> >> Thanks, >> >> Mike Gowey, MCSA, A+ >> Team Leader - SRCI >> Information Systems & Services Division >> _______________________________________________ >> 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 ----------------------------------------- Get Breaking News from CNN, ABC, NBC, CBS Now. http://www.xuppa.com/news/?link=webmail From cfoust at infostatsystems.com Thu Jan 15 14:10:41 2004 From: cfoust at infostatsystems.com (Charlotte Foust) Date: Thu, 15 Jan 2004 12:10:41 -0800 Subject: [AccessD] Access shuts down Message-ID: I've seen in in both 2000 and XP. I've always been able to track it down to either corruption or some code that Access objected to. Charlotte Foust -----Original Message----- From: John W. Colby [mailto:jwcolby at colbyconsulting.com] Sent: Thursday, January 15, 2004 11:00 AM To: AccessD Subject: [AccessD] Access shuts down Folks, A client is having an Access app just shut down, no GPF, no "by your leave", just gone. I am wondering if it is because I am doing work on it here at my house where I have Office 2K and Office XP both on the same machine. I installed the "widget" (update) that MS designed to supposedly allow the two to co-exist but I still have my doubts. Has anyone seen this? John W. Colby www.ColbyConsulting.com _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From cfoust at infostatsystems.com Thu Jan 15 14:13:09 2004 From: cfoust at infostatsystems.com (Charlotte Foust) Date: Thu, 15 Jan 2004 12:13:09 -0800 Subject: [AccessD] Access Support in 2006 Message-ID: LOL. At least not without your credit card at hand! Charlotte Foust -----Original Message----- From: Michael R Mattys [mailto:michael.mattys at adelphia.net] Sent: Thursday, January 15, 2004 12:04 PM To: Access Developers discussion and problem solving Subject: Re: [AccessD] Access Support in 2006 I've never asked Microsoft for support anyway :) Michael R. Mattys Try MattysMapLib for MapPoint at www.mattysconsulting.com ----- Original Message ----- From: "Gowey Mike W" To: "Access Developers discussion and problem solving" Sent: Thursday, January 15, 2004 2:53 PM Subject: [AccessD] Access Support in 2006 > > > Just a fast question to everyone. I have been told that there is a > rumor that Microsoft is not going to support Access anymore come 2006. > > Has anyone else heard anything else about this and if true what they > plan on replacing it with????? > > I hope this don't cause too much of a string, I was just surprised and > caught off guard. > > > Thanks, > > Mike Gowey, MCSA, A+ > Team Leader - SRCI > Information Systems & Services Division > _______________________________________________ > 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 From Oleg_123 at xuppa.com Thu Jan 15 14:15:10 2004 From: Oleg_123 at xuppa.com (Oleg_123 at xuppa.com) Date: Thu, 15 Jan 2004 15:15:10 -0500 (EST) Subject: [AccessD] (OT) saving as *cvs with " " In-Reply-To: <46B976F2B698FF46A4FE7636509B22DF03D11D@stekelbes.ithelps.local> References: <46B976F2B698FF46A4FE7636509B22DF03D11D@stekelbes.ithelps.local> Message-ID: <59925.12.3.132.98.1074197710.squirrel@heck.bay9.com> Hey Group i have to save this data (right now I have it in a spreadsheet) 01003, 011-11-1123, Doe, Jane, A as .txt file so it would like 01003, 011-11-1123, "Doe", "Jane", A and they specifically want quotes around first and last name, and ONLY there. when I create *.csv file from Excel I got no quotations (I tried specifically making those 2 fields as "text" and the others as "general" and even "numbers", but no result) When I do it through though Acess I get all in quotations, and over there I can't play with data types. I tried adding colums with " at the beginning and end of mane fields, but ehen I converted that to *.csv I got tripe quotes on names, and no quotes elsewhere... Any suggestions ? ----------------------------------------- Get Breaking News from CNN, ABC, NBC, CBS Now. http://www.xuppa.com/news/?link=webmail From John.Clark at niagaracounty.com Thu Jan 15 14:18:37 2004 From: John.Clark at niagaracounty.com (John Clark) Date: Thu, 15 Jan 2004 15:18:37 -0500 Subject: [AccessD] MDW file Message-ID: When I comes to my users, I will not claim that anything is 'impossible.' However, I did call out to the department where it is installed and walked a user through the process of getting to the properties window and had her tell me exactly what it said. I even questioned that there was the single quote mark. This was actually one of my better users too. I should have gone to their office, but it is across town...not really that far, but it is bitter cold her today and there is quite a bit of snow too (I know...wahhhhhh!) I just recreated the shortcut and it finally presented me with a login window. I called to get a login name and apparently the programmer left no way for them to add users...or delete users...real secure when you cannot remove a user from the system after they are fired...duh! Anyhow, the whole reason I am doing this is because I need to add a bunch of new users, and delete another bunch. I work for a county government and the republicans just took over power from the democrats, and this means all patronage positions are taken away from the departing party and given to the new ones (who cares if their good at their jobs or not, as long as they're part of the majority party). This means all new attorneys in the county attorney's office, and now I don't seem to be able to add them. Ideas?! Thanks for the help so far though! John W Clark >>> donald.a.Mcgillivray at mail.sprint.com 01/15/04 01:15PM >>> John, Is it possible that you're seeing only part (the last part) of the command line in the shortcut? The syntax for passing the workgroup on the command line is: Path to msaccess.exe, followed by path and filename of target mdb, followed by the workgroup switch (/wrkgrp), followed by the path and filename of target mdw. For example: "c:\program files\msoffice\office\msaccess.exe" "c:\MyDatabases\target.mdb" /wrkgrp "c:\MyDatabases\target.mdw" Note that quotes around the segments are only critical if there are spaces in the strings (doesn't hurt to include them, though), and that the positions of the path to the mdb and the workgroup segment are interchangeable. Thus, if the other programmer had put the workgroup segment before the mdb segment, you might be seeing just the tail end of the one followed by the entirety of the other. Hope this helps. Don McGillivray -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of John Clark Sent: Thursday, January 15, 2004 9:47 AM To: accessd at databaseadvisors.com Subject: [AccessD] MDW file This group has helped me so much over the past two years. My confidence has increased 1000%, which I attribute directly to my involvement with this list. Just yesterday, my boss made some crack about an external programmer that they have used...basically saying that if I get as good as him I could do what he does (he is currently taking a year off and traveling the country in an RV)...and for the first time, I stood up and said, "I am just as good, if not better, than [that guy]." Anyhow, now that I have explained how 'good' I have become, I was thrown a twist. Because this guy is out of town, he cannot respond to a call that they have regarding a program he wrote. It needs to be placed on the desktops, of another department. "No problem," I said, "I can handle it." But I notice in the shortcut that exists, in the original department, it uses an .MDW file in the target line (ms.mdw" "c:\program files\cms\cmssecure.mdb"). I just called to verify this line, because I thought that at least a "c was missing from the front...I don't get the one quote mark. I have never used workgroup features of Access, and I really don't plan to. What do I need to do to set this up? Thanks! John W Clark John W. Clark Computer Programmer / Asst. Network Administrator Niagara County Central Data Processing _______________________________________________ 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 From askolits at ot.com Thu Jan 15 14:25:32 2004 From: askolits at ot.com (John Skolits) Date: Thu, 15 Jan 2004 15:25:32 -0500 Subject: [AccessD] Access Support in 2006 In-Reply-To: <02c401c3dba2$b135e4f0$6401a8c0@default> Message-ID: Just found this on the net. It's dated 1998. It's interesting how many people were thinking Access was dead so many years ago. Yet, you never know with MS. http://www.fmsinc.com/fmsnews/Editorial/FutureOfAccess.htm John From ssharkins at bellsouth.net Thu Jan 15 14:49:36 2004 From: ssharkins at bellsouth.net (Susan Harkins) Date: Thu, 15 Jan 2004 15:49:36 -0500 Subject: [AccessD] Access Support in 2006 References: <05EBB8A3BEB95B4F8216BE4EF486077801D9FF01@srciml1.ds.doc.state.or.us> <000b01c3dba2$552d1a70$740c6351@martin1> Message-ID: <002101c3dba9$58a4fef0$210110ac@SUSANONE> And MS has just backed down on its earlier decision NOT to support Win 98 after this month (I think that was the timeframe). They've backtracked and now say they'll continue to support Win 98 for a while -- so, I wouldn't put too much stock in claims from anyone outside MS. At best, all they can do is speculate. Anyone outside MS that has their ear and knows inside information is NOT going to write an article and tell you about it -- they would lose their status pronto. Susan H. > Far as I know they are currently working on Version 12 > > Martin > > > ----- Original Message ----- > From: "Gowey Mike W" > To: "Access Developers discussion and problem solving" > > Sent: Thursday, January 15, 2004 7:53 PM > Subject: [AccessD] Access Support in 2006 > > > > > > > > Just a fast question to everyone. I have been told that there is a > > rumor that Microsoft is not going to support Access anymore come 2006. > > > > Has anyone else heard anything else about this and if true what they > > plan on replacing it with????? > > > > I hope this don't cause too much of a string, I was just surprised and > > caught off guard. > > > > > > Thanks, > > > > Mike Gowey, MCSA, A+ > > Team Leader - SRCI > > Information Systems & Services Division > > _______________________________________________ > > 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 > From Jim.Hale at FleetPride.com Thu Jan 15 14:48:20 2004 From: Jim.Hale at FleetPride.com (Hale, Jim) Date: Thu, 15 Jan 2004 14:48:20 -0600 Subject: [AccessD] Implements vs WithEvents Message-ID: <6A6AA9DF57E4F046BDA1E273BDDB677201A9FD@corp-es01.fleetpride.com> Very nice explanation, thanks. Jim Hale -----Original Message----- From: John W. Colby [mailto:jwcolby at colbyconsulting.com] Sent: Tuesday, January 13, 2004 9:03 PM To: Access Developers discussion and problem solving Subject: RE: [AccessD] Implements vs WithEvents Robert, Risking sounding ignorant, I don't know what the VBA DHB is so I can't help you there. However AFAIK you can't use Implements for something like a control or form. These objects have code inside them that cause things to happen, properties to modify their behavior etc. ALL THAT STUFF can actually be inherited in VB.NET. That is, you can actually start with a combo box, subclass that combo box, GET ALL OF IT'S FUNCTIONALITY, all of it's code, all of its properties and methods, plus add your own!!! Or even override things to change the way the combo box functions. THAT is true inheritance. Not so in Access / VBA. An object like a combo box is a self contained unit that you simply cannot get inside of or modify in any meaningful way. It appears to us Access programmers almost like an ocx, i.e. a black box that does things. IMPORTANT... one of the things these objects do is raise Events! IOW, they tell you when a user clicks the mouse, double clicks the mouse etc. "inside" their boundaries on the screen. Knowing this, every Access programmer ALREADY USES WITHEVENTS. How? By creating an event stub in a form's class, and inserting code in that event stub to do something that the programmer wants to do when that event happens. The confusing thing is that a form's class DOES NOT REQUIRE a withevents dimension statement for any controls contained in the form (or for itself - the form - for that matter). However there is an IMPLICIT dim statement in the class, invisible, but there none the less. So every Access programmer already knows all about handling events for combos, command buttons etc. They (most of us anyway) use the built-in wizards in the form's builder interface to insert event handler stubs into the form's class and insert code there. THAT IS WITHEVENT PROGRAMMING, with all the details taken care of for you. Well guess what, ANY CLASS can have those same event handlers in them!!! The only differenc is that if the class is not a form class, there must be an EXPLICIT dim Withevents statement for any control (any object actually) that you wish to sink events for. 'inside my own combo class header... 'Dim a combo withevents Private WithEvents mcbo As ComboBox Having the dim statement does nothing more than tell my combo class that a control of a specific type MAY be transferring control of one or more of it's events to the class directly. It does NOT say WHICH control. To do that you have to pass in a control to the class and inside the class, SET the dimmed control = the passed in control. 'inside my own combo class... 'Pass in a control and SET the internal control variable function Init(lcbo as ComboBox) set mcbo = lcbo end init THAT tells the class which combo to sink events for (the one being passed in of course). Once you do that, the class can sink ANY of the control's events. But you still haven't told the class WHICH events to sink. IOW, Even having done this, nothing will happen in your class unless you create an event stub for the control event you wish to process inside the class. 'inside my own combo class... 'create an event stub to which control will be passed when a specific event fires. Private Sub mcbo_AfterUpdate() 'Do Something really cool Msgbox "Something really cool" End Sub THAT tells the combo class WHICH event(s) to sink. Now you must of course instantiate your own combo class in your form and pass in a specific control to it. 'inside my FORM'S class header... 'dimension my own combo class dim fclsMyCombo as clsMyCombo 'inside my FORM'S class Private Sub Form_Open(Cancel As Integer) 'CREATE AN INSTANCE OF MY COOL COMBO CLASS Set fclsMyCombo = new clsMyCombo 'PASS A REFERENCE TO A SPECIFIC COMBO ON MY FORM fclsMyCombo.Init cboStates 'a combo displaying all the states in the union End Sub THAT tells Access to dimension a class, create a class instance and WHICH combo to pass off to the class instance. NOW, with ALL THESE THINGS IN PLACE, if that combo AfterUpdate fires, control will EVENTUALLY get to your class and your message box will display it's message. Notice that your form doesn't need any event stub in it for the control. Even though the ONLY sub in your form's class is the Form_Open, the event stub in your class will sink the event and the message box will display its message. I know full well that all this sounds like a LOT of work just to get control into a class but after you've done it a few times it will be 2nd nature. And of course you can then have a combo class that (see my other post) handles the double click, opens a form, allows your user to edit the data, and when the form closes, requeries the combo, all neatly encapsulated in a class. Plus all the other neato keenarino stuff you can imagine your combo doing. Hang in there. It took me three tries, each six months apart to finally "get" Shamil's stuff and understand Withevents. Looking back I can't understand why, but life is like that sometimes. And no, the demos for the book are copyrighted by Wrox and I can't legally distribute them, however there are many demos (by me of course) on DatabaseAdvisors' web site. I also have a bunch on my own site. This stuff is important, keep trying. John W. Colby www.ColbyConsulting.com -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Robert Gracie Sent: Tuesday, January 13, 2004 8:47 PM To: Access Developers discussion and problem solving Subject: RE: [AccessD] Implements vs WithEvents "Hmmmmmmm, As confusion sets in, he takes and stabs himself in the chest with his keyboard...:-)" I'm trying to understand why the VBA DHB is teaching that using INTERFACE inheritance classes (by way of the Implements Keyword and such) is much better then simply using Event, RaiseEvent, and WithEvents... The problem, for me at least, is getting my mind around the larger concept, and knowing which structure to use and why. With my very limited understanding, the way they have presented, it seems reasonable to go this route if only to help keep control over code execution... I guess I just need to keep pounding away at these concepts....... Robert Gracie www.servicexp.com -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of John W. Colby Sent: Tuesday, January 13, 2004 7:54 PM To: Access Developers discussion and problem solving Subject: [AccessD] Implements vs WithEvents Charlotte, >They have somewhat different purposes. No, they have completely different purposes. >Implements allows you to subclass an existing object/class and give it additional or different functionality, so you can have a class Dog and a subclass Spaniel that has a property Retriever. Well... true but not exactly. My issue with that statement is the term subclass as you use it. Yes you are subclassing the original but ONLY the interface. IMHO that is almost useless Implements is an interface ONLY inheritance, i.e. it allows (forces) you to start with the same public data and method DEFINITION but does not actually inherit the behaviors (methods) themselves. I.e. the code that runs in the class that is being subclassed is NOT inherited into the subclass. Access' inheritance (interface) is not very useful except as a template kind of thing. I find it useless enough that I personally don't bother. On the other hand Shamil is a proponent so it must have its uses. When you move to VB.NET (or any of the other .net languages I believe) TRUE inheritance is available. I.e. if you have a method with a thousand lines of code, when you subclass that object the new object inherits that code as well as the data. In our Implements subclassing, you would have to cut and paste that thousand lines of code into the subclass. Can you say maintenance nightmare? >You can intercept and respond to specific events when they happen in the object. Did the Bark event trigger? WithEvents lets you find out and respond from another class/object. Exactly correct. One of the MAJOR shortcomings of Access / VBA (in fact VB prior to VB.Net) is that Inheritance is virtually non-existent, and even worse, objects other than forms don't have a built in class that you can get at to add functionality directly to. What WithEvents really does is allow you to build class wrappers for objects so that you can encapsulate behaviors (functionality) in your class. In essence you still have two objects, the control (or even another class or OCX) and your class, but now you can put all of the common functionality in your class along with the event stubs of the control/class/ocx that generates the event. This does not get you any further down the road towards inheritance, sadly it simply doesn't appear to be possible in Access / VBA. But it does provide a huge step up in encapsulation. John W. Colby www.ColbyConsulting.com -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Charlotte Foust Sent: Tuesday, January 13, 2004 4:56 PM To: Access Developers discussion and problem solving Subject: RE: [AccessD] =function() in .onclick They have somewhat different purposes. Implements allows you to subclass an existing object/class and give it additional or different functionality, so you can have a class Dog and a subclass Spaniel that has a property Retriever. WithEvents allows you to monitor the events of an object/class. You can intercept and respond to specific events when they happen in the object. Did the Bark event trigger? WithEvents lets you find out and respond from another class/object. Charlotte Foust -----Original Message----- From: Robert Gracie [mailto:Subscriptions at servicexp.com] Sent: Tuesday, January 13, 2004 1:45 PM To: Access Developers discussion and problem solving Subject: RE: [AccessD] =function() in .onclick Hello All, Since I'm just learning this type of programming technique I thought I would ask a question... Why not use Implements instead of WithEvents? My limited understand of WithEvents is that they will not return functionality unit they (the event) has completed processing... Since I'm just at the "door" so to speak with learning how to use and incorporate these new (to me) programming techniques into my work, I really want to start out using the "best" technique... Robert Gracie www.servicexp.com _______________________________________________ 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 _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From John.Clark at niagaracounty.com Thu Jan 15 15:01:06 2004 From: John.Clark at niagaracounty.com (John Clark) Date: Thu, 15 Jan 2004 16:01:06 -0500 Subject: [AccessD] MDW file...break in? Message-ID: OK, This programmer seems to have never told anyone the Admin password, and now he is somewhere cross-country in an RV. How the bejeepers can I get into the damn thing?! I got in using one of the users accounts, and I explored the security area...I somewhat remember brushing over this about 2-3 years ago...but I cannot do anything with her account..and nobody else seems to have rights either. What if this shmuck dies on this trip? We are never able to add or remove or modify users ever again? I should be loving this. Serves 'em right for going behind my back and having this guy do my job! But at the moment it is just a PITA!!! Ya know when the "I'm thinking of going on my own" type threads come around? Well, I'll tell ya...If this guy is making a living at it, anybody can. His programs are ugly and he even misspells commands...first thing I noticed was a button for Attorneys spelled, "attornies." I'm leaving...it is snowing like hades again and I'm getting home before I end up sleeping here. See ya! Thanks again! John W Clark From rl_stewart at highstream.net Thu Jan 15 15:15:52 2004 From: rl_stewart at highstream.net (Robert L. Stewart) Date: Thu, 15 Jan 2004 15:15:52 -0600 Subject: [AccessD] Re: MDW file In-Reply-To: <200401151800.i0FI0Em31739@databaseadvisors.com> Message-ID: <5.1.0.14.2.20040115151234.042a0af8@pop3.highstream.net> John, Get WinRAR. It is like WinZip, but has a couple of features that you need. It will create a SPX file that is an executable that will do directory things, like create them, and then uncompress the files into a specific directory. Go to a working client machine. Do the WinRAR process on the client files to create the SPX file. Then place it on the network. Now, by opening that file, everyone can install the program locally. Robert At 12:00 PM 1/15/2004 -0600, you wrote: >From: "John Clark" >Subject: [AccessD] MDW file >To: >Message-ID: >Content-Type: text/plain; charset=US-ASCII > >This group has helped me so much over the past two years. My confidence >has increased 1000%, which I attribute directly to my involvement with >this list. Just yesterday, my boss made some crack about an external >programmer that they have used...basically saying that if I get as good >as him I could do what he does (he is currently taking a year off and >traveling the country in an RV)...and for the first time, I stood up and >said, "I am just as good, if not better, than [that guy]." > >Anyhow, now that I have explained how 'good' I have become, I was >thrown a twist. Because this guy is out of town, he cannot respond to a >call that they have regarding a program he wrote. It needs to be placed >on the desktops, of another department. "No problem," I said, "I can >handle it." But I notice in the shortcut that exists, in the original >department, it uses an .MDW file in the target line (ms.mdw" "c:\program >files\cms\cmssecure.mdb"). I just called to verify this line, because I >thought that at least a "c was missing from the front...I don't get the >one quote mark. > >I have never used workgroup features of Access, and I really don't plan >to. What do I need to do to set this up? > >Thanks! From michael.mattys at adelphia.net Thu Jan 15 15:17:27 2004 From: michael.mattys at adelphia.net (Michael R Mattys) Date: Thu, 15 Jan 2004 16:17:27 -0500 Subject: [AccessD] (OT) saving as *cvs with " " References: <46B976F2B698FF46A4FE7636509B22DF03D11D@stekelbes.ithelps.local> <59925.12.3.132.98.1074197710.squirrel@heck.bay9.com> Message-ID: <032c01c3dbac$fc886180$6401a8c0@default> See http://support.microsoft.com/?kbid=213448 Michael R. Mattys Try MattysMapLib for MapPoint at www.mattysconsulting.com ----- Original Message ----- From: To: Sent: Thursday, January 15, 2004 3:15 PM Subject: [AccessD] (OT) saving as *cvs with " " > Hey Group > i have to save this data (right now I have it in a spreadsheet) > 01003, 011-11-1123, Doe, Jane, A > > as .txt file so it would like > > 01003, 011-11-1123, "Doe", "Jane", A > > > and they specifically want quotes around first and last name, and ONLY > there. when I create *.csv file from Excel I got no quotations (I tried > specifically making those 2 fields as "text" and the others as "general" > and even "numbers", but no result) When I do it through though Acess I get > all in quotations, and over there I can't play with data types. I tried > adding colums with " at the beginning and end of mane fields, but ehen I > converted that to *.csv I got tripe quotes on names, and no quotes > elsewhere... > Any suggestions ? > > > > > ----------------------------------------- > Get Breaking News from CNN, ABC, NBC, CBS Now. > http://www.xuppa.com/news/?link=webmail > > > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com > From cfoust at infostatsystems.com Thu Jan 15 15:19:22 2004 From: cfoust at infostatsystems.com (Charlotte Foust) Date: Thu, 15 Jan 2004 13:19:22 -0800 Subject: [AccessD] MDW file...break in? Message-ID: Can't help with the breakin, but I commiserate with you on cleaning up after the errant programmer. I've seen far too many projects "developed" by someone who bought a book, built a single database, and decided they were a developer. Yikes!! Charlotte Foust -----Original Message----- From: John Clark [mailto:John.Clark at niagaracounty.com] Sent: Thursday, January 15, 2004 1:01 PM To: accessd at databaseadvisors.com Subject: [AccessD] MDW file...break in? OK, This programmer seems to have never told anyone the Admin password, and now he is somewhere cross-country in an RV. How the bejeepers can I get into the damn thing?! I got in using one of the users accounts, and I explored the security area...I somewhat remember brushing over this about 2-3 years ago...but I cannot do anything with her account..and nobody else seems to have rights either. What if this shmuck dies on this trip? We are never able to add or remove or modify users ever again? I should be loving this. Serves 'em right for going behind my back and having this guy do my job! But at the moment it is just a PITA!!! Ya know when the "I'm thinking of going on my own" type threads come around? Well, I'll tell ya...If this guy is making a living at it, anybody can. His programs are ugly and he even misspells commands...first thing I noticed was a button for Attorneys spelled, "attornies." I'm leaving...it is snowing like hades again and I'm getting home before I end up sleeping here. See ya! Thanks again! John W Clark _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From tim at irwingreenhouses.com Thu Jan 15 15:29:45 2004 From: tim at irwingreenhouses.com (Tim Thiessen) Date: Thu, 15 Jan 2004 15:29:45 -0600 Subject: [AccessD] Grouping Query Message-ID: <007901c3dbae$b2e74800$7800a8c0@timt> Hi Group, I have a query that returns the following: PaymentTerms DatePaid CountOfPaid COD 1 5 COD 2 3 COD 4 8 COD 14 4 COD 16 12 Net 10-EOM 1 3 Net 10-EOM 3 10 Net 10-EOM 5 15 Net 10-EOM 10 21 DatePaid is the day of the month in which payments are made. CountOfPaid is a count of the number of payments made on particular date. What I need to do is to be able to group this data into the following: PaymentTerms Paid1-6 Paid7-13 Paid14-20 Paid21-27 Paid28-31 COD 16 16 0 0 0 Net10-EOM 28 21 0 0 0 I know this is a cross tab query but how do I get the grouping in the first place? Tim Thiessen From conny at qad.se Thu Jan 15 15:33:58 2004 From: conny at qad.se (Conny Johansson) Date: Thu, 15 Jan 2004 22:33:58 +0100 Subject: [AccessD] MDW file...break in? In-Reply-To: Message-ID: <20040115213458.2E1DF2B0F0@boxmail1.box.se> I'm not to fond of using password-cracks but you might find a solution here. Conny Johansson -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Charlotte Foust Sent: den 15 januari 2004 22:19 To: Access Developers discussion and problem solving Subject: RE: [AccessD] MDW file...break in? Can't help with the breakin, but I commiserate with you on cleaning up after the errant programmer. I've seen far too many projects "developed" by someone who bought a book, built a single database, and decided they were a developer. Yikes!! Charlotte Foust -----Original Message----- From: John Clark [mailto:John.Clark at niagaracounty.com] Sent: Thursday, January 15, 2004 1:01 PM To: accessd at databaseadvisors.com Subject: [AccessD] MDW file...break in? OK, This programmer seems to have never told anyone the Admin password, and now he is somewhere cross-country in an RV. How the bejeepers can I get into the damn thing?! I got in using one of the users accounts, and I explored the security area...I somewhat remember brushing over this about 2-3 years ago...but I cannot do anything with her account..and nobody else seems to have rights either. What if this shmuck dies on this trip? We are never able to add or remove or modify users ever again? I should be loving this. Serves 'em right for going behind my back and having this guy do my job! But at the moment it is just a PITA!!! Ya know when the "I'm thinking of going on my own" type threads come around? Well, I'll tell ya...If this guy is making a living at it, anybody can. His programs are ugly and he even misspells commands...first thing I noticed was a button for Attorneys spelled, "attornies." I'm leaving...it is snowing like hades again and I'm getting home before I end up sleeping here. See ya! Thanks again! John W Clark _______________________________________________ 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 _____ avast! Antivirus : Outbound message clean. Virus Database (VPS): 2004-01-13 Tested on: 2004-01-15 22:33:58 avast! is copyright (c) 2000-2003 ALWIL Software. From Oleg_123 at xuppa.com Thu Jan 15 15:45:14 2004 From: Oleg_123 at xuppa.com (Oleg_123 at xuppa.com) Date: Thu, 15 Jan 2004 16:45:14 -0500 (EST) Subject: [AccessD] (OT) saving as *cvs with ' ' In-Reply-To: <032c01c3dbac$fc886180$6401a8c0@default> References: <46B976F2B698FF46A4FE7636509B22DF03D11D@stekelbes.ithelps.local> <59925.12.3.132.98.1074197710.squirrel@heck.bay9.com> <032c01c3dbac$fc886180$6401a8c0@default> Message-ID: <10122.12.3.132.98.1074203114.squirrel@heck.bay9.com> I am afraid I don't understand, does this code with "without warranty either expressed or implied, including, but not limited to, the implied warranties of merchantability" lets you select wich column I want quotes around ? The way I see it ( i may be wrong but their explanation is VERY cryptic) it only allows to convert eveything to " > See http://support.microsoft.com/?kbid=213448 > > Michael R. Mattys > Try MattysMapLib for MapPoint at > www.mattysconsulting.com > > > > ----- Original Message ----- > From: > To: > Sent: Thursday, January 15, 2004 3:15 PM > Subject: [AccessD] (OT) saving as *cvs with " " > > >> Hey Group >> i have to save this data (right now I have it in a spreadsheet) >> 01003, 011-11-1123, Doe, Jane, A >> >> as .txt file so it would like >> >> 01003, 011-11-1123, "Doe", "Jane", A >> >> >> and they specifically want quotes around first and last name, and ONLY >> there. when I create *.csv file from Excel I got no quotations (I >> tried specifically making those 2 fields as "text" and the others as >> "general" and even "numbers", but no result) When I do it through >> though Acess I get all in quotations, and over there I can't play with >> data types. I tried adding colums with " at the beginning and end of >> mane fields, but ehen I converted that to *.csv I got tripe quotes on >> names, and no quotes elsewhere... >> Any suggestions ? >> >> >> >> >> ----------------------------------------- >> Get Breaking News from CNN, ABC, NBC, CBS Now. >> http://www.xuppa.com/news/?link=webmail >> >> >> _______________________________________________ >> 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 ----------------------------------------- Get Breaking News from CNN, ABC, NBC, CBS Now. http://www.xuppa.com/news/?link=webmail From jimdettman at earthlink.net Thu Jan 15 15:46:55 2004 From: jimdettman at earthlink.net (Jim Dettman) Date: Thu, 15 Jan 2004 16:46:55 -0500 Subject: [AccessD] MDW file...break in? In-Reply-To: Message-ID: John, A. See if he did his job right. Start Access directly (not via the shortcut) so you get the default work group. See if that works. B. Commercial services: www.officerecovery.com www.crak.com C. Do a google search. There are a few Russian sites with free cracking tools. I may even have some laying around. What version is this for? Jim Dettman President, Online Computer Services of WNY, Inc. (315) 699-3443 jimdettman at earthlink.net -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of John Clark Sent: Thursday, January 15, 2004 4:01 PM To: accessd at databaseadvisors.com Subject: [AccessD] MDW file...break in? OK, This programmer seems to have never told anyone the Admin password, and now he is somewhere cross-country in an RV. How the bejeepers can I get into the damn thing?! I got in using one of the users accounts, and I explored the security area...I somewhat remember brushing over this about 2-3 years ago...but I cannot do anything with her account..and nobody else seems to have rights either. What if this shmuck dies on this trip? We are never able to add or remove or modify users ever again? I should be loving this. Serves 'em right for going behind my back and having this guy do my job! But at the moment it is just a PITA!!! Ya know when the "I'm thinking of going on my own" type threads come around? Well, I'll tell ya...If this guy is making a living at it, anybody can. His programs are ugly and he even misspells commands...first thing I noticed was a button for Attorneys spelled, "attornies." I'm leaving...it is snowing like hades again and I'm getting home before I end up sleeping here. See ya! Thanks again! John W Clark _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From cfoust at infostatsystems.com Thu Jan 15 15:47:12 2004 From: cfoust at infostatsystems.com (Charlotte Foust) Date: Thu, 15 Jan 2004 13:47:12 -0800 Subject: [AccessD] Grouping Query Message-ID: Actually, it's a join beteen *four* crosstab queries. Charlotte Foust -----Original Message----- From: Tim Thiessen [mailto:tim at irwingreenhouses.com] Sent: Thursday, January 15, 2004 1:30 PM To: accessD at databaseadvisors.com Subject: [AccessD] Grouping Query Hi Group, I have a query that returns the following: PaymentTerms DatePaid CountOfPaid COD 1 5 COD 2 3 COD 4 8 COD 14 4 COD 16 12 Net 10-EOM 1 3 Net 10-EOM 3 10 Net 10-EOM 5 15 Net 10-EOM 10 21 DatePaid is the day of the month in which payments are made. CountOfPaid is a count of the number of payments made on particular date. What I need to do is to be able to group this data into the following: PaymentTerms Paid1-6 Paid7-13 Paid14-20 Paid21-27 Paid28-31 COD 16 16 0 0 0 Net10-EOM 28 21 0 0 0 I know this is a cross tab query but how do I get the grouping in the first place? Tim Thiessen _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From martyconnelly at shaw.ca Thu Jan 15 15:53:42 2004 From: martyconnelly at shaw.ca (MartyConnelly) Date: Thu, 15 Jan 2004 13:53:42 -0800 Subject: [AccessD] MDW file...break in? References: Message-ID: <40070BE6.3080208@shaw.ca> One of these err.. tools might help http://accesstools.narod.ru/index.html John Clark wrote: >OK, This programmer seems to have never told anyone the Admin password, >and now he is somewhere cross-country in an RV. How the bejeepers can I >get into the damn thing?! I got in using one of the users accounts, and >I explored the security area...I somewhat remember brushing over this >about 2-3 years ago...but I cannot do anything with her account..and >nobody else seems to have rights either. What if this shmuck dies on >this trip? We are never able to add or remove or modify users ever >again? > >I should be loving this. Serves 'em right for going behind my back and >having this guy do my job! But at the moment it is just a PITA!!! Ya >know when the "I'm thinking of going on my own" type threads come >around? Well, I'll tell ya...If this guy is making a living at it, >anybody can. His programs are ugly and he even misspells >commands...first thing I noticed was a button for Attorneys spelled, >"attornies." > >I'm leaving...it is snowing like hades again and I'm getting home >before I end up sleeping here. > >See ya! > >Thanks again! > >John W Clark >_______________________________________________ >AccessD mailing list >AccessD at databaseadvisors.com >http://databaseadvisors.com/mailman/listinfo/accessd >Website: http://www.databaseadvisors.com > > > -- Marty Connelly Victoria, B.C. Canada From jwcolby at colbyconsulting.com Thu Jan 15 16:02:50 2004 From: jwcolby at colbyconsulting.com (John W. Colby) Date: Thu, 15 Jan 2004 17:02:50 -0500 Subject: [AccessD] Access shuts down In-Reply-To: <46B976F2B698FF46A4FE7636509B22DF03D11B@stekelbes.ithelps.local> Message-ID: Not a runtime. A2K on Windows XP. John W. Colby www.ColbyConsulting.com -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Erwin Craps - IT Helps Sent: Thursday, January 15, 2004 2:31 PM To: Access Developers discussion and problem solving Subject: RE: [AccessD] Access shuts down It is posible with the Access Runtime maybe alsowith the MDE in full access (but I'm not sure about the MDE in full access). What concerns the Access runtime I'm sure that if you have an error in a function/module with no error trapping, the runtime just terminates the program without any message. Erwin -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of John W. Colby Sent: Thursday, January 15, 2004 8:00 PM To: AccessD Subject: [AccessD] Access shuts down Folks, A client is having an Access app just shut down, no GPF, no "by your leave", just gone. I am wondering if it is because I am doing work on it here at my house where I have Office 2K and Office XP both on the same machine. I installed the "widget" (update) that MS designed to supposedly allow the two to co-exist but I still have my doubts. Has anyone seen this? John W. Colby www.ColbyConsulting.com _______________________________________________ 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 From jwcolby at colbyconsulting.com Thu Jan 15 16:04:44 2004 From: jwcolby at colbyconsulting.com (John W. Colby) Date: Thu, 15 Jan 2004 17:04:44 -0500 Subject: [AccessD] Implements vs WithEvents In-Reply-To: <6A6AA9DF57E4F046BDA1E273BDDB677201A9FD@corp-es01.fleetpride.com> Message-ID: Glad you liked it, hope it helps someone. John W. Colby www.ColbyConsulting.com -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Hale, Jim Sent: Thursday, January 15, 2004 3:48 PM To: 'Access Developers discussion and problem solving' Subject: RE: [AccessD] Implements vs WithEvents Very nice explanation, thanks. Jim Hale -----Original Message----- From: John W. Colby [mailto:jwcolby at colbyconsulting.com] Sent: Tuesday, January 13, 2004 9:03 PM To: Access Developers discussion and problem solving Subject: RE: [AccessD] Implements vs WithEvents Robert, Risking sounding ignorant, I don't know what the VBA DHB is so I can't help you there. However AFAIK you can't use Implements for something like a control or form. These objects have code inside them that cause things to happen, properties to modify their behavior etc. ALL THAT STUFF can actually be inherited in VB.NET. That is, you can actually start with a combo box, subclass that combo box, GET ALL OF IT'S FUNCTIONALITY, all of it's code, all of its properties and methods, plus add your own!!! Or even override things to change the way the combo box functions. THAT is true inheritance. Not so in Access / VBA. An object like a combo box is a self contained unit that you simply cannot get inside of or modify in any meaningful way. It appears to us Access programmers almost like an ocx, i.e. a black box that does things. IMPORTANT... one of the things these objects do is raise Events! IOW, they tell you when a user clicks the mouse, double clicks the mouse etc. "inside" their boundaries on the screen. Knowing this, every Access programmer ALREADY USES WITHEVENTS. How? By creating an event stub in a form's class, and inserting code in that event stub to do something that the programmer wants to do when that event happens. The confusing thing is that a form's class DOES NOT REQUIRE a withevents dimension statement for any controls contained in the form (or for itself - the form - for that matter). However there is an IMPLICIT dim statement in the class, invisible, but there none the less. So every Access programmer already knows all about handling events for combos, command buttons etc. They (most of us anyway) use the built-in wizards in the form's builder interface to insert event handler stubs into the form's class and insert code there. THAT IS WITHEVENT PROGRAMMING, with all the details taken care of for you. Well guess what, ANY CLASS can have those same event handlers in them!!! The only differenc is that if the class is not a form class, there must be an EXPLICIT dim Withevents statement for any control (any object actually) that you wish to sink events for. 'inside my own combo class header... 'Dim a combo withevents Private WithEvents mcbo As ComboBox Having the dim statement does nothing more than tell my combo class that a control of a specific type MAY be transferring control of one or more of it's events to the class directly. It does NOT say WHICH control. To do that you have to pass in a control to the class and inside the class, SET the dimmed control = the passed in control. 'inside my own combo class... 'Pass in a control and SET the internal control variable function Init(lcbo as ComboBox) set mcbo = lcbo end init THAT tells the class which combo to sink events for (the one being passed in of course). Once you do that, the class can sink ANY of the control's events. But you still haven't told the class WHICH events to sink. IOW, Even having done this, nothing will happen in your class unless you create an event stub for the control event you wish to process inside the class. 'inside my own combo class... 'create an event stub to which control will be passed when a specific event fires. Private Sub mcbo_AfterUpdate() 'Do Something really cool Msgbox "Something really cool" End Sub THAT tells the combo class WHICH event(s) to sink. Now you must of course instantiate your own combo class in your form and pass in a specific control to it. 'inside my FORM'S class header... 'dimension my own combo class dim fclsMyCombo as clsMyCombo 'inside my FORM'S class Private Sub Form_Open(Cancel As Integer) 'CREATE AN INSTANCE OF MY COOL COMBO CLASS Set fclsMyCombo = new clsMyCombo 'PASS A REFERENCE TO A SPECIFIC COMBO ON MY FORM fclsMyCombo.Init cboStates 'a combo displaying all the states in the union End Sub THAT tells Access to dimension a class, create a class instance and WHICH combo to pass off to the class instance. NOW, with ALL THESE THINGS IN PLACE, if that combo AfterUpdate fires, control will EVENTUALLY get to your class and your message box will display it's message. Notice that your form doesn't need any event stub in it for the control. Even though the ONLY sub in your form's class is the Form_Open, the event stub in your class will sink the event and the message box will display its message. I know full well that all this sounds like a LOT of work just to get control into a class but after you've done it a few times it will be 2nd nature. And of course you can then have a combo class that (see my other post) handles the double click, opens a form, allows your user to edit the data, and when the form closes, requeries the combo, all neatly encapsulated in a class. Plus all the other neato keenarino stuff you can imagine your combo doing. Hang in there. It took me three tries, each six months apart to finally "get" Shamil's stuff and understand Withevents. Looking back I can't understand why, but life is like that sometimes. And no, the demos for the book are copyrighted by Wrox and I can't legally distribute them, however there are many demos (by me of course) on DatabaseAdvisors' web site. I also have a bunch on my own site. This stuff is important, keep trying. John W. Colby www.ColbyConsulting.com -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Robert Gracie Sent: Tuesday, January 13, 2004 8:47 PM To: Access Developers discussion and problem solving Subject: RE: [AccessD] Implements vs WithEvents "Hmmmmmmm, As confusion sets in, he takes and stabs himself in the chest with his keyboard...:-)" I'm trying to understand why the VBA DHB is teaching that using INTERFACE inheritance classes (by way of the Implements Keyword and such) is much better then simply using Event, RaiseEvent, and WithEvents... The problem, for me at least, is getting my mind around the larger concept, and knowing which structure to use and why. With my very limited understanding, the way they have presented, it seems reasonable to go this route if only to help keep control over code execution... I guess I just need to keep pounding away at these concepts....... Robert Gracie www.servicexp.com -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of John W. Colby Sent: Tuesday, January 13, 2004 7:54 PM To: Access Developers discussion and problem solving Subject: [AccessD] Implements vs WithEvents Charlotte, >They have somewhat different purposes. No, they have completely different purposes. >Implements allows you to subclass an existing object/class and give it additional or different functionality, so you can have a class Dog and a subclass Spaniel that has a property Retriever. Well... true but not exactly. My issue with that statement is the term subclass as you use it. Yes you are subclassing the original but ONLY the interface. IMHO that is almost useless Implements is an interface ONLY inheritance, i.e. it allows (forces) you to start with the same public data and method DEFINITION but does not actually inherit the behaviors (methods) themselves. I.e. the code that runs in the class that is being subclassed is NOT inherited into the subclass. Access' inheritance (interface) is not very useful except as a template kind of thing. I find it useless enough that I personally don't bother. On the other hand Shamil is a proponent so it must have its uses. When you move to VB.NET (or any of the other .net languages I believe) TRUE inheritance is available. I.e. if you have a method with a thousand lines of code, when you subclass that object the new object inherits that code as well as the data. In our Implements subclassing, you would have to cut and paste that thousand lines of code into the subclass. Can you say maintenance nightmare? >You can intercept and respond to specific events when they happen in the object. Did the Bark event trigger? WithEvents lets you find out and respond from another class/object. Exactly correct. One of the MAJOR shortcomings of Access / VBA (in fact VB prior to VB.Net) is that Inheritance is virtually non-existent, and even worse, objects other than forms don't have a built in class that you can get at to add functionality directly to. What WithEvents really does is allow you to build class wrappers for objects so that you can encapsulate behaviors (functionality) in your class. In essence you still have two objects, the control (or even another class or OCX) and your class, but now you can put all of the common functionality in your class along with the event stubs of the control/class/ocx that generates the event. This does not get you any further down the road towards inheritance, sadly it simply doesn't appear to be possible in Access / VBA. But it does provide a huge step up in encapsulation. John W. Colby www.ColbyConsulting.com -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Charlotte Foust Sent: Tuesday, January 13, 2004 4:56 PM To: Access Developers discussion and problem solving Subject: RE: [AccessD] =function() in .onclick They have somewhat different purposes. Implements allows you to subclass an existing object/class and give it additional or different functionality, so you can have a class Dog and a subclass Spaniel that has a property Retriever. WithEvents allows you to monitor the events of an object/class. You can intercept and respond to specific events when they happen in the object. Did the Bark event trigger? WithEvents lets you find out and respond from another class/object. Charlotte Foust -----Original Message----- From: Robert Gracie [mailto:Subscriptions at servicexp.com] Sent: Tuesday, January 13, 2004 1:45 PM To: Access Developers discussion and problem solving Subject: RE: [AccessD] =function() in .onclick Hello All, Since I'm just learning this type of programming technique I thought I would ask a question... Why not use Implements instead of WithEvents? My limited understand of WithEvents is that they will not return functionality unit they (the event) has completed processing... Since I'm just at the "door" so to speak with learning how to use and incorporate these new (to me) programming techniques into my work, I really want to start out using the "best" technique... Robert Gracie www.servicexp.com _______________________________________________ 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 _______________________________________________ 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 From stuart at lexacorp.com.pg Thu Jan 15 16:03:22 2004 From: stuart at lexacorp.com.pg (Stuart McLachlan) Date: Fri, 16 Jan 2004 08:03:22 +1000 Subject: [AccessD] MDW file...break in? In-Reply-To: Message-ID: <40079ACA.25852.93B38@localhost> On 15 Jan 2004 at 16:01, John Clark wrote: > OK, This programmer seems to have never told anyone the Admin password, > and now he is somewhere cross-country in an RV. How the bejeepers can I > get into the damn thing?! I got in using one of the users accounts, and > I explored the security area...I somewhat remember brushing over this > about 2-3 years ago...but I cannot do anything with her account..and > nobody else seems to have rights either. What if this shmuck dies on > this trip? We are never able to add or remove or modify users ever > again? > > I should be loving this. Serves 'em right for going behind my back and > having this guy do my job! But at the moment it is just a PITA!!! Ya > know when the "I'm thinking of going on my own" type threads come > around? Well, I'll tell ya...If this guy is making a living at it, > anybody can. His programs are ugly and he even misspells > commands...first thing I noticed was a button for Attorneys spelled, > "attornies." > > I'm leaving...it is snowing like hades again and I'm getting home > before I end up sleeping here. > I use Access Key from http://www.lostpassword.com/access.htm I bought it when I had a similar problem a year or so ago. If you feel like spending $45, it will do it for you. Otherwise, if you send me the MDW I can run it through my copy and give you all the usernames and passwords. -- Lexacorp Ltd http://www.lexacorp.com.pg Information Technology Consultancy, Software Development,System Support. From stuart at lexacorp.com.pg Thu Jan 15 16:15:40 2004 From: stuart at lexacorp.com.pg (Stuart McLachlan) Date: Fri, 16 Jan 2004 08:15:40 +1000 Subject: [AccessD] (OT) saving as *cvs with " " In-Reply-To: <59925.12.3.132.98.1074197710.squirrel@heck.bay9.com> References: <46B976F2B698FF46A4FE7636509B22DF03D11D@stekelbes.ithelps.local> Message-ID: <40079DAC.1781.147CFE@localhost> On 15 Jan 2004 at 15:15, Oleg_123 at xuppa.com wrote: > Hey Group > i have to save this data (right now I have it in a spreadsheet) > 01003, 011-11-1123, Doe, Jane, A > > as .txt file so it would like > > 01003, 011-11-1123, "Doe", "Jane", A > > > and they specifically want quotes around first and last name, and ONLY > there. when I create *.csv file from Excel I got no quotations (I tried > specifically making those 2 fields as "text" and the others as "general" > and even "numbers", but no result) When I do it through though Acess I get > all in quotations, and over there I can't play with data types. I tried > adding colums with " at the beginning and end of mane fields, but ehen I > converted that to *.csv I got tripe quotes on names, and no quotes > elsewhere... > Any suggestions ? > Do it yourself rather than trying to use automated routines. With the data as an Access table (myData), run a function like. Function ExportData() as Long Dim strExport as String Dim rs as Recordset Set rs = Currentdb.Openrecordset("myData") Open "MyNewDataFile.csv" for Output as #1 While not rs.eof strExport = rs(0) & "," & rs(1) & ",""" & rs(2) & """,""" & rs(3) & """," & rs(4) Print #1, strExport rs.MoveNext Wend End Function -- Lexacorp Ltd http://www.lexacorp.com.pg Information Technology Consultancy, Software Development,System Support. From djkr at msn.com Thu Jan 15 16:51:11 2004 From: djkr at msn.com (DJK(John) Robinson) Date: Thu, 15 Jan 2004 22:51:11 -0000 Subject: [AccessD] Access Support in 2006 In-Reply-To: <05EBB8A3BEB95B4F8216BE4EF486077801D9FF01@srciml1.ds.doc.state.or.us> Message-ID: <009101c3dbba$1218efd0$bf00a8c0@dabsight> This rumor seems to come round every few years - with different dates in ... John > -----Original Message----- > From: accessd-bounces at databaseadvisors.com > [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of > Gowey Mike W > Sent: 15 January 2004 19:53 > To: Access Developers discussion and problem solving > Subject: [AccessD] Access Support in 2006 > > > > > Just a fast question to everyone. I have been told that > there is a rumor that Microsoft is not going to support > Access anymore come 2006. > > Has anyone else heard anything else about this and if true > what they plan on replacing it with????? > > I hope this don't cause too much of a string, I was just > surprised and caught off guard. > > > Thanks, > > Mike Gowey, MCSA, A+ > Team Leader - SRCI > Information Systems & Services Division > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/a> ccessd > Website: > http://www.databaseadvisors.com > From stephen at bondsoftware.co.nz Thu Jan 15 17:14:44 2004 From: stephen at bondsoftware.co.nz (Stephen Bond) Date: Fri, 16 Jan 2004 12:14:44 +1300 Subject: [AccessD] MDW file...break in? Message-ID: <70F3D727890C784291D8433E9C418F29088594@server.bondsoftware.co.nz> Stuart, I downloaded the demo and it only attempts to recover the database password - the site documentation says it will recover "user-level security accounts and passwords". Can you confirm the paid product does this. Cheers Stephen Bond > > > > I use Access Key from http://www.lostpassword.com/access.htm > I bought it when I had a similar problem a year or so ago. > > If you feel like spending $45, it will do it for you. Otherwise, if > you send me the MDW I can run it through my copy and give you all > the usernames and passwords. > > > From michael.mattys at adelphia.net Thu Jan 15 17:32:29 2004 From: michael.mattys at adelphia.net (Michael R Mattys) Date: Thu, 15 Jan 2004 18:32:29 -0500 Subject: [AccessD] (OT) saving as *cvs with " " References: <46B976F2B698FF46A4FE7636509B22DF03D11D@stekelbes.ithelps.local> <40079DAC.1781.147CFE@localhost> Message-ID: <035001c3dbbf$dee37170$6401a8c0@default> This does work if you'd like to attach it to a button 0123 011-11-1123 Doe John A 0124 011-11-1124 Doe Jim B 0125 011-11-1125 Doe Jack C 0126 011-11-1126 Doe Jane D 0127 011-11-1127 Doe Jorge E 0128 011-11-1128 Doe Jean F 0129 011-11-1129 Doe Jeanine G 0130 011-11-1130 Doe Jessie H 0131 011-11-1131 Doe James I 0132 011-11-1132 Doe Jill J Sub QuoteCommaExport() ' Dimension all variables. Dim DestFile As String Dim FileNum As Integer Dim ColumnCount As Integer Dim RowCount As Integer ' Prompt user for destination file name. DestFile = InputBox("Enter the destination filename" _ & Chr(10) & "(with complete path):", "Quote-Comma Exporter") ' Obtain next free file handle number. FileNum = FreeFile() ' Turn error checking off. On Error Resume Next ' Attempt to open destination file for output. Open DestFile For Output As #FileNum ' If an error occurs report it and end. If Err <> 0 Then MsgBox "Cannot open filename " & DestFile End End If ' Turn error checking on. On Error GoTo 0 ' Loop for each row in selection. For RowCount = 1 To Selection.Rows.Count ' Loop for each column in selection. For ColumnCount = 1 To Selection.Columns.Count If ColumnCount = 3 Or ColumnCount = 4 Then ' Write current cell's text to file with quotation marks. Print #FileNum, """" & Selection.Cells(RowCount, ColumnCount).Text & """"; Else Print #FileNum, Selection.Cells(RowCount, ColumnCount).Text; End If ' Check if cell is in last column. If ColumnCount = Selection.Columns.Count Then ' If so, then write a blank line. Print #FileNum, Else ' Otherwise, write a comma. Print #FileNum, ","; End If ' Start next iteration of ColumnCount loop. Next ColumnCount ' Start next iteration of RowCount loop. Next RowCount ' Close destination file. Close #FileNum End Sub Michael R. Mattys Try MattysMapLib for MapPoint at www.mattysconsulting.com ----- Original Message ----- From: "Stuart McLachlan" To: "Access Developers discussion and problem solving" Sent: Thursday, January 15, 2004 5:15 PM Subject: Re: [AccessD] (OT) saving as *cvs with " " > On 15 Jan 2004 at 15:15, Oleg_123 at xuppa.com wrote: > > > Hey Group > > i have to save this data (right now I have it in a spreadsheet) > > 01003, 011-11-1123, Doe, Jane, A > > > > as .txt file so it would like > > > > 01003, 011-11-1123, "Doe", "Jane", A > > > > > > and they specifically want quotes around first and last name, and ONLY > > there. when I create *.csv file from Excel I got no quotations (I tried > > specifically making those 2 fields as "text" and the others as "general" > > and even "numbers", but no result) When I do it through though Acess I get > > all in quotations, and over there I can't play with data types. I tried > > adding colums with " at the beginning and end of mane fields, but ehen I > > converted that to *.csv I got tripe quotes on names, and no quotes > > elsewhere... > > Any suggestions ? > > > > Do it yourself rather than trying to use automated routines. > With the data as an Access table (myData), run a function like. > > Function ExportData() as Long > Dim strExport as String > Dim rs as Recordset > Set rs = Currentdb.Openrecordset("myData") > Open "MyNewDataFile.csv" for Output as #1 > While not rs.eof > strExport = rs(0) & "," & rs(1) & ",""" & rs(2) & """,""" & rs(3) & > """," & rs(4) > Print #1, strExport > rs.MoveNext > Wend > End Function > > -- > Lexacorp Ltd > http://www.lexacorp.com.pg > Information Technology Consultancy, Software Development,System > Support. > > > > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com > From KIsmert at TexasSystems.com Thu Jan 15 17:39:40 2004 From: KIsmert at TexasSystems.com (Ken Ismert) Date: Thu, 15 Jan 2004 17:39:40 -0600 Subject: [AccessD] Implements vs WithEvents In-Reply-To: Message-ID: <004b01c3dbc0$d8eb7820$2a3ca8c0@TEXASSYSTEMS.COM> >One thing you say intrigues me though. You mention Implements allowing a >custom callback scheme and sending messages. How does this work? How does >the callback communicate between class instances? John, Interesting, the difference in perspectives: after your experience with true object languages, you find VBA limiting, while I cut my teeth on non-object languages, and find Implements a revelation. I'd love to work in a true OOP language that supports inheritance, but feel it would take some time to fully grasp its power and use it effectively. The callback scheme can be summarized as follows: 1. The callbacks are defined as methods in the ICallback interface: ' Insert this code in Class module ICallback Public Sub Message(sBody As Text) End Sub 2. Class CWannaMessage, wanting to receive messages, implements ICallback: Implements ICallback Private Sub ICallback_Message(sBody As Text) Debug.Print sBody End Sub 3. The CWannaMessage object makes a CCaller object, and passes a reference to itself: Set rCaller = New CCaller rCaller.Setup Me 4. CCaller's setup code looks like this: Private mrCallback as ICallback Public Sub Setup(CallbackObj As ICallback) Set mrCallback = CallbackObj End Sub 5. When CCaller wants to send a message: mrCallback.Message "Hello, you!" 6. Since you now have circular object references, CCaller must also provide a way to release its callback reference: Public Sub Shutdown Set mrCallback = Nothing End Sub 7. CWannaMessage must shutdown its caller when it isn't needed, or neither object will terminate: rCaller.Shutdown This example shows a one-on-one conversation, but it could easily be extended for multiple callers. CWannaMessage could maintain a collection of CCallers, and pass each CCaller its name or index on Setup, which CCaller could then pass back when it sends its Message. Or CCaller could just pass a reference to itself (Me) back to CWannaMessage. In any case, ICallback would have to be suitably extended. I calculate the obtuseness of this post at 135 degrees, a 5 degree improvement over the last. -Ken ps: I have some relatively simple form management code using interfaces. It allows a Parent form to open a Child, and be notified when it closes. I'll send you it if you're interested. From stephen at bondsoftware.co.nz Thu Jan 15 17:59:15 2004 From: stephen at bondsoftware.co.nz (Stephen Bond) Date: Fri, 16 Jan 2004 12:59:15 +1300 Subject: [AccessD] Grouping Query Message-ID: <70F3D727890C784291D8433E9C418F29088595@server.bondsoftware.co.nz> Tim, try adding a field to the query and use the Partition function. This will do the grouping for you nicely. New field looks something like this: PaidGroup: Partition([DatePaid],0,31,7) then your CrossTab query would have the 'PaidGroup' field as the column heading. HTH Stephen Bond Otatara, South Island, New Zealand > -----Original Message----- > From: Tim Thiessen [mailto:tim at irwingreenhouses.com] > Sent: Friday, 16 January 2004 10:30 a.m. > To: accessD at databaseadvisors.com > Subject: [AccessD] Grouping Query > > > Hi Group, > > I have a query that returns the following: > > PaymentTerms DatePaid CountOfPaid > COD 1 5 > COD 2 3 > COD 4 8 > COD 14 4 > COD 16 12 > Net 10-EOM 1 3 > Net 10-EOM 3 10 > Net 10-EOM 5 15 > Net 10-EOM 10 21 > > DatePaid is the day of the month in which payments are made. > CountOfPaid is > a count of the number of payments made on particular date. > What I need to > do is to be able to group this data into the following: > > PaymentTerms Paid1-6 Paid7-13 > Paid14-20 Paid21-27 Paid28-31 > COD 16 16 0 > 0 0 > Net10-EOM 28 21 0 > 0 0 > > I know this is a cross tab query but how do I get the > grouping in the first > place? > > Tim Thiessen > > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com > From jwcolby at colbyconsulting.com Thu Jan 15 18:02:06 2004 From: jwcolby at colbyconsulting.com (John W. Colby) Date: Thu, 15 Jan 2004 19:02:06 -0500 Subject: [AccessD] Implements vs WithEvents In-Reply-To: <004b01c3dbc0$d8eb7820$2a3ca8c0@TEXASSYSTEMS.COM> Message-ID: Yes, please send. And if that's a 135, then I never get above about a 20 or so. ;-) Thanks, John W. Colby www.ColbyConsulting.com -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Ken Ismert Sent: Thursday, January 15, 2004 6:40 PM To: 'Access Developers discussion and problem solving' Subject: RE: [AccessD] Implements vs WithEvents >One thing you say intrigues me though. You mention Implements allowing a >custom callback scheme and sending messages. How does this work? How does >the callback communicate between class instances? John, Interesting, the difference in perspectives: after your experience with true object languages, you find VBA limiting, while I cut my teeth on non-object languages, and find Implements a revelation. I'd love to work in a true OOP language that supports inheritance, but feel it would take some time to fully grasp its power and use it effectively. The callback scheme can be summarized as follows: 1. The callbacks are defined as methods in the ICallback interface: ' Insert this code in Class module ICallback Public Sub Message(sBody As Text) End Sub 2. Class CWannaMessage, wanting to receive messages, implements ICallback: Implements ICallback Private Sub ICallback_Message(sBody As Text) Debug.Print sBody End Sub 3. The CWannaMessage object makes a CCaller object, and passes a reference to itself: Set rCaller = New CCaller rCaller.Setup Me 4. CCaller's setup code looks like this: Private mrCallback as ICallback Public Sub Setup(CallbackObj As ICallback) Set mrCallback = CallbackObj End Sub 5. When CCaller wants to send a message: mrCallback.Message "Hello, you!" 6. Since you now have circular object references, CCaller must also provide a way to release its callback reference: Public Sub Shutdown Set mrCallback = Nothing End Sub 7. CWannaMessage must shutdown its caller when it isn't needed, or neither object will terminate: rCaller.Shutdown This example shows a one-on-one conversation, but it could easily be extended for multiple callers. CWannaMessage could maintain a collection of CCallers, and pass each CCaller its name or index on Setup, which CCaller could then pass back when it sends its Message. Or CCaller could just pass a reference to itself (Me) back to CWannaMessage. In any case, ICallback would have to be suitably extended. I calculate the obtuseness of this post at 135 degrees, a 5 degree improvement over the last. -Ken ps: I have some relatively simple form management code using interfaces. It allows a Parent form to open a Child, and be notified when it closes. I'll send you it if you're interested. _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From Subscriptions at servicexp.com Thu Jan 15 18:05:56 2004 From: Subscriptions at servicexp.com (Robert Gracie) Date: Thu, 15 Jan 2004 19:05:56 -0500 Subject: [AccessD] Implements vs WithEvents In-Reply-To: <004b01c3dbc0$d8eb7820$2a3ca8c0@TEXASSYSTEMS.COM> Message-ID: Very Nice, Thank You Ken for Taking the time.... Robert Gracie www.servicexp.com -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Ken Ismert Sent: Thursday, January 15, 2004 6:40 PM To: 'Access Developers discussion and problem solving' Subject: RE: [AccessD] Implements vs WithEvents >One thing you say intrigues me though. You mention Implements allowing a >custom callback scheme and sending messages. How does this work? How does >the callback communicate between class instances? John, Interesting, the difference in perspectives: after your experience with true object languages, you find VBA limiting, while I cut my teeth on non-object languages, and find Implements a revelation. I'd love to work in a true OOP language that supports inheritance, but feel it would take some time to fully grasp its power and use it effectively. The callback scheme can be summarized as follows: 1. The callbacks are defined as methods in the ICallback interface: ' Insert this code in Class module ICallback Public Sub Message(sBody As Text) End Sub 2. Class CWannaMessage, wanting to receive messages, implements ICallback: Implements ICallback Private Sub ICallback_Message(sBody As Text) Debug.Print sBody End Sub 3. The CWannaMessage object makes a CCaller object, and passes a reference to itself: Set rCaller = New CCaller rCaller.Setup Me 4. CCaller's setup code looks like this: Private mrCallback as ICallback Public Sub Setup(CallbackObj As ICallback) Set mrCallback = CallbackObj End Sub 5. When CCaller wants to send a message: mrCallback.Message "Hello, you!" 6. Since you now have circular object references, CCaller must also provide a way to release its callback reference: Public Sub Shutdown Set mrCallback = Nothing End Sub 7. CWannaMessage must shutdown its caller when it isn't needed, or neither object will terminate: rCaller.Shutdown This example shows a one-on-one conversation, but it could easily be extended for multiple callers. CWannaMessage could maintain a collection of CCallers, and pass each CCaller its name or index on Setup, which CCaller could then pass back when it sends its Message. Or CCaller could just pass a reference to itself (Me) back to CWannaMessage. In any case, ICallback would have to be suitably extended. I calculate the obtuseness of this post at 135 degrees, a 5 degree improvement over the last. -Ken ps: I have some relatively simple form management code using interfaces. It allows a Parent form to open a Child, and be notified when it closes. I'll send you it if you're interested. _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From Subscriptions at servicexp.com Thu Jan 15 18:08:16 2004 From: Subscriptions at servicexp.com (Robert Gracie) Date: Thu, 15 Jan 2004 19:08:16 -0500 Subject: [AccessD] Reporting Question In-Reply-To: Message-ID: So is my idea all "Wet", is it not possible, is it too difficult, is it just plain dumb.....? Robert Gracie www.servicexp.com -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Robert Gracie Sent: Wednesday, January 14, 2004 11:26 PM To: Access Developers discussion and problem solving Subject: [AccessD] Reporting Question Hello All, Is there a way to make use of a report that is located in a an external mdb and provide that report with a recordset, or an array. Bottom line is I would like to have a "report library" that is not tied to any data structure and reference that mdb in other projects. I can do everything with the exception of providing the recordset for the report from an un-linked data structure.. Preferably in A2K but open to AXP Any ideas...? Thanks! Robert Gracie www.servicexp.com _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From Subscriptions at servicexp.com Thu Jan 15 18:18:00 2004 From: Subscriptions at servicexp.com (Robert Gracie) Date: Thu, 15 Jan 2004 19:18:00 -0500 Subject: [AccessD] Access shuts down In-Reply-To: Message-ID: John, I'm dealing with the same exact thing. I have found in one case the cause was the use of "DoCmd.Close acForm, Me.Name" and specifically "Me.Name" after a complex algorithm completed. Would shut Access down in a blink of an eye, with no warning or error msg at all. After pulling my hair out, I change the Me.Name to the explicit form name, and the problem went away.. However, I still have one intermittent shutdown on one form and have yet to solve it..... Robert Gracie www.servicexp.com -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of John W. Colby Sent: Thursday, January 15, 2004 2:00 PM To: AccessD Subject: [AccessD] Access shuts down Folks, A client is having an Access app just shut down, no GPF, no "by your leave", just gone. I am wondering if it is because I am doing work on it here at my house where I have Office 2K and Office XP both on the same machine. I installed the "widget" (update) that MS designed to supposedly allow the two to co-exist but I still have my doubts. Has anyone seen this? John W. Colby www.ColbyConsulting.com _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From cfoust at infostatsystems.com Thu Jan 15 18:24:14 2004 From: cfoust at infostatsystems.com (Charlotte Foust) Date: Thu, 15 Jan 2004 16:24:14 -0800 Subject: [AccessD] Reporting Question Message-ID: I'm not sure I understand the concept. How can you build reports independent of data structure? Anyhow Access reports don't even *have* an exposed recordset property until AXP, and then there are some limitations associated with its use. Charlotte Foust -----Original Message----- From: Robert Gracie [mailto:Subscriptions at servicexp.com] Sent: Thursday, January 15, 2004 4:08 PM To: Access Developers discussion and problem solving Subject: RE: [AccessD] Reporting Question So is my idea all "Wet", is it not possible, is it too difficult, is it just plain dumb.....? Robert Gracie www.servicexp.com -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Robert Gracie Sent: Wednesday, January 14, 2004 11:26 PM To: Access Developers discussion and problem solving Subject: [AccessD] Reporting Question Hello All, Is there a way to make use of a report that is located in a an external mdb and provide that report with a recordset, or an array. Bottom line is I would like to have a "report library" that is not tied to any data structure and reference that mdb in other projects. I can do everything with the exception of providing the recordset for the report from an un-linked data structure.. Preferably in A2K but open to AXP Any ideas...? Thanks! Robert Gracie www.servicexp.com _______________________________________________ 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 From Jdemarco at hudsonhealthplan.org Thu Jan 15 13:32:47 2004 From: Jdemarco at hudsonhealthplan.org (Jim DeMarco) Date: Thu, 15 Jan 2004 14:32:47 -0500 Subject: [AccessD] Access shuts down Message-ID: <22F1CCD5171D17419CB37FEEE09D5F990173FB6C@TTNEXCHSRV1.hshhp.com> Is it just shutting down out of the blue (with no user activity at all) or are you clicking something or otherwise navigating or typing into the app? Jim DeMarco -----Original Message----- From: John W. Colby [mailto:jwcolby at colbyconsulting.com] Sent: Thursday, January 15, 2004 2:00 PM To: AccessD Subject: [AccessD] Access shuts down Folks, A client is having an Access app just shut down, no GPF, no "by your leave", just gone. I am wondering if it is because I am doing work on it here at my house where I have Office 2K and Office XP both on the same machine. I installed the "widget" (update) that MS designed to supposedly allow the two to co-exist but I still have my doubts. Has anyone seen this? John W. Colby www.ColbyConsulting.com _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From michael.mattys at adelphia.net Thu Jan 15 18:43:53 2004 From: michael.mattys at adelphia.net (Michael R Mattys) Date: Thu, 15 Jan 2004 19:43:53 -0500 Subject: [AccessD] Reporting Question References: Message-ID: <03a001c3dbc9$d3d9c680$6401a8c0@default> ----- Original Message ----- From: "Robert Gracie" To: "Access Developers discussion and problem solving" Sent: Thursday, January 15, 2004 7:08 PM Subject: RE: [AccessD] Reporting Question > > So is my idea all "Wet", is it not possible, is it too difficult, is it > just plain dumb.....? > > > Robert Gracie > www.servicexp.com Robert, Opening a report "remotely" is definately possible and if you want it, then it's not dumb. In fact, I know several people from this list who do it all the time. It's simply a matter of populating the table that the remote report is based on. Sub DisplayReport() Dim appAccess As Application Const strConPathToSamples = "C:\Program Files\Microsoft Office\Office\Samples\Northwind.mdb" Dim strDB As String ' Initialize string to database path. strDB = strConPathToSamples ' Create new instance of Microsoft Access. Set appAccess = CreateObject("Access.Application.8") ' Open database in Microsoft Access window. appAccess.OpenCurrentDatabase strDB '>Delete * From Table and populate as you see fit ' Open Report. appAccess.DoCmd.OpenReport "Alphabetical List of Products", acViewPreview appAccess.Visible = True Set appAccess = Nothing End Sub Michael R. Mattys Try MattysMapLib for MapPoint at www.mattysconsulting.com From Subscriptions at servicexp.com Thu Jan 15 19:05:47 2004 From: Subscriptions at servicexp.com (Robert Gracie) Date: Thu, 15 Jan 2004 20:05:47 -0500 Subject: [AccessD] Reporting Question In-Reply-To: Message-ID: Ok, the concept would be much like that of a split db. The BE being only used for data and the front end only for FE Objects such as forms, queries ..etc. I would like to take that one step further and break off the reports into a referenced mdb, separate from the FE and BE mainly because it is difficult to use an Unsecured "Report db" to pull the data from a secured BE. The problem is, the my market demographic that I want to capture for use of a program requires the flexibility of some key forms (that are generated from with-in the "host" mdb) to be user formatable so as to suit his or her business needs. As you know you can't do this in a mde. And I've come to realize no matter how thorough you lock down an mdb, it can be easily hacked... I guess the model would be much like that of Crystal Reports... I think...:-) Robert Gracie www.servicexp.com -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Charlotte Foust Sent: Thursday, January 15, 2004 7:24 PM To: Access Developers discussion and problem solving Subject: RE: [AccessD] Reporting Question I'm not sure I understand the concept. How can you build reports independent of data structure? Anyhow Access reports don't even *have* an exposed recordset property until AXP, and then there are some limitations associated with its use. Charlotte Foust -----Original Message----- From: Robert Gracie [mailto:Subscriptions at servicexp.com] Sent: Thursday, January 15, 2004 4:08 PM To: Access Developers discussion and problem solving Subject: RE: [AccessD] Reporting Question So is my idea all "Wet", is it not possible, is it too difficult, is it just plain dumb.....? Robert Gracie www.servicexp.com -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Robert Gracie Sent: Wednesday, January 14, 2004 11:26 PM To: Access Developers discussion and problem solving Subject: [AccessD] Reporting Question Hello All, Is there a way to make use of a report that is located in a an external mdb and provide that report with a recordset, or an array. Bottom line is I would like to have a "report library" that is not tied to any data structure and reference that mdb in other projects. I can do everything with the exception of providing the recordset for the report from an un-linked data structure.. Preferably in A2K but open to AXP Any ideas...? Thanks! Robert Gracie www.servicexp.com _______________________________________________ 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 _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From Subscriptions at servicexp.com Thu Jan 15 19:14:06 2004 From: Subscriptions at servicexp.com (Robert Gracie) Date: Thu, 15 Jan 2004 20:14:06 -0500 Subject: [AccessD] Reporting Question In-Reply-To: <03a001c3dbc9$d3d9c680$6401a8c0@default> Message-ID: Thank You Michael, However it's not quite what I need. I need to also pass the report the data, as the "reporting mdb" needs to be un-secured, yet the BE data is secured. This creates problem linking to the BE... What I have come up with so far allows me to reference the "Report.mdb" and open up the report inside of the host mdb but I can't seem to figure out how to pass the data to the report.... Any help, leads, or idea would be great!! Thanks Robert Gracie www.servicexp.com -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Michael R Mattys Sent: Thursday, January 15, 2004 7:44 PM To: Access Developers discussion and problem solving Subject: Re: [AccessD] Reporting Question ----- Original Message ----- From: "Robert Gracie" To: "Access Developers discussion and problem solving" Sent: Thursday, January 15, 2004 7:08 PM Subject: RE: [AccessD] Reporting Question > > So is my idea all "Wet", is it not possible, is it too difficult, is it > just plain dumb.....? > > > Robert Gracie > www.servicexp.com Robert, Opening a report "remotely" is definately possible and if you want it, then it's not dumb. In fact, I know several people from this list who do it all the time. It's simply a matter of populating the table that the remote report is based on. Sub DisplayReport() Dim appAccess As Application Const strConPathToSamples = "C:\Program Files\Microsoft Office\Office\Samples\Northwind.mdb" Dim strDB As String ' Initialize string to database path. strDB = strConPathToSamples ' Create new instance of Microsoft Access. Set appAccess = CreateObject("Access.Application.8") ' Open database in Microsoft Access window. appAccess.OpenCurrentDatabase strDB '>Delete * From Table and populate as you see fit ' Open Report. appAccess.DoCmd.OpenReport "Alphabetical List of Products", acViewPreview appAccess.Visible = True Set appAccess = Nothing End Sub Michael R. Mattys Try MattysMapLib for MapPoint at www.mattysconsulting.com _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From KIsmert at TexasSystems.com Thu Jan 15 20:04:11 2004 From: KIsmert at TexasSystems.com (Ken Ismert) Date: Thu, 15 Jan 2004 20:04:11 -0600 Subject: [AccessD] Implements vs WithEvents In-Reply-To: Message-ID: <006a01c3dbd5$093a2b70$2a3ca8c0@TEXASSYSTEMS.COM> You're welcome. -----Original Message----- From: Robert Gracie [mailto:Subscriptions at servicexp.com] Sent: Thursday, January 15, 2004 6:06 PM To: Access Developers discussion and problem solving Subject: RE: [AccessD] Implements vs WithEvents Very Nice, Thank You Ken for Taking the time.... Robert Gracie www.servicexp.com .... From michael.mattys at adelphia.net Thu Jan 15 20:09:04 2004 From: michael.mattys at adelphia.net (Michael R Mattys) Date: Thu, 15 Jan 2004 21:09:04 -0500 Subject: [AccessD] Reporting Question References: Message-ID: <03d701c3dbd5$b8cc9c80$6401a8c0@default> Robert, I copied the tables (Products and Suppliers) from Northwind to my database and opened the report in design view. Then I set the recordsource to Products1 in the currentdb. Sub DisplayReport() Dim appAccess As Application, rpt As Report Const strConPathToSamples = "C:\Program Files\Microsoft Office\Office\Samples\Northwind.mdb" Dim strDB As String ' Initialize string to database path. strDB = strConPathToSamples ' Create new instance of Microsoft Access. Set appAccess = CreateObject("Access.Application.8") ' Open database in Microsoft Access window. appAccess.OpenCurrentDatabase strDB ' Open Orders form. appAccess.DoCmd.OpenReport "Alphabetical List of Products", acViewDesign Set rpt = appAccess.REPORTS("Alphabetical List of Products") rpt.RecordSource = "Select * From Products1 in '" & CurrentDb.Name & "'" appAccess.DoCmd.OpenReport "Alphabetical List of Products", acViewPreview appAccess.Visible = True Set rpt = Nothing Set appAccess = Nothing End Sub Michael R. Mattys Try MattysMapLib for MapPoint at www.mattysconsulting.com From d.dick at uws.edu.au Thu Jan 15 23:18:32 2004 From: d.dick at uws.edu.au (Darren DICK) Date: Fri, 16 Jan 2004 16:18:32 +1100 Subject: [AccessD] A2K: Is it possible....? Message-ID: <005301c3dbf0$2efde110$48619a89@DDICK> Hello all I have a combo box fed by a simple SQL Me.cboMycombo.rowsource = "SELECT tblMyTable.* FROM tblMyTable;" So far so good. If there are 5 items in tblMyTable I expect to see 5 items in the combo box. Here's the tricky Bit. Say I want to add a 6th entry that is really just a line of text that is not in the table A string something like "" then have the 'real' 5 or so items from the table in addition to the 1 line of text Make sense? Many thanks in advance Darren From handyman at actcom.co.il Thu Jan 15 23:49:50 2004 From: handyman at actcom.co.il (handyman at actcom.co.il) Date: Fri, 16 Jan 2004 07:49:50 +0200 Subject: [AccessD] A2K: Is it possible....? In-Reply-To: <005301c3dbf0$2efde110$48619a89@DDICK> Message-ID: <5.1.0.14.2.20040116074327.025cc610@pop5.actcom.net.il> These links might help you do what you want. http://msdn.microsoft.com/library/default.asp?url=/library/en-us/dnofftalk/html/office03022000.asp http://members.iinet.net.au/~allenbrowne/ser-07.html gm At 04:18 PM, 1/16/2004 +1100, you wrote: >Hello all >I have a combo box fed by a simple SQL >Me.cboMycombo.rowsource = "SELECT tblMyTable.* FROM tblMyTable;" >So far so good. If there are 5 items in tblMyTable I expect to see 5 items >in the combo box. > >Here's the tricky Bit. >Say I want to add a 6th entry that is really just a line of text that is >not in the table >A string something like "" then have the >'real' 5 or so items >from the table in addition to the 1 line of text > >Make sense? > >Many thanks in advance > >Darren > >_______________________________________________ >AccessD mailing list >AccessD at databaseadvisors.com >http://databaseadvisors.com/mailman/listinfo/accessd >Website: http://www.databaseadvisors.com Gershon Markowitz mailto:Handyman at actcom.co.il http://www.yadchaimtzvi.org From wdhindman at bellsouth.net Fri Jan 16 00:18:41 2004 From: wdhindman at bellsouth.net (William Hindman) Date: Fri, 16 Jan 2004 01:18:41 -0500 Subject: [AccessD] A2K: Is it possible....? References: <005301c3dbf0$2efde110$48619a89@DDICK> Message-ID: <000401c3dbf8$9637af70$6101a8c0@dejpolsys> Darren ...off the top of my head (and thus not tested) try Me.cboMycombo.rowsource = "SELECT DISTINCTROW tblMyTable.* UNION SELECT "" ,"" FROM tblMyTable ;" William Hindman - Next Year In The Free State! ----- Original Message ----- From: "Darren DICK" To: "AccessD List" Sent: Friday, January 16, 2004 12:18 AM Subject: [AccessD] A2K: Is it possible....? > Hello all > I have a combo box fed by a simple SQL > Me.cboMycombo.rowsource = "SELECT tblMyTable.* FROM tblMyTable;" > So far so good. If there are 5 items in tblMyTable I expect to see 5 items in the combo box. > > Here's the tricky Bit. > Say I want to add a 6th entry that is really just a line of text that is not in the table > A string something like "" then have the 'real' 5 or so items > from the table in addition to the 1 line of text > > Make sense? > > Many thanks in advance > > Darren > > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com > From d.dick at uws.edu.au Fri Jan 16 01:06:58 2004 From: d.dick at uws.edu.au (Darren DICK) Date: Fri, 16 Jan 2004 18:06:58 +1100 Subject: [AccessD] A2K: Is it possible....? References: <5.1.0.14.2.20040116074327.025cc610@pop5.actcom.net.il> Message-ID: <005001c3dbff$54c584c0$48619a89@DDICK> Thanks Handy Man ----- Original Message ----- From: To: "Access Developers discussion and problem solving" Sent: Friday, January 16, 2004 4:49 PM Subject: Re: [AccessD] A2K: Is it possible....? > > These links might help you do what you want. > > http://msdn.microsoft.com/library/default.asp?url=/library/en-us/dnofftalk/html/office03022000.asp > http://members.iinet.net.au/~allenbrowne/ser-07.html > > gm > > At 04:18 PM, 1/16/2004 +1100, you wrote: > >Hello all > >I have a combo box fed by a simple SQL > >Me.cboMycombo.rowsource = "SELECT tblMyTable.* FROM tblMyTable;" > >So far so good. If there are 5 items in tblMyTable I expect to see 5 items > >in the combo box. > > > >Here's the tricky Bit. > >Say I want to add a 6th entry that is really just a line of text that is > >not in the table > >A string something like "" then have the > >'real' 5 or so items > >from the table in addition to the 1 line of text > > > >Make sense? > > > >Many thanks in advance > > > >Darren > > > >_______________________________________________ > >AccessD mailing list > >AccessD at databaseadvisors.com > >http://databaseadvisors.com/mailman/listinfo/accessd > >Website: http://www.databaseadvisors.com > > Gershon Markowitz > mailto:Handyman at actcom.co.il > http://www.yadchaimtzvi.org > > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com From d.dick at uws.edu.au Fri Jan 16 01:07:12 2004 From: d.dick at uws.edu.au (Darren DICK) Date: Fri, 16 Jan 2004 18:07:12 +1100 Subject: [AccessD] A2K: Is it possible....? References: <005301c3dbf0$2efde110$48619a89@DDICK> <000401c3dbf8$9637af70$6101a8c0@dejpolsys> Message-ID: <005601c3dbff$5d91de50$48619a89@DDICK> Oh William Sheer Genius many thanks ----- Original Message ----- From: "William Hindman" To: "Access Developers discussion and problem solving" Sent: Friday, January 16, 2004 5:18 PM Subject: Re: [AccessD] A2K: Is it possible....? > Darren > > ...off the top of my head (and thus not tested) try Me.cboMycombo.rowsource > = "SELECT DISTINCTROW tblMyTable.* UNION SELECT " List>" ,"" FROM tblMyTable ;" > > William Hindman > - Next Year In The Free State! > > > ----- Original Message ----- > From: "Darren DICK" > To: "AccessD List" > Sent: Friday, January 16, 2004 12:18 AM > Subject: [AccessD] A2K: Is it possible....? > > > > Hello all > > I have a combo box fed by a simple SQL > > Me.cboMycombo.rowsource = "SELECT tblMyTable.* FROM tblMyTable;" > > So far so good. If there are 5 items in tblMyTable I expect to see 5 items > in the combo box. > > > > Here's the tricky Bit. > > Say I want to add a 6th entry that is really just a line of text that is > not in the table > > A string something like "" then have the > 'real' 5 or so items > > from the table in addition to the 1 line of text > > > > Make sense? > > > > Many thanks in advance > > > > Darren > > > > _______________________________________________ > > 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 From Erwin.Craps at ithelps.be Fri Jan 16 01:39:09 2004 From: Erwin.Craps at ithelps.be (Erwin Craps - IT Helps) Date: Fri, 16 Jan 2004 08:39:09 +0100 Subject: [AccessD] Access Support in 2006 Message-ID: <46B976F2B698FF46A4FE7636509B22DF03D11E@stekelbes.ithelps.local> Maybe the rumor is psread by some competitor when they release a new version? :-) Filemaker Pro? (Can't think of another still existing database) -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of DJK(John) Robinson Sent: Thursday, January 15, 2004 11:51 PM To: 'Access Developers discussion and problem solving' Subject: RE: [AccessD] Access Support in 2006 This rumor seems to come round every few years - with different dates in ... John > -----Original Message----- > From: accessd-bounces at databaseadvisors.com > [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Gowey Mike > W > Sent: 15 January 2004 19:53 > To: Access Developers discussion and problem solving > Subject: [AccessD] Access Support in 2006 > > > > > Just a fast question to everyone. I have been told that there is a > rumor that Microsoft is not going to support Access anymore come 2006. > > Has anyone else heard anything else about this and if true what they > plan on replacing it with????? > > I hope this don't cause too much of a string, I was just surprised and > caught off guard. > > > Thanks, > > Mike Gowey, MCSA, A+ > Team Leader - SRCI > Information Systems & Services Division > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/a> ccessd > Website: > http://www.databaseadvisors.com > _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From clh at christopherhawkins.com Fri Jan 16 05:13:27 2004 From: clh at christopherhawkins.com (Christopher Hawkins) Date: Fri, 16 Jan 2004 04:13:27 -0700 Subject: [AccessD] Silently send email from Access? Message-ID: <184670-220041516111327172@christopherhawkins.com> I have used the DoCmd.SendObject command to send email from within an application before, but with recent versions of Outlook this has become cumbersome due to the security in place by default. Now the user is prompted that something is attempting to access their mailbox, etc. I have been asked to make an application silently send email to certain people when certain events occur in their system. They specifically said they want all eMail from the app to be silent; no security warnings. I don't have the foggiest clue how to do this without disabling their exchange server's security entirely, which is out of the question. Is it possible for my application to execute the SendObject command in an administrative context? Or something? Has anyone done this? -Christopher- From gustav at cactus.dk Fri Jan 16 05:16:58 2004 From: gustav at cactus.dk (Gustav Brock) Date: Fri, 16 Jan 2004 12:16:58 +0100 Subject: [AccessD] Grouping Query In-Reply-To: <007901c3dbae$b2e74800$7800a8c0@timt> References: <007901c3dbae$b2e74800$7800a8c0@timt> Message-ID: <6211337792.20040116121658@cactus.dk> Hi Tim You can get pretty close: TRANSFORM Sum(CountOfPaid) SELECT PaymentTerms FROM tblPayments GROUP BY PaymentTerms PIVOT "Paid" & Format(([DatePaid]\7)*7,"00") & "-" & Format((1+([DatePaid]\7))*7-1,"00"); This will return: PaymentTerms Paid00-06 Paid07-13 Paid14-20 COD 16 16 Net 10-EOM 28 21 If you need all columns, you'll have to create a select query which returns all fields, then outer join this to the crosstab above. Off the head I don't know how to turn "Paid00-06" into "Paid01-06". /gustav > I have a query that returns the following: > PaymentTerms DatePaid CountOfPaid > COD 1 5 > COD 2 3 > COD 4 8 > COD 14 4 > COD 16 12 > Net 10-EOM 1 3 > Net 10-EOM 3 10 > Net 10-EOM 5 15 > Net 10-EOM 10 21 > DatePaid is the day of the month in which payments are made. CountOfPaid is > a count of the number of payments made on particular date. What I need to > do is to be able to group this data into the following: > PaymentTerms Paid1-6 Paid7-13 Paid14-20 Paid21-27 Paid28-31 > COD 16 16 0 0 0 > Net10-EOM 28 21 0 0 0 > I know this is a cross tab query but how do I get the grouping in the first > place? > Tim Thiessen From gustav at cactus.dk Fri Jan 16 04:07:44 2004 From: gustav at cactus.dk (Gustav Brock) Date: Fri, 16 Jan 2004 11:07:44 +0100 Subject: [AccessD] Re: MDW file In-Reply-To: <5.1.0.14.2.20040115151234.042a0af8@pop3.highstream.net> References: <5.1.0.14.2.20040115151234.042a0af8@pop3.highstream.net> Message-ID: <367184330.20040116110744@cactus.dk> Hi John Or pick a real installer like Inno Setup for free: http://www.jrsoftware.org/ It has sample scripts (text files) which easily lets you create your own scripts. /gustav > John, > Get WinRAR. It is like WinZip, but has a couple > of features that you need. It will create a SPX > file that is an executable that will do directory > things, like create them, and then uncompress the > files into a specific directory. > Go to a working client machine. Do the WinRAR > process on the client files to create the SPX > file. Then place it on the network. Now, by > opening that file, everyone can install the program > locally. > Robert >>Anyhow, now that I have explained how 'good' I have become, I was >>thrown a twist. Because this guy is out of town, he cannot respond to a >>call that they have regarding a program he wrote. It needs to be placed >>on the desktops, of another department. "No problem," I said, "I can >>handle it." But I notice in the shortcut that exists, in the original >>department, it uses an .MDW file in the target line (ms.mdw" "c:\program >>files\cms\cmssecure.mdb"). I just called to verify this line, because I >>thought that at least a "c was missing from the front...I don't get the >>one quote mark. >> >>I have never used workgroup features of Access, and I really don't plan >>to. What do I need to do to set this up? From paul.hartland at fsmail.net Fri Jan 16 05:22:40 2004 From: paul.hartland at fsmail.net (paul.hartland at fsmail.net) Date: Fri, 16 Jan 2004 12:22:40 +0100 (CET) Subject: [AccessD] Silently send email from Access? Message-ID: <24879849.1074252160454.JavaMail.www@wwinf3006> Christopher, You could use vbSendMail, I can't remember the site I got it from but if you type it into a search engine I'm sure you will come up with something. Basically it's like a ocx control and it sends mail directly to the SMTP server bypassing the security warnings. Hope this helps. Paul Hartland Message date : Jan 16 2004, 11:15 AM >From : Christopher Hawkins To : accessd at databaseadvisors.com Copy to : Subject : [AccessD] Silently send email from Access? I have used the DoCmd.SendObject command to send email from within an application before, but with recent versions of Outlook this has become cumbersome due to the security in place by default. Now the user is prompted that something is attempting to access their mailbox, etc. I have been asked to make an application silently send email to certain people when certain events occur in their system. They specifically said they want all eMail from the app to be silent; no security warnings. I don't have the foggiest clue how to do this without disabling their exchange server's security entirely, which is out of the question. Is it possible for my application to execute the SendObject command in an administrative context? Or something? Has anyone done this? -Christopher- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com Freeserve AnyTime - HALF PRICE for the first 3 months - Save ?7.50 a month www.freeserve.com/anytime From mikedorism at adelphia.net Fri Jan 16 06:06:23 2004 From: mikedorism at adelphia.net (Mike & Doris Manning) Date: Fri, 16 Jan 2004 07:06:23 -0500 Subject: [AccessD] Silently send email from Access? In-Reply-To: <184670-220041516111327172@christopherhawkins.com> Message-ID: <000001c3dc29$29250e10$8b194244@hargrove.internal> Check out Redemption (http://www.dimastr.com/redemption/). We have been using it for quite some time and have had no problems with it. Doris Manning Database Administrator Hargrove Inc. www.hargroveinc.com -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Christopher Hawkins Sent: Friday, January 16, 2004 6:13 AM To: accessd at databaseadvisors.com Subject: [AccessD] Silently send email from Access? I have used the DoCmd.SendObject command to send email from within an application before, but with recent versions of Outlook this has become cumbersome due to the security in place by default. Now the user is prompted that something is attempting to access their mailbox, etc. I have been asked to make an application silently send email to certain people when certain events occur in their system. They specifically said they want all eMail from the app to be silent; no security warnings. I don't have the foggiest clue how to do this without disabling their exchange server's security entirely, which is out of the question. Is it possible for my application to execute the SendObject command in an administrative context? Or something? Has anyone done this? -Christopher- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From accessd666 at yahoo.com Fri Jan 16 06:25:36 2004 From: accessd666 at yahoo.com (Sad Der) Date: Fri, 16 Jan 2004 04:25:36 -0800 (PST) Subject: [AccessD] Error 3218 "Couldn't Update; Currently Locked" Message-ID: <20040116122536.27828.qmail@web60208.mail.yahoo.com> Hi group, We use A2K SP1 on a Novell network. occasionally the users get the following error: Error 3218 "Couldn't Update; Currently Locked" I noticed that this occurs when a user tries to load interface messages into the DB. The messages have approx. 100-150 records. Total size of 12Kb. I read on support.microsoft.com (KB302484) that this has to do with the number of record locks on the Novell server. But this KB-Article is related to A97! What's the deal with locking in A2k? We 'enherited' this system and error handling, if any, is really buggy. So every time this occurs we get a lot(!) of db-pollution!! My question: What can I do to prevent this from happening? TIA, SD __________________________________ Do you Yahoo!? Yahoo! Hotjobs: Enter the "Signing Bonus" Sweepstakes http://hotjobs.sweepstakes.yahoo.com/signingbonus From gustav at cactus.dk Fri Jan 16 06:42:32 2004 From: gustav at cactus.dk (Gustav Brock) Date: Fri, 16 Jan 2004 13:42:32 +0100 Subject: [AccessD] Error 3218 "Couldn't Update; Currently Locked" In-Reply-To: <20040116122536.27828.qmail@web60208.mail.yahoo.com> References: <20040116122536.27828.qmail@web60208.mail.yahoo.com> Message-ID: <13416471845.20040116134232@cactus.dk> Hi Sad And the article probably relates to NetWare 4.x too. Which NW are you running? What are the comments from your NW guy? Are you running an antivirus scanner on the server? /gustav > Hi group, > We use A2K SP1 on a Novell network. > occasionally the users get the following error: > Error 3218 "Couldn't Update; Currently Locked" > I noticed that this occurs when a user tries to load > interface messages into the DB. The messages have > approx. 100-150 records. Total size of 12Kb. > I read on support.microsoft.com (KB302484) that this > has to do with the number of record locks on the Novell > server. But this KB-Article is related to A97! > What's the deal with locking in A2k? > We 'enherited' this system and error handling, if any, > is really buggy. So every time this occurs we get a > lot(!) of db-pollution!! > My question: What can I do to prevent this from > happening? From accessd666 at yahoo.com Fri Jan 16 06:51:25 2004 From: accessd666 at yahoo.com (Sad Der) Date: Fri, 16 Jan 2004 04:51:25 -0800 (PST) Subject: [AccessD] Error 3218 "Couldn't Update; Currently Locked" In-Reply-To: <13416471845.20040116134232@cactus.dk> Message-ID: <20040116125125.29954.qmail@web60210.mail.yahoo.com> Hi Gustav, thnx for you're reply. Why did ask about the antivirus scanner? Could that interfere? SD --- Gustav Brock wrote: > Hi Sad > > And the article probably relates to NetWare 4.x too. > Which NW are you running? > What are the comments from your NW guy? > Are you running an antivirus scanner on the server? > > /gustav > > > > Hi group, > > > We use A2K SP1 on a Novell network. > > occasionally the users get the following error: > > Error 3218 "Couldn't Update; Currently Locked" > > > I noticed that this occurs when a user tries to > load > > interface messages into the DB. The messages have > > approx. 100-150 records. Total size of 12Kb. > > > I read on support.microsoft.com (KB302484) that > this > > has to do with the number of record locks on the > Novell > > server. But this KB-Article is related to A97! > > > What's the deal with locking in A2k? > > > We 'enherited' this system and error handling, if > any, > > is really buggy. So every time this occurs we get > a > > lot(!) of db-pollution!! > > > My question: What can I do to prevent this from > > happening? > > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com __________________________________ Do you Yahoo!? Yahoo! Hotjobs: Enter the "Signing Bonus" Sweepstakes http://hotjobs.sweepstakes.yahoo.com/signingbonus From gustav at cactus.dk Fri Jan 16 06:59:58 2004 From: gustav at cactus.dk (Gustav Brock) Date: Fri, 16 Jan 2004 13:59:58 +0100 Subject: [AccessD] Error 3218 "Couldn't Update; Currently Locked" In-Reply-To: <20040116125125.29954.qmail@web60210.mail.yahoo.com> References: <20040116125125.29954.qmail@web60210.mail.yahoo.com> Message-ID: <9217517939.20040116135958@cactus.dk> Hi Sad Yes, perhaps. Not very likely but who knows? /gustav > Why did ask about the antivirus scanner? Could that > interfere? From accessd666 at yahoo.com Fri Jan 16 07:12:42 2004 From: accessd666 at yahoo.com (Sad Der) Date: Fri, 16 Jan 2004 05:12:42 -0800 (PST) Subject: [AccessD] Error 3218 "Couldn't Update; Currently Locked" In-Reply-To: <9217517939.20040116135958@cactus.dk> Message-ID: <20040116131242.9656.qmail@web60203.mail.yahoo.com> The magical world of Novell :-) SD --- Gustav Brock wrote: > Hi Sad > > Yes, perhaps. Not very likely but who knows? > > /gustav > > > > Why did ask about the antivirus scanner? Could > that > > interfere? > > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com __________________________________ Do you Yahoo!? Yahoo! Hotjobs: Enter the "Signing Bonus" Sweepstakes http://hotjobs.sweepstakes.yahoo.com/signingbonus From LChristian at MassMutual.com Fri Jan 16 08:06:32 2004 From: LChristian at MassMutual.com (Christian, Lorraine) Date: Fri, 16 Jan 2004 09:06:32 -0500 Subject: [AccessD] Silently send email from Access? Message-ID: <5B898D9F0627974EB82D0645E52B1E7D035CBB0F@EXMBPR03.na.mmfg.net> Hi Chris, I sent a similar message out the other day. Do a search in the Archives where the subject reads...Outlook SP3. You will see the responses. HTH, Lorraine -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Christopher Hawkins Sent: Friday, January 16, 2004 6:13 AM To: accessd at databaseadvisors.com Subject: [AccessD] Silently send email from Access? I have used the DoCmd.SendObject command to send email from within an application before, but with recent versions of Outlook this has become cumbersome due to the security in place by default. Now the user is prompted that something is attempting to access their mailbox, etc. I have been asked to make an application silently send email to certain people when certain events occur in their system. They specifically said they want all eMail from the app to be silent; no security warnings. I don't have the foggiest clue how to do this without disabling their exchange server's security entirely, which is out of the question. Is it possible for my application to execute the SendObject command in an administrative context? Or something? Has anyone done this? -Christopher- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com --------------------------------------------------------- This e-mail transmission may contain information that is proprietary, privileged and/or confidential and is intended exclusively for the person(s) to whom it is addressed. Any use, copying, retention or disclosure by any person other than the intended recipient or the intended recipient's designees is strictly prohibited. If you are not the intended recipient or their designee, please notify the sender immediately by return e-mail and delete all copies. --------------------------------------------------------- From John.Clark at niagaracounty.com Fri Jan 16 08:05:40 2004 From: John.Clark at niagaracounty.com (John Clark) Date: Fri, 16 Jan 2004 09:05:40 -0500 Subject: [AccessD] MDW file...break in? Message-ID: I would like to thank everyone who responded to my MDW problem. As my kids would say, "This list Rocks!!!" It turns out my boss had an Email address that the guy is checking in on, and he provide us with the password. All seems to be well...for now...and I have some links to some sites with some new toys. Gustav...I am trying to learn that INNO, but, unless I am missing something, it doesn't seem real 'intuitive'. Not that it needs to be, it just wasn't point and click for me, that's all. I'm headed out to look at that WinRAR that Robert suggested, in just a few moments. If it is actually this simple, it will work great for this particular program. I think I'll probably need something a little more robust for future progs because I use two uncommon fonts and I need them installed also. Thanks again everyone...I really appreciate this! Take care! John W Clark From gustav at cactus.dk Fri Jan 16 08:18:20 2004 From: gustav at cactus.dk (Gustav Brock) Date: Fri, 16 Jan 2004 15:18:20 +0100 Subject: [AccessD] MDW file...break in? In-Reply-To: References: Message-ID: <17722219980.20040116151820@cactus.dk> Hi John > Gustav...I am trying to learn that INNO, but, unless I am missing > something, it doesn't seem real 'intuitive'. Not that it needs to be, it > just wasn't point and click for me, that's all. Njah, you will have to study the help file and compare with the samples - the simple ones are all you need. > I'm headed out to look at that WinRAR that Robert suggested, in just a > few moments. If it is actually this simple, it will work great for this > particular program. I think I'll probably need something a little more > robust for future progs because I use two uncommon fonts and I need them > installed also. Inno handles this - as well as shortcuts etc. /gustav From jimdettman at earthlink.net Fri Jan 16 08:22:29 2004 From: jimdettman at earthlink.net (Jim Dettman) Date: Fri, 16 Jan 2004 09:22:29 -0500 Subject: [AccessD] Error 3218 "Couldn't Update; Currently Locked" In-Reply-To: <20040116122536.27828.qmail@web60208.mail.yahoo.com> Message-ID: <> There are lots of things that will cause that message, but I think you might be barking up the wrong tree in that it's a Novell problem. From your comments abut it being "buggy", I would think more that the app was poorly written and stepping on it's own toes, resulting in the above error. One way to check that out easily is to copy the backend to a local drive, re-link the tables (I'm assuming it's a split app), then test. If you still get the error messages it has nothing to do with Novell. If the error disappears, then it's related to locking. The other test you can do is using the SetOption method of the dbEngine object, set dbMaxLocksPerFile to a number less then the allowed number of locks under Novell. This will ensure that JET never uses more locks then Novell allows. If that was the problem, the error messages will disappear. Jim Dettman President, Online Computer Services of WNY, Inc. (315) 699-3443 jimdettman at earthlink.net -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Sad Der Sent: Friday, January 16, 2004 7:26 AM To: Acces User Group Subject: [AccessD] Error 3218 "Couldn't Update; Currently Locked" Hi group, We use A2K SP1 on a Novell network. occasionally the users get the following error: Error 3218 "Couldn't Update; Currently Locked" I noticed that this occurs when a user tries to load interface messages into the DB. The messages have approx. 100-150 records. Total size of 12Kb. I read on support.microsoft.com (KB302484) that this has to do with the number of record locks on the Novell server. But this KB-Article is related to A97! What's the deal with locking in A2k? We 'enherited' this system and error handling, if any, is really buggy. So every time this occurs we get a lot(!) of db-pollution!! My question: What can I do to prevent this from happening? TIA, SD __________________________________ Do you Yahoo!? Yahoo! Hotjobs: Enter the "Signing Bonus" Sweepstakes http://hotjobs.sweepstakes.yahoo.com/signingbonus _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From accessd666 at yahoo.com Fri Jan 16 08:35:49 2004 From: accessd666 at yahoo.com (Sad Der) Date: Fri, 16 Jan 2004 06:35:49 -0800 (PST) Subject: [AccessD] Error 3218 "Couldn't Update; Currently Locked" <> In-Reply-To: Message-ID: <20040116143549.48625.qmail@web60206.mail.yahoo.com> thnx for all the relplies! These are the new settings: Max. Records Lock per Connection: 1000 Max. Files Lock per Connection: 5000 Max. Records Lock: 40000 Max. Files Lock: 400000 How can I test these? Ok, for the first one I have to lock 999, 1000, 1001 records...question is how do I do that? Is importing a file with 999, 1000, 1001 records enough? Any testing tips/links? TIA. SD --- Jim Dettman wrote: > < occasionally the users get the following error: > Error 3218 "Couldn't Update; Currently Locked">> > > There are lots of things that will cause that > message, but I think you > might be barking up the wrong tree in that it's a > Novell problem. > > From your comments abut it being "buggy", I would > think more that the app > was poorly written and stepping on it's own toes, > resulting in the above > error. > > One way to check that out easily is to copy the > backend to a local drive, > re-link the tables (I'm assuming it's a split app), > then test. If you still > get the error messages it has nothing to do with > Novell. If the error > disappears, then it's related to locking. > > The other test you can do is using the SetOption > method of the dbEngine > object, set dbMaxLocksPerFile to a number less then > the allowed number of > locks under Novell. This will ensure that JET never > uses more locks then > Novell allows. If that was the problem, the error > messages will disappear. > > Jim Dettman > President, > Online Computer Services of WNY, Inc. > (315) 699-3443 > jimdettman at earthlink.net > > -----Original Message----- > From: accessd-bounces at databaseadvisors.com > [mailto:accessd-bounces at databaseadvisors.com]On > Behalf Of Sad Der > Sent: Friday, January 16, 2004 7:26 AM > To: Acces User Group > Subject: [AccessD] Error 3218 "Couldn't Update; > Currently Locked" > > > Hi group, > > We use A2K SP1 on a Novell network. > occasionally the users get the following error: > Error 3218 "Couldn't Update; Currently Locked" > > I noticed that this occurs when a user tries to load > interface messages into the DB. The messages have > approx. > 100-150 records. Total size of 12Kb. > > I read on support.microsoft.com (KB302484) that this > has > to do with the number of record locks on the Novell > server. But this KB-Article is related to A97! > > What's the deal with locking in A2k? > > We 'enherited' this system and error handling, if > any, > is > really buggy. So every time this occurs we get a > lot(!) of > db-pollution!! > > My question: What can I do to prevent this from > happening? > > TIA, > > SD > > > __________________________________ > Do you Yahoo!? > Yahoo! Hotjobs: Enter the "Signing Bonus" > Sweepstakes > http://hotjobs.sweepstakes.yahoo.com/signingbonus > _______________________________________________ > 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 __________________________________ Do you Yahoo!? Yahoo! Hotjobs: Enter the "Signing Bonus" Sweepstakes http://hotjobs.sweepstakes.yahoo.com/signingbonus From garykjos at hotmail.com Fri Jan 16 08:51:53 2004 From: garykjos at hotmail.com (Gary Kjos) Date: Fri, 16 Jan 2004 08:51:53 -0600 Subject: [AccessD] Problem Exporting Query Data to Excel. Message-ID: And if you chose Export of the query from the File menu it will export up to 65K records. Or Right click on the query and choose Export there. Unless you pick a name for an existing Excel file that was created in a 16K record limit format - then it will only do 16K records max in these methods too. Had that happen to a co-worker a couple weeks ago. He had to go and delete the older version and then export from the file menu to get all his records. Gary Kjos garykjos at hotmail.com >From: "Stoker, Kenneth E" >Reply-To: Access Developers discussion and problem >solving >To: Access Developers discussion and problem solving > >Subject: RE: [AccessD] Problem Exporting Query Data to Excel. >Date: Thu, 15 Jan 2004 11:38:45 -0800 > >Actually, no, she is not a programmer, just trying to create her own >queries and then export them to Excel using Tools --> Office Links --> >Analyze in Microsoft Excel. Using this option worked at 16K records >(showed her how to use the TOP keyword for this), but failed on 17K+ >records. > >That wasn't acceptable, so we tried to just copy the results from the >query into the clipboard and then paste the clipboard contents into the >Excel spreadsheet. Surprise, we got almost 31K records into the >spreadsheet with this approach, which is what her query returned when >all the criteria was removed. > >She said that she will try to remember if it is over 16K records, to >follow the last option above. > >Ken Stoker >Technology Commercialization >Information Systems Administrator >PH: (509) 375-3758 >FAX: (509) 375-6731 >E-mail: Kenneth.Stoker at pnl.gov > > >-----Original Message----- >From: Heenan, Lambert [mailto:Lambert.Heenan at AIG.com] >Sent: Thursday, January 15, 2004 9:50 AM >To: 'Access Developers discussion and problem solving' >Subject: RE: [AccessD] > > >I assume that s/he is using TransferSpreadsheet to export to Excel as >in... > >docmd.TransferSpreadsheet acExport ,etc. etc. > >The second parameter (the one after acExport) defaults to >acSpreadsheetTypeExcel3 which cannot handle the 17k rows. If you choose >acSpreadsheetTypeExcel97 or higher for this parameter it should work >fine. > >Lambert > > > -----Original Message----- > > From: Stoker, Kenneth E [SMTP:Kenneth.Stoker at pnl.gov] > > Sent: Thursday, January 15, 2004 12:29 PM > > To: AccessD at databaseadvisors.com > > Subject: [AccessD] > > > > I have a coworker who is getting the following error message when > > trying to output 17K+ records from a query to Excel. > > > > There are too many rows to output, based on the limitation >specified > > by the output format or by Microsoft Access. > > > > Is there a setting that can be changed to increase the amount output? > > Is she hitting a limitation? Can anyone help here. > > > > Thanks. > > > > Ken Stoker > > Technology Commercialization > > Information Systems Administrator > > PH: (509) 375-3758 > > FAX: (509) 375-6731 > > E-mail: Kenneth.Stoker at pnl.gov > > > > _______________________________________________ > > 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 >_______________________________________________ >AccessD mailing list >AccessD at databaseadvisors.com >http://databaseadvisors.com/mailman/listinfo/accessd >Website: http://www.databaseadvisors.com _________________________________________________________________ Scope out the new MSN Plus Internet Software ? optimizes dial-up to the max! http://join.msn.com/?pgmarket=en-us&page=byoa/plus&ST=1 From gustav at cactus.dk Fri Jan 16 08:59:45 2004 From: gustav at cactus.dk (Gustav Brock) Date: Fri, 16 Jan 2004 15:59:45 +0100 Subject: [AccessD] Error 3218 "Couldn't Update; Currently Locked" <> In-Reply-To: <20040116143549.48625.qmail@web60206.mail.yahoo.com> References: <20040116143549.48625.qmail@web60206.mail.yahoo.com> Message-ID: <12624705504.20040116155945@cactus.dk> Hi Sad Those settings are probably to low. Try setting them to maximum: > These two commands may be set at the console screen, they will take > effect at once and doesn't require restart of the server. If they > prove of beneficial, include them in the autoexec.ncf file of the > server. > > SET MAXIMUM RECORD LOCKS = 200000 > SET MAXIMUM RECORD LOCKS PER CONNECTION = 100000 > > The only drawback is a slightly larger RAM allocation which is not > significant with today's multimegabyte servers but did count in the > days of servers running on 8 to 16 MB RAM and every 100K was of > importance. /gustav > These are the new settings: > Max. Records Lock per Connection: 1000 > Max. Files Lock per Connection: 5000 > Max. Records Lock: 40000 > Max. Files Lock: 400000 > How can I test these? Ok, for the first one I have to > lock 999, 1000, 1001 records...question is how do I do > that? > Is importing a file with 999, 1000, 1001 records > enough? > Any testing tips/links? > TIA. > SD > --- Jim Dettman wrote: >> <> occasionally the users get the following error: >> Error 3218 "Couldn't Update; Currently Locked">> >> >> There are lots of things that will cause that >> message, but I think you >> might be barking up the wrong tree in that it's a >> Novell problem. >> >> From your comments abut it being "buggy", I would >> think more that the app >> was poorly written and stepping on it's own toes, >> resulting in the above >> error. >> >> One way to check that out easily is to copy the >> backend to a local drive, >> re-link the tables (I'm assuming it's a split app), >> then test. If you still >> get the error messages it has nothing to do with >> Novell. If the error >> disappears, then it's related to locking. >> >> The other test you can do is using the SetOption >> method of the dbEngine >> object, set dbMaxLocksPerFile to a number less then >> the allowed number of >> locks under Novell. This will ensure that JET never >> uses more locks then >> Novell allows. If that was the problem, the error >> messages will disappear. >> >> Jim Dettman >> President, >> Online Computer Services of WNY, Inc. >> (315) 699-3443 >> jimdettman at earthlink.net >> >> -----Original Message----- >> From: accessd-bounces at databaseadvisors.com >> [mailto:accessd-bounces at databaseadvisors.com]On >> Behalf Of Sad Der >> Sent: Friday, January 16, 2004 7:26 AM >> To: Acces User Group >> Subject: [AccessD] Error 3218 "Couldn't Update; >> Currently Locked" >> >> >> Hi group, >> >> We use A2K SP1 on a Novell network. >> occasionally the users get the following error: >> Error 3218 "Couldn't Update; Currently Locked" >> >> I noticed that this occurs when a user tries to load >> interface messages into the DB. The messages have >> approx. >> 100-150 records. Total size of 12Kb. >> >> I read on support.microsoft.com (KB302484) that this >> has >> to do with the number of record locks on the Novell >> server. But this KB-Article is related to A97! >> >> What's the deal with locking in A2k? >> >> We 'enherited' this system and error handling, if >> any, >> is >> really buggy. So every time this occurs we get a >> lot(!) of >> db-pollution!! >> >> My question: What can I do to prevent this from >> happening? From cfoust at infostatsystems.com Fri Jan 16 10:22:42 2004 From: cfoust at infostatsystems.com (Charlotte Foust) Date: Fri, 16 Jan 2004 08:22:42 -0800 Subject: [AccessD] Access Support in 2006 Message-ID: I think it's spread by the VB and C whatever developers because they are baffled by the success of something they don't consider a *real* programming environment. Charlotte Foust -----Original Message----- From: Erwin Craps - IT Helps [mailto:Erwin.Craps at ithelps.be] Sent: Thursday, January 15, 2004 11:39 PM To: Access Developers discussion and problem solving Subject: RE: [AccessD] Access Support in 2006 Maybe the rumor is psread by some competitor when they release a new version? :-) Filemaker Pro? (Can't think of another still existing database) -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of DJK(John) Robinson Sent: Thursday, January 15, 2004 11:51 PM To: 'Access Developers discussion and problem solving' Subject: RE: [AccessD] Access Support in 2006 This rumor seems to come round every few years - with different dates in ... John > -----Original Message----- > From: accessd-bounces at databaseadvisors.com > [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Gowey Mike > W > Sent: 15 January 2004 19:53 > To: Access Developers discussion and problem solving > Subject: [AccessD] Access Support in 2006 > > > > > Just a fast question to everyone. I have been told that there is a > rumor that Microsoft is not going to support Access anymore come 2006. > > Has anyone else heard anything else about this and if true what they > plan on replacing it with????? > > I hope this don't cause too much of a string, I was just surprised and > caught off guard. > > > Thanks, > > Mike Gowey, MCSA, A+ > Team Leader - SRCI > Information Systems & Services Division > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/a> ccessd > Website: > http://www.databaseadvisors.com > _______________________________________________ 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 From tim at irwingreenhouses.com Fri Jan 16 10:44:29 2004 From: tim at irwingreenhouses.com (Tim Thiessen) Date: Fri, 16 Jan 2004 10:44:29 -0600 Subject: [AccessD] Grouping Query In-Reply-To: <70F3D727890C784291D8433E9C418F29088595@server.bondsoftware.co.nz> Message-ID: <008401c3dc50$05c81940$7800a8c0@timt> Thanks Stephen, I was not aware of the Partition Function. It works great. One other question. I am trying to use date parameters in the beginning query that looks at a form with date selector text boxes. The crosstab query then gives an error that it does not recognize the text boxes as a valid field name or expression. The beginning query runs just fine using this criteria. If I use the expression "Between #1/1/03# And #12/31/03#" as the criteria, the crosstab runs just fine. Any ideas? -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Stephen Bond Sent: Thursday, January 15, 2004 5:59 PM To: Access Developers discussion and problem solving Subject: RE: [AccessD] Grouping Query Tim, try adding a field to the query and use the Partition function. This will do the grouping for you nicely. New field looks something like this: PaidGroup: Partition([DatePaid],0,31,7) then your CrossTab query would have the 'PaidGroup' field as the column heading. HTH Stephen Bond Otatara, South Island, New Zealand > -----Original Message----- > From: Tim Thiessen [mailto:tim at irwingreenhouses.com] > Sent: Friday, 16 January 2004 10:30 a.m. > To: accessD at databaseadvisors.com > Subject: [AccessD] Grouping Query > > > Hi Group, > > I have a query that returns the following: > > PaymentTerms DatePaid CountOfPaid > COD 1 5 > COD 2 3 > COD 4 8 > COD 14 4 > COD 16 12 > Net 10-EOM 1 3 > Net 10-EOM 3 10 > Net 10-EOM 5 15 > Net 10-EOM 10 21 > > DatePaid is the day of the month in which payments are made. > CountOfPaid is > a count of the number of payments made on particular date. > What I need to > do is to be able to group this data into the following: > > PaymentTerms Paid1-6 Paid7-13 > Paid14-20 Paid21-27 Paid28-31 > COD 16 16 0 > 0 0 > Net10-EOM 28 21 0 > 0 0 > > I know this is a cross tab query but how do I get the > grouping in the first > place? > > Tim Thiessen > > _______________________________________________ > 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 From arielcom at indosat.net.id Fri Jan 16 11:02:28 2004 From: arielcom at indosat.net.id (Ariel Computer) Date: Sat, 17 Jan 2004 01:02:28 +0800 Subject: [AccessD] Wake up Call Program Message-ID: <018801c3dc52$869a6440$1000a8c0@default> Dear Friends, I really need some help for my problem :-( I want to create a small application that will dial a phone and play wav file to make a wake up call. I already found windows TAPI OCX to do this things. My problem just in timer event. Let say i have tblPhoneCall with this field : Date Time Extention 01/01/04 14:00 100 01/01/04 14:05 120 How can i use ontimer event or other trick so when the current time equal to tblphonecall.time the program will run phone dial function ? Please help. Thank you very much ! Hengky From John.Clark at niagaracounty.com Fri Jan 16 11:12:25 2004 From: John.Clark at niagaracounty.com (John Clark) Date: Fri, 16 Jan 2004 12:12:25 -0500 Subject: [AccessD] I need a count of checkboxes in a report Message-ID: I'm trying to whip up a report for a client who uses one of my programs. They are tracking the meal sites for the elderly and I have provided a list, by site, with their client's names, age, gender, race, etc.. There are also six boolean fields that they track...for instance, "Low Income"...and I need to count the ones that are checked for each site. I know this is easy, and I could have swore I've done it before, but I cannot figure out how at this particular moment. John W Clark From tim at irwingreenhouses.com Fri Jan 16 11:17:53 2004 From: tim at irwingreenhouses.com (Tim Thiessen) Date: Fri, 16 Jan 2004 11:17:53 -0600 Subject: [AccessD] Grouping Query In-Reply-To: <008401c3dc50$05c81940$7800a8c0@timt> Message-ID: <008c01c3dc54$adf9d1e0$7800a8c0@timt> Never mind. I figured it out. You have to set the parameters in the Query Parameter Dialong box. -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Tim Thiessen Sent: Friday, January 16, 2004 10:44 AM To: 'Access Developers discussion and problem solving' Subject: RE: [AccessD] Grouping Query Thanks Stephen, I was not aware of the Partition Function. It works great. One other question. I am trying to use date parameters in the beginning query that looks at a form with date selector text boxes. The crosstab query then gives an error that it does not recognize the text boxes as a valid field name or expression. The beginning query runs just fine using this criteria. If I use the expression "Between #1/1/03# And #12/31/03#" as the criteria, the crosstab runs just fine. Any ideas? -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Stephen Bond Sent: Thursday, January 15, 2004 5:59 PM To: Access Developers discussion and problem solving Subject: RE: [AccessD] Grouping Query Tim, try adding a field to the query and use the Partition function. This will do the grouping for you nicely. New field looks something like this: PaidGroup: Partition([DatePaid],0,31,7) then your CrossTab query would have the 'PaidGroup' field as the column heading. HTH Stephen Bond Otatara, South Island, New Zealand > -----Original Message----- > From: Tim Thiessen [mailto:tim at irwingreenhouses.com] > Sent: Friday, 16 January 2004 10:30 a.m. > To: accessD at databaseadvisors.com > Subject: [AccessD] Grouping Query > > > Hi Group, > > I have a query that returns the following: > > PaymentTerms DatePaid CountOfPaid > COD 1 5 > COD 2 3 > COD 4 8 > COD 14 4 > COD 16 12 > Net 10-EOM 1 3 > Net 10-EOM 3 10 > Net 10-EOM 5 15 > Net 10-EOM 10 21 > > DatePaid is the day of the month in which payments are made. > CountOfPaid is > a count of the number of payments made on particular date. > What I need to > do is to be able to group this data into the following: > > PaymentTerms Paid1-6 Paid7-13 > Paid14-20 Paid21-27 Paid28-31 > COD 16 16 0 > 0 0 > Net10-EOM 28 21 0 > 0 0 > > I know this is a cross tab query but how do I get the > grouping in the first > place? > > Tim Thiessen > > _______________________________________________ > 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 From cfoust at infostatsystems.com Fri Jan 16 11:29:32 2004 From: cfoust at infostatsystems.com (Charlotte Foust) Date: Fri, 16 Jan 2004 09:29:32 -0800 Subject: [AccessD] I need a count of checkboxes in a report Message-ID: Sum the values of the checkbox fields. Charlotte Foust -----Original Message----- From: John Clark [mailto:John.Clark at niagaracounty.com] Sent: Friday, January 16, 2004 9:12 AM To: accessd at databaseadvisors.com Subject: [AccessD] I need a count of checkboxes in a report I'm trying to whip up a report for a client who uses one of my programs. They are tracking the meal sites for the elderly and I have provided a list, by site, with their client's names, age, gender, race, etc.. There are also six boolean fields that they track...for instance, "Low Income"...and I need to count the ones that are checked for each site. I know this is easy, and I could have swore I've done it before, but I cannot figure out how at this particular moment. John W Clark _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From martyconnelly at shaw.ca Fri Jan 16 11:52:49 2004 From: martyconnelly at shaw.ca (MartyConnelly) Date: Fri, 16 Jan 2004 09:52:49 -0800 Subject: [AccessD] Outlook SP3 References: <5B898D9F0627974EB82D0645E52B1E7D035CBA6F@EXMBPR03.na.mmfg.net> Message-ID: <400824F1.1020608@shaw.ca> I don't know if this was talked about here but this was released from Microsoft a couple of months ago. http://www.microsoft.com/downloads/details.aspx?FamilyId=8B081F3A-B7D0-4B16-B8AF-5A6322F4FD01&displaylang=en Outlook 2003 Add-in: Personal Folders Backup The Personal Folders Backup download creates backup copies of your .PST files at regular intervals, in Outlook 2000 and later versions, making it easy to keep all of your Outlook folders safely backed up. I wonder if it could be used when upgrading to a newer OS? -- Marty Connelly Victoria, B.C. Canada From garykjos at hotmail.com Fri Jan 16 11:59:45 2004 From: garykjos at hotmail.com (Gary Kjos) Date: Fri, 16 Jan 2004 11:59:45 -0600 Subject: [AccessD] I need a count of checkboxes in a report Message-ID: In your totals query do a sum on the Yes/No field times -1 to reverse the sign. ( -1 = Yes) CancelledLineCount: Sum([CancelFlag]*-1) Gary Kjos garykjos at hotmail.com >From: "John Clark" >Reply-To: Access Developers discussion and problem >solving >To: >Subject: [AccessD] I need a count of checkboxes in a report >Date: Fri, 16 Jan 2004 12:12:25 -0500 > >I'm trying to whip up a report for a client who uses one of my programs. >They are tracking the meal sites for the elderly and I have provided a >list, by site, with their client's names, age, gender, race, etc.. There >are also six boolean fields that they track...for instance, "Low >Income"...and I need to count the ones that are checked for each site. > >I know this is easy, and I could have swore I've done it before, but I >cannot figure out how at this particular moment. > >John W Clark >_______________________________________________ >AccessD mailing list >AccessD at databaseadvisors.com >http://databaseadvisors.com/mailman/listinfo/accessd >Website: http://www.databaseadvisors.com _________________________________________________________________ Find high-speed ?net deals ? comparison-shop your local providers here. https://broadband.msn.com From garykjos at hotmail.com Fri Jan 16 12:08:11 2004 From: garykjos at hotmail.com (Gary Kjos) Date: Fri, 16 Jan 2004 12:08:11 -0600 Subject: [AccessD] Wake up Call Program Message-ID: In the ontimer event for an open form, have some code that checks the current time against your trigger time. If it's not past that time, exit the timer event. Something like this; If Now() < dtNextUpdate Then Me!txtMessage = "Next automatic update will be attempted in " & DateDiff("n", Now(), dtNextUpdate) & " minutes at " & Format(dtNextUpdate, "h:nn:ss") Me.Repaint GoTo Exit_Form_Timer End If After this If statment, put your code to make the call. And you may also want to calculate the next trigger time and store that someplace so you don't keep calling over and over. And just don't call ME with it! Gary Kjos garykjos at hotmail.com >From: Ariel Computer >Reply-To: Access Developers discussion and problem >solving >To: accessd at databaseadvisors.com >Subject: [AccessD] Wake up Call Program >Date: Sat, 17 Jan 2004 01:02:28 +0800 > >Dear Friends, > >I really need some help for my problem :-( > >I want to create a small application that will dial a phone and play wav >file to make a wake up call. I already found windows TAPI OCX to do this >things. My problem just in timer event. Let say i have tblPhoneCall with >this field : > >Date Time Extention >01/01/04 14:00 100 >01/01/04 14:05 120 > >How can i use ontimer event or other trick so when the current time equal >to >tblphonecall.time the program will run phone dial function ? Please help. > >Thank you very much ! > >Hengky > >_______________________________________________ >AccessD mailing list >AccessD at databaseadvisors.com >http://databaseadvisors.com/mailman/listinfo/accessd >Website: http://www.databaseadvisors.com _________________________________________________________________ Get a FREE online virus check for your PC here, from McAfee. http://clinic.mcafee.com/clinic/ibuy/campaign.asp?cid=3963 From cfoust at infostatsystems.com Fri Jan 16 12:16:50 2004 From: cfoust at infostatsystems.com (Charlotte Foust) Date: Fri, 16 Jan 2004 10:16:50 -0800 Subject: [AccessD] I need a count of checkboxes in a report Message-ID: You don't even need to do that. Just use an Abs() function to return a positive value. Charlotte Foust -----Original Message----- From: Gary Kjos [mailto:garykjos at hotmail.com] Sent: Friday, January 16, 2004 10:00 AM To: accessd at databaseadvisors.com Subject: RE: [AccessD] I need a count of checkboxes in a report In your totals query do a sum on the Yes/No field times -1 to reverse the sign. ( -1 = Yes) CancelledLineCount: Sum([CancelFlag]*-1) Gary Kjos garykjos at hotmail.com >From: "John Clark" >Reply-To: Access Developers discussion and problem >solving >To: >Subject: [AccessD] I need a count of checkboxes in a report >Date: Fri, 16 Jan 2004 12:12:25 -0500 > >I'm trying to whip up a report for a client who uses one of my >programs. They are tracking the meal sites for the elderly and I have >provided a list, by site, with their client's names, age, gender, race, >etc.. There are also six boolean fields that they track...for instance, >"Low Income"...and I need to count the ones that are checked for each >site. > >I know this is easy, and I could have swore I've done it before, but I >cannot figure out how at this particular moment. > >John W Clark >_______________________________________________ >AccessD mailing list >AccessD at databaseadvisors.com >http://databaseadvisors.com/mailman/listinfo/accessd >Website: http://www.databaseadvisors.com _________________________________________________________________ Find high-speed 'net deals - comparison-shop your local providers here. https://broadband.msn.com _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From jimdettman at earthlink.net Fri Jan 16 12:33:08 2004 From: jimdettman at earthlink.net (Jim Dettman) Date: Fri, 16 Jan 2004 13:33:08 -0500 Subject: [AccessD] Wake up Call Program In-Reply-To: <018801c3dc52$869a6440$1000a8c0@default> Message-ID: Hengky, I have a time clock polling application that I can send along. It should be easily adaptable to what your doing. Just drop me an e-mail. Jim Dettman President, Online Computer Services of WNY, Inc. (315) 699-3443 jimdettman at earthlink.net -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Ariel Computer Sent: Friday, January 16, 2004 12:02 PM To: accessd at databaseadvisors.com Subject: [AccessD] Wake up Call Program Dear Friends, I really need some help for my problem :-( I want to create a small application that will dial a phone and play wav file to make a wake up call. I already found windows TAPI OCX to do this things. My problem just in timer event. Let say i have tblPhoneCall with this field : Date Time Extention 01/01/04 14:00 100 01/01/04 14:05 120 How can i use ontimer event or other trick so when the current time equal to tblphonecall.time the program will run phone dial function ? Please help. Thank you very much ! Hengky _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From John.Clark at niagaracounty.com Fri Jan 16 12:39:32 2004 From: John.Clark at niagaracounty.com (John Clark) Date: Fri, 16 Jan 2004 13:39:32 -0500 Subject: [AccessD] I need a count of checkboxes in a report Message-ID: how come it doesn't it let me do something like this right in the report? If I sum it or total it, I get a "Yes" or a "No". >>> cfoust at infostatsystems.com 01/16/04 01:16PM >>> You don't even need to do that. Just use an Abs() function to return a positive value. Charlotte Foust -----Original Message----- From: Gary Kjos [mailto:garykjos at hotmail.com] Sent: Friday, January 16, 2004 10:00 AM To: accessd at databaseadvisors.com Subject: RE: [AccessD] I need a count of checkboxes in a report In your totals query do a sum on the Yes/No field times -1 to reverse the sign. ( -1 = Yes) CancelledLineCount: Sum([CancelFlag]*-1) Gary Kjos garykjos at hotmail.com >From: "John Clark" >Reply-To: Access Developers discussion and problem >solving >To: >Subject: [AccessD] I need a count of checkboxes in a report >Date: Fri, 16 Jan 2004 12:12:25 -0500 > >I'm trying to whip up a report for a client who uses one of my >programs. They are tracking the meal sites for the elderly and I have >provided a list, by site, with their client's names, age, gender, race, >etc.. There are also six boolean fields that they track...for instance, >"Low Income"...and I need to count the ones that are checked for each >site. > >I know this is easy, and I could have swore I've done it before, but I >cannot figure out how at this particular moment. > >John W Clark >_______________________________________________ >AccessD mailing list >AccessD at databaseadvisors.com >http://databaseadvisors.com/mailman/listinfo/accessd >Website: http://www.databaseadvisors.com _________________________________________________________________ Find high-speed 'net deals - comparison-shop your local providers here. https://broadband.msn.com _______________________________________________ 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 From cfoust at infostatsystems.com Fri Jan 16 12:52:54 2004 From: cfoust at infostatsystems.com (Charlotte Foust) Date: Fri, 16 Jan 2004 10:52:54 -0800 Subject: [AccessD] I need a count of checkboxes in a report Message-ID: It may be the way you have your control formatted. If the calculated control is formatted as a yes/no value, then you'll get the equivalent of 0 = No and anything but zero = yes. Change the format to a number and use something like Abs(Sum([CancelFlag])) Charlotte Foust -----Original Message----- From: John Clark [mailto:John.Clark at niagaracounty.com] Sent: Friday, January 16, 2004 10:40 AM To: accessd at databaseadvisors.com Subject: RE: [AccessD] I need a count of checkboxes in a report how come it doesn't it let me do something like this right in the report? If I sum it or total it, I get a "Yes" or a "No". >>> cfoust at infostatsystems.com 01/16/04 01:16PM >>> You don't even need to do that. Just use an Abs() function to return a positive value. Charlotte Foust -----Original Message----- From: Gary Kjos [mailto:garykjos at hotmail.com] Sent: Friday, January 16, 2004 10:00 AM To: accessd at databaseadvisors.com Subject: RE: [AccessD] I need a count of checkboxes in a report In your totals query do a sum on the Yes/No field times -1 to reverse the sign. ( -1 = Yes) CancelledLineCount: Sum([CancelFlag]*-1) Gary Kjos garykjos at hotmail.com >From: "John Clark" >Reply-To: Access Developers discussion and problem >solving >To: >Subject: [AccessD] I need a count of checkboxes in a report >Date: Fri, 16 Jan 2004 12:12:25 -0500 > >I'm trying to whip up a report for a client who uses one of my >programs. They are tracking the meal sites for the elderly and I have >provided a list, by site, with their client's names, age, gender, race, >etc.. There are also six boolean fields that they track...for instance, >"Low Income"...and I need to count the ones that are checked for each >site. > >I know this is easy, and I could have swore I've done it before, but I >cannot figure out how at this particular moment. > >John W Clark >_______________________________________________ >AccessD mailing list >AccessD at databaseadvisors.com >http://databaseadvisors.com/mailman/listinfo/accessd >Website: http://www.databaseadvisors.com _________________________________________________________________ Find high-speed 'net deals - comparison-shop your local providers here. https://broadband.msn.com _______________________________________________ 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 _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From garykjos at hotmail.com Fri Jan 16 12:53:25 2004 From: garykjos at hotmail.com (Gary Kjos) Date: Fri, 16 Jan 2004 12:53:25 -0600 Subject: [AccessD] I need a count of checkboxes in a report Message-ID: To each their own. More than one way to skin a fish. Six of one, half dozen of the other. ;-) No you don't need to reverse the sign, but if you are just printing or e-mailing the query results as I mostly do, it is a easy way to get it looking right. Gary Kjos garykjos at hotmail.com >From: "Charlotte Foust" >Reply-To: Access Developers discussion and problem >solving >To: "Access Developers discussion and problem >solving" >Subject: RE: [AccessD] I need a count of checkboxes in a report >Date: Fri, 16 Jan 2004 10:16:50 -0800 > >You don't even need to do that. Just use an Abs() function to return a >positive value. > >Charlotte Foust > >-----Original Message----- >From: Gary Kjos [mailto:garykjos at hotmail.com] >Sent: Friday, January 16, 2004 10:00 AM >To: accessd at databaseadvisors.com >Subject: RE: [AccessD] I need a count of checkboxes in a report > > >In your totals query do a sum on the Yes/No field times -1 to reverse >the >sign. ( -1 = Yes) > >CancelledLineCount: Sum([CancelFlag]*-1) > > > >Gary Kjos >garykjos at hotmail.com > > > > > > >From: "John Clark" > >Reply-To: Access Developers discussion and problem > >solving > >To: > >Subject: [AccessD] I need a count of checkboxes in a report > >Date: Fri, 16 Jan 2004 12:12:25 -0500 > > > >I'm trying to whip up a report for a client who uses one of my > >programs. They are tracking the meal sites for the elderly and I have > >provided a list, by site, with their client's names, age, gender, race, > > >etc.. There are also six boolean fields that they track...for instance, > > >"Low Income"...and I need to count the ones that are checked for each > >site. > > > >I know this is easy, and I could have swore I've done it before, but I > >cannot figure out how at this particular moment. > > > >John W Clark > >_______________________________________________ > >AccessD mailing list > >AccessD at databaseadvisors.com > >http://databaseadvisors.com/mailman/listinfo/accessd > >Website: http://www.databaseadvisors.com > >_________________________________________________________________ >Find high-speed 'net deals - comparison-shop your local providers here. >https://broadband.msn.com > >_______________________________________________ >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 _________________________________________________________________ High-speed users?be more efficient online with the new MSN Premium Internet Software. http://join.msn.com/?pgmarket=en-us&page=byoa/prem&ST=1 From garykjos at hotmail.com Fri Jan 16 13:03:40 2004 From: garykjos at hotmail.com (Gary Kjos) Date: Fri, 16 Jan 2004 13:03:40 -0600 Subject: [AccessD] I need a count of checkboxes in a report Message-ID: Hmmmm. Works for me. Is your field a Yes/No data type? Gary Kjos garykjos at hotmail.com >From: "John Clark" >Reply-To: Access Developers discussion and problem >solving >To: >Subject: RE: [AccessD] I need a count of checkboxes in a report >Date: Fri, 16 Jan 2004 13:39:32 -0500 > >how come it doesn't it let me do something like this right in the >report? If I sum it or total it, I get a "Yes" or a "No". > > >>> cfoust at infostatsystems.com 01/16/04 01:16PM >>> >You don't even need to do that. Just use an Abs() function to return >a >positive value. > >Charlotte Foust > >-----Original Message----- >From: Gary Kjos [mailto:garykjos at hotmail.com] >Sent: Friday, January 16, 2004 10:00 AM >To: accessd at databaseadvisors.com >Subject: RE: [AccessD] I need a count of checkboxes in a report > > >In your totals query do a sum on the Yes/No field times -1 to reverse >the >sign. ( -1 = Yes) > >CancelledLineCount: Sum([CancelFlag]*-1) > > > >Gary Kjos >garykjos at hotmail.com > > _________________________________________________________________ Get a FREE online virus check for your PC here, from McAfee. http://clinic.mcafee.com/clinic/ibuy/campaign.asp?cid=3963 From garykjos at hotmail.com Fri Jan 16 13:03:42 2004 From: garykjos at hotmail.com (Gary Kjos) Date: Fri, 16 Jan 2004 13:03:42 -0600 Subject: [AccessD] I need a count of checkboxes in a report Message-ID: Hmmmm. Works for me. Is your field a Yes/No data type? Gary Kjos garykjos at hotmail.com >From: "John Clark" >Reply-To: Access Developers discussion and problem >solving >To: >Subject: RE: [AccessD] I need a count of checkboxes in a report >Date: Fri, 16 Jan 2004 13:39:32 -0500 > >how come it doesn't it let me do something like this right in the >report? If I sum it or total it, I get a "Yes" or a "No". > > >>> cfoust at infostatsystems.com 01/16/04 01:16PM >>> >You don't even need to do that. Just use an Abs() function to return >a >positive value. > >Charlotte Foust > >-----Original Message----- >From: Gary Kjos [mailto:garykjos at hotmail.com] >Sent: Friday, January 16, 2004 10:00 AM >To: accessd at databaseadvisors.com >Subject: RE: [AccessD] I need a count of checkboxes in a report > > >In your totals query do a sum on the Yes/No field times -1 to reverse >the >sign. ( -1 = Yes) > >CancelledLineCount: Sum([CancelFlag]*-1) > > > >Gary Kjos >garykjos at hotmail.com > > _________________________________________________________________ Let the new MSN Premium Internet Software make the most of your high-speed experience. http://join.msn.com/?pgmarket=en-us&page=byoa/prem&ST=1 From gustav at cactus.dk Fri Jan 16 13:03:53 2004 From: gustav at cactus.dk (Gustav Brock) Date: Fri, 16 Jan 2004 20:03:53 +0100 Subject: [AccessD] I need a count of checkboxes in a report In-Reply-To: References: Message-ID: <17839353176.20040116200353@cactus.dk> Hi Gary Or: CancelledLineCount: Sum(-[CancelFlag]) CancelledLineCount: -Sum([CancelFlag]) However, in these days where you cannot be sure wether True is 1 or -1, I prefer Charlotte's method myself - prepares for portable code. /gustav > To each their own. More than one way to skin a fish. Six of one, half dozen > of the other. ;-) > No you don't need to reverse the sign, but if you are just printing or > e-mailing the query results as I mostly do, it is a easy way to get it > looking right. >>You don't even need to do that. Just use an Abs() function to return a >>positive value. >>In your totals query do a sum on the Yes/No field times -1 to reverse >>the sign. ( -1 = Yes) >> >>CancelledLineCount: Sum([CancelFlag]*-1) From John.Clark at niagaracounty.com Fri Jan 16 13:13:50 2004 From: John.Clark at niagaracounty.com (John Clark) Date: Fri, 16 Jan 2004 14:13:50 -0500 Subject: [AccessD] I need a count of checkboxes in a report Message-ID: I am going to have myself tested for some mental deficiency, after work today. Yes, as y'all guessed, my fields were formatted to 'Yes/No'. To be honest I didn't know this was an option here. I used the wizard...big mistake...I usually do it myself...because I thought it would save me time and apparently it defaulted to this format. Why anybody would want a 'Yes/No' format on a 'Sum' calculation is beyond me. Thank you again...Charlotte, Gustav, Gary, etc.!!!!! I feel like such a moron! This the day after I challange my bosses perception of me compared to his favorite free-lancer. AAAAAHHHHHH!! I am really angry with myself, at the moment. Take care all!!! John W Clark >>> garykjos at hotmail.com 01/16/04 02:03PM >>> Hmmmm. Works for me. Is your field a Yes/No data type? Gary Kjos garykjos at hotmail.com >From: "John Clark" >Reply-To: Access Developers discussion and problem >solving >To: >Subject: RE: [AccessD] I need a count of checkboxes in a report >Date: Fri, 16 Jan 2004 13:39:32 -0500 > >how come it doesn't it let me do something like this right in the >report? If I sum it or total it, I get a "Yes" or a "No". > > >>> cfoust at infostatsystems.com 01/16/04 01:16PM >>> >You don't even need to do that. Just use an Abs() function to return >a >positive value. > >Charlotte Foust > >-----Original Message----- >From: Gary Kjos [mailto:garykjos at hotmail.com] >Sent: Friday, January 16, 2004 10:00 AM >To: accessd at databaseadvisors.com >Subject: RE: [AccessD] I need a count of checkboxes in a report > > >In your totals query do a sum on the Yes/No field times -1 to reverse >the >sign. ( -1 = Yes) > >CancelledLineCount: Sum([CancelFlag]*-1) > > > >Gary Kjos >garykjos at hotmail.com > > _________________________________________________________________ Let the new MSN Premium Internet Software make the most of your high-speed experience. http://join.msn.com/?pgmarket=en-us&page=byoa/prem&ST=1 _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From DWUTKA at marlow.com Fri Jan 16 13:22:30 2004 From: DWUTKA at marlow.com (DWUTKA at marlow.com) Date: Fri, 16 Jan 2004 13:22:30 -0600 Subject: [AccessD] Wake up Call Program Message-ID: <2F8793082E00D4119A1700B0D0216BF802227760@main2.marlow.com> I would say that your best approach would be to build a Class that holds a date, time and boolean variable. Then have your timer fire, and look through a list of the classes in a collection. Have the Class determine if it has fired for that day (by comparing the date with Date() and seeing if the boolean is set or not. If it's the next day, unset the boolean. If the boolean isn't set, and the day is yesterday, then see if the time is greater then Time(). If no, do nothing, if yes change the date variable to today, and set the boolean. Drew -----Original Message----- From: Ariel Computer [mailto:arielcom at indosat.net.id] Sent: Friday, January 16, 2004 11:02 AM To: accessd at databaseadvisors.com Subject: [AccessD] Wake up Call Program Dear Friends, I really need some help for my problem :-( I want to create a small application that will dial a phone and play wav file to make a wake up call. I already found windows TAPI OCX to do this things. My problem just in timer event. Let say i have tblPhoneCall with this field : Date Time Extention 01/01/04 14:00 100 01/01/04 14:05 120 How can i use ontimer event or other trick so when the current time equal to tblphonecall.time the program will run phone dial function ? Please help. Thank you very much ! Hengky _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From garykjos at hotmail.com Fri Jan 16 14:40:47 2004 From: garykjos at hotmail.com (Gary Kjos) Date: Fri, 16 Jan 2004 14:40:47 -0600 Subject: [AccessD] I need a count of checkboxes in a report Message-ID: >>>>prepares for portable code > >/gustav<<<< Understood. Has yet to have been an issue for me. Most of my stuff is one time use. Gary Kjos garykjos at hotmail.com _________________________________________________________________ Learn how to choose, serve, and enjoy wine at Wine @ MSN. http://wine.msn.com/ From garykjos at hotmail.com Fri Jan 16 14:43:00 2004 From: garykjos at hotmail.com (Gary Kjos) Date: Fri, 16 Jan 2004 14:43:00 -0600 Subject: [AccessD] I need a count of checkboxes in a report Message-ID: Don't beat yourself up on it John. Just laugh and move on. Have a great weekend! Gary Kjos garykjos at hotmail.com _________________________________________________________________ Scope out the new MSN Plus Internet Software ? optimizes dial-up to the max! http://join.msn.com/?pgmarket=en-us&page=byoa/plus&ST=1 From mastercafe at ctv.es Fri Jan 16 19:22:55 2004 From: mastercafe at ctv.es (MastercafeCTV) Date: Sat, 17 Jan 2004 02:22:55 +0100 Subject: [AccessD] DirectX In-Reply-To: Message-ID: <000001c3dc98$6f78e700$69fa2250@servercafe> Is possible use the DirectX interface on Access 2k or XP?? Thanks Juan =========================================== MASTERCAFE SL - NIF B-82.617.614 www.mastercafe.com Deleg. Asturias Tel 985.88.49.44 / 627.531.764 Fax 627.500.205 info at mastercafe.com juan at mastercafe.com Deleg. Madrid Tel 627.474.285 cecilia at mastercafe.com =========================================== From arielcom at indosat.net.id Fri Jan 16 19:49:02 2004 From: arielcom at indosat.net.id (Hengky Lie) Date: Sat, 17 Jan 2004 09:49:02 +0800 Subject: [AccessD] Wake up Call Program References: Message-ID: <004e01c3dc9c$169813a0$1000a8c0@default> Thanks You Jim ! You can use my email : arielcom at indosat.net.id ----- Original Message ----- From: "Jim Dettman" To: "Access Developers discussion and problem solving" Sent: Saturday, January 17, 2004 2:33 AM Subject: RE: [AccessD] Wake up Call Program > Hengky, > > I have a time clock polling application that I can send along. It should > be easily adaptable to what your doing. Just drop me an e-mail. > > Jim Dettman > President, > Online Computer Services of WNY, Inc. > (315) 699-3443 > jimdettman at earthlink.net From arielcom at indosat.net.id Fri Jan 16 19:54:10 2004 From: arielcom at indosat.net.id (Hengky Lie) Date: Sat, 17 Jan 2004 09:54:10 +0800 Subject: [AccessD] Wake up Call Program References: <2F8793082E00D4119A1700B0D0216BF802227760@main2.marlow.com> Message-ID: <005801c3dc9c$d11d67c0$1000a8c0@default> How to build a class ? Sorry, my Access level still below than average :-( ----- Original Message ----- From: To: Sent: Saturday, January 17, 2004 3:22 AM Subject: RE: [AccessD] Wake up Call Program > I would say that your best approach would be to build a Class that holds a > date, time and boolean variable. > > Then have your timer fire, and look through a list of the classes in a > collection. Have the Class determine if it has fired for that day (by > comparing the date with Date() and seeing if the boolean is set or not. If > it's the next day, unset the boolean. If the boolean isn't set, and the day > is yesterday, then see if the time is greater then Time(). If no, do > nothing, if yes change the date variable to today, and set the boolean. > > Drew From DWUTKA at marlow.com Sat Jan 17 02:48:49 2004 From: DWUTKA at marlow.com (DWUTKA at marlow.com) Date: Sat, 17 Jan 2004 02:48:49 -0600 Subject: [AccessD] Wake up Call Program Message-ID: <2F8793082E00D4119A1700B0D0216BF802227764@main2.marlow.com> Yikes, that is a relatively difficult task to hit out of the blue. If you don't find any other method, give me a holler. Drew -----Original Message----- From: Hengky Lie [mailto:arielcom at indosat.net.id] Sent: Friday, January 16, 2004 7:54 PM To: Access Developers discussion and problem solving Subject: Re: [AccessD] Wake up Call Program How to build a class ? Sorry, my Access level still below than average :-( ----- Original Message ----- From: To: Sent: Saturday, January 17, 2004 3:22 AM Subject: RE: [AccessD] Wake up Call Program > I would say that your best approach would be to build a Class that holds a > date, time and boolean variable. > > Then have your timer fire, and look through a list of the classes in a > collection. Have the Class determine if it has fired for that day (by > comparing the date with Date() and seeing if the boolean is set or not. If > it's the next day, unset the boolean. If the boolean isn't set, and the day > is yesterday, then see if the time is greater then Time(). If no, do > nothing, if yes change the date variable to today, and set the boolean. > > Drew _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From jwcolby at colbyconsulting.com Sat Jan 17 09:48:46 2004 From: jwcolby at colbyconsulting.com (John W. Colby) Date: Sat, 17 Jan 2004 10:48:46 -0500 Subject: [AccessD] Wake up Call Program In-Reply-To: <005801c3dc9c$d11d67c0$1000a8c0@default> Message-ID: Hengky, I have whipped out a pair of classes to do something close to what you are asking for. The first class is used to track each thing that needs to be run (assuming once a day). In order to create a class, go to the VB Editor, click Insert / Class. Into that paste the following (you may need to get rid of the option statements), then save it as clsWakeup Option Compare Database Option Explicit ' 'This class holds information about a single wakeup ' Private mdteLastRan As Date 'The last date a wakeup was done Private mdteTimeToRun As Date 'The time to say wakeup Private mstrProcessName As String 'The process name needing woken up ' 'The class_Initialize is similar to Form_Open in that it always runs ONE time as a class opens 'Use this to initialize the LastDateRan variable ' Private Sub Class_Initialize() mdteLastRan = Date - 1 End Sub ' 'Each instance of this class will hold a time to run (wakeup) 'And a process to wakeup ' Function Init(ldteTimeToRun As Date, lstrProcessName As String) mdteTimeToRun = ldteTimeToRun mstrProcessName = lstrProcessName End Function ' 'This function checks whether the process has run in the last 24 hours 'If so it returns true and passes back the process name in a string variable 'passed in ' Function Run(lstrProcessName) As Boolean 'Hasn't run today so check if the time is > mdetTimeToRun If Time() > mdteTimeToRun Then If Date > mdteLastRan Then 'Mark mdteLastRun = Now() mdteLastRan = Date 'and return true lstrProcessName = mstrProcessName Run = True End If End If End Function *************** The class above in instantiated once for each call to be placed in your case The next class is a "supervisor" class that contains a collection of clsWakeup (the class above). It is instantiated once in a form. The supervisor class manages the collection of wakeup classes, adding them in on demand, and closing them down as the form closes. It also polls each clsWakeup in the collection once every time its method CheckWakeup is called. Again, in the editor click insert / class and paste the following in. *************** Option Compare Database Option Explicit 'A collection to hold instances of clsWakeup Private colClsWakeup As Collection 'An event to raise if a clsWakeup instance says its time to wakeup Public Event ProcessTime(lstrProcessName As String) ' 'The class_Initialize is similar to Form_Open in that it always runs ONE time as a class opens 'Use this to create the collection to hold the wakeup classes ' Private Sub Class_Initialize() Set colClsWakeup = New Collection End Sub ' 'Class_Terminate is similar to Form_Close and always runs ONCE as the class terminates 'Use it to unload all the clsWakeup instances in the collection ' Private Sub Class_Terminate() term End Sub ' 'As the supervisor class closes, it must unload all the clsWakeup instances in its collection ' Function term() On Error Resume Next While colClsWakeup.Count > 0 colClsWakeup.Remove (1) Wend End Function ' 'This function is responsible for creating one instance of clsWakeup every time it is called ' Function NewWakeup(ldteTimeToRun As Date, lstrProcessName As String) Dim lclsWakeup As clsWakeup Set lclsWakeup = New clsWakeup 'It then initializes that instance with the TimeToRun and the ProcessName lclsWakeup.Init ldteTimeToRun, lstrProcessName 'And finally, it saves a pointer to the clsWakeup instance just created in the collection colClsWakeup.Add lclsWakeup, lstrProcessName End Function ' 'CheckWakeup is called by a timer tick on a form. It cycles through all the instances of clsWakeup 'in its collection asking each instance if it's time for that instance to run. ' Function CheckWakeup() Dim lclsWakeup As clsWakeup Dim lstrProcessName As String For Each lclsWakeup In colClsWakeup 'Check each instance of clsWakeup If lclsWakeup.Run(lstrProcessName) Then 'If time to run then RaiseEvent ProcessTime(lstrProcessName) 'Raise an event telling the world End If Next lclsWakeup End Function ************** OK, so the class above must be created once in a form whose timer will call the CheckWakup method to look for wakeups to be performed. Notice that I use Raisevent to pass back to the calling form each object in the class that needs servicing. So, now we need a form to allow us to manually "program" the supervisor with times and processes to wakeup, a status to show that something is happening, and a control to display that a process was awakened. You need to build a form with 4 text boxes named txtNewTime and txtProcessName (used to enter the time and process name to wake up), txtStatus to display a status message, and txtWakingUp to display the name of the process waking up. Also a Command6 command button to close the form. Then in the text editor to display the form's module and paste the following in: ************** Option Compare Database Option Explicit ' 'Dimension a supervisor class Withevents ' Private WithEvents fclsWakeupSupervisor As clsWakeupSupervisor ' 'When the form closes we need to unload the supervisor class ' Private Sub Form_Close() Set fclsWakeupSupervisor = Nothing End Sub ' 'When the form opens we need to create an instance of the supervisor class ' Private Sub Form_Open(Cancel As Integer) Set fclsWakeupSupervisor = New clsWakeupSupervisor End Sub ' 'The close button (standard stuff) ' Private Sub Command6_Click() On Error GoTo Err_Command6_Click DoCmd.Close Exit_Command6_Click: Exit Sub Err_Command6_Click: MsgBox Err.Description Resume Exit_Command6_Click End Sub ' 'The form's timer event will be used to call the supervisor class' CheckWakeup method ' Private Sub Form_Timer() 'Erase the last value to make clear that it only was set once / 24 hours txtWakingUp.Value = "" 'And write a status to the status box to make clear that we are calling this every 10 seconds txtStatus.Value = "Checked wakeup list at: " & Now 'Then call the supervisor's CheckWakup method fclsWakeupSupervisor.CheckWakeup End Sub ' 'This is a very simple way of programming the processes that need to be wakened every day ' Private Sub txtProcessName_AfterUpdate() 'pass in the time to do the wakeup and the process name of the process to wake up '!!!!notice no error handling such as was anything entered in time!!!! fclsWakeupSupervisor.NewWakeup txtNewTime.Value, txtProcessName.Value 'if the form timer is not initialized, then set the interval to 10 seconds If Me.TimerInterval = 0 Then Me.TimerInterval = 10000 End If End Sub ' 'This is the event from the supervisor that will be raised if any process needs to be awakened. ' Private Sub fclsWakeupSupervisor_ProcessTime(lstrProcessName As String) txtWakingUp.Value = lstrProcessName End Sub ****************************************** Ok, so the idea is that the user opens the form, which loads the supervisor class. The user then enters times and process names into the two text boxes for this purpose. As soon as the first process is entered the timer starts ticking and every 10 seconds checks are made whether to wake someone up. If any process needs to be awakened, fclsWakeupSupervisor_ProcessTime(lstrProcessName As String) is called passing in the name of the process to awaken. The developer would put a function call in fclsWakeupSupervisor_ProcessTime to do whatever they want done once a day. I will eventually get this up on my web site as a Withevents demo. For now I am sending the entire database to John W. Colby www.ColbyConsulting.com -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Hengky Lie Sent: Friday, January 16, 2004 8:54 PM To: Access Developers discussion and problem solving Subject: Re: [AccessD] Wake up Call Program How to build a class ? Sorry, my Access level still below than average :-( ----- Original Message ----- From: To: Sent: Saturday, January 17, 2004 3:22 AM Subject: RE: [AccessD] Wake up Call Program > I would say that your best approach would be to build a Class that holds a > date, time and boolean variable. > > Then have your timer fire, and look through a list of the classes in a > collection. Have the Class determine if it has fired for that day (by > comparing the date with Date() and seeing if the boolean is set or not. If > it's the next day, unset the boolean. If the boolean isn't set, and the day > is yesterday, then see if the time is greater then Time(). If no, do > nothing, if yes change the date variable to today, and set the boolean. > > Drew _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From jwcolby at colbyconsulting.com Sat Jan 17 09:51:17 2004 From: jwcolby at colbyconsulting.com (John W. Colby) Date: Sat, 17 Jan 2004 10:51:17 -0500 Subject: [AccessD] Wake up Call Program In-Reply-To: <005801c3dc9c$d11d67c0$1000a8c0@default> Message-ID: Hengky, I have whipped out a pair of classes to do something close to what you are asking for. The first class is used to track each thing that needs to be run (assuming once a day). In order to create a class, go to the VB Editor, click Insert / Class. Into that paste the following (you may need to get rid of the option statements), then save it as clsWakeup Option Compare Database Option Explicit ' 'This class holds information about a single wakeup ' Private mdteLastRan As Date 'The last date a wakeup was done Private mdteTimeToRun As Date 'The time to say wakeup Private mstrProcessName As String 'The process name needing woken up ' 'The class_Initialize is similar to Form_Open in that it always runs ONE time as a class opens 'Use this to initialize the LastDateRan variable ' Private Sub Class_Initialize() mdteLastRan = Date - 1 End Sub ' 'Each instance of this class will hold a time to run (wakeup) 'And a process to wakeup ' Function Init(ldteTimeToRun As Date, lstrProcessName As String) mdteTimeToRun = ldteTimeToRun mstrProcessName = lstrProcessName End Function ' 'This function checks whether the process has run in the last 24 hours 'If so it returns true and passes back the process name in a string variable 'passed in ' Function Run(lstrProcessName) As Boolean 'Hasn't run today so check if the time is > mdetTimeToRun If Time() > mdteTimeToRun Then If Date > mdteLastRan Then 'Mark mdteLastRun = Now() mdteLastRan = Date 'and return true lstrProcessName = mstrProcessName Run = True End If End If End Function *************** The class above in instantiated once for each call to be placed in your case The next class is a "supervisor" class that contains a collection of clsWakeup (the class above). It is instantiated once in a form. The supervisor class manages the collection of wakeup classes, adding them in on demand, and closing them down as the form closes. It also polls each clsWakeup in the collection once every time its method CheckWakeup is called. Again, in the editor click insert / class and paste the following in. *************** Option Compare Database Option Explicit 'A collection to hold instances of clsWakeup Private colClsWakeup As Collection 'An event to raise if a clsWakeup instance says its time to wakeup Public Event ProcessTime(lstrProcessName As String) ' 'The class_Initialize is similar to Form_Open in that it always runs ONE time as a class opens 'Use this to create the collection to hold the wakeup classes ' Private Sub Class_Initialize() Set colClsWakeup = New Collection End Sub ' 'Class_Terminate is similar to Form_Close and always runs ONCE as the class terminates 'Use it to unload all the clsWakeup instances in the collection ' Private Sub Class_Terminate() term End Sub ' 'As the supervisor class closes, it must unload all the clsWakeup instances in its collection ' Function term() On Error Resume Next While colClsWakeup.Count > 0 colClsWakeup.Remove (1) Wend End Function ' 'This function is responsible for creating one instance of clsWakeup every time it is called ' Function NewWakeup(ldteTimeToRun As Date, lstrProcessName As String) Dim lclsWakeup As clsWakeup Set lclsWakeup = New clsWakeup 'It then initializes that instance with the TimeToRun and the ProcessName lclsWakeup.Init ldteTimeToRun, lstrProcessName 'And finally, it saves a pointer to the clsWakeup instance just created in the collection colClsWakeup.Add lclsWakeup, lstrProcessName End Function ' 'CheckWakeup is called by a timer tick on a form. It cycles through all the instances of clsWakeup 'in its collection asking each instance if it's time for that instance to run. ' Function CheckWakeup() Dim lclsWakeup As clsWakeup Dim lstrProcessName As String For Each lclsWakeup In colClsWakeup 'Check each instance of clsWakeup If lclsWakeup.Run(lstrProcessName) Then 'If time to run then RaiseEvent ProcessTime(lstrProcessName) 'Raise an event telling the world End If Next lclsWakeup End Function ************** OK, so the class above must be created once in a form whose timer will call the CheckWakup method to look for wakeups to be performed. Notice that I use Raisevent to pass back to the calling form each object in the class that needs servicing. So, now we need a form to allow us to manually "program" the supervisor with times and processes to wakeup, a status to show that something is happening, and a control to display that a process was awakened. You need to build a form with 4 text boxes named txtNewTime and txtProcessName (used to enter the time and process name to wake up), txtStatus to display a status message, and txtWakingUp to display the name of the process waking up. Also a Command6 command button to close the form. Then in the text editor to display the form's module and paste the following in: ************** Option Compare Database Option Explicit ' 'Dimension a supervisor class Withevents ' Private WithEvents fclsWakeupSupervisor As clsWakeupSupervisor ' 'When the form closes we need to unload the supervisor class ' Private Sub Form_Close() Set fclsWakeupSupervisor = Nothing End Sub ' 'When the form opens we need to create an instance of the supervisor class ' Private Sub Form_Open(Cancel As Integer) Set fclsWakeupSupervisor = New clsWakeupSupervisor End Sub ' 'The close button (standard stuff) ' Private Sub Command6_Click() On Error GoTo Err_Command6_Click DoCmd.Close Exit_Command6_Click: Exit Sub Err_Command6_Click: MsgBox Err.Description Resume Exit_Command6_Click End Sub ' 'The form's timer event will be used to call the supervisor class' CheckWakeup method ' Private Sub Form_Timer() 'Erase the last value to make clear that it only was set once / 24 hours txtWakingUp.Value = "" 'And write a status to the status box to make clear that we are calling this every 10 seconds txtStatus.Value = "Checked wakeup list at: " & Now 'Then call the supervisor's CheckWakup method fclsWakeupSupervisor.CheckWakeup End Sub ' 'This is a very simple way of programming the processes that need to be wakened every day ' Private Sub txtProcessName_AfterUpdate() 'pass in the time to do the wakeup and the process name of the process to wake up '!!!!notice no error handling such as was anything entered in time!!!! fclsWakeupSupervisor.NewWakeup txtNewTime.Value, txtProcessName.Value 'if the form timer is not initialized, then set the interval to 10 seconds If Me.TimerInterval = 0 Then Me.TimerInterval = 10000 End If End Sub ' 'This is the event from the supervisor that will be raised if any process needs to be awakened. ' Private Sub fclsWakeupSupervisor_ProcessTime(lstrProcessName As String) txtWakingUp.Value = lstrProcessName End Sub ****************************************** Ok, so the idea is that the user opens the form, which loads the supervisor class. The user then enters times and process names into the two text boxes for this purpose. As soon as the first process is entered the timer starts ticking and every 10 seconds checks are made whether to wake someone up. If any process needs to be awakened, fclsWakeupSupervisor_ProcessTime(lstrProcessName As String) is called passing in the name of the process to awaken. The developer would put a function call in fclsWakeupSupervisor_ProcessTime to do whatever they want done once a day. I will eventually get this up on my web site as a Withevents demo. For now I am sending the entire database to John W. Colby www.ColbyConsulting.com -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Hengky Lie Sent: Friday, January 16, 2004 8:54 PM To: Access Developers discussion and problem solving Subject: Re: [AccessD] Wake up Call Program How to build a class ? Sorry, my Access level still below than average :-( John W. Colby www.ColbyConsulting.com -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Hengky Lie Sent: Friday, January 16, 2004 8:54 PM To: Access Developers discussion and problem solving Subject: Re: [AccessD] Wake up Call Program How to build a class ? Sorry, my Access level still below than average :-( From greggs at msn.com Sat Jan 17 11:13:06 2004 From: greggs at msn.com (Gregg) Date: Sat, 17 Jan 2004 11:13:06 -0600 Subject: [AccessD] Database Security In-Reply-To: <200401130007.i0D07wm31666@databaseadvisors.com> Message-ID: Is there some magical way to keep an employee from burning a copy of the database to a CD? The customer does not want to restrict use of CD burning so... if not.... is there a way to encrypt the database with a password? I see the user level security will encrypt it for those users but I would rather not have the hassles of turning that on. If I could encrypt with a password that I could pass through in code, I wouldn't worry if anyone took it. if not.... is SQL a better answer? Gregg Steinbrenner From jwcolby at colbyconsulting.com Sat Jan 17 12:01:50 2004 From: jwcolby at colbyconsulting.com (John W. Colby) Date: Sat, 17 Jan 2004 13:01:50 -0500 Subject: [AccessD] C2DbWakeup Message-ID: For anyone interested, the wakeup class demo requested by Hengky Lie has been added to my web site. Click the fifth button from the bottom - Withevents demo. The bottom item on the page C2DbWakeup.zip will download the demo to your computer. John W. Colby www.ColbyConsulting.com From Subscriptions at servicexp.com Sat Jan 17 12:15:20 2004 From: Subscriptions at servicexp.com (Robert Gracie) Date: Sat, 17 Jan 2004 13:15:20 -0500 Subject: [AccessD] C2DbWakeup In-Reply-To: Message-ID: Thank You John! Robert Gracie -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of John W. Colby Sent: Saturday, January 17, 2004 1:02 PM To: AccessD Subject: [AccessD] C2DbWakeup For anyone interested, the wakeup class demo requested by Hengky Lie has been added to my web site. Click the fifth button from the bottom - Withevents demo. The bottom item on the page C2DbWakeup.zip will download the demo to your computer. John W. Colby www.ColbyConsulting.com _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From gustav at cactus.dk Sat Jan 17 13:03:23 2004 From: gustav at cactus.dk (Gustav Brock) Date: Sat, 17 Jan 2004 20:03:23 +0100 Subject: [AccessD] Database Security In-Reply-To: References: Message-ID: <12137332040.20040117200323@cactus.dk> Hi Gregg If this is Access 97 you may look up in the archives from 2002-10-01: A97 database password It's quick to set and with the speed of today's machines the users wouldn't note any difference. Of course, if the users are allowed to copy files you will need to move the data off a file which the users can locate. This can be done by using an SQL engine, moving your app to a terminal server, or I guess (haven't tried and it may perform too slowly) by opening an Access database on a remote machine which has attached tables from a third machine where users cannot log in ... /gustav > Is there some magical way to keep an employee from burning a copy of the > database to a CD? The customer does not want to restrict use of CD burning > so... > if not.... > is there a way to encrypt the database with a password? I see the user > level security will encrypt it for those users but I would rather not have > the hassles of turning that on. If I could encrypt with a password that I > could pass through in code, I wouldn't worry if anyone took it. > if not.... > is SQL a better answer? > Gregg Steinbrenner From JHewson at karta.com Sat Jan 17 13:03:49 2004 From: JHewson at karta.com (Jim Hewson) Date: Sat, 17 Jan 2004 13:03:49 -0600 Subject: [AccessD] Database Security Message-ID: <4AE733BBEEE72647A9F950F7275F262E1126F9@nt04.karta.com> Gregg, This is what I did. It's working. I have a database that shouldn't be moved from the directory where it resides. I renamed the primary table. I created a link to the primary table to itself. I renamed the link to the original table name. The database works... All the fields, queries, etc. If the database is moved to any other location an error message pops up and closes the database but leaves the Access window open. Any feedback on this method would be appreciated. Jim -----Original Message----- From: Gregg [mailto:greggs at msn.com] Sent: Saturday, January 17, 2004 11:13 AM To: Access Developers discussion and problem solving Subject: [AccessD] Database Security Is there some magical way to keep an employee from burning a copy of the database to a CD? The customer does not want to restrict use of CD burning so... if not.... is there a way to encrypt the database with a password? I see the user level security will encrypt it for those users but I would rather not have the hassles of turning that on. If I could encrypt with a password that I could pass through in code, I wouldn't worry if anyone took it. if not.... is SQL a better answer? Gregg Steinbrenner _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From michael.mattys at adelphia.net Sat Jan 17 13:23:26 2004 From: michael.mattys at adelphia.net (Michael R Mattys) Date: Sat, 17 Jan 2004 14:23:26 -0500 Subject: [AccessD] C2DbWakeup References: Message-ID: <020901c3dd2f$6587b5e0$6401a8c0@default> John, I just had a look at your demo and just wanted to offer that you could put in something like the following 'Module Public Declare Function WinExec Lib "kernel32" _ (ByVal lpCmdLine As String, ByVal nCmdShow As Long) As Long 'clsWakeUp Function Run(lstrProcessName) As Boolean 'Hasn't run today so check if the time is > mdetTimeToRun If time() > mdteTimeToRun Then If Date > mdteLastRan Then Dim lngProc As Long lngProc = WinExec(mstrProcessName, 1) 'Mark mdteLastRun = Now() mdteLastRan = Date 'and return true lstrProcessName = mstrProcessName Run = True End If End If End Function Michael R. Mattys Try MattysMapLib for MapPoint at www.mattysconsulting.com ----- Original Message ----- From: "John W. Colby" To: "AccessD" Sent: Saturday, January 17, 2004 1:01 PM Subject: [AccessD] C2DbWakeup > For anyone interested, the wakeup class demo requested by Hengky Lie has > been added to my web site. Click the fifth button from the bottom - > Withevents demo. The bottom item on the page C2DbWakeup.zip will download > the demo to your computer. > > John W. Colby > www.ColbyConsulting.com > > > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com From jwcolby at colbyconsulting.com Sat Jan 17 13:44:13 2004 From: jwcolby at colbyconsulting.com (John W. Colby) Date: Sat, 17 Jan 2004 14:44:13 -0500 Subject: [AccessD] C2DbWakeup In-Reply-To: <020901c3dd2f$6587b5e0$6401a8c0@default> Message-ID: Fascinating. This runs a program called mstrProcessName I assume? I think I would put that at the supervisor level (or event the form level) so that the supervisor (or form) could decide whether the thing needing awakened is an external program or not. Nice idea though. John W. Colby www.ColbyConsulting.com -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Michael R Mattys Sent: Saturday, January 17, 2004 2:23 PM To: Access Developers discussion and problem solving Subject: Re: [AccessD] C2DbWakeup John, I just had a look at your demo and just wanted to offer that you could put in something like the following 'Module Public Declare Function WinExec Lib "kernel32" _ (ByVal lpCmdLine As String, ByVal nCmdShow As Long) As Long 'clsWakeUp Function Run(lstrProcessName) As Boolean 'Hasn't run today so check if the time is > mdetTimeToRun If time() > mdteTimeToRun Then If Date > mdteLastRan Then Dim lngProc As Long lngProc = WinExec(mstrProcessName, 1) 'Mark mdteLastRun = Now() mdteLastRan = Date 'and return true lstrProcessName = mstrProcessName Run = True End If End If End Function Michael R. Mattys Try MattysMapLib for MapPoint at www.mattysconsulting.com ----- Original Message ----- From: "John W. Colby" To: "AccessD" Sent: Saturday, January 17, 2004 1:01 PM Subject: [AccessD] C2DbWakeup > For anyone interested, the wakeup class demo requested by Hengky Lie has > been added to my web site. Click the fifth button from the bottom - > Withevents demo. The bottom item on the page C2DbWakeup.zip will download > the demo to your computer. > > John W. Colby > www.ColbyConsulting.com > > > _______________________________________________ > 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 From dwaters at usinternet.com Sat Jan 17 17:39:38 2004 From: dwaters at usinternet.com (Dan Waters) Date: Sat, 17 Jan 2004 17:39:38 -0600 Subject: [AccessD] Menu Bar in VBA IDE Message-ID: <000001c3dd53$2f0ea9a0$de1811d8@DanWaters> Help! Somehow I closed the Menu Bar for the VBA IDE window, and I can't get it back. I've gone into the Toolbars dialog where the Menu Bar checkbox is checked. But, I can't uncheck it so I can recheck it. I've uninstalled Access (XP) and reinstalled but no joy. I've run Registry Mechanic looking for problems but none were reported. Anyone know how to fix this? Thanks, Dan Waters From Lambert.Heenan at AIG.com Wed Jan 14 12:06:45 2004 From: Lambert.Heenan at AIG.com (Heenan, Lambert) Date: Wed, 14 Jan 2004 13:06:45 -0500 Subject: [AccessD] Withevents vs Implements Message-ID: <8B98F8EA48F8BA47A2F24E0D0AF40CF407AD7CBE@xlivmbx12.aig.com> Hey John, I was reading the chapter you referred us to and I wondered who wrote the part about building the event handler stubs. It says: "The easiest way to get an event handler built is to simply place a control of the type you desire in a form, name the control exactly what you will call it in your class, open the properties box for that control, then use the code builder to build the event stub. Now cut the event stub out of the form's module and paste it into your own class." This cumbersome procedure works, but there's a much simpler way to do it. In the class that's got the WithEvents objects declared, select the object name from the left-hand combobox in the module window. The right-hand combobox will then list all the possible events for the object selected. If you then choose one of those events a stub event handler will be created in the module, complete with all the parameters it needs. I'm surprised no-one noticed that before! Something to update in the 2nd edition? :-) Lambert > -----Original Message----- > From: John W. Colby [SMTP:jwcolby at colbyconsulting.com] > Sent: Tuesday, January 13, 2004 9:05 PM > To: Access Developers discussion and problem solving > Subject: [AccessD] Withevents vs Implements > > Robert, > > >Why not use Implements instead of WithEvents? > > They are not the same thing at all. Implements is interface inheritance, > i.e. subclassing the exposed global data and method DEFINITIONS of an > object. In some circles it is also called a Contract - "I agree to > provide > similar functionality and data as the object that I am implementing - plus > something additional that I want to add". Unfortunately, unlike real > inheritance where you also get the actual code of the parent object (if > you > don't override it), in Implements you don't. If you want that code you > have > to cut and paste it into you own subclassed object (if the source is even > available to you). Yuk. > > Withevents is nothing more than the ability to sink events from one OR > MORE > objects in your own class. I am wrapping an entire object (or at least > some > of it's events) inside my class. > > One of the objectives of object oriented programming (of which inheritance > is a technique), is encapsulation of all of the data and code required to > implement an "object". Encapsulation simply means placing everything in > one > place, but it also means hiding implementation details from view. > > When a combo box double click event occurs (in my framework) my class for > the combo control MAY open a form to allow the user to add new items to > the > table that contains the data for the combo. Likewise that same form can > be > used to EDIT (or delete) the data in that table. Either way, the form is > opened modal (you can't do anything outside the form) and when that form > closes, the combo is requeried so that the latest contents of the table > are > contained in the combo. > > How is all that done? Who cares? All that the developer needs to know is > how to cause the combo class to use that functionality. In the case of my > framework, it is caused by passing a form name to the combo class through > one of it's methods. Doing that sets up the combo to "know" that if a > double click occurs it should open that form. > > So my class has a variable to hold the name of the form to open and has a > method to pass in the name of the form. Equally importantly, my combo > class > sinks the double click itself and runs code that opens that form IF the > variable contains a string of length > 0. If it DOESN'T have a form name > to > open, it puts up a message box telling the user they don't have permission > to edit the data behind the combo. > > It happens that I use autonumber PKs throughout my databases. As a result > the column(0) of the bound combo contains the PK of the record currently > selected in the combo. When (if) the form opens, the combo class passes > that PK of the record that is currently selected in the combo to the form > (as an openarg, in the same format that ADH used for tags) , and the > form's > class "moves" the recordset of the form being opened to display that > record > and sets the focus into that record. This allows the user to not only > open > the form using a DblClick, but be right there at the data they need to > edit > (if for example the data is wrong - a misspelled name for example). > > As you can see, having a class to wrap a combo up in can be a pretty > useful > thing. All this functionality is just there, available to me at all > times. > I write this kind of code once, then all combos throughout my application > have this functionality. How it happens is hidden from the developer (me > in > this case), I don't have to remember how to do all this stuff, the class > knows how. I don't have to remember to call a function in an event stub > in > a form somewhere, if a class is instantiated for that combo it has that > functionality. > > Withevents is the key that allows me to sink that DblClick right inside my > class so that I am not having to remember to call functions to get this > stuff to happen. > > Believe me, I used to do pretty much the same thing without classes, just > calling functions from event stubs in the form itself. In fact I wrote an > event stub insertion wizard to build these function calls specifically for > my framework (C2DbFrameWiz) and insert them into the form. Believe me > again > when I say that method of programming isn't even in the same league as > classes and Withevents. > > LEARN THIS STUFF, you won't regret it. BTW, Withevents is available in > VBA > (Excel, Word etc.), VB as well as VB.NET so it's not something you will > learn just for Access. > > Again my sincere thanks to Shamil who prodded me to figure this stuff out > and provided sample code to get me started. I repeat, I would not be > where > I am today as an Access programmer without Withevents and Classes. > > BTW, I wrote a chapter for this stuff (Withevents) for Beginning Access > 2002 > VBA, Wrox publishers, ISBN 1-86100-821-X. The entire chapter was > published > in Advisor (published on my birthday in fact). > > http://accessvbsqladvisor.com/Articles.nsf/dp/A6CBCC9F0ED68B2E88256DD4007C > 2FDD > > Watch for line wrap. > > Of course you could just buy the book. > > John W. Colby > www.ColbyConsulting.com > > -----Original Message----- > From: accessd-bounces at databaseadvisors.com > [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Robert Gracie > Sent: Tuesday, January 13, 2004 4:45 PM > To: Access Developers discussion and problem solving > Subject: RE: [AccessD] =function() in .onclick > > > Hello All, > Since I'm just learning this type of programming technique I thought I > would ask a question... > > Why not use Implements instead of WithEvents? My limited understand of > WithEvents is that they will not return functionality unit they (the > event) > has completed processing... Since I'm just at the "door" so to speak with > learning how to use and incorporate these new (to me) programming > techniques > into my work, I really want to start out using the "best" technique... > > > Robert Gracie > www.servicexp.com > > > > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com From jwcolby at colbyconsulting.com Sat Jan 17 19:26:10 2004 From: jwcolby at colbyconsulting.com (John W. Colby) Date: Sat, 17 Jan 2004 20:26:10 -0500 Subject: [AccessD] C2DbWakeup In-Reply-To: <020901c3dd2f$6587b5e0$6401a8c0@default> Message-ID: Per Michaels suggestion I added the ability of clsWakeup to actually execute the process name as a program. I also added a boolean to the init parameters to allow telling clsWakeup whether or not to execute this as a windows command (program). This required also adding a boolean parameter to the Supervisor function that creates the clsWakeup instance. And finally, I added a checkbox to the form to allow the user to select whether the process name being added is a windows program or not. The modified demo can be found on my site. The new code now looks like: Option Compare Database Option Explicit ' 'This class holds information about a single wakeup ' Private mdteLastRan As Date 'The last date a wakeup was done Private mdteTimeToRun As Date 'The time to say wakeup Private mstrProcessName As String 'The process name needing woken up Private mblnRunCommand As Boolean 'True means class instance will run the process as a command (windows program) Private Declare Function WinExec Lib "kernel32" _ (ByVal lpCmdLine As String, ByVal nCmdShow As Long) As Long ' 'The class_Initialize is similar to Form_Open in that it always runs ONE time as a class opens 'Use this to initialize the LastDateRan variable ' Private Sub Class_Initialize() mdteLastRan = Date - 1 End Sub ' 'Each instance of this class will hold a time to run (wakeup) 'And a process to wakeup ' Function Init(ldteTimeToRun As Date, lstrProcessName As String, _ Optional lblnRunCommand As Boolean = False) mdteTimeToRun = ldteTimeToRun mstrProcessName = lstrProcessName mblnRunCommand = lblnRunCommand End Function ' 'This function checks whether the process has run in the last 24 hours 'If so it returns true and passes back the process name in a string variable 'passed in ' Function Run(lstrProcessName) As Boolean Dim lngProc As Long 'Hasn't run today so check if the time is > mdetTimeToRun If Time() > mdteTimeToRun Then If Date > mdteLastRan Then 'Mark mdteLastRun = Now() mdteLastRan = Date ' If mblnRunCommand Then lngProc = WinExec(mstrProcessName, 1) End If 'and return true lstrProcessName = mstrProcessName Run = True End If End If End Function ********* Option Compare Database Option Explicit 'A collection to hold instances of clsWakeup Private colClsWakeup As Collection 'An event to raise if a clsWakeup instance says its time to wakeup Public Event ProcessTime(lstrProcessName As String) ' 'The class_Initialize is similar to Form_Open in that it always runs ONE time as a class opens 'Use this to create the collection to hold the wakeup classes ' Private Sub Class_Initialize() Set colClsWakeup = New Collection End Sub ' 'Class_Terminate is similar to Form_Close and always runs ONCE as the class terminates 'Use it to unload all the clsWakeup instances in the collection ' Private Sub Class_Terminate() term End Sub ' 'As the supervisor class closes, it must unload all the clsWakeup instances in its collection ' Function term() On Error Resume Next While colClsWakeup.Count > 0 colClsWakeup.Remove (1) Wend End Function ' 'This function is responsible for creating one instance of clsWakeup every time it is called ' Function NewWakeup(ldteTimeToRun As Date, lstrProcessName As String, _ Optional blnRunAsCommand As Boolean = False) Dim lclsWakeup As clsWakeup Set lclsWakeup = New clsWakeup 'It then initializes that instance with the TimeToRun and the ProcessName lclsWakeup.Init ldteTimeToRun, lstrProcessName, blnRunAsCommand 'And finally, it saves a pointer to the clsWakeup instance just created in the collection colClsWakeup.Add lclsWakeup, lstrProcessName End Function ' 'CheckWakeup is called by a timer tick on a form. It cycles through all the instances of clsWakeup 'in its collection asking each instance if it's time for that instance to run. ' Function CheckWakeup() Dim lclsWakeup As clsWakeup Dim lstrProcessName As String For Each lclsWakeup In colClsWakeup 'Check each instance of clsWakeup If lclsWakeup.Run(lstrProcessName) Then 'If time to run then RaiseEvent ProcessTime(lstrProcessName) 'Raise an event telling the world End If Next lclsWakeup End Function ****** Option Compare Database Option Explicit ' 'Dimension a supervisor class Withevents ' Private WithEvents fclsWakeupSupervisor As clsWakeupSupervisor ' 'When the form closes we need to unload the supervisor class ' Private Sub Form_Close() Set fclsWakeupSupervisor = Nothing End Sub ' 'When the form opens we need to create an instance of the supervisor class ' Private Sub Form_Open(Cancel As Integer) Set fclsWakeupSupervisor = New clsWakeupSupervisor End Sub ' 'The close button (standard stuff) ' Private Sub Command6_Click() On Error GoTo Err_Command6_Click DoCmd.Close Exit_Command6_Click: Exit Sub Err_Command6_Click: MsgBox Err.Description Resume Exit_Command6_Click End Sub ' 'The form's timer event will be used to call the supervisor class' CheckWakeup method ' Private Sub Form_Timer() 'Erase the last value to make clear that it only was set once / 24 hours txtWakingUp.Value = "" 'And write a status to the status box to make clear that we are calling this every 10 seconds txtStatus.Value = "Checked wakeup list at: " & Now 'Then call the supervisor's CheckWakup method fclsWakeupSupervisor.CheckWakeup End Sub ' 'This is a very simple way of programming the processes that need to be wakened every day ' Private Sub txtProcessName_AfterUpdate() 'pass in the time to do the wakeup and the process name of the process to wake up '!!!!notice no error handling such as was anything entered in time!!!! fclsWakeupSupervisor.NewWakeup txtNewTime.Value, txtProcessName.Value, chkRunAsCommand.Value 'if the form timer is not initialized, then set the interval to 10 seconds If Me.TimerInterval = 0 Then Me.TimerInterval = 10000 End If End Sub ' 'This is the event from the supervisor that will be raised if any process needs to be awakened. ' Private Sub fclsWakeupSupervisor_ProcessTime(lstrProcessName As String) txtWakingUp.Value = lstrProcessName End Sub John W. Colby www.ColbyConsulting.com -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Michael R Mattys Sent: Saturday, January 17, 2004 2:23 PM To: Access Developers discussion and problem solving Subject: Re: [AccessD] C2DbWakeup John, I just had a look at your demo and just wanted to offer that you could put in something like the following 'Module Public Declare Function WinExec Lib "kernel32" _ (ByVal lpCmdLine As String, ByVal nCmdShow As Long) As Long 'clsWakeUp Function Run(lstrProcessName) As Boolean 'Hasn't run today so check if the time is > mdetTimeToRun If time() > mdteTimeToRun Then If Date > mdteLastRan Then Dim lngProc As Long lngProc = WinExec(mstrProcessName, 1) 'Mark mdteLastRun = Now() mdteLastRan = Date 'and return true lstrProcessName = mstrProcessName Run = True End If End If End Function Michael R. Mattys Try MattysMapLib for MapPoint at www.mattysconsulting.com From Subscriptions at servicexp.com Sat Jan 17 20:48:40 2004 From: Subscriptions at servicexp.com (Robert Gracie) Date: Sat, 17 Jan 2004 21:48:40 -0500 Subject: [AccessD] Withevents vs Implements In-Reply-To: <8B98F8EA48F8BA47A2F24E0D0AF40CF407AD7CBE@xlivmbx12.aig.com> Message-ID: <000001c3dd6d$946c5fd0$6401a8c0@RG> Now that is weird, I just discovered that two days ago. Before that I was "cutting and pasting" Robert Gracie -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Heenan, Lambert Sent: Wednesday, January 14, 2004 1:07 PM To: 'Access Developers discussion and problem solving' Subject: RE: [AccessD] Withevents vs Implements Hey John, I was reading the chapter you referred us to and I wondered who wrote the part about building the event handler stubs. It says: "The easiest way to get an event handler built is to simply place a control of the type you desire in a form, name the control exactly what you will call it in your class, open the properties box for that control, then use the code builder to build the event stub. Now cut the event stub out of the form's module and paste it into your own class." This cumbersome procedure works, but there's a much simpler way to do it. In the class that's got the WithEvents objects declared, select the object name from the left-hand combobox in the module window. The right-hand combobox will then list all the possible events for the object selected. If you then choose one of those events a stub event handler will be created in the module, complete with all the parameters it needs. I'm surprised no-one noticed that before! Something to update in the 2nd edition? :-) Lambert > -----Original Message----- > From: John W. Colby [SMTP:jwcolby at colbyconsulting.com] > Sent: Tuesday, January 13, 2004 9:05 PM > To: Access Developers discussion and problem solving > Subject: [AccessD] Withevents vs Implements > > Robert, > > >Why not use Implements instead of WithEvents? > > They are not the same thing at all. Implements is interface > inheritance, i.e. subclassing the exposed global data and method > DEFINITIONS of an object. In some circles it is also called a > Contract - "I agree to provide similar functionality and data as the > object that I am implementing - plus something additional that I want > to add". Unfortunately, unlike real inheritance where you also get > the actual code of the parent object (if you > don't override it), in Implements you don't. If you want that code you > have > to cut and paste it into you own subclassed object (if the source is even > available to you). Yuk. > > Withevents is nothing more than the ability to sink events from one OR > MORE objects in your own class. I am wrapping an entire object (or at > least some > of it's events) inside my class. > > One of the objectives of object oriented programming (of which > inheritance is a technique), is encapsulation of all of the data and > code required to implement an "object". Encapsulation simply means > placing everything in one place, but it also means hiding > implementation details from view. > > When a combo box double click event occurs (in my framework) my class > for the combo control MAY open a form to allow the user to add new > items to the table that contains the data for the combo. Likewise > that same form can be > used to EDIT (or delete) the data in that table. Either way, the form is > opened modal (you can't do anything outside the form) and when that form > closes, the combo is requeried so that the latest contents of the table > are > contained in the combo. > > How is all that done? Who cares? All that the developer needs to > know is how to cause the combo class to use that functionality. In > the case of my framework, it is caused by passing a form name to the > combo class through one of it's methods. Doing that sets up the combo > to "know" that if a double click occurs it should open that form. > > So my class has a variable to hold the name of the form to open and > has a method to pass in the name of the form. Equally importantly, my > combo class sinks the double click itself and runs code that opens > that form IF the variable contains a string of length > 0. If it > DOESN'T have a form name to > open, it puts up a message box telling the user they don't have permission > to edit the data behind the combo. > > It happens that I use autonumber PKs throughout my databases. As a > result the column(0) of the bound combo contains the PK of the record > currently selected in the combo. When (if) the form opens, the combo > class passes that PK of the record that is currently selected in the > combo to the form (as an openarg, in the same format that ADH used for > tags) , and the form's class "moves" the recordset of the form being > opened to display that record > and sets the focus into that record. This allows the user to not only > open > the form using a DblClick, but be right there at the data they need to > edit > (if for example the data is wrong - a misspelled name for example). > > As you can see, having a class to wrap a combo up in can be a pretty > useful thing. All this functionality is just there, available to me > at all times. > I write this kind of code once, then all combos throughout my application > have this functionality. How it happens is hidden from the developer (me > in > this case), I don't have to remember how to do all this stuff, the class > knows how. I don't have to remember to call a function in an event stub > in > a form somewhere, if a class is instantiated for that combo it has that > functionality. > > Withevents is the key that allows me to sink that DblClick right > inside my class so that I am not having to remember to call functions > to get this stuff to happen. > > Believe me, I used to do pretty much the same thing without classes, > just calling functions from event stubs in the form itself. In fact I > wrote an event stub insertion wizard to build these function calls > specifically for my framework (C2DbFrameWiz) and insert them into the > form. Believe me again when I say that method of programming isn't > even in the same league as classes and Withevents. > > LEARN THIS STUFF, you won't regret it. BTW, Withevents is available > in VBA (Excel, Word etc.), VB as well as VB.NET so it's not something > you will learn just for Access. > > Again my sincere thanks to Shamil who prodded me to figure this stuff > out and provided sample code to get me started. I repeat, I would not > be where I am today as an Access programmer without Withevents and > Classes. > > BTW, I wrote a chapter for this stuff (Withevents) for Beginning > Access 2002 VBA, Wrox publishers, ISBN 1-86100-821-X. The entire > chapter was published > in Advisor (published on my birthday in fact). > > http://accessvbsqladvisor.com/Articles.nsf/dp/A6CBCC9F0ED68B2E88256DD4 > 007C > 2FDD > > Watch for line wrap. > > Of course you could just buy the book. > > John W. Colby > www.ColbyConsulting.com > > -----Original Message----- > From: accessd-bounces at databaseadvisors.com > [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Robert > Gracie > Sent: Tuesday, January 13, 2004 4:45 PM > To: Access Developers discussion and problem solving > Subject: RE: [AccessD] =function() in .onclick > > > Hello All, > Since I'm just learning this type of programming technique I thought > I would ask a question... > > Why not use Implements instead of WithEvents? My limited understand > of WithEvents is that they will not return functionality unit they > (the > event) > has completed processing... Since I'm just at the "door" so to speak with > learning how to use and incorporate these new (to me) programming > techniques > into my work, I really want to start out using the "best" technique... > > > Robert Gracie > www.servicexp.com > > > > _______________________________________________ > 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 From andy at minstersystems.co.uk Sun Jan 18 06:30:07 2004 From: andy at minstersystems.co.uk (Andy Lacey) Date: Sun, 18 Jan 2004 12:30:07 -0000 Subject: [AccessD] Menu Bar in VBA IDE In-Reply-To: <000001c3dd53$2f0ea9a0$de1811d8@DanWaters> Message-ID: <00c101c3ddbe$cee206f0$b274d0d5@minster33c3r25> Dan Can you knock up a macro and run it to show the menu bar? Andy > -----Original Message----- > From: accessd-bounces at databaseadvisors.com > [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Dan Waters > Sent: 17 January 2004 23:40 > To: 'Database Advisors' > Subject: [AccessD] Menu Bar in VBA IDE > > > Help! > > > > Somehow I closed the Menu Bar for the VBA IDE window, and I > can't get it back. > > > > I've gone into the Toolbars dialog where the Menu Bar > checkbox is checked. But, I can't uncheck it so I can recheck it. > > > > I've uninstalled Access (XP) and reinstalled but no joy. > > > > I've run Registry Mechanic looking for problems but none were > reported. > > > > > > Anyone know how to fix this? > > > > > > Thanks, > > Dan Waters > > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/a> ccessd > Website: > http://www.databaseadvisors.com > > From gustav at cactus.dk Sun Jan 18 07:43:29 2004 From: gustav at cactus.dk (Gustav Brock) Date: Sun, 18 Jan 2004 14:43:29 +0100 Subject: [AccessD] OT: Writing raw RTF document using VB/VBA/C(++)/DELPHI/... In-Reply-To: References: Message-ID: <3719000100.20040118144329@cactus.dk> Hi Bryan This link doesn't work with my Opera browser, but the LaTeX people have a nice collection of links to old (basic) as well as newer documentation: http://latex2rtf.sourceforge.net/ Here is the brief list of control words: http://latex2rtf.sourceforge.net/rtfspec_62.html /gustav > Shamil, > RTF Files are just plain old ascii text. So Low level File I/O will work to write it. > The biggest challenge would be to get the text string correct before writing them out to the file. > Here is a link to the RTF spec. > http://msdn.microsoft.com/library/?url=/library/en-us/dnrtfspec/html/rtfspec.asp?frame=true > As for PDF, here is the link to the PDF Specs. > http://partners.adobe.com/asn/acrobat/docs.jsp#filefmtspecs > Bryan Carbonnell > bryan_carbonnell at cbc.ca >>>> shamil at smsconsulting.spb.ru 23-May-03 11:37:38 AM >>> > Hi All, > Has anybody seen on the Internet any advanced code samples of writing raw > text of RTF documents with different formatting styles, headings, lists, > tables etc. using VB/VBA/C#/C(++)/ but > without usage of ActiveX controls, without MS Word Automation etc. - i.e. > just plain raw code to write raw RTF like in P.S. of this message? > And maybe .PDF too? - or this latter is too much to have for free? - maybe > then good description of .PDF format in electronic form or printed as a > book? Any useful refs on that? > TIA for any info, > Shamil From carbonnb at sympatico.ca Sun Jan 18 18:25:02 2004 From: carbonnb at sympatico.ca (Bryan Carbonnell) Date: Sun, 18 Jan 2004 19:25:02 -0500 Subject: [AccessD] OT: Writing raw RTF document using VB/VBA/C(++)/DELPHI/... In-Reply-To: <3719000100.20040118144329@cactus.dk> References: Message-ID: <400ADD8E.14238.1894D85@localhost> On 18 Jan 2004 at 14:43, Gustav Brock wrote: > Hi Bryan > > This link doesn't work with my Opera browser, but the LaTeX people Wow, you sure pulled that one out of the deep dark recesses of the archive :-) Here is one that should work in Opera. That's where I've copied it from http://msdn.microsoft.com/library/en-us/dnrtfspec/html/rtfspec.asp > have a nice collection of links to old (basic) as well as newer > documentation: > > http://latex2rtf.sourceforge.net/ > > Here is the brief list of control words: > > http://latex2rtf.sourceforge.net/rtfspec_62.html Cool! Thanks. -- Bryan Carbonnell - carbonnb at sympatico.ca Be who you are and say what you feel because those who mind don't matter and those who matter don't mind - Dr.Seuss From accessd666 at yahoo.com Mon Jan 19 00:27:22 2004 From: accessd666 at yahoo.com (Sad Der) Date: Sun, 18 Jan 2004 22:27:22 -0800 (PST) Subject: [AccessD] Error 3218 "Couldn't Update; Currently Locked" <> In-Reply-To: <12624705504.20040116155945@cactus.dk> Message-ID: <20040119062722.56995.qmail@web60208.mail.yahoo.com> Gustav, thanx again. However, I'm a 'rent-a-programmer' (what's the official anglish term?) and this organisation is completely Oracle minded => SQL-server is bad, MS sucks and Access...isn't that some sort of notepad? So, I need proof. Is there a correct way to test this? Sad --- Gustav Brock wrote: > Hi Sad > > Those settings are probably to low. > Try setting them to maximum: > > > These two commands may be set at the console > screen, they will take > > effect at once and doesn't require restart of the > server. If they > > prove of beneficial, include them in the > autoexec.ncf file of the > > server. > > > > SET MAXIMUM RECORD LOCKS = 200000 > > SET MAXIMUM RECORD LOCKS PER CONNECTION = 100000 > > > > The only drawback is a slightly larger RAM > allocation which is not > > significant with today's multimegabyte servers but > did count in the > > days of servers running on 8 to 16 MB RAM and > every 100K was of > > importance. > > /gustav > > > > These are the new settings: > > Max. Records Lock per Connection: 1000 > > Max. Files Lock per Connection: 5000 > > Max. Records Lock: 40000 > > Max. Files Lock: 400000 > > > How can I test these? Ok, for the first one I have > to > > lock 999, 1000, 1001 records...question is how do > I do > > that? > > > Is importing a file with 999, 1000, 1001 records > > enough? > > > Any testing tips/links? > > TIA. > > > SD > > > > --- Jim Dettman wrote: > >> < >> occasionally the users get the following error: > >> Error 3218 "Couldn't Update; Currently Locked">> > >> > >> There are lots of things that will cause that > >> message, but I think you > >> might be barking up the wrong tree in that it's a > >> Novell problem. > >> > >> From your comments abut it being "buggy", I > would > >> think more that the app > >> was poorly written and stepping on it's own toes, > >> resulting in the above > >> error. > >> > >> One way to check that out easily is to copy the > >> backend to a local drive, > >> re-link the tables (I'm assuming it's a split > app), > >> then test. If you still > >> get the error messages it has nothing to do with > >> Novell. If the error > >> disappears, then it's related to locking. > >> > >> The other test you can do is using the > SetOption > >> method of the dbEngine > >> object, set dbMaxLocksPerFile to a number less > then > >> the allowed number of > >> locks under Novell. This will ensure that JET > never > >> uses more locks then > >> Novell allows. If that was the problem, the > error > >> messages will disappear. > >> > >> Jim Dettman > >> President, > >> Online Computer Services of WNY, Inc. > >> (315) 699-3443 > >> jimdettman at earthlink.net > >> > >> -----Original Message----- > >> From: accessd-bounces at databaseadvisors.com > >> [mailto:accessd-bounces at databaseadvisors.com]On > >> Behalf Of Sad Der > >> Sent: Friday, January 16, 2004 7:26 AM > >> To: Acces User Group > >> Subject: [AccessD] Error 3218 "Couldn't Update; > >> Currently Locked" > >> > >> > >> Hi group, > >> > >> We use A2K SP1 on a Novell network. > >> occasionally the users get the following error: > >> Error 3218 "Couldn't Update; Currently Locked" > >> > >> I noticed that this occurs when a user tries to > load > >> interface messages into the DB. The messages have > >> approx. > >> 100-150 records. Total size of 12Kb. > >> > >> I read on support.microsoft.com (KB302484) that > this > >> has > >> to do with the number of record locks on the > Novell > >> server. But this KB-Article is related to A97! > >> > >> What's the deal with locking in A2k? > >> > >> We 'enherited' this system and error handling, if > >> any, > >> is > >> really buggy. So every time this occurs we get a > >> lot(!) of > >> db-pollution!! > >> > >> My question: What can I do to prevent this from > >> happening? > > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com __________________________________ Do you Yahoo!? Yahoo! Hotjobs: Enter the "Signing Bonus" Sweepstakes http://hotjobs.sweepstakes.yahoo.com/signingbonus From bruce_bruen at mlc.com.au Mon Jan 19 00:42:46 2004 From: bruce_bruen at mlc.com.au (bruce_bruen at mlc.com.au) Date: Mon, 19 Jan 2004 17:42:46 +1100 Subject: [AccessD] Methods, tools and the d*^$#)( UML Message-ID: Hiya folks, Happy new year! Looks like I am be back from the "hallowed halls" of method consulting yet again and having to do with the ____real___ world of development.... Anyway, having spoken out (within the client) for the last x months about development best practices, UMl and the way, the truth and the light of rapid, but not extreme, development methods I am now in the enviable position of having to implement what I said. One of the problems of speaking from the ivory tower of development methodology reseacrh is that many, many options are presented and many ideas are gleaned and ...discussed... (many name also appear, amongst which the illustrious of this list come up quite frequently! ) . Its very easy to talk of best practice - and in one's own universe - to implement it. However, I have just been granted the privilege (?) of implementing it across an entire organisation structure. An organisation with a large and diverse set of IT environments (mainframe to J2EE) and a large and diverse set of psychologies (individual and team). <> When I started in this game FTN77 was a good idea, COBOL transformed the way we had to think about systems and information, IT centres consisted of programmers in white coats (or sports coats with elbow patches) and I/O was all about card decks or, for the bleeding edge companies, text to input forms ...... Name: |__|__|__|__|__|__|__|__|__| |__|__|__|__|__|__|__|__|__| Sex: | __| (Y/N) DOB: |__|__| / |__|__| / |__|__| etc... We seem to have moved on a bit from this paradigm. <> Now, given that AccessD represents one of the largest and most widely interested development communities on the planet - (if you doubt me try following a PHP mailing list for a couple of weeks - talk about AR!) my question is this (actually these) Are you using UML to design in VBA/VB/VB.net environments? Is it "working"? Are you using Unified Process methods in VBA/VB/VB.net environmets? Again, is it working? In your general experience, are methodologies enabiling or overhead? rgrds Bruce The information contained in this e-mail communication may be confidential. You should only read, disclose, re-transmit,copy,distribute, act in reliance on or commercialise the information if you are authorised to do so. If you are not the intended recipient of this e-mail communication, please immediately notify us by e-mail to postmaster at mlc.com.au, or reply by e-mail direct to the sender and then destroy any electronic and paper copy of this message. Any views expressed in this e-mail communication are those of the individual sender, except where the sender specifically states them to be the views of a member of the National Australia Bank Group of companies. Any advice contained in this e-mail has been prepared without taking into account your objectives, financial situation or needs. Before acting on any advice in this e-mail, National Australia Bank Limited recommends that you consider whether it is appropriate for your circumstances. If this e-mail contains reference to any financial products, the National recommends you consider the Product Disclosure statement (PDS) or other disclosure document before making any decisions regarding any products. The National Australia Bank Group of companies does not represent, warrant or guarantee that the integrity of this communication has been maintained nor that the communication is free of errors, virus or interference. From gustav at cactus.dk Mon Jan 19 02:25:51 2004 From: gustav at cactus.dk (Gustav Brock) Date: Mon, 19 Jan 2004 09:25:51 +0100 Subject: [AccessD] Error 3218 "Couldn't Update; Currently Locked" <> In-Reply-To: <20040119062722.56995.qmail@web60208.mail.yahoo.com> References: <20040119062722.56995.qmail@web60208.mail.yahoo.com> Message-ID: <1082314558.20040119092551@cactus.dk> Hi Sad > thanx again. However, I'm a 'rent-a-programmer' > (what's the official anglish term?) and this > organisation is completely Oracle minded => SQL-server > is bad, MS sucks and Access...isn't that some sort of > notepad? > So, I need proof. Is there a correct way to test this? Yes, talk to the NetWare administrator. She just needs to type them on the console, no rebooting is needed. If success, append the commands to the autoexec.ncf file, if not they will vanish the next time the server is rebooted - in a couple of years. These settings are not hacks but the documented way to deal with the issue which is not related to Access only but to any (database) program requesting bunches of record locks: http://support.novell.com/cgi-bin/search/searchtid.cgi?/10019363.htm http://support.novell.com/cgi-bin/search/searchtid.cgi?/2914607.htm The reason why these settings are low as default is only to save a few KB of ram which was important in the days of x86 processors and servers running on 8 or 16 MB ram. For the newer NetWare versions - I believe from 5.1 and up - the default settings are much higher. /gustav > --- Gustav Brock wrote: >> Hi Sad >> >> Those settings are probably to low. >> Try setting them to maximum: >> >> > These two commands may be set at the console screen, they will take >> > effect at once and doesn't require restart of the server. If they >> > prove of beneficial, include them in the autoexec.ncf file of the >> > server. >> > >> > SET MAXIMUM RECORD LOCKS = 200000 >> > SET MAXIMUM RECORD LOCKS PER CONNECTION = 100000 >> > >> > The only drawback is a slightly larger RAM allocation which is not >> > significant with today's multimegabyte servers but did count in the >> > days of servers running on 8 to 16 MB RAM and every 100K was of >> > importance. >> >> /gustav >> >> >> > These are the new settings: >> > Max. Records Lock per Connection: 1000 >> > Max. Files Lock per Connection: 5000 >> > Max. Records Lock: 40000 >> > Max. Files Lock: 400000 >> >> > How can I test these? Ok, for the first one I have to >> > lock 999, 1000, 1001 records...question is how do I do >> > that? >> >> > Is importing a file with 999, 1000, 1001 records >> > enough? >> >> > Any testing tips/links? >> > TIA. >> >> > SD >> >> >> > --- Jim Dettman wrote: >> >> <> >> occasionally the users get the following error: >> >> Error 3218 "Couldn't Update; Currently Locked">> >> >> >> >> There are lots of things that will cause that >> >> message, but I think you >> >> might be barking up the wrong tree in that it's a >> >> Novell problem. >> >> >> >> From your comments abut it being "buggy", I would >> >> think more that the app >> >> was poorly written and stepping on it's own toes, >> >> resulting in the above >> >> error. >> >> >> >> One way to check that out easily is to copy the >> >> backend to a local drive, >> >> re-link the tables (I'm assuming it's a split app), >> >> then test. If you still >> >> get the error messages it has nothing to do with >> >> Novell. If the error >> >> disappears, then it's related to locking. >> >> >> >> The other test you can do is using the SetOption >> >> method of the dbEngine >> >> object, set dbMaxLocksPerFile to a number less then >> >> the allowed number of >> >> locks under Novell. This will ensure that JET never >> >> uses more locks then >> >> Novell allows. If that was the problem, the error >> >> messages will disappear. >> >> >> >> Jim Dettman >> >> President, >> >> Online Computer Services of WNY, Inc. >> >> (315) 699-3443 >> >> jimdettman at earthlink.net From artful at rogers.com Mon Jan 19 09:03:48 2004 From: artful at rogers.com (Arthur Fuller) Date: Mon, 19 Jan 2004 10:03:48 -0500 Subject: [AccessD] Methods, tools and the d*^$#)( UML In-Reply-To: Message-ID: Whew, a bundle of questions! In a previous job, I used Rational Rose about half my workday. I did all sorts of UML diagrams. The software in point consisted of hundreds of modules, written in a variety of languages including MS C++, VB, PowerBuilder, Access and Java. Everything talked to a SQL database, and lots of components in different languages had to interact. Access was used only for the most trivial components, such as setup utilities and so on. In this kind of situation, UML is an absolute necessity, IMO. There were approximately a dozen developers plus a software architect plus a data modeling expert plus a SQL DBA expert. Nobody but the DBA had the right to create a sproc or a view. No code was written without being vetted by several people in several design meetings. The interfaces were all worked out long in advance to the actual code being written. (Example: a given NT service might talk to a conveyer belt, a bar-code scanner and a weigh-scale, with the ability to recognize a bad scan then send an instruction to the belt to roll the object back so it could be rescanned and/or reweighed.) For this sort of project, woe to the team that tries to develop it without a design-tool like UML. Currently, I'm working pretty much in Access and SQL 2000, with a little here and there in .NET. So far as Access projects go, I think UML is overkill. Perhaps not the right word.... UML is designed for OOP languages, and Access is far from an OOP language, so the constructs don't make a lot of sense there. However, I am a big fan of ER design tools such as ERwin, PowerDesigner and so on. I would not consider doing a serious Access project without such a tool. What such tools let me do is concentrate on the database design without ever creating a table, and then when I'm satisfied, to click a button and generate ALL the tables, constraints, RI rules, indexes, etc.. If I want, I can Save As and create a new version of the diagram that in turn creates a new version of the database. Even when I inherit a database, the first thing I do is run it through PowerDesigner (my fave) so I can get a decent diagram and then study the big picture. Frequently I find major flaws just by looking at the diagram. One of my fave features of such a tool is called Domains. A Domain is defined as a meta-field, thoroughly specified (i.e. label, input mask, format, validation rules, etc.). Then when you're designing tables you can use these Domains instead of describing a new field each time. Let's say you have a column CustomerID which is an integer and should be presented as a combo-box consisting of SELECT CustomerID, CompanyName ORDER BY CompanyName Ascending. Describe it once, then drop it into every table where you need it. I spend a LOT of time devising my Domains before I get around to creating any actual tables. So.... UML is IMO most useful with truly O-O languages, and inappropriate for Access projects. Data-modeling tools on the other hand are essential for every serious database project (i.e. 30+ tables). My $.02... Arthur -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of bruce_bruen at mlc.com.au Sent: Monday, January 19, 2004 1:43 AM To: accessd at databaseadvisors.com Subject: [AccessD] Methods, tools and the d*^$#)( UML Hiya folks, Happy new year! Looks like I am be back from the "hallowed halls" of method consulting yet again and having to do with the ____real___ world of development.... Anyway, having spoken out (within the client) for the last x months about development best practices, UMl and the way, the truth and the light of rapid, but not extreme, development methods I am now in the enviable position of having to implement what I said. One of the problems of speaking from the ivory tower of development methodology reseacrh is that many, many options are presented and many ideas are gleaned and ...discussed... (many name also appear, amongst which the illustrious of this list come up quite frequently! ) . Its very easy to talk of best practice - and in one's own universe - to implement it. However, I have just been granted the privilege (?) of implementing it across an entire organisation structure. An organisation with a large and diverse set of IT environments (mainframe to J2EE) and a large and diverse set of psychologies (individual and team). <> When I started in this game FTN77 was a good idea, COBOL transformed the way we had to think about systems and information, IT centres consisted of programmers in white coats (or sports coats with elbow patches) and I/O was all about card decks or, for the bleeding edge companies, text to input forms ...... Name: |__|__|__|__|__|__|__|__|__| |__|__|__|__|__|__|__|__|__| Sex: | __| (Y/N) DOB: |__|__| / |__|__| / |__|__| etc... We seem to have moved on a bit from this paradigm. <> Now, given that AccessD represents one of the largest and most widely interested development communities on the planet - (if you doubt me try following a PHP mailing list for a couple of weeks - talk about AR!) my question is this (actually these) Are you using UML to design in VBA/VB/VB.net environments? Is it "working"? Are you using Unified Process methods in VBA/VB/VB.net environmets? Again, is it working? In your general experience, are methodologies enabiling or overhead? rgrds Bruce The information contained in this e-mail communication may be confidential. You should only read, disclose, re-transmit,copy,distribute, act in reliance on or commercialise the information if you are authorised to do so. If you are not the intended recipient of this e-mail communication, please immediately notify us by e-mail to postmaster at mlc.com.au, or reply by e-mail direct to the sender and then destroy any electronic and paper copy of this message. Any views expressed in this e-mail communication are those of the individual sender, except where the sender specifically states them to be the views of a member of the National Australia Bank Group of companies. Any advice contained in this e-mail has been prepared without taking into account your objectives, financial situation or needs. Before acting on any advice in this e-mail, National Australia Bank Limited recommends that you consider whether it is appropriate for your circumstances. If this e-mail contains reference to any financial products, the National recommends you consider the Product Disclosure statement (PDS) or other disclosure document before making any decisions regarding any products. The National Australia Bank Group of companies does not represent, warrant or guarantee that the integrity of this communication has been maintained nor that the communication is free of errors, virus or interference. _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com --- Incoming mail is certified Virus Free. Checked by AVG anti-virus system (http://www.grisoft.com). Version: 6.0.558 / Virus Database: 350 - Release Date: 1/2/2004 --- Outgoing mail is certified Virus Free. Checked by AVG anti-virus system (http://www.grisoft.com). Version: 6.0.558 / Virus Database: 350 - Release Date: 1/2/2004 From arielcom at indosat.net.id Mon Jan 19 17:57:01 2004 From: arielcom at indosat.net.id (Hengky Lie) Date: Tue, 20 Jan 2004 07:57:01 +0800 Subject: [AccessD] Wake up Call Program References: <2F8793082E00D4119A1700B0D0216BF802227764@main2.marlow.com> Message-ID: <001b01c3dee7$f05aa5b0$1000a8c0@default> Dear all friends, I want to say thank you to all of you that give me a lot of idea to solve my problem. God bless you all ! ----- Original Message ----- From: To: Sent: Saturday, January 17, 2004 4:48 PM Subject: RE: [AccessD] Wake up Call Program > Yikes, that is a relatively difficult task to hit out of the blue. > > If you don't find any other method, give me a holler. > > Drew From clh at christopherhawkins.com Mon Jan 19 18:09:39 2004 From: clh at christopherhawkins.com (Christopher Hawkins) Date: Mon, 19 Jan 2004 17:09:39 -0700 Subject: [AccessD] 'Duplicate values' error in Access - what number is it?!? Message-ID: <115550-220041220093986@christopherhawkins.com> I'm getting that classic error "The change you requested to the table were not successful because they would create duplicate values in the index, primary key or blah blah blah..." What is the error number of this error? And waht event triggers it?Try as I might, I cannot find a way to trap it. -C- From clh at christopherhawkins.com Mon Jan 19 18:19:53 2004 From: clh at christopherhawkins.com (Christopher Hawkins) Date: Mon, 19 Jan 2004 17:19:53 -0700 Subject: [AccessD] NEVER MIND: 'Duplicate values' error in Access - what number is it?!? Message-ID: <312720-22004122001953719@christopherhawkins.com> I'm an idiot...the very next thing I tried after sending my message got me what I wanted. FYI, here's what I did (the error was happening when a JanusGrid component was being updated): Private Sub grdMain_Error(ByVal ErrNumber As Long, ByVal DisplayMessage As Object) If ErrNumber = -2147217887 Then MsgBox "Got it!" Else MsgBox "Try again..." End If End Sub -Christopher- From lists at theopg.com Mon Jan 19 18:38:13 2004 From: lists at theopg.com (MarkH) Date: Tue, 20 Jan 2004 00:38:13 -0000 Subject: [AccessD] NEVER MIND - janus control?: 'Duplicate values' error in Access - what number isit?!? In-Reply-To: <312720-22004122001953719@christopherhawkins.com> Message-ID: <000401c3deed$b00a5b30$d00b6bd5@netboxxp> Sorry for drifting off topic, but... How do you find the grid control? I used it a couple of years ago for a one off project. I later used a free copy off a mag cd and found it crashed so I gave up, can't remember what the problem was as I was only playing. The first time I used it, it was great. Is it still buggy? Mark -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Christopher Hawkins Sent: 20 January 2004 00:20 To: accessd at databaseadvisors.com Subject: [AccessD] NEVER MIND: 'Duplicate values' error in Access - what number isit?!? I'm an idiot...the very next thing I tried after sending my message got me what I wanted. FYI, here's what I did (the error was happening when a JanusGrid component was being updated): Private Sub grdMain_Error(ByVal ErrNumber As Long, ByVal DisplayMessage As Object) If ErrNumber = -2147217887 Then MsgBox "Got it!" Else MsgBox "Try again..." End If End Sub -Christopher- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From clh at christopherhawkins.com Mon Jan 19 21:32:42 2004 From: clh at christopherhawkins.com (Christopher Hawkins) Date: Mon, 19 Jan 2004 20:32:42 -0700 Subject: [AccessD] NEVER MIND - janus control?: 'Duplicate values' errorin Access - what number isit?!? Message-ID: <410-2200412203324254@christopherhawkins.com> I haven't had any troubles with it. It's very easy to use. Go to Janusys.com and check out the latest version. -Christopher- ---- Original Message ---- From: lists at theopg.com To: accessd at databaseadvisors.com, Subject: RE: [AccessD] NEVER MIND - janus control?: 'Duplicate values' errorin Access - what number isit?!? Date: Tue, 20 Jan 2004 00:38:13 -0000 >Sorry for drifting off topic, but... > >How do you find the grid control? I used it a couple of years ago >for a >one off project. I later used a free copy off a mag cd and found it >crashed so I gave up, can't remember what the problem was as I was >only >playing. The first time I used it, it was great. Is it still buggy? > >Mark > >-----Original Message----- >From: accessd-bounces at databaseadvisors.com >[mailto:accessd-bounces at databaseadvisors.com] On Behalf Of >Christopher >Hawkins >Sent: 20 January 2004 00:20 >To: accessd at databaseadvisors.com >Subject: [AccessD] NEVER MIND: 'Duplicate values' error in Access - >what >number isit?!? > > >I'm an idiot...the very next thing I tried after sending my message >got >me what I wanted. FYI, here's what I did (the error was happening >when >a JanusGrid component was being updated): > >Private Sub grdMain_Error(ByVal ErrNumber As Long, ByVal >DisplayMessage >As Object) > > If ErrNumber = -2147217887 Then > MsgBox "Got it!" > Else > MsgBox "Try again..." > End If > >End Sub > >-Christopher- > > >_______________________________________________ >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 > > From accessd666 at yahoo.com Tue Jan 20 03:50:28 2004 From: accessd666 at yahoo.com (Sad Der) Date: Tue, 20 Jan 2004 01:50:28 -0800 (PST) Subject: [AccessD] Error 3218 "Couldn't Update; Currently Locked" <> In-Reply-To: <1082314558.20040119092551@cactus.dk> Message-ID: <20040120095028.35725.qmail@web60202.mail.yahoo.com> Thnx again Gustav. Sad --- Gustav Brock wrote: > Hi Sad > > > thanx again. However, I'm a 'rent-a-programmer' > > (what's the official anglish term?) and this > > organisation is completely Oracle minded => > SQL-server > > is bad, MS sucks and Access...isn't that some sort > of > > notepad? > > > So, I need proof. Is there a correct way to test > this? > > Yes, talk to the NetWare administrator. She just > needs to type them on > the console, no rebooting is needed. If success, > append the commands > to the autoexec.ncf file, if not they will vanish > the next time the > server is rebooted - in a couple of years. > > These settings are not hacks but the documented way > to deal with the > issue which is not related to Access only but to any > (database) > program requesting bunches of record locks: > > > http://support.novell.com/cgi-bin/search/searchtid.cgi?/10019363.htm > > http://support.novell.com/cgi-bin/search/searchtid.cgi?/2914607.htm > > The reason why these settings are low as default is > only to save a few > KB of ram which was important in the days of x86 > processors and > servers running on 8 or 16 MB ram. For the newer > NetWare versions - I > believe from 5.1 and up - the default settings are > much higher. > > /gustav > > > > --- Gustav Brock wrote: > >> Hi Sad > >> > >> Those settings are probably to low. > >> Try setting them to maximum: > >> > >> > These two commands may be set at the console > screen, they will take > >> > effect at once and doesn't require restart of > the server. If they > >> > prove of beneficial, include them in the > autoexec.ncf file of the > >> > server. > >> > > >> > SET MAXIMUM RECORD LOCKS = 200000 > >> > SET MAXIMUM RECORD LOCKS PER CONNECTION = > 100000 > >> > > >> > The only drawback is a slightly larger RAM > allocation which is not > >> > significant with today's multimegabyte servers > but did count in the > >> > days of servers running on 8 to 16 MB RAM and > every 100K was of > >> > importance. > >> > >> /gustav > >> > >> > >> > These are the new settings: > >> > Max. Records Lock per Connection: 1000 > >> > Max. Files Lock per Connection: 5000 > >> > Max. Records Lock: 40000 > >> > Max. Files Lock: 400000 > >> > >> > How can I test these? Ok, for the first one I > have to > >> > lock 999, 1000, 1001 records...question is how > do I do > >> > that? > >> > >> > Is importing a file with 999, 1000, 1001 > records > >> > enough? > >> > >> > Any testing tips/links? > >> > TIA. > >> > >> > SD > >> > >> > >> > --- Jim Dettman > wrote: > >> >> < >> >> occasionally the users get the following > error: > >> >> Error 3218 "Couldn't Update; Currently > Locked">> > >> >> > >> >> There are lots of things that will cause > that > >> >> message, but I think you > >> >> might be barking up the wrong tree in that > it's a > >> >> Novell problem. > >> >> > >> >> From your comments abut it being "buggy", I > would > >> >> think more that the app > >> >> was poorly written and stepping on it's own > toes, > >> >> resulting in the above > >> >> error. > >> >> > >> >> One way to check that out easily is to copy > the > >> >> backend to a local drive, > >> >> re-link the tables (I'm assuming it's a split > app), > >> >> then test. If you still > >> >> get the error messages it has nothing to do > with > >> >> Novell. If the error > >> >> disappears, then it's related to locking. > >> >> > >> >> The other test you can do is using the > SetOption > >> >> method of the dbEngine > >> >> object, set dbMaxLocksPerFile to a number less > then > >> >> the allowed number of > >> >> locks under Novell. This will ensure that JET > never > >> >> uses more locks then > >> >> Novell allows. If that was the problem, the > error > >> >> messages will disappear. > >> >> > >> >> Jim Dettman > >> >> President, > >> >> Online Computer Services of WNY, Inc. > >> >> (315) 699-3443 > >> >> jimdettman at earthlink.net > > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com __________________________________ Do you Yahoo!? Yahoo! Hotjobs: Enter the "Signing Bonus" Sweepstakes http://hotjobs.sweepstakes.yahoo.com/signingbonus From dwaters at usinternet.com Tue Jan 20 09:39:23 2004 From: dwaters at usinternet.com (Dan Waters) Date: Tue, 20 Jan 2004 09:39:23 -0600 Subject: [AccessD] An Easy Fix . . . Message-ID: <000001c3df6b$9465cc60$de1811d8@DanWaters> I recently installed an app at a client's site. For some reason, my switchboard form triggered an error when the startup form tried to open it on a user's PC. I had never had this error before on any other PC. For a short story the fix was as follows: On the switchboard form: comment out all code, compile, save, and exit access. Then reopen, uncomment all code, compile, and save. After that the error went away, and the front end was reduced in size. This particular switchboard form was originally created in A95, upgraded to A97, is now in AXP, and had many revisions along the way. My guess is that somehow there was 'old code' attached to the form. When the code was commented out and the database compiled, the 'old code' was eliminated. I could watch the compile 'progress bar' and it took longer than usual after the initial uncommenting. This was certainly an easy fix. Since I hadn't seen this before I thought I would pass it along to this group. Dan Waters Quality Process Solutions From KIsmert at TexasSystems.com Tue Jan 20 10:32:46 2004 From: KIsmert at TexasSystems.com (Ken Ismert) Date: Tue, 20 Jan 2004 10:32:46 -0600 Subject: [AccessD] Instantiate Forms as Objects Message-ID: <000801c3df73$092ec900$2a3ca8c0@TEXASSYSTEMS.COM> Hello Group: As you know, you can instantiate an Access form, just like any other object, by using its class name: Dim rFrm as Access.Form Set rFrm = New Form_YourForm ' form 'YourForm' This syntax allows you to create multiple open instances of a form, a necessity for my framework. However, I've run into a problem. What I need is a simple, one-line way to instantiate a form object using a string: sFormName = "YourForm" Set rFrm = MFOS("Form_" & sFormName) ' MFOS = "Magic Function or Syntax" Note: Because of the multiple instance requirement, DoCmd.OpenForm won't work. It can only make one instance of a form. I can't find a CreateObject syntax that works. In my current function, I use a big Case statement matching the form name to it's class. This has become a pain, because every time I add or remove forms, I have to edit the function. Have any of you found a way to do that? -Ken From cfoust at infostatsystems.com Tue Jan 20 10:39:03 2004 From: cfoust at infostatsystems.com (Charlotte Foust) Date: Tue, 20 Jan 2004 08:39:03 -0800 Subject: [AccessD] An Easy Fix . . . Message-ID: If this was a wizard-created switchboard, you would be better off renaming Switchboard Items, saving the code to text from the existing switchboard, and deleting the switchboard form. Then if you start the switchboard manager, it will discover you have no switchboard and create a new one. If you then delete the newly created Switchboard Items table and rename the old one back to Switchboard Items, you'll have a working switchboard with current code. At that point, you can add back any specializations you made in the old switchboard, assuming you still need them. Charlotte Foust -----Original Message----- From: Dan Waters [mailto:dwaters at usinternet.com] Sent: Tuesday, January 20, 2004 7:39 AM To: Database Advisors Subject: [AccessD] An Easy Fix . . . I recently installed an app at a client's site. For some reason, my switchboard form triggered an error when the startup form tried to open it on a user's PC. I had never had this error before on any other PC. For a short story the fix was as follows: On the switchboard form: comment out all code, compile, save, and exit access. Then reopen, uncomment all code, compile, and save. After that the error went away, and the front end was reduced in size. This particular switchboard form was originally created in A95, upgraded to A97, is now in AXP, and had many revisions along the way. My guess is that somehow there was 'old code' attached to the form. When the code was commented out and the database compiled, the 'old code' was eliminated. I could watch the compile 'progress bar' and it took longer than usual after the initial uncommenting. This was certainly an easy fix. Since I hadn't seen this before I thought I would pass it along to this group. Dan Waters Quality Process Solutions _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From cfoust at infostatsystems.com Tue Jan 20 10:42:20 2004 From: cfoust at infostatsystems.com (Charlotte Foust) Date: Tue, 20 Jan 2004 08:42:20 -0800 Subject: [AccessD] Instantiate Forms as Objects Message-ID: Maybe JC knows differently, but as far as I know, you can't do it that way, which is one of the reasons I don't use that syntax. Charlotte Foust -----Original Message----- From: Ken Ismert [mailto:KIsmert at TexasSystems.com] Sent: Tuesday, January 20, 2004 8:33 AM To: 'Access Developers discussion and problem solving' Subject: [AccessD] Instantiate Forms as Objects Hello Group: As you know, you can instantiate an Access form, just like any other object, by using its class name: Dim rFrm as Access.Form Set rFrm = New Form_YourForm ' form 'YourForm' This syntax allows you to create multiple open instances of a form, a necessity for my framework. However, I've run into a problem. What I need is a simple, one-line way to instantiate a form object using a string: sFormName = "YourForm" Set rFrm = MFOS("Form_" & sFormName) ' MFOS = "Magic Function or Syntax" Note: Because of the multiple instance requirement, DoCmd.OpenForm won't work. It can only make one instance of a form. I can't find a CreateObject syntax that works. In my current function, I use a big Case statement matching the form name to it's class. This has become a pain, because every time I add or remove forms, I have to edit the function. Have any of you found a way to do that? -Ken _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From Lambert.Heenan at AIG.com Tue Jan 20 11:00:03 2004 From: Lambert.Heenan at AIG.com (Heenan, Lambert) Date: Tue, 20 Jan 2004 12:00:03 -0500 Subject: [AccessD] An Easy Fix . . . Message-ID: <8B98F8EA48F8BA47A2F24E0D0AF40CF407AD7CFD@xlivmbx12.aig.com> Is this another example of why I find switchboards a PITA. I never use the stupid things myself. I prefer to create my own "opening form" with all the buttons on it put there by me, so I know (at least in theory) what the stupid code behind the form is doing. Lambert > -----Original Message----- > From: Charlotte Foust [SMTP:cfoust at infostatsystems.com] > Sent: Tuesday, January 20, 2004 11:39 AM > To: Access Developers discussion and problem solving > Subject: RE: [AccessD] An Easy Fix . . . > > If this was a wizard-created switchboard, you would be better off > renaming Switchboard Items, saving the code to text from the existing > switchboard, and deleting the switchboard form. Then if you start the > switchboard manager, it will discover you have no switchboard and create > a new one. If you then delete the newly created Switchboard Items table > and rename the old one back to Switchboard Items, you'll have a working > switchboard with current code. At that point, you can add back any > specializations you made in the old switchboard, assuming you still need > them. > > Charlotte Foust > > -----Original Message----- > From: Dan Waters [mailto:dwaters at usinternet.com] > Sent: Tuesday, January 20, 2004 7:39 AM > To: Database Advisors > Subject: [AccessD] An Easy Fix . . . > > > I recently installed an app at a client's site. For some reason, my > switchboard form triggered an error when the startup form tried to open > it on a user's PC. I had never had this error before on any other PC. > For a short story the fix was as follows: > > > > On the switchboard form: comment out all code, compile, save, and exit > access. Then reopen, uncomment all code, compile, and save. > > > > After that the error went away, and the front end was reduced in size. > > > > This particular switchboard form was originally created in A95, upgraded > to A97, is now in AXP, and had many revisions along the way. My guess > is that somehow there was 'old code' attached to the form. When the > code was commented out and the database compiled, the 'old code' was > eliminated. I could watch the compile 'progress bar' and it took longer > than usual after the initial uncommenting. > > > > This was certainly an easy fix. Since I hadn't seen this before I > thought I would pass it along to this group. > > > > Dan Waters > > Quality Process Solutions > > _______________________________________________ > 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 From dwaters at usinternet.com Tue Jan 20 11:01:18 2004 From: dwaters at usinternet.com (Dan Waters) Date: Tue, 20 Jan 2004 11:01:18 -0600 Subject: [AccessD] An Easy Fix . . . In-Reply-To: <24907479.1074617056972.JavaMail.root@localhost.localdomain> Message-ID: <000001c3df77$05b84310$de1811d8@DanWaters> Charlotte, The original code created by the switchboard wizard, and the switchboard table, are long gone, but the form 'container' was still original. I should have called it the 'Main' form since it no longer has any resemblance to the original switchboard. But - going through the step I described did solve the problem. Dan -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Charlotte Foust Sent: Tuesday, January 20, 2004 10:39 AM To: Access Developers discussion and problem solving Subject: RE: [AccessD] An Easy Fix . . . If this was a wizard-created switchboard, you would be better off renaming Switchboard Items, saving the code to text from the existing switchboard, and deleting the switchboard form. Then if you start the switchboard manager, it will discover you have no switchboard and create a new one. If you then delete the newly created Switchboard Items table and rename the old one back to Switchboard Items, you'll have a working switchboard with current code. At that point, you can add back any specializations you made in the old switchboard, assuming you still need them. Charlotte Foust -----Original Message----- From: Dan Waters [mailto:dwaters at usinternet.com] Sent: Tuesday, January 20, 2004 7:39 AM To: Database Advisors Subject: [AccessD] An Easy Fix . . . I recently installed an app at a client's site. For some reason, my switchboard form triggered an error when the startup form tried to open it on a user's PC. I had never had this error before on any other PC. For a short story the fix was as follows: On the switchboard form: comment out all code, compile, save, and exit access. Then reopen, uncomment all code, compile, and save. After that the error went away, and the front end was reduced in size. This particular switchboard form was originally created in A95, upgraded to A97, is now in AXP, and had many revisions along the way. My guess is that somehow there was 'old code' attached to the form. When the code was commented out and the database compiled, the 'old code' was eliminated. I could watch the compile 'progress bar' and it took longer than usual after the initial uncommenting. This was certainly an easy fix. Since I hadn't seen this before I thought I would pass it along to this group. Dan Waters Quality Process Solutions _______________________________________________ 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 From cfoust at infostatsystems.com Tue Jan 20 11:06:33 2004 From: cfoust at infostatsystems.com (Charlotte Foust) Date: Tue, 20 Jan 2004 09:06:33 -0800 Subject: [AccessD] An Easy Fix . . . Message-ID: I, on the other hand, find them handy and flexible and easier to maintain than a form with fixed buttons. However the switchboard manager is one of the few wizards that writes current code, and the changes in Access 2000 and higher resulted in quite different code from the earlier versions, which were DAO-based. Since DAO is not the default object model in Access 2000 and XP, earlier switchboard code breaks unless you take steps to make sure it doesn't. Charlotte Foust -----Original Message----- From: Heenan, Lambert [mailto:Lambert.Heenan at aig.com] Sent: Tuesday, January 20, 2004 9:00 AM To: 'Access Developers discussion and problem solving' Subject: RE: [AccessD] An Easy Fix . . . Is this another example of why I find switchboards a PITA. I never use the stupid things myself. I prefer to create my own "opening form" with all the buttons on it put there by me, so I know (at least in theory) what the stupid code behind the form is doing. Lambert > -----Original Message----- > From: Charlotte Foust [SMTP:cfoust at infostatsystems.com] > Sent: Tuesday, January 20, 2004 11:39 AM > To: Access Developers discussion and problem solving > Subject: RE: [AccessD] An Easy Fix . . . > > If this was a wizard-created switchboard, you would be better off > renaming Switchboard Items, saving the code to text from the existing > switchboard, and deleting the switchboard form. Then if you start the > switchboard manager, it will discover you have no switchboard and > create a new one. If you then delete the newly created Switchboard > Items table and rename the old one back to Switchboard Items, you'll > have a working switchboard with current code. At that point, you can > add back any specializations you made in the old switchboard, assuming > you still need them. > > Charlotte Foust > > -----Original Message----- > From: Dan Waters [mailto:dwaters at usinternet.com] > Sent: Tuesday, January 20, 2004 7:39 AM > To: Database Advisors > Subject: [AccessD] An Easy Fix . . . > > > I recently installed an app at a client's site. For some reason, my > switchboard form triggered an error when the startup form tried to > open it on a user's PC. I had never had this error before on any > other PC. For a short story the fix was as follows: > > > > On the switchboard form: comment out all code, compile, save, and exit > access. Then reopen, uncomment all code, compile, and save. > > > > After that the error went away, and the front end was reduced in size. > > > > This particular switchboard form was originally created in A95, > upgraded to A97, is now in AXP, and had many revisions along the way. > My guess is that somehow there was 'old code' attached to the form. > When the code was commented out and the database compiled, the 'old > code' was eliminated. I could watch the compile 'progress bar' and it > took longer than usual after the initial uncommenting. > > > > This was certainly an easy fix. Since I hadn't seen this before I > thought I would pass it along to this group. > > > > Dan Waters > > Quality Process Solutions > > _______________________________________________ > 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 _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From JColby at dispec.com Tue Jan 20 11:30:30 2004 From: JColby at dispec.com (Colby, John) Date: Tue, 20 Jan 2004 12:30:30 -0500 Subject: [AccessD] Test Message-ID: <05C61C52D7CAD211A7830008C7DF6F1079BCF4@DISABILITYINS01> John W. Colby The database guy From JColby at dispec.com Tue Jan 20 11:34:44 2004 From: JColby at dispec.com (Colby, John) Date: Tue, 20 Jan 2004 12:34:44 -0500 Subject: [AccessD] test Message-ID: <05C61C52D7CAD211A7830008C7DF6F1079BCF5@DISABILITYINS01> John W. Colby The database guy From gustav at cactus.dk Tue Jan 20 11:39:45 2004 From: gustav at cactus.dk (Gustav Brock) Date: Tue, 20 Jan 2004 18:39:45 +0100 Subject: [AccessD] Test In-Reply-To: <05C61C52D7CAD211A7830008C7DF6F1079BCF4@DISABILITYINS01> References: <05C61C52D7CAD211A7830008C7DF6F1079BCF4@DISABILITYINS01> Message-ID: <19835314499.20040120183945@cactus.dk> Hi John From: "Colby, John" So where did colbyconsulting go? /gustav > John W. Colby > The database guy From JColby at dispec.com Tue Jan 20 11:46:16 2004 From: JColby at dispec.com (Colby, John) Date: Tue, 20 Jan 2004 12:46:16 -0500 Subject: [AccessD] Test Message-ID: <05C61C52D7CAD211A7830008C7DF6F1079BCF6@DISABILITYINS01> I'm coming in from a client that I work at on site. John W. Colby The database guy -----Original Message----- From: Gustav Brock [mailto:gustav at cactus.dk] Sent: Tuesday, January 20, 2004 12:40 PM To: Access Developers discussion and problem solving Subject: Re: [AccessD] Test Hi John From: "Colby, John" So where did colbyconsulting go? /gustav > John W. Colby > The database guy _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From JColby at dispec.com Tue Jan 20 11:51:58 2004 From: JColby at dispec.com (Colby, John) Date: Tue, 20 Jan 2004 12:51:58 -0500 Subject: [AccessD] Word 2K email merge problems Message-ID: <05C61C52D7CAD211A7830008C7DF6F1079BCF7@DISABILITYINS01> Folks, I'm trying to do an email merge where the merge data document is named differently that the original data document. IOW, I set up the original document in a directory on the server. I set up a data document (text file) out there to test the document, get it working etc. When it comes time to merge I need the actual data document to be located on the local drive because this merge process could be preformed by several people at the same time and by doing it locally I avoid "collisions". I also rename both the merge document itself and it's data document. It seems this should be doable, but I can't find a way to programatically set the merge data (document) name at merge time. Is this possible? John W. Colby The database guy From cfoust at infostatsystems.com Tue Jan 20 11:59:22 2004 From: cfoust at infostatsystems.com (Charlotte Foust) Date: Tue, 20 Jan 2004 09:59:22 -0800 Subject: [AccessD] Word 2K email merge problems Message-ID: I never found a way, so I hope someone else has. Charlotte Foust -----Original Message----- From: Colby, John [mailto:JColby at dispec.com] Sent: Tuesday, January 20, 2004 9:52 AM To: Accessd (E-mail) Subject: [AccessD] Word 2K email merge problems Folks, I'm trying to do an email merge where the merge data document is named differently that the original data document. IOW, I set up the original document in a directory on the server. I set up a data document (text file) out there to test the document, get it working etc. When it comes time to merge I need the actual data document to be located on the local drive because this merge process could be preformed by several people at the same time and by doing it locally I avoid "collisions". I also rename both the merge document itself and it's data document. It seems this should be doable, but I can't find a way to programatically set the merge data (document) name at merge time. Is this possible? John W. Colby The database guy _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From wdhindman at bellsouth.net Tue Jan 20 12:23:14 2004 From: wdhindman at bellsouth.net (William Hindman) Date: Tue, 20 Jan 2004 13:23:14 -0500 Subject: [AccessD] Word 2K email merge problems References: <05C61C52D7CAD211A7830008C7DF6F1079BCF7@DISABILITYINS01> Message-ID: <00ab01c3df82$77f73ca0$6101a8c0@dejpolsys> JC ...try the MailMergeSendToCustom event ...iirc MS has code for directing the merge to use almost anything you tell it to ...HTH :) William Hindman - Next Year In The Free State! ----- Original Message ----- From: "Colby, John" To: "Accessd (E-mail)" Sent: Tuesday, January 20, 2004 12:51 PM Subject: [AccessD] Word 2K email merge problems > Folks, > > I'm trying to do an email merge where the merge data document is named > differently that the original data document. IOW, I set up the original > document in a directory on the server. I set up a data document (text file) > out there to test the document, get it working etc. When it comes time to > merge I need the actual data document to be located on the local drive > because this merge process could be preformed by several people at the same > time and by doing it locally I avoid "collisions". I also rename both the > merge document itself and it's data document. It seems this should be > doable, but I can't find a way to programatically set the merge data > (document) name at merge time. > > Is this possible? > > John W. Colby > The database guy > > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com > From JColby at dispec.com Tue Jan 20 12:29:12 2004 From: JColby at dispec.com (Colby, John) Date: Tue, 20 Jan 2004 13:29:12 -0500 Subject: [AccessD] Mail Merge - Verifying user is satisfied and completed the merge Message-ID: <05C61C52D7CAD211A7830008C7DF6F1079BCF8@DISABILITYINS01> I am attempting to set up a system where one group of people "order" merged documents, and another set of users then print those ordered documents, QA and mail them out. The users that order the documents will do the mail merge (on their local machine), with the document opened and visible to them after the merge. The user can then edit the document (add sentences / paragraphs etc), scan that the merged data is correct etc. If they are happy then I need to save the merged document out to a common location on the network with the doc name modified to include the initials of the person ordering the document, the date, the claim number that the doc is about etc. If the user is not happy, I need to just delete the document(s) on the local drive. My question is, how do I stop processing as I open the document so that I can then ask the user if it all worked satisfactorily after they close the document. Is it possible to "open the document MODAL (so to speak) where they are in Word, can edit and do whatever, but they have to close Word to get back to Access? How do you guys handle this stuff. John W. Colby The DIS database guy From cfoust at infostatsystems.com Tue Jan 20 12:36:45 2004 From: cfoust at infostatsystems.com (Charlotte Foust) Date: Tue, 20 Jan 2004 10:36:45 -0800 Subject: [AccessD] Mail Merge - Verifying user is satisfied and completed the merge Message-ID: Are you asking about stopping the processing in Word or Access? Charlotte Foust -----Original Message----- From: Colby, John [mailto:JColby at dispec.com] Sent: Tuesday, January 20, 2004 10:29 AM To: Accessd (E-mail) Subject: [AccessD] Mail Merge - Verifying user is satisfied and completed the merge I am attempting to set up a system where one group of people "order" merged documents, and another set of users then print those ordered documents, QA and mail them out. The users that order the documents will do the mail merge (on their local machine), with the document opened and visible to them after the merge. The user can then edit the document (add sentences / paragraphs etc), scan that the merged data is correct etc. If they are happy then I need to save the merged document out to a common location on the network with the doc name modified to include the initials of the person ordering the document, the date, the claim number that the doc is about etc. If the user is not happy, I need to just delete the document(s) on the local drive. My question is, how do I stop processing as I open the document so that I can then ask the user if it all worked satisfactorily after they close the document. Is it possible to "open the document MODAL (so to speak) where they are in Word, can edit and do whatever, but they have to close Word to get back to Access? How do you guys handle this stuff. John W. Colby The DIS database guy _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From lists at theopg.com Tue Jan 20 12:42:35 2004 From: lists at theopg.com (MarkH) Date: Tue, 20 Jan 2004 18:42:35 -0000 Subject: [AccessD] NEVER MIND - janus control?: 'Duplicate values'errorin Access - what number isit?!? In-Reply-To: <410-2200412203324254@christopherhawkins.com> Message-ID: <000001c3df85$37867930$d00b6bd5@netboxxp> Cheers Christopher mark -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Christopher Hawkins Sent: 20 January 2004 03:33 To: accessd at databaseadvisors.com Subject: RE: [AccessD] NEVER MIND - janus control?: 'Duplicate values'errorin Access - what number isit?!? I haven't had any troubles with it. It's very easy to use. Go to Janusys.com and check out the latest version. -Christopher- ---- Original Message ---- From: lists at theopg.com To: accessd at databaseadvisors.com, Subject: RE: [AccessD] NEVER MIND - janus control?: 'Duplicate values' errorin Access - what number isit?!? Date: Tue, 20 Jan 2004 00:38:13 -0000 >Sorry for drifting off topic, but... > >How do you find the grid control? I used it a couple of years ago >for a >one off project. I later used a free copy off a mag cd and found it >crashed so I gave up, can't remember what the problem was as I was >only >playing. The first time I used it, it was great. Is it still buggy? > >Mark > >-----Original Message----- >From: accessd-bounces at databaseadvisors.com >[mailto:accessd-bounces at databaseadvisors.com] On Behalf Of >Christopher >Hawkins >Sent: 20 January 2004 00:20 >To: accessd at databaseadvisors.com >Subject: [AccessD] NEVER MIND: 'Duplicate values' error in Access - >what >number isit?!? > > >I'm an idiot...the very next thing I tried after sending my message >got >me what I wanted. FYI, here's what I did (the error was happening >when >a JanusGrid component was being updated): > >Private Sub grdMain_Error(ByVal ErrNumber As Long, ByVal >DisplayMessage >As Object) > > If ErrNumber = -2147217887 Then > MsgBox "Got it!" > Else > MsgBox "Try again..." > End If > >End Sub > >-Christopher- > > >_______________________________________________ >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 > > _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From JColby at dispec.com Tue Jan 20 12:48:35 2004 From: JColby at dispec.com (Colby, John) Date: Tue, 20 Jan 2004 13:48:35 -0500 Subject: [AccessD] Mail Merge - Verifying user is satisfied and comple ted the merge Message-ID: <05C61C52D7CAD211A7830008C7DF6F1079BCF9@DISABILITYINS01> yes, in Access. Access opens the word document, merges the data and waits for the user to edit the data.. The user edits the document to their hearts content, then closes the document. Access continues processing, saving the document out to a network drive and logging the successful merge to a table. In order to do this, I need to know the user successfully merged the document and was happy with the results. John W. Colby The database guy -----Original Message----- From: Charlotte Foust [mailto:cfoust at infostatsystems.com] Sent: Tuesday, January 20, 2004 1:37 PM To: Access Developers discussion and problem solving Subject: RE: [AccessD] Mail Merge - Verifying user is satisfied and completed the merge Are you asking about stopping the processing in Word or Access? Charlotte Foust -----Original Message----- From: Colby, John [mailto:JColby at dispec.com] Sent: Tuesday, January 20, 2004 10:29 AM To: Accessd (E-mail) Subject: [AccessD] Mail Merge - Verifying user is satisfied and completed the merge I am attempting to set up a system where one group of people "order" merged documents, and another set of users then print those ordered documents, QA and mail them out. The users that order the documents will do the mail merge (on their local machine), with the document opened and visible to them after the merge. The user can then edit the document (add sentences / paragraphs etc), scan that the merged data is correct etc. If they are happy then I need to save the merged document out to a common location on the network with the doc name modified to include the initials of the person ordering the document, the date, the claim number that the doc is about etc. If the user is not happy, I need to just delete the document(s) on the local drive. My question is, how do I stop processing as I open the document so that I can then ask the user if it all worked satisfactorily after they close the document. Is it possible to "open the document MODAL (so to speak) where they are in Word, can edit and do whatever, but they have to close Word to get back to Access? How do you guys handle this stuff. John W. Colby The DIS database guy _______________________________________________ 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 From rl_stewart at highstream.net Tue Jan 20 12:48:26 2004 From: rl_stewart at highstream.net (Robert L. Stewart) Date: Tue, 20 Jan 2004 12:48:26 -0600 Subject: [AccessD] Re: An Easy Fix . . . In-Reply-To: <200401201800.i0KI0Rm08679@databaseadvisors.com> Message-ID: <5.1.0.14.2.20040120124406.02971f68@pop3.highstream.net> Personally, I hate reinventing the wheel when the one we have works perfectly well. The problem is that the new version switchboard uses ADO and the older one uses DAO. That is why renaming the menu items table and the current switchboard form allows it to be recreated with the ADO code. Then you can either delete all of the code from the old form and paste in the new or modify the new form. Deleting the table and renaming the original back allows you to keep all the previous menu options. That is why Charlotte's method of handling it works. Robert At 12:00 PM 1/20/2004 -0600, you wrote: >Message: 11 >Date: Tue, 20 Jan 2004 12:00:03 -0500 >From: "Heenan, Lambert" >Subject: RE: [AccessD] An Easy Fix . . . >To: "'Access Developers discussion and problem solving'" > >Message-ID: > <8B98F8EA48F8BA47A2F24E0D0AF40CF407AD7CFD at xlivmbx12.aig.com> >Content-Type: text/plain > >Is this another example of why I find switchboards a PITA. I never use the >stupid things myself. I prefer to create my own "opening form" with all the >buttons on it put there by me, so I know (at least in theory) what the >stupid code behind the form is doing. > >Lambert > > > -----Original Message----- > > From: Charlotte Foust [SMTP:cfoust at infostatsystems.com] > > Sent: Tuesday, January 20, 2004 11:39 AM > > To: Access Developers discussion and problem solving > > Subject: RE: [AccessD] An Easy Fix . . . > > > > If this was a wizard-created switchboard, you would be better off > > renaming Switchboard Items, saving the code to text from the existing > > switchboard, and deleting the switchboard form. Then if you start the > > switchboard manager, it will discover you have no switchboard and create > > a new one. If you then delete the newly created Switchboard Items table > > and rename the old one back to Switchboard Items, you'll have a working > > switchboard with current code. At that point, you can add back any > > specializations you made in the old switchboard, assuming you still need > > them. > > > > Charlotte Foust > > From JColby at dispec.com Tue Jan 20 12:50:47 2004 From: JColby at dispec.com (Colby, John) Date: Tue, 20 Jan 2004 13:50:47 -0500 Subject: [AccessD] Word 2K email merge problems Message-ID: <05C61C52D7CAD211A7830008C7DF6F1079BCFA@DISABILITYINS01> What is this an event of? I can't find it in Word or Access. and searching for MailMergeSendToCustom on the web turns up nothing. John W. Colby The database guy -----Original Message----- From: William Hindman [mailto:wdhindman at bellsouth.net] Sent: Tuesday, January 20, 2004 1:23 PM To: Access Developers discussion and problem solving Subject: Re: [AccessD] Word 2K email merge problems JC ...try the MailMergeSendToCustom event ...iirc MS has code for directing the merge to use almost anything you tell it to ...HTH :) William Hindman - Next Year In The Free State! ----- Original Message ----- From: "Colby, John" To: "Accessd (E-mail)" Sent: Tuesday, January 20, 2004 12:51 PM Subject: [AccessD] Word 2K email merge problems > Folks, > > I'm trying to do an email merge where the merge data document is named > differently that the original data document. IOW, I set up the original > document in a directory on the server. I set up a data document (text file) > out there to test the document, get it working etc. When it comes time to > merge I need the actual data document to be located on the local drive > because this merge process could be preformed by several people at the same > time and by doing it locally I avoid "collisions". I also rename both the > merge document itself and it's data document. It seems this should be > doable, but I can't find a way to programatically set the merge data > (document) name at merge time. > > Is this possible? > > John W. Colby > The database guy > > _______________________________________________ > 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 From cfoust at infostatsystems.com Tue Jan 20 13:11:06 2004 From: cfoust at infostatsystems.com (Charlotte Foust) Date: Tue, 20 Jan 2004 11:11:06 -0800 Subject: [AccessD] Mail Merge - Verifying user is satisfied and completed the merge Message-ID: Um ... Raise an event in Word? Charlotte Foust -----Original Message----- From: Colby, John [mailto:JColby at dispec.com] Sent: Tuesday, January 20, 2004 10:49 AM To: 'Access Developers discussion and problem solving' Subject: RE: [AccessD] Mail Merge - Verifying user is satisfied and completed the merge yes, in Access. Access opens the word document, merges the data and waits for the user to edit the data.. The user edits the document to their hearts content, then closes the document. Access continues processing, saving the document out to a network drive and logging the successful merge to a table. In order to do this, I need to know the user successfully merged the document and was happy with the results. John W. Colby The database guy -----Original Message----- From: Charlotte Foust [mailto:cfoust at infostatsystems.com] Sent: Tuesday, January 20, 2004 1:37 PM To: Access Developers discussion and problem solving Subject: RE: [AccessD] Mail Merge - Verifying user is satisfied and completed the merge Are you asking about stopping the processing in Word or Access? Charlotte Foust -----Original Message----- From: Colby, John [mailto:JColby at dispec.com] Sent: Tuesday, January 20, 2004 10:29 AM To: Accessd (E-mail) Subject: [AccessD] Mail Merge - Verifying user is satisfied and completed the merge I am attempting to set up a system where one group of people "order" merged documents, and another set of users then print those ordered documents, QA and mail them out. The users that order the documents will do the mail merge (on their local machine), with the document opened and visible to them after the merge. The user can then edit the document (add sentences / paragraphs etc), scan that the merged data is correct etc. If they are happy then I need to save the merged document out to a common location on the network with the doc name modified to include the initials of the person ordering the document, the date, the claim number that the doc is about etc. If the user is not happy, I need to just delete the document(s) on the local drive. My question is, how do I stop processing as I open the document so that I can then ask the user if it all worked satisfactorily after they close the document. Is it possible to "open the document MODAL (so to speak) where they are in Word, can edit and do whatever, but they have to close Word to get back to Access? How do you guys handle this stuff. John W. Colby The DIS database guy _______________________________________________ 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 _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From weeden1949 at hotmail.com Tue Jan 20 13:23:31 2004 From: weeden1949 at hotmail.com (Greg Smith) Date: Tue, 20 Jan 2004 13:23:31 -0600 Subject: [AccessD] Strange Table Behavior... References: Message-ID: Hi everyone! Happy Tuesday...;) I have a table in a rather large database which is having some sort of odd issue. It's 6 columns, one autonumber field, 4 text fields, one date. It currently contains about 524,000 records, and is on the MANY side of a one-to-many relationship from the main table. This is nothing extraordinary...just fairly simple for a table. One of the text fields contains indexes used for looking up data in the primary table. The data in this field is a variety of ATT, SD, CLD, CLM, CLR&A, etc. When someone looks up, let's say, a City Lot Mortgage (which would be CLM), that CLM is used in the criteria portion of the query to lookup the matching index and data from the primary table. And, because of other fields on this lookup form, this field also has to be able to search via the wildcard paramater of *, so the criteria in the query is actually "Like forms![FeeBookSearch]![Index]", without the quotes and the [Index] field then contains CLM, or * if it's to be ignored in the search. To our knowledge, this has been working just FINE for almost two years. Last week, the SD quit working. But ATT, CLD, CLM and all the others worked fine. I still keep telling myself that's not possible, but it's true. And it's now happened again today. I fixed it the last time by creating a NEW table from this data (everyone was out of the db), deleting the old one and reestablishing all the relationships. PITA to say the least. What's really piqued my interest is how in the world can SD NOT work and all the others work? There is nothing visible in the SD field other than SD. I've even exported it to other programs like Excel to see if anything else was in there, but nope...zip, zero nada. Now get this: If I create a test query on that table, and use Like [TestMe] as the criteria for this index field, when I run the query it'll obviously ask me for TestMe. If I put in SD, I get zero records (should be about 48,000), if I run it again with ATT, I get all of the Attorneys, the same with CLD and CLM, etc. Everything else works. And here's the clinker: If I use SD* or *SD, I get'em all! But SD by itself still won't work. It acts like there's something else in the field not allowing the match, but I'll be dipped if I can figure it out. I'd rather not cobble to code to fit this data quirk, but I'm rapidly running out of options and time at this point. Needless to say the Recorder has already stated her opinion in my ear once today and I'd rather not have her repeat it. Sorry about the length of this post...but I tried to explain it fully to head off questions (yea, right, like I write anything clearly the first time) anyone may have. Any ideas or tests to try would be greatly appreciated. TIA Greg Smith Weeden1949 at hotmail.com From JColby at dispec.com Tue Jan 20 13:24:22 2004 From: JColby at dispec.com (Colby, John) Date: Tue, 20 Jan 2004 14:24:22 -0500 Subject: [AccessD] Mail Merge - Verifying user is satisfied and comple ted the merge Message-ID: <05C61C52D7CAD211A7830008C7DF6F1079BCFB@DISABILITYINS01> I'm not running a class (or any other code) in Word. Access is opening an instance of word, merging the data, then turning over control to the user. John W. Colby The database guy -----Original Message----- From: Charlotte Foust [mailto:cfoust at infostatsystems.com] Sent: Tuesday, January 20, 2004 2:11 PM To: Access Developers discussion and problem solving Subject: RE: [AccessD] Mail Merge - Verifying user is satisfied and completed the merge Um ... Raise an event in Word? Charlotte Foust -----Original Message----- From: Colby, John [mailto:JColby at dispec.com] Sent: Tuesday, January 20, 2004 10:49 AM To: 'Access Developers discussion and problem solving' Subject: RE: [AccessD] Mail Merge - Verifying user is satisfied and completed the merge yes, in Access. Access opens the word document, merges the data and waits for the user to edit the data.. The user edits the document to their hearts content, then closes the document. Access continues processing, saving the document out to a network drive and logging the successful merge to a table. In order to do this, I need to know the user successfully merged the document and was happy with the results. John W. Colby The database guy -----Original Message----- From: Charlotte Foust [mailto:cfoust at infostatsystems.com] Sent: Tuesday, January 20, 2004 1:37 PM To: Access Developers discussion and problem solving Subject: RE: [AccessD] Mail Merge - Verifying user is satisfied and completed the merge Are you asking about stopping the processing in Word or Access? Charlotte Foust -----Original Message----- From: Colby, John [mailto:JColby at dispec.com] Sent: Tuesday, January 20, 2004 10:29 AM To: Accessd (E-mail) Subject: [AccessD] Mail Merge - Verifying user is satisfied and completed the merge I am attempting to set up a system where one group of people "order" merged documents, and another set of users then print those ordered documents, QA and mail them out. The users that order the documents will do the mail merge (on their local machine), with the document opened and visible to them after the merge. The user can then edit the document (add sentences / paragraphs etc), scan that the merged data is correct etc. If they are happy then I need to save the merged document out to a common location on the network with the doc name modified to include the initials of the person ordering the document, the date, the claim number that the doc is about etc. If the user is not happy, I need to just delete the document(s) on the local drive. My question is, how do I stop processing as I open the document so that I can then ask the user if it all worked satisfactorily after they close the document. Is it possible to "open the document MODAL (so to speak) where they are in Word, can edit and do whatever, but they have to close Word to get back to Access? How do you guys handle this stuff. John W. Colby The DIS database guy _______________________________________________ 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 _______________________________________________ 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 From gustav at cactus.dk Tue Jan 20 13:28:46 2004 From: gustav at cactus.dk (Gustav Brock) Date: Tue, 20 Jan 2004 20:28:46 +0100 Subject: [AccessD] Mail Merge - Verifying user is satisfied and comple ted the merge In-Reply-To: <05C61C52D7CAD211A7830008C7DF6F1079BCF9@DISABILITYINS01> References: <05C61C52D7CAD211A7830008C7DF6F1079BCF9@DISABILITYINS01> Message-ID: <6841855274.20040120202846@cactus.dk> Hi John That would probably require that you open Word - from within Access - as an OLE object of a form ... when finished editing, quit and return to Access. /gustav > yes, in Access. Access opens the word document, merges the data and waits > for the user to edit the data.. The user edits the document to their hearts > content, then closes the document. Access continues processing, saving the > document out to a network drive and logging the successful merge to a table. > In order to do this, I need to know the user successfully merged the > document and was happy with the results. From weeden1949 at hotmail.com Tue Jan 20 13:32:12 2004 From: weeden1949 at hotmail.com (Greg Smith) Date: Tue, 20 Jan 2004 13:32:12 -0600 Subject: [AccessD] Strange Table Behavior... References: Message-ID: Ahhh crud. Forgot to tell you ... Access 97. Greg ----- Original Message ----- From: "Greg Smith" To: "Access Developers discussion and problem solving" Sent: Tuesday, January 20, 2004 1:23 PM Subject: [AccessD] Strange Table Behavior... Hi everyone! Happy Tuesday...;) From JColby at dispec.com Tue Jan 20 13:34:03 2004 From: JColby at dispec.com (Colby, John) Date: Tue, 20 Jan 2004 14:34:03 -0500 Subject: [AccessD] Strange Table Behavior... Message-ID: <05C61C52D7CAD211A7830008C7DF6F1079BCFC@DISABILITYINS01> Try dropping the index on that field and re-creating it? John W. Colby The database guy -----Original Message----- From: Greg Smith [mailto:weeden1949 at hotmail.com] Sent: Tuesday, January 20, 2004 2:24 PM To: Access Developers discussion and problem solving Subject: [AccessD] Strange Table Behavior... Hi everyone! Happy Tuesday...;) I have a table in a rather large database which is having some sort of odd issue. It's 6 columns, one autonumber field, 4 text fields, one date. It currently contains about 524,000 records, and is on the MANY side of a one-to-many relationship from the main table. This is nothing extraordinary...just fairly simple for a table. One of the text fields contains indexes used for looking up data in the primary table. The data in this field is a variety of ATT, SD, CLD, CLM, CLR&A, etc. When someone looks up, let's say, a City Lot Mortgage (which would be CLM), that CLM is used in the criteria portion of the query to lookup the matching index and data from the primary table. And, because of other fields on this lookup form, this field also has to be able to search via the wildcard paramater of *, so the criteria in the query is actually "Like forms![FeeBookSearch]![Index]", without the quotes and the [Index] field then contains CLM, or * if it's to be ignored in the search. To our knowledge, this has been working just FINE for almost two years. Last week, the SD quit working. But ATT, CLD, CLM and all the others worked fine. I still keep telling myself that's not possible, but it's true. And it's now happened again today. I fixed it the last time by creating a NEW table from this data (everyone was out of the db), deleting the old one and reestablishing all the relationships. PITA to say the least. What's really piqued my interest is how in the world can SD NOT work and all the others work? There is nothing visible in the SD field other than SD. I've even exported it to other programs like Excel to see if anything else was in there, but nope...zip, zero nada. Now get this: If I create a test query on that table, and use Like [TestMe] as the criteria for this index field, when I run the query it'll obviously ask me for TestMe. If I put in SD, I get zero records (should be about 48,000), if I run it again with ATT, I get all of the Attorneys, the same with CLD and CLM, etc. Everything else works. And here's the clinker: If I use SD* or *SD, I get'em all! But SD by itself still won't work. It acts like there's something else in the field not allowing the match, but I'll be dipped if I can figure it out. I'd rather not cobble to code to fit this data quirk, but I'm rapidly running out of options and time at this point. Needless to say the Recorder has already stated her opinion in my ear once today and I'd rather not have her repeat it. Sorry about the length of this post...but I tried to explain it fully to head off questions (yea, right, like I write anything clearly the first time) anyone may have. Any ideas or tests to try would be greatly appreciated. TIA Greg Smith Weeden1949 at hotmail.com _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From ssharkins at bellsouth.net Tue Jan 20 13:34:01 2004 From: ssharkins at bellsouth.net (Susan Harkins) Date: Tue, 20 Jan 2004 14:34:01 -0500 Subject: [AccessD] Strange Table Behavior... References: Message-ID: <003201c3df8c$6493d010$210110ac@SUSANONE> This is really over simplistic, but have you tried just deleting SD in the lookup table and re-entering it? You might also run an update on your many table -- *SD* = "SD" I've seen phantom characters work their way in before. The only way to get rid of them is to just delete them and re-enter the data. You're lucky, since you know the field it's in and even if it's in the many data, an update query should take care of it. If it's a phantom character, you won't find it. On the other hand, do any of your operators/users have access to action queries? Almost sounds like someone accidentially changed the SD string in your many table. Have you tried entering a dummy SD record to see if the old method can find it? Just curious. How are you entering that "SD" string? Might check there too. Susan H. > Hi everyone! Happy Tuesday...;) > > I have a table in a rather large database which is having some sort of odd > issue. It's 6 columns, one autonumber field, 4 text fields, one date. It > currently contains about 524,000 records, and is on the MANY side of a > one-to-many relationship from the main table. This is nothing > extraordinary...just fairly simple for a table. > > One of the text fields contains indexes used for looking up data in the > primary table. The data in this field is a variety of ATT, SD, CLD, CLM, > CLR&A, etc. When someone looks up, let's say, a City Lot Mortgage (which > would be CLM), that CLM is used in the criteria portion of the query to > lookup the matching index and data from the primary table. And, because of > other fields on this lookup form, this field also has to be able to search > via the wildcard paramater of *, so the criteria in the query is actually > "Like forms![FeeBookSearch]![Index]", without the quotes and the [Index] > field then contains CLM, or * if it's to be ignored in the search. > > To our knowledge, this has been working just FINE for almost two years. > > Last week, the SD quit working. But ATT, CLD, CLM and all the others worked > fine. I still keep telling myself that's not possible, but it's true. > > And it's now happened again today. > > I fixed it the last time by creating a NEW table from this data (everyone > was out of the db), deleting the old one and reestablishing all the > relationships. PITA to say the least. > > What's really piqued my interest is how in the world can SD NOT work and all > the others work? > > There is nothing visible in the SD field other than SD. I've even exported > it to other programs like Excel to see if anything else was in there, but > nope...zip, zero nada. > > Now get this: If I create a test query on that table, and use Like [TestMe] > as the criteria for this index field, when I run the query it'll obviously > ask me for TestMe. If I put in SD, I get zero records (should be about > 48,000), if I run it again with ATT, I get all of the Attorneys, the same > with CLD and CLM, etc. Everything else works. And here's the clinker: If > I use SD* or *SD, I get'em all! But SD by itself still won't work. > > It acts like there's something else in the field not allowing the match, but > I'll be dipped if I can figure it out. > > I'd rather not cobble to code to fit this data quirk, but I'm rapidly > running out of options and time at this point. Needless to say the Recorder > has already stated her opinion in my ear once today and I'd rather not have > her repeat it. > > Sorry about the length of this post...but I tried to explain it fully to > head off questions (yea, right, like I write anything clearly the first > time) anyone may have. > > Any ideas or tests to try would be greatly appreciated. > > TIA > > Greg Smith > Weeden1949 at hotmail.com > > > > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com > From JColby at dispec.com Tue Jan 20 13:34:35 2004 From: JColby at dispec.com (Colby, John) Date: Tue, 20 Jan 2004 14:34:35 -0500 Subject: [AccessD] Mail Merge Fails Message-ID: <05C61C52D7CAD211A7830008C7DF6F1079BCFD@DISABILITYINS01> If a mail merge fails, it can leave an instance of word open and the doc that word instance was using locked, i,e, it can't be deleted because the doc is in use. Obviously I can go in to the task manager, select the word process (image name?) and "End Process". Is there any way to do that programatically? Is there any way to "name" the word instance that my program is opening so that I can go check to see if that instance is open? Am I making this too complicated? I'm not by any stretch a word mail merge guru and this seems very unwieldy. John W. Colby The database guy From KIsmert at TexasSystems.com Tue Jan 20 13:49:03 2004 From: KIsmert at TexasSystems.com (Ken Ismert) Date: Tue, 20 Jan 2004 13:49:03 -0600 Subject: [AccessD] Instantiate Forms as Objects In-Reply-To: Message-ID: <001c01c3df8e$752d9ee0$2a3ca8c0@TEXASSYSTEMS.COM> So, how do you get muliple instances of the same form open without using the "Set rFrm = New Form_YourForm" syntax? -Ken -----Original Message----- From: Charlotte Foust [mailto:cfoust at infostatsystems.com] Sent: Tuesday, January 20, 2004 10:42 AM To: Access Developers discussion and problem solving Subject: RE: [AccessD] Instantiate Forms as Objects Maybe JC knows differently, but as far as I know, you can't do it that way, which is one of the reasons I don't use that syntax. Charlotte Foust From ranthony at wrsystems.com Tue Jan 20 13:51:23 2004 From: ranthony at wrsystems.com (Randall Anthony) Date: Tue, 20 Jan 2004 14:51:23 -0500 Subject: [AccessD] Mail Merge Fails Message-ID: <5F21A4E8B8DD734992EF9E70AC9D30641289CE@mail2.wrsystems.com> John, Maybe it's too simple, but I use this line to close and also in the error routine. I also pass a parameter for the document name, but don't use it to close. WordObj.Documents.Application.Quit (wdDoNotSaveChanges) -----Original Message----- From: Colby, John [mailto:JColby at dispec.com] Sent: Tuesday, January 20, 2004 2:35 PM To: Accessd (E-mail) Subject: [AccessD] Mail Merge Fails If a mail merge fails, it can leave an instance of word open and the doc that word instance was using locked, i,e, it can't be deleted because the doc is in use. Obviously I can go in to the task manager, select the word process (image name?) and "End Process". Is there any way to do that programatically? Is there any way to "name" the word instance that my program is opening so that I can go check to see if that instance is open? Am I making this too complicated? I'm not by any stretch a word mail merge guru and this seems very unwieldy. John W. Colby The database guy _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From davide at dalyn.co.nz Tue Jan 20 13:44:10 2004 From: davide at dalyn.co.nz (David Emerson) Date: Wed, 21 Jan 2004 08:44:10 +1300 Subject: [AccessD] Report lines not printing Message-ID: <5.2.0.9.0.20040120104747.02487008@mail.dalyn.co.nz> A97 runtime. W98. Hewlett Packard LaserJet 6p I have a strange one here. When reports are printed they don't show any lines or rectangles that are created on the report. If printed from another computer on the network the lines and rectangles are printed, but they have been reduced in size by about 25% and appear in the top left hand corner. The report runs fine on another printer (different brand). It also prints fine at other locations (different computers and printer brands). A search on google didn't find anything obvious but maybe I wasn't looking in the right place. Regards David Emerson Dalyn Software Ltd 25 Cunliffe St, Churton Park Wellington, New Zealand Ph/Fax (877) 456-1205 From gustav at cactus.dk Tue Jan 20 14:00:55 2004 From: gustav at cactus.dk (Gustav Brock) Date: Tue, 20 Jan 2004 21:00:55 +0100 Subject: [AccessD] Report lines not printing In-Reply-To: <5.2.0.9.0.20040120104747.02487008@mail.dalyn.co.nz> References: <5.2.0.9.0.20040120104747.02487008@mail.dalyn.co.nz> Message-ID: <16343784478.20040120210055@cactus.dk> Hi David Sounds like printer driver problems. Try/check this: 1. Use the Postscript driver for that printer if possible. 2. Update the PCL driver as earlier versions are known to be buggy. 3. Use the HP 5p PCL printer driver which is known to be less buggy. 4. As a last resort use the HP LaserJet II printer driver ... Also check to setting for the printer resolution. If it is too low, fine line may disappear. /gustav > A97 runtime. W98. Hewlett Packard LaserJet 6p > I have a strange one here. When reports are printed they don't show any > lines or rectangles that are created on the report. > If printed from another computer on the network the lines and rectangles > are printed, but they have been reduced in size by about 25% and appear in > the top left hand corner. > The report runs fine on another printer (different brand). It also prints > fine at other locations (different computers and printer brands). From BBarabash at TappeConstruction.com Tue Jan 20 14:21:55 2004 From: BBarabash at TappeConstruction.com (Brett Barabash) Date: Tue, 20 Jan 2004 14:21:55 -0600 Subject: [AccessD] Mail Merge - Verifying user is satisfied and comple ted the merge Message-ID: <426071E0B0A6D311B3C0006008B0AB23AFE2BF@TAPPEEXCH01> John, I've never used the built-in Mail Merge in Access so I can't help you there, but here's what I was able to come up with using OLE automation. This requires a reference to your Word object library: Private Const cTemplate = "c:\temp\template.doc" Private mstrDocName As String Private WithEvents mobjWord As Word.Application Private Sub cmdMerge_Click() 'Create a new instance of Word If mobjWord Is Nothing Then Set mobjWord = New Word.Application End If 'Open the template document and merge to new document mobjWord.Documents.Open cTemplate With mobjWord.Documents(cTemplate).MailMerge .Destination = wdSendToNewDocument .Execute End With 'Keep track of the newly created document name and close the template With mobjWord mstrDocName = .ActiveDocument.Name .Documents(cTemplate).Close False .Visible = True End With End Sub Private Sub Form_Unload(Cancel As Integer) On Error Resume Next 'Cleanup the existing copy of Word mobjWord.Quit False Set mobjWord = Nothing End Sub Private Sub mobjWord_DocumentBeforeClose(ByVal Doc As Word.Document, Cancel As Boolean) 'User is closing document, check to see if it's the one we created If Doc.Name = mstrDocName Then 'Hide Word application so our Access app can gain focus mobjWord.Visible = False If MsgBox("Save changes?", vbYesNo) = vbYes Then Doc.SaveAs "c:\temp\test.doc" Else 'Close without saving Doc.Close False End If End If End Sub ===== I am attempting to set up a system where one group of people "order" merged documents, and another set of users then print those ordered documents, QA and mail them out. The users that order the documents will do the mail merge (on their local machine), with the document opened and visible to them after the merge. The user can then edit the document (add sentences / paragraphs etc), scan that the merged data is correct etc. If they are happy then I need to save the merged document out to a common location on the network with the doc name modified to include the initials of the person ordering the document, the date, the claim number that the doc is about etc. If the user is not happy, I need to just delete the document(s) on the local drive. My question is, how do I stop processing as I open the document so that I can then ask the user if it all worked satisfactorily after they close the document. Is it possible to "open the document MODAL (so to speak) where they are in Word, can edit and do whatever, but they have to close Word to get back to Access? How do you guys handle this stuff. John W. Colby The DIS database guy -------------------------------------------------------------------------------------------------------------------- This email and any files transmitted with it are confidential and intended solely for the use of the individual or entity to whom they are addressed. If you have received this email in error please notify the originator of the message. This footer also confirms that this email message has been scanned for the presence of computer viruses. Any views expressed in this message are those of the individual sender, except where the sender specifies and with authority, states them to be the views of Tappe Construction Co. Scanning of this message and addition of this footer is performed by SurfControl E-mail Filter software in conjunction with virus detection software. From Erwin.Craps at ithelps.be Tue Jan 20 14:30:21 2004 From: Erwin.Craps at ithelps.be (Erwin Craps - IT Helps) Date: Tue, 20 Jan 2004 21:30:21 +0100 Subject: [AccessD] Instantiate Forms as Objects Message-ID: <46B976F2B698FF46A4FE7636509B22DF03D135@stekelbes.ithelps.local> Not at my knowledge neither. But there is a big advantage why that is so. When renaming forms or deleting or absence of (in case of importing routines that are dependant of a form) you would get an compile error straight away. When using syntax like "form_" & strFormName you would only get an error when you run the routine. I find this a very good thing.... Erwin -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Charlotte Foust Sent: Tuesday, January 20, 2004 5:42 PM To: Access Developers discussion and problem solving Subject: RE: [AccessD] Instantiate Forms as Objects Maybe JC knows differently, but as far as I know, you can't do it that way, which is one of the reasons I don't use that syntax. Charlotte Foust -----Original Message----- From: Ken Ismert [mailto:KIsmert at TexasSystems.com] Sent: Tuesday, January 20, 2004 8:33 AM To: 'Access Developers discussion and problem solving' Subject: [AccessD] Instantiate Forms as Objects Hello Group: As you know, you can instantiate an Access form, just like any other object, by using its class name: Dim rFrm as Access.Form Set rFrm = New Form_YourForm ' form 'YourForm' This syntax allows you to create multiple open instances of a form, a necessity for my framework. However, I've run into a problem. What I need is a simple, one-line way to instantiate a form object using a string: sFormName = "YourForm" Set rFrm = MFOS("Form_" & sFormName) ' MFOS = "Magic Function or Syntax" Note: Because of the multiple instance requirement, DoCmd.OpenForm won't work. It can only make one instance of a form. I can't find a CreateObject syntax that works. In my current function, I use a big Case statement matching the form name to it's class. This has become a pain, because every time I add or remove forms, I have to edit the function. Have any of you found a way to do that? -Ken _______________________________________________ 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 From jimdettman at earthlink.net Tue Jan 20 14:30:33 2004 From: jimdettman at earthlink.net (Jim Dettman) Date: Tue, 20 Jan 2004 15:30:33 -0500 Subject: [AccessD] Report lines not printing In-Reply-To: <5.2.0.9.0.20040120104747.02487008@mail.dalyn.co.nz> Message-ID: David, Also try: 1. In report properties, set Fast Laser Printing to False 2. In report properties, set Layout for print to true. 3. In the printer driver, if you have a setting for "Print True Types Fonts as Graphics", turn it on. 4. Try changing the spool format in Windows from EMF to RAW or RAW to EMF. Jim Dettman President, Online Computer Services of WNY, Inc. (315) 699-3443 jimdettman at earthlink.net -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of David Emerson Sent: Tuesday, January 20, 2004 2:44 PM To: accessd at databaseadvisors.com Subject: [AccessD] Report lines not printing A97 runtime. W98. Hewlett Packard LaserJet 6p I have a strange one here. When reports are printed they don't show any lines or rectangles that are created on the report. If printed from another computer on the network the lines and rectangles are printed, but they have been reduced in size by about 25% and appear in the top left hand corner. The report runs fine on another printer (different brand). It also prints fine at other locations (different computers and printer brands). A search on google didn't find anything obvious but maybe I wasn't looking in the right place. Regards David Emerson Dalyn Software Ltd 25 Cunliffe St, Churton Park Wellington, New Zealand Ph/Fax (877) 456-1205 _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From JColby at dispec.com Tue Jan 20 14:33:08 2004 From: JColby at dispec.com (Colby, John) Date: Tue, 20 Jan 2004 15:33:08 -0500 Subject: [AccessD] Mail Merge - Verifying user is satisfied and comple ted the merge Message-ID: <05C61C52D7CAD211A7830008C7DF6F1079BCFE@DISABILITYINS01> Hey, that's at least a clue. Thanks, John W. Colby The database guy -----Original Message----- From: Brett Barabash [mailto:BBarabash at tappeconstruction.com] Sent: Tuesday, January 20, 2004 3:22 PM To: 'Access Developers discussion and problem solving' Subject: RE: [AccessD] Mail Merge - Verifying user is satisfied and comple ted the merge John, I've never used the built-in Mail Merge in Access so I can't help you there, but here's what I was able to come up with using OLE automation. This requires a reference to your Word object library: Private Const cTemplate = "c:\temp\template.doc" Private mstrDocName As String Private WithEvents mobjWord As Word.Application Private Sub cmdMerge_Click() 'Create a new instance of Word If mobjWord Is Nothing Then Set mobjWord = New Word.Application End If 'Open the template document and merge to new document mobjWord.Documents.Open cTemplate With mobjWord.Documents(cTemplate).MailMerge .Destination = wdSendToNewDocument .Execute End With 'Keep track of the newly created document name and close the template With mobjWord mstrDocName = .ActiveDocument.Name .Documents(cTemplate).Close False .Visible = True End With End Sub Private Sub Form_Unload(Cancel As Integer) On Error Resume Next 'Cleanup the existing copy of Word mobjWord.Quit False Set mobjWord = Nothing End Sub Private Sub mobjWord_DocumentBeforeClose(ByVal Doc As Word.Document, Cancel As Boolean) 'User is closing document, check to see if it's the one we created If Doc.Name = mstrDocName Then 'Hide Word application so our Access app can gain focus mobjWord.Visible = False If MsgBox("Save changes?", vbYesNo) = vbYes Then Doc.SaveAs "c:\temp\test.doc" Else 'Close without saving Doc.Close False End If End If End Sub ===== I am attempting to set up a system where one group of people "order" merged documents, and another set of users then print those ordered documents, QA and mail them out. The users that order the documents will do the mail merge (on their local machine), with the document opened and visible to them after the merge. The user can then edit the document (add sentences / paragraphs etc), scan that the merged data is correct etc. If they are happy then I need to save the merged document out to a common location on the network with the doc name modified to include the initials of the person ordering the document, the date, the claim number that the doc is about etc. If the user is not happy, I need to just delete the document(s) on the local drive. My question is, how do I stop processing as I open the document so that I can then ask the user if it all worked satisfactorily after they close the document. Is it possible to "open the document MODAL (so to speak) where they are in Word, can edit and do whatever, but they have to close Word to get back to Access? How do you guys handle this stuff. John W. Colby The DIS database guy ---------------------------------------------------------------------------- ---------------------------------------- This email and any files transmitted with it are confidential and intended solely for the use of the individual or entity to whom they are addressed. If you have received this email in error please notify the originator of the message. This footer also confirms that this email message has been scanned for the presence of computer viruses. Any views expressed in this message are those of the individual sender, except where the sender specifies and with authority, states them to be the views of Tappe Construction Co. Scanning of this message and addition of this footer is performed by SurfControl E-mail Filter software in conjunction with virus detection software. _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From DMcAfee at haascnc.com Tue Jan 20 14:44:13 2004 From: DMcAfee at haascnc.com (David McAfee) Date: Tue, 20 Jan 2004 12:44:13 -0800 Subject: [AccessD] Report lines not printing Message-ID: <657FB70438B7D311AF320090279C180106144020@EXCHMAIL> This is a known issue. I never saw it with 400,600 or 800 series Inkjets. I have seen it with 700, 900 & some Laserjets. Another problem is printing in draft using colors that are set in report runtimes. I sent a letter to HP and their reply was to print in "best" or "presentation" mode. I opted to stop buying HPs instead. Another workaround is to print the report as a PDF then print the PDF file. We do that at the office. HTH David -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of David Emerson Sent: Tuesday, January 20, 2004 11:44 AM To: accessd at databaseadvisors.com Subject: [AccessD] Report lines not printing A97 runtime. W98. Hewlett Packard LaserJet 6p I have a strange one here. When reports are printed they don't show any lines or rectangles that are created on the report. If printed from another computer on the network the lines and rectangles are printed, but they have been reduced in size by about 25% and appear in the top left hand corner. The report runs fine on another printer (different brand). It also prints fine at other locations (different computers and printer brands). A search on google didn't find anything obvious but maybe I wasn't looking in the right place. Regards David Emerson Dalyn Software Ltd 25 Cunliffe St, Churton Park Wellington, New Zealand Ph/Fax (877) 456-1205 _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From cfoust at infostatsystems.com Tue Jan 20 15:02:15 2004 From: cfoust at infostatsystems.com (Charlotte Foust) Date: Tue, 20 Jan 2004 13:02:15 -0800 Subject: [AccessD] Instantiate Forms as Objects Message-ID: I don't generally do it at all, so I would have to dig back into my archives to see how I did it last time. I seem to recall using a collection and a custom class, but I haven't done it in several years, so my memory is dusty. Charlotte Foust -----Original Message----- From: Ken Ismert [mailto:KIsmert at TexasSystems.com] Sent: Tuesday, January 20, 2004 11:49 AM To: 'Access Developers discussion and problem solving' Subject: RE: [AccessD] Instantiate Forms as Objects So, how do you get muliple instances of the same form open without using the "Set rFrm = New Form_YourForm" syntax? -Ken -----Original Message----- From: Charlotte Foust [mailto:cfoust at infostatsystems.com] Sent: Tuesday, January 20, 2004 10:42 AM To: Access Developers discussion and problem solving Subject: RE: [AccessD] Instantiate Forms as Objects Maybe JC knows differently, but as far as I know, you can't do it that way, which is one of the reasons I don't use that syntax. Charlotte Foust _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From davide at dalyn.co.nz Tue Jan 20 15:08:14 2004 From: davide at dalyn.co.nz (David Emerson) Date: Wed, 21 Jan 2004 10:08:14 +1300 Subject: [AccessD] Report lines not printing In-Reply-To: <657FB70438B7D311AF320090279C180106144020@EXCHMAIL> Message-ID: <5.2.0.9.0.20040121100738.00b2ab70@mail.dalyn.co.nz> Thanks everyone for your suggestions. I will pass them on to the client. David At 20/01/2004, you wrote: >This is a known issue. I never saw it with 400,600 or 800 series Inkjets. >I have seen it with 700, 900 & some Laserjets. Another problem is printing >in draft using colors that are set in report runtimes. I sent a letter to >HP and their reply was to print in "best" or "presentation" mode. I opted >to stop buying HPs instead. > >Another workaround is to print the report as a PDF then print the PDF >file. We do that at the office. > >HTH >David > >-----Original Message----- >From: accessd-bounces at databaseadvisors.com >[mailto:accessd-bounces at databaseadvisors.com]On Behalf Of David Emerson >Sent: Tuesday, January 20, 2004 11:44 AM >To: accessd at databaseadvisors.com >Subject: [AccessD] Report lines not printing > > >A97 runtime. W98. Hewlett Packard LaserJet 6p > >I have a strange one here. When reports are printed they don't show any >lines or rectangles that are created on the report. > >If printed from another computer on the network the lines and rectangles >are printed, but they have been reduced in size by about 25% and appear in >the top left hand corner. > >The report runs fine on another printer (different brand). It also prints >fine at other locations (different computers and printer brands). > >A search on google didn't find anything obvious but maybe I wasn't looking >in the right place. > >Regards > >David Emerson >Dalyn Software Ltd >25 Cunliffe St, Churton Park >Wellington, New Zealand >Ph/Fax (877) 456-1205 > >_______________________________________________ >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 From Subscriptions at servicexp.com Tue Jan 20 15:40:40 2004 From: Subscriptions at servicexp.com (Robert Gracie) Date: Tue, 20 Jan 2004 16:40:40 -0500 Subject: [AccessD] Mail Merge - Verifying user is satisfied and completed the merge In-Reply-To: <05C61C52D7CAD211A7830008C7DF6F1079BCFB@DISABILITYINS01> Message-ID: <001001c3df9e$0d3eeb80$6401a8c0@RG> What would be the end result for the user for a "Approved" scenario? A save for Approval? I think I remember reading that MS Word raises an After Save event.... Robert Gracie www.servicexp.com -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Colby, John Sent: Tuesday, January 20, 2004 2:24 PM To: 'Access Developers discussion and problem solving' Subject: RE: [AccessD] Mail Merge - Verifying user is satisfied and completed the merge I'm not running a class (or any other code) in Word. Access is opening an instance of word, merging the data, then turning over control to the user. John W. Colby The database guy -----Original Message----- From: Charlotte Foust [mailto:cfoust at infostatsystems.com] Sent: Tuesday, January 20, 2004 2:11 PM To: Access Developers discussion and problem solving Subject: RE: [AccessD] Mail Merge - Verifying user is satisfied and completed the merge Um ... Raise an event in Word? Charlotte Foust -----Original Message----- From: Colby, John [mailto:JColby at dispec.com] Sent: Tuesday, January 20, 2004 10:49 AM To: 'Access Developers discussion and problem solving' Subject: RE: [AccessD] Mail Merge - Verifying user is satisfied and completed the merge yes, in Access. Access opens the word document, merges the data and waits for the user to edit the data.. The user edits the document to their hearts content, then closes the document. Access continues processing, saving the document out to a network drive and logging the successful merge to a table. In order to do this, I need to know the user successfully merged the document and was happy with the results. John W. Colby The database guy -----Original Message----- From: Charlotte Foust [mailto:cfoust at infostatsystems.com] Sent: Tuesday, January 20, 2004 1:37 PM To: Access Developers discussion and problem solving Subject: RE: [AccessD] Mail Merge - Verifying user is satisfied and completed the merge Are you asking about stopping the processing in Word or Access? Charlotte Foust -----Original Message----- From: Colby, John [mailto:JColby at dispec.com] Sent: Tuesday, January 20, 2004 10:29 AM To: Accessd (E-mail) Subject: [AccessD] Mail Merge - Verifying user is satisfied and completed the merge I am attempting to set up a system where one group of people "order" merged documents, and another set of users then print those ordered documents, QA and mail them out. The users that order the documents will do the mail merge (on their local machine), with the document opened and visible to them after the merge. The user can then edit the document (add sentences / paragraphs etc), scan that the merged data is correct etc. If they are happy then I need to save the merged document out to a common location on the network with the doc name modified to include the initials of the person ordering the document, the date, the claim number that the doc is about etc. If the user is not happy, I need to just delete the document(s) on the local drive. My question is, how do I stop processing as I open the document so that I can then ask the user if it all worked satisfactorily after they close the document. Is it possible to "open the document MODAL (so to speak) where they are in Word, can edit and do whatever, but they have to close Word to get back to Access? How do you guys handle this stuff. John W. Colby The DIS database guy _______________________________________________ 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 _______________________________________________ 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 _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From pedro at plex.nl Tue Jan 20 14:12:24 2004 From: pedro at plex.nl (Pedro Janssen) Date: Tue, 20 Jan 2004 21:12:24 +0100 Subject: [AccessD] error after converting (mailmerge) References: <200401141408.i0EE8cNA020272@mailhostC.plex.net> <4005CD15.60401@shaw.ca> Message-ID: <001701c3df9f$a7fa51e0$f7c581d5@pedro> Thanks Marty for your response. I will try this when i am at work. I didn't convert the mdw file to A2k, but i could open the converted database with this mdw. How is this possible? Pedro Janssen ----- Original Message ----- From: "MartyConnelly" To: "Access Developers discussion and problem solving" Sent: Thursday, January 15, 2004 12:13 AM Subject: Re: [AccessD] error after converting (mailmerge) > How about trying > strConnect = "Provider=Microsoft.Jet.OLEDB.4.0;" & _ > "Data Source=c:\somepath\mydb.mdb;" & _ > "Jet OLEDB:System Database=MySystem.mdw", _ > "myUsername", "myPassword" > Note, remember to convert both the MDB and the MDW to the 4.0 > database format when using the 4.0 OLE DB Provider. Make a new copy of > 97 mdw to handle 2000. > > > pedro at plex.nl wrote: > > >Hello Group, > > > >i converted a A97 secured database to A2K. > >After making the changes in Wrkgadmin.exe and the ODBC Data Sources, i changed the names in the module. After running the mailmerge i get an error: Run-time error '5922' Word was unable to open the data source. The debug selects the .OpenDataSource from the code below. > > > >I figure out why this error occurs. > > > >TIA > > > >Pedro Janssen > > > > > > > > > >Sub CreateMergeDoc(UseDDE As Boolean, PrintDoc As Boolean) > > > > Dim WordDoc As Word.Document > > Dim strLetter As String > > Dim strConnect As String > > Dim WordApp As Word.Application > > > > Set WordApp = CreateObject("Word.Application") > > > > Set WordDoc = WordApp.Documents.Add > > With WordDoc.MailMerge > > If UseDDE Then > > strConnect = "QUERY Uitvoer" > > Else > > strConnect = "DSN=MS Access 2000 " _ > > & "Database;DBQ=E:\Cytologie\positieven\" _ > > & "BeveiligdPOSITIEVEN(A2K).mdb;" _ > > & "FIL=MS Access;" > > End If > > .OpenDataSource _ > > Name:="E:\Cytologie\positieven\BeveiligdPOSITIEVEN(A2K).mdb", _ > > ReadOnly:=True, LinkToSource:=True, _ > > Connection:=strConnect, _ > > SQLStatement:="SELECT * FROM [Uitvoer], [Aanvrager] WHERE Uitvoer.AanvragerID = Aanvrager.AanvragerID AND Uitvoer.ControleID = " & Forms![Brief]![veld] & ";" > > > > With Fields > > ............... > > End With > > > > With WordApp.Selection > > ............... > > End With > > > > > > With WordDoc.MailMerge > > .DataSource.FirstRecord = 1 > > > > .Destination = wdSendToNewDocument > > > > .Execute > > > > If PrintDoc Then > > .Application.Options.PrintBackground = False > > .Application.ActiveDocument.PrintOut > > End If > > End With > > > > WordApp.Visible = True > > End With > >End Sub > > > > > > > > > > -- > Marty Connelly > Victoria, B.C. > Canada > > > > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com > > From Developer at UltraDNT.com Tue Jan 20 16:12:30 2004 From: Developer at UltraDNT.com (Developer) Date: Tue, 20 Jan 2004 17:12:30 -0500 Subject: [AccessD] Word 2K email merge problems In-Reply-To: <05C61C52D7CAD211A7830008C7DF6F1079BCFA@DISABILITYINS01> Message-ID: <001901c3dfa2$7f5e5350$7001a8c0@COA3> I may be late to this thread , but I didn't see a resolution ... I always give the "main" doc a .DOT extension. The default action of a template is to always generate a new one of itself, leaving the original in place. By using a .dot, the result document is always something like "FormLetters1" when using the options: .MainDocumentType = 0 'wdFormLetters .Destination = 0 ' wdSendToNewDocument BTW - your users will surely ask .. How to print PART of a merged doc, since, in effect there are many page 1's in the resulting doc. The answer is by printing in sections, so in the Pages box of the Print dialog, they need to enter s10-s20 to print the 10th through 20th letters in the result. Hth Steve -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Colby, John Sent: Tuesday, January 20, 2004 1:51 PM To: 'Access Developers discussion and problem solving' Subject: RE: [AccessD] Word 2K email merge problems What is this an event of? I can't find it in Word or Access. and searching for MailMergeSendToCustom on the web turns up nothing. John W. Colby The database guy -----Original Message----- From: William Hindman [mailto:wdhindman at bellsouth.net] Sent: Tuesday, January 20, 2004 1:23 PM To: Access Developers discussion and problem solving Subject: Re: [AccessD] Word 2K email merge problems JC ...try the MailMergeSendToCustom event ...iirc MS has code for directing the merge to use almost anything you tell it to ...HTH :) William Hindman - Next Year In The Free State! ----- Original Message ----- From: "Colby, John" To: "Accessd (E-mail)" Sent: Tuesday, January 20, 2004 12:51 PM Subject: [AccessD] Word 2K email merge problems > Folks, > > I'm trying to do an email merge where the merge data document is named > differently that the original data document. IOW, I set up the > original document in a directory on the server. I set up a data > document (text file) > out there to test the document, get it working etc. When it comes > time to merge I need the actual data document to be located on the > local drive because this merge process could be preformed by several > people at the same > time and by doing it locally I avoid "collisions". I also rename both > the merge document itself and it's data document. It seems this > should be doable, but I can't find a way to programatically set the > merge data > (document) name at merge time. > > Is this possible? > > John W. Colby > The database guy > > _______________________________________________ > 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 _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From jwcolby at colbyconsulting.com Tue Jan 20 19:43:33 2004 From: jwcolby at colbyconsulting.com (John W. Colby) Date: Tue, 20 Jan 2004 20:43:33 -0500 Subject: [AccessD] MDB to sql server Message-ID: My client DIS has finally ordered a new server for their database, a shiny new Dell dual P4 2.4g with 1gb ram etc., Windows 2K Server OS and SQL Server 2K. Given that the MDB was running on an old PIII 400 mhz NT running all the email and everything else the company owned, just the new server hardware should provide a decent boost in performance. However they also want to move to SQL Server. I have a server machine here at the office running Win2K Pro and SQL Server 2K. My intention is to do the data port from MDB to SQL Server at my office in advance, figuring out how to do it and discovering all the pitfalls before hand. The database consists of approximately 90 tables, of which ~30 are lookup tables, ~30 are main tables / child tables, and a handful of many-many. This MDB is heavily normalized with relationships established, no cascade delete. I use Autonumber PKs exclusively. I tried to do the import from inside SQL Server using DTS(?) but ended up with 17 tables not imported, and the structure but not the data for several main tables. What is the best method to use for getting the database moved into SQL Server, preferable maintaining the incrementing autonumber methodology as well as the relationships, with referential integrity enforced, no cascade deletes? I went through this exercise a couple of years ago with a similar size database, and managed, in the end to get it imported and functioning. John W. Colby www.ColbyConsulting.com From wdhindman at bellsouth.net Tue Jan 20 20:04:44 2004 From: wdhindman at bellsouth.net (William Hindman) Date: Tue, 20 Jan 2004 21:04:44 -0500 Subject: [AccessD] Word 2K email merge problems References: <05C61C52D7CAD211A7830008C7DF6F1079BCFA@DISABILITYINS01> Message-ID: <000c01c3dfc2$f0666e00$6101a8c0@dejpolsys> ...the word mailmerge object ...I found the correct name in KB 285333 along with some other events that can be used and sample code ...HTH :) William Hindman - Next Year In The Free State! ----- Original Message ----- From: "Colby, John" To: "'Access Developers discussion and problem solving'" Sent: Tuesday, January 20, 2004 1:50 PM Subject: RE: [AccessD] Word 2K email merge problems > What is this an event of? I can't find it in Word or Access. and searching > for MailMergeSendToCustom on the web turns up nothing. > > John W. Colby > The database guy > > > -----Original Message----- > From: William Hindman [mailto:wdhindman at bellsouth.net] > Sent: Tuesday, January 20, 2004 1:23 PM > To: Access Developers discussion and problem solving > Subject: Re: [AccessD] Word 2K email merge problems > > > JC > > ...try the MailMergeSendToCustom event ...iirc MS has code for directing the > merge to use almost anything you tell it to ...HTH :) > > William Hindman > - Next Year In The Free State! > > > ----- Original Message ----- > From: "Colby, John" > To: "Accessd (E-mail)" > Sent: Tuesday, January 20, 2004 12:51 PM > Subject: [AccessD] Word 2K email merge problems > > > > Folks, > > > > I'm trying to do an email merge where the merge data document is named > > differently that the original data document. IOW, I set up the original > > document in a directory on the server. I set up a data document (text > file) > > out there to test the document, get it working etc. When it comes time to > > merge I need the actual data document to be located on the local drive > > because this merge process could be preformed by several people at the > same > > time and by doing it locally I avoid "collisions". I also rename both the > > merge document itself and it's data document. It seems this should be > > doable, but I can't find a way to programatically set the merge data > > (document) name at merge time. > > > > Is this possible? > > > > John W. Colby > > The database guy > > > > _______________________________________________ > > 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 > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com > From jwcolby at colbyconsulting.com Tue Jan 20 20:12:29 2004 From: jwcolby at colbyconsulting.com (John W. Colby) Date: Tue, 20 Jan 2004 21:12:29 -0500 Subject: [AccessD] Word 2K email merge problems In-Reply-To: <000c01c3dfc2$f0666e00$6101a8c0@dejpolsys> Message-ID: Thanks William. John W. Colby www.ColbyConsulting.com -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of William Hindman Sent: Tuesday, January 20, 2004 9:05 PM To: Access Developers discussion and problem solving Subject: Re: [AccessD] Word 2K email merge problems ...the word mailmerge object ...I found the correct name in KB 285333 along with some other events that can be used and sample code ...HTH :) William Hindman - Next Year In The Free State! ----- Original Message ----- From: "Colby, John" To: "'Access Developers discussion and problem solving'" Sent: Tuesday, January 20, 2004 1:50 PM Subject: RE: [AccessD] Word 2K email merge problems > What is this an event of? I can't find it in Word or Access. and searching > for MailMergeSendToCustom on the web turns up nothing. > > John W. Colby > The database guy > > > -----Original Message----- > From: William Hindman [mailto:wdhindman at bellsouth.net] > Sent: Tuesday, January 20, 2004 1:23 PM > To: Access Developers discussion and problem solving > Subject: Re: [AccessD] Word 2K email merge problems > > > JC > > ...try the MailMergeSendToCustom event ...iirc MS has code for directing the > merge to use almost anything you tell it to ...HTH :) > > William Hindman > - Next Year In The Free State! > > > ----- Original Message ----- > From: "Colby, John" > To: "Accessd (E-mail)" > Sent: Tuesday, January 20, 2004 12:51 PM > Subject: [AccessD] Word 2K email merge problems > > > > Folks, > > > > I'm trying to do an email merge where the merge data document is named > > differently that the original data document. IOW, I set up the original > > document in a directory on the server. I set up a data document (text > file) > > out there to test the document, get it working etc. When it comes time to > > merge I need the actual data document to be located on the local drive > > because this merge process could be preformed by several people at the > same > > time and by doing it locally I avoid "collisions". I also rename both the > > merge document itself and it's data document. It seems this should be > > doable, but I can't find a way to programatically set the merge data > > (document) name at merge time. > > > > Is this possible? > > > > John W. Colby > > The database guy > > > > _______________________________________________ > > 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 > _______________________________________________ > 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 From andrew.haslett at ilc.gov.au Tue Jan 20 20:41:15 2004 From: andrew.haslett at ilc.gov.au (Haslett, Andrew) Date: Wed, 21 Jan 2004 13:11:15 +1030 Subject: [AccessD] MDB to sql server Message-ID: I've found its better in this case to use the upsizing wizard from within Access 2k, as it seems to handle the native data types of Access better than importing from DTS. Make sure you have the Access patch installed first (can't remember what its called but its available at Office Update - something like a 'readiness update' or the like). Still check your primary key and identity fields in SQL afterwards as I can't recall if there were any other issues.. There may well have been a couple of options you needed to change during the export process to retain all constraints. Cheers, Andrew -----Original Message----- From: John W. Colby [mailto:jwcolby at colbyconsulting.com] Sent: Wednesday, 21 January 2004 12:14 PM To: AccessD Subject: [AccessD] MDB to sql server My client DIS has finally ordered a new server for their database, a shiny new Dell dual P4 2.4g with 1gb ram etc., Windows 2K Server OS and SQL Server 2K. Given that the MDB was running on an old PIII 400 mhz NT running all the email and everything else the company owned, just the new server hardware should provide a decent boost in performance. However they also want to move to SQL Server. I have a server machine here at the office running Win2K Pro and SQL Server 2K. My intention is to do the data port from MDB to SQL Server at my office in advance, figuring out how to do it and discovering all the pitfalls before hand. The database consists of approximately 90 tables, of which ~30 are lookup tables, ~30 are main tables / child tables, and a handful of many-many. This MDB is heavily normalized with relationships established, no cascade delete. I use Autonumber PKs exclusively. I tried to do the import from inside SQL Server using DTS(?) but ended up with 17 tables not imported, and the structure but not the data for several main tables. What is the best method to use for getting the database moved into SQL Server, preferable maintaining the incrementing autonumber methodology as well as the relationships, with referential integrity enforced, no cascade deletes? I went through this exercise a couple of years ago with a similar size database, and managed, in the end to get it imported and functioning. John W. Colby www.ColbyConsulting.com _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com IMPORTANT - PLEASE READ ******************** This email and any files transmitted with it are confidential and may contain information protected by law from disclosure. If you have received this message in error, please notify the sender immediately and delete this email from your system. No warranty is given that this email or files, if attached to this email, are free from computer viruses or other defects. They are provided on the basis the user assumes all responsibility for loss, damage or consequence resulting directly or indirectly from their use, whether caused by the negligence of the sender or not. From martyconnelly at shaw.ca Tue Jan 20 23:13:29 2004 From: martyconnelly at shaw.ca (MartyConnelly) Date: Tue, 20 Jan 2004 21:13:29 -0800 Subject: [AccessD] error after converting (mailmerge) References: <200401141408.i0EE8cNA020272@mailhostC.plex.net> <4005CD15.60401@shaw.ca> <001701c3df9f$a7fa51e0$f7c581d5@pedro> Message-ID: <400E0A79.2090002@shaw.ca> Using everything with A2K format saves doing a Unicode to Ansi conversion from 97. A couple of other things to try If it's Word 2000 or 97, try just setting the Name parameter to blank, i.e. .OpenDataSource Name:="", _ etc. Word does not like it if you specify a name and a connection string for ODBC calls. If it's Word 2002 you will also need to add Subtype:=wdMergeSubTypeWord2000 Also have a look at these examples Super Easy Word Merge. http://www.attcanada.net/~kallal.msn/msaccess/msaccess.html or this Cindy Meister's MVP site http://homepage.swissonline.ch/cindymeister/MergFram.htm Pedro Janssen wrote: >Thanks Marty for your response. I will try this when i am at work. > >I didn't convert the mdw file to A2k, but i could open the converted >database with this mdw. >How is this possible? > >Pedro Janssen > > > >----- Original Message ----- >From: "MartyConnelly" >To: "Access Developers discussion and problem solving" > >Sent: Thursday, January 15, 2004 12:13 AM >Subject: Re: [AccessD] error after converting (mailmerge) > > > > >>How about trying >>strConnect = "Provider=Microsoft.Jet.OLEDB.4.0;" & _ >> "Data Source=c:\somepath\mydb.mdb;" & _ >> "Jet OLEDB:System Database=MySystem.mdw", _ >> "myUsername", "myPassword" >>Note, remember to convert both the MDB and the MDW to the 4.0 >>database format when using the 4.0 OLE DB Provider. Make a new copy of >>97 mdw to handle 2000. >> >> >>pedro at plex.nl wrote: >> >> >> >>>Hello Group, >>> >>>i converted a A97 secured database to A2K. >>>After making the changes in Wrkgadmin.exe and the ODBC Data Sources, i >>> >>> >changed the names in the module. After running the mailmerge i get an error: >Run-time error '5922' Word was unable to open the data source. The debug >selects the .OpenDataSource from the code below. > > >>>I figure out why this error occurs. >>> >>>TIA >>> >>>Pedro Janssen >>> >>> >>> >>> >>>Sub CreateMergeDoc(UseDDE As Boolean, PrintDoc As Boolean) >>> >>> Dim WordDoc As Word.Document >>> Dim strLetter As String >>> Dim strConnect As String >>> Dim WordApp As Word.Application >>> >>> Set WordApp = CreateObject("Word.Application") >>> >>> Set WordDoc = WordApp.Documents.Add >>> With WordDoc.MailMerge >>> If UseDDE Then >>> strConnect = "QUERY Uitvoer" >>> Else >>> strConnect = "DSN=MS Access 2000 " _ >>> & "Database;DBQ=E:\Cytologie\positieven\" _ >>> & "BeveiligdPOSITIEVEN(A2K).mdb;" _ >>> & "FIL=MS Access;" >>> End If >>> .OpenDataSource _ >>> Name:="E:\Cytologie\positieven\BeveiligdPOSITIEVEN(A2K).mdb", _ >>> ReadOnly:=True, LinkToSource:=True, _ >>> Connection:=strConnect, _ >>> SQLStatement:="SELECT * FROM [Uitvoer], [Aanvrager] WHERE >>> >>> >Uitvoer.AanvragerID = Aanvrager.AanvragerID AND Uitvoer.ControleID = " & >Forms![Brief]![veld] & ";" > > >>> With Fields >>> ............... >>> End With >>> >>> With WordApp.Selection >>> ............... >>> End With >>> >>> >>> With WordDoc.MailMerge >>> .DataSource.FirstRecord = 1 >>> >>> .Destination = wdSendToNewDocument >>> >>> .Execute >>> >>> If PrintDoc Then >>> .Application.Options.PrintBackground = False >>> .Application.ActiveDocument.PrintOut >>> End If >>> End With >>> >>> WordApp.Visible = True >>> End With >>>End Sub >>> >>> >>> >>> >>> >>> >>-- >>Marty Connelly >>Victoria, B.C. >>Canada >> >> >> >>_______________________________________________ >>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 > > > -- Marty Connelly Victoria, B.C. Canada From d.dick at uws.edu.au Tue Jan 20 23:17:35 2004 From: d.dick at uws.edu.au (Darren DICK) Date: Wed, 21 Jan 2004 16:17:35 +1100 Subject: [AccessD] A2K: Error 3251 Message-ID: <000901c3dfdd$e1656170$48619a89@DDICK> Hi All This should be simple I have some code updating a table of records Dim selSQL As String Dim rs As Recordset selSQL = "SELECT tblMyTable.* FROM tblMyTable;" Set rs = db.OpenRecordset(selSQL, dbOpenSnapshot) With rs .Edit <===Code Fails Here !MyField = Me.txtMyControl .Update End With The rror I get is... Error 3251: Operation is not supported for this type of Object Any suggestions?? Many thanks DArren From stuart at lexacorp.com.pg Wed Jan 21 00:03:26 2004 From: stuart at lexacorp.com.pg (Stuart McLachlan) Date: Wed, 21 Jan 2004 16:03:26 +1000 Subject: [AccessD] A2K: Error 3251 In-Reply-To: <000901c3dfdd$e1656170$48619a89@DDICK> Message-ID: <400EA2CE.11566.1A6D76F@localhost> If you are opening dbOpenSnapshot, you are creating a temporary recordset that is a "Snapshot" of the table at a given point in time - it is not the table itself, so you can't update records in it. Open it as the default (dbDynaset) On 21 Jan 2004 at 16:17, Darren DICK wrote: > Hi All > This should be simple > > I have some code updating a table of records > > Dim selSQL As String > Dim rs As Recordset > > selSQL = "SELECT tblMyTable.* FROM tblMyTable;" > > Set rs = db.OpenRecordset(selSQL, dbOpenSnapshot) > > With rs > .Edit <===Code Fails Here > !MyField = Me.txtMyControl > .Update > End With > > The rror I get is... > Error 3251: Operation is not supported for this type of Object > > Any suggestions?? > > Many thanks > > DArren > > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com -- Lexacorp Ltd http://www.lexacorp.com.pg Information Technology Consultancy, Software Development,System Support. From Developer at UltraDNT.com Wed Jan 21 00:17:36 2004 From: Developer at UltraDNT.com (Developer) Date: Wed, 21 Jan 2004 01:17:36 -0500 Subject: [AccessD] A2K: Error 3251 In-Reply-To: <000901c3dfdd$e1656170$48619a89@DDICK> Message-ID: <000001c3dfe6$442f5290$7001a8c0@COA3> Change snapshot to dbOpenDynaset -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Darren DICK Sent: Wednesday, January 21, 2004 12:18 AM To: AccessD List Subject: [AccessD] A2K: Error 3251 Hi All This should be simple I have some code updating a table of records Dim selSQL As String Dim rs As Recordset selSQL = "SELECT tblMyTable.* FROM tblMyTable;" Set rs = db.OpenRecordset(selSQL, dbOpenSnapshot) With rs .Edit <===Code Fails Here !MyField = Me.txtMyControl .Update End With The rror I get is... Error 3251: Operation is not supported for this type of Object Any suggestions?? Many thanks DArren _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From accessd at shaw.ca Wed Jan 21 01:20:19 2004 From: accessd at shaw.ca (Jim Lawrence (AccessD)) Date: Tue, 20 Jan 2004 23:20:19 -0800 Subject: [AccessD] A2K: Error 3251 In-Reply-To: <000901c3dfdd$e1656170$48619a89@DDICK> Message-ID: Hi Darren: You have to make sure your DAO is referenced, the db object and rs recordset object is dimensioned and the right type of object is used, that has edit and update functionality. Example: Dim selSQL As String Dim rs as DAO.recordset Dim db as DAO.database set db = CurrentDb() set rs = db.OpenRecordset(selSQL, dbOpenDynaset) ... then everything should work just fine. HTH Jim -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Darren DICK Sent: Tuesday, January 20, 2004 9:18 PM To: AccessD List Subject: [AccessD] A2K: Error 3251 Hi All This should be simple I have some code updating a table of records Dim selSQL As String Dim rs As Recordset selSQL = "SELECT tblMyTable.* FROM tblMyTable;" Set rs = db.OpenRecordset(selSQL, dbOpenSnapshot) With rs .Edit <===Code Fails Here !MyField = Me.txtMyControl .Update End With The rror I get is... Error 3251: Operation is not supported for this type of Object Any suggestions?? Many thanks DArren _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From accessd666 at yahoo.com Wed Jan 21 02:40:24 2004 From: accessd666 at yahoo.com (Sad Der) Date: Wed, 21 Jan 2004 00:40:24 -0800 (PST) Subject: [AccessD] Major Performance Issue! Message-ID: <20040121084024.27016.qmail@web60210.mail.yahoo.com> Hi group, I've got a MAJOR performance issue. I need to display a lot of data. A performance test showed that it takes between 120 - 160 seconds (2 minutes - 2.40 minutes) to display the data! I have no idea how to speed things up dramaticly. I really could use some tips. Here's a description of the current environment: Access 2000 Client (size: 20 Mb) Access 2000 Back-end (size: 100 Mb) approx 4 users Novel network Functionality: I need to display 4 listbox' with data. Every listbox has the same table as source. Every listbox has a query as RowSource Every listbox has this layout: Proces Type | Date | # Records Listbox 1 displays 4 records Listbox 2 displays 2 records Listbox 3 displays 6 records Listbox 4 displays 3 records So the table (tblMultiInterface) has 15 records in total. Table tblMultiInterface Fields: Proces Type Text Date Text (!) Records Text (!) (zero records need to display N/A) I added the code as an attachment but unfortunatly this mail was blocked! If anybody would like to take a look at the code I can send it to you directly. Comments/tips/etc would be GREATLY appriciated! TIA Sad __________________________________ Do you Yahoo!? Yahoo! Hotjobs: Enter the "Signing Bonus" Sweepstakes http://hotjobs.sweepstakes.yahoo.com/signingbonus From pedro at plex.nl Wed Jan 21 09:59:35 2004 From: pedro at plex.nl (pedro at plex.nl) Date: Wed, 21 Jan 2004 09:59:35 (MET) Subject: [AccessD] error after converting (mailmerge) Message-ID: <200401210859.i0L8xZNA014596@mailhostC.plex.net> In antwoord op: > From: MartyConnelly > To: Access Developers discussion and problem solving > Date: Tue, 20 Jan 2004 21:13:29 -0800 > Subject: Re: [AccessD] error after converting (mailmerge) > > > Using everything with A2K format saves doing a Unicode to Ansi > conversion from 97. > > A couple of other things to try > If it's Word 2000 or 97, try just setting the Name parameter to blank, i.e. > > ..OpenDataSource Name:="", _ > > etc. Word does not like it if you specify a name and a connection string > for ODBC calls. > If it's Word 2002 you will also need to add > Subtype:=wdMergeSubTypeWord2000 > > Also have a look at these examples > Super Easy Word Merge. > http://www.attcanada.net/~kallal.msn/msaccess/msaccess.html > or this Cindy Meister's MVP site > http://homepage.swissonline.ch/cindymeister/MergFram.htm > > > Pedro Janssen wrote: > > >Thanks Marty for your response. I will try this when i am at work. > > > >I didn't convert the mdw file to A2k, but i could open the converted > >database with this mdw. > >How is this possible? > > > >Pedro Janssen > > > > > > > >----- Original Message ----- > >From: "MartyConnelly" > >To: "Access Developers discussion and problem solving" > > > >Sent: Thursday, January 15, 2004 12:13 AM > >Subject: Re: [AccessD] error after converting (mailmerge) > > > > > > > > > >>How about trying > >>strConnect = "Provider=Microsoft.Jet.OLEDB.4.0;" & _ > >> "Data Source=c:\somepath\mydb.mdb;" & _ > >> "Jet OLEDB:System Database=MySystem.mdw", _ > >> "myUsername", "myPassword" > >>Note, remember to convert both the MDB and the MDW to the 4.0 > >>database format when using the 4.0 OLE DB Provider. Make a new copy of > >>97 mdw to handle 2000. > >> > >> > >>pedro at plex.nl wrote: > >> > >> > >> > >>>Hello Group, > >>> > >>>i converted a A97 secured database to A2K. > >>>After making the changes in Wrkgadmin.exe and the ODBC Data Sources, i > >>> > >>> > >changed the names in the module. After running the mailmerge i get an error: > >Run-time error '5922' Word was unable to open the data source. The debug > >selects the .OpenDataSource from the code below. > > > > > >>>I figure out why this error occurs. > >>> > >>>TIA > >>> > >>>Pedro Janssen > >>> > >>> > >>> > >>> > >>>Sub CreateMergeDoc(UseDDE As Boolean, PrintDoc As Boolean) > >>> > >>> Dim WordDoc As Word.Document > >>> Dim strLetter As String > >>> Dim strConnect As String > >>> Dim WordApp As Word.Application > >>> > >>> Set WordApp = CreateObject("Word.Application") > >>> > >>> Set WordDoc = WordApp.Documents.Add > >>> With WordDoc.MailMerge > >>> If UseDDE Then > >>> strConnect = "QUERY Uitvoer" > >>> Else > >>> strConnect = "DSN=MS Access 2000 " _ > >>> & "Database;DBQ=E:\Cytologie\positieven\" _ > >>> & "BeveiligdPOSITIEVEN(A2K).mdb;" _ > >>> & "FIL=MS Access;" > >>> End If > >>> .OpenDataSource _ > >>> Name:="E:\Cytologie\positieven\BeveiligdPOSITIEVEN(A2K).mdb", _ > >>> ReadOnly:=True, LinkToSource:=True, _ > >>> Connection:=strConnect, _ > >>> SQLStatement:="SELECT * FROM [Uitvoer], [Aanvrager] WHERE > >>> > >>> > >Uitvoer.AanvragerID = Aanvrager.AanvragerID AND Uitvoer.ControleID = " & > >Forms![Brief]![veld] & ";" > > > > > >>> With Fields > >>> ............... > >>> End With > >>> > >>> With WordApp.Selection > >>> ............... > >>> End With > >>> > >>> > >>> With WordDoc.MailMerge > >>> .DataSource.FirstRecord = 1 > >>> > >>> .Destination = wdSendToNewDocument > >>> > >>> .Execute > >>> > >>> If PrintDoc Then > >>> .Application.Options.PrintBackground = False > >>> .Application.ActiveDocument.PrintOut > >>> End If > >>> End With > >>> > >>> WordApp.Visible = True > >>> End With > >>>End Sub > >>> > >>> > >>> > >>> > >>> > >>> > >>-- > >>Marty Connelly > >>Victoria, B.C. > >>Canada > >> > >> > >> > >>_______________________________________________ > >>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 > > > > > > > > -- > Marty Connelly > Victoria, B.C. > Canada > > > > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com From pedro at plex.nl Wed Jan 21 10:14:24 2004 From: pedro at plex.nl (pedro at plex.nl) Date: Wed, 21 Jan 2004 10:14:24 (MET) Subject: [AccessD] error after converting (mailmerge), please help! Message-ID: <200401210914.i0L9EONA015318@mailhostC.plex.net> Hello Marty nad others, i made a new workgroup account in A2K with the exact information that i used in A97. Also i made the same users, P-Id's and passwords. When changing the strConnect i get an error on the: MySystem.mdw", _ "myUsername"", "myPassword" the error selects the: , and says: expected. end of statement. I can't get the syntax in a way that it works with myUsername and myPassword. When i leave them, the same error occurs like before: Run-time error '5922' Word was unable to open the data source. When setting the Name parameter to blank: ..OpenDataSource Name:=" ",_ I also get an error: Run-time error '4198' Command Failed. Anybody any ideas, please help. Otherwise i have to make a whole new mail merge in another way, and thta costs a lot of time. TIA Pedro Janssen In antwoord op: > From: MartyConnelly > To: Access Developers discussion and problem solving > Date: Tue, 20 Jan 2004 21:13:29 -0800 > Subject: Re: [AccessD] error after converting (mailmerge) > > > Using everything with A2K format saves doing a Unicode to Ansi > conversion from 97. > > A couple of other things to try > If it's Word 2000 or 97, try just setting the Name parameter to blank, i.e. > > ..OpenDataSource Name:="", _ > > etc. Word does not like it if you specify a name and a connection string > for ODBC calls. > If it's Word 2002 you will also need to add > Subtype:=wdMergeSubTypeWord2000 > > Also have a look at these examples > Super Easy Word Merge. > http://www.attcanada.net/~kallal.msn/msaccess/msaccess.html > or this Cindy Meister's MVP site > http://homepage.swissonline.ch/cindymeister/MergFram.htm > > > Pedro Janssen wrote: > > >Thanks Marty for your response. I will try this when i am at work. > > > >I didn't convert the mdw file to A2k, but i could open the converted > >database with this mdw. > >How is this possible? > > > >Pedro Janssen > > > > > > > >----- Original Message ----- > >From: "MartyConnelly" > >To: "Access Developers discussion and problem solving" > > > >Sent: Thursday, January 15, 2004 12:13 AM > >Subject: Re: [AccessD] error after converting (mailmerge) > > > > > > > > > >>How about trying > >>strConnect = "Provider=Microsoft.Jet.OLEDB.4.0;" & _ > >> "Data Source=c:\somepath\mydb.mdb;" & _ > >> "Jet OLEDB:System Database=MySystem.mdw", _ > >> "myUsername", "myPassword" > >>Note, remember to convert both the MDB and the MDW to the 4.0 > >>database format when using the 4.0 OLE DB Provider. Make a new copy of > >>97 mdw to handle 2000. > >> > >> > >>pedro at plex.nl wrote: > >> > >> > >> > >>>Hello Group, > >>> > >>>i converted a A97 secured database to A2K. > >>>After making the changes in Wrkgadmin.exe and the ODBC Data Sources, i > >>> > >>> > >changed the names in the module. After running the mailmerge i get an error: > >Run-time error '5922' Word was unable to open the data source. The debug > >selects the .OpenDataSource from the code below. > > > > > >>>I figure out why this error occurs. > >>> > >>>TIA > >>> > >>>Pedro Janssen > >>> > >>> > >>> > >>> > >>>Sub CreateMergeDoc(UseDDE As Boolean, PrintDoc As Boolean) > >>> > >>> Dim WordDoc As Word.Document > >>> Dim strLetter As String > >>> Dim strConnect As String > >>> Dim WordApp As Word.Application > >>> > >>> Set WordApp = CreateObject("Word.Application") > >>> > >>> Set WordDoc = WordApp.Documents.Add > >>> With WordDoc.MailMerge > >>> If UseDDE Then > >>> strConnect = "QUERY Uitvoer" > >>> Else > >>> strConnect = "DSN=MS Access 2000 " _ > >>> & "Database;DBQ=E:\Cytologie\positieven\" _ > >>> & "BeveiligdPOSITIEVEN(A2K).mdb;" _ > >>> & "FIL=MS Access;" > >>> End If > >>> .OpenDataSource _ > >>> Name:="E:\Cytologie\positieven\BeveiligdPOSITIEVEN(A2K).mdb", _ > >>> ReadOnly:=True, LinkToSource:=True, _ > >>> Connection:=strConnect, _ > >>> SQLStatement:="SELECT * FROM [Uitvoer], [Aanvrager] WHERE > >>> > >>> > >Uitvoer.AanvragerID = Aanvrager.AanvragerID AND Uitvoer.ControleID = " & > >Forms![Brief]![veld] & ";" > > > > > >>> With Fields > >>> ............... > >>> End With > >>> > >>> With WordApp.Selection > >>> ............... > >>> End With > >>> > >>> > >>> With WordDoc.MailMerge > >>> .DataSource.FirstRecord = 1 > >>> > >>> .Destination = wdSendToNewDocument > >>> > >>> .Execute > >>> > >>> If PrintDoc Then > >>> .Application.Options.PrintBackground = False > >>> .Application.ActiveDocument.PrintOut > >>> End If > >>> End With > >>> > >>> WordApp.Visible = True > >>> End With > >>>End Sub > >>> > >>> > >>> > >>> > >>> > >>> > >>-- > >>Marty Connelly > >>Victoria, B.C. > >>Canada > >> > >> > >> > >>_______________________________________________ > >>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 > > > > > > > > -- > Marty Connelly > Victoria, B.C. > Canada > > > > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com From andy at minstersystems.co.uk Wed Jan 21 09:08:19 2004 From: andy at minstersystems.co.uk (Andy Lacey) Date: Wed, 21 Jan 2004 15:08:19 -0000 Subject: [AccessD] Major Performance Issue! In-Reply-To: <20040121084024.27016.qmail@web60210.mail.yahoo.com> Message-ID: <02fd01c3e030$67dfd440$b274d0d5@minster33c3r25> Sander Rather than attaching the code try pasting it into the email. Shouldn't be a size issue then, unless, of course, there's miles of it! I don't know about anyone else but I certainly would get a clearer picture of what you're doing by seeing the code. Can't really get a handle on it yet. Andy Lacey http://www.minstersystems.co.uk > -----Original Message----- > From: accessd-bounces at databaseadvisors.com > [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Sad Der > Sent: 21 January 2004 08:40 > To: Acces User Group > Subject: [AccessD] Major Performance Issue! > > > Hi group, > > I've got a MAJOR performance issue. I need to display > a lot of data. A performance test showed that it takes > between 120 - 160 seconds (2 minutes - 2.40 minutes) > to display the data! I have no idea how to speed > things up dramaticly. I really could use some tips. > > Here's a description of the current environment: > Access 2000 Client (size: 20 Mb) > Access 2000 Back-end (size: 100 Mb) > approx 4 users > Novel network > > Functionality: > I need to display 4 listbox' with data. > > Every listbox has the same table as source. > Every listbox has a query as RowSource > Every listbox has this layout: > > Proces Type | Date | # Records > > Listbox 1 displays 4 records > Listbox 2 displays 2 records > Listbox 3 displays 6 records > Listbox 4 displays 3 records > > So the table (tblMultiInterface) has 15 records in > total. > > Table tblMultiInterface > Fields: > Proces Type Text > Date Text (!) > Records Text (!) (zero records need to display > N/A) > > I added the code as an attachment but unfortunatly > this mail was blocked! If anybody would like to take a > look at the code I can send it to you directly. > > Comments/tips/etc would be GREATLY appriciated! > > TIA > Sad > > > __________________________________ > Do you Yahoo!? > Yahoo! Hotjobs: Enter the "Signing Bonus" Sweepstakes > http://hotjobs.sweepstakes.yahoo.com/signingbo> nus > > _______________________________________________ > AccessD > mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/a> ccessd > Website: > http://www.databaseadvisors.com > > From lists at theopg.com Wed Jan 21 09:38:40 2004 From: lists at theopg.com (MarkH) Date: Wed, 21 Jan 2004 15:38:40 -0000 Subject: [AccessD] Instantiate Forms as Objects In-Reply-To: Message-ID: <001101c3e034$a4faffe0$330d6bd5@netboxxp> I have some code which works ok. It's a bit tricky as there are limits on how many connections etc. you can have which restricts the number of screens you can open. Also you have to be careful how you refer to the form as its name is no longer reliable when multiple instances are open. I used the hwnd value. If you want I can send some code but it will take a while as my main box is completely dead - maybe a psu failure, maybe mobo... Will be fixing that first I hope... Mark -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Charlotte Foust Sent: 20 January 2004 21:02 To: Access Developers discussion and problem solving Subject: RE: [AccessD] Instantiate Forms as Objects I don't generally do it at all, so I would have to dig back into my archives to see how I did it last time. I seem to recall using a collection and a custom class, but I haven't done it in several years, so my memory is dusty. Charlotte Foust -----Original Message----- From: Ken Ismert [mailto:KIsmert at TexasSystems.com] Sent: Tuesday, January 20, 2004 11:49 AM To: 'Access Developers discussion and problem solving' Subject: RE: [AccessD] Instantiate Forms as Objects So, how do you get muliple instances of the same form open without using the "Set rFrm = New Form_YourForm" syntax? -Ken -----Original Message----- From: Charlotte Foust [mailto:cfoust at infostatsystems.com] Sent: Tuesday, January 20, 2004 10:42 AM To: Access Developers discussion and problem solving Subject: RE: [AccessD] Instantiate Forms as Objects Maybe JC knows differently, but as far as I know, you can't do it that way, which is one of the reasons I don't use that syntax. Charlotte Foust _______________________________________________ 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 From weeden1949 at hotmail.com Wed Jan 21 09:45:10 2004 From: weeden1949 at hotmail.com (Greg Smith) Date: Wed, 21 Jan 2004 09:45:10 -0600 Subject: [AccessD] Strange Table Behavior... References: <003201c3df8c$6493d010$210110ac@SUSANONE> Message-ID: Thanks Susan and John C for your feedback. I tried Susan's suggestion to update the table using *SD* as the criteria and replace it with SD, but, alas, no luck there. I even deleted all the SD's from the table, then reloaded them (using a query of course...), but no luck there either. Well, I guess I had "luck", just bad luck... So this time I repeated what I did last week to get rid of it: using a make-table query, I created a whole new table from this one. Set the tables up the same (key fields, etc...), broke the relationships to the old one, deleted it, renamed the 'new' one to the original, rebuilt the relationships, and ... voila...it didn't work either. FINE. So, being a CobbleMeister, I put code in the FE to check for the SD search and automatically make it SD*. It works, but I don't like it. I personally hate making the code try to match data quirks. However, I now do NOT have the county Recorder buggin' me about it. There still has to be an explanation as to why this occurs occasionally, but I can't spend a bunch of time trying to figure it out...particularly if I have a work-around that makes the client happy. The client may be happy but the programmer is bug-eyed trying to figure it out. And on top of everything, I found out yesterday they (the County people) are serious about converting this app, from Access 97, to Access 2003 with SQL. This 'fun' may never end... Greg ----- Original Message ----- From: "Susan Harkins" To: "Access Developers discussion and problem solving" Sent: Tuesday, January 20, 2004 1:34 PM Subject: Re: [AccessD] Strange Table Behavior... This is really over simplistic, but have you tried just deleting SD in the lookup table and re-entering it? You might also run an update on your many table -- *SD* = "SD" I've seen phantom characters work their way in before. The only way to get rid of them is to just delete them and re-enter the data. You're lucky, since you know the field it's in and even if it's in the many data, an update query should take care of it. If it's a phantom character, you won't find it. On the other hand, do any of your operators/users have access to action queries? Almost sounds like someone accidentially changed the SD string in your many table. Have you tried entering a dummy SD record to see if the old method can find it? Just curious. How are you entering that "SD" string? Might check there too. Susan H. From lists at theopg.com Wed Jan 21 10:17:42 2004 From: lists at theopg.com (MarkH) Date: Wed, 21 Jan 2004 16:17:42 -0000 Subject: [AccessD] Instantiate Forms as Objects In-Reply-To: Message-ID: <001201c3e03a$1ed81af0$330d6bd5@netboxxp> Here you go, it's a bit rough as its from a project that's been shelved for a while so it never really got finished... Have fun Mark Option Compare Database Option Explicit ' ' DESCRIPTION: ' Opens a form as a form variable allowing more than one instance of a form ' to be opened ata time. ' ' COMMENTS: ' When working with multiple instances of forms, avoid using criteria in sub ' forms which references prooperties in the parent form (such as using a ref- ' erence to the parent forms key in the subforms datasource). ' ' The form variables name is always that of the form itself so when referring ' to the form in code avoid using the form name (e.g. me.name) ' '----------------------------------------------------------------------- ------- Global frmInst(1 To 12) As Form 'there is a bug with Jet so sometimes only about 18 new instances can be opened. 'This bug relates to max number of open databases / tables and has been apparently 'sorted out in later releases of Jet. See error handler.... ' '---------------------------------------------------------- Function closeInstAll() 'closes all open notes, topics and categories Dim i As Integer For i = 1 To UBound(frmInst) Set frmInst(i) = Nothing Next End Function Function minimizeInstAll() 'minimizes all open notes, topics and categories On Error Resume Next Echo False Dim i As Integer For i = 1 To UBound(frmInst) frmInst(i).SetFocus DoCmd.Minimize Next Forms("frm_treeMenu").SetFocus DoCmd.Restore Echo True End Function Function controlInst(c As String) On Error Resume Next Dim i As Integer Dim X As Integer Dim hw As Long Dim hwX As Variant Dim frm As Form For i = 0 To Forms("frm_TreeMenu").formsList.ListCount If Forms("frm_TreeMenu").formsList.Selected(i) = True Then hw = Forms("frm_TreeMenu").formsList.ItemData(i) For X = 1 To UBound(frmInst) hwX = frmInst(X).hwnd If hwX = hw Then frmInst(X).SetFocus 'fires a form activate event Select Case c Case "R" 'Restore DoCmd.Restore Case "M" 'Minimize DoCmd.Minimize Case "C" 'Close Set frmInst(X) = Nothing End Select End If Next End If Next End Function Function minimizeInst() 'minimizes the first selected instance of a form in the open forms list 'On Error Resume Next controlInst "M" End Function Function restoreInst() 'restores the first selected instance of a form in the open forms list 'On Error Resume Next controlInst "R" End Function Function closeInst() 'Closes selected items on the open forms list 'On Error Resume Next controlInst "C" End Function Function getNextFormVar() As Integer 'returns a reference to the next free form variable On Error GoTo errbit Dim i As Integer Dim X As Long For i = 1 To UBound(frmInst) X = frmInst(i).hwnd tryAgain: Next wayout: getNextFormVar = 0 Exit Function errbit: If Err.Number = 91 Or Err.Number = 2467 Then getNextFormVar = i Else Resume tryAgain End If End Function '======================================================================= ====================== 'Opens new instance of form f using one of the "frm*" globals. ' f = form name ' wc = where clause ' p = parent nodes index Sub openInstance(F As String, wc As String, ni As Integer, addMode As Boolean, Optional parentKey As Integer = 0) On Error GoTo errbit Dim nextFormVar As Integer Dim frm As Form Dim strCap As String Dim ctrl As Control If Not IsLoaded("frm_TreeMenu") Then DoCmd.OpenForm ("frm_TreeMenu") End If If addMode Then strCap = StrConv(Mid(F, 5), vbProperCase) & ": (New Record)" Else strCap = StrConv(Mid(F, 5), vbProperCase) & ": " End If 'check if the record is already open... if so then simply set focus to that record. For Each frm In Forms If frm.name = F Then If frm.Filter = wc Then frm.SetFocus Exit Sub End If End If Next nextFormVar = getNextFormVar noMoreForms: If nextFormVar = 0 Then MsgBox "The system has run out of free form variables. Please close" & Chr(13) & "any unused forms and try again.", vbCritical, "Error" Exit Sub End If Select Case F Case "frm_Category" 'form open event fired next subform then main then main activate then main current Set frmInst(nextFormVar) = New Form_frm_Category Case "frm_Topic" Set frmInst(nextFormVar) = New Form_frm_Topic Case "frm_Note" Set frmInst(nextFormVar) = New Form_frm_note End Select With frmInst(nextFormVar) If addMode Then .AllowAdditions = True .DataEntry = True .Caption = strCap .newRcd = True If parentKey > 0 Then .parentKey = parentKey End If Else .Filter = wc 'next line fires a form current in the subform then main activate and main current .FilterOn = True End If .nodeIndex = ni 'next line triggers activate .SetFocus .formStart For Each ctrl In .Controls If ctrl.Tag = "X" Then ctrl.Visible = True End If Next End With frmInst(nextFormVar).SetFocus DoCmd.Restore listForms wayout: strCap = "" nextFormVar = 0 Exit Sub errbit: DoCmd.Echo True If Err.Number = 2956 Or Err.Number = 3048 Or Err.Number = 2950 Then nextFormVar = 0 Resume noMoreForms Else MsgBox Err.Description Resume wayout End If errLog "multiInstance", Err.Number, Err.Description End Sub From lists at theopg.com Wed Jan 21 10:28:49 2004 From: lists at theopg.com (MarkH) Date: Wed, 21 Jan 2004 16:28:49 -0000 Subject: [AccessD] Instantiate Forms as Objects In-Reply-To: <46B976F2B698FF46A4FE7636509B22DF03D135@stekelbes.ithelps.local> Message-ID: <001301c3e03b$ae87e620$330d6bd5@netboxxp> Oooops... Should have read your post properly. Didn't realise you wanted to pass a form name as a string, sorry.... Good luck mark -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Erwin Craps - IT Helps Sent: 20 January 2004 20:30 To: Access Developers discussion and problem solving Subject: RE: [AccessD] Instantiate Forms as Objects Not at my knowledge neither. But there is a big advantage why that is so. When renaming forms or deleting or absence of (in case of importing routines that are dependant of a form) you would get an compile error straight away. When using syntax like "form_" & strFormName you would only get an error when you run the routine. I find this a very good thing.... Erwin -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Charlotte Foust Sent: Tuesday, January 20, 2004 5:42 PM To: Access Developers discussion and problem solving Subject: RE: [AccessD] Instantiate Forms as Objects Maybe JC knows differently, but as far as I know, you can't do it that way, which is one of the reasons I don't use that syntax. Charlotte Foust -----Original Message----- From: Ken Ismert [mailto:KIsmert at TexasSystems.com] Sent: Tuesday, January 20, 2004 8:33 AM To: 'Access Developers discussion and problem solving' Subject: [AccessD] Instantiate Forms as Objects Hello Group: As you know, you can instantiate an Access form, just like any other object, by using its class name: Dim rFrm as Access.Form Set rFrm = New Form_YourForm ' form 'YourForm' This syntax allows you to create multiple open instances of a form, a necessity for my framework. However, I've run into a problem. What I need is a simple, one-line way to instantiate a form object using a string: sFormName = "YourForm" Set rFrm = MFOS("Form_" & sFormName) ' MFOS = "Magic Function or Syntax" Note: Because of the multiple instance requirement, DoCmd.OpenForm won't work. It can only make one instance of a form. I can't find a CreateObject syntax that works. In my current function, I use a big Case statement matching the form name to it's class. This has become a pain, because every time I add or remove forms, I have to edit the function. Have any of you found a way to do that? -Ken _______________________________________________ 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 _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From Erwin.Craps at ithelps.be Wed Jan 21 10:34:14 2004 From: Erwin.Craps at ithelps.be (Erwin Craps - IT Helps) Date: Wed, 21 Jan 2004 17:34:14 +0100 Subject: [AccessD] OT: empty object frames in word. Message-ID: <46B976F2B698FF46A4FE7636509B22DF03D142@stekelbes.ithelps.local> Hi A while ago someone reported this issue in word that all object frames are empty (but when printed are ok). They can not be resize or whatever and when clicking on it the computer beeps. This is probably a bug, because I did'nt had this problem before in Office 2003 until I did one or another office/windows update. Did anyone succeeded to solve this? Erwin Craps Zaakvoerder www.ithelps.be/jonathan This E-mail is confidential, may be legally privileged, and is for the intended recipient only. Access, disclosure, copying, distribution, or reliance on any of it by anyone else is prohibited and may be a criminal offence. Please delete if obtained in error and E-mail confirmation to the sender. IT Helps - I.T. Help Center *** Box Office Belgium & Luxembourg www.ithelps.be * www.boxoffice.be * www.stadleuven.be IT Helps bvba* ** Mercatorpad 3 ** 3000 Leuven IT Helps * Phone: +32 16 296 404 * Fax: +32 16 296 405 E-mail: Info at ithelps.be Box Office ** Fax: +32 16 296 406 ** Box Office E-mail: Staff at boxoffice.be From cfoust at infostatsystems.com Wed Jan 21 10:34:25 2004 From: cfoust at infostatsystems.com (Charlotte Foust) Date: Wed, 21 Jan 2004 08:34:25 -0800 Subject: [AccessD] Instantiate Forms as Objects Message-ID: Ken, One of the problems with the "Set rFrm = New Form_Whatever" syntax is that Form_Whatever isn't really the form object, it's the class module. You can instantiate a module object in code using Set mdl = Modules("Form_Whatever"), but that doesn't get you where you want to go, and the module has to be open for that to work, just as a form has to be open to use the Set frm = Forms("Whatever"). There is obviously some stuff going on under the hood that MS hasn't made apparent, some automagic manipulations in the Set frm = New Form_Whatever expression. I'm still trying to find an old example of the approach I used. Charlotte -----Original Message----- From: Ken Ismert [mailto:KIsmert at TexasSystems.com] Sent: Tuesday, January 20, 2004 11:49 AM To: 'Access Developers discussion and problem solving' Subject: RE: [AccessD] Instantiate Forms as Objects So, how do you get muliple instances of the same form open without using the "Set rFrm = New Form_YourForm" syntax? -Ken -----Original Message----- From: Charlotte Foust [mailto:cfoust at infostatsystems.com] Sent: Tuesday, January 20, 2004 10:42 AM To: Access Developers discussion and problem solving Subject: RE: [AccessD] Instantiate Forms as Objects Maybe JC knows differently, but as far as I know, you can't do it that way, which is one of the reasons I don't use that syntax. Charlotte Foust _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From Oleg_123 at xuppa.com Wed Jan 21 10:34:30 2004 From: Oleg_123 at xuppa.com (Oleg_123 at xuppa.com) Date: Wed, 21 Jan 2004 11:34:30 -0500 (EST) Subject: [AccessD] Break Name In-Reply-To: <001301c3e03b$ae87e620$330d6bd5@netboxxp> References: <46B976F2B698FF46A4FE7636509B22DF03D135@stekelbes.ithelps.local> <001301c3e03b$ae87e620$330d6bd5@netboxxp> Message-ID: <22322.12.3.132.98.1074702870.squirrel@heck.bay9.com> Hey Group I did a finction that separates names into first and last,and makes propercase - ex. Name: "MCDONALD, REYNA" becomes FirstName: "Reyna" LastName "McDonald" How can Insert the 2 new fields into the same table ? I tried Update... Public Function BreakName() 'Separate The Name field to Firs and LastName and ProperCase it 'Uses MDL-Proper Module MsgBox ("hey") Dim db As DAO.Database Dim rs As DAO.Recordset Set db = CurrentDb Dim strLine As String Dim strSQL1 As String Dim strSQL2 As String Dim FName As String Dim LName As String Dim a As Integer strSQL1 = "Select * From [emp table1]" Set rs = db.OpenRecordset(strSQL1) Do Until rs.EOF strLine = rs("Employee Name") ' strLine = Proper(strLine) a = InStr(strLine, ",") FName = Mid(strLine, a + 2) LName = Left(strLine, a - 1) 'rs(0) = strLine strSQL2 = "Update [Emp Table1] Set (LastName, FirstName) = Values(" & "'" & FindAndReplace(CStr(LName), Chr(39), Chr(39) + Chr(39)) & "','" & FindAndReplace(CStr(FName), Chr(39), Chr(39) + Chr(39)) & "')" Debug.Print strSQL2 CurrentDb.Execute (strSQL2) rs.MoveNext Loop MsgBox ("end") End Function ----------------------------------------- Get Breaking News from CNN, ABC, NBC, CBS Now. http://www.xuppa.com/news/?link=webmail From cfoust at infostatsystems.com Wed Jan 21 10:36:34 2004 From: cfoust at infostatsystems.com (Charlotte Foust) Date: Wed, 21 Jan 2004 08:36:34 -0800 Subject: [AccessD] MDB to sql server Message-ID: That has been my experience as well. And do the upsize from the data file, not the FE. Charlotte Foust -----Original Message----- From: Haslett, Andrew [mailto:andrew.haslett at ilc.gov.au] Sent: Tuesday, January 20, 2004 6:41 PM To: 'Access Developers discussion and problem solving' Subject: RE: [AccessD] MDB to sql server I've found its better in this case to use the upsizing wizard from within Access 2k, as it seems to handle the native data types of Access better than importing from DTS. Make sure you have the Access patch installed first (can't remember what its called but its available at Office Update - something like a 'readiness update' or the like). Still check your primary key and identity fields in SQL afterwards as I can't recall if there were any other issues.. There may well have been a couple of options you needed to change during the export process to retain all constraints. Cheers, Andrew -----Original Message----- From: John W. Colby [mailto:jwcolby at colbyconsulting.com] Sent: Wednesday, 21 January 2004 12:14 PM To: AccessD Subject: [AccessD] MDB to sql server My client DIS has finally ordered a new server for their database, a shiny new Dell dual P4 2.4g with 1gb ram etc., Windows 2K Server OS and SQL Server 2K. Given that the MDB was running on an old PIII 400 mhz NT running all the email and everything else the company owned, just the new server hardware should provide a decent boost in performance. However they also want to move to SQL Server. I have a server machine here at the office running Win2K Pro and SQL Server 2K. My intention is to do the data port from MDB to SQL Server at my office in advance, figuring out how to do it and discovering all the pitfalls before hand. The database consists of approximately 90 tables, of which ~30 are lookup tables, ~30 are main tables / child tables, and a handful of many-many. This MDB is heavily normalized with relationships established, no cascade delete. I use Autonumber PKs exclusively. I tried to do the import from inside SQL Server using DTS(?) but ended up with 17 tables not imported, and the structure but not the data for several main tables. What is the best method to use for getting the database moved into SQL Server, preferable maintaining the incrementing autonumber methodology as well as the relationships, with referential integrity enforced, no cascade deletes? I went through this exercise a couple of years ago with a similar size database, and managed, in the end to get it imported and functioning. John W. Colby www.ColbyConsulting.com _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com IMPORTANT - PLEASE READ ******************** This email and any files transmitted with it are confidential and may contain information protected by law from disclosure. If you have received this message in error, please notify the sender immediately and delete this email from your system. No warranty is given that this email or files, if attached to this email, are free from computer viruses or other defects. They are provided on the basis the user assumes all responsibility for loss, damage or consequence resulting directly or indirectly from their use, whether caused by the negligence of the sender or not. _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From gustav at cactus.dk Wed Jan 21 11:22:08 2004 From: gustav at cactus.dk (Gustav Brock) Date: Wed, 21 Jan 2004 18:22:08 +0100 Subject: [AccessD] vbNull = 1 Message-ID: <16337315767.20040121182208@cactus.dk> Hi all Why does the VB constant vbNull equal 1 and not 0 (zero)? /gustav From Mark.Mitsules at ngc.com Wed Jan 21 11:44:30 2004 From: Mark.Mitsules at ngc.com (Mitsules, Mark S. (Newport News)) Date: Wed, 21 Jan 2004 12:44:30 -0500 Subject: [AccessD] vbNull = 1 Message-ID: Gustav, There is a very short discussion of "When is Nothing something?" here: http://www.vbdesign.net/expresso/archive/topic/3244.html Mark =================== When is Nothing something? One of the most important elements of VBA, as a language, is its ability to detect nothing! There are many different nothings, and some of them are something, and as a rule they are not interchangeable. Lets take a look at assigning and checking nothing... ************* vbEmpty: Determines if a variable has been initialized - If varVariable = vbEmpty Then You should not use vbEmpty to make your variable nothing, because it makes it something! The value you are assigning is 0 (or if it is a string variable, "0") and the IsEmpty test will fail! ************ vbNull This one is great for testing for Null in a variable (database users take note) using VarType: If VarType (varVariable) = vbNull Then again, don't use this constant to try to assign a Null value, because its not nothing.. True value of vbNull is 1 (in a string variable "1") ************ vbNullChar Test for, or assign, a NullChar What is a Null char? The same thing as Chr(0). This one is great for working with the API when you need to pass a string that ends with a Null character, just add the constant onto the end of the string you are going to pass.. strVariable = strVariable & vbNullChar ************ vbNullString Test for, or assign, a null string I use this one all of the time for the API. It is the same thing as this: strVariable = "" You can see it in much of the code when I am looking for the Hwnd of a window using FindWindow lngHwnd = FindWindow(vbNullstring, Me.Caption) *********** Nothing For objects only - determines if the variable has a valid object reference or used to destroy the current object reference If objVariable Is Not Nothing Then objVariable = Nothing End If ********** Null Saved this one for last because it can confuse your code. Null assigns a Null value to your variant type variable, and you can use it to test for a Null value using IsNull, but because Null = false, a test like this varVariable = Null If varVariable = Null Then MsgBox "Its Null" End If will never show the message! Instead use this: If IsNull(varVariable) Then MsgBox "Its Null" End If and as a final not about nothing, don't try to use the Null keyword on strongly typed variables, if you do you will get the error "Invalid use of Null" -----Original Message----- From: Gustav Brock [mailto:gustav at cactus.dk] Sent: Wednesday, January 21, 2004 12:22 PM To: Access Developers discussion and problem solving Subject: [AccessD] vbNull = 1 Hi all Why does the VB constant vbNull equal 1 and not 0 (zero)? /gustav _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From jwcolby at colbyconsulting.com Wed Jan 21 11:47:57 2004 From: jwcolby at colbyconsulting.com (John W. Colby) Date: Wed, 21 Jan 2004 12:47:57 -0500 Subject: [AccessD] Instantiate Forms as Objects In-Reply-To: Message-ID: Charlotte, That's true but the form still opens, all the events fire etc. So yes, you are getting a pointer to the form class but doing so opens the form and returns a handle to the form. John W. Colby www.ColbyConsulting.com -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Charlotte Foust Sent: Wednesday, January 21, 2004 11:34 AM To: Access Developers discussion and problem solving Subject: RE: [AccessD] Instantiate Forms as Objects Ken, One of the problems with the "Set rFrm = New Form_Whatever" syntax is that Form_Whatever isn't really the form object, it's the class module. You can instantiate a module object in code using Set mdl = Modules("Form_Whatever"), but that doesn't get you where you want to go, and the module has to be open for that to work, just as a form has to be open to use the Set frm = Forms("Whatever"). There is obviously some stuff going on under the hood that MS hasn't made apparent, some automagic manipulations in the Set frm = New Form_Whatever expression. I'm still trying to find an old example of the approach I used. Charlotte -----Original Message----- From: Ken Ismert [mailto:KIsmert at TexasSystems.com] Sent: Tuesday, January 20, 2004 11:49 AM To: 'Access Developers discussion and problem solving' Subject: RE: [AccessD] Instantiate Forms as Objects So, how do you get muliple instances of the same form open without using the "Set rFrm = New Form_YourForm" syntax? -Ken -----Original Message----- From: Charlotte Foust [mailto:cfoust at infostatsystems.com] Sent: Tuesday, January 20, 2004 10:42 AM To: Access Developers discussion and problem solving Subject: RE: [AccessD] Instantiate Forms as Objects Maybe JC knows differently, but as far as I know, you can't do it that way, which is one of the reasons I don't use that syntax. Charlotte Foust _______________________________________________ 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 From cfoust at infostatsystems.com Wed Jan 21 11:50:35 2004 From: cfoust at infostatsystems.com (Charlotte Foust) Date: Wed, 21 Jan 2004 09:50:35 -0800 Subject: [AccessD] vbNull = 1 Message-ID: Because vbEmpty is equal to zero. Charlotte Foust -----Original Message----- From: Gustav Brock [mailto:gustav at cactus.dk] Sent: Wednesday, January 21, 2004 9:22 AM To: Access Developers discussion and problem solving Subject: [AccessD] vbNull = 1 Hi all Why does the VB constant vbNull equal 1 and not 0 (zero)? /gustav _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From andy at minstersystems.co.uk Wed Jan 21 11:53:46 2004 From: andy at minstersystems.co.uk (Andy Lacey) Date: Wed, 21 Jan 2004 17:53:46 -0000 Subject: [AccessD] Break Name In-Reply-To: <22322.12.3.132.98.1074702870.squirrel@heck.bay9.com> Message-ID: <031f01c3e047$847732d0$b274d0d5@minster33c3r25> Oleg, just do it your DAO loop, so With rs Do Until .EOF strLine = ![Employee Name] strLine = Proper(strLine) a = InStr(strLine, ",") FName = Mid(strLine, a + 2) LName = Left(strLine, a - 1) .Edit !Lastname=Lname !FirstName=Fname .Update .MoveNext Loop End With Andy Lacey http://www.minstersystems.co.uk > -----Original Message----- > From: accessd-bounces at databaseadvisors.com > [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of > Oleg_123 at xuppa.com > Sent: 21 January 2004 16:35 > To: accessd at databaseadvisors.com > Subject: [AccessD] Break Name > > > Hey Group > I did a finction that separates names into first and last,and > makes propercase - ex. Name: "MCDONALD, REYNA" becomes > FirstName: "Reyna" LastName "McDonald" How can Insert the 2 > new fields into the same table ? I tried Update... > > > > Public Function BreakName() > > > 'Separate The Name field to Firs and LastName and ProperCase > it 'Uses MDL-Proper Module > > > MsgBox ("hey") > Dim db As DAO.Database > Dim rs As DAO.Recordset > Set db = CurrentDb > > Dim strLine As String > Dim strSQL1 As String > Dim strSQL2 As String > Dim FName As String > Dim LName As String > Dim a As Integer > > > strSQL1 = "Select * From [emp table1]" > Set rs = db.OpenRecordset(strSQL1) > > > Do Until rs.EOF > strLine = rs("Employee Name") > ' > strLine = Proper(strLine) > a = InStr(strLine, ",") > FName = Mid(strLine, a + 2) > LName = Left(strLine, a - 1) > > 'rs(0) = strLine > > > strSQL2 = "Update [Emp Table1] Set (LastName, FirstName) = > Values(" & "'" & FindAndReplace(CStr(LName), Chr(39), Chr(39) > + Chr(39)) & "','" & FindAndReplace(CStr(FName), Chr(39), > Chr(39) + Chr(39)) & "')" Debug.Print strSQL2 > > CurrentDb.Execute (strSQL2) > rs.MoveNext > Loop > > MsgBox ("end") > > End Function > > > > ----------------------------------------- > Get Breaking News from CNN, ABC, NBC, CBS Now. > http://www.xuppa.com/news/?link=webmail > > > > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/a> ccessd > Website: > http://www.databaseadvisors.com > > From Oleg_123 at xuppa.com Wed Jan 21 11:56:48 2004 From: Oleg_123 at xuppa.com (Oleg_123 at xuppa.com) Date: Wed, 21 Jan 2004 12:56:48 -0500 (EST) Subject: [AccessD] vbNull = 1 In-Reply-To: References: Message-ID: <22539.12.3.132.98.1074707808.squirrel@heck.bay9.com> whats the difference between Empty and Null ? > Because vbEmpty is equal to zero. > > Charlotte Foust > > -----Original Message----- > From: Gustav Brock [mailto:gustav at cactus.dk] > Sent: Wednesday, January 21, 2004 9:22 AM > To: Access Developers discussion and problem solving > Subject: [AccessD] vbNull = 1 > > > Hi all > > Why does the VB constant vbNull equal 1 and not 0 (zero)? > > /gustav > > _______________________________________________ > 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 ----------------------------------------- Get Breaking News from CNN, ABC, NBC, CBS Now. http://www.xuppa.com/news/?link=webmail From gustav at cactus.dk Wed Jan 21 12:00:42 2004 From: gustav at cactus.dk (Gustav Brock) Date: Wed, 21 Jan 2004 19:00:42 +0100 Subject: [AccessD] vbNull = 1 In-Reply-To: References: Message-ID: <15839630195.20040121190042@cactus.dk> Hi Mark and Charlotte Thanks! I had forgotten vbNull is related to VarType() ... that explains. Then I guess this guy is slightly off track abusing our constants but he managed to confuse me: http://www.imt.net/~joe/matt/program/vb/HOWTOs/ShellExecuteAPI/ /gustav > Gustav, > There is a very short discussion of "When is Nothing something?" here: > http://www.vbdesign.net/expresso/archive/topic/3244.html > Mark > vbNull > This one is great for testing for Null in a variable (database users take > note) using VarType: > If VarType (varVariable) = vbNull Then > again, don't use this constant to try to assign a Null value, because its > not nothing.. > True value of vbNull is 1 (in a string variable "1") > ************ > Why does the VB constant vbNull equal 1 and not 0 (zero)? From Oleg_123 at xuppa.com Wed Jan 21 12:08:33 2004 From: Oleg_123 at xuppa.com (Oleg_123 at xuppa.com) Date: Wed, 21 Jan 2004 13:08:33 -0500 (EST) Subject: [AccessD] Break Name In-Reply-To: <031f01c3e047$847732d0$b274d0d5@minster33c3r25> References: <22322.12.3.132.98.1074702870.squirrel@heck.bay9.com> <031f01c3e047$847732d0$b274d0d5@minster33c3r25> Message-ID: <22471.12.3.132.98.1074708513.squirrel@heck.bay9.com> Andy ! - you are a genius. (well I knew that for a while now) :)) thanks > Oleg, just do it your DAO loop, so > > With rs > Do Until .EOF > strLine = ![Employee Name] > strLine = Proper(strLine) > > a = InStr(strLine, ",") > FName = Mid(strLine, a + 2) > LName = Left(strLine, a - 1) > .Edit > !Lastname=Lname > !FirstName=Fname > .Update > .MoveNext > Loop > End With > > Andy Lacey > http://www.minstersystems.co.uk > >> -----Original Message----- >> From: accessd-bounces at databaseadvisors.com >> [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of >> Oleg_123 at xuppa.com >> Sent: 21 January 2004 16:35 >> To: accessd at databaseadvisors.com >> Subject: [AccessD] Break Name >> >> >> Hey Group >> I did a finction that separates names into first and last,and >> makes propercase - ex. Name: "MCDONALD, REYNA" becomes >> FirstName: "Reyna" LastName "McDonald" How can Insert the 2 >> new fields into the same table ? I tried Update... >> >> >> >> Public Function BreakName() >> >> >> 'Separate The Name field to Firs and LastName and ProperCase >> it 'Uses MDL-Proper Module >> >> >> MsgBox ("hey") >> Dim db As DAO.Database >> Dim rs As DAO.Recordset >> Set db = CurrentDb >> >> Dim strLine As String >> Dim strSQL1 As String >> Dim strSQL2 As String >> Dim FName As String >> Dim LName As String >> Dim a As Integer >> >> >> strSQL1 = "Select * From [emp table1]" >> Set rs = db.OpenRecordset(strSQL1) >> >> >> Do Until rs.EOF >> strLine = rs("Employee Name") >> ' >> strLine = Proper(strLine) >> a = InStr(strLine, ",") >> FName = Mid(strLine, a + 2) >> LName = Left(strLine, a - 1) >> >> 'rs(0) = strLine >> >> >> strSQL2 = "Update [Emp Table1] Set (LastName, FirstName) = >> Values(" & "'" & FindAndReplace(CStr(LName), Chr(39), Chr(39) >> + Chr(39)) & "','" & FindAndReplace(CStr(FName), Chr(39), >> Chr(39) + Chr(39)) & "')" Debug.Print strSQL2 >> >> CurrentDb.Execute (strSQL2) >> rs.MoveNext >> Loop >> >> MsgBox ("end") >> >> End Function >> >> >> >> ----------------------------------------- >> Get Breaking News from CNN, ABC, NBC, CBS Now. >> http://www.xuppa.com/news/?link=webmail >> >> >> >> _______________________________________________ >> AccessD mailing list >> AccessD at databaseadvisors.com >> http://databaseadvisors.com/mailman/listinfo/a> ccessd >> Website: >> http://www.databaseadvisors.com >> >> > > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com ----------------------------------------- Get Breaking News from CNN, ABC, NBC, CBS Now. http://www.xuppa.com/news/?link=webmail From cfoust at infostatsystems.com Wed Jan 21 12:41:28 2004 From: cfoust at infostatsystems.com (Charlotte Foust) Date: Wed, 21 Jan 2004 10:41:28 -0800 Subject: [AccessD] vbNull = 1 Message-ID: Null is the absence of a value. Empty is unitialized, never populated. Charlotte Foust -----Original Message----- From: Oleg_123 at xuppa.com [mailto:Oleg_123 at xuppa.com] Sent: Wednesday, January 21, 2004 9:57 AM To: accessd at databaseadvisors.com Subject: RE: [AccessD] vbNull = 1 whats the difference between Empty and Null ? > Because vbEmpty is equal to zero. > > Charlotte Foust > > -----Original Message----- > From: Gustav Brock [mailto:gustav at cactus.dk] > Sent: Wednesday, January 21, 2004 9:22 AM > To: Access Developers discussion and problem solving > Subject: [AccessD] vbNull = 1 > > > Hi all > > Why does the VB constant vbNull equal 1 and not 0 (zero)? > > /gustav > > _______________________________________________ > 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 ----------------------------------------- Get Breaking News from CNN, ABC, NBC, CBS Now. http://www.xuppa.com/news/?link=webmail _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From cfoust at infostatsystems.com Wed Jan 21 12:51:02 2004 From: cfoust at infostatsystems.com (Charlotte Foust) Date: Wed, 21 Jan 2004 10:51:02 -0800 Subject: [AccessD] vbNull = 1 Message-ID: I'd say he *was* abusing VB constants. I can't imagine why he would use vbNull in the hWnd argument, but I suppose it's because he's written a public sub and is passing the name of the program to be opened into the routine. I have no idea what passing an hWnd of 1 would do with the message boxes generated, but I have seen 1 passed explicitly in that argument before. Charlotte Foust -----Original Message----- From: Gustav Brock [mailto:gustav at cactus.dk] Sent: Wednesday, January 21, 2004 10:01 AM To: Access Developers discussion and problem solving Subject: Re: [AccessD] vbNull = 1 Hi Mark and Charlotte Thanks! I had forgotten vbNull is related to VarType() ... that explains. Then I guess this guy is slightly off track abusing our constants but he managed to confuse me: http://www.imt.net/~joe/matt/program/vb/HOWTOs/ShellExecuteAPI/ /gustav > Gustav, > There is a very short discussion of "When is Nothing something?" here: > http://www.vbdesign.net/expresso/archive/topic/3244.html > Mark > vbNull > This one is great for testing for Null in a variable (database users > take > note) using VarType: > If VarType (varVariable) = vbNull Then > again, don't use this constant to try to assign a Null value, because > its not nothing.. True value of vbNull is 1 (in a string variable "1") > ************ > Why does the VB constant vbNull equal 1 and not 0 (zero)? _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From gustav at cactus.dk Wed Jan 21 13:10:48 2004 From: gustav at cactus.dk (Gustav Brock) Date: Wed, 21 Jan 2004 20:10:48 +0100 Subject: [AccessD] vbNull = 1 In-Reply-To: References: Message-ID: <11143836303.20040121201048@cactus.dk> Hi Charlotte > I'd say he *was* abusing VB constants. I can't imagine why he would use > vbNull in the hWnd argument, but I suppose it's because he's written a > public sub and is passing the name of the program to be opened into the > routine. I have no idea what passing an hWnd of 1 would do with the > message boxes generated, but I have seen 1 passed explicitly in that > argument before. I don't know. If I pass the function a valid hWnd it makes no difference, neither is a value returned of the opened app's hWnd. So I have chosen to feed a zero - makes more sense to me. /gustav From rl_stewart at highstream.net Wed Jan 21 14:41:05 2004 From: rl_stewart at highstream.net (Robert L. Stewart) Date: Wed, 21 Jan 2004 14:41:05 -0600 Subject: [AccessD] Re: Break Name In-Reply-To: <200401211800.i0LI0Em03025@databaseadvisors.com> Message-ID: <5.1.0.14.2.20040121143618.0292c348@pop3.highstream.net> See changes below: At 12:00 PM 1/21/2004 -0600, you wrote: >Public Function BreakName() > > >'Separate The Name field to Firs and LastName and ProperCase it >'Uses MDL-Proper Module > > >MsgBox ("hey") >Dim db As DAO.Database >Dim rs As DAO.Recordset >Set db = CurrentDb > >Dim strLine As String >Dim strSQL1 As String >Dim strFName As String >Dim strLName As String >Dim a As Integer > > >strSQL1 = "Select * From [emp table1]" >Set rs = db.OpenRecordset(strSQL1) > > >Do Until rs.EOF > strLine = rs("Employee Name") > ' > strLine = Proper(strLine) > a = InStr(strLine, ",") > strFName = Mid(strLine, a + 2) > strLName = Left(strLine, a - 1) > > 'rs(0) = strLine rs.edit rs!Fname = strfname rs!Lname = strLname rs.update > rs.MoveNext >Loop > > MsgBox ("end") > >End Function Robert From stuart at lexacorp.com.pg Wed Jan 21 16:19:57 2004 From: stuart at lexacorp.com.pg (Stuart McLachlan) Date: Thu, 22 Jan 2004 08:19:57 +1000 Subject: [AccessD] vbNull = 1 In-Reply-To: <16337315767.20040121182208@cactus.dk> Message-ID: <400F87AD.11959.2DED33@localhost> On 21 Jan 2004 at 18:22, Gustav Brock wrote: > Hi all > > Why does the VB constant vbNull equal 1 and not 0 (zero)? > Same reason that vbArray = 8192 etc. That's just the assigned value of the constant. -- Lexacorp Ltd http://www.lexacorp.com.pg Information Technology Consultancy, Software Development,System Support. From stuart at lexacorp.com.pg Wed Jan 21 16:43:19 2004 From: stuart at lexacorp.com.pg (Stuart McLachlan) Date: Thu, 22 Jan 2004 08:43:19 +1000 Subject: [AccessD] vbNull = 1 In-Reply-To: Message-ID: <400F8D27.23149.435405@localhost> On 21 Jan 2004 at 10:51, Charlotte Foust wrote: > > Thanks! > I had forgotten vbNull is related to VarType() ... that explains. > > Then I guess this guy is slightly off track abusing our constants but he > managed to confuse me: > > http://www.imt.net/~joe/matt/program/vb/HOWTOs/ShellExecuteAPI/ > > /gustav > He's *completely* off track with this: ShellExecute(vbNull, "", strProgram, "", "", SW_SHOWNORMAL) hWnd should be the parent window for the called application. This window receives any message boxes that an application produces. It should either be the main window of the calling application or 0 (certainly not 1). I'd guess he tried to use Null originally and it didn't work so he tried vbNull and found that it did work. -- Lexacorp Ltd http://www.lexacorp.com.pg Information Technology Consultancy, Software Development,System Support. From Paul.Millard at freight.fedex.com Wed Jan 21 16:56:07 2004 From: Paul.Millard at freight.fedex.com (Millard, Paul --- Sr. Developer Analyst ---WGO) Date: Wed, 21 Jan 2004 14:56:07 -0800 Subject: [AccessD] Union Query Message-ID: <67B2D43A2067B248A36B007650A2312C145376@PSJOE2K1.fxfwest.freight.fedex.com> Hi I'm having trouble merging two queries together in a union query. The reason for developing query is I'm trying to force a group to show 5 items listed 1 through 5 and their record count and force a 0 when the group doesn't below in the data table (table2). Below is the query, query result an desired result along with two tables. The union I'm trying to perform right now does not merge together which I need. Any help would greatly be appreciated. Paul Millard San Jose, CA select t1.GrpId GrpId, 0 Bills from tblOpusGrp t1 where t1.Grp = 'WtBreak' union select t1.WtBreak GrpId, Count(*) Bills from tblOpus1 t1 where t1.CustNum = '84304389' group by t1.WtBreak query result. 1 0 1 5 2 0 2 3 3 0 3 1 4 0 5 0 5 1 desired query result. 1 5 2 3 3 1 4 0 5 1 table 1 Grp GrpId GrpDesc WtBreak 1 L5C WtBreak 2 M5C WtBreak 3 M1M WtBreak 4 M2M WtBreak 5 M5M table 2 WtBreak Count 1 5 2 3 3 1 5 1 table 2 detail Wt WtBreak 908.0 2 629.0 2 137.0 1 224.0 1 11800.0 5 1610.0 3 379.0 1 258.0 1 793.0 2 192.0 1 ********************************************************** This message contains information that is confidential and proprietary to FedEx Freight or its affiliates. It is intended only for the recipient named and for the express purpose(s) described therein. Any other use is prohibited. **************************************************************** From martyconnelly at shaw.ca Wed Jan 21 17:00:16 2004 From: martyconnelly at shaw.ca (MartyConnelly) Date: Wed, 21 Jan 2004 15:00:16 -0800 Subject: [AccessD] error after converting (mailmerge) References: <200401141408.i0EE8cNA020272@mailhostC.plex.net> Message-ID: <400F0480.5000602@shaw.ca> I can get this to work with Access97 to Word2003 (my default) by dropping some extraneous code,ie. not using connection string. The mdb I am opening is seperate from the one I am running Access in. It does however open 2 copies of word 1 default (document3.doc) and 1 (form letters1.doc) It also prints too. does not close either word document. Sub test() Dim bltest As Boolean bltest = True CreateMergeDoc bltest, True End Sub Sub CreateMergeDoc(UseDDE As Boolean, PrintDoc As Boolean) Dim WordDoc As Word.Document Dim strLetter As String Dim strConnect As String Dim WordApp As Word.Application Set WordApp = CreateObject("Word.Application") Set WordDoc = WordApp.Documents.Add With WordDoc.MailMerge .OpenDataSource _ Name:="C:\Documents and Settings\marty\My Documents\WordMergetestold97.mdb", _ ReadOnly:=True, LinkToSource:=True, _ SQLStatement:="SELECT * FROM [Table1] WHERE Table1.MyField = " & 123 & ";" ' With Fields '............... 'End With 'With WordApp.Selection '............... 'End With With WordDoc.MailMerge .DataSource.FirstRecord = 1 Debug.Print .DataSource.TableName .Destination = wdSendToNewDocument .Execute If PrintDoc Then .Application.Options.PrintBackground = False .Application.ActiveDocument.PrintOut End If End With WordApp.Visible = True End With End Sub pedro at plex.nl wrote: >Hello Group, > >i converted a A97 secured database to A2K. >After making the changes in Wrkgadmin.exe and the ODBC Data Sources, i changed the names in the module. After running the mailmerge i get an error: Run-time error '5922' Word was unable to open the data source. The debug selects the .OpenDataSource from the code below. > >I figure out why this error occurs. > >TIA > >Pedro Janssen > > > > >Sub CreateMergeDoc(UseDDE As Boolean, PrintDoc As Boolean) > > Dim WordDoc As Word.Document > Dim strLetter As String > Dim strConnect As String > Dim WordApp As Word.Application > > Set WordApp = CreateObject("Word.Application") > > Set WordDoc = WordApp.Documents.Add > With WordDoc.MailMerge > If UseDDE Then > strConnect = "QUERY Uitvoer" > Else > strConnect = "DSN=MS Access 2000 " _ > & "Database;DBQ=E:\Cytologie\positieven\" _ > & "BeveiligdPOSITIEVEN(A2K).mdb;" _ > & "FIL=MS Access;" > End If > .OpenDataSource _ > Name:="E:\Cytologie\positieven\BeveiligdPOSITIEVEN(A2K).mdb", _ > ReadOnly:=True, LinkToSource:=True, _ > Connection:=strConnect, _ > SQLStatement:="SELECT * FROM [Uitvoer], [Aanvrager] WHERE Uitvoer.AanvragerID = Aanvrager.AanvragerID AND Uitvoer.ControleID = " & Forms![Brief]![veld] & ";" > > With Fields > ............... > End With > > With WordApp.Selection > ............... > End With > > > With WordDoc.MailMerge > .DataSource.FirstRecord = 1 > > .Destination = wdSendToNewDocument > > .Execute > > If PrintDoc Then > .Application.Options.PrintBackground = False > .Application.ActiveDocument.PrintOut > End If > End With > > WordApp.Visible = True > End With >End Sub > >_______________________________________________ >AccessD mailing list >AccessD at databaseadvisors.com >http://databaseadvisors.com/mailman/listinfo/accessd >Website: http://www.databaseadvisors.com > > > -- Marty Connelly Victoria, B.C. Canada From DWUTKA at marlow.com Wed Jan 21 17:34:30 2004 From: DWUTKA at marlow.com (DWUTKA at marlow.com) Date: Wed, 21 Jan 2004 17:34:30 -0600 Subject: [AccessD] Union Query Message-ID: <2F8793082E00D4119A1700B0D0216BF80222779E@main2.marlow.com> No need for a Union Query. You can just use a group query, with a Left Join. I may have your table names backwards, but here's the SQL: SELECT tblOpusGrp.GrpID, Count(tblOpus1.WtBreak) AS CountOfWtBreak FROM tblOpusGrp LEFT JOIN tblOpus1 ON tblOpusGrp.GrpID = tblOpus1.WtBreak GROUP BY tblOpusGrp.GrpID; Drew -----Original Message----- From: Millard, Paul --- Sr. Developer Analyst ---WGO [mailto:Paul.Millard at freight.fedex.com] Sent: Wednesday, January 21, 2004 4:56 PM To: Access Developers discussion and problem solving Subject: [AccessD] Union Query Hi I'm having trouble merging two queries together in a union query. The reason for developing query is I'm trying to force a group to show 5 items listed 1 through 5 and their record count and force a 0 when the group doesn't below in the data table (table2). Below is the query, query result an desired result along with two tables. The union I'm trying to perform right now does not merge together which I need. Any help would greatly be appreciated. Paul Millard San Jose, CA select t1.GrpId GrpId, 0 Bills from tblOpusGrp t1 where t1.Grp = 'WtBreak' union select t1.WtBreak GrpId, Count(*) Bills from tblOpus1 t1 where t1.CustNum = '84304389' group by t1.WtBreak query result. 1 0 1 5 2 0 2 3 3 0 3 1 4 0 5 0 5 1 desired query result. 1 5 2 3 3 1 4 0 5 1 table 1 Grp GrpId GrpDesc WtBreak 1 L5C WtBreak 2 M5C WtBreak 3 M1M WtBreak 4 M2M WtBreak 5 M5M table 2 WtBreak Count 1 5 2 3 3 1 5 1 table 2 detail Wt WtBreak 908.0 2 629.0 2 137.0 1 224.0 1 11800.0 5 1610.0 3 379.0 1 258.0 1 793.0 2 192.0 1 ********************************************************** This message contains information that is confidential and proprietary to FedEx Freight or its affiliates. It is intended only for the recipient named and for the express purpose(s) described therein. Any other use is prohibited. **************************************************************** _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From bruce_bruen at mlc.com.au Wed Jan 21 17:35:37 2004 From: bruce_bruen at mlc.com.au (bruce_bruen at mlc.com.au) Date: Thu, 22 Jan 2004 10:35:37 +1100 Subject: [AccessD] Union Query Message-ID: Suggest this ma be closer to what you are seeking rether than a UNION. SELECT tblOpusGrp.GrpId, Count (T1.Wt) AS Bills FROM (select * from tblOpus where custnum="84304389") AS T1 RIGHT JOIN tblOpusGrp ON T1.WtBreak = tblOpusGrp.GrpId WHERE (((tblOpusGrp.Grp)="WtBreak")) GROUP BY tblOpusGrp.GrpId; rgrds Bruce "Millard, Paul --- Sr. Developer Analyst ---WGO" To: "Access Developers discussion and problem solving" ex.com> cc: Sent by: Subject: [AccessD] Union Query accessd-bounces at databasea dvisors.com 22/01/2004 09:56 Please respond to Access Developers discussion and problem solving Hi I'm having trouble merging two queries together in a union query. The reason for developing query is I'm trying to force a group to show 5 items listed 1 through 5 and their record count and force a 0 when the group doesn't below in the data table (table2). Below is the query, query result an desired result along with two tables. The union I'm trying to perform right now does not merge together which I need. Any help would greatly be appreciated. Paul Millard San Jose, CA select t1.GrpId GrpId, 0 Bills from tblOpusGrp t1 where t1.Grp = 'WtBreak' union select t1.WtBreak GrpId, Count(*) Bills from tblOpus1 t1 where t1.CustNum = '84304389' group by t1.WtBreak query result. 1 0 1 5 2 0 2 3 3 0 3 1 4 0 5 0 5 1 desired query result. 1 5 2 3 3 1 4 0 5 1 table 1 Grp GrpId GrpDesc WtBreak 1 L5C WtBreak 2 M5C WtBreak 3 M1M WtBreak 4 M2M WtBreak 5 M5M table 2 WtBreak Count 1 5 2 3 3 1 5 1 table 2 detail Wt WtBreak 908.0 2 629.0 2 137.0 1 224.0 1 11800.0 5 1610.0 3 379.0 1 258.0 1 793.0 2 192.0 1 ********************************************************** This message contains information that is confidential and proprietary to FedEx Freight or its affiliates. It is intended only for the recipient named and for the express purpose(s) described therein. Any other use is prohibited. **************************************************************** _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From Paul.Millard at freight.fedex.com Wed Jan 21 17:41:30 2004 From: Paul.Millard at freight.fedex.com (Millard, Paul --- Sr. Developer Analyst ---WGO) Date: Wed, 21 Jan 2004 15:41:30 -0800 Subject: [AccessD] Union Query Solved Message-ID: <67B2D43A2067B248A36B007650A2312C145377@PSJOE2K1.fxfwest.freight.fedex.com> I solved my own problem. For those who want to know...Create a wrapper/subquery. I do them in Oracle but couldn't figure out why they wouldn't work in SQL Server until now. SQL Server requires a table name where Oracle does not. I guess owning a SQL Server book would be helpful after all. -Paul Select t1.GrpId, Sum(t1.Bills) Bills from ( select t1.GrpId GrpId, 0 Bills from tblOpusGrp t1 where t1.Grp = 'WtBreak' union select t1.WtBreak GrpId, Count(*) Bills from tblOpus1 t1 where t1.CustNum = '84304389' group by t1.WtBreak ) t1 group by t1.GrpId 1 5 2 3 3 1 4 0 5 1 -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Millard, Paul --- Sr. Developer Analyst ---WGO Sent: Wednesday, January 21, 2004 2:56 PM To: Access Developers discussion and problem solving Subject: [AccessD] Union Query Hi I'm having trouble merging two queries together in a union query. The reason for developing query is I'm trying to force a group to show 5 items listed 1 through 5 and their record count and force a 0 when the group doesn't below in the data table (table2). Below is the query, query result an desired result along with two tables. The union I'm trying to perform right now does not merge together which I need. Any help would greatly be appreciated. Paul Millard San Jose, CA select t1.GrpId GrpId, 0 Bills from tblOpusGrp t1 where t1.Grp = 'WtBreak' union select t1.WtBreak GrpId, Count(*) Bills from tblOpus1 t1 where t1.CustNum = '84304389' group by t1.WtBreak query result. 1 0 1 5 2 0 2 3 3 0 3 1 4 0 5 0 5 1 desired query result. 1 5 2 3 3 1 4 0 5 1 table 1 Grp GrpId GrpDesc WtBreak 1 L5C WtBreak 2 M5C WtBreak 3 M1M WtBreak 4 M2M WtBreak 5 M5M table 2 WtBreak Count 1 5 2 3 3 1 5 1 table 2 detail Wt WtBreak 908.0 2 629.0 2 137.0 1 224.0 1 11800.0 5 1610.0 3 379.0 1 258.0 1 793.0 2 192.0 1 ********************************************************** This message contains information that is confidential and proprietary to FedEx Freight or its affiliates. It is intended only for the recipient named and for the express purpose(s) described therein. Any other use is prohibited. **************************************************************** _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From d.dick at uws.edu.au Wed Jan 21 17:49:04 2004 From: d.dick at uws.edu.au (Darren DICK) Date: Thu, 22 Jan 2004 10:49:04 +1100 Subject: [AccessD] A2K: Error 3251 References: Message-ID: <00b101c3e079$26bea9c0$48619a89@DDICK> Thanks to all who responded dbOpenDynaset was the answer as opposed to dbOpenSnapshot Thanks Guys This list is great DD ----- Original Message ----- From: "Jim Lawrence (AccessD)" To: "Access Developers discussion and problem solving" Sent: Wednesday, January 21, 2004 6:20 PM Subject: RE: [AccessD] A2K: Error 3251 > Hi Darren: > > You have to make sure your DAO is referenced, the db object and rs recordset > object is dimensioned and the right type of object is used, that has edit > and update functionality. > > Example: > > Dim selSQL As String > Dim rs as DAO.recordset > Dim db as DAO.database > > set db = CurrentDb() > set rs = db.OpenRecordset(selSQL, dbOpenDynaset) > > ... then everything should work just fine. > > HTH > Jim > > -----Original Message----- > From: accessd-bounces at databaseadvisors.com > [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Darren DICK > Sent: Tuesday, January 20, 2004 9:18 PM > To: AccessD List > Subject: [AccessD] A2K: Error 3251 > > > Hi All > This should be simple > > I have some code updating a table of records > > Dim selSQL As String > Dim rs As Recordset > > selSQL = "SELECT tblMyTable.* FROM tblMyTable;" > > Set rs = db.OpenRecordset(selSQL, dbOpenSnapshot) > > With rs > .Edit <===Code Fails Here > !MyField = Me.txtMyControl > .Update > End With > > The rror I get is... > Error 3251: Operation is not supported for this type of Object > > Any suggestions?? > > Many thanks > > DArren > > _______________________________________________ > 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 From joeget at vgernet.net Wed Jan 21 18:14:42 2004 From: joeget at vgernet.net (John Eget) Date: Wed, 21 Jan 2004 19:14:42 -0500 Subject: [AccessD] access 2.0 to XP issue Message-ID: <008f01c3e07c$bf755490$4ec2f63f@Desktop> Today I was asked to take a access 2.0 backend and make it work with XP!! The 2.0 will not work with XP at all. I need to update some table specifications, and make it work on an XP PC. Any ideas John Eget From Paul.Millard at freight.fedex.com Wed Jan 21 18:08:24 2004 From: Paul.Millard at freight.fedex.com (Millard, Paul --- Sr. Developer Analyst ---WGO) Date: Wed, 21 Jan 2004 16:08:24 -0800 Subject: [AccessD] Union Query Message-ID: <67B2D43A2067B248A36B007650A2312C145378@PSJOE2K1.fxfwest.freight.fedex.com> Thanks Bruce and Drew for your responses. Actually, this is a great way of doing things! -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of bruce_bruen at mlc.com.au Sent: Wednesday, January 21, 2004 3:36 PM To: Access Developers discussion and problem solving Subject: Re: [AccessD] Union Query Suggest this ma be closer to what you are seeking rether than a UNION. SELECT tblOpusGrp.GrpId, Count (T1.Wt) AS Bills FROM (select * from tblOpus where custnum="84304389") AS T1 RIGHT JOIN tblOpusGrp ON T1.WtBreak = tblOpusGrp.GrpId WHERE (((tblOpusGrp.Grp)="WtBreak")) GROUP BY tblOpusGrp.GrpId; rgrds Bruce "Millard, Paul --- Sr. Developer Analyst ---WGO" To: "Access Developers discussion and problem solving" ex.com> cc: Sent by: Subject: [AccessD] Union Query accessd-bounces at databasea dvisors.com 22/01/2004 09:56 Please respond to Access Developers discussion and problem solving Hi I'm having trouble merging two queries together in a union query. The reason for developing query is I'm trying to force a group to show 5 items listed 1 through 5 and their record count and force a 0 when the group doesn't below in the data table (table2). Below is the query, query result an desired result along with two tables. The union I'm trying to perform right now does not merge together which I need. Any help would greatly be appreciated. Paul Millard San Jose, CA select t1.GrpId GrpId, 0 Bills from tblOpusGrp t1 where t1.Grp = 'WtBreak' union select t1.WtBreak GrpId, Count(*) Bills from tblOpus1 t1 where t1.CustNum = '84304389' group by t1.WtBreak query result. 1 0 1 5 2 0 2 3 3 0 3 1 4 0 5 0 5 1 desired query result. 1 5 2 3 3 1 4 0 5 1 table 1 Grp GrpId GrpDesc WtBreak 1 L5C WtBreak 2 M5C WtBreak 3 M1M WtBreak 4 M2M WtBreak 5 M5M table 2 WtBreak Count 1 5 2 3 3 1 5 1 table 2 detail Wt WtBreak 908.0 2 629.0 2 137.0 1 224.0 1 11800.0 5 1610.0 3 379.0 1 258.0 1 793.0 2 192.0 1 ********************************************************** This message contains information that is confidential and proprietary to FedEx Freight or its affiliates. It is intended only for the recipient named and for the express purpose(s) described therein. Any other use is prohibited. **************************************************************** _______________________________________________ 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 From BBarabash at TappeConstruction.com Wed Jan 21 18:16:25 2004 From: BBarabash at TappeConstruction.com (Brett Barabash) Date: Wed, 21 Jan 2004 18:16:25 -0600 Subject: [AccessD] access 2.0 to XP issue Message-ID: <426071E0B0A6D311B3C0006008B0AB23AFE2C9@TAPPEEXCH01> Hmm... I maintain several A2 in-house apps, and they all work on Windows XP just fine. I don't have Access XP running here, but they work just fine linked to an A2K front-end. What's your specific issue? Have you installed A2 on your machines, or are you trying to modify linked tables? -----Original Message----- From: John Eget [mailto:joeget at vgernet.net] Sent: Wednesday, January 21, 2004 6:15 PM To: AccessD at databaseadvisors.com Subject: [AccessD] access 2.0 to XP issue Today I was asked to take a access 2.0 backend and make it work with XP!! The 2.0 will not work with XP at all. I need to update some table specifications, and make it work on an XP PC. Any ideas John Eget -------------------------------------------------------------------------------------------------------------------- This email and any files transmitted with it are confidential and intended solely for the use of the individual or entity to whom they are addressed. If you have received this email in error please notify the originator of the message. This footer also confirms that this email message has been scanned for the presence of computer viruses. Any views expressed in this message are those of the individual sender, except where the sender specifies and with authority, states them to be the views of Tappe Construction Co. Scanning of this message and addition of this footer is performed by SurfControl E-mail Filter software in conjunction with virus detection software. From cfoust at infostatsystems.com Wed Jan 21 18:21:05 2004 From: cfoust at infostatsystems.com (Charlotte Foust) Date: Wed, 21 Jan 2004 16:21:05 -0800 Subject: [AccessD] access 2.0 to XP issue Message-ID: Access XP or Windows XP? The earliest version AXP will work with is 97. What exactly do you need to do, convert it to AXP or something else? Your best bet might be to use A97 to convert the A2.0 database to 97 for starters. The 97 format will definitely run on WinXP and can be read/converted by AXP. Charlotte Foust -----Original Message----- From: John Eget [mailto:joeget at vgernet.net] Sent: Wednesday, January 21, 2004 4:15 PM To: AccessD at databaseadvisors.com Subject: [AccessD] access 2.0 to XP issue Today I was asked to take a access 2.0 backend and make it work with XP!! The 2.0 will not work with XP at all. I need to update some table specifications, and make it work on an XP PC. Any ideas John Eget _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From joeget at vgernet.net Wed Jan 21 18:32:49 2004 From: joeget at vgernet.net (John Eget) Date: Wed, 21 Jan 2004 19:32:49 -0500 Subject: [AccessD] access 2.0 to XP issue References: Message-ID: <00c701c3e07f$473b4180$4ec2f63f@Desktop> Access XP ----- Original Message ----- From: "Charlotte Foust" To: "Access Developers discussion and problem solving" Sent: Wednesday, January 21, 2004 7:21 PM Subject: RE: [AccessD] access 2.0 to XP issue > Access XP or Windows XP? The earliest version AXP will work with is 97. > What exactly do you need to do, convert it to AXP or something else? > Your best bet might be to use A97 to convert the A2.0 database to 97 for > starters. The 97 format will definitely run on WinXP and can be > read/converted by AXP. > > Charlotte Foust > > -----Original Message----- > From: John Eget [mailto:joeget at vgernet.net] > Sent: Wednesday, January 21, 2004 4:15 PM > To: AccessD at databaseadvisors.com > Subject: [AccessD] access 2.0 to XP issue > > > Today I was asked to take a access 2.0 backend and make it work with > XP!! The 2.0 will not work with XP at all. I need to update some table > specifications, and make it work on an XP PC. Any ideas John Eget > _______________________________________________ > 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 From becklesd at tiscali.co.uk Wed Jan 21 19:10:36 2004 From: becklesd at tiscali.co.uk (David Beckles) Date: Thu, 22 Jan 2004 01:10:36 +0000 Subject: [AccessD] RE: Instantiate Forms as Objects Message-ID: <5.2.0.9.2.20040122011000.02324b10@127.0.0.1> Dear Ken, One way of achieving (most of) what you want to do is as follows: 1. In each of your forms create the function Public Function NewInstance() As Form Set NewInstance = New Form_TestForm End Function Its purpose is merely to return a reference to a new instance of the form. You could also define it as a new public property of the form, instead of a function. 2. Define the following function in some general module Public Function OpenFormMultiple(FormName As String) As Form ' check the Forms collection, and if the form is in it then use the NewInstance() method of the form ' otherwise open the form in the usual way and return a reference to it. ' in either case, the form will not be visible. ' if any errors occur, then the value Nothing will be returned, so remember to test for it. On Error Resume Next ' You could use fancier error handling if you wanted Dim F As Form Set OpenFormMultiple = Nothing Set F = Forms(FormName) If F Is Nothing Then Application.Echo False ' this is to suppress the screen flicker DoCmd.OpenForm FormName Set F = Forms(FormName) F.Visible = False Set OpenFormMultiple = F Application.Echo True Else Set OpenFormMultiple = F.NewInstance() End If End Function One problem with this arrangement is that you can close all the instances of a form except the first by setting the reference to Nothing. The first instance has to be closed by going into the Forms collection. I have not found a way around that as yet. I hope that this helps, David From accessd666 at yahoo.com Thu Jan 22 00:25:38 2004 From: accessd666 at yahoo.com (Sad Der) Date: Wed, 21 Jan 2004 22:25:38 -0800 (PST) Subject: [AccessD] Major Performance Issue! + Code In-Reply-To: <02fd01c3e030$67dfd440$b274d0d5@minster33c3r25> Message-ID: <20040122062538.53174.qmail@web60209.mail.yahoo.com> Here is (part of) the code: PS: I found the GetMaxDate() function, I think on wolfwares.com! '========================================================================================= ' Function Name : FillStamMeetProces ' Parameters : No parameters ' Return value : (String) ' Purpose : ' Assumptions : --- ' Uses : --- ' Created : 2003-10-24 10:12, SaDe ' Modifications : '========================================================================================= Function FillStamMeetProces(strProces As String) As String '150 StamMeetData '210 StamMeetData Dim strMeD As String 'Message_date Dim strSQL As String Dim strRecordcount As String On Error GoTo FillStamMeetProces_Error Select Case strProces Case "SM" 'Cleanup table DeleteRecords strProces '---------------------------------------- ' 150 Te verwerken ontvangen stamgegevens '---------------------------------------- '--------------------------------------------------------- 'MaxDate() '--------------------------------------------------------- strSQL = vbNullString 'SQL statement to fetch most recent date strSQL = "SELECT Max([Bericht 150 (Update Master Data)].Message_Date) AS MaxOfMessage_Date " & _ "FROM [Bericht 150 (Update Master Data)] " & _ "WHERE Connect_EAN =" & "'" & gstrSelectedEan & "' " strMeD = GetMaxDate(strSQL) If Len(strMeD) = 0 Then strMeD = "N/A" End If '--------------------------------------------------------- 'Aantal Records '--------------------------------------------------------- strSQL = vbNullString 'SQL statement to fetch most recent date strSQL = "SELECT COUNT(*) " & _ "FROM [Bericht 150 (Update Master Data)] " & _ "WHERE Connect_EAN =" & "'" & gstrSelectedEan & "' " strRecordcount = GetRecordCount(strSQL) 'Check if a date was returned If strRecordcount = vbNullString Then strRecordcount = "0" End If 'Create new record AddRecords strProces, "150", strMeD, strRecordcount '---------------------------------------- ' 210 Te verwerken ontvangen meetdata '---------------------------------------- '--------------------------------------------------------- 'MaxDate() '--------------------------------------------------------- strMeD = vbNullString strSQL = vbNullString 'SQL statement to fetch most recent date strSQL = "SELECT Max(V2_210_MEDTD1.message_date) AS MaxOfmessage_date " & _ "FROM V2_210_MEDTD1 " & _ "WHERE Connect_EAN =" & "'" & gstrSelectedEan & "' " strMeD = GetMaxDate(strSQL) If Len(strMeD) = 0 Then strMeD = "N/A" End If '--------------------------------------------------------- 'Aantal Records '--------------------------------------------------------- strSQL = vbNullString 'SQL statement to fetch most recent date strSQL = "SELECT COUNT(*) " & _ "FROM V2_210_MEDTD1 " & _ "WHERE Connect_EAN =" & "'" & gstrSelectedEan & "' " strRecordcount = GetRecordCount(strSQL) 'Check if a date was returned If strRecordcount = vbNullString Then strRecordcount = "0" End If 'Create new record AddRecords strProces, "210", strMeD, strRecordcount Case Else MsgBox "UNKNOW PROCES!" End Select FillStamMeetProces_Exit: ' Collect your garbage here Exit Function FillStamMeetProces_Error: ' Collect your garbage here Call g_oGenErr.Throw("Switchdatabase.mMultiInterface", "FillStamMeetProces") End Function Function GetMaxDate(strSQL As String) As String 'Dim strSQL As String Dim conn As ADODB.Connection Dim rstBericht As ADODB.Recordset Dim strMaxDate As String Set conn = CurrentProject.Connection Set rstBericht = New ADODB.Recordset With rstBericht .ActiveConnection = conn .CursorType = adOpenKeyset .LockType = adLockReadOnly .Source = strSQL .Open If .RecordCount > 0 Then If IsNull(.Fields(0)) Then strMaxDate = vbNullString Else strMaxDate = .Fields(0) End If Else strMaxDate = vbNullString End If End With 'Return value GetMaxDate = strMaxDate Set rstBericht = Nothing End Function '========================================================================================= ' Function Name : AddRecords ' Parameters : strProces As String ' strBericht As String ' strDatum As String ' strAantal As String ' Return value : (Boolean) ' Purpose : Inserts records into tblMultiInterface. This table is used to display detail ' information regarding the switch, verhuis, stam & meetdata and contract ' processes ' Assumptions : --- ' Uses : --- ' Created : 2003-10-21 09:00, SaDe ' Modifications : '========================================================================================= Function AddRecords(strProces As String, strBericht As String, strDatum As String, strAantal As String) As Boolean Dim strSQL As String On Error GoTo AddRecords_Error strSQL = "INSERT INTO tblMultiInterface VALUES (""" & strProces & """,""" & strBericht & """,""" & strDatum & """,""" & strAantal & """ )" DoCmd.RunSQL strSQL AddRecords_Exit: ' Collect your garbage here Exit Function AddRecords_Error: ' Collect your garbage here Call g_oGenErr.Throw("Switchdatabase.Form_fMultiInterface", "AddRecords") End Function --- Andy Lacey wrote: > Sander > Rather than attaching the code try pasting it into > the email. Shouldn't be a > size issue then, unless, of course, there's miles of > it! I don't know about > anyone else but I certainly would get a clearer > picture of what you're doing > by seeing the code. Can't really get a handle on it > yet. > > Andy Lacey > http://www.minstersystems.co.uk > > > -----Original Message----- > > From: accessd-bounces at databaseadvisors.com > > [mailto:accessd-bounces at databaseadvisors.com] On > Behalf Of Sad Der > > Sent: 21 January 2004 08:40 > > To: Acces User Group > > Subject: [AccessD] Major Performance Issue! > > > > > > Hi group, > > > > I've got a MAJOR performance issue. I need to > display > > a lot of data. A performance test showed that it > takes > > between 120 - 160 seconds (2 minutes - 2.40 > minutes) > > to display the data! I have no idea how to speed > > things up dramaticly. I really could use some > tips. > > > > Here's a description of the current environment: > > Access 2000 Client (size: 20 Mb) > > Access 2000 Back-end (size: 100 Mb) > > approx 4 users > > Novel network > > > > Functionality: > > I need to display 4 listbox' with data. > > > > Every listbox has the same table as source. > > Every listbox has a query as RowSource > > Every listbox has this layout: > > > > Proces Type | Date | # Records > > > > Listbox 1 displays 4 records > > Listbox 2 displays 2 records > > Listbox 3 displays 6 records > > Listbox 4 displays 3 records > > > > So the table (tblMultiInterface) has 15 records in > > total. > > > > Table tblMultiInterface > > Fields: > > Proces Type Text > > Date Text (!) > > Records Text (!) (zero records need to > display > > N/A) > > > > I added the code as an attachment but unfortunatly > > this mail was blocked! If anybody would like to > take a > > look at the code I can send it to you directly. > > > > Comments/tips/etc would be GREATLY appriciated! > > > > TIA > > Sad > > > > > > __________________________________ > > Do you Yahoo!? > > Yahoo! Hotjobs: Enter the "Signing Bonus" > Sweepstakes > > http://hotjobs.sweepstakes.yahoo.com/signingbo> > nus > > > > _______________________________________________ > > AccessD > > mailing list > > AccessD at databaseadvisors.com > > http://databaseadvisors.com/mailman/listinfo/a> > ccessd > > Website: > > http://www.databaseadvisors.com > > > > > > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com __________________________________ Do you Yahoo!? Yahoo! SiteBuilder - Free web site building tool. Try it! http://webhosting.yahoo.com/ps/sb/ From martyconnelly at shaw.ca Thu Jan 22 00:58:07 2004 From: martyconnelly at shaw.ca (MartyConnelly) Date: Wed, 21 Jan 2004 22:58:07 -0800 Subject: [AccessD] Worldwide Media exchange or is this a Schuss Boomer? References: <67B2D43A2067B248A36B007650A2312C145378@PSJOE2K1.fxfwest.freight.fedex.com> Message-ID: <400F747F.6000403@shaw.ca> http://wwmx.org/FullMediaView.aspx?mediaid=29423 mainsite http://wwmx.org/WebClient.aspx Here is a interesting new use of GPS and Images via ASP.net from Microsoft Research. Free download of api and net client For all surveillance lovers: microsoft research ask people from all over the world to send in photos and the location data, where the photos were shot. they hope to collect "gazillions" of photos and make a visual map of the whole world... -- Marty Connelly Victoria, B.C. Canada From Erwin.Craps at ithelps.be Thu Jan 22 01:56:28 2004 From: Erwin.Craps at ithelps.be (Erwin Craps - IT Helps) Date: Thu, 22 Jan 2004 08:56:28 +0100 Subject: [AccessD] Worldwide Media exchange or is this a Schuss Boomer? Message-ID: <46B976F2B698FF46A4FE7636509B22DF03D149@stekelbes.ithelps.local> Looks like fun... Gonna upload some pics.... Leuven is not present yet... Erwin -----Oorspronkelijk bericht----- Van: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] Namens MartyConnelly Verzonden: donderdag 22 januari 2004 7:58 Aan: Access Developers discussion and problem solving Onderwerp: [AccessD] Worldwide Media exchange or is this a Schuss Boomer? http://wwmx.org/FullMediaView.aspx?mediaid=29423 mainsite http://wwmx.org/WebClient.aspx Here is a interesting new use of GPS and Images via ASP.net from Microsoft Research. Free download of api and net client For all surveillance lovers: microsoft research ask people from all over the world to send in photos and the location data, where the photos were shot. they hope to collect "gazillions" of photos and make a visual map of the whole world... -- Marty Connelly Victoria, B.C. Canada _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From accessd666 at yahoo.com Thu Jan 22 02:47:25 2004 From: accessd666 at yahoo.com (Sad Der) Date: Thu, 22 Jan 2004 00:47:25 -0800 (PST) Subject: [AccessD] HOWTO: Transform code to Function/Sub Message-ID: <20040122084725.46032.qmail@web60206.mail.yahoo.com> Hi group, I've got an app (A2k) and I use a lot of check boxes to select all listbox items. Can someone please help me how I can transform the code to a function? I found this in the HELP. But I cannot figure out how I can combine the SET and a parameter?! Sub BoundData() Dim frm As Form, ctl As Control Dim varItm As Variant Set frm = Forms!Contacts Set ctl = frm!Names For Each varItm In ctl.ItemsSelected Debug.Print ctl.ItemData(varItm) Next varItm End Sub I think I need 2 params: Form Listbox Here's my code: Dim intCountItems As Integer Dim x As Integer intCountItems = lstTabellen.ListCount If chkAllTabellen.Value = -1 Then For x = 0 To intCountItems - 1 With lstTabellen If Not .Selected(x) Then .Selected(x) = True End If End With Next x Else For x = 0 To intCountItems - 1 With lstTabellen If .Selected(x) Then .Selected(x) = False End If End With Next x End If End Sub TIA SAD __________________________________ Do you Yahoo!? Yahoo! SiteBuilder - Free web site building tool. Try it! http://webhosting.yahoo.com/ps/sb/ From becklesd at tiscali.co.uk Wed Jan 21 19:10:09 2004 From: becklesd at tiscali.co.uk (David Beckles) Date: Thu, 22 Jan 2004 01:10:09 +0000 Subject: [AccessD] RE: Instantiate Forms as Objects Message-ID: <5.2.0.9.2.20040122003533.0226d4c0@127.0.0.1> Dear Ken, One way of achieving (most of) what you want to do is as follows: 1. In each of your forms create the function Public Function NewInstance() As Form Set NewInstance = New Form_TestForm End Function Its purpose is merely to return a reference to a new instance of the form. You could also define it as a new public property of the form, instead of a function. 2. Define the following function in some general module Public Function OpenFormMultiple(FormName As String) As Form ' check the Forms collection, and if the form is in it then use the NewInstance() method of the form ' otherwise open the form in the usual way and return a reference to it. ' in either case, the form will not be visible. ' if any errors occur, then the value Nothing will be returned, so remember to test for it. On Error Resume Next ' You could use fancier error handling if you wanted Dim F As Form Set OpenFormMultiple = Nothing Set F = Forms(FormName) If F Is Nothing Then Application.Echo False ' this is to suppress the screen flicker DoCmd.OpenForm FormName Set F = Forms(FormName) F.Visible = False Set OpenFormMultiple = F Application.Echo True Else Set OpenFormMultiple = F.NewInstance() End If End Function One problem with this arrangement is that you can close all the instances of a form except the first by setting the reference to Nothing. The first instance has to be closed by going into the Forms collection. I have not found a way around that as yet. I hope that this helps, David From andy at minstersystems.co.uk Thu Jan 22 03:02:53 2004 From: andy at minstersystems.co.uk (Andy Lacey) Date: Thu, 22 Jan 2004 09:02:53 -0000 Subject: [AccessD] Major Performance Issue! + Code In-Reply-To: <20040122062538.53174.qmail@web60209.mail.yahoo.com> Message-ID: <007801c3e0c6$8540f8c0$b274d0d5@minster33c3r25> Sander The first thing I suggest you do is put timing code in to isolate where you have performance issue(s). If you don't already have something I can send you a copy of JC's timer class (I'm sure he won't mind). There's no point aiming attention at one routine only to find that it represented 0.01% of the overall time. So, first up, find the lines of code which are doing the damage. Andy Lacey http://www.minstersystems.co.uk > -----Original Message----- > From: accessd-bounces at databaseadvisors.com > [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Sad Der > Sent: 22 January 2004 06:26 > To: Access Developers discussion and problem solving > Subject: RE: [AccessD] Major Performance Issue! + Code > > > Here is (part of) the code: > PS: I found the GetMaxDate() function, I think on wolfwares.com! > > '============================================================= > ============================ > ' Function Name : FillStamMeetProces > ' Parameters : No parameters > ' Return value : (String) > ' Purpose : > ' Assumptions : --- > ' Uses : --- > ' Created : 2003-10-24 10:12, SaDe > ' Modifications : > '============================================================= > ============================ > Function FillStamMeetProces(strProces As String) As > String > '150 StamMeetData > '210 StamMeetData > Dim strMeD As String 'Message_date > Dim strSQL As String > Dim strRecordcount As String > > On Error GoTo FillStamMeetProces_Error > Select Case strProces > Case "SM" > 'Cleanup table > DeleteRecords strProces > > '---------------------------------------- > ' 150 Te verwerken ontvangen stamgegevens > '---------------------------------------- > > '--------------------------------------------------------- > 'MaxDate() > > '--------------------------------------------------------- > strSQL = vbNullString > > 'SQL statement to fetch most recent date > strSQL = "SELECT Max([Bericht 150 (Update Master > Data)].Message_Date) AS MaxOfMessage_Date " & _ > "FROM [Bericht 150 (Update Master > Data)] " & _ > "WHERE Connect_EAN =" & "'" & > gstrSelectedEan & "' " > > strMeD = GetMaxDate(strSQL) > If Len(strMeD) = 0 Then > strMeD = "N/A" > End If > > '--------------------------------------------------------- > 'Aantal Records > > '--------------------------------------------------------- > strSQL = vbNullString > 'SQL statement to fetch most recent date > strSQL = "SELECT COUNT(*) " & _ > "FROM [Bericht 150 (Update Master > Data)] " & _ > "WHERE Connect_EAN =" & "'" & > gstrSelectedEan & "' " > > strRecordcount = GetRecordCount(strSQL) > > 'Check if a date was returned > If strRecordcount = vbNullString Then > strRecordcount = "0" > End If > > 'Create new record > AddRecords strProces, "150", strMeD, > strRecordcount > > '---------------------------------------- > ' 210 Te verwerken ontvangen meetdata > '---------------------------------------- > > '--------------------------------------------------------- > 'MaxDate() > > '--------------------------------------------------------- > strMeD = vbNullString > strSQL = vbNullString > 'SQL statement to fetch most recent date > strSQL = "SELECT Max(V2_210_MEDTD1.message_date) > AS MaxOfmessage_date " & _ > "FROM V2_210_MEDTD1 " & _ > "WHERE Connect_EAN =" & "'" & > gstrSelectedEan & "' " > > strMeD = GetMaxDate(strSQL) > If Len(strMeD) = 0 Then > strMeD = "N/A" > End If > > '--------------------------------------------------------- > 'Aantal Records > > '--------------------------------------------------------- > strSQL = vbNullString > 'SQL statement to fetch most recent date > strSQL = "SELECT COUNT(*) " & _ > "FROM V2_210_MEDTD1 " & _ > "WHERE Connect_EAN =" & "'" & > gstrSelectedEan & "' " > > strRecordcount = GetRecordCount(strSQL) > > 'Check if a date was returned > If strRecordcount = vbNullString Then > strRecordcount = "0" > End If > > 'Create new record > AddRecords strProces, "210", strMeD, > strRecordcount > Case Else > MsgBox "UNKNOW PROCES!" > End Select > > FillStamMeetProces_Exit: > ' Collect your garbage here > Exit Function > FillStamMeetProces_Error: > ' Collect your garbage here > Call > g_oGenErr.Throw("Switchdatabase.mMultiInterface", > "FillStamMeetProces") > End Function > > Function GetMaxDate(strSQL As String) As String > 'Dim strSQL As String > Dim conn As ADODB.Connection > Dim rstBericht As ADODB.Recordset > Dim strMaxDate As String > > Set conn = CurrentProject.Connection > Set rstBericht = New ADODB.Recordset > > > With rstBericht > .ActiveConnection = conn > .CursorType = adOpenKeyset > .LockType = adLockReadOnly > .Source = strSQL > .Open > If .RecordCount > 0 Then > If IsNull(.Fields(0)) Then > strMaxDate = vbNullString > Else > strMaxDate = .Fields(0) > End If > Else > strMaxDate = vbNullString > End If > End With > > 'Return value > GetMaxDate = strMaxDate > > Set rstBericht = Nothing > End Function > > > '============================================================= > ============================ > ' Function Name : AddRecords > ' Parameters : strProces As String > ' strBericht As String > ' strDatum As String > ' strAantal As String > ' Return value : (Boolean) > ' Purpose : Inserts records into > tblMultiInterface. This table is used to display > detail > ' information regarding the > switch, verhuis, stam & meetdata and contract > ' processes > ' Assumptions : --- > ' Uses : --- > ' Created : 2003-10-21 09:00, SaDe > ' Modifications : > '============================================================= > ============================ > Function AddRecords(strProces As String, strBericht As > String, strDatum As String, strAantal As String) As > Boolean > Dim strSQL As String > > On Error GoTo AddRecords_Error > strSQL = "INSERT INTO tblMultiInterface VALUES (""" > & strProces & """,""" & strBericht & """,""" & > strDatum & """,""" & strAantal & """ )" > DoCmd.RunSQL strSQL > > AddRecords_Exit: > ' Collect your garbage here > Exit Function > AddRecords_Error: > ' Collect your garbage here > Call > g_oGenErr.Throw("Switchdatabase.Form_fMultiInterface", > "AddRecords") > > End Function > > --- Andy Lacey wrote: > > Sander > > Rather than attaching the code try pasting it into > > the email. Shouldn't be a > > size issue then, unless, of course, there's miles of > > it! I don't know about > > anyone else but I certainly would get a clearer > > picture of what you're doing > > by seeing the code. Can't really get a handle on it > > yet. > > > > Andy Lacey > > http://www.minstersystems.co.uk > > > > > -----Original Message----- > > > From: accessd-bounces at databaseadvisors.com > > > [mailto:accessd-bounces at databaseadvisors.com] On > > Behalf Of Sad Der > > > Sent: 21 January 2004 08:40 > > > To: Acces User Group > > > Subject: [AccessD] Major Performance Issue! > > > > > > > > > Hi group, > > > > > > I've got a MAJOR performance issue. I need to > > display > > > a lot of data. A performance test showed that it > > takes > > > between 120 - 160 seconds (2 minutes - 2.40 > > minutes) > > > to display the data! I have no idea how to speed > > > things up dramaticly. I really could use some > > tips. > > > > > > Here's a description of the current environment: > > > Access 2000 Client (size: 20 Mb) > > > Access 2000 Back-end (size: 100 Mb) > > > approx 4 users > > > Novel network > > > > > > Functionality: > > > I need to display 4 listbox' with data. > > > > > > Every listbox has the same table as source. > > > Every listbox has a query as RowSource > > > Every listbox has this layout: > > > > > > Proces Type | Date | # Records > > > > > > Listbox 1 displays 4 records > > > Listbox 2 displays 2 records > > > Listbox 3 displays 6 records > > > Listbox 4 displays 3 records > > > > > > So the table (tblMultiInterface) has 15 records in > > > total. > > > > > > Table tblMultiInterface > > > Fields: > > > Proces Type Text > > > Date Text (!) > > > Records Text (!) (zero records need to > > display > > > N/A) > > > > > > I added the code as an attachment but unfortunatly > > > this mail was blocked! If anybody would like to > > take a > > > look at the code I can send it to you directly. > > > > > > Comments/tips/etc would be GREATLY appriciated! > > > > > > TIA > > > Sad > > > > > > > > > __________________________________ > > > Do you Yahoo!? > > > Yahoo! Hotjobs: Enter the "Signing Bonus" > > Sweepstakes > > > http://hotjobs.sweepstakes.yahoo.com/signingbo> > > nus > > > > > > _______________________________________________ > > > AccessD > > > mailing list > > > AccessD at databaseadvisors.com > > > http://databaseadvisors.com/mailman/listinfo/a> > > ccessd > > > Website: > > > http://www.databaseadvisors.com > > > > > > > > > > _______________________________________________ > > AccessD mailing list > > AccessD at databaseadvisors.com > > http://databaseadvisors.com/mailman/listinfo/accessd > > Website: http://www.databaseadvisors.com > > > __________________________________ > Do you Yahoo!? > Yahoo! SiteBuilder - Free web site building tool. Try it! http://webhosting.yahoo.com/ps/sb/ _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From gustav at cactus.dk Thu Jan 22 02:54:17 2004 From: gustav at cactus.dk (Gustav Brock) Date: Thu, 22 Jan 2004 09:54:17 +0100 Subject: [AccessD] Major Performance Issue! + Code In-Reply-To: <20040122062538.53174.qmail@web60209.mail.yahoo.com> References: <20040122062538.53174.qmail@web60209.mail.yahoo.com> Message-ID: <933378007.20040122095417@cactus.dk> Hi Sad Maybe I should have had two espressos as wake-up coffee - anyway I find it hard to follow this. However, quoting your original message: >> > I need to display 4 listbox' with data. >> > >> > Every listbox has the same table as source. >> > Every listbox has a query as RowSource >> > Every listbox has this layout: >> > >> > Proces Type | Date | # Records >> > >> > Listbox 1 displays 4 records >> > Listbox 2 displays 2 records >> > Listbox 3 displays 6 records >> > Listbox 4 displays 3 records >> > >> > So the table (tblMultiInterface) has 15 records in total. I guess - as you list all records - it should be possible somehow to group the records and do a "Select .. In .." or mark the records for selection. This process can't last for many minutes. The process time must be caused by the selection of the original records which you seem to write to a temporay table. /gustav From accessd666 at yahoo.com Thu Jan 22 03:23:36 2004 From: accessd666 at yahoo.com (Sad Der) Date: Thu, 22 Jan 2004 01:23:36 -0800 (PST) Subject: [AccessD] Major Performance Issue! + Code + Time In-Reply-To: <007801c3e0c6$8540f8c0$b274d0d5@minster33c3r25> Message-ID: <20040122092336.89411.qmail@web60204.mail.yahoo.com> Hi, i already timed every proces. here are the results: Proces Time Switch 10 seconds Stam 21 seconds Verhuis 27 seconds CI 94 seconds So the CI is a big one. On the other hand, the other processes also take up a lot of time! SD --- Andy Lacey wrote: > Sander > The first thing I suggest you do is put timing code > in to isolate where you > have performance issue(s). If you don't already have > something I can send > you a copy of JC's timer class (I'm sure he won't > mind). There's no point > aiming attention at one routine only to find that it > represented 0.01% of > the overall time. So, first up, find the lines of > code which are doing the > damage. > > Andy Lacey > http://www.minstersystems.co.uk > > > -----Original Message----- > > From: accessd-bounces at databaseadvisors.com > > [mailto:accessd-bounces at databaseadvisors.com] On > Behalf Of Sad Der > > Sent: 22 January 2004 06:26 > > To: Access Developers discussion and problem > solving > > Subject: RE: [AccessD] Major Performance Issue! + > Code > > > > > > Here is (part of) the code: > > PS: I found the GetMaxDate() function, I think on > wolfwares.com! > > > > > '============================================================= > > ============================ > > ' Function Name : FillStamMeetProces > > ' Parameters : No parameters > > ' Return value : (String) > > ' Purpose : > > ' Assumptions : --- > > ' Uses : --- > > ' Created : 2003-10-24 10:12, SaDe > > ' Modifications : > > > '============================================================= > > ============================ > > Function FillStamMeetProces(strProces As String) > As > > String > > '150 StamMeetData > > '210 StamMeetData > > Dim strMeD As String 'Message_date > > Dim strSQL As String > > Dim strRecordcount As String > > > > On Error GoTo FillStamMeetProces_Error > > Select Case strProces > > Case "SM" > > 'Cleanup table > > DeleteRecords strProces > > > > '---------------------------------------- > > ' 150 Te verwerken ontvangen > stamgegevens > > '---------------------------------------- > > > > > '--------------------------------------------------------- > > 'MaxDate() > > > > > '--------------------------------------------------------- > > strSQL = vbNullString > > > > 'SQL statement to fetch most recent date > > strSQL = "SELECT Max([Bericht 150 (Update > Master > > Data)].Message_Date) AS MaxOfMessage_Date " & _ > > "FROM [Bericht 150 (Update Master > > Data)] " & _ > > "WHERE Connect_EAN =" & "'" & > > gstrSelectedEan & "' " > > > > strMeD = GetMaxDate(strSQL) > > If Len(strMeD) = 0 Then > > strMeD = "N/A" > > End If > > > > > '--------------------------------------------------------- > > 'Aantal Records > > > > > '--------------------------------------------------------- > > strSQL = vbNullString > > 'SQL statement to fetch most recent date > > strSQL = "SELECT COUNT(*) " & _ > > "FROM [Bericht 150 (Update Master > > Data)] " & _ > > "WHERE Connect_EAN =" & "'" & > > gstrSelectedEan & "' " > > > > strRecordcount = GetRecordCount(strSQL) > > > > 'Check if a date was returned > > If strRecordcount = vbNullString Then > > strRecordcount = "0" > > End If > > > > 'Create new record > > AddRecords strProces, "150", strMeD, > > strRecordcount > > > > '---------------------------------------- > > ' 210 Te verwerken ontvangen meetdata > > '---------------------------------------- > > > > > '--------------------------------------------------------- > > 'MaxDate() > > > > > '--------------------------------------------------------- > > strMeD = vbNullString > > strSQL = vbNullString > > 'SQL statement to fetch most recent date > > strSQL = "SELECT > Max(V2_210_MEDTD1.message_date) > > AS MaxOfmessage_date " & _ > > "FROM V2_210_MEDTD1 " & _ > > "WHERE Connect_EAN =" & "'" & > > gstrSelectedEan & "' " > > > > strMeD = GetMaxDate(strSQL) > > If Len(strMeD) = 0 Then > > strMeD = "N/A" > > End If > > > > > '--------------------------------------------------------- > > 'Aantal Records > > > > > '--------------------------------------------------------- > > strSQL = vbNullString > > 'SQL statement to fetch most recent date > > strSQL = "SELECT COUNT(*) " & _ > > "FROM V2_210_MEDTD1 " & _ > > "WHERE Connect_EAN =" & "'" & > > gstrSelectedEan & "' " > > > > strRecordcount = GetRecordCount(strSQL) > > > > 'Check if a date was returned > > If strRecordcount = vbNullString Then > > strRecordcount = "0" > > End If > > > > 'Create new record > > AddRecords strProces, "210", strMeD, > > strRecordcount > > Case Else > > MsgBox "UNKNOW PROCES!" > > End Select > > > > FillStamMeetProces_Exit: > > ' Collect your garbage here > > Exit Function > > FillStamMeetProces_Error: > > ' Collect your garbage here > > Call > > g_oGenErr.Throw("Switchdatabase.mMultiInterface", > > "FillStamMeetProces") > > End Function > > > > Function GetMaxDate(strSQL As String) As String > > 'Dim strSQL As String > > Dim conn As ADODB.Connection > > Dim rstBericht As ADODB.Recordset > > Dim strMaxDate As String > > > > Set conn = CurrentProject.Connection > > Set rstBericht = New ADODB.Recordset > > > > > > With rstBericht > > .ActiveConnection = conn > > .CursorType = adOpenKeyset > > .LockType = adLockReadOnly > > .Source = strSQL > > .Open > > If .RecordCount > 0 Then > > If IsNull(.Fields(0)) Then > > strMaxDate = vbNullString > > Else > > strMaxDate = .Fields(0) > > End If > > Else > > strMaxDate = vbNullString > > End If > > End With > > > === message truncated === __________________________________ Do you Yahoo!? Yahoo! SiteBuilder - Free web site building tool. Try it! http://webhosting.yahoo.com/ps/sb/ From Erwin.Craps at ithelps.be Thu Jan 22 04:16:30 2004 From: Erwin.Craps at ithelps.be (Erwin Craps - IT Helps) Date: Thu, 22 Jan 2004 11:16:30 +0100 Subject: [AccessD] Major Performance Issue! + Code + Time Message-ID: <46B976F2B698FF46A4FE7636509B22DF03D14C@stekelbes.ithelps.local> Hi Sad I don't seem to find the CI code so it's dificult to suggest you something. Altough 1 remark that I experianced in some heavy testing I done in Access 2K concerning the use of DAO or ADO. I see that u are using Access 2K with an MDB backend. First of all, use of ADO should be (future wise) be stimulated over DAO. However. In a pretty heavy app I have I had procedures that took 5 to 30 minutes to perform, and therefor I done some heavy testing with ADO/DAO to improve speed on these. My conclusings where that when using MSA2K and the jet database (MDB file) the use of ADO should be avoided or even compleetly ignored in time consuming or itteration functions. ADO is, when using, JET, much much slower than DAO in almost every case. I noticed that some simple function are by average 2 to 7 times slower. In some case they where 15 to 30 times slower. So using ADO with Jet is fine when you will not use the function in an itteration. For example your function GetMaxDate(). If this is used in an itteration x thousend of times, you will get high speed advantages when recoding the function with DAO or even a simple dlookup or dmax. Also putting indexes on the filter fiels of an sql string in a function used in itteration is ofcourse also important but this is beside the ADO/DAO issue. Please note for the record that the use of ADO should be motivated (certainly with SQL server as a backend) but ADO does have long delays compared with DAO in at least Access 2000. Did no testing in 2K2 or 2K2, so I don't know for these, but I expect it to be the same. I decided for my self not to use ADO as long as I work with JET (mdb backend files) (except when using ASP/ASPX) Erwin From accessd666 at yahoo.com Thu Jan 22 04:29:32 2004 From: accessd666 at yahoo.com (Sad Der) Date: Thu, 22 Jan 2004 02:29:32 -0800 (PST) Subject: [AccessD] Major Performance Issue! + Code + Time In-Reply-To: <46B976F2B698FF46A4FE7636509B22DF03D14C@stekelbes.ithelps.local> Message-ID: <20040122102932.67265.qmail@web60202.mail.yahoo.com> thnx, I'll try rebuilding it to DAO and then time it again. Sad --- Erwin Craps - IT Helps wrote: > Hi Sad > > I don't seem to find the CI code so it's dificult to > suggest you > something. > > Altough 1 remark that I experianced in some heavy > testing I done in > Access 2K concerning the use of DAO or ADO. I see > that u are using > Access 2K with an MDB backend. > > First of all, use of ADO should be (future wise) be > stimulated over DAO. > However. > In a pretty heavy app I have I had procedures that > took 5 to 30 minutes > to perform, and therefor I done some heavy testing > with ADO/DAO to > improve speed on these. > > My conclusings where that when using MSA2K and the > jet database (MDB > file) the use of ADO should be avoided or even > compleetly ignored in > time consuming or itteration functions. > ADO is, when using, JET, much much slower than DAO > in almost every case. > I noticed that some simple function are by average 2 > to 7 times slower. > In some case they where 15 to 30 times slower. > > So using ADO with Jet is fine when you will not use > the function in an > itteration. > For example your function GetMaxDate(). If this is > used in an itteration > x thousend of times, you will get high speed > advantages when recoding > the function with DAO or even a simple dlookup or > dmax. > Also putting indexes on the filter fiels of an sql > string in a function > used in itteration is ofcourse also important but > this is beside the > ADO/DAO issue. > > Please note for the record that the use of ADO > should be motivated > (certainly with SQL server as a backend) but ADO > does have long delays > compared with DAO in at least Access 2000. > Did no testing in 2K2 or 2K2, so I don't know for > these, but I expect it > to be the same. > I decided for my self not to use ADO as long as I > work with JET (mdb > backend files) (except when using ASP/ASPX) > > > > Erwin > > > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com __________________________________ Do you Yahoo!? Yahoo! SiteBuilder - Free web site building tool. Try it! http://webhosting.yahoo.com/ps/sb/ From Alun.Garraway at otto.de Thu Jan 22 05:12:56 2004 From: Alun.Garraway at otto.de (Garraway, Alun) Date: Thu, 22 Jan 2004 12:12:56 +0100 Subject: [AccessD] changing data from "Crosstab" to "Normal" tbl view? Message-ID: hi, I have a tbl that looks like a spreedsheet, the table looks like this: ART_NR W1 W2 W3 W4 .... W30 110 10 8 12 14 258 20 16 22 13 what I want to do is "normalize" the data like this: ART_NR WEEK ORDERS 110 1 10 110 2 8 110 3 12 110 4 14 258 1 20 258 2 16 etc is that possible (with sql), I can't think of anything :-( alun From andy at minstersystems.co.uk Thu Jan 22 06:27:59 2004 From: andy at minstersystems.co.uk (Andy Lacey) Date: Thu, 22 Jan 2004 12:27:59 -0000 Subject: [AccessD] Major Performance Issue! + Code + Time In-Reply-To: <20040122102932.67265.qmail@web60202.mail.yahoo.com> Message-ID: <008701c3e0e3$2bcae0e0$b274d0d5@minster33c3r25> Make sure you have indexes on the significant fields too. Andy Lacey http://www.minstersystems.co.uk > -----Original Message----- > From: accessd-bounces at databaseadvisors.com > [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Sad Der > Sent: 22 January 2004 10:30 > To: Access Developers discussion and problem solving > Subject: RE: [AccessD] Major Performance Issue! + Code + Time > > > thnx, > I'll try rebuilding it to DAO and then time it again. > > Sad > --- Erwin Craps - IT Helps > wrote: > > Hi Sad > > > > I don't seem to find the CI code so it's dificult to > > suggest you > > something. > > > > Altough 1 remark that I experianced in some heavy > > testing I done in > > Access 2K concerning the use of DAO or ADO. I see > > that u are using > > Access 2K with an MDB backend. > > > > First of all, use of ADO should be (future wise) be stimulated over > > DAO. However. > > In a pretty heavy app I have I had procedures that > > took 5 to 30 minutes > > to perform, and therefor I done some heavy testing > > with ADO/DAO to > > improve speed on these. > > > > My conclusings where that when using MSA2K and the > > jet database (MDB > > file) the use of ADO should be avoided or even > > compleetly ignored in > > time consuming or itteration functions. > > ADO is, when using, JET, much much slower than DAO > > in almost every case. > > I noticed that some simple function are by average 2 > > to 7 times slower. > > In some case they where 15 to 30 times slower. > > > > So using ADO with Jet is fine when you will not use > > the function in an > > itteration. > > For example your function GetMaxDate(). If this is > > used in an itteration > > x thousend of times, you will get high speed > > advantages when recoding > > the function with DAO or even a simple dlookup or > > dmax. > > Also putting indexes on the filter fiels of an sql > > string in a function > > used in itteration is ofcourse also important but > > this is beside the > > ADO/DAO issue. > > > > Please note for the record that the use of ADO > > should be motivated > > (certainly with SQL server as a backend) but ADO > > does have long delays > > compared with DAO in at least Access 2000. > > Did no testing in 2K2 or 2K2, so I don't know for > > these, but I expect it > > to be the same. > > I decided for my self not to use ADO as long as I > > work with JET (mdb > > backend files) (except when using ASP/ASPX) > > > > > > > > Erwin > > > > > > _______________________________________________ > > AccessD mailing list > > AccessD at databaseadvisors.com > > http://databaseadvisors.com/mailman/listinfo/accessd > > Website: http://www.databaseadvisors.com > > > __________________________________ > Do you Yahoo!? > Yahoo! SiteBuilder - Free web site building tool. Try it! http://webhosting.yahoo.com/ps/sb/ _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From Developer at UltraDNT.com Thu Jan 22 07:37:01 2004 From: Developer at UltraDNT.com (Developer) Date: Thu, 22 Jan 2004 08:37:01 -0500 Subject: [AccessD] Worldwide Media exchange or is this a Schuss Boomer? In-Reply-To: <400F747F.6000403@shaw.ca> Message-ID: <000901c3e0ec$d1070df0$7001a8c0@COA3> Schuss boomer? -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of MartyConnelly Sent: Thursday, January 22, 2004 1:58 AM To: Access Developers discussion and problem solving Subject: [AccessD] Worldwide Media exchange or is this a Schuss Boomer? http://wwmx.org/FullMediaView.aspx?mediaid=29423 mainsite http://wwmx.org/WebClient.aspx Here is a interesting new use of GPS and Images via ASP.net from Microsoft Research. Free download of api and net client For all surveillance lovers: microsoft research ask people from all over the world to send in photos and the location data, where the photos were shot. they hope to collect "gazillions" of photos and make a visual map of the whole world... -- Marty Connelly Victoria, B.C. Canada _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From serbach at new.rr.com Thu Jan 22 07:54:09 2004 From: serbach at new.rr.com (Steven W. Erbach) Date: Thu, 22 Jan 2004 07:54:09 -0600 Subject: [AccessD] A2K: Something new Message-ID: <20040122075409.551708087.serbach@new.rr.com> Dear Group, You think you've seen it all, when all of a sudden... I've taken over development and support of a domestic violence shelter statistics program. In my efforts to re-factor (how's that for an Extreme Programming term?) some of the data entry forms I've run into something odd. One of the main data entry forms (key field ChildID) has a subform which contains a Tab object. Each of the tabs on this subform contains a sub-subform. While getting familiar with the workings of the program I noticed that one of the sub-subforms did not have the proper linking fields set up. The subform's linking field is that same ChildID...but the RecordSource table for the subform is NOT keyed! The sub-subform in question also has only ChildID as the linking field...but the key field for the sub-subform's table is FreeFormID. ChildID is a foreign key in that table. The behavior I'm seeing is this: when I go to check the linking fields in the subform I noticed that the VB window's title bar shows the following: Microsoft Visual Basic - STATISTICS [running] After a moment I see the Subform Field Linker dialog box. While the dialog box is on-screen the title bar of the VB window shows [running]. When I close the dialog box the VB window flashes and [running] disappears from the title bar. But when I go to check the linking fields for the sub-subform in question, [running] appears once again in the VB title bar, but then I see a Microsoft Access dialog box with the following message and OK button: Object variable or With block variable not set ...as if the application was trying to start itself! I can't get at the Subform Field Linker dialog box at all. When I click OK on the dialog box the VB window flashes and [running] disappears from the title bar. So I tried deleting the sub-subform and placing it on the tab page again. When I've finished using the subform tool to place the object on the tab page, I get another dialog box labeled "StatsTracker" (the name of the application): Your code contains a syntax error, or a Stats Tracker function you need isn't available. If the syntax is correct, check the Control Wizards subkey or the Libraries key in the StatsTracker section of the Windows Registry to verify that the entries you need are listed and available. I click OK and I see the subform object on the tab page. I can assign the Source Object property, but when I go to Link Master Fields I get the "Object variable or With block variable not set" message. Can any of you figure out what's happening to me here? Thank you. Regards, Steve Erbach Scientific Marketing Neenah, WI 920-969-0504 Message created with Bloomba Disclaimer: No tree was killed in the transmission of this message. However, several coulombs of electrons were temporarily inconvenienced. From jwcolby at colbyconsulting.com Thu Jan 22 08:50:43 2004 From: jwcolby at colbyconsulting.com (John W. Colby) Date: Thu, 22 Jan 2004 09:50:43 -0500 Subject: [AccessD] Major Performance Issue! + Code In-Reply-To: <007801c3e0c6$8540f8c0$b274d0d5@minster33c3r25> Message-ID: Andy, I don't mind at all sharing my demos. However I have also placed a copy of this timer in a demo, on my site under Misc Demos / C2DbTimerClass. John W. Colby www.ColbyConsulting.com -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Andy Lacey Sent: Thursday, January 22, 2004 4:03 AM To: 'Access Developers discussion and problem solving' Subject: RE: [AccessD] Major Performance Issue! + Code Sander The first thing I suggest you do is put timing code in to isolate where you have performance issue(s). If you don't already have something I can send you a copy of JC's timer class (I'm sure he won't mind). There's no point aiming attention at one routine only to find that it represented 0.01% of the overall time. So, first up, find the lines of code which are doing the damage. Andy Lacey http://www.minstersystems.co.uk > -----Original Message----- > From: accessd-bounces at databaseadvisors.com > [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Sad Der > Sent: 22 January 2004 06:26 > To: Access Developers discussion and problem solving > Subject: RE: [AccessD] Major Performance Issue! + Code > > > Here is (part of) the code: > PS: I found the GetMaxDate() function, I think on wolfwares.com! > > '============================================================= > ============================ > ' Function Name : FillStamMeetProces > ' Parameters : No parameters > ' Return value : (String) > ' Purpose : > ' Assumptions : --- > ' Uses : --- > ' Created : 2003-10-24 10:12, SaDe > ' Modifications : > '============================================================= > ============================ > Function FillStamMeetProces(strProces As String) As > String > '150 StamMeetData > '210 StamMeetData > Dim strMeD As String 'Message_date > Dim strSQL As String > Dim strRecordcount As String > > On Error GoTo FillStamMeetProces_Error > Select Case strProces > Case "SM" > 'Cleanup table > DeleteRecords strProces > > '---------------------------------------- > ' 150 Te verwerken ontvangen stamgegevens > '---------------------------------------- > > '--------------------------------------------------------- > 'MaxDate() > > '--------------------------------------------------------- > strSQL = vbNullString > > 'SQL statement to fetch most recent date > strSQL = "SELECT Max([Bericht 150 (Update Master > Data)].Message_Date) AS MaxOfMessage_Date " & _ > "FROM [Bericht 150 (Update Master > Data)] " & _ > "WHERE Connect_EAN =" & "'" & > gstrSelectedEan & "' " > > strMeD = GetMaxDate(strSQL) > If Len(strMeD) = 0 Then > strMeD = "N/A" > End If > > '--------------------------------------------------------- > 'Aantal Records > > '--------------------------------------------------------- > strSQL = vbNullString > 'SQL statement to fetch most recent date > strSQL = "SELECT COUNT(*) " & _ > "FROM [Bericht 150 (Update Master > Data)] " & _ > "WHERE Connect_EAN =" & "'" & > gstrSelectedEan & "' " > > strRecordcount = GetRecordCount(strSQL) > > 'Check if a date was returned > If strRecordcount = vbNullString Then > strRecordcount = "0" > End If > > 'Create new record > AddRecords strProces, "150", strMeD, > strRecordcount > > '---------------------------------------- > ' 210 Te verwerken ontvangen meetdata > '---------------------------------------- > > '--------------------------------------------------------- > 'MaxDate() > > '--------------------------------------------------------- > strMeD = vbNullString > strSQL = vbNullString > 'SQL statement to fetch most recent date > strSQL = "SELECT Max(V2_210_MEDTD1.message_date) > AS MaxOfmessage_date " & _ > "FROM V2_210_MEDTD1 " & _ > "WHERE Connect_EAN =" & "'" & > gstrSelectedEan & "' " > > strMeD = GetMaxDate(strSQL) > If Len(strMeD) = 0 Then > strMeD = "N/A" > End If > > '--------------------------------------------------------- > 'Aantal Records > > '--------------------------------------------------------- > strSQL = vbNullString > 'SQL statement to fetch most recent date > strSQL = "SELECT COUNT(*) " & _ > "FROM V2_210_MEDTD1 " & _ > "WHERE Connect_EAN =" & "'" & > gstrSelectedEan & "' " > > strRecordcount = GetRecordCount(strSQL) > > 'Check if a date was returned > If strRecordcount = vbNullString Then > strRecordcount = "0" > End If > > 'Create new record > AddRecords strProces, "210", strMeD, > strRecordcount > Case Else > MsgBox "UNKNOW PROCES!" > End Select > > FillStamMeetProces_Exit: > ' Collect your garbage here > Exit Function > FillStamMeetProces_Error: > ' Collect your garbage here > Call > g_oGenErr.Throw("Switchdatabase.mMultiInterface", > "FillStamMeetProces") > End Function > > Function GetMaxDate(strSQL As String) As String > 'Dim strSQL As String > Dim conn As ADODB.Connection > Dim rstBericht As ADODB.Recordset > Dim strMaxDate As String > > Set conn = CurrentProject.Connection > Set rstBericht = New ADODB.Recordset > > > With rstBericht > .ActiveConnection = conn > .CursorType = adOpenKeyset > .LockType = adLockReadOnly > .Source = strSQL > .Open > If .RecordCount > 0 Then > If IsNull(.Fields(0)) Then > strMaxDate = vbNullString > Else > strMaxDate = .Fields(0) > End If > Else > strMaxDate = vbNullString > End If > End With > > 'Return value > GetMaxDate = strMaxDate > > Set rstBericht = Nothing > End Function > > > '============================================================= > ============================ > ' Function Name : AddRecords > ' Parameters : strProces As String > ' strBericht As String > ' strDatum As String > ' strAantal As String > ' Return value : (Boolean) > ' Purpose : Inserts records into > tblMultiInterface. This table is used to display > detail > ' information regarding the > switch, verhuis, stam & meetdata and contract > ' processes > ' Assumptions : --- > ' Uses : --- > ' Created : 2003-10-21 09:00, SaDe > ' Modifications : > '============================================================= > ============================ > Function AddRecords(strProces As String, strBericht As > String, strDatum As String, strAantal As String) As > Boolean > Dim strSQL As String > > On Error GoTo AddRecords_Error > strSQL = "INSERT INTO tblMultiInterface VALUES (""" > & strProces & """,""" & strBericht & """,""" & > strDatum & """,""" & strAantal & """ )" > DoCmd.RunSQL strSQL > > AddRecords_Exit: > ' Collect your garbage here > Exit Function > AddRecords_Error: > ' Collect your garbage here > Call > g_oGenErr.Throw("Switchdatabase.Form_fMultiInterface", > "AddRecords") > > End Function > > --- Andy Lacey wrote: > > Sander > > Rather than attaching the code try pasting it into > > the email. Shouldn't be a > > size issue then, unless, of course, there's miles of > > it! I don't know about > > anyone else but I certainly would get a clearer > > picture of what you're doing > > by seeing the code. Can't really get a handle on it > > yet. > > > > Andy Lacey > > http://www.minstersystems.co.uk > > > > > -----Original Message----- > > > From: accessd-bounces at databaseadvisors.com > > > [mailto:accessd-bounces at databaseadvisors.com] On > > Behalf Of Sad Der > > > Sent: 21 January 2004 08:40 > > > To: Acces User Group > > > Subject: [AccessD] Major Performance Issue! > > > > > > > > > Hi group, > > > > > > I've got a MAJOR performance issue. I need to > > display > > > a lot of data. A performance test showed that it > > takes > > > between 120 - 160 seconds (2 minutes - 2.40 > > minutes) > > > to display the data! I have no idea how to speed > > > things up dramaticly. I really could use some > > tips. > > > > > > Here's a description of the current environment: > > > Access 2000 Client (size: 20 Mb) > > > Access 2000 Back-end (size: 100 Mb) > > > approx 4 users > > > Novel network > > > > > > Functionality: > > > I need to display 4 listbox' with data. > > > > > > Every listbox has the same table as source. > > > Every listbox has a query as RowSource > > > Every listbox has this layout: > > > > > > Proces Type | Date | # Records > > > > > > Listbox 1 displays 4 records > > > Listbox 2 displays 2 records > > > Listbox 3 displays 6 records > > > Listbox 4 displays 3 records > > > > > > So the table (tblMultiInterface) has 15 records in > > > total. > > > > > > Table tblMultiInterface > > > Fields: > > > Proces Type Text > > > Date Text (!) > > > Records Text (!) (zero records need to > > display > > > N/A) > > > > > > I added the code as an attachment but unfortunatly > > > this mail was blocked! If anybody would like to > > take a > > > look at the code I can send it to you directly. > > > > > > Comments/tips/etc would be GREATLY appriciated! > > > > > > TIA > > > Sad > > > > > > > > > __________________________________ > > > Do you Yahoo!? > > > Yahoo! Hotjobs: Enter the "Signing Bonus" > > Sweepstakes > > > http://hotjobs.sweepstakes.yahoo.com/signingbo> > > nus > > > > > > _______________________________________________ > > > AccessD > > > mailing list > > > AccessD at databaseadvisors.com > > > http://databaseadvisors.com/mailman/listinfo/a> > > ccessd > > > Website: > > > http://www.databaseadvisors.com > > > > > > > > > > _______________________________________________ > > AccessD mailing list > > AccessD at databaseadvisors.com > > http://databaseadvisors.com/mailman/listinfo/accessd > > Website: http://www.databaseadvisors.com > > > __________________________________ > Do you Yahoo!? > Yahoo! SiteBuilder - Free web site building tool. Try it! http://webhosting.yahoo.com/ps/sb/ _______________________________________________ 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 From andy at minstersystems.co.uk Thu Jan 22 09:03:15 2004 From: andy at minstersystems.co.uk (Andy Lacey) Date: Thu, 22 Jan 2004 15:03:15 -0000 Subject: [AccessD] Major Performance Issue! + Code In-Reply-To: Message-ID: <00be01c3e0f8$dcf0ddb0$b274d0d5@minster33c3r25> I did look John. Did I miss it or have you only just done that? Either way I really hope you don't mind. I did hesitate but as I'd got it from you I was sure it'd be ok. As it happends Sander hasn't asked for it. Andy Lacey http://www.minstersystems.co.uk > -----Original Message----- > From: accessd-bounces at databaseadvisors.com > [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of > John W. Colby > Sent: 22 January 2004 14:51 > To: Access Developers discussion and problem solving > Subject: RE: [AccessD] Major Performance Issue! + Code > > > Andy, > > I don't mind at all sharing my demos. However I have also > placed a copy of this timer in a demo, on my site under Misc > Demos / C2DbTimerClass. > > John W. Colby > www.ColbyConsulting.com > > -----Original Message----- > From: accessd-bounces at databaseadvisors.com > [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Andy Lacey > Sent: Thursday, January 22, 2004 4:03 AM > To: 'Access Developers discussion and problem solving' > Subject: RE: [AccessD] Major Performance Issue! + Code > > > Sander > The first thing I suggest you do is put timing code in to > isolate where you have performance issue(s). If you don't > already have something I can send you a copy of JC's timer > class (I'm sure he won't mind). There's no point aiming > attention at one routine only to find that it represented > 0.01% of the overall time. So, first up, find the lines of > code which are doing the damage. > > Andy Lacey > http://www.minstersystems.co.uk > > > -----Original Message----- > > From: accessd-bounces at databaseadvisors.com > > [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Sad Der > > Sent: 22 January 2004 06:26 > > To: Access Developers discussion and problem solving > > Subject: RE: [AccessD] Major Performance Issue! + Code > > > > > > Here is (part of) the code: > > PS: I found the GetMaxDate() function, I think on wolfwares.com! > > > > '============================================================= > > ============================ > > ' Function Name : FillStamMeetProces > > ' Parameters : No parameters > > ' Return value : (String) > > ' Purpose : > > ' Assumptions : --- > > ' Uses : --- > > ' Created : 2003-10-24 10:12, SaDe > > ' Modifications : > > '============================================================= > > ============================ > > Function FillStamMeetProces(strProces As String) As > > String > > '150 StamMeetData > > '210 StamMeetData > > Dim strMeD As String 'Message_date > > Dim strSQL As String > > Dim strRecordcount As String > > > > On Error GoTo FillStamMeetProces_Error > > Select Case strProces > > Case "SM" > > 'Cleanup table > > DeleteRecords strProces > > > > '---------------------------------------- > > ' 150 Te verwerken ontvangen stamgegevens > > '---------------------------------------- > > > > '--------------------------------------------------------- > > 'MaxDate() > > > > '--------------------------------------------------------- > > strSQL = vbNullString > > > > 'SQL statement to fetch most recent date > > strSQL = "SELECT Max([Bericht 150 (Update Master > > Data)].Message_Date) AS MaxOfMessage_Date " & _ > > "FROM [Bericht 150 (Update Master > > Data)] " & _ > > "WHERE Connect_EAN =" & "'" & > > gstrSelectedEan & "' " > > > > strMeD = GetMaxDate(strSQL) > > If Len(strMeD) = 0 Then > > strMeD = "N/A" > > End If > > > > '--------------------------------------------------------- > > 'Aantal Records > > > > '--------------------------------------------------------- > > strSQL = vbNullString > > 'SQL statement to fetch most recent date > > strSQL = "SELECT COUNT(*) " & _ > > "FROM [Bericht 150 (Update Master > > Data)] " & _ > > "WHERE Connect_EAN =" & "'" & > > gstrSelectedEan & "' " > > > > strRecordcount = GetRecordCount(strSQL) > > > > 'Check if a date was returned > > If strRecordcount = vbNullString Then > > strRecordcount = "0" > > End If > > > > 'Create new record > > AddRecords strProces, "150", strMeD, > > strRecordcount > > > > '---------------------------------------- > > ' 210 Te verwerken ontvangen meetdata > > '---------------------------------------- > > > > '--------------------------------------------------------- > > 'MaxDate() > > > > '--------------------------------------------------------- > > strMeD = vbNullString > > strSQL = vbNullString > > 'SQL statement to fetch most recent date > > strSQL = "SELECT Max(V2_210_MEDTD1.message_date) > > AS MaxOfmessage_date " & _ > > "FROM V2_210_MEDTD1 " & _ > > "WHERE Connect_EAN =" & "'" & > > gstrSelectedEan & "' " > > > > strMeD = GetMaxDate(strSQL) > > If Len(strMeD) = 0 Then > > strMeD = "N/A" > > End If > > > > '--------------------------------------------------------- > > 'Aantal Records > > > > '--------------------------------------------------------- > > strSQL = vbNullString > > 'SQL statement to fetch most recent date > > strSQL = "SELECT COUNT(*) " & _ > > "FROM V2_210_MEDTD1 " & _ > > "WHERE Connect_EAN =" & "'" & > > gstrSelectedEan & "' " > > > > strRecordcount = GetRecordCount(strSQL) > > > > 'Check if a date was returned > > If strRecordcount = vbNullString Then > > strRecordcount = "0" > > End If > > > > 'Create new record > > AddRecords strProces, "210", strMeD, > > strRecordcount > > Case Else > > MsgBox "UNKNOW PROCES!" > > End Select > > > > FillStamMeetProces_Exit: > > ' Collect your garbage here > > Exit Function > > FillStamMeetProces_Error: > > ' Collect your garbage here > > Call > > g_oGenErr.Throw("Switchdatabase.mMultiInterface", > > "FillStamMeetProces") > > End Function > > > > Function GetMaxDate(strSQL As String) As String > > 'Dim strSQL As String > > Dim conn As ADODB.Connection > > Dim rstBericht As ADODB.Recordset > > Dim strMaxDate As String > > > > Set conn = CurrentProject.Connection > > Set rstBericht = New ADODB.Recordset > > > > > > With rstBericht > > .ActiveConnection = conn > > .CursorType = adOpenKeyset > > .LockType = adLockReadOnly > > .Source = strSQL > > .Open > > If .RecordCount > 0 Then > > If IsNull(.Fields(0)) Then > > strMaxDate = vbNullString > > Else > > strMaxDate = .Fields(0) > > End If > > Else > > strMaxDate = vbNullString > > End If > > End With > > > > 'Return value > > GetMaxDate = strMaxDate > > > > Set rstBericht = Nothing > > End Function > > > > > > '============================================================= > > ============================ > > ' Function Name : AddRecords > > ' Parameters : strProces As String > > ' strBericht As String > > ' strDatum As String > > ' strAantal As String > > ' Return value : (Boolean) > > ' Purpose : Inserts records into > > tblMultiInterface. This table is used to display > > detail > > ' information regarding the > > switch, verhuis, stam & meetdata and contract > > ' processes > > ' Assumptions : --- > > ' Uses : --- > > ' Created : 2003-10-21 09:00, SaDe > > ' Modifications : > > '============================================================= > > ============================ > > Function AddRecords(strProces As String, strBericht As String, > > strDatum As String, strAantal As String) As Boolean > > Dim strSQL As String > > > > On Error GoTo AddRecords_Error > > strSQL = "INSERT INTO tblMultiInterface VALUES (""" > > & strProces & """,""" & strBericht & """,""" & > > strDatum & """,""" & strAantal & """ )" > > DoCmd.RunSQL strSQL > > > > AddRecords_Exit: > > ' Collect your garbage here > > Exit Function > > AddRecords_Error: > > ' Collect your garbage here > > Call g_oGenErr.Throw("Switchdatabase.Form_fMultiInterface", > > "AddRecords") > > > > End Function > > > > --- Andy Lacey wrote: > > > Sander > > > Rather than attaching the code try pasting it into > > > the email. Shouldn't be a > > > size issue then, unless, of course, there's miles of > > > it! I don't know about > > > anyone else but I certainly would get a clearer > > > picture of what you're doing > > > by seeing the code. Can't really get a handle on it > > > yet. > > > > > > Andy Lacey > > > http://www.minstersystems.co.uk > > > > > > > -----Original Message----- > > > > From: accessd-bounces at databaseadvisors.com > > > > [mailto:accessd-bounces at databaseadvisors.com] On > > > Behalf Of Sad Der > > > > Sent: 21 January 2004 08:40 > > > > To: Acces User Group > > > > Subject: [AccessD] Major Performance Issue! > > > > > > > > > > > > Hi group, > > > > > > > > I've got a MAJOR performance issue. I need to > > > display > > > > a lot of data. A performance test showed that it > > > takes > > > > between 120 - 160 seconds (2 minutes - 2.40 > > > minutes) > > > > to display the data! I have no idea how to speed > > > > things up dramaticly. I really could use some > > > tips. > > > > > > > > Here's a description of the current environment: > > > > Access 2000 Client (size: 20 Mb) > > > > Access 2000 Back-end (size: 100 Mb) > > > > approx 4 users > > > > Novel network > > > > > > > > Functionality: > > > > I need to display 4 listbox' with data. > > > > > > > > Every listbox has the same table as source. > > > > Every listbox has a query as RowSource > > > > Every listbox has this layout: > > > > > > > > Proces Type | Date | # Records > > > > > > > > Listbox 1 displays 4 records > > > > Listbox 2 displays 2 records > > > > Listbox 3 displays 6 records > > > > Listbox 4 displays 3 records > > > > > > > > So the table (tblMultiInterface) has 15 records in > > > > total. > > > > > > > > Table tblMultiInterface > > > > Fields: > > > > Proces Type Text > > > > Date Text (!) > > > > Records Text (!) (zero records need to > > > display > > > > N/A) > > > > > > > > I added the code as an attachment but unfortunatly > > > > this mail was blocked! If anybody would like to > > > take a > > > > look at the code I can send it to you directly. > > > > > > > > Comments/tips/etc would be GREATLY appriciated! > > > > > > > > TIA > > > > Sad > > > > > > > > > > > > __________________________________ > > > > Do you Yahoo!? > > > > Yahoo! Hotjobs: Enter the "Signing Bonus" > > > Sweepstakes > > > > http://hotjobs.sweepstakes.yahoo.com/signingbo> > > > nus > > > > > > > > _______________________________________________ > > > > AccessD > > > > mailing list > > > > AccessD at databaseadvisors.com > > > > http://databaseadvisors.com/mailman/listinfo/a> > > > ccessd > > > > Website: > > > > http://www.databaseadvisors.com > > > > > > > > > > > > > > _______________________________________________ > > > AccessD mailing list > > > AccessD at databaseadvisors.com > > > http://databaseadvisors.com/mailman/listinfo/accessd > > > Website: http://www.databaseadvisors.com > > > > > > __________________________________ > > Do you Yahoo!? > > Yahoo! SiteBuilder - Free web site building tool. Try it! > http://webhosting.yahoo.com/ps/sb/ > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/a> ccessd > Website: > http://www.databaseadvisors.com > > > > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/a> ccessd > Website: > http://www.databaseadvisors.com > > > > > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/a> ccessd > Website: > http://www.databaseadvisors.com > > From mark at theopg.com Thu Jan 22 09:09:58 2004 From: mark at theopg.com (Mark H) Date: Thu, 22 Jan 2004 15:09:58 -0000 Subject: [AccessD] [OT Slightly] Access XP to Word using ADO results in toolbars being turned off in word In-Reply-To: Message-ID: <001801c3e0f9$ccc4bd70$330d6bd5@netboxxp> Hello All... Using Office XP and ADO I have a report which is generated from an Access database into a Word document. The word doc uses ADO to collect the report data from report data tables in the mdb, writes it out, saves it to a new document and then closes leaving the user looking at a new copy of the report (less the modules). I use the same template for Word 97 and XP. In XP, if I prompt the user to save the report when its created (using Dialogs(wdDialogFileSaveAs)), or even save it without prompting (using activedocument.saveas), they are left looking at the report but all toolbars are hidden... !?! And I can't see how to turn them back on... In office 97 everything works fine. Any ideas much appreciated... Cheers Mark From jwcolby at colbyconsulting.com Thu Jan 22 09:14:18 2004 From: jwcolby at colbyconsulting.com (John W. Colby) Date: Thu, 22 Jan 2004 10:14:18 -0500 Subject: [AccessD] Major Performance Issue! + Code In-Reply-To: <00be01c3e0f8$dcf0ddb0$b274d0d5@minster33c3r25> Message-ID: I just put it up 10 minutes ago. And I really don't mind at all. All of the demos I do are designed to help our list members to learn neat stuff and do their jobs better. John W. Colby www.ColbyConsulting.com -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Andy Lacey Sent: Thursday, January 22, 2004 10:03 AM To: 'Access Developers discussion and problem solving' Subject: RE: [AccessD] Major Performance Issue! + Code I did look John. Did I miss it or have you only just done that? Either way I really hope you don't mind. I did hesitate but as I'd got it from you I was sure it'd be ok. As it happends Sander hasn't asked for it. Andy Lacey http://www.minstersystems.co.uk > -----Original Message----- > From: accessd-bounces at databaseadvisors.com > [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of > John W. Colby > Sent: 22 January 2004 14:51 > To: Access Developers discussion and problem solving > Subject: RE: [AccessD] Major Performance Issue! + Code > > > Andy, > > I don't mind at all sharing my demos. However I have also > placed a copy of this timer in a demo, on my site under Misc > Demos / C2DbTimerClass. > > John W. Colby > www.ColbyConsulting.com > > -----Original Message----- > From: accessd-bounces at databaseadvisors.com > [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Andy Lacey > Sent: Thursday, January 22, 2004 4:03 AM > To: 'Access Developers discussion and problem solving' > Subject: RE: [AccessD] Major Performance Issue! + Code > > > Sander > The first thing I suggest you do is put timing code in to > isolate where you have performance issue(s). If you don't > already have something I can send you a copy of JC's timer > class (I'm sure he won't mind). There's no point aiming > attention at one routine only to find that it represented > 0.01% of the overall time. So, first up, find the lines of > code which are doing the damage. > > Andy Lacey > http://www.minstersystems.co.uk > > > -----Original Message----- > > From: accessd-bounces at databaseadvisors.com > > [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Sad Der > > Sent: 22 January 2004 06:26 > > To: Access Developers discussion and problem solving > > Subject: RE: [AccessD] Major Performance Issue! + Code > > > > > > Here is (part of) the code: > > PS: I found the GetMaxDate() function, I think on wolfwares.com! > > > > '============================================================= > > ============================ > > ' Function Name : FillStamMeetProces > > ' Parameters : No parameters > > ' Return value : (String) > > ' Purpose : > > ' Assumptions : --- > > ' Uses : --- > > ' Created : 2003-10-24 10:12, SaDe > > ' Modifications : > > '============================================================= > > ============================ > > Function FillStamMeetProces(strProces As String) As > > String > > '150 StamMeetData > > '210 StamMeetData > > Dim strMeD As String 'Message_date > > Dim strSQL As String > > Dim strRecordcount As String > > > > On Error GoTo FillStamMeetProces_Error > > Select Case strProces > > Case "SM" > > 'Cleanup table > > DeleteRecords strProces > > > > '---------------------------------------- > > ' 150 Te verwerken ontvangen stamgegevens > > '---------------------------------------- > > > > '--------------------------------------------------------- > > 'MaxDate() > > > > '--------------------------------------------------------- > > strSQL = vbNullString > > > > 'SQL statement to fetch most recent date > > strSQL = "SELECT Max([Bericht 150 (Update Master > > Data)].Message_Date) AS MaxOfMessage_Date " & _ > > "FROM [Bericht 150 (Update Master > > Data)] " & _ > > "WHERE Connect_EAN =" & "'" & > > gstrSelectedEan & "' " > > > > strMeD = GetMaxDate(strSQL) > > If Len(strMeD) = 0 Then > > strMeD = "N/A" > > End If > > > > '--------------------------------------------------------- > > 'Aantal Records > > > > '--------------------------------------------------------- > > strSQL = vbNullString > > 'SQL statement to fetch most recent date > > strSQL = "SELECT COUNT(*) " & _ > > "FROM [Bericht 150 (Update Master > > Data)] " & _ > > "WHERE Connect_EAN =" & "'" & > > gstrSelectedEan & "' " > > > > strRecordcount = GetRecordCount(strSQL) > > > > 'Check if a date was returned > > If strRecordcount = vbNullString Then > > strRecordcount = "0" > > End If > > > > 'Create new record > > AddRecords strProces, "150", strMeD, > > strRecordcount > > > > '---------------------------------------- > > ' 210 Te verwerken ontvangen meetdata > > '---------------------------------------- > > > > '--------------------------------------------------------- > > 'MaxDate() > > > > '--------------------------------------------------------- > > strMeD = vbNullString > > strSQL = vbNullString > > 'SQL statement to fetch most recent date > > strSQL = "SELECT Max(V2_210_MEDTD1.message_date) > > AS MaxOfmessage_date " & _ > > "FROM V2_210_MEDTD1 " & _ > > "WHERE Connect_EAN =" & "'" & > > gstrSelectedEan & "' " > > > > strMeD = GetMaxDate(strSQL) > > If Len(strMeD) = 0 Then > > strMeD = "N/A" > > End If > > > > '--------------------------------------------------------- > > 'Aantal Records > > > > '--------------------------------------------------------- > > strSQL = vbNullString > > 'SQL statement to fetch most recent date > > strSQL = "SELECT COUNT(*) " & _ > > "FROM V2_210_MEDTD1 " & _ > > "WHERE Connect_EAN =" & "'" & > > gstrSelectedEan & "' " > > > > strRecordcount = GetRecordCount(strSQL) > > > > 'Check if a date was returned > > If strRecordcount = vbNullString Then > > strRecordcount = "0" > > End If > > > > 'Create new record > > AddRecords strProces, "210", strMeD, > > strRecordcount > > Case Else > > MsgBox "UNKNOW PROCES!" > > End Select > > > > FillStamMeetProces_Exit: > > ' Collect your garbage here > > Exit Function > > FillStamMeetProces_Error: > > ' Collect your garbage here > > Call > > g_oGenErr.Throw("Switchdatabase.mMultiInterface", > > "FillStamMeetProces") > > End Function > > > > Function GetMaxDate(strSQL As String) As String > > 'Dim strSQL As String > > Dim conn As ADODB.Connection > > Dim rstBericht As ADODB.Recordset > > Dim strMaxDate As String > > > > Set conn = CurrentProject.Connection > > Set rstBericht = New ADODB.Recordset > > > > > > With rstBericht > > .ActiveConnection = conn > > .CursorType = adOpenKeyset > > .LockType = adLockReadOnly > > .Source = strSQL > > .Open > > If .RecordCount > 0 Then > > If IsNull(.Fields(0)) Then > > strMaxDate = vbNullString > > Else > > strMaxDate = .Fields(0) > > End If > > Else > > strMaxDate = vbNullString > > End If > > End With > > > > 'Return value > > GetMaxDate = strMaxDate > > > > Set rstBericht = Nothing > > End Function > > > > > > '============================================================= > > ============================ > > ' Function Name : AddRecords > > ' Parameters : strProces As String > > ' strBericht As String > > ' strDatum As String > > ' strAantal As String > > ' Return value : (Boolean) > > ' Purpose : Inserts records into > > tblMultiInterface. This table is used to display > > detail > > ' information regarding the > > switch, verhuis, stam & meetdata and contract > > ' processes > > ' Assumptions : --- > > ' Uses : --- > > ' Created : 2003-10-21 09:00, SaDe > > ' Modifications : > > '============================================================= > > ============================ > > Function AddRecords(strProces As String, strBericht As String, > > strDatum As String, strAantal As String) As Boolean > > Dim strSQL As String > > > > On Error GoTo AddRecords_Error > > strSQL = "INSERT INTO tblMultiInterface VALUES (""" > > & strProces & """,""" & strBericht & """,""" & > > strDatum & """,""" & strAantal & """ )" > > DoCmd.RunSQL strSQL > > > > AddRecords_Exit: > > ' Collect your garbage here > > Exit Function > > AddRecords_Error: > > ' Collect your garbage here > > Call g_oGenErr.Throw("Switchdatabase.Form_fMultiInterface", > > "AddRecords") > > > > End Function > > > > --- Andy Lacey wrote: > > > Sander > > > Rather than attaching the code try pasting it into > > > the email. Shouldn't be a > > > size issue then, unless, of course, there's miles of > > > it! I don't know about > > > anyone else but I certainly would get a clearer > > > picture of what you're doing > > > by seeing the code. Can't really get a handle on it > > > yet. > > > > > > Andy Lacey > > > http://www.minstersystems.co.uk > > > > > > > -----Original Message----- > > > > From: accessd-bounces at databaseadvisors.com > > > > [mailto:accessd-bounces at databaseadvisors.com] On > > > Behalf Of Sad Der > > > > Sent: 21 January 2004 08:40 > > > > To: Acces User Group > > > > Subject: [AccessD] Major Performance Issue! > > > > > > > > > > > > Hi group, > > > > > > > > I've got a MAJOR performance issue. I need to > > > display > > > > a lot of data. A performance test showed that it > > > takes > > > > between 120 - 160 seconds (2 minutes - 2.40 > > > minutes) > > > > to display the data! I have no idea how to speed > > > > things up dramaticly. I really could use some > > > tips. > > > > > > > > Here's a description of the current environment: > > > > Access 2000 Client (size: 20 Mb) > > > > Access 2000 Back-end (size: 100 Mb) > > > > approx 4 users > > > > Novel network > > > > > > > > Functionality: > > > > I need to display 4 listbox' with data. > > > > > > > > Every listbox has the same table as source. > > > > Every listbox has a query as RowSource > > > > Every listbox has this layout: > > > > > > > > Proces Type | Date | # Records > > > > > > > > Listbox 1 displays 4 records > > > > Listbox 2 displays 2 records > > > > Listbox 3 displays 6 records > > > > Listbox 4 displays 3 records > > > > > > > > So the table (tblMultiInterface) has 15 records in > > > > total. > > > > > > > > Table tblMultiInterface > > > > Fields: > > > > Proces Type Text > > > > Date Text (!) > > > > Records Text (!) (zero records need to > > > display > > > > N/A) > > > > > > > > I added the code as an attachment but unfortunatly > > > > this mail was blocked! If anybody would like to > > > take a > > > > look at the code I can send it to you directly. > > > > > > > > Comments/tips/etc would be GREATLY appriciated! > > > > > > > > TIA > > > > Sad > > > > > > > > > > > > __________________________________ > > > > Do you Yahoo!? > > > > Yahoo! Hotjobs: Enter the "Signing Bonus" > > > Sweepstakes > > > > http://hotjobs.sweepstakes.yahoo.com/signingbo> > > > nus > > > > > > > > _______________________________________________ > > > > AccessD > > > > mailing list > > > > AccessD at databaseadvisors.com > > > > http://databaseadvisors.com/mailman/listinfo/a> > > > ccessd > > > > Website: > > > > http://www.databaseadvisors.com > > > > > > > > > > > > > > _______________________________________________ > > > AccessD mailing list > > > AccessD at databaseadvisors.com > > > http://databaseadvisors.com/mailman/listinfo/accessd > > > Website: http://www.databaseadvisors.com > > > > > > __________________________________ > > Do you Yahoo!? > > Yahoo! SiteBuilder - Free web site building tool. Try it! > http://webhosting.yahoo.com/ps/sb/ > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/a> ccessd > Website: > http://www.databaseadvisors.com > > > > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/a> ccessd > Website: > http://www.databaseadvisors.com > > > > > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/a> ccessd > Website: > http://www.databaseadvisors.com > > _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From lists at theopg.com Thu Jan 22 09:33:01 2004 From: lists at theopg.com (MarkH) Date: Thu, 22 Jan 2004 15:33:01 -0000 Subject: [AccessD] [OT Slightly] Access XP to Word using ADO results in toolbars beingturned off in word (FIXED) In-Reply-To: <001801c3e0f9$ccc4bd70$330d6bd5@netboxxp> Message-ID: <001c01c3e0fd$05bbfe60$330d6bd5@netboxxp> Turns out it was due to "Windows in Taskbar" being set to true.... Mark -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Mark H Sent: 22 January 2004 15:10 To: 'Access Developers discussion and problem solving' Subject: [AccessD] [OT Slightly] Access XP to Word using ADO results in toolbars beingturned off in word Hello All... Using Office XP and ADO I have a report which is generated from an Access database into a Word document. The word doc uses ADO to collect the report data from report data tables in the mdb, writes it out, saves it to a new document and then closes leaving the user looking at a new copy of the report (less the modules). I use the same template for Word 97 and XP. In XP, if I prompt the user to save the report when its created (using Dialogs(wdDialogFileSaveAs)), or even save it without prompting (using activedocument.saveas), they are left looking at the report but all toolbars are hidden... !?! And I can't see how to turn them back on... In office 97 everything works fine. Any ideas much appreciated... Cheers Mark _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From adtp at touchtelindia.net Thu Jan 22 10:26:54 2004 From: adtp at touchtelindia.net (A.D.Tejpal) Date: Thu, 22 Jan 2004 21:56:54 +0530 Subject: [AccessD] changing data from "Crosstab" to "Normal" tbl view? References: Message-ID: <008c01c3e104$a2beadf0$c9edf73d@winxp> Alun, You might like to take a look at my sample database named CrossTabAndReverse at RogersAccessLibrary (Other Developers Section). It covers the functionality needed by you. Regards, A.D.Tejpal -------------- ----- Original Message ----- From: Garraway, Alun To: Access DatabaseAdvisors (E-Mail) Sent: Thursday, January 22, 2004 16:42 Subject: [AccessD] changing data from "Crosstab" to "Normal" tbl view? hi, I have a tbl that looks like a spreedsheet, the table looks like this: ART_NR W1 W2 W3 W4 .... W30 110 10 8 12 14 258 20 16 22 13 what I want to do is "normalize" the data like this: ART_NR WEEK ORDERS 110 1 10 110 2 8 110 3 12 110 4 14 258 1 20 258 2 16 etc is that possible (with sql), I can't think of anything :-( alun From rl_stewart at highstream.net Thu Jan 22 10:37:16 2004 From: rl_stewart at highstream.net (Robert L. Stewart) Date: Thu, 22 Jan 2004 10:37:16 -0600 Subject: [AccessD] Re: A2K: Something new In-Reply-To: <200401221533.i0MFX5m04862@databaseadvisors.com> Message-ID: <5.1.0.14.2.20040122103547.0299a930@pop3.highstream.net> Steve, If you can send me the db, without data, I will look at it and see what I can figure our from it. Robert P.S. I tried to send this to your email: serbach at new.rr.com and go it returned At 09:33 AM 1/22/2004 -0600, you wrote: >Date: Thu, 22 Jan 2004 07:54:09 -0600 >From: "Steven W. Erbach" >Subject: [AccessD] A2K: Something new >To: "Access Developers discussion and problem solving" > >Message-ID: <20040122075409.551708087.serbach at new.rr.com> >Content-Type: text/plain > >Dear Group, > >You think you've seen it all, when all of a sudden... > >I've taken over development and support of a domestic violence shelter >statistics program. In my efforts to re-factor (how's that for an Extreme >Programming term?) some of the data entry forms I've run into something odd. > >One of the main data entry forms (key field ChildID) has a subform which >contains a Tab object. Each of the tabs on this subform contains a >sub-subform. While getting familiar with the workings of the program I >noticed that one of the sub-subforms did not have the proper linking >fields set up. > >The subform's linking field is that same ChildID...but the RecordSource >table for the subform is NOT keyed! The sub-subform in question also has >only ChildID as the linking field...but the key field for the >sub-subform's table is FreeFormID. ChildID is a foreign key in that table. > >The behavior I'm seeing is this: when I go to check the linking fields in >the subform I noticed that the VB window's title bar shows the following: > >Microsoft Visual Basic - STATISTICS [running] > >After a moment I see the Subform Field Linker dialog box. While the dialog >box is on-screen the title bar of the VB window shows [running]. When I >close the dialog box the VB window flashes and [running] disappears from >the title bar. > >But when I go to check the linking fields for the sub-subform in question, >[running] appears once again in the VB title bar, but then I see a >Microsoft Access dialog box with the following message and OK button: > >Object variable or With block variable not set > >...as if the application was trying to start itself! I can't get at the >Subform Field Linker dialog box at all. When I click OK on the dialog box >the VB window flashes and [running] disappears from the title bar. > >So I tried deleting the sub-subform and placing it on the tab page again. >When I've finished using the subform tool to place the object on the tab >page, I get another dialog box labeled "StatsTracker" (the name of the >application): > >Your code contains a syntax error, or a Stats Tracker function you need >isn't available. >If the syntax is correct, check the Control Wizards subkey or the >Libraries key in the StatsTracker section of the Windows Registry to >verify that the entries you need are listed and available. > >I click OK and I see the subform object on the tab page. I can assign the >Source Object property, but when I go to Link Master Fields I get the >"Object variable or With block variable not set" message. > >Can any of you figure out what's happening to me here? Thank you. > >Regards, > >Steve Erbach >Scientific Marketing >Neenah, WI >920-969-0504 From gustav at cactus.dk Thu Jan 22 10:54:13 2004 From: gustav at cactus.dk (Gustav Brock) Date: Thu, 22 Jan 2004 17:54:13 +0100 Subject: [AccessD] changing data from "Crosstab" to "Normal" tbl view? In-Reply-To: References: Message-ID: <5232174093.20040122175413@cactus.dk> Hi Alun Quoting Alexei Kartaschov from 2001-10-05: Suppose your crosstab table is tblCT with fields Key, A, B, C, D... 1. Pure but uninspired. SELECT Key, "A" AS Letter, A AS MyData FROM tblCT UNION SELECT Key, "B", B FROM tblCT ... UNION SELECT Key, "Z", Z FROM tblCT /gustav > I have a tbl that looks like a spreedsheet, the table looks like this: > ART_NR W1 W2 W3 W4 .... W30 > 110 10 8 12 14 > 258 20 16 22 13 > what I want to do is "normalize" the data like this: > ART_NR WEEK ORDERS > 110 1 10 > 110 2 8 > 110 3 12 > 110 4 14 > 258 1 20 > 258 2 16 > etc > is that possible (with sql), I can't think of anything :-( > alun From weeden1949 at hotmail.com Thu Jan 22 10:56:45 2004 From: weeden1949 at hotmail.com (Greg Smith) Date: Thu, 22 Jan 2004 10:56:45 -0600 Subject: [AccessD] Remove Punctuation References: <003201c3df8c$6493d010$210110ac@SUSANONE> Message-ID: Hello everyone! Greetings from Frigid Iowa. Access 97. I need to remove punctuation from a single field in a table which has about 1,500,000 records in it...so far. It's only 4 columns wide, but fairly lengthy. A client has to have all punctuation removed from this particular field, which is a text field. I have code which removes the punctuation (as Smith, Greg W. becomes Smith Greg W ) but leaves a space in it's place. Yes, it gets rid of the punctuation, but for future consistancy (from now on, they are putting the data in without any punctuation) I can't have the additional space where the "," or "." was or the search routines will not find every instance of, for example, "Smith Greg W" because "Smith Greg W " isn't the same. The code I'm using came from M$'s support, and it does work for removing the characters that I want to remove. However, if I use "" instead of " ", nothing gets changed. It's "ACC: Sample Function to Replace Special Characters", article #109825. Is there a better way to do this? I remember doing this several years ago when I was first setting up their data, but it's been waaaaay too many moons since then. Any help would be greatly appreciated! TIA! Greg Smith Weeden1949 at hotmail.com From cfoust at infostatsystems.com Thu Jan 22 10:58:42 2004 From: cfoust at infostatsystems.com (Charlotte Foust) Date: Thu, 22 Jan 2004 08:58:42 -0800 Subject: [AccessD] Remove Punctuation Message-ID: There is no built-in replace function in Access 97, so you're stuck with clunky code, but the way I've always done this is to search for two spaces and replace them with one. If you iterate that until the instr([textfield], " ") {that's two spaces, BTW} returns a zero, that will get rid of the extra spaces. Charlotte Foust -----Original Message----- From: Greg Smith [mailto:weeden1949 at hotmail.com] Sent: Thursday, January 22, 2004 8:57 AM To: Access Developers discussion and problem solving Subject: [AccessD] Remove Punctuation Hello everyone! Greetings from Frigid Iowa. Access 97. I need to remove punctuation from a single field in a table which has about 1,500,000 records in it...so far. It's only 4 columns wide, but fairly lengthy. A client has to have all punctuation removed from this particular field, which is a text field. I have code which removes the punctuation (as Smith, Greg W. becomes Smith Greg W ) but leaves a space in it's place. Yes, it gets rid of the punctuation, but for future consistancy (from now on, they are putting the data in without any punctuation) I can't have the additional space where the "," or "." was or the search routines will not find every instance of, for example, "Smith Greg W" because "Smith Greg W " isn't the same. The code I'm using came from M$'s support, and it does work for removing the characters that I want to remove. However, if I use "" instead of " ", nothing gets changed. It's "ACC: Sample Function to Replace Special Characters", article #109825. Is there a better way to do this? I remember doing this several years ago when I was first setting up their data, but it's been waaaaay too many moons since then. Any help would be greatly appreciated! TIA! Greg Smith Weeden1949 at hotmail.com _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From Alun.Garraway at otto.de Thu Jan 22 11:18:59 2004 From: Alun.Garraway at otto.de (Garraway, Alun) Date: Thu, 22 Jan 2004 18:18:59 +0100 Subject: [AccessD] changing data from "Crosstab" to "Normal" tbl view? Message-ID: thanx A.D. I'll try it out, and let you know. alun -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of A.D.Tejpal Sent: Thursday, January 22, 2004 5:27 PM To: Access Developers discussion and problem solving Subject: Re: [AccessD] changing data from "Crosstab" to "Normal" tbl view? Alun, You might like to take a look at my sample database named CrossTabAndReverse at RogersAccessLibrary (Other Developers Section). It covers the functionality needed by you. Regards, A.D.Tejpal -------------- ----- Original Message ----- From: Garraway, Alun To: Access DatabaseAdvisors (E-Mail) Sent: Thursday, January 22, 2004 16:42 Subject: [AccessD] changing data from "Crosstab" to "Normal" tbl view? hi, I have a tbl that looks like a spreedsheet, the table looks like this: ART_NR W1 W2 W3 W4 .... W30 110 10 8 12 14 258 20 16 22 13 what I want to do is "normalize" the data like this: ART_NR WEEK ORDERS 110 1 10 110 2 8 110 3 12 110 4 14 258 1 20 258 2 16 etc is that possible (with sql), I can't think of anything :-( alun _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From ssharkins at bellsouth.net Thu Jan 22 11:25:39 2004 From: ssharkins at bellsouth.net (Susan Harkins) Date: Thu, 22 Jan 2004 12:25:39 -0500 Subject: [AccessD] modifying Outlook contact items from Access Message-ID: <004701c3e10c$c24a4410$210110ac@SUSANONE> I'm familiar enough with the Outlook model that importing Contact data into Access is easy -- but I'm wondering if any of you use Access to actually modify Outlook contact information? I haven't even started, but would be interested in hearing how others do it. I know you can link, but that only works if Outlook is the default mail client. Susan H. From Alun.Garraway at otto.de Thu Jan 22 11:28:47 2004 From: Alun.Garraway at otto.de (Garraway, Alun) Date: Thu, 22 Jan 2004 18:28:47 +0100 Subject: [AccessD] changing data from "Crosstab" to "Normal" tbl view? Message-ID: Gustav, as the north germans say "alte Schwede!" :-O tried it on a small table..... it works! kewl :-) but it also means i need a union for every col.......... 30 weeks don't know if its practical with 40k datasets, have to give it a try, thanx a lot for the sql though, till now I've never seen/had any real use for a union. all the best :-) alun -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Gustav Brock Sent: Thursday, January 22, 2004 5:54 PM To: Access Developers discussion and problem solving Subject: Re: [AccessD] changing data from "Crosstab" to "Normal" tbl view? Hi Alun Quoting Alexei Kartaschov from 2001-10-05: Suppose your crosstab table is tblCT with fields Key, A, B, C, D... 1. Pure but uninspired. SELECT Key, "A" AS Letter, A AS MyData FROM tblCT UNION SELECT Key, "B", B FROM tblCT ... UNION SELECT Key, "Z", Z FROM tblCT /gustav > I have a tbl that looks like a spreedsheet, the table looks like this: > ART_NR W1 W2 W3 W4 .... W30 > 110 10 8 12 14 > 258 20 16 22 13 > what I want to do is "normalize" the data like this: > ART_NR WEEK ORDERS > 110 1 10 > 110 2 8 > 110 3 12 > 110 4 14 > 258 1 20 > 258 2 16 > etc > is that possible (with sql), I can't think of anything :-( > alun _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From rusty.hammond at cpiqpc.com Thu Jan 22 11:40:20 2004 From: rusty.hammond at cpiqpc.com (rusty.hammond at cpiqpc.com) Date: Thu, 22 Jan 2004 11:40:20 -0600 Subject: [AccessD] Remove Punctuation Message-ID: <8301C8A868251E4C8ECD3D4FFEA40F8A0811A8A3@cpixchng-1.cpiqpc.net> Greg, I'm sure there's other functions out there to do this but here's the code from one I wrote a long time ago. It may not be pretty but it works. Using your example, you would call it like this: strMyNewString=CleanChars("Smith, Greg W.",",.","N") Function CleanChars(strMyString As String, strSearchString As String, strSpace As String) 'This function strips strSearchString characters from strMyString 'strSearchString can be one character long or several characters long 'This function will search for each individual character of strSearchString in strMyString Dim strTemp As String Dim strNew As String Dim strSearchChar As String Dim intWhereChar As Integer Dim X As Long strNew = strMyString For X = 1 To Len(strSearchString) strSearchChar = Mid(strSearchString, X, 1) intWhereChar = InStr(1, strNew, strSearchChar) If strSpace = "Y" Or strSpace = "y" Then 'This Loop replaces strSearchString with a space Do Until intWhereChar = 0 strTemp = Left(strNew, intWhereChar - 1) & " " & Right(strNew, Len(strNew) - intWhereChar) strNew = strTemp intWhereChar = InStr(1, strNew, strSearchChar) Loop Else 'This Loop removes SearchStr and does NOT replace it with a space Do Until intWhereChar = 0 strTemp = Left(strNew, intWhereChar - 1) & Right(strNew, Len(strNew) - intWhereChar) strNew = strTemp intWhereChar = InStr(1, strNew, strSearchChar) Loop End If Next X CleanChars = strNew End Function -----Original Message----- From: Greg Smith [mailto:weeden1949 at hotmail.com] Sent: Thursday, January 22, 2004 10:57 AM To: Access Developers discussion and problem solving Subject: [AccessD] Remove Punctuation Hello everyone! Greetings from Frigid Iowa. Access 97. I need to remove punctuation from a single field in a table which has about 1,500,000 records in it...so far. It's only 4 columns wide, but fairly lengthy. A client has to have all punctuation removed from this particular field, which is a text field. I have code which removes the punctuation (as Smith, Greg W. becomes Smith Greg W ) but leaves a space in it's place. Yes, it gets rid of the punctuation, but for future consistancy (from now on, they are putting the data in without any punctuation) I can't have the additional space where the "," or "." was or the search routines will not find every instance of, for example, "Smith Greg W" because "Smith Greg W " isn't the same. The code I'm using came from M$'s support, and it does work for removing the characters that I want to remove. However, if I use "" instead of " ", nothing gets changed. It's "ACC: Sample Function to Replace Special Characters", article #109825. Is there a better way to do this? I remember doing this several years ago when I was first setting up their data, but it's been waaaaay too many moons since then. Any help would be greatly appreciated! TIA! Greg Smith Weeden1949 at hotmail.com _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From serbach at new.rr.com Thu Jan 22 11:49:35 2004 From: serbach at new.rr.com (Steven W. Erbach) Date: Thu, 22 Jan 2004 11:49:35 -0600 Subject: [AccessD] Re: A2K: Something new Message-ID: <20040122114935.2016904512.serbach@new.rr.com> Robert, >> If you can send me the db, without data, I will look at it and see what I can figure our from it. << Thanks for the offer. I might pass on it, though, because there are 117 tables that I'd have to empty. The FE is 10 MB in size...and I just compacted it. Are you sure you want to do this? Regards, Steve Erbach Scientific Marketing Neenah, WI 920-969-0504 Message created with Bloomba Disclaimer: No tree was killed in the transmission of this message. However, several coulombs of electrons were temporarily inconvenienced. From martyconnelly at shaw.ca Thu Jan 22 11:51:06 2004 From: martyconnelly at shaw.ca (MartyConnelly) Date: Thu, 22 Jan 2004 09:51:06 -0800 Subject: [AccessD] Worldwide Media exchange or is this a Schuss Boomer? References: <000901c3e0ec$d1070df0$7001a8c0@COA3> Message-ID: <40100D8A.8000601@shaw.ca> Old Austrian downhill skiing term to describe a daredevil skier or someone skiing on the verge of going out of control and skiing directly in the fall line all the way down the hill making very little turns. But the picture on the sign is a Kangaroo on skis or a boomer. Developer wrote: >Schuss boomer? > > >-----Original Message----- >From: accessd-bounces at databaseadvisors.com >[mailto:accessd-bounces at databaseadvisors.com] On Behalf Of MartyConnelly >Sent: Thursday, January 22, 2004 1:58 AM >To: Access Developers discussion and problem solving >Subject: [AccessD] Worldwide Media exchange or is this a Schuss Boomer? > > >http://wwmx.org/FullMediaView.aspx?mediaid=29423 >mainsite >http://wwmx.org/WebClient.aspx > >Here is a interesting new use of GPS and Images via ASP.net from >Microsoft Research. Free download of api and net client >For all surveillance lovers: microsoft research ask people from all >over the world to send in photos and the location data, where the photos > >were shot. they hope to collect "gazillions" of photos and make a visual > >map of the whole world... > > > -- Marty Connelly Victoria, B.C. Canada From martyconnelly at shaw.ca Thu Jan 22 12:19:14 2004 From: martyconnelly at shaw.ca (MartyConnelly) Date: Thu, 22 Jan 2004 10:19:14 -0800 Subject: [AccessD] Remove Punctuation References: Message-ID: <40101422.9050000@shaw.ca> These replacement functions work in A97: I got these from a post from John Viescas http://www.viescas.com/ for VB6 functions Split, Replace, Join and InStrRev Caveat these may have possible problems on boundary conditions or optimization and have not undergone full QA. If you need pure speed replacement functions that have been peer reviewed, some of the timing differences are somewhat amazing, most give a 50% improvement, some by a factor of 10 over the internal Access or VB6 intrinsic functions For timing charts and code. try http://www.xbeat.net/vbspeed/ Public Function InStrRev(strCheck As Variant, _ strMatch As Variant, _ Optional intStart As Integer = -1, _ Optional intCompare As Integer = 2) As Variant '----------------------------------------------------------- ' Inputs: String to check, ' match string, ' optional starting position (default = -1), ' optional string compare value (default vbDatabaseCompare) ' Outputs: Position of match string, starting from the end ' Created By: JLV 11/15/01 ' Last Revised: JLV 11/15/01 ' ** Duplicates the functionality of the VB 6 INSTRREV function. '----------------------------------------------------------- Dim intS As Integer, intR As Integer Dim intI As Integer, intLenC As Integer, intLenM As Integer ' Do some initial checks If (intCompare < 0) Or (intCompare > 2) Then Err.Raise 5 Exit Function End If If IsNull(strCheck) Then InStrRev = Null Exit Function End If If VarType(strCheck) <> vbString Then Err.Raise 5 Exit Function End If If IsNull(strMatch) Then InStrRev = Null Exit Function End If If VarType(strMatch) <> vbString Then Err.Raise 5 Exit Function End If If Len(strCheck) = 0 Then InStrRev = 0 Exit Function End If If Len(strMatch) = 0 Then InStrRev = intStart Exit Function End If If intStart > Len(strMatch) Then InStrRev = 0 Exit Function End If If Len(strMatch) > Len(strCheck) Then InStrRev = 0 Exit Function End If ' OK, have some work to do! intS = intStart intLenC = Len(strCheck) intLenM = Len(strMatch) If intS = -1 Then intS = intLenC ' Set default not found InStrRev = 0 ' Now loop to see if we can find it For intI = intS To 1 Step -1 intR = InStr(intI, strCheck, strMatch, intCompare) If intR <> 0 Then InStrRev = intR Exit For End If Next intI End Function Public Function Join(varArray As Variant, Optional strDelimiter As String = "") As String '----------------------------------------------------------- ' Inputs: An array of strings and an optional delimiter ' Outputs: A concatenated string assembled from the ' array elements, delimited by the optional ' delimiter character ' Created By: JLV 09/05/01 ' Last Revised: 09/05/01 ' ** Duplicates the functionality of the VB 6 JOIN function '----------------------------------------------------------- Dim intL As Integer, intU As Integer, intI As Integer Dim strWork As String If Not IsArray(varArray) Then Exit Function intL = LBound(varArray) intU = UBound(varArray) strWork = varArray(intL) For intI = intL + 1 To intU strWork = strWork & strDelimiter & varArray(intI) Next intI Join = strWork End Function Public Function Replace(strIn As Variant, strFind As String, _ strReplace As String, Optional intStart As Integer = 1, _ Optional intCount As Integer = -1, _ Optional intCompare As Integer = 0) As String '----------------------------------------------------------- ' Inputs: String to search and replace, ' search string, replacement string, ' optional starting position (default = 1), ' optional replacement limit (default = -1 .. ALL) ' optional string compare value (default = 0 .. vbBinaryCompare) ' Outputs: Replaced string ' Created By: JLV 09/05/01 ' Last Revised: JLV 09/05/01 ' ** Duplicates the functionality of the VB 6 REPLACE function. '----------------------------------------------------------- Dim strWork As String, intS As Integer, intCnt As Integer Dim intI As Integer, intLenF As Integer, intLenR As Integer If (intCompare < 0) Or (intCompare > 2) Then Err.Raise 5 Exit Function End If If VarType(strIn) <> vbString Then Err.Raise 5 Exit Function End If strWork = strIn intS = intStart intCnt = intCount intLenF = Len(strFind) intLenR = Len(strReplace) ' If find string zero length or count is zero, then nothing to replace If (intLenF = 0) Or (intCnt = 0) Then Replace = strIn Exit Function End If ' If start beyond length of string, return empty string If intS > Len(strWork) Then Replace = "" Exit Function End If ' Got some work to do -- find strings to replace Do intI = InStr(intS, strWork, strFind, intCompare) If intI = 0 Then Exit Do ' Insert the replace string strWork = Left(strWork, intI - 1) & strReplace & Mid(strWork, intI + intLenF) intS = intS + intI + intLenR - 1 ' Bump start to end of the replace string intCnt = intCnt - 1 ' Decrement the max replace counter Loop Until intCnt = 0 Replace = strWork End Function Public Function Split(strToSplit As String, _ Optional strDelimiter As String = " ", _ Optional intCount As Integer = -1, _ Optional intCompare As Integer = 0) As Variant '----------------------------------------------------------- ' Inputs: String to search, ' delimiter string, ' optional replacement limit (default = -1 .. ALL) ' optional string compare value (default vbBinaryCompare) ' Outputs: Array containing items found in the string ' based on the delimiter provided ' Created By: JLV 09/05/01 ' Last Revised: JLV 09/05/01 ' ** Duplicates the functionality of the VB 6 SPLIT function. '----------------------------------------------------------- Dim strWork As String, intCnt As Integer, intIndex As Integer Dim intI As Integer, strArray() As String If (intCompare < 0) Or (intCompare > 2) Then Err.Raise 5 Exit Function End If strWork = strToSplit intCnt = intCount ' If count is zero, return the empty array If intCnt = 0 Then Split = strArray Exit Function End If ' If the Delimiter is zero-length, return a 1-entry array If strDelimiter = "" Then ReDim strArray(0) strArray(0) = strWork Split = strArray Exit Function End If ' Decrement count by 1 because function returns ' whatever is left at the end intCnt = intCnt - 1 ' Loop until the counter is zero Do Until intCnt = 0 intI = InStr(1, strWork, strDelimiter, intCompare) ' If delimiter not found, end the loop If intI = 0 Then Exit Do ' Add 1 to the number returned intIndex = intIndex + 1 ' Expand the array ReDim Preserve strArray(0 To intIndex - 1) ' Use index - 1 .. zero-based array strArray(intIndex - 1) = Left(strWork, intI - 1) ' Remove the found entry strWork = Mid(strWork, intI + 1) intCnt = intCnt - 1 Loop ' Put anything left over in the last entry of the array If Len(strWork) > 0 Then intIndex = intIndex + 1 ReDim Preserve strArray(0 To intIndex - 1) strArray(intIndex - 1) = strWork End If ' Return the result Split = strArray End Function Charlotte Foust wrote: >There is no built-in replace function in Access 97, so you're stuck with >clunky code, but the way I've always done this is to search for two >spaces and replace them with one. If you iterate that until the >instr([textfield], " ") {that's two spaces, BTW} returns a zero, that >will get rid of the extra spaces. > >Charlotte Foust > >-----Original Message----- >From: Greg Smith [mailto:weeden1949 at hotmail.com] >Sent: Thursday, January 22, 2004 8:57 AM >To: Access Developers discussion and problem solving >Subject: [AccessD] Remove Punctuation > > >Hello everyone! Greetings from Frigid Iowa. > >Access 97. > >I need to remove punctuation from a single field in a table which has >about 1,500,000 records in it...so far. It's only 4 columns wide, but >fairly lengthy. > >A client has to have all punctuation removed from this particular field, >which is a text field. I have code which removes the punctuation (as >Smith, Greg W. becomes Smith Greg W ) but leaves a space in it's place. >Yes, it gets rid of the punctuation, but for future consistancy (from >now on, they are putting the data in without any punctuation) I can't >have the additional space where the "," or "." was or the search >routines will not find every instance of, for example, "Smith Greg W" >because "Smith Greg W " isn't the same. > >The code I'm using came from M$'s support, and it does work for removing >the characters that I want to remove. However, if I use "" instead of " >", nothing gets changed. It's "ACC: Sample Function to Replace Special >Characters", article #109825. > >Is there a better way to do this? I remember doing this several years >ago when I was first setting up their data, but it's been waaaaay too >many moons since then. > >Any help would be greatly appreciated! > >TIA! > >Greg Smith >Weeden1949 at hotmail.com > > >_______________________________________________ >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 > > > -- Marty Connelly Victoria, B.C. Canada From john at winhaven.net Thu Jan 22 12:27:43 2004 From: john at winhaven.net (John Bartow) Date: Thu, 22 Jan 2004 12:27:43 -0600 Subject: [AccessD] Re: A2K: Something new In-Reply-To: <20040122114935.2016904512.serbach@new.rr.com> Message-ID: Steve, Sounds intriguing, if you do send it on you could import everything into a new DB and for the tables choose the option: "Definition Only". HTH JB > -----Original Message----- > From: accessd-bounces at databaseadvisors.com > [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Steven W. > Erbach > Sent: Thursday, January 22, 2004 11:50 AM > To: Access Developers discussion and problem solving > Subject: Re: [AccessD] Re: A2K: Something new > > > Robert, > > >> If you can send me the db, without data, I will look at it and > see what I can figure our from it. << > > Thanks for the offer. I might pass on it, though, because there > are 117 tables that I'd have to empty. The FE is 10 MB in > size...and I just compacted it. Are you sure you want to do this? > > Regards, > > Steve Erbach > Scientific Marketing > Neenah, WI > 920-969-0504 > > Message created with Bloomba > > Disclaimer: No tree was killed in the transmission of this > message. However, several coulombs of electrons were temporarily > inconvenienced. > > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com > > From andy at minstersystems.co.uk Thu Jan 22 12:28:03 2004 From: andy at minstersystems.co.uk (Andy Lacey) Date: Thu, 22 Jan 2004 18:28:03 -0000 Subject: [AccessD] modifying Outlook contact items from Access In-Reply-To: <004701c3e10c$c24a4410$210110ac@SUSANONE> Message-ID: <00f401c3e115$79953410$b274d0d5@minster33c3r25> Hi Susan Well I cheat. I have a number of Outlook address books some of which are based on Access data. I use a 3rd-party product which each night wipes out these address books, extracts the Access data and rebuilds the address books. Works like a charm. I could no doubt write something but as the product existed..... See http://www.teamscope.com/otherpro/datalink.asp Andy Lacey http://www.minstersystems.co.uk > -----Original Message----- > From: accessd-bounces at databaseadvisors.com > [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of > Susan Harkins > Sent: 22 January 2004 17:26 > To: AccessD at databaseadvisors.com > Subject: [AccessD] modifying Outlook contact items from Access > > > I'm familiar enough with the Outlook model that importing > Contact data into Access is easy -- but I'm wondering if any > of you use Access to actually modify Outlook contact > information? I haven't even started, but would be interested > in hearing how others do it. I know you can link, but that > only works if Outlook is the default mail client. > > Susan H. > > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/a> ccessd > Website: > http://www.databaseadvisors.com > > From ssharkins at bellsouth.net Thu Jan 22 12:34:22 2004 From: ssharkins at bellsouth.net (Susan Harkins) Date: Thu, 22 Jan 2004 13:34:22 -0500 Subject: [AccessD] modifying Outlook contact items from Access References: <00f401c3e115$79953410$b274d0d5@minster33c3r25> Message-ID: <000601c3e116$5e767ee0$210110ac@SUSANONE> This is for instructional purposes, so I have to do it the long hard way. :) I can import the data into Access, modify it, and send it back to Outlook. I'm just wondering if there isn't a more direct route -- it would be cool if I could connect an Access form's to a recordset that's connected directly to Outlook -- so the changes in Access would be immediate -- I just don't know if that's possible, or even the best way to go about it. Susan H. > Hi Susan > Well I cheat. I have a number of Outlook address books some of which are > based on Access data. I use a 3rd-party product which each night wipes out > these address books, extracts the Access data and rebuilds the address > books. Works like a charm. I could no doubt write something but as the > product existed..... See http://www.teamscope.com/otherpro/datalink.asp > > > Andy Lacey > http://www.minstersystems.co.uk > > > -----Original Message----- > > From: accessd-bounces at databaseadvisors.com > > [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of > > Susan Harkins > > Sent: 22 January 2004 17:26 > > To: AccessD at databaseadvisors.com > > Subject: [AccessD] modifying Outlook contact items from Access > > > > > > I'm familiar enough with the Outlook model that importing > > Contact data into Access is easy -- but I'm wondering if any > > of you use Access to actually modify Outlook contact > > information? I haven't even started, but would be interested > > in hearing how others do it. I know you can link, but that > > only works if Outlook is the default mail client. > > > > Susan H. > > > > _______________________________________________ > > AccessD mailing list > > AccessD at databaseadvisors.com > > http://databaseadvisors.com/mailman/listinfo/a> ccessd > > Website: > > http://www.databaseadvisors.com > > > > > > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com > From KIsmert at TexasSystems.com Thu Jan 22 12:41:53 2004 From: KIsmert at TexasSystems.com (Ken Ismert) Date: Thu, 22 Jan 2004 12:41:53 -0600 Subject: [AccessD] RE: Instantiate Forms as Objects In-Reply-To: <5.2.0.9.2.20040122011000.02324b10@127.0.0.1> Message-ID: <005101c3e117$67f40a90$2a3ca8c0@TEXASSYSTEMS.COM> David, Intriguing ... assigning the responsibility of creating the form instance to the form class itself. I have several comments regarding your code: 1. If you copied "TestForm" to "New_Form", New_Form.NewInstance would create TestForm instances, an implicit mismatch. To catch this error, I would suggest: Public Function NewInstance() As Access.Form If Not (TypeOf Me Is Form_TestForm) Then ' Raise Type Mismatch Error Err.Raise 13, "Form_" & Me.Name & ".NewInstance", "Type mismatch" End If Set NewInstance = New Form_TestForm End Function This way, TestForm.NewInstance works, but New_Form.NewInstance generates a runtime error, prompting you to fix the routine. 2. To avoid the screen flicker, you could try opening the form with acHidden 3. Regarding the problem you mentioned, I would suggest putting all form references into a collection. You could key it with the Form.Hwnd property, as MarkH did in his code. Closing a form would be a matter of setting focus to the form, issuing a DoCmd.Close, and removing it from the collection. This approach is as workable as any other. The nice thing about it is, if you delete a form, you don't have to update your form creation function. If you copy a form, you still have to remember to modify its NewInstance function, which is not a bad tradeoff. -Ken -----Original Message----- From: David Beckles [mailto:becklesd at tiscali.co.uk] Sent: Wednesday, January 21, 2004 7:11 PM To: accessd at databaseadvisors.com Subject: [AccessD] RE: Instantiate Forms as Objects Dear Ken, One way of achieving (most of) what you want to do is as follows: 1. In each of your forms create the function Public Function NewInstance() As Form Set NewInstance = New Form_TestForm End Function Its purpose is merely to return a reference to a new instance of the form. You could also define it as a new public property of the form, instead of a function. 2. Define the following function in some general module Public Function OpenFormMultiple(FormName As String) As Form ' check the Forms collection, and if the form is in it then use the NewInstance() method of the form ' otherwise open the form in the usual way and return a reference to it. ' in either case, the form will not be visible. ' if any errors occur, then the value Nothing will be returned, so remember to test for it. On Error Resume Next ' You could use fancier error handling if you wanted Dim F As Form Set OpenFormMultiple = Nothing Set F = Forms(FormName) If F Is Nothing Then Application.Echo False ' this is to suppress the screen flicker DoCmd.OpenForm FormName Set F = Forms(FormName) F.Visible = False Set OpenFormMultiple = F Application.Echo True Else Set OpenFormMultiple = F.NewInstance() End If End Function One problem with this arrangement is that you can close all the instances of a form except the first by setting the reference to Nothing. The first instance has to be closed by going into the Forms collection. I have not found a way around that as yet. I hope that this helps, David From serbach at new.rr.com Thu Jan 22 12:57:18 2004 From: serbach at new.rr.com (Steven W. Erbach) Date: Thu, 22 Jan 2004 12:57:18 -0600 Subject: [AccessD] Re: A2K: Something new Message-ID: <20040122125718.1611006317.serbach@new.rr.com> John, >> Sounds intriguing << Intriguing? It's a pain in the tuchis! I mean, why, in form design mode, would the application "run" when I try to open the Subform Field Linker? Is it some rogue macro? A missing reference? It acts like there's a missing global RecordSet variable...and I can't get at the Subform Linker. If I don't try and mess with the subform the application runs just fine...except for the fact that data entered in the naughty sub-subform doesn't show up again when I go back to the ChildID I started with. That's where I noticed the subform linking problem in the first place. Regards, Steve Erbach Scientific Marketing Neenah, WI 920-969-0504 Message created with Bloomba Disclaimer: No tree was killed in the transmission of this message. However, several coulombs of electrons were temporarily inconvenienced. From rl_stewart at highstream.net Thu Jan 22 13:10:33 2004 From: rl_stewart at highstream.net (Robert L. Stewart) Date: Thu, 22 Jan 2004 13:10:33 -0600 Subject: [AccessD] Re: Remove Punctuation In-Reply-To: <200401221800.i0MI0Lm08782@databaseadvisors.com> Message-ID: <5.1.0.14.2.20040122130828.02a371e8@pop3.highstream.net> Greg, Try this function. It seems to work on everything I could throw at it. ***** Watch for word wrap ***** Function ReplaceChar(InputString As String) As String Dim intLen As Integer Dim intCounter As Integer 'First, remove all carriage returns/linefeeds from the string InputString = Replace(InputString, vbCrLf, " ") 'Find the length of the remaining string now that CR/LF are removed intLen = Len(InputString) 'Now loop through each remaining character in the string, and if it is a control 'character (ASCII value less than 32 and > 32 but < 47), then replace that character with a space For intCounter = 1 To intLen If Asc(Mid(InputString, intCounter, 1)) < 32 Then InputString = Replace(InputString, Mid(InputString, intCounter, 1), "") End If Next intCounter intLen = Len(InputString) For intCounter = 1 To intLen - 1 If Asc(Mid(InputString, intCounter, 1)) > 32 And Asc(Mid(InputString, intCounter, 1)) < 47 Then InputString = Replace(InputString, Mid(InputString, intCounter, 1), "") End If Next intCounter 'Return the input string, which has now had all control charcters 'converted into spaces ReplaceChar = InputString End Function Robert At 12:00 PM 1/22/2004 -0600, you wrote: >From: Greg Smith [mailto:weeden1949 at hotmail.com] >Sent: Thursday, January 22, 2004 10:57 AM >To: Access Developers discussion and problem solving >Subject: [AccessD] Remove Punctuation > > >Hello everyone! Greetings from Frigid Iowa. > >Access 97. > >I need to remove punctuation from a single field in a table which has about >1,500,000 records in it...so far. It's only 4 columns wide, but fairly >lengthy. > >A client has to have all punctuation removed from this particular field, >which is a text field. I have code which removes the punctuation (as Smith, >Greg W. becomes Smith Greg W ) but leaves a space in it's place. Yes, it >gets rid of the punctuation, but for future consistancy (from now on, they >are putting the data in without any punctuation) I can't have the additional >space where the "," or "." was or the search routines will not find every >instance of, for example, "Smith Greg W" because "Smith Greg W " isn't the >same. > >The code I'm using came from M$'s support, and it does work for removing the >characters that I want to remove. However, if I use "" instead of " ", >nothing gets changed. It's "ACC: Sample Function to Replace Special >Characters", article #109825. > >Is there a better way to do this? I remember doing this several years ago >when I was first setting up their data, but it's been waaaaay too many moons >since then. > >Any help would be greatly appreciated! > >TIA! > >Greg Smith >Weeden1949 at hotmail.com From rl_stewart at highstream.net Thu Jan 22 13:14:58 2004 From: rl_stewart at highstream.net (Robert L. Stewart) Date: Thu, 22 Jan 2004 13:14:58 -0600 Subject: [AccessD] Re: A2K: Something new In-Reply-To: <200401221800.i0MI0Lm08782@databaseadvisors.com> Message-ID: <5.1.0.14.2.20040122131113.02a34430@pop3.highstream.net> Sure, Here is the simple way of getting it to me. Create a new database. Import all the objects from the old one into it. Before starting the import, click on the options button and select definition only. It will automatically move only the structure of the tables over. Zip it and send it directly to my email address. Also, there is something wrong with yours because I cannot send directly to it. Robert At 12:00 PM 1/22/2004 -0600, you wrote: >Date: Thu, 22 Jan 2004 11:49:35 -0600 >From: "Steven W. Erbach" >Subject: Re: [AccessD] Re: A2K: Something new >To: "Access Developers discussion and problem solving" > >Message-ID: <20040122114935.2016904512.serbach at new.rr.com> >Content-Type: text/plain > >Robert, > > >> If you can send me the db, without data, I will look at it and see > what I can figure our from it. << > >Thanks for the offer. I might pass on it, though, because there are 117 >tables that I'd have to empty. The FE is 10 MB in size...and I just >compacted it. Are you sure you want to do this? > >Regards, > >Steve Erbach >Scientific Marketing >Neenah, WI >920-969-0504 From martyconnelly at shaw.ca Thu Jan 22 14:04:27 2004 From: martyconnelly at shaw.ca (MartyConnelly) Date: Thu, 22 Jan 2004 12:04:27 -0800 Subject: [AccessD] modifying Outlook contact items from Access References: <00f401c3e115$79953410$b274d0d5@minster33c3r25> <000601c3e116$5e767ee0$210110ac@SUSANONE> Message-ID: <40102CCB.4080901@shaw.ca> There is an Exchange OLEDB Provider available for those that use it. http://msdn.microsoft.com/library/default.asp?url=/library/en-us/wss/wss/_exch2k_search_tasks.asp And this method might work This article describes how you can open a connection to a Microsoft Exchange or to a Microsoft Outlook mailbox by using ActiveX Data Objects (ADO) and the Jet OLE DB provider http://support.microsoft.com/?kbid=275262 Susan Harkins wrote: >This is for instructional purposes, so I have to do it the long hard way. :) > >I can import the data into Access, modify it, and send it back to Outlook. >I'm just wondering if there isn't a more direct route -- it would be cool if >I could connect an Access form's to a recordset that's connected directly to >Outlook -- so the changes in Access would be immediate -- I just don't know >if that's possible, or even the best way to go about it. > >Susan H. > > > > >>Hi Susan >>Well I cheat. I have a number of Outlook address books some of which are >>based on Access data. I use a 3rd-party product which each night wipes out >>these address books, extracts the Access data and rebuilds the address >>books. Works like a charm. I could no doubt write something but as the >>product existed..... See http://www.teamscope.com/otherpro/datalink.asp >> >> >>Andy Lacey >>http://www.minstersystems.co.uk >> >> >> >>>-----Original Message----- >>>From: accessd-bounces at databaseadvisors.com >>>[mailto:accessd-bounces at databaseadvisors.com] On Behalf Of >>>Susan Harkins >>>Sent: 22 January 2004 17:26 >>>To: AccessD at databaseadvisors.com >>>Subject: [AccessD] modifying Outlook contact items from Access >>> >>> >>>I'm familiar enough with the Outlook model that importing >>>Contact data into Access is easy -- but I'm wondering if any >>>of you use Access to actually modify Outlook contact >>>information? I haven't even started, but would be interested >>>in hearing how others do it. I know you can link, but that >>>only works if Outlook is the default mail client. >>> >>>Susan H. >>> >>>_______________________________________________ >>>AccessD mailing list >>>AccessD at databaseadvisors.com >>>http://databaseadvisors.com/mailman/listinfo/a> ccessd >>>Website: >>>http://www.databaseadvisors.com >>> >>> >>> >>> >>_______________________________________________ >>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 > > > -- Marty Connelly Victoria, B.C. Canada From pharold at proftesting.com Thu Jan 22 14:36:49 2004 From: pharold at proftesting.com (Perry Harold) Date: Thu, 22 Jan 2004 15:36:49 -0500 Subject: [AccessD] Remove Punctuation In-Reply-To: Message-ID: <000001c3e127$76222830$082da8c0@D58BT131> As an aside - If you ever need to identify the last name again (assuming that the field is a Full Name field from your example), how will you find any multiple-name last names that don't include dashes? Perry Harold -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Greg Smith Sent: Thursday, January 22, 2004 11:57 AM To: Access Developers discussion and problem solving Subject: [AccessD] Remove Punctuation Hello everyone! Greetings from Frigid Iowa. Access 97. I need to remove punctuation from a single field in a table which has about 1,500,000 records in it...so far. It's only 4 columns wide, but fairly lengthy. A client has to have all punctuation removed from this particular field, which is a text field. I have code which removes the punctuation (as Smith, Greg W. becomes Smith Greg W ) but leaves a space in it's place. Yes, it gets rid of the punctuation, but for future consistancy (from now on, they are putting the data in without any punctuation) I can't have the additional space where the "," or "." was or the search routines will not find every instance of, for example, "Smith Greg W" because "Smith Greg W " isn't the same. The code I'm using came from M$'s support, and it does work for removing the characters that I want to remove. However, if I use "" instead of " ", nothing gets changed. It's "ACC: Sample Function to Replace Special Characters", article #109825. Is there a better way to do this? I remember doing this several years ago when I was first setting up their data, but it's been waaaaay too many moons since then. Any help would be greatly appreciated! TIA! Greg Smith Weeden1949 at hotmail.com _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From serbach at new.rr.com Thu Jan 22 14:52:28 2004 From: serbach at new.rr.com (Steven W. Erbach) Date: Thu, 22 Jan 2004 14:52:28 -0600 Subject: [AccessD] Re: A2K: Something new Message-ID: <20040122145228.943780630.serbach@new.rr.com> Robert, I've discovered something that is germaine to the discussion: my original question dealt with clicking on a sub-subform and trying to get to the Subform Field Linker. That is, I opened the master form that contains Subform A. Subform A contains Subform B. It was Subform B's linking fields I was trying to change. However when I open Subform A in design mode and then try to access the linking fields in Subform B, then the Subform Field Linker comes up. I still see '[running]' appear in the VB title bar, but at least the Subform Field Linker wizard -- or whatever it is -- appears. It's just when I try to fiddle with the linking fields in a sub-subform to the Master that I have trouble with the "Object variable or With block variable not set" message and the Linker not appearing. I have installed Access XP recently and I've noticed a thing or two relating to the help files that are different from before I installed Access XP...maybe this has something to do with the error message? Regards, Steve Erbach Scientific Marketing Neenah, WI 920-969-0504 Message created with Bloomba Disclaimer: No tree was killed in the transmission of this message. However, several coulombs of electrons were temporarily inconvenienced. From ssharkins at bellsouth.net Thu Jan 22 15:18:29 2004 From: ssharkins at bellsouth.net (Susan Harkins) Date: Thu, 22 Jan 2004 16:18:29 -0500 Subject: [AccessD] modifying Outlook contact items from Access References: <00f401c3e115$79953410$b274d0d5@minster33c3r25> <000601c3e116$5e767ee0$210110ac@SUSANONE> <40102CCB.4080901@shaw.ca> Message-ID: <001b01c3e12d$4af0aa50$210110ac@SUSANONE> Thanks Marty -- first one's too complicated. The second doesn't work because Outlook isn't the default mail client -- if Outlook was the default mail client, you could just link and skip the code altogether. ;( Seems like the second ought to work, I'm just missing something. Susan H. > There is an Exchange OLEDB Provider available for those that use it. > > http://msdn.microsoft.com/library/default.asp?url=/library/en-us/wss/wss/_ex ch2k_search_tasks.asp > And this method might work > > This article describes how you can open a connection to a Microsoft > Exchange or to a Microsoft Outlook mailbox by using ActiveX Data Objects > (ADO) and the Jet OLE DB provider > http://support.microsoft.com/?kbid=275262 > > Susan Harkins wrote: > > >This is for instructional purposes, so I have to do it the long hard way. :) > > > >I can import the data into Access, modify it, and send it back to Outlook. > >I'm just wondering if there isn't a more direct route -- it would be cool if > >I could connect an Access form's to a recordset that's connected directly to > >Outlook -- so the changes in Access would be immediate -- I just don't know > >if that's possible, or even the best way to go about it. > > > >Susan H. > > > > > > > > > >>Hi Susan > >>Well I cheat. I have a number of Outlook address books some of which are > >>based on Access data. I use a 3rd-party product which each night wipes out > >>these address books, extracts the Access data and rebuilds the address > >>books. Works like a charm. I could no doubt write something but as the > >>product existed..... See http://www.teamscope.com/otherpro/datalink.asp > >> > >> > >>Andy Lacey > >>http://www.minstersystems.co.uk > >> > >> > >> > >>>-----Original Message----- > >>>From: accessd-bounces at databaseadvisors.com > >>>[mailto:accessd-bounces at databaseadvisors.com] On Behalf Of > >>>Susan Harkins > >>>Sent: 22 January 2004 17:26 > >>>To: AccessD at databaseadvisors.com > >>>Subject: [AccessD] modifying Outlook contact items from Access > >>> > >>> > >>>I'm familiar enough with the Outlook model that importing > >>>Contact data into Access is easy -- but I'm wondering if any > >>>of you use Access to actually modify Outlook contact > >>>information? I haven't even started, but would be interested > >>>in hearing how others do it. I know you can link, but that > >>>only works if Outlook is the default mail client. > >>> > >>>Susan H. > >>> > >>>_______________________________________________ > >>>AccessD mailing list > >>>AccessD at databaseadvisors.com > >>>http://databaseadvisors.com/mailman/listinfo/a> ccessd > >>>Website: > >>>http://www.databaseadvisors.com > >>> > >>> > >>> > >>> > >>_______________________________________________ > >>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 > > > > > > > > -- > Marty Connelly > Victoria, B.C. > Canada > > > > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com > From Erwin.Craps at ithelps.be Thu Jan 22 15:18:42 2004 From: Erwin.Craps at ithelps.be (Erwin Craps - IT Helps) Date: Thu, 22 Jan 2004 22:18:42 +0100 Subject: [AccessD] modifying Outlook contact items from Access Message-ID: <46B976F2B698FF46A4FE7636509B22DF72B6@stekelbes.ithelps.local> Hi Susan Here's some code that creates contacts in Outlook from Access. The function needs adapting, cause I grabbed it right of my app... Public Function CreateContactsInOutlook() ' Comments : ' Parameters: - ' Modified : ' ' -------------------------------------------------- 'TVCodeTools ErrorEnablerStart On Error GoTo PROC_ERR 'TVCodeTools ErrorEnablerEnd Dim oOut As Outlook.Application Dim oNSpace As Outlook.NameSpace Dim oFolderContact As Outlook.MAPIFolder Dim oFolder As Outlook.MAPIFolder Dim objOItem As Object Dim strFolderName As String Dim rsCust As Recordset Dim strSQL As String Dim intCounter As Integer Dim lngItemCounter As Long Dim varCUST_GID As Variant DoCmd.Hourglass True Set oOut = Outlook.Application Set oNSpace = oOut.GetNamespace("MAPI") Set oFolderContact = oNSpace.GetDefaultFolder(olFolderContacts) 'Create Folders strFolderName = "IT Helps Relations" On Error Resume Next Set oFolder = oFolderContact.Folders(strFolderName) If Err <> 0 Then On Error GoTo PROC_ERR Set oFolder = oFolderContact.Folders.Add(strFolderName, olFolderContacts) Else For lngItemCounter = oFolderContact.Folders(strFolderName).Items.Count To 1 Step -1 oFolderContact.Folders(strFolderName).Items(lngItemCounter).Delete DoEvents Next lngItemCounter End If On Error Resume Next oFolder.ShowAsOutlookAB = True On Error GoTo PROC_ERR strSQL = "SELECT CUST_Main.*, CUST_Names.CUST_LID, CUST_Names.Mailing ,CUST_Names.Language_LID, SUB_L_Titles.Title, SUB_L_Titles.LetterStart, CUST_Names.FirstName, CUST_Names.SurName, CUST_Names.DirectFax, CUST_Names.DirectPhone, CUST_Names.Email, CUST_Names.GSMnumber, SUB_L_Countries.Country " _ & "FROM SUB_L_Countries RIGHT JOIN (CUST_Main LEFT JOIN (SUB_L_Titles RIGHT JOIN CUST_Names ON SUB_L_Titles.Title_LID = CUST_Names.Title_LID) ON CUST_Main.CUST_GID = CUST_Names.CUST_GID) ON SUB_L_Countries.Country_LID = CUST_Main.Country_LID " _ & "WHERE CUST_Names.Mailing = true " _ & " ORDER BY CUST_Main.CUST_GID;" Set rsCust = CurrentDb.OpenRecordset(strSQL, dbOpenDynaset) With rsCust Do While rsCust.EOF = False 'Save Main company data If varCUST_GID <> .Fields("CUST_GID") Then If (Nz(.Fields("MainPhone")) <> "") Or (Nz(.Fields("EmailAddress")) <> "") Then Set objOItem = oFolderContact.Folders(strFolderName).Items.Add(olContactItem) objOItem.BusinessAddressCity = Nz(.Fields("City")) objOItem.BusinessAddressCountry = Nz(.Fields("Country")) objOItem.BusinessAddressPostalCode = Nz(.Fields("Postalcode")) objOItem.BusinessAddressStreet = Nz(.Fields("Street")) objOItem.BusinessFaxNumber = InternationalPhone(Nz(.Fields("MainFax"))) objOItem.BusinessTelephoneNumber = InternationalPhone(Nz(.Fields("MainPhone"))) objOItem.CompanyName = Nz(.Fields("Company")) objOItem.CustomerID = Nz(.Fields("CUST_GID")) objOItem.Email1AddressType = "SMTP" objOItem.Email1Address = Nz(.Fields("EmailAddress")) objOItem.Fullname = Nz(.Fields("Company")) objOItem.FileAs = objOItem.Fullname objOItem.Save End If End If 'Save Contact person data If (Nz(.Fields("DirectPhone")) <> "") Or (Nz(.Fields("GSMnumber")) <> "") Or (Nz(.Fields("Email")) <> "") Then Set objOItem = oFolderContact.Folders(strFolderName).Items.Add(olContactItem) objOItem.BusinessAddressCity = Nz(.Fields("City")) objOItem.BusinessAddressCountry = Nz(.Fields("Country")) objOItem.BusinessAddressPostalCode = Nz(.Fields("Postalcode")) objOItem.BusinessAddressStreet = Nz(.Fields("Street")) objOItem.BusinessFaxNumber = InternationalPhone(Nz(.Fields("DirectFax"))) objOItem.BusinessTelephoneNumber = InternationalPhone(Nz(.Fields("DirectPhone"))) objOItem.MobileTelephoneNumber = InternationalPhone(Nz(.Fields("GSMnumber"))) objOItem.CompanyName = Nz(.Fields("Company")) objOItem.CustomerID = Nz(.Fields("CUST_LID")) objOItem.Email1AddressType = "SMTP" objOItem.Email1Address = Nz(.Fields("Email")) objOItem.FirstName = Nz(.Fields("Firstname")) objOItem.LastName = Nz(.Fields("Surname")) objOItem.Title = Nz(.Fields("Title")) objOItem.Fullname = Nz(.Fields("Surname")) & ", " & Nz(.Fields("Firstname")) objOItem.FileAs = objOItem.Fullname objOItem.Save End If varCUST_GID = .Fields("CUST_GID") .MoveNext Loop End With 'TVCodeTools ErrorHandlerStart PROC_EXIT: On Error Resume Next rsCust.Close Set rsCust = Nothing Set oFolder = Nothing Set oFolderContact = Nothing Set oNSpace = Nothing Set oOut = Nothing DoCmd.Hourglass False MsgBox "Finished!" Exit Function PROC_ERR: Select Case Err Case 0 'Do Nothing Case Else MsgBox Err.Description & vbCrLf & "CreateContactsInOutlook", vbOKOnly, "ERROR:" & Err.Number Resume PROC_EXIT End Select 'TVCodeTools ErrorHandlerEnd End Function -----Oorspronkelijk bericht----- Van: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] Namens MartyConnelly Verzonden: donderdag 22 januari 2004 21:04 Aan: Access Developers discussion and problem solving Onderwerp: Re: [AccessD] modifying Outlook contact items from Access There is an Exchange OLEDB Provider available for those that use it. http://msdn.microsoft.com/library/default.asp?url=/library/en-us/wss/wss /_exch2k_search_tasks.asp And this method might work This article describes how you can open a connection to a Microsoft Exchange or to a Microsoft Outlook mailbox by using ActiveX Data Objects (ADO) and the Jet OLE DB provider http://support.microsoft.com/?kbid=275262 Susan Harkins wrote: >This is for instructional purposes, so I have to do it the long hard >way. :) > >I can import the data into Access, modify it, and send it back to >Outlook. I'm just wondering if there isn't a more direct route -- it >would be cool if I could connect an Access form's to a recordset that's >connected directly to Outlook -- so the changes in Access would be >immediate -- I just don't know if that's possible, or even the best way >to go about it. > >Susan H. > > > > >>Hi Susan >>Well I cheat. I have a number of Outlook address books some of which >>are based on Access data. I use a 3rd-party product which each night >>wipes out these address books, extracts the Access data and rebuilds >>the address books. Works like a charm. I could no doubt write >>something but as the product existed..... See >>http://www.teamscope.com/otherpro/datalink.asp >> >> >>Andy Lacey >>http://www.minstersystems.co.uk >> >> >> >>>-----Original Message----- >>>From: accessd-bounces at databaseadvisors.com >>>[mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Susan >>>Harkins >>>Sent: 22 January 2004 17:26 >>>To: AccessD at databaseadvisors.com >>>Subject: [AccessD] modifying Outlook contact items from Access >>> >>> >>>I'm familiar enough with the Outlook model that importing Contact >>>data into Access is easy -- but I'm wondering if any of you use >>>Access to actually modify Outlook contact information? I haven't even >>>started, but would be interested in hearing how others do it. I know >>>you can link, but that only works if Outlook is the default mail >>>client. >>> >>>Susan H. >>> >>>_______________________________________________ >>>AccessD mailing list >>>AccessD at databaseadvisors.com >>>http://databaseadvisors.com/mailman/listinfo/a> ccessd >>>Website: >>>http://www.databaseadvisors.com >>> >>> >>> >>> >>_______________________________________________ >>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 > > > -- Marty Connelly Victoria, B.C. Canada _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From Oleg_123 at xuppa.com Thu Jan 22 15:20:22 2004 From: Oleg_123 at xuppa.com (Oleg_123 at xuppa.com) Date: Thu, 22 Jan 2004 16:20:22 -0500 (EST) Subject: [AccessD] query that deletess dups ? In-Reply-To: <15839630195.20040121190042@cactus.dk> References: <15839630195.20040121190042@cactus.dk> Message-ID: <25088.12.3.132.98.1074806422.squirrel@heck.bay9.com> How can I delete dup records ? Anyone can give me a hint... SELECT DISTINCTROW [emp table].[employee number], [emp table].[employee name], [emp table].COMPANY FROM [emp table] WHERE ((([emp table].[employee number]) In (SELECT [employee number] FROM [emp table] As Tmp GROUP BY [employee number],[employee name] HAVING Count(*)>1 And [employee name] = [emp table].[employee name]))) ORDER BY [emp table].[employee number], [emp table].[employee name]; ----------------------------------------- Get Breaking News from CNN, ABC, NBC, CBS Now. http://www.xuppa.com/news/?link=webmail From kaupca at chevrontexaco.com Thu Jan 22 15:22:57 2004 From: kaupca at chevrontexaco.com (Kaup, Chester A) Date: Thu, 22 Jan 2004 15:22:57 -0600 Subject: [AccessD] Parameter Query asks twice Message-ID: <193572B4E0FC1744BEDFEE63F82CEC9E0F9748@bocnte2k4.boc.chevrontexaco.net> I have a form with a drop down list on it. Once an item is selected from the list it is used as the criteria for SQL statement that is the data row source for a chart on a report that opens in print preview. This work great. When I go to print the chart it asks for the criteria again. Is there a way to prevent this and just print the report? Thanks. No trees were killed in the sending of this message. However a large number of electrons were terribly inconvenienced. From cfoust at infostatsystems.com Thu Jan 22 16:04:18 2004 From: cfoust at infostatsystems.com (Charlotte Foust) Date: Thu, 22 Jan 2004 14:04:18 -0800 Subject: [AccessD] Parameter Query asks twice Message-ID: What version of Access are you using? Running reports based on parameter queries means that you have to pass the parameters to the query. Does the query reference the form? Is the form open when you're trying to run the report? Charlotte Foust -----Original Message----- From: Kaup, Chester A [mailto:kaupca at chevrontexaco.com] Sent: Thursday, January 22, 2004 1:23 PM To: accessd at databaseadvisors.com Subject: [AccessD] Parameter Query asks twice I have a form with a drop down list on it. Once an item is selected from the list it is used as the criteria for SQL statement that is the data row source for a chart on a report that opens in print preview. This work great. When I go to print the chart it asks for the criteria again. Is there a way to prevent this and just print the report? Thanks. No trees were killed in the sending of this message. However a large number of electrons were terribly inconvenienced. _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From bruce_bruen at mlc.com.au Thu Jan 22 16:06:12 2004 From: bruce_bruen at mlc.com.au (bruce_bruen at mlc.com.au) Date: Fri, 23 Jan 2004 09:06:12 +1100 Subject: [AccessD] Worldwide Media exchange or is this a Schuss Boomer? Message-ID: The sign in the picture has been altered with the addition of black duct tape. MartyConnelly To: Access Developers discussion and problem solving Sent by: accessd-bounces at databasea cc: dvisors.com Subject: Re: [AccessD] Worldwide Media exchange or is this a Schuss Boomer? 23/01/2004 04:51 Please respond to Access Developers discussion and problem solving Old Austrian downhill skiing term to describe a daredevil skier or someone skiing on the verge of going out of control and skiing directly in the fall line all the way down the hill making very little turns. But the picture on the sign is a Kangaroo on skis or a boomer. Developer wrote: >Schuss boomer? > > >-----Original Message----- >From: accessd-bounces at databaseadvisors.com >[mailto:accessd-bounces at databaseadvisors.com] On Behalf Of MartyConnelly >Sent: Thursday, January 22, 2004 1:58 AM >To: Access Developers discussion and problem solving >Subject: [AccessD] Worldwide Media exchange or is this a Schuss Boomer? > > >http://wwmx.org/FullMediaView.aspx?mediaid=29423 >mainsite >http://wwmx.org/WebClient.aspx > >Here is a interesting new use of GPS and Images via ASP.net from >Microsoft Research. Free download of api and net client >For all surveillance lovers: microsoft research ask people from all >over the world to send in photos and the location data, where the photos > >were shot. they hope to collect "gazillions" of photos and make a visual > >map of the whole world... > > > -- Marty Connelly Victoria, B.C. Canada _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From kaupca at chevrontexaco.com Thu Jan 22 16:25:59 2004 From: kaupca at chevrontexaco.com (Kaup, Chester A) Date: Thu, 22 Jan 2004 16:25:59 -0600 Subject: [AccessD] Parameter Query asks twice Message-ID: <193572B4E0FC1744BEDFEE63F82CEC9E0F9749@bocnte2k4.boc.chevrontexaco.net> I really did not state the problem correctly the first time. The data from the drop down list on the form works fine in the query. The problem is that the SQL statement in the report asks for a date both when previewing the report and when printing the report. I am using Access 2002. Thanks -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Charlotte Foust Sent: Thursday, January 22, 2004 4:04 PM To: Access Developers discussion and problem solving Subject: RE: [AccessD] Parameter Query asks twice What version of Access are you using? Running reports based on parameter queries means that you have to pass the parameters to the query. Does the query reference the form? Is the form open when you're trying to run the report? Charlotte Foust -----Original Message----- From: Kaup, Chester A [mailto:kaupca at chevrontexaco.com] Sent: Thursday, January 22, 2004 1:23 PM To: accessd at databaseadvisors.com Subject: [AccessD] Parameter Query asks twice I have a form with a drop down list on it. Once an item is selected from the list it is used as the criteria for SQL statement that is the data row source for a chart on a report that opens in print preview. This work great. When I go to print the chart it asks for the criteria again. Is there a way to prevent this and just print the report? Thanks. No trees were killed in the sending of this message. However a large number of electrons were terribly inconvenienced. _______________________________________________ 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 From weeden1949 at hotmail.com Thu Jan 22 17:05:24 2004 From: weeden1949 at hotmail.com (Greg Smith) Date: Thu, 22 Jan 2004 17:05:24 -0600 Subject: [AccessD] Remove Punctuation References: <000001c3e127$76222830$082da8c0@D58BT131> Message-ID: Perry: That's a good question. One that the State Recorder's are still wrestling with since they came up with this stroke of brilliance. If we leave the 'history' data alone, they'll have to do a 'double search' to make sure they get every occurance of, say, "Smith, Greg W." if all the current history stays as it is, and everything after Feb 1 is changed to no punctuation. They are apparently striving for consistancy in the data, but by doing this, they are causing inconsistancy to say the least. And each individual recorder's office can choose to either change the history or not. Gives me a headache just to think about what the result of this is. But, we'll play if they pay. Right now they are leaning toward NOT changing the history. Sigh. Methinks it's time for a brewsky...after I get home. Or more. Greg ----- Original Message ----- From: "Perry Harold" To: "'Access Developers discussion and problem solving'" Sent: Thursday, January 22, 2004 2:36 PM Subject: RE: [AccessD] Remove Punctuation As an aside - If you ever need to identify the last name again (assuming that the field is a Full Name field from your example), how will you find any multiple-name last names that don't include dashes? Perry Harold -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Greg Smith Sent: Thursday, January 22, 2004 11:57 AM To: Access Developers discussion and problem solving Subject: [AccessD] Remove Punctuation Hello everyone! Greetings from Frigid Iowa. Access 97. I need to remove punctuation from a single field in a table which has about 1,500,000 records in it...so far. It's only 4 columns wide, but fairly lengthy. blah blah blah...;) From wdhindman at bellsouth.net Thu Jan 22 17:55:59 2004 From: wdhindman at bellsouth.net (William Hindman) Date: Thu, 22 Jan 2004 18:55:59 -0500 Subject: [AccessD] Remove Punctuation References: <000001c3e127$76222830$082da8c0@D58BT131> Message-ID: <007201c3e143$48f7e590$6101a8c0@dejpolsys> ...bureaucrats! ...this game gets really out of hand when you start putting in names like Dong Wong Song Jong, etc. ...the only real answer is to parse the name into separate fields and concatenate all subsequent versions on demand ...otherwise you inevitably get data entry errors and dupes :( William Hindman - Next Year In The Free State! ----- Original Message ----- From: "Greg Smith" To: "Access Developers discussion and problem solving" Sent: Thursday, January 22, 2004 6:05 PM Subject: Re: [AccessD] Remove Punctuation > Perry: > > That's a good question. One that the State Recorder's are still wrestling > with since they came up with this stroke of brilliance. If we leave the > 'history' data alone, they'll have to do a 'double search' to make sure they > get every occurance of, say, "Smith, Greg W." if all the current history > stays as it is, and everything after Feb 1 is changed to no punctuation. > They are apparently striving for consistancy in the data, but by doing this, > they are causing inconsistancy to say the least. And each individual > recorder's office can choose to either change the history or not. Gives me > a headache just to think about what the result of this is. > > But, we'll play if they pay. Right now they are leaning toward NOT changing > the history. Sigh. > > Methinks it's time for a brewsky...after I get home. Or more. > > Greg > > > ----- Original Message ----- > From: "Perry Harold" > To: "'Access Developers discussion and problem solving'" > > Sent: Thursday, January 22, 2004 2:36 PM > Subject: RE: [AccessD] Remove Punctuation > > > As an aside - If you ever need to identify the last name again (assuming > that the field is a Full Name field from your example), how will you find > any multiple-name last names that don't include dashes? > > Perry Harold > > -----Original Message----- > From: accessd-bounces at databaseadvisors.com > [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Greg Smith > Sent: Thursday, January 22, 2004 11:57 AM > To: Access Developers discussion and problem solving > Subject: [AccessD] Remove Punctuation > > > Hello everyone! Greetings from Frigid Iowa. > > Access 97. > > I need to remove punctuation from a single field in a table which has about > 1,500,000 records in it...so far. It's only 4 columns wide, but fairly > lengthy. > > blah blah blah...;) > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com > From d.dick at uws.edu.au Thu Jan 22 17:54:31 2004 From: d.dick at uws.edu.au (Darren DICK) Date: Fri, 23 Jan 2004 10:54:31 +1100 Subject: [AccessD] A2K: Something new References: <20040122075409.551708087.serbach@new.rr.com> Message-ID: <00ab01c3e143$1757bbf0$19669a89@DDICK> Just a WAG but look for timers firing on the subs - even on the main I have had odd things happen to me when timers are firing. Especially quick timer intervals like 350 or 100 Good luck DD ----- Original Message ----- From: "Steven W. Erbach" To: "Access Developers discussion and problem solving" Sent: Friday, January 23, 2004 12:54 AM Subject: [AccessD] A2K: Something new > Dear Group, > > You think you've seen it all, when all of a sudden... > > I've taken over development and support of a domestic violence shelter statistics program. In my efforts to re-factor (how's that for an Extreme Programming term?) some of the data entry forms I've run into something odd. > > One of the main data entry forms (key field ChildID) has a subform which contains a Tab object. Each of the tabs on this subform contains a sub-subform. While getting familiar with the workings of the program I noticed that one of the sub-subforms did not have the proper linking fields set up. > > The subform's linking field is that same ChildID...but the RecordSource table for the subform is NOT keyed! The sub-subform in question also has only ChildID as the linking field...but the key field for the sub-subform's table is FreeFormID. ChildID is a foreign key in that table. > > The behavior I'm seeing is this: when I go to check the linking fields in the subform I noticed that the VB window's title bar shows the following: > > Microsoft Visual Basic - STATISTICS [running] > > After a moment I see the Subform Field Linker dialog box. While the dialog box is on-screen the title bar of the VB window shows [running]. When I close the dialog box the VB window flashes and [running] disappears from the title bar. > > But when I go to check the linking fields for the sub-subform in question, [running] appears once again in the VB title bar, but then I see a Microsoft Access dialog box with the following message and OK button: > > Object variable or With block variable not set > > ...as if the application was trying to start itself! I can't get at the Subform Field Linker dialog box at all. When I click OK on the dialog box the VB window flashes and [running] disappears from the title bar. > > So I tried deleting the sub-subform and placing it on the tab page again. When I've finished using the subform tool to place the object on the tab page, I get another dialog box labeled "StatsTracker" (the name of the application): > > Your code contains a syntax error, or a Stats Tracker function you need isn't available. > If the syntax is correct, check the Control Wizards subkey or the Libraries key in the StatsTracker section of the Windows Registry to verify that the entries you need are listed and available. > > I click OK and I see the subform object on the tab page. I can assign the Source Object property, but when I go to Link Master Fields I get the "Object variable or With block variable not set" message. > > Can any of you figure out what's happening to me here? Thank you. > > Regards, > > Steve Erbach > Scientific Marketing > Neenah, WI > 920-969-0504 > > Message created with Bloomba > > Disclaimer: No tree was killed in the transmission of this message. However, several coulombs of electrons were temporarily inconvenienced. > > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com From bruce_bruen at mlc.com.au Thu Jan 22 18:03:54 2004 From: bruce_bruen at mlc.com.au (bruce_bruen at mlc.com.au) Date: Fri, 23 Jan 2004 11:03:54 +1100 Subject: [AccessD] Remove Punctuation Message-ID: Not to mention His Exellecy Professor Dr Emile d'Artigan van den Brook Junior III or the illustious Mr Y "William Hindman" To: "Access Developers discussion and problem solving" Sent by: accessd-bounces at databasea cc: dvisors.com Subject: Re: [AccessD] Remove Punctuation 23/01/2004 10:55 Please respond to Access Developers discussion and problem solving ...bureaucrats! ...this game gets really out of hand when you start putting in names like Dong Wong Song Jong, etc. ...the only real answer is to parse the name into separate fields and concatenate all subsequent versions on demand ...otherwise you inevitably get data entry errors and dupes :( William Hindman - Next Year In The Free State! ----- Original Message ----- From: "Greg Smith" To: "Access Developers discussion and problem solving" Sent: Thursday, January 22, 2004 6:05 PM Subject: Re: [AccessD] Remove Punctuation > Perry: > > That's a good question. One that the State Recorder's are still wrestling > with since they came up with this stroke of brilliance. If we leave the > 'history' data alone, they'll have to do a 'double search' to make sure they > get every occurance of, say, "Smith, Greg W." if all the current history > stays as it is, and everything after Feb 1 is changed to no punctuation. > They are apparently striving for consistancy in the data, but by doing this, > they are causing inconsistancy to say the least. And each individual > recorder's office can choose to either change the history or not. Gives me > a headache just to think about what the result of this is. > > But, we'll play if they pay. Right now they are leaning toward NOT changing > the history. Sigh. > > Methinks it's time for a brewsky...after I get home. Or more. > > Greg > > > ----- Original Message ----- > From: "Perry Harold" > To: "'Access Developers discussion and problem solving'" > > Sent: Thursday, January 22, 2004 2:36 PM > Subject: RE: [AccessD] Remove Punctuation > > > As an aside - If you ever need to identify the last name again (assuming > that the field is a Full Name field from your example), how will you find > any multiple-name last names that don't include dashes? > > Perry Harold > > -----Original Message----- > From: accessd-bounces at databaseadvisors.com > [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Greg Smith > Sent: Thursday, January 22, 2004 11:57 AM > To: Access Developers discussion and problem solving > Subject: [AccessD] Remove Punctuation > > > Hello everyone! Greetings from Frigid Iowa. > > Access 97. > > I need to remove punctuation from a single field in a table which has about > 1,500,000 records in it...so far. It's only 4 columns wide, but fairly > lengthy. > > blah blah blah...;) > _______________________________________________ > 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 From davesharpe2 at cox.net Thu Jan 22 18:14:15 2004 From: davesharpe2 at cox.net (Dave Sharpe) Date: Thu, 22 Jan 2004 19:14:15 -0500 Subject: [AccessD] query that deletess dups ? References: <15839630195.20040121190042@cactus.dk> <25088.12.3.132.98.1074806422.squirrel@heck.bay9.com> Message-ID: <003a01c3e145$d651bd60$dd2f0a44@bcsext6137> Oleg ( I think ) As there have been no attempts yet; I googled and found the following that looks like it should help You. http://www.databasejournal.com/features/msaccess/article.php/3077791 Dave ----- Original Message ----- From: To: Sent: Thursday, January 22, 2004 4:20 PM Subject: [AccessD] query that deletess dups ? How can I delete dup records ? Anyone can give me a hint... SELECT DISTINCTROW [emp table].[employee number], [emp table].[employee name], [emp table].COMPANY FROM [emp table] WHERE ((([emp table].[employee number]) In (SELECT [employee number] FROM [emp table] As Tmp GROUP BY [employee number],[employee name] HAVING Count(*)>1 And [employee name] = [emp table].[employee name]))) ORDER BY [emp table].[employee number], [emp table].[employee name]; ----------------------------------------- Get Breaking News from CNN, ABC, NBC, CBS Now. http://www.xuppa.com/news/?link=webmail _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From bruce_bruen at mlc.com.au Thu Jan 22 18:19:34 2004 From: bruce_bruen at mlc.com.au (bruce_bruen at mlc.com.au) Date: Fri, 23 Jan 2004 11:19:34 +1100 Subject: [AccessD] query that deletess dups ? Message-ID: Check the archives, I had a similar problem last year. I believe it was either Wiliam H or Gustav thtat provided the answer using a select first, last or max field in the table you wish to delete from. You could search on my surname. Sorry, the actual anser is on a drive I dont have anymore.... Bruce "Dave Sharpe" To: "Access Developers discussion and problem solving" Sent by: accessd-bounces at databasea cc: dvisors.com Subject: Re: [AccessD] query that deletess dups ? 23/01/2004 11:14 Please respond to Access Developers discussion and problem solving Oleg ( I think ) As there have been no attempts yet; I googled and found the following that looks like it should help You. http://www.databasejournal.com/features/msaccess/article.php/3077791 Dave ----- Original Message ----- From: To: Sent: Thursday, January 22, 2004 4:20 PM Subject: [AccessD] query that deletess dups ? How can I delete dup records ? Anyone can give me a hint... SELECT DISTINCTROW [emp table].[employee number], [emp table].[employee name], [emp table].COMPANY FROM [emp table] WHERE ((([emp table].[employee number]) In (SELECT [employee number] FROM [emp table] As Tmp GROUP BY [employee number],[employee name] HAVING Count(*)>1 And [employee name] = [emp table].[employee name]))) ORDER BY [emp table].[employee number], [emp table].[employee name]; ----------------------------------------- Get Breaking News from CNN, ABC, NBC, CBS Now. http://www.xuppa.com/news/?link=webmail _______________________________________________ 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 From ssharkins at bellsouth.net Thu Jan 22 18:55:00 2004 From: ssharkins at bellsouth.net (Susan Harkins) Date: Thu, 22 Jan 2004 19:55:00 -0500 Subject: [AccessD] modifying Outlook contact items from Access References: <46B976F2B698FF46A4FE7636509B22DF72B6@stekelbes.ithelps.local> Message-ID: <000601c3e14b$91b1eee0$210110ac@SUSANONE> Thanks Erwin -- I've found lots of examples for adding new contact items. What I haven't found is an example of modifying an existing one. There must be a method I'm not aware of or perhaps I'm working with the wrong collection --just simply setting a equality's statement doesn't work. It doesn't return an error, but it doesn't work either. For Each itm In fld.Items If itm.Class = olContact Then If itm = rst(0) Then itm.Birthday = rst(1) End If End If Next where rst is a simple two field record and rst(1) equals the new birthday. Susan H. ----- Original Message ----- From: "Erwin Craps - IT Helps" To: "Access Developers discussion and problem solving" Sent: Thursday, January 22, 2004 4:18 PM Subject: RE: [AccessD] modifying Outlook contact items from Access > Hi Susan > > Here's some code that creates contacts in Outlook from Access. > The function needs adapting, cause I grabbed it right of my app... > > > > > Public Function CreateContactsInOutlook() > ' Comments : > ' Parameters: - > ' Modified : > ' > ' -------------------------------------------------- > 'TVCodeTools ErrorEnablerStart > On Error GoTo PROC_ERR > 'TVCodeTools ErrorEnablerEnd > > Dim oOut As Outlook.Application > Dim oNSpace As Outlook.NameSpace > Dim oFolderContact As Outlook.MAPIFolder > Dim oFolder As Outlook.MAPIFolder > Dim objOItem As Object > Dim strFolderName As String > Dim rsCust As Recordset > Dim strSQL As String > Dim intCounter As Integer > Dim lngItemCounter As Long > Dim varCUST_GID As Variant > > DoCmd.Hourglass True > > Set oOut = Outlook.Application > Set oNSpace = oOut.GetNamespace("MAPI") > Set oFolderContact = oNSpace.GetDefaultFolder(olFolderContacts) > > 'Create Folders > strFolderName = "IT Helps Relations" > On Error Resume Next > Set oFolder = oFolderContact.Folders(strFolderName) > If Err <> 0 Then > On Error GoTo PROC_ERR > Set oFolder = oFolderContact.Folders.Add(strFolderName, > olFolderContacts) > Else > For lngItemCounter = > oFolderContact.Folders(strFolderName).Items.Count To 1 Step -1 > > oFolderContact.Folders(strFolderName).Items(lngItemCounter).Delete > DoEvents > Next lngItemCounter > End If > On Error Resume Next > oFolder.ShowAsOutlookAB = True > On Error GoTo PROC_ERR > > > strSQL = "SELECT CUST_Main.*, CUST_Names.CUST_LID, > CUST_Names.Mailing ,CUST_Names.Language_LID, SUB_L_Titles.Title, > SUB_L_Titles.LetterStart, CUST_Names.FirstName, CUST_Names.SurName, > CUST_Names.DirectFax, CUST_Names.DirectPhone, CUST_Names.Email, > CUST_Names.GSMnumber, SUB_L_Countries.Country " _ > & "FROM SUB_L_Countries RIGHT JOIN (CUST_Main LEFT JOIN > (SUB_L_Titles RIGHT JOIN CUST_Names ON SUB_L_Titles.Title_LID = > CUST_Names.Title_LID) ON CUST_Main.CUST_GID = CUST_Names.CUST_GID) ON > SUB_L_Countries.Country_LID = CUST_Main.Country_LID " _ > & "WHERE CUST_Names.Mailing = true " _ > & " ORDER BY CUST_Main.CUST_GID;" > > Set rsCust = CurrentDb.OpenRecordset(strSQL, dbOpenDynaset) > > With rsCust > Do While rsCust.EOF = False > 'Save Main company data > If varCUST_GID <> .Fields("CUST_GID") Then > If (Nz(.Fields("MainPhone")) <> "") Or > (Nz(.Fields("EmailAddress")) <> "") Then > Set objOItem = > oFolderContact.Folders(strFolderName).Items.Add(olContactItem) > objOItem.BusinessAddressCity = Nz(.Fields("City")) > objOItem.BusinessAddressCountry = > Nz(.Fields("Country")) > objOItem.BusinessAddressPostalCode = > Nz(.Fields("Postalcode")) > objOItem.BusinessAddressStreet = > Nz(.Fields("Street")) > objOItem.BusinessFaxNumber = > InternationalPhone(Nz(.Fields("MainFax"))) > objOItem.BusinessTelephoneNumber = > InternationalPhone(Nz(.Fields("MainPhone"))) > objOItem.CompanyName = Nz(.Fields("Company")) > objOItem.CustomerID = Nz(.Fields("CUST_GID")) > objOItem.Email1AddressType = "SMTP" > objOItem.Email1Address = Nz(.Fields("EmailAddress")) > objOItem.Fullname = Nz(.Fields("Company")) > objOItem.FileAs = objOItem.Fullname > objOItem.Save > End If > End If > > 'Save Contact person data > If (Nz(.Fields("DirectPhone")) <> "") Or > (Nz(.Fields("GSMnumber")) <> "") Or (Nz(.Fields("Email")) <> "") Then > Set objOItem = > oFolderContact.Folders(strFolderName).Items.Add(olContactItem) > objOItem.BusinessAddressCity = Nz(.Fields("City")) > objOItem.BusinessAddressCountry = Nz(.Fields("Country")) > objOItem.BusinessAddressPostalCode = > Nz(.Fields("Postalcode")) > objOItem.BusinessAddressStreet = Nz(.Fields("Street")) > objOItem.BusinessFaxNumber = > InternationalPhone(Nz(.Fields("DirectFax"))) > objOItem.BusinessTelephoneNumber = > InternationalPhone(Nz(.Fields("DirectPhone"))) > objOItem.MobileTelephoneNumber = > InternationalPhone(Nz(.Fields("GSMnumber"))) > objOItem.CompanyName = Nz(.Fields("Company")) > objOItem.CustomerID = Nz(.Fields("CUST_LID")) > objOItem.Email1AddressType = "SMTP" > objOItem.Email1Address = Nz(.Fields("Email")) > objOItem.FirstName = Nz(.Fields("Firstname")) > objOItem.LastName = Nz(.Fields("Surname")) > objOItem.Title = Nz(.Fields("Title")) > objOItem.Fullname = Nz(.Fields("Surname")) & ", " & > Nz(.Fields("Firstname")) > objOItem.FileAs = objOItem.Fullname > objOItem.Save > End If > varCUST_GID = .Fields("CUST_GID") > .MoveNext > Loop > End With > > > 'TVCodeTools ErrorHandlerStart > PROC_EXIT: > On Error Resume Next > rsCust.Close > Set rsCust = Nothing > Set oFolder = Nothing > Set oFolderContact = Nothing > Set oNSpace = Nothing > Set oOut = Nothing > DoCmd.Hourglass False > MsgBox "Finished!" > Exit Function > > PROC_ERR: > Select Case Err > Case 0 > 'Do Nothing > Case Else > MsgBox Err.Description & vbCrLf & "CreateContactsInOutlook", > vbOKOnly, "ERROR:" & Err.Number > Resume PROC_EXIT > End Select > 'TVCodeTools ErrorHandlerEnd > > End Function > > > > > -----Oorspronkelijk bericht----- > Van: accessd-bounces at databaseadvisors.com > [mailto:accessd-bounces at databaseadvisors.com] Namens MartyConnelly > Verzonden: donderdag 22 januari 2004 21:04 > Aan: Access Developers discussion and problem solving > Onderwerp: Re: [AccessD] modifying Outlook contact items from Access > > > There is an Exchange OLEDB Provider available for those that use it. > > http://msdn.microsoft.com/library/default.asp?url=/library/en-us/wss/wss > /_exch2k_search_tasks.asp > And this method might work > > This article describes how you can open a connection to a Microsoft > Exchange or to a Microsoft Outlook mailbox by using ActiveX Data Objects > > (ADO) and the Jet OLE DB provider > http://support.microsoft.com/?kbid=275262 > > Susan Harkins wrote: > > >This is for instructional purposes, so I have to do it the long hard > >way. :) > > > >I can import the data into Access, modify it, and send it back to > >Outlook. I'm just wondering if there isn't a more direct route -- it > >would be cool if I could connect an Access form's to a recordset that's > > >connected directly to Outlook -- so the changes in Access would be > >immediate -- I just don't know if that's possible, or even the best way > > >to go about it. > > > >Susan H. > > > > > > > > > >>Hi Susan > >>Well I cheat. I have a number of Outlook address books some of which > >>are based on Access data. I use a 3rd-party product which each night > >>wipes out these address books, extracts the Access data and rebuilds > >>the address books. Works like a charm. I could no doubt write > >>something but as the product existed..... See > >>http://www.teamscope.com/otherpro/datalink.asp > >> > >> > >>Andy Lacey > >>http://www.minstersystems.co.uk > >> > >> > >> > >>>-----Original Message----- > >>>From: accessd-bounces at databaseadvisors.com > >>>[mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Susan > >>>Harkins > >>>Sent: 22 January 2004 17:26 > >>>To: AccessD at databaseadvisors.com > >>>Subject: [AccessD] modifying Outlook contact items from Access > >>> > >>> > >>>I'm familiar enough with the Outlook model that importing Contact > >>>data into Access is easy -- but I'm wondering if any of you use > >>>Access to actually modify Outlook contact information? I haven't even > > >>>started, but would be interested in hearing how others do it. I know > >>>you can link, but that only works if Outlook is the default mail > >>>client. > >>> > >>>Susan H. > >>> > >>>_______________________________________________ > >>>AccessD mailing list > >>>AccessD at databaseadvisors.com > >>>http://databaseadvisors.com/mailman/listinfo/a> ccessd > >>>Website: > >>>http://www.databaseadvisors.com > >>> > >>> > >>> > >>> > >>_______________________________________________ > >>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 > > > > > > > > -- > Marty Connelly > Victoria, B.C. > Canada > > > > _______________________________________________ > 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 > From jwcolby at colbyconsulting.com Thu Jan 22 20:52:41 2004 From: jwcolby at colbyconsulting.com (John W. Colby) Date: Thu, 22 Jan 2004 21:52:41 -0500 Subject: [AccessD] Vonage Message-ID: Is anyone using this? Comments? http://www.vonage.com John W. Colby www.ColbyConsulting.com From andy at minstersystems.co.uk Fri Jan 23 01:36:47 2004 From: andy at minstersystems.co.uk (Andy Lacey) Date: Fri, 23 Jan 2004 07:36:47 -0000 Subject: [AccessD] Parameter Query asks twice In-Reply-To: <193572B4E0FC1744BEDFEE63F82CEC9E0F9749@bocnte2k4.boc.chevrontexaco.net> Message-ID: <009401c3e183$a875be80$b274d0d5@minster33c3r25> Chester If your report's recordsource refers correctly to the form's list field as its criteria (ie =Forms.[frmYourForm].[ctlName] ) then there should be no prompt at all. It should just work. If you're getting prompted then you've either got a criteria that Access can't resolve (maybe mistyped) or you've actually listed something in the Parameters box within the report definition. If the latter, delete it. Andy Lacey http://www.minstersystems.co.uk > -----Original Message----- > From: accessd-bounces at databaseadvisors.com > [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of > Kaup, Chester A > Sent: 22 January 2004 22:26 > To: Access Developers discussion and problem solving > Subject: RE: [AccessD] Parameter Query asks twice > > > I really did not state the problem correctly the first time. > The data from the drop down list on the form works fine in > the query. The problem is that the SQL statement in the > report asks for a date both when previewing the report and > when printing the report. > > I am using Access 2002. > > Thanks > > > -----Original Message----- > From: accessd-bounces at databaseadvisors.com > [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of > Charlotte Foust > Sent: Thursday, January 22, 2004 4:04 PM > To: Access Developers discussion and problem solving > Subject: RE: [AccessD] Parameter Query asks twice > > > What version of Access are you using? Running reports based > on parameter queries means that you have to pass the > parameters to the query. Does the query reference the form? > Is the form open when you're trying to run the report? > > Charlotte Foust > > -----Original Message----- > From: Kaup, Chester A [mailto:kaupca at chevrontexaco.com] > Sent: Thursday, January 22, 2004 1:23 PM > To: accessd at databaseadvisors.com > Subject: [AccessD] Parameter Query asks twice > > > I have a form with a drop down list on it. Once an item is > selected from the list it is used as the criteria for SQL > statement that is the data row source for a chart on a report > that opens in print preview. This work great. When I go to > print the chart it asks for the criteria again. Is there a > way to prevent this and just print the report? Thanks. > > No trees were killed in the sending of this message. However > a large number of electrons were terribly inconvenienced. > > > > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/a> ccessd > Website: > http://www.databaseadvisors.com > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/a> ccessd > Website: > http://www.databaseadvisors.com > > > > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/a> ccessd > Website: > http://www.databaseadvisors.com > > From accessd666 at yahoo.com Fri Jan 23 03:44:14 2004 From: accessd666 at yahoo.com (Sad Der) Date: Fri, 23 Jan 2004 01:44:14 -0800 (PST) Subject: [AccessD] Create New DB + link table check (Was: Major Performance issue) Message-ID: <20040123094414.54603.qmail@web60206.mail.yahoo.com> Hi group, I've got a solution to my performance problem. Before the users start their analyses I copy the data to the local database! Copying the data takes about 45-55 seconds, calculating the data LESS THEN 2 seconds!! :-) I don't want this copied data in the original client so I want to create a new mdb. I don't have my A2KDH Enterprise Edition with me I'm asking you guys. Does anybody have a (set of) function(s) to create a DB with tables and link to it? I've searched wolfwares.com but I couldn't find any of it and this subject has to be discussed here at some point....or not? The idea is: User needs to use the Analyses tool Create new TEMP DB (duration: ?) Create tables (duration: ?) Check links (duration: ?) Copy data from BE (duration: 45-55 seconds) When user stops the MAIN application (= Analyses tool is part of the MAIN application) delete the TEMP DB. TIA Sad __________________________________ Do you Yahoo!? Yahoo! SiteBuilder - Free web site building tool. Try it! http://webhosting.yahoo.com/ps/sb/ From awithing at twcny.rr.com Fri Jan 23 04:37:39 2004 From: awithing at twcny.rr.com (augusta) Date: Fri, 23 Jan 2004 05:37:39 -0500 Subject: [AccessD] Vonage In-Reply-To: Message-ID: <000b01c3e19c$efed4d00$6401a8c0@dell8200> I signed up a few weeks ago. It may or may not have wrecked just a bit of havoc on my (fairly complicated) network. But overall I love it! The only bummer is that you always have to dial the 1+area code . . . (But I hear some in NJ are doing that already). Great price! > -----Original Message----- > From: accessd-bounces at databaseadvisors.com [mailto:accessd- > bounces at databaseadvisors.com] On Behalf Of John W. Colby > Sent: Thursday, January 22, 2004 9:53 PM > To: AccessD > Subject: [AccessD] Vonage > > Is anyone using this? Comments? > > http://www.vonage.com > > John W. Colby > www.ColbyConsulting.com > > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com From Erwin.Craps at ithelps.be Fri Jan 23 05:08:16 2004 From: Erwin.Craps at ithelps.be (Erwin Craps - IT Helps) Date: Fri, 23 Jan 2004 12:08:16 +0100 Subject: [AccessD] modifying Outlook contact items from Access Message-ID: <46B976F2B698FF46A4FE7636509B22DF03D15A@stekelbes.ithelps.local> Have a bit of a hangover today... I live in a 35000 students-city and Thursday night is out-night (for me that is once every tree months due to, well not used anymore. It takes me tree months to recuperate :-)... I'll try to take a small peak in to it. But you should be able to change data with adapting my routine to edit rather than new. Erwin -----Oorspronkelijk bericht----- Van: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] Namens Susan Harkins Verzonden: vrijdag 23 januari 2004 1:55 Aan: Access Developers discussion and problem solving Onderwerp: Re: [AccessD] modifying Outlook contact items from Access Thanks Erwin -- I've found lots of examples for adding new contact items. What I haven't found is an example of modifying an existing one. There must be a method I'm not aware of or perhaps I'm working with the wrong collection --just simply setting a equality's statement doesn't work. It doesn't return an error, but it doesn't work either. For Each itm In fld.Items If itm.Class = olContact Then If itm = rst(0) Then itm.Birthday = rst(1) End If End If Next where rst is a simple two field record and rst(1) equals the new birthday. Susan H. ----- Original Message ----- From: "Erwin Craps - IT Helps" To: "Access Developers discussion and problem solving" Sent: Thursday, January 22, 2004 4:18 PM Subject: RE: [AccessD] modifying Outlook contact items from Access > Hi Susan > > Here's some code that creates contacts in Outlook from Access. > The function needs adapting, cause I grabbed it right of my app... > > > > > Public Function CreateContactsInOutlook() > ' Comments : > ' Parameters: - > ' Modified : > ' > ' -------------------------------------------------- > 'TVCodeTools ErrorEnablerStart > On Error GoTo PROC_ERR > 'TVCodeTools ErrorEnablerEnd > > Dim oOut As Outlook.Application > Dim oNSpace As Outlook.NameSpace > Dim oFolderContact As Outlook.MAPIFolder > Dim oFolder As Outlook.MAPIFolder > Dim objOItem As Object > Dim strFolderName As String > Dim rsCust As Recordset > Dim strSQL As String > Dim intCounter As Integer > Dim lngItemCounter As Long > Dim varCUST_GID As Variant > > DoCmd.Hourglass True > > Set oOut = Outlook.Application > Set oNSpace = oOut.GetNamespace("MAPI") > Set oFolderContact = oNSpace.GetDefaultFolder(olFolderContacts) > > 'Create Folders > strFolderName = "IT Helps Relations" > On Error Resume Next > Set oFolder = oFolderContact.Folders(strFolderName) > If Err <> 0 Then > On Error GoTo PROC_ERR > Set oFolder = oFolderContact.Folders.Add(strFolderName, > olFolderContacts) > Else > For lngItemCounter = > oFolderContact.Folders(strFolderName).Items.Count To 1 Step -1 > > oFolderContact.Folders(strFolderName).Items(lngItemCounter).Delete > DoEvents > Next lngItemCounter > End If > On Error Resume Next > oFolder.ShowAsOutlookAB = True > On Error GoTo PROC_ERR > > > strSQL = "SELECT CUST_Main.*, CUST_Names.CUST_LID, > CUST_Names.Mailing ,CUST_Names.Language_LID, SUB_L_Titles.Title, > SUB_L_Titles.LetterStart, CUST_Names.FirstName, CUST_Names.SurName, > CUST_Names.DirectFax, CUST_Names.DirectPhone, CUST_Names.Email, > CUST_Names.GSMnumber, SUB_L_Countries.Country " _ > & "FROM SUB_L_Countries RIGHT JOIN (CUST_Main LEFT JOIN > (SUB_L_Titles RIGHT JOIN CUST_Names ON SUB_L_Titles.Title_LID = > CUST_Names.Title_LID) ON CUST_Main.CUST_GID = CUST_Names.CUST_GID) ON > SUB_L_Countries.Country_LID = CUST_Main.Country_LID " _ > & "WHERE CUST_Names.Mailing = true " _ > & " ORDER BY CUST_Main.CUST_GID;" > > Set rsCust = CurrentDb.OpenRecordset(strSQL, dbOpenDynaset) > > With rsCust > Do While rsCust.EOF = False > 'Save Main company data > If varCUST_GID <> .Fields("CUST_GID") Then > If (Nz(.Fields("MainPhone")) <> "") Or > (Nz(.Fields("EmailAddress")) <> "") Then > Set objOItem = > oFolderContact.Folders(strFolderName).Items.Add(olContactItem) > objOItem.BusinessAddressCity = Nz(.Fields("City")) > objOItem.BusinessAddressCountry = > Nz(.Fields("Country")) > objOItem.BusinessAddressPostalCode = > Nz(.Fields("Postalcode")) > objOItem.BusinessAddressStreet = > Nz(.Fields("Street")) > objOItem.BusinessFaxNumber = > InternationalPhone(Nz(.Fields("MainFax"))) > objOItem.BusinessTelephoneNumber = > InternationalPhone(Nz(.Fields("MainPhone"))) > objOItem.CompanyName = Nz(.Fields("Company")) > objOItem.CustomerID = Nz(.Fields("CUST_GID")) > objOItem.Email1AddressType = "SMTP" > objOItem.Email1Address = Nz(.Fields("EmailAddress")) > objOItem.Fullname = Nz(.Fields("Company")) > objOItem.FileAs = objOItem.Fullname > objOItem.Save > End If > End If > > 'Save Contact person data > If (Nz(.Fields("DirectPhone")) <> "") Or > (Nz(.Fields("GSMnumber")) <> "") Or (Nz(.Fields("Email")) <> "") Then > Set objOItem = > oFolderContact.Folders(strFolderName).Items.Add(olContactItem) > objOItem.BusinessAddressCity = Nz(.Fields("City")) > objOItem.BusinessAddressCountry = Nz(.Fields("Country")) > objOItem.BusinessAddressPostalCode = > Nz(.Fields("Postalcode")) > objOItem.BusinessAddressStreet = Nz(.Fields("Street")) > objOItem.BusinessFaxNumber = > InternationalPhone(Nz(.Fields("DirectFax"))) > objOItem.BusinessTelephoneNumber = > InternationalPhone(Nz(.Fields("DirectPhone"))) > objOItem.MobileTelephoneNumber = > InternationalPhone(Nz(.Fields("GSMnumber"))) > objOItem.CompanyName = Nz(.Fields("Company")) > objOItem.CustomerID = Nz(.Fields("CUST_LID")) > objOItem.Email1AddressType = "SMTP" > objOItem.Email1Address = Nz(.Fields("Email")) > objOItem.FirstName = Nz(.Fields("Firstname")) > objOItem.LastName = Nz(.Fields("Surname")) > objOItem.Title = Nz(.Fields("Title")) > objOItem.Fullname = Nz(.Fields("Surname")) & ", " & > Nz(.Fields("Firstname")) > objOItem.FileAs = objOItem.Fullname > objOItem.Save > End If > varCUST_GID = .Fields("CUST_GID") > .MoveNext > Loop > End With > > > 'TVCodeTools ErrorHandlerStart > PROC_EXIT: > On Error Resume Next > rsCust.Close > Set rsCust = Nothing > Set oFolder = Nothing > Set oFolderContact = Nothing > Set oNSpace = Nothing > Set oOut = Nothing > DoCmd.Hourglass False > MsgBox "Finished!" > Exit Function > > PROC_ERR: > Select Case Err > Case 0 > 'Do Nothing > Case Else > MsgBox Err.Description & vbCrLf & > "CreateContactsInOutlook", vbOKOnly, "ERROR:" & Err.Number > Resume PROC_EXIT > End Select > 'TVCodeTools ErrorHandlerEnd > > End Function > > > > > -----Oorspronkelijk bericht----- > Van: accessd-bounces at databaseadvisors.com > [mailto:accessd-bounces at databaseadvisors.com] Namens MartyConnelly > Verzonden: donderdag 22 januari 2004 21:04 > Aan: Access Developers discussion and problem solving > Onderwerp: Re: [AccessD] modifying Outlook contact items from Access > > > There is an Exchange OLEDB Provider available for those that use it. > > http://msdn.microsoft.com/library/default.asp?url=/library/en-us/wss/w > ss > /_exch2k_search_tasks.asp > And this method might work > > This article describes how you can open a connection to a Microsoft > Exchange or to a Microsoft Outlook mailbox by using ActiveX Data > Objects > > (ADO) and the Jet OLE DB provider > http://support.microsoft.com/?kbid=275262 > > Susan Harkins wrote: > > >This is for instructional purposes, so I have to do it the long hard > >way. :) > > > >I can import the data into Access, modify it, and send it back to > >Outlook. I'm just wondering if there isn't a more direct route -- it > >would be cool if I could connect an Access form's to a recordset > >that's > > >connected directly to Outlook -- so the changes in Access would be > >immediate -- I just don't know if that's possible, or even the best > >way > > >to go about it. > > > >Susan H. > > > > > > > > > >>Hi Susan > >>Well I cheat. I have a number of Outlook address books some of which > >>are based on Access data. I use a 3rd-party product which each night > >>wipes out these address books, extracts the Access data and rebuilds > >>the address books. Works like a charm. I could no doubt write > >>something but as the product existed..... See > >>http://www.teamscope.com/otherpro/datalink.asp > >> > >> > >>Andy Lacey > >>http://www.minstersystems.co.uk > >> > >> > >> > >>>-----Original Message----- > >>>From: accessd-bounces at databaseadvisors.com > >>>[mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Susan > >>>Harkins > >>>Sent: 22 January 2004 17:26 > >>>To: AccessD at databaseadvisors.com > >>>Subject: [AccessD] modifying Outlook contact items from Access > >>> > >>> > >>>I'm familiar enough with the Outlook model that importing Contact > >>>data into Access is easy -- but I'm wondering if any of you use > >>>Access to actually modify Outlook contact information? I haven't > >>>even > > >>>started, but would be interested in hearing how others do it. I > >>>know you can link, but that only works if Outlook is the default > >>>mail client. > >>> > >>>Susan H. > >>> > >>>_______________________________________________ > >>>AccessD mailing list > >>>AccessD at databaseadvisors.com > >>>http://databaseadvisors.com/mailman/listinfo/a> ccessd > >>>Website: > >>>http://www.databaseadvisors.com > >>> > >>> > >>> > >>> > >>_______________________________________________ > >>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 > > > > > > > > -- > Marty Connelly > Victoria, B.C. > Canada > > > > _______________________________________________ > 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 > _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From gustav at cactus.dk Fri Jan 23 06:03:24 2004 From: gustav at cactus.dk (Gustav Brock) Date: Fri, 23 Jan 2004 13:03:24 +0100 Subject: [AccessD] Create New DB + link table check (Was: Major Performance issue) In-Reply-To: <20040123094414.54603.qmail@web60206.mail.yahoo.com> References: <20040123094414.54603.qmail@web60206.mail.yahoo.com> Message-ID: <15514379096.20040123130324@cactus.dk> Hi Sad JC has a demo for this purpose: http://www.colbyconsulting.com/C2DbDemoBEBuild.htm But I wonder if this is the only method. If your source data are the same for all queries you can open a snapshot (which copies the data once), leave it open; then query this - which should take a couple of seconds. If you are able to write protect the frontend (main) then, of course, no temporary data will be written into it and no bloat will occur. /gustav > I've got a solution to my performance problem. Before > the users start their analyses I copy the data to the > local database! Copying the data takes about 45-55 > seconds, calculating the data LESS THEN 2 seconds!! > :-) > I don't want this copied data in the original client > so I want to create a new mdb. I don't have my A2KDH > Enterprise Edition with me I'm asking you guys. > Does anybody have a (set of) function(s) to create a > DB with tables and link to it? > I've searched wolfwares.com but I couldn't find any of > it and this subject has to be discussed here at some > point....or not? > The idea is: > User needs to use the Analyses tool > Create new TEMP DB (duration: ?) > Create tables (duration: ?) > Check links (duration: ?) > Copy data from BE (duration: 45-55 seconds) > When user stops the MAIN application (= Analyses tool > is part of the MAIN application) delete the TEMP DB. From serbach at new.rr.com Fri Jan 23 06:40:20 2004 From: serbach at new.rr.com (Steven W. Erbach) Date: Fri, 23 Jan 2004 06:40:20 -0600 Subject: [AccessD] A2K: Something new Message-ID: <20040123064020.1613214714.serbach@new.rr.com> Darren, >> look for timers firing on the subs << Not a bad WAG, but this application has a minimal amount of code. No timers. Now that I can get at the Subform Field Linker by putting the subform in design mode (rather than trying to get the Linker while designing the Main form and looking at the links in a sub-subform) I think I'll be all right. I guess that the [running] I see on the VB title bar just means that an Access wizard is running. Why that wizard chokes when I try to get the links in a sub-subform is the thing that puzzles me. Regards, Steve Erbach Scientific Marketing Neenah, WI 920-969-0504 Message created with Bloomba Disclaimer: No tree was killed in the transmission of this message. However, several coulombs of electrons were temporarily inconvenienced. From jwcolby at colbyconsulting.com Fri Jan 23 06:43:10 2004 From: jwcolby at colbyconsulting.com (John W. Colby) Date: Fri, 23 Jan 2004 07:43:10 -0500 Subject: [AccessD] subform only allows one record Message-ID: I need to set up a subform that only allows a single record to be entered. I have a function in the subform that checks if the recordsetclone.recordcount >0 and if so sets AllowAdditions = false. This works fine if any records already exist but if a new record is created, then if the person does a page down to save the first record, they end up in a second record. I am firing this function I built from the OnCurrent of the parent, as well as the OnCurrent of the subform itself. Haven't tried yet from before update. Does anyone do this kind of thing? If so how do you accomplish it? John W. Colby www.ColbyConsulting.com From DWUTKA at marlow.com Thu Jan 22 14:26:36 2004 From: DWUTKA at marlow.com (DWUTKA at marlow.com) Date: Thu, 22 Jan 2004 14:26:36 -0600 Subject: [AccessD] modifying Outlook contact items from Access Message-ID: <2F8793082E00D4119A1700B0D0216BF8022277A0@main2.marlow.com> Um, setup a linked table to an Outlook/Exchange Folder? What version of Access. It's there by default for A2k (and I would assume later versions...) but in 97, you have to download a free Add-in from Microsoft. Drew -----Original Message----- From: Susan Harkins [mailto:ssharkins at bellsouth.net] Sent: Thursday, January 22, 2004 12:34 PM To: Access Developers discussion and problem solving Subject: Re: [AccessD] modifying Outlook contact items from Access This is for instructional purposes, so I have to do it the long hard way. :) I can import the data into Access, modify it, and send it back to Outlook. I'm just wondering if there isn't a more direct route -- it would be cool if I could connect an Access form's to a recordset that's connected directly to Outlook -- so the changes in Access would be immediate -- I just don't know if that's possible, or even the best way to go about it. Susan H. > Hi Susan > Well I cheat. I have a number of Outlook address books some of which are > based on Access data. I use a 3rd-party product which each night wipes out > these address books, extracts the Access data and rebuilds the address > books. Works like a charm. I could no doubt write something but as the > product existed..... See http://www.teamscope.com/otherpro/datalink.asp > > > Andy Lacey > http://www.minstersystems.co.uk > > > -----Original Message----- > > From: accessd-bounces at databaseadvisors.com > > [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of > > Susan Harkins > > Sent: 22 January 2004 17:26 > > To: AccessD at databaseadvisors.com > > Subject: [AccessD] modifying Outlook contact items from Access > > > > > > I'm familiar enough with the Outlook model that importing > > Contact data into Access is easy -- but I'm wondering if any > > of you use Access to actually modify Outlook contact > > information? I haven't even started, but would be interested > > in hearing how others do it. I know you can link, but that > > only works if Outlook is the default mail client. > > > > Susan H. > > > > _______________________________________________ > > AccessD mailing list > > AccessD at databaseadvisors.com > > http://databaseadvisors.com/mailman/listinfo/a> ccessd > > Website: > > http://www.databaseadvisors.com > > > > > > _______________________________________________ > 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 From gustav at cactus.dk Fri Jan 23 07:13:39 2004 From: gustav at cactus.dk (Gustav Brock) Date: Fri, 23 Jan 2004 14:13:39 +0100 Subject: [AccessD] subform only allows one record In-Reply-To: References: Message-ID: <8018594016.20040123141339@cactus.dk> Hi John > I need to set up a subform that only allows a single record to be entered. > I have a function in the subform that checks if the > recordsetclone.recordcount >0 and if so sets AllowAdditions = false. This > works fine if any records already exist but if a new record is created, then > if the person does a page down to save the first record, they end up in a > second record. I am firing this function I built from the OnCurrent of the > parent, as well as the OnCurrent of the subform itself. Haven't tried yet > from before update. > Does anyone do this kind of thing? If so how do you accomplish it? If you can't or won't control this is at the table level, we have this generic function: Public Sub SetFormAllowAdditions( _ ByVal frm As Form, _ ByVal lngRecordCountMax As Long) ' Limits count of records in subform. ' ' Usage: ' Add this line for max. n rows: ' ' Call SetFormAllowAdditions(Me.Form, n) ' ' in these subs of the form: ' ' Form_AfterInsert() ' Form_AfterDelConfirm(Status As Integer) ' ' And in the main form: ' ' Call SetFormAllowAdditions(Me!subFrmControl.Form, n) ' ' in this sub of the main form: ' ' Form_Current() ' ' 2003-01-28. Cactus Data ApS. CPH. Dim booAllowAdditions As Boolean With frm booAllowAdditions = (.RecordsetClone.RecordCount < lngRecordCountMax) ' Only change edit state if needed. If booAllowAdditions <> .AllowAdditions Then .AllowAdditions = booAllowAdditions End If End With End Sub /gustav From JColby at dispec.com Fri Jan 23 09:05:11 2004 From: JColby at dispec.com (Colby, John) Date: Fri, 23 Jan 2004 10:05:11 -0500 Subject: [AccessD] subform only allows one record Message-ID: <05C61C52D7CAD211A7830008C7DF6F1079BD03@DISABILITYINS01> Gustav, Thanks for that. Controlling this at the table level means that the user is notified either when she attempts to create a new record or when she tries to save a new record. Either way is klunky. I don't want my users even seeing the new record if they already have one record or if they have just finished saving the first record. It is that "just finished saving" that is throwing me off. It's almost as if in order to leave this record (and thus save it) you must go to a new record which I don't want happening. John W. Colby The database guy -----Original Message----- From: Gustav Brock [mailto:gustav at cactus.dk] Sent: Friday, January 23, 2004 8:14 AM To: Access Developers discussion and problem solving Subject: Re: [AccessD] subform only allows one record Hi John > I need to set up a subform that only allows a single record to be entered. > I have a function in the subform that checks if the > recordsetclone.recordcount >0 and if so sets AllowAdditions = false. This > works fine if any records already exist but if a new record is created, then > if the person does a page down to save the first record, they end up in a > second record. I am firing this function I built from the OnCurrent of the > parent, as well as the OnCurrent of the subform itself. Haven't tried yet > from before update. > Does anyone do this kind of thing? If so how do you accomplish it? If you can't or won't control this is at the table level, we have this generic function: Public Sub SetFormAllowAdditions( _ ByVal frm As Form, _ ByVal lngRecordCountMax As Long) ' Limits count of records in subform. ' ' Usage: ' Add this line for max. n rows: ' ' Call SetFormAllowAdditions(Me.Form, n) ' ' in these subs of the form: ' ' Form_AfterInsert() ' Form_AfterDelConfirm(Status As Integer) ' ' And in the main form: ' ' Call SetFormAllowAdditions(Me!subFrmControl.Form, n) ' ' in this sub of the main form: ' ' Form_Current() ' ' 2003-01-28. Cactus Data ApS. CPH. Dim booAllowAdditions As Boolean With frm booAllowAdditions = (.RecordsetClone.RecordCount < lngRecordCountMax) ' Only change edit state if needed. If booAllowAdditions <> .AllowAdditions Then .AllowAdditions = booAllowAdditions End If End With End Sub /gustav _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From gustav at cactus.dk Fri Jan 23 09:22:09 2004 From: gustav at cactus.dk (Gustav Brock) Date: Fri, 23 Jan 2004 16:22:09 +0100 Subject: [AccessD] subform only allows one record In-Reply-To: <05C61C52D7CAD211A7830008C7DF6F1079BD03@DISABILITYINS01> References: <05C61C52D7CAD211A7830008C7DF6F1079BD03@DISABILITYINS01> Message-ID: <16426303542.20040123162209@cactus.dk> Hi John I agree, table level handling leaves you with error handling only - which is not very nice for the user. /gustav > Thanks for that. Controlling this at the table level means that the user is > notified either when she attempts to create a new record or when she tries > to save a new record. Either way is klunky. I don't want my users even > seeing the new record if they already have one record or if they have just > finished saving the first record. It is that "just finished saving" that is > throwing me off. It's almost as if in order to leave this record (and thus > save it) you must go to a new record which I don't want happening. > John W. Colby > The database guy From ssharkins at bellsouth.net Fri Jan 23 09:32:04 2004 From: ssharkins at bellsouth.net (Susan Harkins) Date: Fri, 23 Jan 2004 10:32:04 -0500 Subject: [AccessD] modifying Outlook contact items from Access References: <46B976F2B698FF46A4FE7636509B22DF03D15A@stekelbes.ithelps.local> Message-ID: <003e01c3e1c6$7ea829b0$210110ac@SUSANONE> > But you should be able to change data with adapting my routine to edit > rather than new. ==========I think so too, I just haven't hit on it yet. Susan H. From ssharkins at bellsouth.net Fri Jan 23 09:31:14 2004 From: ssharkins at bellsouth.net (Susan Harkins) Date: Fri, 23 Jan 2004 10:31:14 -0500 Subject: [AccessD] modifying Outlook contact items from Access References: <2F8793082E00D4119A1700B0D0216BF8022277A0@main2.marlow.com> Message-ID: <003801c3e1c6$7871e450$210110ac@SUSANONE> Yes, you can link to Outlook from Access 2000 -- well, I'm sure you can with Access k2 -- but Outlook has to be the default mail client -- which is the problem. So, I need code -- and I was hoping there was a way to directly link to the data via an ADO object or something -- but I haven't been able to make it work. So, I can import it, change it, and send it back -- but so far, sending it back hasn't actually updated it in Outlook. Susan H. > Um, setup a linked table to an Outlook/Exchange Folder? What version of > Access. It's there by default for A2k (and I would assume later > versions...) but in 97, you have to download a free Add-in from Microsoft. > > Drew > > -----Original Message----- > From: Susan Harkins [mailto:ssharkins at bellsouth.net] > Sent: Thursday, January 22, 2004 12:34 PM > To: Access Developers discussion and problem solving > Subject: Re: [AccessD] modifying Outlook contact items from Access > > > This is for instructional purposes, so I have to do it the long hard way. :) > > I can import the data into Access, modify it, and send it back to Outlook. > I'm just wondering if there isn't a more direct route -- it would be cool if > I could connect an Access form's to a recordset that's connected directly to > Outlook -- so the changes in Access would be immediate -- I just don't know > if that's possible, or even the best way to go about it. > > Susan H. > > > > Hi Susan > > Well I cheat. I have a number of Outlook address books some of which are > > based on Access data. I use a 3rd-party product which each night wipes out > > these address books, extracts the Access data and rebuilds the address > > books. Works like a charm. I could no doubt write something but as the > > product existed..... See http://www.teamscope.com/otherpro/datalink.asp > > > > > > Andy Lacey > > http://www.minstersystems.co.uk > > > > > -----Original Message----- > > > From: accessd-bounces at databaseadvisors.com > > > [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of > > > Susan Harkins > > > Sent: 22 January 2004 17:26 > > > To: AccessD at databaseadvisors.com > > > Subject: [AccessD] modifying Outlook contact items from Access > > > > > > > > > I'm familiar enough with the Outlook model that importing > > > Contact data into Access is easy -- but I'm wondering if any > > > of you use Access to actually modify Outlook contact > > > information? I haven't even started, but would be interested > > > in hearing how others do it. I know you can link, but that > > > only works if Outlook is the default mail client. > > > > > > Susan H. > > > > > > _______________________________________________ > > > AccessD mailing list > > > AccessD at databaseadvisors.com > > > http://databaseadvisors.com/mailman/listinfo/a> ccessd > > > Website: > > > http://www.databaseadvisors.com > > > > > > > > > > _______________________________________________ > > 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 > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com > From mikedorism at adelphia.net Fri Jan 23 10:39:08 2004 From: mikedorism at adelphia.net (Mike & Doris Manning) Date: Fri, 23 Jan 2004 11:39:08 -0500 Subject: [AccessD] modifying Outlook contact items from Access In-Reply-To: <003801c3e1c6$7871e450$210110ac@SUSANONE> Message-ID: <000001c3e1cf$6c946410$8b194244@hargrove.internal> Have you looked here... http://www.slipstick.com/dev/database.htm Doris Manning Database Administrator Hargrove Inc. www.hargroveinc.com -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Susan Harkins Sent: Friday, January 23, 2004 10:31 AM To: Access Developers discussion and problem solving Subject: Re: [AccessD] modifying Outlook contact items from Access Yes, you can link to Outlook from Access 2000 -- well, I'm sure you can with Access k2 -- but Outlook has to be the default mail client -- which is the problem. So, I need code -- and I was hoping there was a way to directly link to the data via an ADO object or something -- but I haven't been able to make it work. So, I can import it, change it, and send it back -- but so far, sending it back hasn't actually updated it in Outlook. Susan H. > Um, setup a linked table to an Outlook/Exchange Folder? What version > of Access. It's there by default for A2k (and I would assume later > versions...) but in 97, you have to download a free Add-in from > Microsoft. > > Drew > > -----Original Message----- > From: Susan Harkins [mailto:ssharkins at bellsouth.net] > Sent: Thursday, January 22, 2004 12:34 PM > To: Access Developers discussion and problem solving > Subject: Re: [AccessD] modifying Outlook contact items from Access > > > This is for instructional purposes, so I have to do it the long hard > way. :) > > I can import the data into Access, modify it, and send it back to > Outlook. I'm just wondering if there isn't a more direct route -- it > would be cool if > I could connect an Access form's to a recordset that's connected > directly to > Outlook -- so the changes in Access would be immediate -- I just don't know > if that's possible, or even the best way to go about it. > > Susan H. > > > > Hi Susan > > Well I cheat. I have a number of Outlook address books some of which > > are based on Access data. I use a 3rd-party product which each night > > wipes out > > these address books, extracts the Access data and rebuilds the > > address books. Works like a charm. I could no doubt write something > > but as the product existed..... See > > http://www.teamscope.com/otherpro/datalink.asp > > > > > > Andy Lacey > > http://www.minstersystems.co.uk > > > > > -----Original Message----- > > > From: accessd-bounces at databaseadvisors.com > > > [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Susan > > > Harkins > > > Sent: 22 January 2004 17:26 > > > To: AccessD at databaseadvisors.com > > > Subject: [AccessD] modifying Outlook contact items from Access > > > > > > > > > I'm familiar enough with the Outlook model that importing Contact > > > data into Access is easy -- but I'm wondering if any of you use > > > Access to actually modify Outlook contact information? I haven't > > > even started, but would be interested in hearing how others do it. > > > I know you can link, but that only works if Outlook is the default > > > mail client. > > > > > > Susan H. > > > > > > _______________________________________________ > > > AccessD mailing list > > > AccessD at databaseadvisors.com > > > http://databaseadvisors.com/mailman/listinfo/a> ccessd > > > Website: > > > http://www.databaseadvisors.com > > > > > > > > > > _______________________________________________ > > 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 > _______________________________________________ > 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 From adtp at touchtelindia.net Fri Jan 23 11:46:20 2004 From: adtp at touchtelindia.net (A.D.Tejpal) Date: Fri, 23 Jan 2004 23:16:20 +0530 Subject: [AccessD] subform only allows one record References: Message-ID: <00f701c3e1d8$fb5bd170$f3edf73d@winxp> John, Kindly put the code given below in the subform's code module and let me know whether it meets your requirement. Regards, A.D.Tejpal -------------- -------------- Code Start -------------- Option Compare Database Option Explicit Private RecNo As Integer ' Global Variable Private Sub Form_AfterDelConfirm(Status As Integer) RecNo = RecNo - 1 Me.AllowAdditions = True End Sub Private Sub Form_AfterInsert() RecNo = RecNo + 1 Me.AllowAdditions = False End Sub Private Sub Form_Load() RecNo = DCount("*", Me.RecordSource) If RecNo > 0 Then Me.AllowAdditions = False Else Me.AllowAdditions = True End If End Sub ------------- Code End ------------- ----- Original Message ----- From: John W. Colby To: AccessD Sent: Friday, January 23, 2004 18:13 Subject: [AccessD] subform only allows one record I need to set up a subform that only allows a single record to be entered. I have a function in the subform that checks if the recordsetclone.recordcount >0 and if so sets AllowAdditions = false. This works fine if any records already exist but if a new record is created, then if the person does a page down to save the first record, they end up in a second record. I am firing this function I built from the OnCurrent of the parent, as well as the OnCurrent of the subform itself. Haven't tried yet from before update. Does anyone do this kind of thing? If so how do you accomplish it? John W. Colby www.ColbyConsulting.com From ssharkins at bellsouth.net Fri Jan 23 11:38:53 2004 From: ssharkins at bellsouth.net (Susan Harkins) Date: Fri, 23 Jan 2004 12:38:53 -0500 Subject: [AccessD] modifying Outlook contact items from Access References: <000001c3e1cf$6c946410$8b194244@hargrove.internal> Message-ID: <006001c3e1d9$92a62260$210110ac@SUSANONE> Thanks Doris -- looks like they've got a lot of good stuff. Susan H. > Have you looked here... http://www.slipstick.com/dev/database.htm > > Doris Manning > Database Administrator > Hargrove Inc. > www.hargroveinc.com From my.lists at verizon.net Fri Jan 23 13:26:44 2004 From: my.lists at verizon.net (Francisco H Tapia) Date: Fri, 23 Jan 2004 11:26:44 -0800 Subject: [AccessD] Vonage In-Reply-To: <000b01c3e19c$efed4d00$6401a8c0@dell8200> References: <000b01c3e19c$efed4d00$6401a8c0@dell8200> Message-ID: <40117574.5010903@verizon.net> Price sounds good, but if you are using DSL it's not really like you're saving much.. :( Verizon = 29.00 DSL = 35.00 --------------- 64.00 plus the vonage price? :S, I can't get rid of verizon as they are my telco. the only thing that would make sense is to switch to cable then it's just the price of the cable bill plus vonage. -- -Francisco augusta wrote: >I signed up a few weeks ago. It may or may not have wrecked just a bit >of havoc on my (fairly complicated) network. But overall I love it! The >only bummer is that you always have to dial the 1+area code . . . (But I >hear some in NJ are doing that already). Great price! > > > >>-----Original Message----- >>From: accessd-bounces at databaseadvisors.com [mailto:accessd- >>bounces at databaseadvisors.com] On Behalf Of John W. Colby >>Sent: Thursday, January 22, 2004 9:53 PM >>To: AccessD >>Subject: [AccessD] Vonage >> >>Is anyone using this? Comments? >> >>http://www.vonage.com >> >>John W. Colby >>www.ColbyConsulting.com >> >> From ssharkins at bellsouth.net Fri Jan 23 14:13:23 2004 From: ssharkins at bellsouth.net (Susan Harkins) Date: Fri, 23 Jan 2004 15:13:23 -0500 Subject: [AccessD] modifying Outlook contact items from Access References: <000001c3e1cf$6c946410$8b194244@hargrove.internal> Message-ID: <009901c3e1ed$5b4170e0$210110ac@SUSANONE> Well, I've been through some of it -- most of it -- same story -- how to "add" data, but not modify what's already there. I'm going to just use an .Add method and see if it'll overwrite what's already there. Susan H. > Have you looked here... http://www.slipstick.com/dev/database.htm > From jwcolby at colbyconsulting.com Fri Jan 23 16:18:52 2004 From: jwcolby at colbyconsulting.com (John W. Colby) Date: Fri, 23 Jan 2004 17:18:52 -0500 Subject: [AccessD] Vonage In-Reply-To: <40117574.5010903@verizon.net> Message-ID: My blazing fast internet recently went up 50% to $45 / month. The cable company wants $35 / month for unlimited internet so I could just get it through them, but I thought I'd give Vonage a try. Vonage has $15, $25 and $35 packages which allows me to try it for cheap and see if it really works before turning off the land line. John W. Colby www.ColbyConsulting.com -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Francisco H Tapia Sent: Friday, January 23, 2004 2:27 PM To: Access Developers discussion and problem solving Subject: Re: [AccessD] Vonage Price sounds good, but if you are using DSL it's not really like you're saving much.. :( Verizon = 29.00 DSL = 35.00 --------------- 64.00 plus the vonage price? :S, I can't get rid of verizon as they are my telco. the only thing that would make sense is to switch to cable then it's just the price of the cable bill plus vonage. -- -Francisco augusta wrote: >I signed up a few weeks ago. It may or may not have wrecked just a bit >of havoc on my (fairly complicated) network. But overall I love it! The >only bummer is that you always have to dial the 1+area code . . . (But I >hear some in NJ are doing that already). Great price! > > > >>-----Original Message----- >>From: accessd-bounces at databaseadvisors.com [mailto:accessd- >>bounces at databaseadvisors.com] On Behalf Of John W. Colby >>Sent: Thursday, January 22, 2004 9:53 PM >>To: AccessD >>Subject: [AccessD] Vonage >> >>Is anyone using this? Comments? >> >>http://www.vonage.com >> >>John W. Colby >>www.ColbyConsulting.com >> >> _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From awithing at twcny.rr.com Fri Jan 23 16:38:59 2004 From: awithing at twcny.rr.com (awithing) Date: Fri, 23 Jan 2004 17:38:59 -0500 Subject: [AccessD] Vonage In-Reply-To: Message-ID: <000201c3e201$b1e538a0$6701a8c0@laptopD800> Well, I think that it is worth a try. I put my land line on a message rate for a while until I feel totally comfortable with Vonage. -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of John W. Colby Sent: Friday, January 23, 2004 5:19 PM To: Access Developers discussion and problem solving Subject: RE: [AccessD] Vonage My blazing fast internet recently went up 50% to $45 / month. The cable company wants $35 / month for unlimited internet so I could just get it through them, but I thought I'd give Vonage a try. Vonage has $15, $25 and $35 packages which allows me to try it for cheap and see if it really works before turning off the land line. John W. Colby www.ColbyConsulting.com -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Francisco H Tapia Sent: Friday, January 23, 2004 2:27 PM To: Access Developers discussion and problem solving Subject: Re: [AccessD] Vonage Price sounds good, but if you are using DSL it's not really like you're saving much.. :( Verizon = 29.00 DSL = 35.00 --------------- 64.00 plus the vonage price? :S, I can't get rid of verizon as they are my telco. the only thing that would make sense is to switch to cable then it's just the price of the cable bill plus vonage. -- -Francisco augusta wrote: >I signed up a few weeks ago. It may or may not have wrecked just a bit >of havoc on my (fairly complicated) network. But overall I love it! The >only bummer is that you always have to dial the 1+area code . . . (But I >hear some in NJ are doing that already). Great price! > > > >>-----Original Message----- >>From: accessd-bounces at databaseadvisors.com [mailto:accessd- >>bounces at databaseadvisors.com] On Behalf Of John W. Colby >>Sent: Thursday, January 22, 2004 9:53 PM >>To: AccessD >>Subject: [AccessD] Vonage >> >>Is anyone using this? Comments? >> >>http://www.vonage.com >> >>John W. Colby >>www.ColbyConsulting.com >> >> _______________________________________________ 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 From rusty.hammond at cpiqpc.com Fri Jan 23 16:27:56 2004 From: rusty.hammond at cpiqpc.com (rusty.hammond at cpiqpc.com) Date: Fri, 23 Jan 2004 16:27:56 -0600 Subject: [AccessD] Opening a word document from code Message-ID: <8301C8A868251E4C8ECD3D4FFEA40F8A0811A8AB@cpixchng-1.cpiqpc.net> I'm working on code in Access 97 to simply open an existing Word document from a network drive, add a quick line of text at the top of the first page, then close the document. I'm running into problems when someone else has the Word document open. Does anyone have code to tell if a Word document is open before attempting to open it and getting an error? TIA Rusty Hammond From martyconnelly at shaw.ca Fri Jan 23 17:05:53 2004 From: martyconnelly at shaw.ca (MartyConnelly) Date: Fri, 23 Jan 2004 15:05:53 -0800 Subject: [AccessD] Opening a word document from code References: <8301C8A868251E4C8ECD3D4FFEA40F8A0811A8AB@cpixchng-1.cpiqpc.net> Message-ID: <4011A8D1.70808@shaw.ca> Debug.Print IsFileOpen("C:\Documents and Settings\marty\My Documents\Doc1.doc") ' This function checks to see if a file is open or not. If the file is ' already open, it returns True. If the file is not open, it returns ' False. Otherwise, a run-time error will occur because there is ' some other problem accessing the file. Function IsFileOpen(filename As String) As Boolean Dim filenum As Integer, errnum As Integer On Error Resume Next ' Turn error checking off. filenum = FreeFile() ' Get a free file number. ' Attempt to open the file and lock it. Open filename For Input Lock Read As #filenum Close filenum ' Close the file. errnum = Err ' Save the error number that occurred. On Error GoTo 0 ' Turn error checking back on. ' Check to see which error occurred. Select Case errnum ' No error occurred. ' File is NOT already open by another user. Case 0 IsFileOpen = False ' Error number for "Permission Denied." ' File is already opened by another user. Case 70 IsFileOpen = True ' Another error occurred. Case Else Error errnum End Select End Function rusty.hammond at cpiqpc.com wrote: >I'm working on code in Access 97 to simply open an existing Word document >from a network drive, add a quick line of text at the top of the first page, >then close the document. I'm running into problems when someone else has >the Word document open. Does anyone have code to tell if a Word document is >open before attempting to open it and getting an error? > >TIA > >Rusty Hammond > > > -- Marty Connelly Victoria, B.C. Canada From scapistrant at symphonyinfo.com Fri Jan 23 17:40:46 2004 From: scapistrant at symphonyinfo.com (Steve Capistrant) Date: Fri, 23 Jan 2004 17:40:46 -0600 Subject: [AccessD] Job posting In-Reply-To: <00ab01c3e143$1757bbf0$19669a89@DDICK> Message-ID: Hello group. I'm in search of an Access developer looking for a permanent full time position in the Twin Cities (Minnesota) area. Business is booming. Please email or call if you have an interest. Symphony is a software development shop providing custom software since 1996, with the great majority of work done in Access, but also dealing with SQL Server BEs and data-driven websites using ASP. Regards, Steve Capistrant scapistrant at symphonyinfo.com Symphony Information Services www.symphonyinfo.com Phone: 763-391-7400 7308 Aspen Lane North, Suite 132, Brooklyn Park, MN 55428 From glen_mcwilliams at msn.com Fri Jan 23 18:17:57 2004 From: glen_mcwilliams at msn.com (Glen McWilliams) Date: Fri, 23 Jan 2004 16:17:57 -0800 Subject: [AccessD] Vonage References: Message-ID: John Don't complain, that is less than what I pay ($49.95). Glen H. McWilliams Creative HighTek, Inc. ----- Original Message ----- From: John W. Colby To: Access Developers discussion and problem solving Sent: Friday, January 23, 2004 2:18 PM Subject: RE: [AccessD] Vonage My blazing fast internet recently went up 50% to $45 / month. The cable company wants $35 / month for unlimited internet so I could just get it through them, but I thought I'd give Vonage a try. Vonage has $15, $25 and $35 packages which allows me to try it for cheap and see if it really works before turning off the land line. John W. Colby www.ColbyConsulting.com -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Francisco H Tapia Sent: Friday, January 23, 2004 2:27 PM To: Access Developers discussion and problem solving Subject: Re: [AccessD] Vonage Price sounds good, but if you are using DSL it's not really like you're saving much.. :( Verizon = 29.00 DSL = 35.00 --------------- 64.00 plus the vonage price? :S, I can't get rid of verizon as they are my telco. the only thing that would make sense is to switch to cable then it's just the price of the cable bill plus vonage. -- -Francisco augusta wrote: >I signed up a few weeks ago. It may or may not have wrecked just a bit >of havoc on my (fairly complicated) network. But overall I love it! The >only bummer is that you always have to dial the 1+area code . . . (But I >hear some in NJ are doing that already). Great price! > > > >>-----Original Message----- >>From: accessd-bounces at databaseadvisors.com [mailto:accessd- >>bounces at databaseadvisors.com] On Behalf Of John W. Colby >>Sent: Thursday, January 22, 2004 9:53 PM >>To: AccessD >>Subject: [AccessD] Vonage >> >>Is anyone using this? Comments? >> >>http://www.vonage.com >> >>John W. Colby >>www.ColbyConsulting.com >> >> _______________________________________________ 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 From stuart at lexacorp.com.pg Fri Jan 23 19:22:58 2004 From: stuart at lexacorp.com.pg (Stuart McLachlan) Date: Sat, 24 Jan 2004 11:22:58 +1000 Subject: [AccessD] Vonage In-Reply-To: Message-ID: <40125592.4363.17E60A@localhost> Will you guys stop it! I pay approx USD200 per month just for my connection and about a further 30c per MB downloaded. On 23 Jan 2004 at 16:17, Glen McWilliams wrote: > John > > Don't complain, that is less than what I pay ($49.95). > > Glen H. McWilliams > Creative HighTek, Inc. > ----- Original Message ----- > From: John W. Colby > To: Access Developers discussion and problem solving > Sent: Friday, January 23, 2004 2:18 PM > Subject: RE: [AccessD] Vonage > > > My blazing fast internet recently went up 50% to $45 / month. The cable > company wants $35 / month for unlimited internet so I could just get it > through them, but I thought I'd give Vonage a try. Vonage has $15, $25 and > $35 packages which allows me to try it for cheap and see if it really works > before turning off the land line. > > John W. Colby > www.ColbyConsulting.com > > -----Original Message----- > From: accessd-bounces at databaseadvisors.com > [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Francisco H > Tapia > Sent: Friday, January 23, 2004 2:27 PM > To: Access Developers discussion and problem solving > Subject: Re: [AccessD] Vonage > > > Price sounds good, but if you are using DSL it's not really like you're > saving much.. :( > > Verizon = 29.00 > DSL = 35.00 > --------------- > 64.00 > > plus the vonage price? :S, I can't get rid of verizon as they are my > telco. the only thing that would make sense is to switch to cable then > it's just the price of the cable bill plus vonage. > > > -- -- Lexacorp Ltd http://www.lexacorp.com.pg Information Technology Consultancy, Software Development,System Support. From accessd at shaw.ca Fri Jan 23 19:28:30 2004 From: accessd at shaw.ca (Jim Lawrence (AccessD)) Date: Fri, 23 Jan 2004 17:28:30 -0800 Subject: [AccessD] Create New DB + link table check (Was: Major Performance issue) In-Reply-To: <20040123094414.54603.qmail@web60206.mail.yahoo.com> Message-ID: Hi Sad: Check the article at the DBA, http://www.databaseadvisors.com/newletters/newsletter112003/0311UnboundRepor ts.htm (watch for wrap clip) It demonstrates exactly what you have discovered, when working with large data sets. It is sometimes more efficient to download the data and post process it. Some of the code in this article may help you. HTH Jim -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Sad Der Sent: Friday, January 23, 2004 1:44 AM To: Acces User Group Subject: [AccessD] Create New DB + link table check (Was: Major Performance issue) Hi group, I've got a solution to my performance problem. Before the users start their analyses I copy the data to the local database! Copying the data takes about 45-55 seconds, calculating the data LESS THEN 2 seconds!! :-) I don't want this copied data in the original client so I want to create a new mdb. I don't have my A2KDH Enterprise Edition with me I'm asking you guys. Does anybody have a (set of) function(s) to create a DB with tables and link to it? I've searched wolfwares.com but I couldn't find any of it and this subject has to be discussed here at some point....or not? The idea is: User needs to use the Analyses tool Create new TEMP DB (duration: ?) Create tables (duration: ?) Check links (duration: ?) Copy data from BE (duration: 45-55 seconds) When user stops the MAIN application (= Analyses tool is part of the MAIN application) delete the TEMP DB. TIA Sad __________________________________ Do you Yahoo!? Yahoo! SiteBuilder - Free web site building tool. Try it! http://webhosting.yahoo.com/ps/sb/ _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From accessd at shaw.ca Fri Jan 23 19:38:38 2004 From: accessd at shaw.ca (Jim Lawrence (AccessD)) Date: Fri, 23 Jan 2004 17:38:38 -0800 Subject: [AccessD] subform only allows one record In-Reply-To: Message-ID: Hi John: Just a comment... If you only need one record why are you not just folding the required fields into the current form? Jim -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of John W. Colby Sent: Friday, January 23, 2004 4:43 AM To: AccessD Subject: [AccessD] subform only allows one record I need to set up a subform that only allows a single record to be entered. I have a function in the subform that checks if the recordsetclone.recordcount >0 and if so sets AllowAdditions = false. This works fine if any records already exist but if a new record is created, then if the person does a page down to save the first record, they end up in a second record. I am firing this function I built from the OnCurrent of the parent, as well as the OnCurrent of the subform itself. Haven't tried yet from before update. Does anyone do this kind of thing? If so how do you accomplish it? John W. Colby www.ColbyConsulting.com _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From markamatte at hotmail.com Fri Jan 23 19:48:34 2004 From: markamatte at hotmail.com (Mark A Matte) Date: Sat, 24 Jan 2004 01:48:34 +0000 Subject: [AccessD] query that deletess dups ? Message-ID: Another idea is to create a copy of the structure of the table...identify the fields that make up a unique key and make them a key in the new table...run an APPEND query from old table to populate new table...it will omit the dups for you... Hope it helps... Mark >From: bruce_bruen at mlc.com.au >Reply-To: Access Developers discussion and problem >solving >To: Access Developers discussion and problem >solving >Subject: Re: [AccessD] query that deletess dups ? >Date: Fri, 23 Jan 2004 11:19:34 +1100 > > > > > >Check the archives, I had a similar problem last year. I believe it was >either Wiliam H or Gustav thtat provided the answer using a select first, >last or max field in the table you wish to delete from. You could search on >my surname. > >Sorry, the actual anser is on a drive I dont have anymore.... > >Bruce > > > > "Dave Sharpe" > To: "Access >Developers discussion and problem solving" > Sent by: > > accessd-bounces at databasea cc: > dvisors.com Subject: Re: >[AccessD] query that deletess dups ? > > > 23/01/2004 11:14 > Please respond to Access > Developers discussion and > problem solving > > > > > > >Oleg ( I think ) > >As there have been no attempts yet; I googled and found the >following that looks like it should help You. > >http://www.databasejournal.com/features/msaccess/article.php/3077791 > >Dave > > >----- Original Message ----- >From: >To: >Sent: Thursday, January 22, 2004 4:20 PM >Subject: [AccessD] query that deletess dups ? > > >How can I delete dup records ? Anyone can give me a hint... > >SELECT DISTINCTROW [emp table].[employee number], [emp table].[employee >name], [emp table].COMPANY >FROM [emp table] >WHERE ((([emp table].[employee number]) In (SELECT [employee number] FROM >[emp table] As Tmp GROUP BY [employee number],[employee name] HAVING >Count(*)>1 And [employee name] = [emp table].[employee name]))) >ORDER BY [emp table].[employee number], [emp table].[employee name]; > > >----------------------------------------- >Get Breaking News from CNN, ABC, NBC, CBS Now. >http://www.xuppa.com/news/?link=webmail > > >_______________________________________________ >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 > > > >_______________________________________________ >AccessD mailing list >AccessD at databaseadvisors.com >http://databaseadvisors.com/mailman/listinfo/accessd >Website: http://www.databaseadvisors.com _________________________________________________________________ Get a FREE online virus check for your PC here, from McAfee. http://clinic.mcafee.com/clinic/ibuy/campaign.asp?cid=3963 From lmrazek at lcm-res.com Sat Jan 24 07:46:53 2004 From: lmrazek at lcm-res.com (Lawrence Mrazek) Date: Sat, 24 Jan 2004 07:46:53 -0600 Subject: [AccessD] Vonage In-Reply-To: Message-ID: <007101c3e280$871298a0$036fa8c0@DellLaptop> I used it and liked it (when it worked), but ultimately had to cancel the service because Vonage couldn't maintain a connection to the phone router on my network due to some latency and speed problems with my DSL connection. I was on the lower end of the acceptable speed needed for Vonage. That said, it would have saved me at least 40/month on my business phone fax charges, since Vonage doesn't charge (yet) all of the federal, state and local taxes that appear on my phone bill. When I did have a connection, voice quality was pretty good. Try it, but don't cancel your regular phone service until you're sure that it works OK! Good Luck! Larry Mrazek LCM Research, Inc. ph. 314-432-5886 fx. 314-432-3304 lmrazek at lcm-res.com http://www.lcm-res.com -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of John W. Colby Sent: Thursday, January 22, 2004 8:53 PM To: AccessD Subject: [AccessD] Vonage Is anyone using this? Comments? http://www.vonage.com John W. Colby www.ColbyConsulting.com _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From jwcolby at colbyconsulting.com Sat Jan 24 08:44:18 2004 From: jwcolby at colbyconsulting.com (John W. Colby) Date: Sat, 24 Jan 2004 09:44:18 -0500 Subject: [AccessD] Vonage In-Reply-To: <007101c3e280$871298a0$036fa8c0@DellLaptop> Message-ID: I have a cable connection to the internet so I doubt I'll have issues. Plus the modem they now use has something in it that, if you place the modem between the cable modem and the router, allows the phone router to take all the bandwidth it needs to maintain the QOS (as they call it). John W. Colby www.ColbyConsulting.com -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Lawrence Mrazek Sent: Saturday, January 24, 2004 8:47 AM To: 'Access Developers discussion and problem solving' Subject: RE: [AccessD] Vonage I used it and liked it (when it worked), but ultimately had to cancel the service because Vonage couldn't maintain a connection to the phone router on my network due to some latency and speed problems with my DSL connection. I was on the lower end of the acceptable speed needed for Vonage. That said, it would have saved me at least 40/month on my business phone fax charges, since Vonage doesn't charge (yet) all of the federal, state and local taxes that appear on my phone bill. When I did have a connection, voice quality was pretty good. Try it, but don't cancel your regular phone service until you're sure that it works OK! Good Luck! Larry Mrazek LCM Research, Inc. ph. 314-432-5886 fx. 314-432-3304 lmrazek at lcm-res.com http://www.lcm-res.com -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of John W. Colby Sent: Thursday, January 22, 2004 8:53 PM To: AccessD Subject: [AccessD] Vonage Is anyone using this? Comments? http://www.vonage.com John W. Colby www.ColbyConsulting.com _______________________________________________ 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 From gustav at cactus.dk Sat Jan 24 08:46:00 2004 From: gustav at cactus.dk (Gustav Brock) Date: Sat, 24 Jan 2004 15:46:00 +0100 Subject: [AccessD] Print to picture (was: Export Access Report to Word) In-Reply-To: <2033328814.20031107181446@cactus.dk> References: <2033328814.20031107181446@cactus.dk> Message-ID: <17022529806.20040124154600@cactus.dk> Hi All Juriy has released a version 1.02 of his PTP, Print to Picture and has added a page in English: http://progrex.narod.ru/ptpeng.html A help file in English is now included. Again, download is extremely slow but stable. PTP is freeware. /gustav > Hi Rocky and Bryan et all > As a freeware alternative to SnagIt, have a look at "Print To Picture" > by a Russian guy, Gretchko Juriy, at: > http://progrex.narod.ru/ptp.html > Every thing except the program is in Russian but at this page you > would download (at the bottom of the page) link two and perhaps three. > The first you can spell "Program Print to picture, version 1.01", the > second is a plugin which I'm not shure really is needed. > When printing, resolution can be chosen from 50 x 50 to 600 x 600 dpi > and file format can be BMP, PCX or PNG. > It looks very promising! I've been looking for this kind of util for > years - thanks for putting me on the track again. > A tiny print of the page is attached for those of you accepting > attachments. > PS: Download speed from the site is very slow but stable, just be > patient. > /gustav >> Here's another way that I stumbled across, while looking for something >> else.... >> SnagIt, a screen capture application, will actually allow you to do a >> "Printer" capture. >> It will capture a print and save it each page as an image. All you >> print to a special SnagIt "printer" and it will capture each page >> separately at printer quality. >> You can get SnagIt from >> http://www.techsmith.com/products/snagit/default.asp >> They have a 30 day trial and it only costs $40. >> Bryan Carbonnell >> bryan_carbonnell at cbc.ca From mwp.reid at qub.ac.uk Sat Jan 24 09:21:25 2004 From: mwp.reid at qub.ac.uk (Martin Reid) Date: Sat, 24 Jan 2004 15:21:25 -0000 Subject: [AccessD] Vonage References: Message-ID: <001501c3e28d$bbb65260$a2f66e51@martin1> I pay ?15 per month unlimited phone and ?25 per month for broadband Martin ----- Original Message ----- From: "John W. Colby" To: "Access Developers discussion and problem solving" Sent: Saturday, January 24, 2004 2:44 PM Subject: RE: [AccessD] Vonage > I have a cable connection to the internet so I doubt I'll have issues. Plus > the modem they now use has something in it that, if you place the modem > between the cable modem and the router, allows the phone router to take all > the bandwidth it needs to maintain the QOS (as they call it). > > John W. Colby > www.ColbyConsulting.com > > -----Original Message----- > From: accessd-bounces at databaseadvisors.com > [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Lawrence > Mrazek > Sent: Saturday, January 24, 2004 8:47 AM > To: 'Access Developers discussion and problem solving' > Subject: RE: [AccessD] Vonage > > > I used it and liked it (when it worked), but ultimately had to cancel the > service because Vonage couldn't maintain a connection to the phone router on > my network due to some latency and speed problems with my DSL connection. I > was on the lower end of the acceptable speed needed for Vonage. That said, > it would have saved me at least 40/month on my business phone fax charges, > since Vonage doesn't charge (yet) all of the federal, state and local taxes > that appear on my phone bill. When I did have a connection, voice quality > was pretty good. > > Try it, but don't cancel your regular phone service until you're sure that > it works OK! Good Luck! > > Larry Mrazek > LCM Research, Inc. > ph. 314-432-5886 > fx. 314-432-3304 > lmrazek at lcm-res.com > http://www.lcm-res.com > > -----Original Message----- > From: accessd-bounces at databaseadvisors.com > [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of John W. Colby > Sent: Thursday, January 22, 2004 8:53 PM > To: AccessD > Subject: [AccessD] Vonage > > > Is anyone using this? Comments? > > http://www.vonage.com > > John W. Colby > www.ColbyConsulting.com > > _______________________________________________ > 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 > > > > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com > From jwcolby at colbyconsulting.com Sat Jan 24 09:36:42 2004 From: jwcolby at colbyconsulting.com (John W. Colby) Date: Sat, 24 Jan 2004 10:36:42 -0500 Subject: [AccessD] Vonage In-Reply-To: <001501c3e28d$bbb65260$a2f66e51@martin1> Message-ID: Lol. I can certainly understand the unlimited phone. The whole of Ireland isn't much larger than San Diego County. For me to call my mom in Arizona is like you calling to Greece. I have sisters and mother in Arizona (2600 miles), Nashville Tennessee (1000 miles), Brother-in-law in Florida (1200 miles), Brother-in-law in Washington DC (350 miles), Sister-in-law in Rochester New York (300 miles), and the closest... a Sister-in-Law in Syracuse New York (240 miles). Cheap long distance is essential. John W. Colby www.ColbyConsulting.com -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Martin Reid Sent: Saturday, January 24, 2004 10:21 AM To: Access Developers discussion and problem solving Subject: Re: [AccessD] Vonage I pay ?15 per month unlimited phone and ?25 per month for broadband Martin ----- Original Message ----- From: "John W. Colby" To: "Access Developers discussion and problem solving" Sent: Saturday, January 24, 2004 2:44 PM Subject: RE: [AccessD] Vonage > I have a cable connection to the internet so I doubt I'll have issues. Plus > the modem they now use has something in it that, if you place the modem > between the cable modem and the router, allows the phone router to take all > the bandwidth it needs to maintain the QOS (as they call it). > > John W. Colby > www.ColbyConsulting.com From ssharkins at bellsouth.net Sat Jan 24 12:35:01 2004 From: ssharkins at bellsouth.net (Susan Harkins) Date: Sat, 24 Jan 2004 13:35:01 -0500 Subject: [AccessD] data type for field in a closed table Message-ID: <00c501c3e2aa$15762d90$210110ac@SUSANONE> I'm trying to return a field's data type. I have the field by name -- as a string -- and I just can't seem to get it into a Field object variable so I can tap into the Type property. The field is the result of a listbox selection. varField = lstField.Value How can I get from there to fld = varField to here varType = fld.Type Everything I've tried returns an Object required at the fld=varField statement because varField is a string, not a real reference. At least, I think that's the problem. Or, if I'm going about it entirely wrong, clue me in please. :) Susan H. From gustav at cactus.dk Sat Jan 24 13:21:14 2004 From: gustav at cactus.dk (Gustav Brock) Date: Sat, 24 Jan 2004 20:21:14 +0100 Subject: [AccessD] data type for field in a closed table In-Reply-To: <00c501c3e2aa$15762d90$210110ac@SUSANONE> References: <00c501c3e2aa$15762d90$210110ac@SUSANONE> Message-ID: <3939044703.20040124202114@cactus.dk> Hi Susan > I'm trying to return a field's data type. > I have the field by name -- as a string -- and I just can't seem to get it > into a Field object variable so I can tap into the Type property. The field > is the result of a listbox selection. > varField = lstField.Value > How can I get from there to > fld = varField > to here > varType = fld.Type > Everything I've tried returns an Object required at the fld=varField > statement because varField is a string, not a real reference. At least, I > think that's the problem. Something like this? If the rowsource is an SQL string: Dim dbs As Database Dim qdf As QueryDef dim intVarType As Integer Set dbs = CurrentDb() Set qdf = dbs.CreateQueryDef(vbNullString) qdf.SQL = Me!lstDemo.RowSource intVarType = qdf.Fields("YourFieldName").Type Debug.Print intVarType qdf.Close Set qdf = Nothing Set dbs = Nothing If not an SQL string, just pick the name of the stored query and use that as qdf. /gustav From ssharkins at bellsouth.net Sat Jan 24 13:26:31 2004 From: ssharkins at bellsouth.net (Susan Harkins) Date: Sat, 24 Jan 2004 14:26:31 -0500 Subject: Nevermind -- kind of Re: [AccessD] data type for field in a closed table References: <00c501c3e2aa$15762d90$210110ac@SUSANONE> Message-ID: <011501c3e2af$f9948440$210110ac@SUSANONE> I'm just going to create a recordset object -- if anyone knows of a more direct way, please let me know. Thanks! Susan H. > I'm trying to return a field's data type. > > I have the field by name -- as a string -- and I just can't seem to get it > into a Field object variable so I can tap into the Type property. The field > is the result of a listbox selection. > From ssharkins at bellsouth.net Sat Jan 24 13:32:11 2004 From: ssharkins at bellsouth.net (Susan Harkins) Date: Sat, 24 Jan 2004 14:32:11 -0500 Subject: [AccessD] data type for field in a closed table References: <00c501c3e2aa$15762d90$210110ac@SUSANONE> <3939044703.20040124202114@cactus.dk> Message-ID: <011b01c3e2b0$c7fd3ed0$210110ac@SUSANONE> I considered that, but was trying to avoid DAO -- I should've mentioned that -- I apologize. I'm using ADO -- and looping through the recordset doesn't really require anymore code than the DAO querydef -- if I'm not mistaken, ADO doesn't use the QueryDef object. But, on the other hand, you don't have to create a Recordset using your code. Thanks Gustav. Susan H. > Hi Susan > > > I'm trying to return a field's data type. > > > I have the field by name -- as a string -- and I just can't seem to get it > > into a Field object variable so I can tap into the Type property. The field > > is the result of a listbox selection. > > > varField = lstField.Value > > > How can I get from there to > > > fld = varField > > > to here > > > varType = fld.Type > > > Everything I've tried returns an Object required at the fld=varField > > statement because varField is a string, not a real reference. At least, I > > think that's the problem. > > Something like this? If the rowsource is an SQL string: > > Dim dbs As Database > Dim qdf As QueryDef > dim intVarType As Integer > > Set dbs = CurrentDb() > Set qdf = dbs.CreateQueryDef(vbNullString) > qdf.SQL = Me!lstDemo.RowSource > > intVarType = qdf.Fields("YourFieldName").Type > Debug.Print intVarType > > qdf.Close > > Set qdf = Nothing > Set dbs = Nothing > > If not an SQL string, just pick the name of the stored query and use > that as qdf. > > /gustav > > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com > From markamatte at hotmail.com Sat Jan 24 14:17:15 2004 From: markamatte at hotmail.com (Mark A Matte) Date: Sat, 24 Jan 2004 20:17:15 +0000 Subject: [AccessD] SubQuery Help??? Message-ID: Hello All, I'm having a brain cramp...I have a table with 3 fields: ID, Date, Amount. I'm pulling the records between A-Date and B-Date...from these records I need the date where the Amount is greatest...can someone refresh my memory... Thanks, Mark _________________________________________________________________ Find high-speed ?net deals ? comparison-shop your local providers here. https://broadband.msn.com From ssharkins at bellsouth.net Sat Jan 24 14:24:07 2004 From: ssharkins at bellsouth.net (Susan Harkins) Date: Sat, 24 Jan 2004 15:24:07 -0500 Subject: [AccessD] data types Message-ID: <014901c3e2b8$054650e0$210110ac@SUSANONE> I'm getting a adVarWChar (202) data type on an Access Text field -- is the W because it's coming via a Recordset or the Connection object? From the docs I've read so far, it isn't really clear. Susan H. From BBarabash at TappeConstruction.com Sat Jan 24 15:08:36 2004 From: BBarabash at TappeConstruction.com (Brett Barabash) Date: Sat, 24 Jan 2004 15:08:36 -0600 Subject: [AccessD] SubQuery Help??? Message-ID: <426071E0B0A6D311B3C0006008B0AB23AFE2E0@TAPPEEXCH01> Howzabout: SELECT ID, Date, Amount FROM MyTable WHERE Date Between [A-Date] And [B-Date] AND Amount = (SELECT Max([Amount]) FROM MyTable WHERE Date Between [A-Date] And [B-Date]) -----Original Message----- From: Mark A Matte [mailto:markamatte at hotmail.com] Sent: Saturday, January 24, 2004 2:17 PM To: accessd at databaseadvisors.com Subject: [AccessD] SubQuery Help??? Hello All, I'm having a brain cramp...I have a table with 3 fields: ID, Date, Amount. I'm pulling the records between A-Date and B-Date...from these records I need the date where the Amount is greatest...can someone refresh my memory... Thanks, Mark -------------------------------------------------------------------------------------------------------------------- This email and any files transmitted with it are confidential and intended solely for the use of the individual or entity to whom they are addressed. If you have received this email in error please notify the originator of the message. This footer also confirms that this email message has been scanned for the presence of computer viruses. Any views expressed in this message are those of the individual sender, except where the sender specifies and with authority, states them to be the views of Tappe Construction Co. Scanning of this message and addition of this footer is performed by SurfControl E-mail Filter software in conjunction with virus detection software. From markamatte at hotmail.com Sat Jan 24 15:54:40 2004 From: markamatte at hotmail.com (Mark A Matte) Date: Sat, 24 Jan 2004 21:54:40 +0000 Subject: [AccessD] SubQuery Help??? Message-ID: Sorry, I wasn't quite clear...here is the data ID Date Amount a 2/3 4.5 a 2/4 5.8 b 2/3 3.7 b 2/4 2.5 a 2/6 3.8 The results I would like to see are: ID Date Amount a 2/4 5.8 b 2/3 3.7 Any ideas? Thanks, Mark >From: Brett Barabash >Reply-To: Access Developers discussion and problem >solving >To: "'Access Developers discussion and problem solving'" > >Subject: RE: [AccessD] SubQuery Help??? >Date: Sat, 24 Jan 2004 15:08:36 -0600 > >Howzabout: > >SELECT ID, Date, Amount >FROM MyTable >WHERE Date Between [A-Date] And [B-Date] >AND Amount = > (SELECT Max([Amount]) > FROM MyTable > WHERE Date Between [A-Date] And [B-Date]) > >-----Original Message----- >From: Mark A Matte [mailto:markamatte at hotmail.com] >Sent: Saturday, January 24, 2004 2:17 PM >To: accessd at databaseadvisors.com >Subject: [AccessD] SubQuery Help??? > > >Hello All, > >I'm having a brain cramp...I have a table with 3 fields: ID, Date, Amount. >I'm pulling the records between A-Date and B-Date...from these records I >need the date where the Amount is greatest...can someone refresh my >memory... > >Thanks, > >Mark > >-------------------------------------------------------------------------------------------------------------------- >This email and any files transmitted with it are confidential and >intended solely for the use of the individual or entity to whom >they are addressed. >If you have received this email in error please notify the >originator of the message. This footer also confirms that this >email message has been scanned for the presence of computer viruses. > >Any views expressed in this message are those of the individual >sender, except where the sender specifies and with authority, >states them to be the views of Tappe Construction Co. > >Scanning of this message and addition of this footer is performed >by SurfControl E-mail Filter software in conjunction with >virus detection software. > >_______________________________________________ >AccessD mailing list >AccessD at databaseadvisors.com >http://databaseadvisors.com/mailman/listinfo/accessd >Website: http://www.databaseadvisors.com _________________________________________________________________ Scope out the new MSN Plus Internet Software ? optimizes dial-up to the max! http://join.msn.com/?pgmarket=en-us&page=byoa/plus&ST=1 From stuart at lexacorp.com.pg Sat Jan 24 16:46:11 2004 From: stuart at lexacorp.com.pg (Stuart McLachlan) Date: Sun, 25 Jan 2004 08:46:11 +1000 Subject: [AccessD] SubQuery Help??? In-Reply-To: Message-ID: <40138253.12278.119807@localhost> On 24 Jan 2004 at 20:17, Mark A Matte wrote: > Hello All, > > I'm having a brain cramp...I have a table with 3 fields: ID, Date, Amount. > I'm pulling the records between A-Date and B-Date...from these records I > need the date where the Amount is greatest...can someone refresh my > memory... > Select ID,[Date] as HiDate,HiAmount >From tblAmounts Inner Join (Select Distinct ID, Max(Amount) as HiAmount GroupBy By ID) As qMaxAmount On tblAmounts.ID = qMaxAmount.ID And tblAmounts.Amount = qMaxAmount,HiAmount -- Lexacorp Ltd http://www.lexacorp.com.pg Information Technology Consultancy, Software Development,System Support. From BBarabash at TappeConstruction.com Sat Jan 24 16:57:22 2004 From: BBarabash at TappeConstruction.com (Brett Barabash) Date: Sat, 24 Jan 2004 16:57:22 -0600 Subject: [AccessD] SubQuery Help??? Message-ID: <426071E0B0A6D311B3C0006008B0AB23AFE2E1@TAPPEEXCH01> This gives me the results you specified based on the given data sample: SELECT ID, [Date], Amount FROM MyTable WHERE Amount = (SELECT Max([Amount]) FROM MyTable Sub WHERE Sub.ID = MyTable.ID) In your earlier message, it sounded like you wanted to limit the data range as well, in which case just add a Between clause to the main and sub queries. -----Original Message----- From: Mark A Matte [mailto:markamatte at hotmail.com] Sent: Saturday, January 24, 2004 3:55 PM To: accessd at databaseadvisors.com Subject: RE: [AccessD] SubQuery Help??? Sorry, I wasn't quite clear...here is the data ID Date Amount a 2/3 4.5 a 2/4 5.8 b 2/3 3.7 b 2/4 2.5 a 2/6 3.8 The results I would like to see are: ID Date Amount a 2/4 5.8 b 2/3 3.7 Any ideas? Thanks, Mark >From: Brett Barabash >Reply-To: Access Developers discussion and problem >solving >To: "'Access Developers discussion and problem solving'" > >Subject: RE: [AccessD] SubQuery Help??? >Date: Sat, 24 Jan 2004 15:08:36 -0600 > >Howzabout: > >SELECT ID, Date, Amount >FROM MyTable >WHERE Date Between [A-Date] And [B-Date] >AND Amount = > (SELECT Max([Amount]) > FROM MyTable > WHERE Date Between [A-Date] And [B-Date]) > >-----Original Message----- >From: Mark A Matte [mailto:markamatte at hotmail.com] >Sent: Saturday, January 24, 2004 2:17 PM >To: accessd at databaseadvisors.com >Subject: [AccessD] SubQuery Help??? > > >Hello All, > >I'm having a brain cramp...I have a table with 3 fields: ID, Date, Amount. >I'm pulling the records between A-Date and B-Date...from these records I >need the date where the Amount is greatest...can someone refresh my >memory... > >Thanks, > >Mark > >--------------------------------------------------------------------------- ----------------------------------------- >This email and any files transmitted with it are confidential and >intended solely for the use of the individual or entity to whom >they are addressed. >If you have received this email in error please notify the >originator of the message. This footer also confirms that this >email message has been scanned for the presence of computer viruses. > >Any views expressed in this message are those of the individual >sender, except where the sender specifies and with authority, >states them to be the views of Tappe Construction Co. > >Scanning of this message and addition of this footer is performed >by SurfControl E-mail Filter software in conjunction with >virus detection software. > >_______________________________________________ >AccessD mailing list >AccessD at databaseadvisors.com >http://databaseadvisors.com/mailman/listinfo/accessd >Website: http://www.databaseadvisors.com _________________________________________________________________ Scope out the new MSN Plus Internet Software - optimizes dial-up to the max! http://join.msn.com/?pgmarket=en-us&page=byoa/plus&ST=1 _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -------------------------------------------------------------------------------------------------------------------- This email and any files transmitted with it are confidential and intended solely for the use of the individual or entity to whom they are addressed. If you have received this email in error please notify the originator of the message. This footer also confirms that this email message has been scanned for the presence of computer viruses. Any views expressed in this message are those of the individual sender, except where the sender specifies and with authority, states them to be the views of Tappe Construction Co. Scanning of this message and addition of this footer is performed by SurfControl E-mail Filter software in conjunction with virus detection software. From Jim.Hale at FleetPride.com Thu Jan 15 13:33:00 2004 From: Jim.Hale at FleetPride.com (Hale, Jim) Date: Thu, 15 Jan 2004 13:33:00 -0600 Subject: [AccessD] Message-ID: <6A6AA9DF57E4F046BDA1E273BDDB677201A9FC@corp-es01.fleetpride.com> Using the Excel export icon on the toolbar limits the output to approx 16k records, a limitation that goes back (as best as I can remember) to Excel 5. Use file export and select Excel 2000 to export up to the max of 63k records. HTH Jim Hale -----Original Message----- From: Stoker, Kenneth E [mailto:Kenneth.Stoker at pnl.gov] Sent: Thursday, January 15, 2004 11:29 AM To: AccessD at databaseadvisors.com Subject: [AccessD] I have a coworker who is getting the following error message when trying to output 17K+ records from a query to Excel. There are too many rows to output, based on the limitation specified by the output format or by Microsoft Access. Is there a setting that can be changed to increase the amount output? Is she hitting a limitation? Can anyone help here. Thanks. Ken Stoker Technology Commercialization Information Systems Administrator PH: (509) 375-3758 FAX: (509) 375-6731 E-mail: Kenneth.Stoker at pnl.gov _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From Jim.Hale at FleetPride.com Thu Jan 15 14:48:20 2004 From: Jim.Hale at FleetPride.com (Hale, Jim) Date: Thu, 15 Jan 2004 14:48:20 -0600 Subject: [AccessD] Implements vs WithEvents Message-ID: <6A6AA9DF57E4F046BDA1E273BDDB677201A9FD@corp-es01.fleetpride.com> Very nice explanation, thanks. Jim Hale -----Original Message----- From: John W. Colby [mailto:jwcolby at colbyconsulting.com] Sent: Tuesday, January 13, 2004 9:03 PM To: Access Developers discussion and problem solving Subject: RE: [AccessD] Implements vs WithEvents Robert, Risking sounding ignorant, I don't know what the VBA DHB is so I can't help you there. However AFAIK you can't use Implements for something like a control or form. These objects have code inside them that cause things to happen, properties to modify their behavior etc. ALL THAT STUFF can actually be inherited in VB.NET. That is, you can actually start with a combo box, subclass that combo box, GET ALL OF IT'S FUNCTIONALITY, all of it's code, all of its properties and methods, plus add your own!!! Or even override things to change the way the combo box functions. THAT is true inheritance. Not so in Access / VBA. An object like a combo box is a self contained unit that you simply cannot get inside of or modify in any meaningful way. It appears to us Access programmers almost like an ocx, i.e. a black box that does things. IMPORTANT... one of the things these objects do is raise Events! IOW, they tell you when a user clicks the mouse, double clicks the mouse etc. "inside" their boundaries on the screen. Knowing this, every Access programmer ALREADY USES WITHEVENTS. How? By creating an event stub in a form's class, and inserting code in that event stub to do something that the programmer wants to do when that event happens. The confusing thing is that a form's class DOES NOT REQUIRE a withevents dimension statement for any controls contained in the form (or for itself - the form - for that matter). However there is an IMPLICIT dim statement in the class, invisible, but there none the less. So every Access programmer already knows all about handling events for combos, command buttons etc. They (most of us anyway) use the built-in wizards in the form's builder interface to insert event handler stubs into the form's class and insert code there. THAT IS WITHEVENT PROGRAMMING, with all the details taken care of for you. Well guess what, ANY CLASS can have those same event handlers in them!!! The only differenc is that if the class is not a form class, there must be an EXPLICIT dim Withevents statement for any control (any object actually) that you wish to sink events for. 'inside my own combo class header... 'Dim a combo withevents Private WithEvents mcbo As ComboBox Having the dim statement does nothing more than tell my combo class that a control of a specific type MAY be transferring control of one or more of it's events to the class directly. It does NOT say WHICH control. To do that you have to pass in a control to the class and inside the class, SET the dimmed control = the passed in control. 'inside my own combo class... 'Pass in a control and SET the internal control variable function Init(lcbo as ComboBox) set mcbo = lcbo end init THAT tells the class which combo to sink events for (the one being passed in of course). Once you do that, the class can sink ANY of the control's events. But you still haven't told the class WHICH events to sink. IOW, Even having done this, nothing will happen in your class unless you create an event stub for the control event you wish to process inside the class. 'inside my own combo class... 'create an event stub to which control will be passed when a specific event fires. Private Sub mcbo_AfterUpdate() 'Do Something really cool Msgbox "Something really cool" End Sub THAT tells the combo class WHICH event(s) to sink. Now you must of course instantiate your own combo class in your form and pass in a specific control to it. 'inside my FORM'S class header... 'dimension my own combo class dim fclsMyCombo as clsMyCombo 'inside my FORM'S class Private Sub Form_Open(Cancel As Integer) 'CREATE AN INSTANCE OF MY COOL COMBO CLASS Set fclsMyCombo = new clsMyCombo 'PASS A REFERENCE TO A SPECIFIC COMBO ON MY FORM fclsMyCombo.Init cboStates 'a combo displaying all the states in the union End Sub THAT tells Access to dimension a class, create a class instance and WHICH combo to pass off to the class instance. NOW, with ALL THESE THINGS IN PLACE, if that combo AfterUpdate fires, control will EVENTUALLY get to your class and your message box will display it's message. Notice that your form doesn't need any event stub in it for the control. Even though the ONLY sub in your form's class is the Form_Open, the event stub in your class will sink the event and the message box will display its message. I know full well that all this sounds like a LOT of work just to get control into a class but after you've done it a few times it will be 2nd nature. And of course you can then have a combo class that (see my other post) handles the double click, opens a form, allows your user to edit the data, and when the form closes, requeries the combo, all neatly encapsulated in a class. Plus all the other neato keenarino stuff you can imagine your combo doing. Hang in there. It took me three tries, each six months apart to finally "get" Shamil's stuff and understand Withevents. Looking back I can't understand why, but life is like that sometimes. And no, the demos for the book are copyrighted by Wrox and I can't legally distribute them, however there are many demos (by me of course) on DatabaseAdvisors' web site. I also have a bunch on my own site. This stuff is important, keep trying. John W. Colby www.ColbyConsulting.com -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Robert Gracie Sent: Tuesday, January 13, 2004 8:47 PM To: Access Developers discussion and problem solving Subject: RE: [AccessD] Implements vs WithEvents "Hmmmmmmm, As confusion sets in, he takes and stabs himself in the chest with his keyboard...:-)" I'm trying to understand why the VBA DHB is teaching that using INTERFACE inheritance classes (by way of the Implements Keyword and such) is much better then simply using Event, RaiseEvent, and WithEvents... The problem, for me at least, is getting my mind around the larger concept, and knowing which structure to use and why. With my very limited understanding, the way they have presented, it seems reasonable to go this route if only to help keep control over code execution... I guess I just need to keep pounding away at these concepts....... Robert Gracie www.servicexp.com -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of John W. Colby Sent: Tuesday, January 13, 2004 7:54 PM To: Access Developers discussion and problem solving Subject: [AccessD] Implements vs WithEvents Charlotte, >They have somewhat different purposes. No, they have completely different purposes. >Implements allows you to subclass an existing object/class and give it additional or different functionality, so you can have a class Dog and a subclass Spaniel that has a property Retriever. Well... true but not exactly. My issue with that statement is the term subclass as you use it. Yes you are subclassing the original but ONLY the interface. IMHO that is almost useless Implements is an interface ONLY inheritance, i.e. it allows (forces) you to start with the same public data and method DEFINITION but does not actually inherit the behaviors (methods) themselves. I.e. the code that runs in the class that is being subclassed is NOT inherited into the subclass. Access' inheritance (interface) is not very useful except as a template kind of thing. I find it useless enough that I personally don't bother. On the other hand Shamil is a proponent so it must have its uses. When you move to VB.NET (or any of the other .net languages I believe) TRUE inheritance is available. I.e. if you have a method with a thousand lines of code, when you subclass that object the new object inherits that code as well as the data. In our Implements subclassing, you would have to cut and paste that thousand lines of code into the subclass. Can you say maintenance nightmare? >You can intercept and respond to specific events when they happen in the object. Did the Bark event trigger? WithEvents lets you find out and respond from another class/object. Exactly correct. One of the MAJOR shortcomings of Access / VBA (in fact VB prior to VB.Net) is that Inheritance is virtually non-existent, and even worse, objects other than forms don't have a built in class that you can get at to add functionality directly to. What WithEvents really does is allow you to build class wrappers for objects so that you can encapsulate behaviors (functionality) in your class. In essence you still have two objects, the control (or even another class or OCX) and your class, but now you can put all of the common functionality in your class along with the event stubs of the control/class/ocx that generates the event. This does not get you any further down the road towards inheritance, sadly it simply doesn't appear to be possible in Access / VBA. But it does provide a huge step up in encapsulation. John W. Colby www.ColbyConsulting.com -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Charlotte Foust Sent: Tuesday, January 13, 2004 4:56 PM To: Access Developers discussion and problem solving Subject: RE: [AccessD] =function() in .onclick They have somewhat different purposes. Implements allows you to subclass an existing object/class and give it additional or different functionality, so you can have a class Dog and a subclass Spaniel that has a property Retriever. WithEvents allows you to monitor the events of an object/class. You can intercept and respond to specific events when they happen in the object. Did the Bark event trigger? WithEvents lets you find out and respond from another class/object. Charlotte Foust -----Original Message----- From: Robert Gracie [mailto:Subscriptions at servicexp.com] Sent: Tuesday, January 13, 2004 1:45 PM To: Access Developers discussion and problem solving Subject: RE: [AccessD] =function() in .onclick Hello All, Since I'm just learning this type of programming technique I thought I would ask a question... Why not use Implements instead of WithEvents? My limited understand of WithEvents is that they will not return functionality unit they (the event) has completed processing... Since I'm just at the "door" so to speak with learning how to use and incorporate these new (to me) programming techniques into my work, I really want to start out using the "best" technique... Robert Gracie www.servicexp.com _______________________________________________ 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 _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From jwcolby at colbyconsulting.com Sat Jan 24 22:33:14 2004 From: jwcolby at colbyconsulting.com (John W. Colby) Date: Sat, 24 Jan 2004 23:33:14 -0500 Subject: [AccessD] Implements vs WithEvents In-Reply-To: <6A6AA9DF57E4F046BDA1E273BDDB677201A9FD@corp-es01.fleetpride.com> Message-ID: Always Welcome. John W. Colby www.ColbyConsulting.com -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Hale, Jim Sent: Thursday, January 15, 2004 3:48 PM To: 'Access Developers discussion and problem solving' Subject: RE: [AccessD] Implements vs WithEvents Very nice explanation, thanks. Jim Hale -----Original Message----- From: John W. Colby [mailto:jwcolby at colbyconsulting.com] Sent: Tuesday, January 13, 2004 9:03 PM To: Access Developers discussion and problem solving Subject: RE: [AccessD] Implements vs WithEvents Robert, Risking sounding ignorant, I don't know what the VBA DHB is so I can't help you there. However AFAIK you can't use Implements for something like a control or form. These objects have code inside them that cause things to happen, properties to modify their behavior etc. ALL THAT STUFF can actually be inherited in VB.NET. That is, you can actually start with a combo box, subclass that combo box, GET ALL OF IT'S FUNCTIONALITY, all of it's code, all of its properties and methods, plus add your own!!! Or even override things to change the way the combo box functions. THAT is true inheritance. Not so in Access / VBA. An object like a combo box is a self contained unit that you simply cannot get inside of or modify in any meaningful way. It appears to us Access programmers almost like an ocx, i.e. a black box that does things. IMPORTANT... one of the things these objects do is raise Events! IOW, they tell you when a user clicks the mouse, double clicks the mouse etc. "inside" their boundaries on the screen. Knowing this, every Access programmer ALREADY USES WITHEVENTS. How? By creating an event stub in a form's class, and inserting code in that event stub to do something that the programmer wants to do when that event happens. The confusing thing is that a form's class DOES NOT REQUIRE a withevents dimension statement for any controls contained in the form (or for itself - the form - for that matter). However there is an IMPLICIT dim statement in the class, invisible, but there none the less. So every Access programmer already knows all about handling events for combos, command buttons etc. They (most of us anyway) use the built-in wizards in the form's builder interface to insert event handler stubs into the form's class and insert code there. THAT IS WITHEVENT PROGRAMMING, with all the details taken care of for you. Well guess what, ANY CLASS can have those same event handlers in them!!! The only differenc is that if the class is not a form class, there must be an EXPLICIT dim Withevents statement for any control (any object actually) that you wish to sink events for. 'inside my own combo class header... 'Dim a combo withevents Private WithEvents mcbo As ComboBox Having the dim statement does nothing more than tell my combo class that a control of a specific type MAY be transferring control of one or more of it's events to the class directly. It does NOT say WHICH control. To do that you have to pass in a control to the class and inside the class, SET the dimmed control = the passed in control. 'inside my own combo class... 'Pass in a control and SET the internal control variable function Init(lcbo as ComboBox) set mcbo = lcbo end init THAT tells the class which combo to sink events for (the one being passed in of course). Once you do that, the class can sink ANY of the control's events. But you still haven't told the class WHICH events to sink. IOW, Even having done this, nothing will happen in your class unless you create an event stub for the control event you wish to process inside the class. 'inside my own combo class... 'create an event stub to which control will be passed when a specific event fires. Private Sub mcbo_AfterUpdate() 'Do Something really cool Msgbox "Something really cool" End Sub THAT tells the combo class WHICH event(s) to sink. Now you must of course instantiate your own combo class in your form and pass in a specific control to it. 'inside my FORM'S class header... 'dimension my own combo class dim fclsMyCombo as clsMyCombo 'inside my FORM'S class Private Sub Form_Open(Cancel As Integer) 'CREATE AN INSTANCE OF MY COOL COMBO CLASS Set fclsMyCombo = new clsMyCombo 'PASS A REFERENCE TO A SPECIFIC COMBO ON MY FORM fclsMyCombo.Init cboStates 'a combo displaying all the states in the union End Sub THAT tells Access to dimension a class, create a class instance and WHICH combo to pass off to the class instance. NOW, with ALL THESE THINGS IN PLACE, if that combo AfterUpdate fires, control will EVENTUALLY get to your class and your message box will display it's message. Notice that your form doesn't need any event stub in it for the control. Even though the ONLY sub in your form's class is the Form_Open, the event stub in your class will sink the event and the message box will display its message. I know full well that all this sounds like a LOT of work just to get control into a class but after you've done it a few times it will be 2nd nature. And of course you can then have a combo class that (see my other post) handles the double click, opens a form, allows your user to edit the data, and when the form closes, requeries the combo, all neatly encapsulated in a class. Plus all the other neato keenarino stuff you can imagine your combo doing. Hang in there. It took me three tries, each six months apart to finally "get" Shamil's stuff and understand Withevents. Looking back I can't understand why, but life is like that sometimes. And no, the demos for the book are copyrighted by Wrox and I can't legally distribute them, however there are many demos (by me of course) on DatabaseAdvisors' web site. I also have a bunch on my own site. This stuff is important, keep trying. John W. Colby www.ColbyConsulting.com -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Robert Gracie Sent: Tuesday, January 13, 2004 8:47 PM To: Access Developers discussion and problem solving Subject: RE: [AccessD] Implements vs WithEvents "Hmmmmmmm, As confusion sets in, he takes and stabs himself in the chest with his keyboard...:-)" I'm trying to understand why the VBA DHB is teaching that using INTERFACE inheritance classes (by way of the Implements Keyword and such) is much better then simply using Event, RaiseEvent, and WithEvents... The problem, for me at least, is getting my mind around the larger concept, and knowing which structure to use and why. With my very limited understanding, the way they have presented, it seems reasonable to go this route if only to help keep control over code execution... I guess I just need to keep pounding away at these concepts....... Robert Gracie www.servicexp.com -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of John W. Colby Sent: Tuesday, January 13, 2004 7:54 PM To: Access Developers discussion and problem solving Subject: [AccessD] Implements vs WithEvents Charlotte, >They have somewhat different purposes. No, they have completely different purposes. >Implements allows you to subclass an existing object/class and give it additional or different functionality, so you can have a class Dog and a subclass Spaniel that has a property Retriever. Well... true but not exactly. My issue with that statement is the term subclass as you use it. Yes you are subclassing the original but ONLY the interface. IMHO that is almost useless Implements is an interface ONLY inheritance, i.e. it allows (forces) you to start with the same public data and method DEFINITION but does not actually inherit the behaviors (methods) themselves. I.e. the code that runs in the class that is being subclassed is NOT inherited into the subclass. Access' inheritance (interface) is not very useful except as a template kind of thing. I find it useless enough that I personally don't bother. On the other hand Shamil is a proponent so it must have its uses. When you move to VB.NET (or any of the other .net languages I believe) TRUE inheritance is available. I.e. if you have a method with a thousand lines of code, when you subclass that object the new object inherits that code as well as the data. In our Implements subclassing, you would have to cut and paste that thousand lines of code into the subclass. Can you say maintenance nightmare? >You can intercept and respond to specific events when they happen in the object. Did the Bark event trigger? WithEvents lets you find out and respond from another class/object. Exactly correct. One of the MAJOR shortcomings of Access / VBA (in fact VB prior to VB.Net) is that Inheritance is virtually non-existent, and even worse, objects other than forms don't have a built in class that you can get at to add functionality directly to. What WithEvents really does is allow you to build class wrappers for objects so that you can encapsulate behaviors (functionality) in your class. In essence you still have two objects, the control (or even another class or OCX) and your class, but now you can put all of the common functionality in your class along with the event stubs of the control/class/ocx that generates the event. This does not get you any further down the road towards inheritance, sadly it simply doesn't appear to be possible in Access / VBA. But it does provide a huge step up in encapsulation. John W. Colby www.ColbyConsulting.com -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Charlotte Foust Sent: Tuesday, January 13, 2004 4:56 PM To: Access Developers discussion and problem solving Subject: RE: [AccessD] =function() in .onclick They have somewhat different purposes. Implements allows you to subclass an existing object/class and give it additional or different functionality, so you can have a class Dog and a subclass Spaniel that has a property Retriever. WithEvents allows you to monitor the events of an object/class. You can intercept and respond to specific events when they happen in the object. Did the Bark event trigger? WithEvents lets you find out and respond from another class/object. Charlotte Foust -----Original Message----- From: Robert Gracie [mailto:Subscriptions at servicexp.com] Sent: Tuesday, January 13, 2004 1:45 PM To: Access Developers discussion and problem solving Subject: RE: [AccessD] =function() in .onclick Hello All, Since I'm just learning this type of programming technique I thought I would ask a question... Why not use Implements instead of WithEvents? My limited understand of WithEvents is that they will not return functionality unit they (the event) has completed processing... Since I'm just at the "door" so to speak with learning how to use and incorporate these new (to me) programming techniques into my work, I really want to start out using the "best" technique... Robert Gracie www.servicexp.com _______________________________________________ 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 _______________________________________________ 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 From gustav at cactus.dk Sun Jan 25 03:40:30 2004 From: gustav at cactus.dk (Gustav Brock) Date: Sun, 25 Jan 2004 10:40:30 +0100 Subject: [AccessD] SubQuery Help??? In-Reply-To: References: Message-ID: <1821314379.20040125104030@cactus.dk> Hi Mark What if several dates of the same id show identical amounts? /gustav > I wasn't quite clear...here is the data > ID Date Amount > a 2/3 4.5 > a 2/4 5.8 > b 2/3 3.7 > b 2/4 2.5 > a 2/6 3.8 > The results I would like to see are: > ID Date Amount > a 2/4 5.8 > b 2/3 3.7 >>From: Brett Barabash >>Reply-To: Access Developers discussion and problem >>solving >>To: "'Access Developers discussion and problem solving'" >> >>Subject: RE: [AccessD] SubQuery Help??? >>Date: Sat, 24 Jan 2004 15:08:36 -0600 >> >>Howzabout: >> >>SELECT ID, Date, Amount >>FROM MyTable >>WHERE Date Between [A-Date] And [B-Date] >>AND Amount = >> (SELECT Max([Amount]) >> FROM MyTable >> WHERE Date Between [A-Date] And [B-Date]) >> >>-----Original Message----- >>From: Mark A Matte [mailto:markamatte at hotmail.com] >>Sent: Saturday, January 24, 2004 2:17 PM >>To: accessd at databaseadvisors.com >>Subject: [AccessD] SubQuery Help??? >> >> >>Hello All, >> >>I'm having a brain cramp...I have a table with 3 fields: ID, Date, Amount. >>I'm pulling the records between A-Date and B-Date...from these records I >>need the date where the Amount is greatest...can someone refresh my >>memory... From mikedorism at adelphia.net Sun Jan 25 10:07:49 2004 From: mikedorism at adelphia.net (Mike & Doris Manning) Date: Sun, 25 Jan 2004 11:07:49 -0500 Subject: [AccessD] data types In-Reply-To: <014901c3e2b8$054650e0$210110ac@SUSANONE> Message-ID: <000001c3e35d$6352a490$8b194244@hargrove.internal> It could be an Ntext field Doris Manning Database Administrator Hargrove Inc. www.hargroveinc.com -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Susan Harkins Sent: Saturday, January 24, 2004 3:24 PM To: AccessD at databaseadvisors.com Subject: [AccessD] data types I'm getting a adVarWChar (202) data type on an Access Text field -- is the W because it's coming via a Recordset or the Connection object? From the docs I've read so far, it isn't really clear. Susan H. _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From ssharkins at bellsouth.net Sun Jan 25 11:08:16 2004 From: ssharkins at bellsouth.net (Susan Harkins) Date: Sun, 25 Jan 2004 12:08:16 -0500 Subject: [AccessD] data types References: <000001c3e35d$6352a490$8b194244@hargrove.internal> Message-ID: <005401c3e366$de3fd340$210110ac@SUSANONE> It's the constant for a Text field. It's a real pia keeping up with all the constants -- I wish they'd offer just one set -- just one set... Susan H. > It could be an Ntext field > > Doris Manning > Database Administrator > Hargrove Inc. > www.hargroveinc.com > > > -----Original Message----- > From: accessd-bounces at databaseadvisors.com > [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Susan Harkins > Sent: Saturday, January 24, 2004 3:24 PM > To: AccessD at databaseadvisors.com > Subject: [AccessD] data types > > > I'm getting a adVarWChar (202) data type on an Access Text field -- is the W > because it's coming via a Recordset or the Connection object? From the docs > I've read so far, it isn't really clear. > > Susan H. > > _______________________________________________ > 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 > From Developer at UltraDNT.com Sun Jan 25 14:10:47 2004 From: Developer at UltraDNT.com (Developer) Date: Sun, 25 Jan 2004 15:10:47 -0500 Subject: [AccessD] data types In-Reply-To: <005401c3e366$de3fd340$210110ac@SUSANONE> Message-ID: <000301c3e37f$520a8a00$7001a8c0@COA3> It is specifically because you are using ADO provider, so its both (or neither) the connection and/or recordset. The ADO constant 202 is equivalent to Access text, and SQL NVarChar. If you want "dbText" you have to open it with DAO. There's a chart of the ADO Enums at http://able-consulting.com/adodatatypeenum1.htm. Hth Steve -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Susan Harkins Sent: Sunday, January 25, 2004 12:08 PM To: Access Developers discussion and problem solving Subject: Re: [AccessD] data types It's the constant for a Text field. It's a real pia keeping up with all the constants -- I wish they'd offer just one set -- just one set... Susan H. > It could be an Ntext field > > Doris Manning > Database Administrator > Hargrove Inc. > www.hargroveinc.com > > > -----Original Message----- > From: accessd-bounces at databaseadvisors.com > [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Susan > Harkins > Sent: Saturday, January 24, 2004 3:24 PM > To: AccessD at databaseadvisors.com > Subject: [AccessD] data types > > > I'm getting a adVarWChar (202) data type on an Access Text field -- is > the W > because it's coming via a Recordset or the Connection object? From the docs > I've read so far, it isn't really clear. > > Susan H. > > _______________________________________________ > 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 > _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From tinanfields at torchlake.com Sun Jan 25 15:07:52 2004 From: tinanfields at torchlake.com (Tina Norris Fields) Date: Sun, 25 Jan 2004 16:07:52 -0500 Subject: [AccessD] Form as Subform - Query Fails - Why? References: <000a01c3d2e5$08d311e0$7001a8c0@COA3> Message-ID: <40143028.4040804@torchlake.com> Steve, That make way too much sense to be legal!!! Thanks for the terrific thoughts. I will put them to good use. Regards, Tina Developer wrote: >Tina: >Your automation code was not recognized because, as I recall from an >earlier post, your Access button was using the CreateObject method to >open Word. This is the "late binding" approach, and is useful because >it is version indepenedent. You have to add a reference in a module >under Project/References to the version of Word you are using to get >intellisense and recognizable constants. > >I posted earlier about this, also, concerning Access to Word MailMerge >... Basically, my preferred method is to have a form that takes the >input parameters from the user, generate a recordset from their >parameters, loop the recordset and write the data to a .CSV file (I >always use "c:\temp\rpt.csv"), and then merge that to a .DOT. All the >Word DOT's for my app are stored in the same folder as the BE .mdb, so I >can dynamically generate a list box of available DOTs at run-time, and >all look for "c:\temp\rpt.csv". This avoids that "toolbar" issue (which >I have seen too many times) and as a CSV, the data is also >"Excel-ready", so I can use the same code, and then open Excel instead >of mail merging to Word. This method also lets the user develop new >merge letters, without changing the application. > >Hth, >Steve > > > > > >-----Original Message----- >From: accessd-bounces at databaseadvisors.com >[mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Tina Norris >Fields >Sent: Sunday, January 04, 2004 7:36 AM >To: Access Developers discussion and problem solving >Subject: Re: [AccessD] Form as Subform - Query Fails - Why? > > >Hi again Gustav, > >I ended up keeping the button to just launch Word. I created a little >macro in Word to open the acknowledgement form letter, which already >looks for its data source as the tblAcknowledgePay in the TLA database. > My user has only to click to merge the document, and there are her >acknowledgement letters! It all looks much more spiffy and easy now >than what she was doing - seriously. > >It used to be advisable to close Access before launching Word and >loading a document to merge data from a database - (A95, A97) since Word > >would open an instance of Access as part of the merge process, and >having two copies of Access open at one time placed heavy demands on the > >system resources. That no longer appears to be the case. I'm >delighted. However, during my work on this little modification, from >time to time Word would fail to find the data source with which it has >been linked forever and functionality would disappear, i.e., the merge >toolbar dimmed and no commands worked, Closing the programs and >relaunching them fixed that usually. Now that I've finished fiddling >with it, just running the queries and launching the merge form document, > >things are behaving nicely. > >I did study the Microsoft Automation help file, but the things it >suggested weren't recognized from within Access, so I still have some >learning to do there. Objects such as wordApp and wordDoc were >unrecognized from within Access - worked great from within Word. So >there has to be an import statement or something like that to tell >Access to look to another library of objects, too. Back to the books! > Thanks for your help. I will work on the syntax until the thing does >work for me, I can see the situation arising again sometime. > >Best regards, >Tina > > >Gustav Brock wrote: > > > >>Hi Tina >> >>Try with >> >> Between >> >> >> >> >[Forms]![fInstructions]![subYourSubformControlName].Form![BeginningDate] > > >> And >> >> >> >[Forms]![fInstructions]![subYourSubformControlName].Form![EndingDate] > > >>/gustav >> >> >> >> >> >> >>>Hi John, >>> >>> >>> >>> >> >> >> >> >>>Thanks for the reply. I think I have not been completely clear about >>>my >>>quandary. The parameter query selects records based on the following: >>> >>> >>> >>> >> >> >> >> >>>Between [Forms]![fCalendar]![BeginningDate] And >>>[Forms]![fCalendar]![EndingDate] >>> >>> >>> >>> >> >> >> >> >>>- which works fine as long as one sets the dates by opening fCalendar >>>as >>>a stand-alone form. >>> >>> >>> >>> >> >> >> >> >>>I made a form with a series of instructions, hoping to guide my user >>> >>> >>>from step to step without having to remind the user to set the dates >> >> >>>first in the fCalendar - >>>the idea was to embed an instance of the fCalendar in the instruction >>>form - set the dates right here in what is now a subform of the >>>instruction form. >>> >>> >>> >>> >> >> >> >> >>>If one sets the dates in the embedded instance of fCalendar, the query >>>does not find its parameters. Well, say I to myself, I probably need >>> >>> >to > > >>>tell the query where to find those date textboxes, but I do not find a >>> >>> > > > >>>way to identify them other than as they are already identified . Is >>>there a collection other than [Forms] I need to find? When I examine >>> >>> >my > > >>>fCalendar through the subform control, I see all the correct textbox >>>names - it certainly appears to be the same form - why does setting >>> >>> >its > > >>>dates not provide the necessary parameters to the query? I don't see >>> >>> >it. > > >>> >>> >>> >>> >>_______________________________________________ >>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 > >_______________________________________________ >AccessD mailing list >AccessD at databaseadvisors.com >http://databaseadvisors.com/mailman/listinfo/accessd >Website: http://www.databaseadvisors.com > > > From accessd666 at yahoo.com Mon Jan 26 04:27:56 2004 From: accessd666 at yahoo.com (Sad Der) Date: Mon, 26 Jan 2004 02:27:56 -0800 (PST) Subject: [AccessD] Make-table query points to c:\documents and settings?! Message-ID: <20040126102756.58921.qmail@web60209.mail.yahoo.com> Hi group, I've created a routine that creates a new DB.This Temp_Db is created in the same directory as the FE. I then use a couple of MAKE TABLE-queries to create tables in the temp_db. This worked great. Now, i'm getting errors that my MAKE_TABLE-queries cannot find the Temp_db!? I get this error: Err.Number = 3024 Err.Description =Could not find file: C:\Documents and Settings\.... As you can see it points to C:\Documents and Settings. However the temp_db is created on my d:\projects\... Here's the code I use: ******************************************************* Else Set db = Workspaces(0).CreateDatabase(strPath & "TEMP_FE_" & strFile, dbLangGeneral) Set db = CurrentDb() Set qdf = New DAO.QueryDef '------------------------------------------------ 'Create tables in newly created database '------------------------------------------------ 'Loop through query list For Each qdf In db.QueryDefs 'check if qryName starts with qryMake_ If InStr(1, qdf.Name, "qryMake_") Then Call CreateTables(qdf.Name) x = x + 1 End If Next Call MsgBox("The following objects have been created:" & vbCrLf & _ " - Temporary database" & vbCrLf & _ " - " & x & " Tables", vbInformation + vbDefaultButton1, "Objects created") End If ******************************************************* Any idea's why it points to C:\documents and Settings? When I created the make table queries I selected the temp_db. Sander __________________________________ Do you Yahoo!? Yahoo! SiteBuilder - Free web site building tool. Try it! http://webhosting.yahoo.com/ps/sb/ From gustav at cactus.dk Mon Jan 26 04:47:37 2004 From: gustav at cactus.dk (Gustav Brock) Date: Mon, 26 Jan 2004 11:47:37 +0100 Subject: [AccessD] Make-table query points to c:\documents and settings?! In-Reply-To: <20040126102756.58921.qmail@web60209.mail.yahoo.com> References: <20040126102756.58921.qmail@web60209.mail.yahoo.com> Message-ID: <13210704912.20040126114737@cactus.dk> Hi Sad What does Debug.Print strPath & "TEMP_FE_" & strFile print? /gustav > Set db = Workspaces(0).CreateDatabase(strPath & > "TEMP_FE_" & strFile, dbLangGeneral) From Erwin.Craps at ithelps.be Mon Jan 26 05:48:58 2004 From: Erwin.Craps at ithelps.be (Erwin Craps - IT Helps) Date: Mon, 26 Jan 2004 12:48:58 +0100 Subject: [AccessD] Make-table query points to c:\documents and settings?! Message-ID: <46B976F2B698FF46A4FE7636509B22DF03D164@stekelbes.ithelps.local> I don't understand why you create a new database in "set db" and then set db back to the current one. If you do "For Each qdf In db.QueryDefs" If you create a table in db that would be the current db and not the new db?! If function "CreateTables" does create the table in new db, then that should be fine but... You should db.close before setting it to the current one. Even better use dim dbCurr en dim dbNew statements for avoiding confusion. Please note that you do not need to close currentdb (dbCurr.close). Just set it to nothing. Erwin -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Sad Der Sent: Monday, January 26, 2004 11:28 AM To: Acces User Group Subject: [AccessD] Make-table query points to c:\documents and settings?! Hi group, I've created a routine that creates a new DB.This Temp_Db is created in the same directory as the FE. I then use a couple of MAKE TABLE-queries to create tables in the temp_db. This worked great. Now, i'm getting errors that my MAKE_TABLE-queries cannot find the Temp_db!? I get this error: Err.Number = 3024 Err.Description =Could not find file: C:\Documents and Settings\.... As you can see it points to C:\Documents and Settings. However the temp_db is created on my d:\projects\... Here's the code I use: ******************************************************* Else Set db = Workspaces(0).CreateDatabase(strPath & "TEMP_FE_" & strFile, dbLangGeneral) Set db = CurrentDb() Set qdf = New DAO.QueryDef '------------------------------------------------ 'Create tables in newly created database '------------------------------------------------ 'Loop through query list For Each qdf In db.QueryDefs 'check if qryName starts with qryMake_ If InStr(1, qdf.Name, "qryMake_") Then Call CreateTables(qdf.Name) x = x + 1 End If Next Call MsgBox("The following objects have been created:" & vbCrLf & _ " - Temporary database" & vbCrLf & _ " - " & x & " Tables", vbInformation + vbDefaultButton1, "Objects created") End If ******************************************************* Any idea's why it points to C:\documents and Settings? When I created the make table queries I selected the temp_db. Sander __________________________________ Do you Yahoo!? Yahoo! SiteBuilder - Free web site building tool. Try it! http://webhosting.yahoo.com/ps/sb/ _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From accessd666 at yahoo.com Mon Jan 26 07:46:10 2004 From: accessd666 at yahoo.com (Sad Der) Date: Mon, 26 Jan 2004 05:46:10 -0800 (PST) Subject: [AccessD] Make-table query points to c:\documents and settings?! In-Reply-To: <13210704912.20040126114737@cactus.dk> Message-ID: <20040126134610.64095.qmail@web60210.mail.yahoo.com> Gustav, It says: d:\projects.... Already checked that. Sander --- Gustav Brock wrote: > Hi Sad > > What does > > Debug.Print strPath & "TEMP_FE_" & strFile > > print? > > /gustav > > > > Set db = > Workspaces(0).CreateDatabase(strPath & > > "TEMP_FE_" & strFile, dbLangGeneral) > > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com __________________________________ Do you Yahoo!? Yahoo! SiteBuilder - Free web site building tool. Try it! http://webhosting.yahoo.com/ps/sb/ From accessd666 at yahoo.com Mon Jan 26 07:58:31 2004 From: accessd666 at yahoo.com (Sad Der) Date: Mon, 26 Jan 2004 05:58:31 -0800 (PST) Subject: [AccessD] Make-table query points to c:\documents and settings?! In-Reply-To: <46B976F2B698FF46A4FE7636509B22DF03D164@stekelbes.ithelps.local> Message-ID: <20040126135831.75097.qmail@web60208.mail.yahoo.com> I create a new database. After that I set Db back to current db. Then I loop through all queries in current db searching for my MakeTable queries. Using my CreateTable function I start the MakeTable queries. You're corrected in saying that I should use 2 objects but...I didn't. I tested it and it worked. Worked...that is. because now it want's to create the tables on c:\.... Sander --- Erwin Craps - IT Helps wrote: > I don't understand why you create a new database in > "set db" and then > set db back to the current one. > If you do "For Each qdf In db.QueryDefs" > > If you create a table in db that would be the > current db and not the new > db?! > If function "CreateTables" does create the table in > new db, then that > should be fine but... > > You should db.close before setting it to the current > one. > Even better use dim dbCurr en dim dbNew statements > for avoiding > confusion. > > Please note that you do not need to close currentdb > (dbCurr.close). > Just set it to nothing. > > > Erwin > > > > > -----Original Message----- > From: accessd-bounces at databaseadvisors.com > [mailto:accessd-bounces at databaseadvisors.com] On > Behalf Of Sad Der > Sent: Monday, January 26, 2004 11:28 AM > To: Acces User Group > Subject: [AccessD] Make-table query points to > c:\documents and > settings?! > > Hi group, > > I've created a routine that creates a new DB.This > Temp_Db is created in > the same directory as the FE. > > I then use a couple of MAKE TABLE-queries to create > tables in the > temp_db. > > This worked great. Now, i'm getting errors that my > MAKE_TABLE-queries > cannot find the Temp_db!? > I get this error: > Err.Number = 3024 > Err.Description =Could not find file: C:\Documents > and Settings\.... > > As you can see it points to C:\Documents and > Settings. > However the temp_db is created on my d:\projects\... > > Here's the code I use: > ******************************************************* > Else > Set db = Workspaces(0).CreateDatabase(strPath > & "TEMP_FE_" & > strFile, dbLangGeneral) > Set db = CurrentDb() > Set qdf = New DAO.QueryDef > > '------------------------------------------------ > 'Create tables in newly created database > > '------------------------------------------------ > 'Loop through query list > For Each qdf In db.QueryDefs > 'check if qryName starts with qryMake_ > If InStr(1, qdf.Name, "qryMake_") Then > Call CreateTables(qdf.Name) > x = x + 1 > End If > Next > Call MsgBox("The following objects have been > created:" & vbCrLf & > _ > " - Temporary database" & vbCrLf > & _ > " - " & x & " Tables", > vbInformation + > vbDefaultButton1, "Objects created") > > End If > ******************************************************* > Any idea's why it points to C:\documents and > Settings? > When I created the make table queries I selected the > temp_db. > > Sander > > __________________________________ > Do you Yahoo!? > Yahoo! SiteBuilder - Free web site building tool. > Try it! > http://webhosting.yahoo.com/ps/sb/ > _______________________________________________ > 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 __________________________________ Do you Yahoo!? Yahoo! SiteBuilder - Free web site building tool. Try it! http://webhosting.yahoo.com/ps/sb/ From gustav at cactus.dk Mon Jan 26 08:00:50 2004 From: gustav at cactus.dk (Gustav Brock) Date: Mon, 26 Jan 2004 15:00:50 +0100 Subject: [AccessD] Make-table query points to c:\documents and settings?! In-Reply-To: <20040126134610.64095.qmail@web60210.mail.yahoo.com> References: <20040126134610.64095.qmail@web60210.mail.yahoo.com> Message-ID: <6222298112.20040126150050@cactus.dk> Hi Sad So did you specify the full path of the tables in those make-table queries? /gustav > Gustav, > It says: d:\projects.... > Already checked that. > Sander > --- Gustav Brock wrote: >> Hi Sad >> >> What does >> >> Debug.Print strPath & "TEMP_FE_" & strFile >> >> print? >> >> /gustav >> >> >> > Set db = >> Workspaces(0).CreateDatabase(strPath & >> > "TEMP_FE_" & strFile, dbLangGeneral) From accessd666 at yahoo.com Mon Jan 26 08:29:34 2004 From: accessd666 at yahoo.com (Sad Der) Date: Mon, 26 Jan 2004 06:29:34 -0800 (PST) Subject: [AccessD] Make-table query points to c:\documents and settings?! In-Reply-To: <6222298112.20040126150050@cactus.dk> Message-ID: <20040126142934.80492.qmail@web60204.mail.yahoo.com> No, where can I do that? I looked at the properties but I just saw in wich db the tables will be created. Not the path! Sander --- Gustav Brock wrote: > Hi Sad > > So did you specify the full path of the tables in > those make-table > queries? > > /gustav > > > > Gustav, > > > It says: d:\projects.... > > Already checked that. > > > Sander > > --- Gustav Brock wrote: > >> Hi Sad > >> > >> What does > >> > >> Debug.Print strPath & "TEMP_FE_" & strFile > >> > >> print? > >> > >> /gustav > >> > >> > >> > Set db = > >> Workspaces(0).CreateDatabase(strPath & > >> > "TEMP_FE_" & strFile, dbLangGeneral) > > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com __________________________________ Do you Yahoo!? Yahoo! SiteBuilder - Free web site building tool. Try it! http://webhosting.yahoo.com/ps/sb/ From gustav at cactus.dk Mon Jan 26 08:43:23 2004 From: gustav at cactus.dk (Gustav Brock) Date: Mon, 26 Jan 2004 15:43:23 +0100 Subject: [AccessD] Make-table query points to c:\documents and settings?! In-Reply-To: <20040126142934.80492.qmail@web60204.mail.yahoo.com> References: <20040126142934.80492.qmail@web60204.mail.yahoo.com> Message-ID: <13824851013.20040126154323@cactus.dk> Hi Sad Switch from design view of the query to SQL view ... /gustav > No, where can I do that? > I looked at the properties but I just saw in wich db > the tables will be created. Not the path! > Sander > --- Gustav Brock wrote: >> Hi Sad >> >> So did you specify the full path of the tables in >> those make-table >> queries? >> >> /gustav >> >> >> > Gustav, >> >> > It says: d:\projects.... >> > Already checked that. >> >> > Sander >> > --- Gustav Brock wrote: >> >> Hi Sad >> >> >> >> What does >> >> >> >> Debug.Print strPath & "TEMP_FE_" & strFile >> >> >> >> print? >> >> >> >> /gustav >> >> >> >> >> >> > Set db = >> >> Workspaces(0).CreateDatabase(strPath & >> >> > "TEMP_FE_" & strFile, dbLangGeneral) From john at winhaven.net Mon Jan 26 10:00:19 2004 From: john at winhaven.net (John Bartow) Date: Mon, 26 Jan 2004 10:00:19 -0600 Subject: [AccessD] LWS Beta testers In-Reply-To: Message-ID: John, When can I get LWS? John B. > -----Original Message----- > From: accessd-bounces at databaseadvisors.com > [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of John W. Colby > Sent: Sunday, December 21, 2003 6:30 PM > To: AccessD > Subject: [AccessD] LWS Beta testers > > > Folks, > > I am working on my Light Weight Security system and am looking for beta > testers, i.e. people who would like a presentation level security system > such as I am designing. This email will briefly outline how > things work so > that you can decide whether you would like to test it. I am looking for > PROGRAMMERS as beta testers. > > LWS is designed to restrict basic operations on forms and controls. The > form operations / properties that it will affect are Open form, > Edit record, > Delete record and Add record. The control properties affected > are Enabled, > Locked, and Visible. > > LWS is NOT designed to replace Access' (or SQL Server's) security. LWS is > designed to allow the developer to restrict operations at the INTERFACE > level, i.e. who can open forms, who can edit records in a given form, who > can SEE a given control on a given form, who can EDIT data in a given > control on a given form. These are fundamentally different > issues than the > built in DATA security that Access and SQL Server provide. I designed LWS > because my clients asked for things like "only allow certain users to be > able to see (or use) this control" or "only allow certain users to be able > to open this form" etc. > > As an example, suppose you have a form that is used by several different > groups of people in the company. One group can only use the form > to browse > data, never edit or delete the data. One group is allowed to > open the form > and edit records, but never delete records. Another group can also delete > records. Another group is allowed to edit most of the data but several of > the fields should be read only, i.e. that group cannot edit those fields. > Another form displays sensitive data that only the Personnel group can see > (and edit) the salary field for. Other groups can see the form but the > salary field is just invisible. > > All of these kinds of issues are what LWS is designed to address. > > LWS is designed around a Users / Groups metaphor similar to > Windows NT/2K/XP > etc. Users exist but don't directly have any innate abilities. Users > belong to Groups. Groups can do things. > > Forms and controls can be manipulated by groups. Groups can open (or not) > forms, edit / delete (or not) records in a given form. Groups can see / > enter / edit (or not) specific controls on forms. All of these > things that > groups can do are simply manipulations of the built in properties of the > forms or controls. Open (not a property but controlled by LWS), > AllowEdit, > AllowDelete, AllowAdd etc can be masked by LWS as the form opens such that > specific groups can control these properties while others cannot. Control > properties Visible, Enabled and Locked are controlled in the same manner. > > There are a set of tables that support the LWS system: > > uSysLWSUsers contains user information - Name, PEID (mapped to your > Personnel ID if you desire) and password hash (MD5). > usystblLWSGroup contains group information - Name and the 2^x bit that is > used for mapping it's abilities later. > usystblLWSGroupUser contains mappings of users to groups. A simple m-m > uSysLWSUsers and usystblLWSGroup. > MsysForms contains form security information - Form ID, Form name, Open, > Edit, Add and Delete maps. > MsysControls contains control security information - Form ID, > Control name, > Enabled, Locked and Visible maps > > There are a handful of forms to support LWS: > > usysfrmLWSLogin - The login form. > usysfrmLWSUsers - The form for setting up users. > usysfrmLWSGroups - The form for setting up groups. > usysfrmLWSSetupFrmSecurity - The form that assists the developer > in setting > up form security > > LWS is NOT finished, but all of the basic tables are in place, I am using > the login in my apps, and the code to implement LWS security for forms and > controls is up and functioning. > > LWS will be a library (MDA for now) with full source code > available to beta > testers. Please remember, I am looking for "code jocks" for now. You > should be comfortable instantiating classes, calling class methods and > setting class properties, manipulating form and control attributes via VB > etc. > > I REALLY need people with the time to play with this thing, tell me what > they like or don't like, what I haven't considered etc. > > I think this should give enough information to allow you to decide whether > you are interested. If you are interested, please contact me OFF LIST at > LWS at colbyconsulting.com. > > John W. Colby > www.ColbyConsulting.com > > > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com > > From Lambert.Heenan at AIG.com Mon Jan 26 10:23:37 2004 From: Lambert.Heenan at AIG.com (Heenan, Lambert) Date: Mon, 26 Jan 2004 11:23:37 -0500 Subject: [AccessD] Annoying Feature of Access 2002 Message-ID: <8B98F8EA48F8BA47A2F24E0D0AF40CF407AD7D50@xlivmbx12.aig.com> A few weeks ago I complained about the fact that when you change one module in Outlook 2002 all the other modules then show the same modified time as the one you just changed. This can make it a tad difficult to keep track of what you just worked on. Assuming I'm not the only one that finds this annoying, and that we're not all working with Visual Source Safe, here's a simple work around. Just create a query with this SQL... SELECT MSysObjects.Name, MSysObjects.DateCreate, MSysObjects.DateUpdate FROM MSysObjects WHERE (((MSysObjects.Type)=-32761)); and then attach this query to a macro which you can then associate with a toolbar button. You will then have a one click way to find out what really got changed in module land. HTH :-) Lambert From dwaters at usinternet.com Mon Jan 26 11:04:19 2004 From: dwaters at usinternet.com (Dan Waters) Date: Mon, 26 Jan 2004 11:04:19 -0600 Subject: [AccessD] Annoying Feature of Access 2002 In-Reply-To: <13373915.1075134553301.JavaMail.root@localhost.localdomain> Message-ID: <000001c3e42e$72ec8e80$de1811d8@DanWaters> Yahoo! I'm going to title this button as the Lambert Wizard! Thanks! Dan Waters -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Heenan, Lambert Sent: Monday, January 26, 2004 10:24 AM To: Access-D Email (accessd at databaseadvisors.com); ACCESS-L Email (ACCESS-L at PEACH.EASE.LSOFT.COM) Subject: [AccessD] Annoying Feature of Access 2002 A few weeks ago I complained about the fact that when you change one module in Outlook 2002 all the other modules then show the same modified time as the one you just changed. This can make it a tad difficult to keep track of what you just worked on. Assuming I'm not the only one that finds this annoying, and that we're not all working with Visual Source Safe, here's a simple work around. Just create a query with this SQL... SELECT MSysObjects.Name, MSysObjects.DateCreate, MSysObjects.DateUpdate FROM MSysObjects WHERE (((MSysObjects.Type)=-32761)); and then attach this query to a macro which you can then associate with a toolbar button. You will then have a one click way to find out what really got changed in module land. HTH :-) Lambert _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From cfoust at infostatsystems.com Mon Jan 26 11:26:01 2004 From: cfoust at infostatsystems.com (Charlotte Foust) Date: Mon, 26 Jan 2004 09:26:01 -0800 Subject: [AccessD] data type for field in a closed table Message-ID: It doesn't matter whether you're using DAO or ADO, you need to use the Set keyword to instantiate an object like a field, and there's no way to using just the name of the field. Have you tried using the Type property of the field? Online help has an example of code to determine the type property using an ADO recordset opened on the table. Charlotte Foust -----Original Message----- From: Susan Harkins [mailto:ssharkins at bellsouth.net] Sent: Saturday, January 24, 2004 11:32 AM To: Access Developers discussion and problem solving Subject: Re: [AccessD] data type for field in a closed table I considered that, but was trying to avoid DAO -- I should've mentioned that -- I apologize. I'm using ADO -- and looping through the recordset doesn't really require anymore code than the DAO querydef -- if I'm not mistaken, ADO doesn't use the QueryDef object. But, on the other hand, you don't have to create a Recordset using your code. Thanks Gustav. Susan H. > Hi Susan > > > I'm trying to return a field's data type. > > > I have the field by name -- as a string -- and I just can't seem to > > get it > > into a Field object variable so I can tap into the Type property. > > The field > > is the result of a listbox selection. > > > varField = lstField.Value > > > How can I get from there to > > > fld = varField > > > to here > > > varType = fld.Type > > > Everything I've tried returns an Object required at the fld=varField > > statement because varField is a string, not a real reference. At > > least, I > > think that's the problem. > > Something like this? If the rowsource is an SQL string: > > Dim dbs As Database > Dim qdf As QueryDef > dim intVarType As Integer > > Set dbs = CurrentDb() > Set qdf = dbs.CreateQueryDef(vbNullString) > qdf.SQL = Me!lstDemo.RowSource > > intVarType = qdf.Fields("YourFieldName").Type > Debug.Print intVarType > > qdf.Close > > Set qdf = Nothing > Set dbs = Nothing > > If not an SQL string, just pick the name of the stored query and use > that as qdf. > > /gustav > > _______________________________________________ > 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 From accessd666 at yahoo.com Mon Jan 26 12:44:38 2004 From: accessd666 at yahoo.com (Sad Der) Date: Mon, 26 Jan 2004 10:44:38 -0800 (PST) Subject: [AccessD] Make-table query points to c:\documents and settings?! In-Reply-To: <13824851013.20040126154323@cactus.dk> Message-ID: <20040126184438.97312.qmail@web60205.mail.yahoo.com> I build it in SQL view. There's no path in there either... :-( Sander --- Gustav Brock wrote: > Hi Sad > > Switch from design view of the query to SQL view ... > > /gustav > > > > No, where can I do that? > > I looked at the properties but I just saw in wich > db > > the tables will be created. Not the path! > > > Sander > > --- Gustav Brock wrote: > >> Hi Sad > >> > >> So did you specify the full path of the tables in > >> those make-table > >> queries? > >> > >> /gustav > >> > >> > >> > Gustav, > >> > >> > It says: d:\projects.... > >> > Already checked that. > >> > >> > Sander > >> > --- Gustav Brock wrote: > >> >> Hi Sad > >> >> > >> >> What does > >> >> > >> >> Debug.Print strPath & "TEMP_FE_" & strFile > >> >> > >> >> print? > >> >> > >> >> /gustav > >> >> > >> >> > >> >> > Set db = > >> >> Workspaces(0).CreateDatabase(strPath & > >> >> > "TEMP_FE_" & strFile, dbLangGeneral) > > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com __________________________________ Do you Yahoo!? Yahoo! SiteBuilder - Free web site building tool. Try it! http://webhosting.yahoo.com/ps/sb/ From Mike.W.Gowey at doc.state.or.us Mon Jan 26 13:13:04 2004 From: Mike.W.Gowey at doc.state.or.us (Gowey Mike W) Date: Mon, 26 Jan 2004 12:13:04 -0700 Subject: [AccessD] Database Error Message-ID: <05EBB8A3BEB95B4F8216BE4EF486077801D9FF33@srciml1.ds.doc.state.or.us> Hi Everyone, Has anyone else seen the below message? Is there anyway to correct this error? There is no lock file in the folder and nobody has it open.... Thanks for any advice given.. The Microsoft Jet database engine cannot open the file 'C:\DSU DATA BASE 2000.MDB'. It is already opened exclusively by another user, or you need permission to view its data. From ranthony at wrsystems.com Mon Jan 26 13:26:50 2004 From: ranthony at wrsystems.com (Randall Anthony) Date: Mon, 26 Jan 2004 14:26:50 -0500 Subject: [AccessD] Database Error Message-ID: <5F21A4E8B8DD734992EF9E70AC9D30641289FA@mail2.wrsystems.com> The short answer is that it is probably corrupted. There have been a number of posts addressing this issue recently. If repair/compact does not work, you may try the /decompile switch. Search the archives for /decompile or database corruption. -----Original Message----- From: Gowey Mike W [mailto:Mike.W.Gowey at doc.state.or.us] Sent: Monday, January 26, 2004 2:13 PM To: Access Developers discussion and problem solving Subject: [AccessD] Database Error Hi Everyone, Has anyone else seen the below message? Is there anyway to correct this error? There is no lock file in the folder and nobody has it open.... Thanks for any advice given.. The Microsoft Jet database engine cannot open the file 'C:\DSU DATA BASE 2000.MDB'. It is already opened exclusively by another user, or you need permission to view its data. _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From lists at theopg.com Mon Jan 26 13:30:28 2004 From: lists at theopg.com (MarkH) Date: Mon, 26 Jan 2004 19:30:28 -0000 Subject: [AccessD] Temp tables and access security In-Reply-To: Message-ID: <000201c3e442$eb9faab0$f70b6bd5@netboxxp> Hello All Using AXP on Win 2000 I have a secured database and was wondering what permissions I need to grant to allow the system to create temp tables (Access BE) when a user logs in. I'm missing something I reckon... Cheers Mark From Erwin.Craps at ithelps.be Mon Jan 26 13:31:40 2004 From: Erwin.Craps at ithelps.be (Erwin Craps - IT Helps) Date: Mon, 26 Jan 2004 20:31:40 +0100 Subject: [AccessD] Database Error Message-ID: <46B976F2B698FF46A4FE7636509B22DF03D169@stekelbes.ithelps.local> Hi Mike You would'nt believe me I had the same thing today!!! My 7am backup tape was full and the backup software requested for an additional tape to continue. The MDB file was partialy backupped and the backup software kept the file locked until I cancelled the backup. Same symtoms, could not enter the db and there was no lock file.... I only noticed this around 10am when people started to call me because the website (database access) was not working... I use Veritas backup, I believe version 8,6. Erwin -----Oorspronkelijk bericht----- Van: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] Namens Gowey Mike W Verzonden: maandag 26 januari 2004 20:13 Aan: Access Developers discussion and problem solving Onderwerp: [AccessD] Database Error Hi Everyone, Has anyone else seen the below message? Is there anyway to correct this error? There is no lock file in the folder and nobody has it open.... Thanks for any advice given.. The Microsoft Jet database engine cannot open the file 'C:\DSU DATA BASE 2000.MDB'. It is already opened exclusively by another user, or you need permission to view its data. _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From cfoust at infostatsystems.com Mon Jan 26 13:45:14 2004 From: cfoust at infostatsystems.com (Charlotte Foust) Date: Mon, 26 Jan 2004 11:45:14 -0800 Subject: [AccessD] Temp tables and access security Message-ID: Why would a user be creating temp tables in the BE? Normally temp tables would be created in the front end. Are you asking about Access security permissions or Windows permissions? In Windows, you need pretty much full permissions if you're going to be modifying the design of the BE. Charlotte Foust -----Original Message----- From: MarkH [mailto:lists at theopg.com] Sent: Monday, January 26, 2004 11:30 AM To: 'Access Developers discussion and problem solving' Subject: [AccessD] Temp tables and access security Hello All Using AXP on Win 2000 I have a secured database and was wondering what permissions I need to grant to allow the system to create temp tables (Access BE) when a user logs in. I'm missing something I reckon... Cheers Mark _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From jeffrey.demulling at usbank.com Mon Jan 26 14:39:30 2004 From: jeffrey.demulling at usbank.com (jeffrey.demulling at usbank.com) Date: Mon, 26 Jan 2004 14:39:30 -0600 Subject: [AccessD] ODBC Connection Information Not Showing in ODBC Data Sources Message-ID: Operating System Windows NT 4.0 A LAN Admin has installed an Oracle ODBC Driver for RDB and the installation says the driver has installed successfully. Looking in the registry it show the driver is installed. However when the user tries to set up an actual connection the driver is not listed as being there. This is also happening with another user for Gupta's SQLBase Driver pack. Anyone know of any solutions to make the driver appear in the as being installed? TIA. -Jeff From garciad at kentri.org Mon Jan 26 14:45:12 2004 From: garciad at kentri.org (Dwylene Garcia) Date: Mon, 26 Jan 2004 15:45:12 -0500 Subject: [AccessD] Form doesn't work on new laptop Message-ID: I have an odd problem that has managed to stump several IT people. We are on the verge of giving up but I thought I would make an attempt to ask this group if anyone has seen such a problem. I have a fairly complicated form (one-to-many-to-many relationship, Main form with two subform, one subform filters the other subform) and this form has worked for 2 years and still does work on every desktop in our office. However, one employee received a new laptop this week running Windows 2000, Office XP and Access 2000 (the same as all the desktops) and the database opens and it appears that the less complicated forms work fine but this one form which is the main form used will not populate the subforms correctly. It recognizes there are records but it won't show them in the combo box... I have found this http://support.microsoft.com/default.aspx?scid=kb;en-us;208866&Product=acc2000 in the knowledge base that seems to restate the problem exactly. However, I'm looking for a solution that does not involve altering my form since it does work on the desktop computers. Why will it work on a desktop and not a laptop???? I don't have time to alter the database to make it work on this one laptop when 7 other desktop computers run the database fine. I'm wondering if anyone else has ever experienced this and I'm hoping that it's something silly that I overlooked while troubleshooting. I think we have hit all the obvious troubleshooting points like reinstalling MS Office, I took the database off the network and tried to run from the C:/. When it first happened we received an error "Object invalid or no longer set.", that error is not showing up now. Dwylene Garcia Computer Applications Trainer Kent Hospital, Department of Education Email: garciad at kenthospital.org From Lambert.Heenan at AIG.com Mon Jan 26 14:54:41 2004 From: Lambert.Heenan at AIG.com (Heenan, Lambert) Date: Mon, 26 Jan 2004 15:54:41 -0500 Subject: [AccessD] Annoying Feature of Access 2002 Message-ID: <8B98F8EA48F8BA47A2F24E0D0AF40CF407AD7D53@xlivmbx12.aig.com> Fame at last!!! :-) > -----Original Message----- > From: Dan Waters [SMTP:dwaters at usinternet.com] > Sent: Monday, January 26, 2004 12:04 PM > To: 'Access Developers discussion and problem solving' > Subject: RE: [AccessD] Annoying Feature of Access 2002 > > Yahoo! > > I'm going to title this button as the Lambert Wizard! > > Thanks! > Dan Waters > > > -----Original Message----- > From: accessd-bounces at databaseadvisors.com > [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Heenan, Lambert > Sent: Monday, January 26, 2004 10:24 AM > To: Access-D Email (accessd at databaseadvisors.com); ACCESS-L Email > (ACCESS-L at PEACH.EASE.LSOFT.COM) > Subject: [AccessD] Annoying Feature of Access 2002 > > A few weeks ago I complained about the fact that when you change one > module > in Outlook 2002 all the other modules then show the same modified time as > the one you just changed. This can make it a tad difficult to keep track > of > what you just worked on. > > Assuming I'm not the only one that finds this annoying, and that we're not > all working with Visual Source Safe, here's a simple work around. Just > create a query with this SQL... > > SELECT MSysObjects.Name, MSysObjects.DateCreate, MSysObjects.DateUpdate > FROM MSysObjects > WHERE (((MSysObjects.Type)=-32761)); > > and then attach this query to a macro which you can then associate with a > toolbar button. You will then have a one click way to find out what really > got changed in module land. > > HTH :-) > > Lambert > > _______________________________________________ > 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 From DWUTKA at marlow.com Mon Jan 26 15:05:53 2004 From: DWUTKA at marlow.com (DWUTKA at marlow.com) Date: Mon, 26 Jan 2004 15:05:53 -0600 Subject: [AccessD] Form doesn't work on new laptop Message-ID: <2F8793082E00D4119A1700B0D0216BF8022277B0@main2.marlow.com> This is WAY off the cuff, a complete WAG. Laptops, by their nature, are designed to have multiple monitors (the laptop screen, and then a possible external monitor). Sometimes the second monitor is just a mirror of the main monitor, but other times, it can be a 'second' monitor, effectively doubling the width of the desktop. I bring this up, because I have seen combo boxes do WIERD things when used on a multiple monitor system. Quite frankly, I've seen it mostly in Access 97, but wouldn't be surprised to see it in 2000. Drew -----Original Message----- From: Dwylene Garcia [mailto:garciad at kentri.org] Sent: Monday, January 26, 2004 2:45 PM To: accessD at databaseadvisors.com Subject: [AccessD] Form doesn't work on new laptop I have an odd problem that has managed to stump several IT people. We are on the verge of giving up but I thought I would make an attempt to ask this group if anyone has seen such a problem. I have a fairly complicated form (one-to-many-to-many relationship, Main form with two subform, one subform filters the other subform) and this form has worked for 2 years and still does work on every desktop in our office. However, one employee received a new laptop this week running Windows 2000, Office XP and Access 2000 (the same as all the desktops) and the database opens and it appears that the less complicated forms work fine but this one form which is the main form used will not populate the subforms correctly. It recognizes there are records but it won't show them in the combo box... I have found this http://support.microsoft.com/default.aspx?scid=kb;en-us;208866&Product=acc20 00 in the knowledge base that seems to restate the problem exactly. However, I'm looking for a solution that does not involve altering my form since it does work on the desktop computers. Why will it work on a desktop and not a laptop???? I don't have time to alter the database to make it work on this one laptop when 7 other desktop computers run the database fine. I'm wondering if anyone else has ever experienced this and I'm hoping that it's something silly that I overlooked while troubleshooting. I think we have hit all the obvious troubleshooting points like reinstalling MS Office, I took the database off the network and tried to run from the C:/. When it first happened we received an error "Object invalid or no longer set.", that error is not showing up now. Dwylene Garcia Computer Applications Trainer Kent Hospital, Department of Education Email: garciad at kenthospital.org _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From Erwin.Craps at ithelps.be Mon Jan 26 15:22:07 2004 From: Erwin.Craps at ithelps.be (Erwin Craps - IT Helps) Date: Mon, 26 Jan 2004 22:22:07 +0100 Subject: [AccessD] Form doesn't work on new laptop Message-ID: <46B976F2B698FF46A4FE7636509B22DF03D16C@stekelbes.ithelps.local> I seen this to, but has nothing to do with a notebook. Is that maybe a Access runtime on this notebook? The problem I had was with combo/list boxes for which I change the rowsource from VBA. The thing is that the rowsource on the listbox is empty is design mode and I fill it from vba when opening the form. For some reason the Access runtime thinks there nothing to show and does not show when I VBA the rowsource after loading the form. Only solution was to put a SQL string also on the combo/list box rowsource control with the correct number of fields. For reasons of speed I filtered the SQL result so I'm sure no values are displayed when loading the form (textvalue = null) Erwin -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of DWUTKA at marlow.com Sent: Monday, January 26, 2004 10:06 PM To: accessd at databaseadvisors.com Subject: RE: [AccessD] Form doesn't work on new laptop This is WAY off the cuff, a complete WAG. Laptops, by their nature, are designed to have multiple monitors (the laptop screen, and then a possible external monitor). Sometimes the second monitor is just a mirror of the main monitor, but other times, it can be a 'second' monitor, effectively doubling the width of the desktop. I bring this up, because I have seen combo boxes do WIERD things when used on a multiple monitor system. Quite frankly, I've seen it mostly in Access 97, but wouldn't be surprised to see it in 2000. Drew -----Original Message----- From: Dwylene Garcia [mailto:garciad at kentri.org] Sent: Monday, January 26, 2004 2:45 PM To: accessD at databaseadvisors.com Subject: [AccessD] Form doesn't work on new laptop I have an odd problem that has managed to stump several IT people. We are on the verge of giving up but I thought I would make an attempt to ask this group if anyone has seen such a problem. I have a fairly complicated form (one-to-many-to-many relationship, Main form with two subform, one subform filters the other subform) and this form has worked for 2 years and still does work on every desktop in our office. However, one employee received a new laptop this week running Windows 2000, Office XP and Access 2000 (the same as all the desktops) and the database opens and it appears that the less complicated forms work fine but this one form which is the main form used will not populate the subforms correctly. It recognizes there are records but it won't show them in the combo box... I have found this http://support.microsoft.com/default.aspx?scid=kb;en-us;208866&Product=a cc20 00 in the knowledge base that seems to restate the problem exactly. However, I'm looking for a solution that does not involve altering my form since it does work on the desktop computers. Why will it work on a desktop and not a laptop???? I don't have time to alter the database to make it work on this one laptop when 7 other desktop computers run the database fine. I'm wondering if anyone else has ever experienced this and I'm hoping that it's something silly that I overlooked while troubleshooting. I think we have hit all the obvious troubleshooting points like reinstalling MS Office, I took the database off the network and tried to run from the C:/. When it first happened we received an error "Object invalid or no longer set.", that error is not showing up now. Dwylene Garcia Computer Applications Trainer Kent Hospital, Department of Education Email: garciad at kenthospital.org _______________________________________________ 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 From connie.kamrowski at agric.nsw.gov.au Mon Jan 26 17:25:43 2004 From: connie.kamrowski at agric.nsw.gov.au (connie.kamrowski at agric.nsw.gov.au) Date: Tue, 27 Jan 2004 10:25:43 +1100 Subject: [AccessD] Re: Access database deployment Message-ID: Hi, Just doing some analysis work for a new project here. Interested in how developers have previously deployed access databases through web deployment or Citrix metaframe. we are looking to move to a J2EE based development environment over the next 2 years and I am investigating the best methods for Access Database availability in the interim. Ideally I would like to hear your opinions on the security and ease of use of deployment options you have used. All opinions greatly appreciated Connie Kamrowski Analyst/Programmer Information Technology NSW Agriculture Orange Cross posted to OT in the interest of varied opinions. This message is intended for the addressee named and may contain confidential information. If you are not the intended recipient or received it in error, please delete the message and notify sender. Views expressed are those of the individual sender and are not necessarily the views of their organisation. From pedro at plex.nl Mon Jan 26 17:42:51 2004 From: pedro at plex.nl (Pedro Janssen) Date: Tue, 27 Jan 2004 00:42:51 +0100 Subject: [AccessD] Form doesn't work on new laptop References: Message-ID: <003b01c3e466$39e8efb0$fdc581d5@pedro> Hello Dwylene, i have seen this weird stuff to on a complicated form on a laptop. In this case the combobox will not show all the records that are present in the rowsource table (5000 records), only a few hundred. My solution is beginning typing a fake record (not fake in the recordsource table) like zzzzz in the combobox. Because its the last record, it then shows all the records. It isn't a elegant solution, but it works fine. Other solutions are welcome. Pedro Janssen ----- Original Message ----- From: "Dwylene Garcia" To: Sent: Monday, January 26, 2004 9:45 PM Subject: [AccessD] Form doesn't work on new laptop > I have an odd problem that has managed to stump several IT people. We > are on the verge of giving up but I thought I would make an attempt to > ask this group if anyone has seen such a problem. > > I have a fairly complicated form (one-to-many-to-many relationship, > Main form with two subform, one subform filters the other subform) and > this form has worked for 2 years and still does work on every desktop in > our office. However, one employee received a new laptop this week > running Windows 2000, Office XP and Access 2000 (the same as all the > desktops) and the database opens and it appears that the less > complicated forms work fine but this one form which is the main form > used will not populate the subforms correctly. It recognizes there are > records but it won't show them in the combo box... I have found this > http://support.microsoft.com/default.aspx?scid=kb;en-us;208866&Product=acc20 00 > in the knowledge base that seems to restate the problem exactly. > However, I'm looking for a solution that does not involve altering my > form since it does work on the desktop computers. Why will it work on > a desktop and not a laptop???? > > I don't have time to alter the database to make it work on this one > laptop when 7 other desktop computers run the database fine. I'm > wondering if anyone else has ever experienced this and I'm hoping that > it's something silly that I overlooked while troubleshooting. I think > we have hit all the obvious troubleshooting points like reinstalling MS > Office, I took the database off the network and tried to run from the > C:/. When it first happened we received an error "Object invalid or no > longer set.", that error is not showing up now. > > > > Dwylene Garcia > Computer Applications Trainer > Kent Hospital, Department of Education > Email: garciad at kenthospital.org > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com > From lists at theopg.com Mon Jan 26 18:01:59 2004 From: lists at theopg.com (MarkH) Date: Tue, 27 Jan 2004 00:01:59 -0000 Subject: [AccessD] Temp tables and access security In-Reply-To: Message-ID: <000001c3e468$c9895c20$b00d6bd5@netboxxp> Sorry Charlotte, should have said "Access BE and FE", temp tables are in the front-end. I can chamge the code to not use temp tables, but I'd rather leave it alone as it works fine (at the moment :@) Many thanks Mark -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Charlotte Foust Sent: 26 January 2004 19:45 To: Access Developers discussion and problem solving Subject: RE: [AccessD] Temp tables and access security Why would a user be creating temp tables in the BE? Normally temp tables would be created in the front end. Are you asking about Access security permissions or Windows permissions? In Windows, you need pretty much full permissions if you're going to be modifying the design of the BE. Charlotte Foust -----Original Message----- From: MarkH [mailto:lists at theopg.com] Sent: Monday, January 26, 2004 11:30 AM To: 'Access Developers discussion and problem solving' Subject: [AccessD] Temp tables and access security Hello All Using AXP on Win 2000 I have a secured database and was wondering what permissions I need to grant to allow the system to create temp tables (Access BE) when a user logs in. I'm missing something I reckon... Cheers Mark _______________________________________________ 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 From cfoust at infostatsystems.com Mon Jan 26 18:21:00 2004 From: cfoust at infostatsystems.com (Charlotte Foust) Date: Mon, 26 Jan 2004 16:21:00 -0800 Subject: [AccessD] Temp tables and access security Message-ID: So were you asking about Access security or Window security on the file? Charlotte Foust -----Original Message----- From: MarkH [mailto:lists at theopg.com] Sent: Monday, January 26, 2004 4:02 PM To: 'Access Developers discussion and problem solving' Subject: RE: [AccessD] Temp tables and access security Sorry Charlotte, should have said "Access BE and FE", temp tables are in the front-end. I can chamge the code to not use temp tables, but I'd rather leave it alone as it works fine (at the moment :@) Many thanks Mark -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Charlotte Foust Sent: 26 January 2004 19:45 To: Access Developers discussion and problem solving Subject: RE: [AccessD] Temp tables and access security Why would a user be creating temp tables in the BE? Normally temp tables would be created in the front end. Are you asking about Access security permissions or Windows permissions? In Windows, you need pretty much full permissions if you're going to be modifying the design of the BE. Charlotte Foust -----Original Message----- From: MarkH [mailto:lists at theopg.com] Sent: Monday, January 26, 2004 11:30 AM To: 'Access Developers discussion and problem solving' Subject: [AccessD] Temp tables and access security Hello All Using AXP on Win 2000 I have a secured database and was wondering what permissions I need to grant to allow the system to create temp tables (Access BE) when a user logs in. I'm missing something I reckon... Cheers Mark _______________________________________________ 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 _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From dwaters at usinternet.com Mon Jan 26 18:27:31 2004 From: dwaters at usinternet.com (Dan Waters) Date: Mon, 26 Jan 2004 18:27:31 -0600 Subject: [AccessD] Form doesn't work on new laptop In-Reply-To: <8182819.1075150656901.JavaMail.root@localhost.localdomain> Message-ID: <000001c3e46c$5ee67bb0$de1811d8@DanWaters> Dwylene, I received this same error on a single desktop PC running W2K and AXP, when all other machines with the same configuration worked fine. The solution was as follows: In the code module for the form comment out ALL the code - even the Option Explicit and Option Compare database. Then compile the database. Then save the form, exit access. Then reopen the database with a /decompile command. The error should not occur when the form is opened. Then uncomment all the code, compile again, and save the form. The form should now work as intended on this PC. To get to this I went through my usual 'narrowing down' to try to find the problem, and that was what worked. What I suspect happened is that this particular form had some corrupted hidden compiled code behind it which only caused a problem on a particular machine due to that machine's particular configuration. When I commented out the form's entire code module, decompiled, and recompiled, the database believed that this form then had no code at all, and erased the hidden corrupted compiled code. At least this was a relatively easy fix attempt - good luck! Dan Waters Quality Process Solutions PS - use the Comment and Uncomment buttons on the VBA Edit toolbar. -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Dwylene Garcia Sent: Monday, January 26, 2004 2:45 PM To: accessD at databaseadvisors.com Subject: [AccessD] Form doesn't work on new laptop I have an odd problem that has managed to stump several IT people. We are on the verge of giving up but I thought I would make an attempt to ask this group if anyone has seen such a problem. I have a fairly complicated form (one-to-many-to-many relationship, Main form with two subform, one subform filters the other subform) and this form has worked for 2 years and still does work on every desktop in our office. However, one employee received a new laptop this week running Windows 2000, Office XP and Access 2000 (the same as all the desktops) and the database opens and it appears that the less complicated forms work fine but this one form which is the main form used will not populate the subforms correctly. It recognizes there are records but it won't show them in the combo box... I have found this http://support.microsoft.com/default.aspx?scid=kb;en-us;208866&Product=acc20 00 in the knowledge base that seems to restate the problem exactly. However, I'm looking for a solution that does not involve altering my form since it does work on the desktop computers. Why will it work on a desktop and not a laptop???? I don't have time to alter the database to make it work on this one laptop when 7 other desktop computers run the database fine. I'm wondering if anyone else has ever experienced this and I'm hoping that it's something silly that I overlooked while troubleshooting. I think we have hit all the obvious troubleshooting points like reinstalling MS Office, I took the database off the network and tried to run from the C:/. When it first happened we received an error "Object invalid or no longer set.", that error is not showing up now. Dwylene Garcia Computer Applications Trainer Kent Hospital, Department of Education Email: garciad at kenthospital.org _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From lists at theopg.com Mon Jan 26 18:35:41 2004 From: lists at theopg.com (MarkH) Date: Tue, 27 Jan 2004 00:35:41 -0000 Subject: [AccessD] Temp tables and access security In-Reply-To: Message-ID: <000101c3e46d$7e46e750$b00d6bd5@netboxxp> Access... Mark -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Charlotte Foust Sent: 27 January 2004 00:21 To: Access Developers discussion and problem solving Subject: RE: [AccessD] Temp tables and access security So were you asking about Access security or Window security on the file? Charlotte Foust -----Original Message----- From: MarkH [mailto:lists at theopg.com] Sent: Monday, January 26, 2004 4:02 PM To: 'Access Developers discussion and problem solving' Subject: RE: [AccessD] Temp tables and access security Sorry Charlotte, should have said "Access BE and FE", temp tables are in the front-end. I can chamge the code to not use temp tables, but I'd rather leave it alone as it works fine (at the moment :@) Many thanks Mark -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Charlotte Foust Sent: 26 January 2004 19:45 To: Access Developers discussion and problem solving Subject: RE: [AccessD] Temp tables and access security Why would a user be creating temp tables in the BE? Normally temp tables would be created in the front end. Are you asking about Access security permissions or Windows permissions? In Windows, you need pretty much full permissions if you're going to be modifying the design of the BE. Charlotte Foust -----Original Message----- From: MarkH [mailto:lists at theopg.com] Sent: Monday, January 26, 2004 11:30 AM To: 'Access Developers discussion and problem solving' Subject: [AccessD] Temp tables and access security Hello All Using AXP on Win 2000 I have a secured database and was wondering what permissions I need to grant to allow the system to create temp tables (Access BE) when a user logs in. I'm missing something I reckon... Cheers Mark _______________________________________________ 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 _______________________________________________ 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 From ssharkins at bellsouth.net Mon Jan 26 18:56:43 2004 From: ssharkins at bellsouth.net (Susan Harkins) Date: Mon, 26 Jan 2004 19:56:43 -0500 Subject: [AccessD] record locking in a report Message-ID: <000601c3e470$70e60a20$210110ac@SUSANONE> Here's something I've never given any thought to -- report's have Record Locks property. Does this mean that given the current activity that a record might not make it to the report -- even though it satisfies all other criteria? I don't really get it, within the report context. Susan H. From cfoust at infostatsystems.com Mon Jan 26 19:05:12 2004 From: cfoust at infostatsystems.com (Charlotte Foust) Date: Mon, 26 Jan 2004 17:05:12 -0800 Subject: [AccessD] record locking in a report Message-ID: Here's what help says: Specifies whether records in the underlying table or query are locked while a report is previewed or printed. In other words, it determines whether users can modify those records while the report is being printed or previewed. That seems reasonable to me. Charlotte Foust -----Original Message----- From: Susan Harkins [mailto:ssharkins at bellsouth.net] Sent: Monday, January 26, 2004 4:57 PM To: AccessD at databaseadvisors.com Subject: [AccessD] record locking in a report Here's something I've never given any thought to -- report's have Record Locks property. Does this mean that given the current activity that a record might not make it to the report -- even though it satisfies all other criteria? I don't really get it, within the report context. Susan H. _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From cfoust at infostatsystems.com Mon Jan 26 19:10:58 2004 From: cfoust at infostatsystems.com (Charlotte Foust) Date: Mon, 26 Jan 2004 17:10:58 -0800 Subject: [AccessD] AXP prints half line at bottom of report Message-ID: We've run into an aggravating issue with one of our (admittedly) complicated custom reports, where there is a mixture of CanGrow = True and CanGrow = false, unbound and bound controls, subreports, etc. Some of the data will print at the very bottom of the print area, cut off most of the data in that line and just leave the tops and then print again in whole on the next page. This happens to textboxes, subreports, etc., but does not appear to happen to labels. Since we don't know ahead of time where anything will fall on a page, we've racked our brains to figure out a way to prevent this messy situation. It shows up in both preview and print of the report, which may run to one or more pages depending on the data that has been entered. We've played with top and bottom margins but all that does is move the problem around. Any ideas would be embraced gratefully. Charlotte Foust From ssharkins at bellsouth.net Mon Jan 26 20:10:48 2004 From: ssharkins at bellsouth.net (Susan Harkins) Date: Mon, 26 Jan 2004 21:10:48 -0500 Subject: [AccessD] record locking in a report References: Message-ID: <004c01c3e47b$7a7e8c50$210110ac@SUSANONE> I read that -- but it just didn't register -- thanks. Duh moment I guess. Susan H. > Here's what help says: > > Specifies whether records in the underlying table or query are locked > while a report is previewed or printed. > > In other words, it determines whether users can modify those records > while the report is being printed or previewed. That seems reasonable > to me. > > Charlotte Foust > > -----Original Message----- > From: Susan Harkins [mailto:ssharkins at bellsouth.net] > Sent: Monday, January 26, 2004 4:57 PM > To: AccessD at databaseadvisors.com > Subject: [AccessD] record locking in a report > > > Here's something I've never given any thought to -- report's have > Record Locks property. Does this mean that given the current activity > that a record might not make it to the report -- even though it > satisfies all other criteria? I don't really get it, within the report > context. > > Susan H. > > _______________________________________________ > 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 > From gustav at cactus.dk Tue Jan 27 02:14:35 2004 From: gustav at cactus.dk (Gustav Brock) Date: Tue, 27 Jan 2004 09:14:35 +0100 Subject: [AccessD] Make-table query points to c:\documents and settings?! In-Reply-To: <20040126184438.97312.qmail@web60205.mail.yahoo.com> References: <20040126184438.97312.qmail@web60205.mail.yahoo.com> Message-ID: <88973850.20040127091435@cactus.dk> Hi Sad Then I will suggest you rewrite the SQL to include the full path. /gustav > I build it in SQL view. There's no path in there > either... :-( >> Switch from design view of the query to SQL view ... >> >> > No, where can I do that? >> > I looked at the properties but I just saw in wich db >> > the tables will be created. Not the path! >> >> >> So did you specify the full path of the tables in >> >> those make-table >> >> queries? From gustav at cactus.dk Tue Jan 27 02:40:28 2004 From: gustav at cactus.dk (Gustav Brock) Date: Tue, 27 Jan 2004 09:40:28 +0100 Subject: [AccessD] Make-table query points to c:\documents and settings?! In-Reply-To: <88973850.20040127091435@cactus.dk> References: <20040126184438.97312.qmail@web60205.mail.yahoo.com> <88973850.20040127091435@cactus.dk> Message-ID: <602526663.20040127094028@cactus.dk> Hi Sad If this is inconvenient, you may try to run the command ChDir before running the make table queries because your problem is that they try to write to a file in the current directory of the drive and the current directory may be whatever. /gustav > Hi Sad > Then I will suggest you rewrite the SQL to include the full path. > /gustav >> I build it in SQL view. There's no path in there >> either... :-( >>> Switch from design view of the query to SQL view ... >>> >>> > No, where can I do that? >>> > I looked at the properties but I just saw in wich db >>> > the tables will be created. Not the path! >>> >>> >> So did you specify the full path of the tables in >>> >> those make-table >>> >> queries? From accessd666 at yahoo.com Tue Jan 27 03:42:45 2004 From: accessd666 at yahoo.com (Sad Der) Date: Tue, 27 Jan 2004 01:42:45 -0800 (PST) Subject: [AccessD] Make-table query points to c:\documents and settings?! In-Reply-To: <602526663.20040127094028@cactus.dk> Message-ID: <20040127094245.24629.qmail@web60206.mail.yahoo.com> Gustav, a big thank you for all the support. i have rewriten the whole lot! The creation of the database and I'm using code to create the tables in that newly created database instead off calling Make-Table queries. I'm now working on a (semi-)automatic relink thingy. thnx again. Sander --- Gustav Brock wrote: > Hi Sad > > If this is inconvenient, you may try to run the > command > > ChDir > > before running the make table queries because your > problem is that > they try to write to a file in the current directory > of the drive and > the current directory may be whatever. > > /gustav > > > > Hi Sad > > > Then I will suggest you rewrite the SQL to include > the full path. > > > /gustav > > > >> I build it in SQL view. There's no path in there > >> either... :-( > > >>> Switch from design view of the query to SQL view > ... > >>> > >>> > No, where can I do that? > >>> > I looked at the properties but I just saw in > wich db > >>> > the tables will be created. Not the path! > >>> > >>> >> So did you specify the full path of the > tables in > >>> >> those make-table > >>> >> queries? > > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com __________________________________ Do you Yahoo!? Yahoo! SiteBuilder - Free web site building tool. Try it! http://webhosting.yahoo.com/ps/sb/ From viner at eunet.yu Tue Jan 27 05:51:44 2004 From: viner at eunet.yu (Ervin Brindza) Date: Tue, 27 Jan 2004 12:51:44 +0100 Subject: [AccessD] OT: Export Messages from Outlook 5.5 Message-ID: <001201c3e4cb$f8d04a80$0100a8c0@razvoj> Hi fellow listers, sorry for the OT post. I'm using Outlook Express ver. 5.50.4133.2400 at my job(have no idea which application upgraded it from ver. 5.0) and want to copy a folder with messages(.dbx file) to my home computer, where either the ver 5.0 and 6.0 can't manage(can't see) these .dbx files from OE 5.5. I suppose that the only way is to upgrade my "strange" OE 5.5 to 6.0? Will the messages remain the same? I don't want to lose my 4-5 years mail messages... Any suggestions? TIA, Ervin From Subscriptions at servicexp.com Tue Jan 27 06:28:55 2004 From: Subscriptions at servicexp.com (Robert Gracie) Date: Tue, 27 Jan 2004 07:28:55 -0500 Subject: [AccessD] Interface Callback Class Questions. In-Reply-To: <001201c3e4cb$f8d04a80$0100a8c0@razvoj> Message-ID: <000201c3e4d1$2188ff30$6401a8c0@RG> Hello All AK2 mde referencing A2K mdb Objective: To open a report in a (host is an mde referenced to the .mdb) referenced .mdb and have all the events for a given report fire inside the host mde. I can do this for a report located inside the mde, however I can seem to figure out how to get the report inside the .mdb to see the class in the mde, as circular references are not permitted in access. Question: I was thinking that an Interface callback would be an option. So is it possible to use an interface callback across a referenced db to accomplish my objective? Any examples...? Thanks Robert Gracie From john at winhaven.net Tue Jan 27 08:10:41 2004 From: john at winhaven.net (John Bartow) Date: Tue, 27 Jan 2004 08:10:41 -0600 Subject: [AccessD] WinHaven News Flash - MyDoom/Novarg internet worm Message-ID: I don't usually send these things to lists but... I sent this to my clients last night and I am getting blasted by this thing already this morning! Its going to be a slow day for us dial-uppers :o) A Dozen and counting! Hi: There's a nasty new worm going around the internet. There are many reports of this worm in the wild and I've already received a number of emails with this worm attached so be careful! Official name(s): W32/MyDoom-A, Mimail.R, Novarg.A, Shimg, W32.Novarg.A at mm, W32/Mydoom at MM Type: Win32 worm Detection: The following anti-virus products are presently capable of detecting this worm with the latest update. Sophos, Norton, Trend Micro, AVG, F-Secure, McAfee and Panda. Other brands may be capable, I have not checked. Description This is a worm which travels by email and the Kazaa p2p network. The worm harvests email addresses from your hard disk and uses randomly-chosen addresses for both the "to" and "from" fields. This means that the "from" address is spoofed and does not tell you where the mail really came from. The worm arrives in emails with the following characteristics: Subject lines include: error hello hi mail delivery system mail transaction failed server report status test [random collection of characters] Attachment names include: body data doc document file message readme test [random collection of characters] Attachment extensions: bat cmd exe pif scr zip This worm attaches itself to emails in either EXE (Windows program) or ZIP (Zip archive) format. It also drops itself to your System folder under the name taskmon.exe and also drops a file named shimgapi.dll, which is a backdoor program loaded by the worm. The backdoor allows outsiders to connect to TCP port 3127 on your computer. This worm adds the value: Taskmon = taskmon.exe to the following registry key: HKLM\Software\Microsoft\Windows\CurrentVersion\Run This means that W32/MyDoom-A loads every time you logon to your computer. Update those AV prgrams! Have a good week! John R Bartow WinHaven Computer Services PO Box 130 Winneconne, WI 54986-0130 Office: 920-582-7574 john at winhaven.net This message is a free service of WinHaven Consulting LLC. If you don't want to receive these messages please click here: mailto:techasst at winhaven.net?Subject=Please%20remove%20me%20from%20the%20Win Haven%20News%20Flash%20email%20list From john at winhaven.net Tue Jan 27 08:20:44 2004 From: john at winhaven.net (John Bartow) Date: Tue, 27 Jan 2004 08:20:44 -0600 Subject: [AccessD] WinHaven News Flash - MyDoom/Novarg internet worm In-Reply-To: Message-ID: 3 dozen and counting... :o( From adtp at touchtelindia.net Tue Jan 27 11:09:37 2004 From: adtp at touchtelindia.net (A.D.Tejpal) Date: Tue, 27 Jan 2004 22:39:37 +0530 Subject: [AccessD] AXP prints half line at bottom of report References: Message-ID: <009c01c3e4f8$6da3cea0$1aedf73d@winxp> Charlotte, If convenient, zipped copy of pruned down version of your file, containing the problem report along with its record source may kindly be sent to me. Regards, A.D.Tejpal -------------- ----- Original Message ----- From: Charlotte Foust To: AccessD at databaseadvisors.com Sent: Tuesday, January 27, 2004 06:40 Subject: [AccessD] AXP prints half line at bottom of report We've run into an aggravating issue with one of our (admittedly) complicated custom reports, where there is a mixture of CanGrow = True and CanGrow = false, unbound and bound controls, subreports, etc. Some of the data will print at the very bottom of the print area, cut off most of the data in that line and just leave the tops and then print again in whole on the next page. This happens to textboxes, subreports, etc., but does not appear to happen to labels. Since we don't know ahead of time where anything will fall on a page, we've racked our brains to figure out a way to prevent this messy situation. It shows up in both preview and print of the report, which may run to one or more pages depending on the data that has been entered. We've played with top and bottom margins but all that does is move the problem around. Any ideas would be embraced gratefully. Charlotte Foust From Mike.W.Gowey at doc.state.or.us Tue Jan 27 13:12:14 2004 From: Mike.W.Gowey at doc.state.or.us (Gowey Mike W) Date: Tue, 27 Jan 2004 12:12:14 -0700 Subject: [AccessD] Copying a file Message-ID: <05EBB8A3BEB95B4F8216BE4EF486077801D9FF3C@srciml1.ds.doc.state.or.us> Hi Everyone, Could anyone tell me how you would copy a file from one name to another? I currently have in my application to rename a file by using: Name strFileName As strNewName What I would like to be able to do is copy it to another file name rather than renaming it. Thanks in advance for your help. Mike Gowey, MCSA, A+ Team Leader - SRCI Information Systems & Services Division From rl_stewart at highstream.net Tue Jan 27 13:17:39 2004 From: rl_stewart at highstream.net (Robert L. Stewart) Date: Tue, 27 Jan 2004 13:17:39 -0600 Subject: [AccessD] Re: Make-table query points to c:\documents and settings?! In-Reply-To: <200401271803.i0RI3Im20809@databaseadvisors.com> Message-ID: <5.1.0.14.2.20040127131409.029151a0@pop3.highstream.net> Sander, What you have to do is open the other database in code. Then, you can execute the SQL statement to build the tables you are wanting. ADO would work fine for this. The path would be required to open the DB, but not to create the tables. All of this has to be done in code and it has to be done in pure SQL as 2 different SQL statements. First to create the table, second to append the data. So you actually have to open 2 database objects, current and remote. If you need help with the code, let me know and I will post it to the list. Robert At 12:03 PM 1/27/2004 -0600, you wrote: >Date: Mon, 26 Jan 2004 10:44:38 -0800 (PST) >From: Sad Der >Subject: Re: [AccessD] Make-table query points to c:\documents and > settings?! >To: Access Developers discussion and problem solving > >Message-ID: <20040126184438.97312.qmail at web60205.mail.yahoo.com> >Content-Type: text/plain; charset=us-ascii > >I build it in SQL view. There's no path in there >either... :-( > >Sander From rl_stewart at highstream.net Tue Jan 27 13:20:29 2004 From: rl_stewart at highstream.net (Robert L. Stewart) Date: Tue, 27 Jan 2004 13:20:29 -0600 Subject: [AccessD] Re: ODBC Connection Information Not Showing in ODBC Data Sources In-Reply-To: <200401271803.i0RI3Im20809@databaseadvisors.com> Message-ID: <5.1.0.14.2.20040127131943.028dc508@pop3.highstream.net> Jeff, It has to be installed as the administrator of the machine. Robert At 12:03 PM 1/27/2004 -0600, you wrote: >Date: Mon, 26 Jan 2004 14:39:30 -0600 >From: jeffrey.demulling at usbank.com >Subject: [AccessD] ODBC Connection Information Not Showing in ODBC > Data Sources >To: "Access Developers discussion and problem solving" > >Message-ID: > > > >Content-Type: text/plain; charset=us-ascii > > >Operating System Windows NT 4.0 > >A LAN Admin has installed an Oracle ODBC Driver for RDB and the >installation says the driver has installed successfully. Looking in the >registry it show the driver is installed. However when the user tries to >set up an actual connection the driver is not listed as being there. This >is also happening with another user for Gupta's SQLBase Driver pack. >Anyone know of any solutions to make the driver appear in the as being >installed? > >TIA. > >-Jeff From rl_stewart at highstream.net Tue Jan 27 13:28:00 2004 From: rl_stewart at highstream.net (Robert L. Stewart) Date: Tue, 27 Jan 2004 13:28:00 -0600 Subject: [AccessD] Re: Temp tables and access security In-Reply-To: <200401271803.i0RI3Im20809@databaseadvisors.com> Message-ID: <5.1.0.14.2.20040127132452.0476ee88@pop3.highstream.net> Mark, I would suggest using static tables in the front-end. You will need to give the users all permissions except permission to delete and create tables. You can do this if the structure of the temp tables do not change each time they are run. You just truncate (delete all rows) in them and then reload the data. Since I refuse to deal with Access security and I always have a copy of the program MDE on each client, this is the way I handle it. I also have them refresh the local copy at least once a week. Robert At 12:03 PM 1/27/2004 -0600, you wrote: >Date: Tue, 27 Jan 2004 00:01:59 -0000 >From: "MarkH" >Subject: RE: [AccessD] Temp tables and access security >To: "'Access Developers discussion and problem solving'" > >Message-ID: <000001c3e468$c9895c20$b00d6bd5 at netboxxp> >Content-Type: text/plain; charset="us-ascii" > >Sorry Charlotte, should have said "Access BE and FE", temp tables are in >the front-end. I can chamge the code to not use temp tables, but I'd >rather leave it alone as it works fine (at the moment :@) > >Many thanks > >Mark >-----Original Message----- >From: accessd-bounces at databaseadvisors.com >[mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Charlotte >Foust >Sent: 26 January 2004 19:45 >To: Access Developers discussion and problem solving >Subject: RE: [AccessD] Temp tables and access security > > >Why would a user be creating temp tables in the BE? Normally temp >tables would be created in the front end. Are you asking about Access >security permissions or Windows permissions? In Windows, you need >pretty much full permissions if you're going to be modifying the design >of the BE. > >Charlotte Foust > >-----Original Message----- >From: MarkH [mailto:lists at theopg.com] >Sent: Monday, January 26, 2004 11:30 AM >To: 'Access Developers discussion and problem solving' >Subject: [AccessD] Temp tables and access security > > >Hello All > >Using AXP on Win 2000 > >I have a secured database and was wondering what permissions I need to >grant to allow the system to create temp tables (Access BE) when a user >logs in. I'm missing something I reckon... > >Cheers > >Mark From gustav at cactus.dk Tue Jan 27 13:34:49 2004 From: gustav at cactus.dk (Gustav Brock) Date: Tue, 27 Jan 2004 20:34:49 +0100 Subject: [AccessD] Copying a file In-Reply-To: <05EBB8A3BEB95B4F8216BE4EF486077801D9FF3C@srciml1.ds.doc.state.or.us> References: <05EBB8A3BEB95B4F8216BE4EF486077801D9FF3C@srciml1.ds.doc.state.or.us> Message-ID: <19941788038.20040127203449@cactus.dk> Hi Gowey How about FileCopy source, destination /gustav > Could anyone tell me how you would copy a file from one name to another? > I currently have in my application to rename a file by using: > Name strFileName As strNewName > What I would like to be able to do is copy it to another file name > rather than renaming it. From DWUTKA at marlow.com Tue Jan 27 13:49:05 2004 From: DWUTKA at marlow.com (DWUTKA at marlow.com) Date: Tue, 27 Jan 2004 13:49:05 -0600 Subject: [AccessD] Copying a file Message-ID: <2F8793082E00D4119A1700B0D0216BF8022277C1@main2.marlow.com> Private Declare Function CopyFile Lib "kernel32" Alias "CopyFileA" (ByVal lpExistingFileName As String, ByVal lpNewFileName As String, ByVal bFailIfExists As Long) As Long CopyFile "C:\MyFile.txt" & chr(0), "C:\NewName.txt" & chr(0),False Drew -----Original Message----- From: Gowey Mike W [mailto:Mike.W.Gowey at doc.state.or.us] Sent: Tuesday, January 27, 2004 1:12 PM To: Access Developers discussion and problem solving Subject: [AccessD] Copying a file Hi Everyone, Could anyone tell me how you would copy a file from one name to another? I currently have in my application to rename a file by using: Name strFileName As strNewName What I would like to be able to do is copy it to another file name rather than renaming it. Thanks in advance for your help. Mike Gowey, MCSA, A+ Team Leader - SRCI Information Systems & Services Division _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From JColby at dispec.com Tue Jan 27 14:05:07 2004 From: JColby at dispec.com (Colby, John) Date: Tue, 27 Jan 2004 15:05:07 -0500 Subject: [AccessD] Vonage Message-ID: <05C61C52D7CAD211A7830008C7DF6F1079BD0B@DISABILITYINS01> I received the phonemodem last night. Plugged it in (behind my router for those interested), waited 5 minutes, then picked up the receiver and made a call. Extremely easy to set up. The sound so far is crystal clear, no clicks / pops or echoes. I have a brand new ATT 2ghz cordless phone system which I plugged in to it. I can't tell the difference between this and the landline. I haven't done any heavy duty uploads / downloads though I will be doing some testing in the next few days. I went with the $15 / month package for 500 total minutes - local and long distance, with anything after that billed at $.039 / minute. If my useage averages more than 500 minutes I'll move up to the $25 package with unlimited local and 500 long distance minutes. Given my useage patterns I may very well end up with a $15 / month phone including long distance. So far so good. John W. Colby The database guy -----Original Message----- From: John W. Colby [mailto:jwcolby at colbyconsulting.com] Sent: Friday, January 23, 2004 5:19 PM To: Access Developers discussion and problem solving Subject: RE: [AccessD] Vonage My blazing fast internet recently went up 50% to $45 / month. The cable company wants $35 / month for unlimited phone / long distance so I could just get it through them, but I thought I'd give Vonage a try. Vonage has $15, $25 and $35 packages which allows me to try it for cheap and see if it really works before turning off the land line. John W. Colby www.ColbyConsulting.com -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Francisco H Tapia Sent: Friday, January 23, 2004 2:27 PM To: Access Developers discussion and problem solving Subject: Re: [AccessD] Vonage Price sounds good, but if you are using DSL it's not really like you're saving much.. :( Verizon = 29.00 DSL = 35.00 --------------- 64.00 plus the vonage price? :S, I can't get rid of verizon as they are my telco. the only thing that would make sense is to switch to cable then it's just the price of the cable bill plus vonage. -- -Francisco augusta wrote: >I signed up a few weeks ago. It may or may not have wrecked just a bit >of havoc on my (fairly complicated) network. But overall I love it! The >only bummer is that you always have to dial the 1+area code . . . (But I >hear some in NJ are doing that already). Great price! > > > >>-----Original Message----- >>From: accessd-bounces at databaseadvisors.com [mailto:accessd- >>bounces at databaseadvisors.com] On Behalf Of John W. Colby >>Sent: Thursday, January 22, 2004 9:53 PM >>To: AccessD >>Subject: [AccessD] Vonage >> >>Is anyone using this? Comments? >> >>http://www.vonage.com >> >>John W. Colby >>www.ColbyConsulting.com >> >> _______________________________________________ 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 From jeffrey.demulling at usbank.com Tue Jan 27 13:47:42 2004 From: jeffrey.demulling at usbank.com (jeffrey.demulling at usbank.com) Date: Tue, 27 Jan 2004 13:47:42 -0600 Subject: [AccessD] Copying a file Message-ID: You could use the CopyFile API. Private Declare Function CopyFile Lib "kernel32" Alias "CopyFileA" (ByVal lpExistingFileName As String, ByVal lpNewFileName As String, ByVal bFailIfExists As Long) As Long "Gowey Mike W" Sent by: cc: accessd-bounces at databasead Subject: [AccessD] Copying a file visors.com 01/27/2004 01:12 PM Please respond to "Access Developers discussion and problem solving" Hi Everyone, Could anyone tell me how you would copy a file from one name to another? I currently have in my application to rename a file by using: Name strFileName As strNewName What I would like to be able to do is copy it to another file name rather than renaming it. Thanks in advance for your help. Mike Gowey, MCSA, A+ Team Leader - SRCI Information Systems & Services Division _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From lists at theopg.com Tue Jan 27 14:14:53 2004 From: lists at theopg.com (MarkH) Date: Tue, 27 Jan 2004 20:14:53 -0000 Subject: [AccessD] Re: Temp tables and access security In-Reply-To: <5.1.0.14.2.20040127132452.0476ee88@pop3.highstream.net> Message-ID: <000501c3e512$40f9ca70$b00d6bd5@netboxxp> Thanks Robert Mark -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Robert L. Stewart Sent: 27 January 2004 19:28 To: accessd at databaseadvisors.com Subject: [AccessD] Re: Temp tables and access security Mark, I would suggest using static tables in the front-end. You will need to give the users all permissions except permission to delete and create tables. You can do this if the structure of the temp tables do not change each time they are run. You just truncate (delete all rows) in them and then reload the data. Since I refuse to deal with Access security and I always have a copy of the program MDE on each client, this is the way I handle it. I also have them refresh the local copy at least once a week. Robert At 12:03 PM 1/27/2004 -0600, you wrote: >Date: Tue, 27 Jan 2004 00:01:59 -0000 >From: "MarkH" >Subject: RE: [AccessD] Temp tables and access security >To: "'Access Developers discussion and problem solving'" > >Message-ID: <000001c3e468$c9895c20$b00d6bd5 at netboxxp> >Content-Type: text/plain; charset="us-ascii" > >Sorry Charlotte, should have said "Access BE and FE", temp tables are >in the front-end. I can chamge the code to not use temp tables, but I'd >rather leave it alone as it works fine (at the moment :@) > >Many thanks > >Mark >-----Original Message----- >From: accessd-bounces at databaseadvisors.com >[mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Charlotte >Foust >Sent: 26 January 2004 19:45 >To: Access Developers discussion and problem solving >Subject: RE: [AccessD] Temp tables and access security > > >Why would a user be creating temp tables in the BE? Normally temp >tables would be created in the front end. Are you asking about Access >security permissions or Windows permissions? In Windows, you need >pretty much full permissions if you're going to be modifying the design >of the BE. > >Charlotte Foust > >-----Original Message----- >From: MarkH [mailto:lists at theopg.com] >Sent: Monday, January 26, 2004 11:30 AM >To: 'Access Developers discussion and problem solving' >Subject: [AccessD] Temp tables and access security > > >Hello All > >Using AXP on Win 2000 > >I have a secured database and was wondering what permissions I need to >grant to allow the system to create temp tables (Access BE) when a user >logs in. I'm missing something I reckon... > >Cheers > >Mark _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From my.lists at verizon.net Tue Jan 27 14:20:09 2004 From: my.lists at verizon.net (Francisco H Tapia) Date: Tue, 27 Jan 2004 12:20:09 -0800 Subject: [AccessD] Vonage In-Reply-To: <05C61C52D7CAD211A7830008C7DF6F1079BD0B@DISABILITYINS01> References: <05C61C52D7CAD211A7830008C7DF6F1079BD0B@DISABILITYINS01> Message-ID: <4016C7F9.7030908@verizon.net> This will be easy to test, just visit Microsoft.com and download one of their heafty SP's for Windows 2000 or XP ;) then try and make a call.. :) -- -Francisco Colby, John wrote: >I received the phonemodem last night. Plugged it in (behind my router for >those interested), waited 5 minutes, then picked up the receiver and made a >call. Extremely easy to set up. > >The sound so far is crystal clear, no clicks / pops or echoes. I have a >brand new ATT 2ghz cordless phone system which I plugged in to it. I can't >tell the difference between this and the landline. > >I haven't done any heavy duty uploads / downloads though I will be doing >some testing in the next few days. > >I went with the $15 / month package for 500 total minutes - local and long >distance, with anything after that billed at $.039 / minute. If my useage >averages more than 500 minutes I'll move up to the $25 package with >unlimited local and 500 long distance minutes. Given my useage patterns I >may very well end up with a $15 / month phone including long distance. > >So far so good. > >John W. Colby >The database guy > > >-----Original Message----- >From: John W. Colby [mailto:jwcolby at colbyconsulting.com] >Sent: Friday, January 23, 2004 5:19 PM >To: Access Developers discussion and problem solving >Subject: RE: [AccessD] Vonage > > >My blazing fast internet recently went up 50% to $45 / month. The cable >company wants $35 / month for unlimited phone / long distance so I could >just get it through them, but I thought I'd give Vonage a try. Vonage has >$15, $25 and $35 packages which allows me to try it for cheap and see if it >really works before turning off the land line. > >John W. Colby >www.ColbyConsulting.com > >-----Original Message----- >From: accessd-bounces at databaseadvisors.com >[mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Francisco H >Tapia >Sent: Friday, January 23, 2004 2:27 PM >To: Access Developers discussion and problem solving >Subject: Re: [AccessD] Vonage > > >Price sounds good, but if you are using DSL it's not really like you're >saving much.. :( > >Verizon = 29.00 >DSL = 35.00 >--------------- > 64.00 > >plus the vonage price? :S, I can't get rid of verizon as they are my >telco. the only thing that would make sense is to switch to cable then >it's just the price of the cable bill plus vonage. > > >-- >-Francisco > > >augusta wrote: > > > >>I signed up a few weeks ago. It may or may not have wrecked just a bit >>of havoc on my (fairly complicated) network. But overall I love it! The >>only bummer is that you always have to dial the 1+area code . . . (But I >>hear some in NJ are doing that already). Great price! >> >> >> >> >> >>>-----Original Message----- >>>From: accessd-bounces at databaseadvisors.com [mailto:accessd- >>>bounces at databaseadvisors.com] On Behalf Of John W. Colby >>>Sent: Thursday, January 22, 2004 9:53 PM >>>To: AccessD >>>Subject: [AccessD] Vonage >>> >>>Is anyone using this? Comments? >>> >>>http://www.vonage.com >>> >>>John W. Colby >>>www.ColbyConsulting.com >>> >>> >>> >>> > > > > From Lambert.Heenan at AIG.com Tue Jan 27 14:40:42 2004 From: Lambert.Heenan at AIG.com (Heenan, Lambert) Date: Tue, 27 Jan 2004 15:40:42 -0500 Subject: [AccessD] Copying a file Message-ID: <8B98F8EA48F8BA47A2F24E0D0AF40CF407AD7D65@xlivmbx12.aig.com> The disadvantage of using the VBA FileCopy routine is that if the source file is in use the copy will fail. However the API CopyFile will copy the source even if some application has it open. Then again, some people might want the copy blocked in those circs. Lambert > -----Original Message----- > From: Gustav Brock [SMTP:gustav at cactus.dk] > Sent: Tuesday, January 27, 2004 2:35 PM > To: Access Developers discussion and problem solving > Subject: Re: [AccessD] Copying a file > > Hi Gowey > > How about > > FileCopy source, destination > > /gustav > > > Could anyone tell me how you would copy a file from one name to another? > > I currently have in my application to rename a file by using: > > > Name strFileName As strNewName > > > What I would like to be able to do is copy it to another file name > > rather than renaming it. > > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com From clh at christopherhawkins.com Tue Jan 27 16:22:39 2004 From: clh at christopherhawkins.com (Christopher Hawkins) Date: Tue, 27 Jan 2004 15:22:39 -0700 Subject: [AccessD] Vonage Message-ID: <285320-220041227222239678@christopherhawkins.com> $15/month sounds great, but what about setup fees or equipment expenses? What's the "out the door" price look like? -Christopher- ---- Original Message ---- From: JColby at dispec.com To: accessd at databaseadvisors.com, Subject: RE: [AccessD] Vonage Date: Tue, 27 Jan 2004 15:05:07 -0500 >I received the phonemodem last night. Plugged it in (behind my >router for >those interested), waited 5 minutes, then picked up the receiver and >made a >call. Extremely easy to set up. > >The sound so far is crystal clear, no clicks / pops or echoes. I >have a >brand new ATT 2ghz cordless phone system which I plugged in to it. >I can't >tell the difference between this and the landline. > >I haven't done any heavy duty uploads / downloads though I will be >doing >some testing in the next few days. > >I went with the $15 / month package for 500 total minutes - local >and long >distance, with anything after that billed at $.039 / minute. If my >useage >averages more than 500 minutes I'll move up to the $25 package with >unlimited local and 500 long distance minutes. Given my useage >patterns I >may very well end up with a $15 / month phone including long >distance. > >So far so good. > >John W. Colby >The database guy > > >-----Original Message----- >From: John W. Colby [mailto:jwcolby at colbyconsulting.com] >Sent: Friday, January 23, 2004 5:19 PM >To: Access Developers discussion and problem solving >Subject: RE: [AccessD] Vonage > > >My blazing fast internet recently went up 50% to $45 / month. The >cable >company wants $35 / month for unlimited phone / long distance so I >could >just get it through them, but I thought I'd give Vonage a try. >Vonage has >$15, $25 and $35 packages which allows me to try it for cheap and >see if it >really works before turning off the land line. > >John W. Colby >www.ColbyConsulting.com > >-----Original Message----- >From: accessd-bounces at databaseadvisors.com >[mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Francisco H >Tapia >Sent: Friday, January 23, 2004 2:27 PM >To: Access Developers discussion and problem solving >Subject: Re: [AccessD] Vonage > > >Price sounds good, but if you are using DSL it's not really like >you're >saving much.. :( > >Verizon = 29.00 >DSL = 35.00 >--------------- > 64.00 > >plus the vonage price? :S, I can't get rid of verizon as they are my >telco. the only thing that would make sense is to switch to cable >then >it's just the price of the cable bill plus vonage. > > >-- >-Francisco > > >augusta wrote: > >>I signed up a few weeks ago. It may or may not have wrecked just a >bit >>of havoc on my (fairly complicated) network. But overall I love it! > The >>only bummer is that you always have to dial the 1+area code . . . >(But I >>hear some in NJ are doing that already). Great price! >> >> >> >>>-----Original Message----- >>>From: accessd-bounces at databaseadvisors.com [mailto:accessd- >>>bounces at databaseadvisors.com] On Behalf Of John W. Colby >>>Sent: Thursday, January 22, 2004 9:53 PM >>>To: AccessD >>>Subject: [AccessD] Vonage >>> >>>Is anyone using this? Comments? >>> >>>http://www.vonage.com >>> >>>John W. Colby >>>www.ColbyConsulting.com >>> >>> > >_______________________________________________ >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 >_______________________________________________ >AccessD mailing list >AccessD at databaseadvisors.com >http://databaseadvisors.com/mailman/listinfo/accessd >Website: http://www.databaseadvisors.com > > From jwcolby at colbyconsulting.com Tue Jan 27 17:09:49 2004 From: jwcolby at colbyconsulting.com (John W. Colby) Date: Tue, 27 Jan 2004 18:09:49 -0500 Subject: [AccessD] Vonage In-Reply-To: <285320-220041227222239678@christopherhawkins.com> Message-ID: ******************************************************************* Item Quantity Unit Subtotal ******************************************************************* Motorola Device 1 $0.00 $0.00 Area Code: 315 - Syracuse 1 $0.00 $0.00 Activation Fee 1 $29.99 $29.99 *Residential Basic 500 1 $14.99 $14.99 ----------------------------------- State Sales Tax: $0.00 Federal Excise Tax: $1.35 Regulatory Recovery Fee:$1.50 Shipping: $9.95 Total: $57.78 * Monthly Recurring Charge. ******************************************************************* This does not include a charge of approximately $30 which you will be charged for if you do not return the modem at the end of service. Now understand that the telephone company charged me a $60 activation fee when I moved from one location to another location down the road 1/2 mile. All just to change my billing from one jack to another in a switchboard. Hmmm... In addition, ATM the Vonage $14.99 is a flat monthly fee, no taxes or other regulatory charges added. My land line STARTS at 11.53 for flat residence line, plus 5.78 federal subscriber line charge, plus 1.43 Connecticut sales tax, plus .73 federal tax plus .20 E911 surcharge, plus .05 Connecticut Service Fund, plus .39 number portability charge, plus .56 Universal Service fund (local), plus .14 Universal Service Fund (Long Distance). Talk about nickel and dimeing you to death! I NEVER get out with under $25 on a "11.50" phone line, and with all the "short" long distance, I rarely get out for under ~$35 WITHOUT long distance, which is $.10/minute. For a couple of years I have used a prepaid calling card which I programmed into my phone to get my long distance for $.039 per minute (slowly inching up, now $.045). Of course I also have to pay for my blazing fast internet connection, which is a ridiculous $45 / month. Makes the $15 ($25/$35) phone bill seem rather inconsequential. But I could never go back to dialup so since I have this blazing fast internet, I might as well piggyback my phone off of it. I am pleased to say it is working great so far. John W. Colby www.ColbyConsulting.com -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Christopher Hawkins Sent: Tuesday, January 27, 2004 5:23 PM To: accessd at databaseadvisors.com Subject: RE: [AccessD] Vonage $15/month sounds great, but what about setup fees or equipment expenses? What's the "out the door" price look like? -Christopher- ---- Original Message ---- From: JColby at dispec.com To: accessd at databaseadvisors.com, Subject: RE: [AccessD] Vonage Date: Tue, 27 Jan 2004 15:05:07 -0500 >I received the phonemodem last night. Plugged it in (behind my >router for >those interested), waited 5 minutes, then picked up the receiver and >made a >call. Extremely easy to set up. > >The sound so far is crystal clear, no clicks / pops or echoes. I >have a >brand new ATT 2ghz cordless phone system which I plugged in to it. >I can't >tell the difference between this and the landline. > >I haven't done any heavy duty uploads / downloads though I will be >doing >some testing in the next few days. > >I went with the $15 / month package for 500 total minutes - local >and long >distance, with anything after that billed at $.039 / minute. If my >useage >averages more than 500 minutes I'll move up to the $25 package with >unlimited local and 500 long distance minutes. Given my useage >patterns I >may very well end up with a $15 / month phone including long >distance. > >So far so good. > >John W. Colby >The database guy From Helmut.E.Kotsch at t-online.de Tue Jan 27 17:11:13 2004 From: Helmut.E.Kotsch at t-online.de (Helmut Kotsch) Date: Wed, 28 Jan 2004 00:11:13 +0100 Subject: [AccessD] Concatenated stLinkCritria produces Type mismatch error. Message-ID: Hi, I am trying to open a form where 2 conditions have to be met. When only one conditon (as shown in code below as sample#1 and sample#2) is set than it works ok. Sample#1 ==> OK Dim stDocName As String Dim stLinkCriteria As String stDocName = "VERDI-Kunden" stLinkCriteria = "[KundenName]=" & "'" & Me![KundenName] & "'" DoCmd.OpenForm stDocName, , , stLinkCriteria Sample#2 ==> OK Dim stDocName As String Dim stLinkCriteria As String stDocName = "VERDI-Kunden" stLinkCriteria = "[VerbandNr]=" & Me![VerbandNr] DoCmd.OpenForm stDocName, , , stLinkCriteria However when concatenating both conditions as shown in the following code I get a "Type mismatch" error. Dim stDocName As String Dim stLinkCriteria As String stDocName = "VERDI-Kunden" stLinkCriteria = "[KundenName]=" & "'" & Me![KundenName] & "'" And "[VerbandNr]=" & Me![VerbandNr] DoCmd.OpenForm stDocName, , , stLinkCriteria Hope someone can help before this one drives me grazy. Helmut Kotsch From cfoust at infostatsystems.com Tue Jan 27 17:49:16 2004 From: cfoust at infostatsystems.com (Charlotte Foust) Date: Tue, 27 Jan 2004 15:49:16 -0800 Subject: [AccessD] Concatenated stLinkCritria produces Type mismatch error. Message-ID: I don't like to use multiple double quotes like that because it's so hard to read. Your problem is in this line: stLinkCriteria = "[KundenName]=" & "'" & Me![KundenName] & "'" And "[VerbandNr]=" & Me![VerbandNr] Which should be: stLinkCriteria = "[KundenName]=" & "'" & Me![KundenName] & "'" & " And [VerbandNr]=" & Me![VerbandNr] Charlotte Foust -----Original Message----- From: Helmut Kotsch [mailto:Helmut.E.Kotsch at t-online.de] Sent: Tuesday, January 27, 2004 3:11 PM To: accessd at databaseadvisors.com Subject: [AccessD] Concatenated stLinkCritria produces Type mismatch error. Hi, I am trying to open a form where 2 conditions have to be met. When only one conditon (as shown in code below as sample#1 and sample#2) is set than it works ok. Sample#1 ==> OK Dim stDocName As String Dim stLinkCriteria As String stDocName = "VERDI-Kunden" stLinkCriteria = "[KundenName]=" & "'" & Me![KundenName] & "'" DoCmd.OpenForm stDocName, , , stLinkCriteria Sample#2 ==> OK Dim stDocName As String Dim stLinkCriteria As String stDocName = "VERDI-Kunden" stLinkCriteria = "[VerbandNr]=" & Me![VerbandNr] DoCmd.OpenForm stDocName, , , stLinkCriteria However when concatenating both conditions as shown in the following code I get a "Type mismatch" error. Dim stDocName As String Dim stLinkCriteria As String stDocName = "VERDI-Kunden" stLinkCriteria = "[KundenName]=" & "'" & Me![KundenName] & "'" And "[VerbandNr]=" & Me![VerbandNr] DoCmd.OpenForm stDocName, , , stLinkCriteria Hope someone can help before this one drives me grazy. Helmut Kotsch _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From Helmut.E.Kotsch at t-online.de Tue Jan 27 18:22:58 2004 From: Helmut.E.Kotsch at t-online.de (Helmut Kotsch) Date: Wed, 28 Jan 2004 01:22:58 +0100 Subject: AW: [AccessD] Concatenated stLinkCritria produces Type mismatcherror. In-Reply-To: Message-ID: Charlotte you are great. Thank you very much. Here I'm sitting at midnight in Germany defining my problem and there you come back within minutes with a workable solution. What is the alternative to using multiple double quotes? (I don't like them either) Where in the world would someone learn / read about the solution you provided. Even though it works, I don't understand it. To be honest, this whole "quotes syntax" (single and double) is a nightmare to me. Again, thanks a lot. Regards and have a nice day. Helmut Kotsch (Helmut.E.Kotsch at t-online.de) -----Ursprungliche Nachricht----- Von: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]Im Auftrag von Charlotte Foust Gesendet: Mittwoch, 28. Januar 2004 00:49 An: Access Developers discussion and problem solving Betreff: RE: [AccessD] Concatenated stLinkCritria produces Type mismatcherror. I don't like to use multiple double quotes like that because it's so hard to read. Your problem is in this line: stLinkCriteria = "[KundenName]=" & "'" & Me![KundenName] & "'" And "[VerbandNr]=" & Me![VerbandNr] Which should be: stLinkCriteria = "[KundenName]=" & "'" & Me![KundenName] & "'" & " And [VerbandNr]=" & Me![VerbandNr] Charlotte Foust -----Original Message----- From: Helmut Kotsch [mailto:Helmut.E.Kotsch at t-online.de] Sent: Tuesday, January 27, 2004 3:11 PM To: accessd at databaseadvisors.com Subject: [AccessD] Concatenated stLinkCritria produces Type mismatch error. Hi, I am trying to open a form where 2 conditions have to be met. When only one conditon (as shown in code below as sample#1 and sample#2) is set than it works ok. Sample#1 ==> OK Dim stDocName As String Dim stLinkCriteria As String stDocName = "VERDI-Kunden" stLinkCriteria = "[KundenName]=" & "'" & Me![KundenName] & "'" DoCmd.OpenForm stDocName, , , stLinkCriteria Sample#2 ==> OK Dim stDocName As String Dim stLinkCriteria As String stDocName = "VERDI-Kunden" stLinkCriteria = "[VerbandNr]=" & Me![VerbandNr] DoCmd.OpenForm stDocName, , , stLinkCriteria However when concatenating both conditions as shown in the following code I get a "Type mismatch" error. Dim stDocName As String Dim stLinkCriteria As String stDocName = "VERDI-Kunden" stLinkCriteria = "[KundenName]=" & "'" & Me![KundenName] & "'" And "[VerbandNr]=" & Me![VerbandNr] DoCmd.OpenForm stDocName, , , stLinkCriteria Hope someone can help before this one drives me grazy. Helmut Kotsch _______________________________________________ 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 From cfoust at infostatsystems.com Tue Jan 27 18:36:10 2004 From: cfoust at infostatsystems.com (Charlotte Foust) Date: Tue, 27 Jan 2004 16:36:10 -0800 Subject: [AccessD] Concatenated stLinkCritria produces Type mismatcherror. Message-ID: I generally use single quotes inside the double quotes, although it can get tricky if the are quotes inside a field's values. Another alternative is to concatenate chr(34), which is a double quote, between the rest of the string and text value that needs to be surrounded by quotes. Like this: stLinkCriteria = "[KundenName]=" & Chr(34) & Me![KundenName] & Chr(34) & " And [VerbandNr]=" & Me![VerbandNr] I've always found that a lot easier to read. Charlotte Foust -----Original Message----- From: Helmut Kotsch [mailto:Helmut.E.Kotsch at t-online.de] Sent: Tuesday, January 27, 2004 4:23 PM To: Access Developers discussion and problem solving Subject: AW: [AccessD] Concatenated stLinkCritria produces Type mismatcherror. Charlotte you are great. Thank you very much. Here I'm sitting at midnight in Germany defining my problem and there you come back within minutes with a workable solution. What is the alternative to using multiple double quotes? (I don't like them either) Where in the world would someone learn / read about the solution you provided. Even though it works, I don't understand it. To be honest, this whole "quotes syntax" (single and double) is a nightmare to me. Again, thanks a lot. Regards and have a nice day. Helmut Kotsch (Helmut.E.Kotsch at t-online.de) -----Ursprungliche Nachricht----- Von: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]Im Auftrag von Charlotte Foust Gesendet: Mittwoch, 28. Januar 2004 00:49 An: Access Developers discussion and problem solving Betreff: RE: [AccessD] Concatenated stLinkCritria produces Type mismatcherror. I don't like to use multiple double quotes like that because it's so hard to read. Your problem is in this line: stLinkCriteria = "[KundenName]=" & "'" & Me![KundenName] & "'" And "[VerbandNr]=" & Me![VerbandNr] Which should be: stLinkCriteria = "[KundenName]=" & "'" & Me![KundenName] & "'" & " And [VerbandNr]=" & Me![VerbandNr] Charlotte Foust -----Original Message----- From: Helmut Kotsch [mailto:Helmut.E.Kotsch at t-online.de] Sent: Tuesday, January 27, 2004 3:11 PM To: accessd at databaseadvisors.com Subject: [AccessD] Concatenated stLinkCritria produces Type mismatch error. Hi, I am trying to open a form where 2 conditions have to be met. When only one conditon (as shown in code below as sample#1 and sample#2) is set than it works ok. Sample#1 ==> OK Dim stDocName As String Dim stLinkCriteria As String stDocName = "VERDI-Kunden" stLinkCriteria = "[KundenName]=" & "'" & Me![KundenName] & "'" DoCmd.OpenForm stDocName, , , stLinkCriteria Sample#2 ==> OK Dim stDocName As String Dim stLinkCriteria As String stDocName = "VERDI-Kunden" stLinkCriteria = "[VerbandNr]=" & Me![VerbandNr] DoCmd.OpenForm stDocName, , , stLinkCriteria However when concatenating both conditions as shown in the following code I get a "Type mismatch" error. Dim stDocName As String Dim stLinkCriteria As String stDocName = "VERDI-Kunden" stLinkCriteria = "[KundenName]=" & "'" & Me![KundenName] & "'" And "[VerbandNr]=" & Me![VerbandNr] DoCmd.OpenForm stDocName, , , stLinkCriteria Hope someone can help before this one drives me grazy. Helmut Kotsch _______________________________________________ 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 _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From BBarabash at TappeConstruction.com Tue Jan 27 18:46:16 2004 From: BBarabash at TappeConstruction.com (Brett Barabash) Date: Tue, 27 Jan 2004 18:46:16 -0600 Subject: [AccessD] Concatenated stLinkCritria produces Type mismatcher ror. Message-ID: <426071E0B0A6D311B3C0006008B0AB23AFE2F4@TAPPEEXCH01> Personally, (and this is simply preference, I'm sure others will argue) I prefer also avoiding "stranded" quotes, so stLinkCriteria = "[KundenName]=" & "'" & Me![KundenName] & "'" & " And [VerbandNr]=" & Me![VerbandNr] Becomes: stLinkCriteria = "[KundenName]='" & Me![KundenName] & "' And [VerbandNr]=" & Me![VerbandNr] Less string concatenation that way. The only catch is if your code window uses a sans serif font like Arial, Tahoma, etc, the quotes tend to mush together making my method less readable. Otherwise, I find it much easier to debug. -----Original Message----- From: Helmut.E.Kotsch at t-online.de [mailto:Helmut.E.Kotsch at t-online.de] Sent: Tuesday, January 27, 2004 6:23 PM To: Access Developers discussion and problem solving Subject: AW: [AccessD] Concatenated stLinkCritria produces Type mismatcherror. Charlotte you are great. Thank you very much. Here I'm sitting at midnight in Germany defining my problem and there you come back within minutes with a workable solution. What is the alternative to using multiple double quotes? (I don't like them either) Where in the world would someone learn / read about the solution you provided. Even though it works, I don't understand it. To be honest, this whole "quotes syntax" (single and double) is a nightmare to me. Again, thanks a lot. Regards and have a nice day. Helmut Kotsch (Helmut.E.Kotsch at t-online.de) -----Ursprungliche Nachricht----- Von: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]Im Auftrag von Charlotte Foust Gesendet: Mittwoch, 28. Januar 2004 00:49 An: Access Developers discussion and problem solving Betreff: RE: [AccessD] Concatenated stLinkCritria produces Type mismatcherror. I don't like to use multiple double quotes like that because it's so hard to read. Your problem is in this line: stLinkCriteria = "[KundenName]=" & "'" & Me![KundenName] & "'" And "[VerbandNr]=" & Me![VerbandNr] Which should be: stLinkCriteria = "[KundenName]=" & "'" & Me![KundenName] & "'" & " And [VerbandNr]=" & Me![VerbandNr] Charlotte Foust -----Original Message----- From: Helmut Kotsch [mailto:Helmut.E.Kotsch at t-online.de] Sent: Tuesday, January 27, 2004 3:11 PM To: accessd at databaseadvisors.com Subject: [AccessD] Concatenated stLinkCritria produces Type mismatch error. Hi, I am trying to open a form where 2 conditions have to be met. When only one conditon (as shown in code below as sample#1 and sample#2) is set than it works ok. Sample#1 ==> OK Dim stDocName As String Dim stLinkCriteria As String stDocName = "VERDI-Kunden" stLinkCriteria = "[KundenName]=" & "'" & Me![KundenName] & "'" DoCmd.OpenForm stDocName, , , stLinkCriteria Sample#2 ==> OK Dim stDocName As String Dim stLinkCriteria As String stDocName = "VERDI-Kunden" stLinkCriteria = "[VerbandNr]=" & Me![VerbandNr] DoCmd.OpenForm stDocName, , , stLinkCriteria However when concatenating both conditions as shown in the following code I get a "Type mismatch" error. Dim stDocName As String Dim stLinkCriteria As String stDocName = "VERDI-Kunden" stLinkCriteria = "[KundenName]=" & "'" & Me![KundenName] & "'" And "[VerbandNr]=" & Me![VerbandNr] DoCmd.OpenForm stDocName, , , stLinkCriteria Hope someone can help before this one drives me grazy. Helmut Kotsch -------------------------------------------------------------------------------------------------------------------- This email and any files transmitted with it are confidential and intended solely for the use of the individual or entity to whom they are addressed. If you have received this email in error please notify the originator of the message. This footer also confirms that this email message has been scanned for the presence of computer viruses. Any views expressed in this message are those of the individual sender, except where the sender specifies and with authority, states them to be the views of Tappe Construction Co. Scanning of this message and addition of this footer is performed by SurfControl E-mail Filter software in conjunction with virus detection software. From stuart at lexacorp.com.pg Tue Jan 27 19:03:57 2004 From: stuart at lexacorp.com.pg (Stuart McLachlan) Date: Wed, 28 Jan 2004 11:03:57 +1000 Subject: [AccessD] Concatenated stLinkCritria produces Type mismatcher ror. In-Reply-To: <426071E0B0A6D311B3C0006008B0AB23AFE2F4@TAPPEEXCH01> Message-ID: <4017971D.17970.2E2ECEE6@localhost> If it's only once or twice in an app, I also prefer to "avoid stranded quotes". If there is going to be quite a bit of building such strings, I prefer to do this: Function SQuote(BaseString as String) as String SQuote = Chr$(39) & BaseString & Chr$(39) EndFunction Function DQuote(BaseString as String) as String DQuote = Chr$(34) & BaseString & Chr$(34) EndFunction Then I use: stLinkCriteria = "[KundenName]=" & SQuote(Me![KundenName]) & " And [VerbandNr]=" & Me![VerbandNr] or stLinkCriteria = "[KundenName]=" & DQuote(Me![KundenName]) & " And [VerbandNr]=" & Me![VerbandNr] On 27 Jan 2004 at 18:46, Brett Barabash wrote: > Personally, (and this is simply preference, I'm sure others will argue) I > prefer also avoiding "stranded" quotes, so > > stLinkCriteria = "[KundenName]=" & "'" & Me![KundenName] & "'" & " And > [VerbandNr]=" & Me![VerbandNr] > > Becomes: > > stLinkCriteria = "[KundenName]='" & Me![KundenName] & "' And [VerbandNr]=" & > Me![VerbandNr] > > Less string concatenation that way. The only catch is if your code window > uses a sans serif font like Arial, Tahoma, etc, the quotes tend to mush > together making my method less readable. Otherwise, I find it much easier > to debug. > > > -----Original Message----- > From: Helmut.E.Kotsch at t-online.de [mailto:Helmut.E.Kotsch at t-online.de] > Sent: Tuesday, January 27, 2004 6:23 PM > To: Access Developers discussion and problem solving > Subject: AW: [AccessD] Concatenated stLinkCritria produces Type > mismatcherror. > > > Charlotte you are great. Thank you very much. Here I'm sitting at midnight > in Germany defining my problem and there you come back within minutes with a > workable solution. > What is the alternative to using multiple double quotes? (I don't like them > either) > Where in the world would someone learn / read about the solution you > provided. Even though it works, I don't understand it. > To be honest, this whole "quotes syntax" (single and double) is a nightmare > to me. > > Again, thanks a lot. > Regards and have a nice day. > > Helmut Kotsch > > (Helmut.E.Kotsch at t-online.de) > > > -----Ursprungliche Nachricht----- > Von: accessd-bounces at databaseadvisors.com > [mailto:accessd-bounces at databaseadvisors.com]Im Auftrag von Charlotte > Foust > Gesendet: Mittwoch, 28. Januar 2004 00:49 > An: Access Developers discussion and problem solving > Betreff: RE: [AccessD] Concatenated stLinkCritria produces Type > mismatcherror. > > > I don't like to use multiple double quotes like that because it's so > hard to read. Your problem is in this line: > > stLinkCriteria = "[KundenName]=" & "'" & Me![KundenName] & "'" And > "[VerbandNr]=" & Me![VerbandNr] > > Which should be: > > stLinkCriteria = "[KundenName]=" & "'" & Me![KundenName] & "'" & " > And [VerbandNr]=" & Me![VerbandNr] > > Charlotte Foust > > -----Original Message----- > From: Helmut Kotsch [mailto:Helmut.E.Kotsch at t-online.de] > Sent: Tuesday, January 27, 2004 3:11 PM > To: accessd at databaseadvisors.com > Subject: [AccessD] Concatenated stLinkCritria produces Type mismatch > error. > > > Hi, > I am trying to open a form where 2 conditions have to be met. When only > one conditon (as shown in code below as sample#1 and sample#2) is set > than it works ok. > > Sample#1 ==> OK > > Dim stDocName As String > Dim stLinkCriteria As String > stDocName = "VERDI-Kunden" > stLinkCriteria = "[KundenName]=" & "'" & Me![KundenName] & "'" > DoCmd.OpenForm stDocName, , , stLinkCriteria > > Sample#2 ==> OK > > Dim stDocName As String > Dim stLinkCriteria As String > stDocName = "VERDI-Kunden" > stLinkCriteria = "[VerbandNr]=" & Me![VerbandNr] > DoCmd.OpenForm stDocName, , , stLinkCriteria > > However when concatenating both conditions as shown in the following > code I get a "Type mismatch" error. > > Dim stDocName As String > Dim stLinkCriteria As String > stDocName = "VERDI-Kunden" > stLinkCriteria = "[KundenName]=" & "'" & Me![KundenName] & "'" And > "[VerbandNr]=" & Me![VerbandNr] > DoCmd.OpenForm stDocName, , , stLinkCriteria > > Hope someone can help before this one drives me grazy. > > > Helmut Kotsch > > -------------------------------------------------------------------------------------------------------------------- > This email and any files transmitted with it are confidential and > intended solely for the use of the individual or entity to whom > they are addressed. > If you have received this email in error please notify the > originator of the message. This footer also confirms that this > email message has been scanned for the presence of computer viruses. > > Any views expressed in this message are those of the individual > sender, except where the sender specifies and with authority, > states them to be the views of Tappe Construction Co. > > Scanning of this message and addition of this footer is performed > by SurfControl E-mail Filter software in conjunction with > virus detection software. > > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com -- Stuart McLachlan Lexacorp Ltd Application Development, IT Consultancy http://www.lexacorp.com.pg From DWUTKA at marlow.com Tue Jan 27 19:22:21 2004 From: DWUTKA at marlow.com (DWUTKA at marlow.com) Date: Tue, 27 Jan 2004 19:22:21 -0600 Subject: [AccessD] Concatenated stLinkCritria produces Type mismatcher ror. Message-ID: <2F8793082E00D4119A1700B0D0216BF8022277CF@main2.marlow.com> Let's see if I can break it down for you a bit. Double quotes OR single quotes are a string delimiter. Which means, that if either starts a string, that same character has to end the string. Double quotes is usually the one used (like in VBA, a single quote on it's own comments out a line....). So, when building a string, you have nothing to worry about, UNLESS you need to incorporate the delimiter into the string itself. So, if you want: Let's test this. "Let's test this." is the correct string. There is a single quote, but the delimiter isn't used within the string. If you want: Susie said, "I want chocolate ice cream!". Then it get's interesting. However, to represent a double quote, within a string delimited by double quotes, you just put two of them together, so, "Susie said, ""I want chocolate ice cream!""." is the correct string representation. Once you understand the doubling of the delimiter concept, the rest isn't to hard to figure out. So far I've only shown 'full' strings. If you need to put a string together from peices, the SAME rule applies, even though it may look different. If you want to include the dilimiter, you double it. So, if you have : Look for "something". where something is a variable, you would use this: "Look for """ & strSomething & """." Notice, that you have 3 parts to this string. The first part starts and ends with the delimiter ("). The last bit of the first part is a doubling of the double quote, then one more double quote to end the string. (So the delimiter is at the beginning and end of the 'string', and again, the doubling rule puts the delimiter within the string itself....because it's at the end of the segment, there are three in a row, but just remember, that's a double 'delimiter', followed by the delimiter itself...thus three in a row.) The second part is a variable, and is joined to the other parts with the ampersand. The last part, three double quotes, period, double quote, is the delimiter, a doubled delimiter (to represent it in the string on it's own), a period, then the closing delimiter. Now, let's say you want: Something"somethingelse" you would do this: strSomething & """" & strSomethingElse & """" Now you see 4 delimiters. Don't get side tracked. That is really an opening delimiter, the 'doubled' delimiter, and a closing delimiter. So if you saw """""", that produces a string of : "" (open delimiter, 2 doubled delimiters, and a closing delimiter....thus 6 all together, producing 2 double quotes for the contents of the string.) Does that all make sense? Just remember that to represent a delimiter within the string itself, you double the delimiter. Now, not to confuse the issue, but if you look at it even deeper, there is a perfectly logical explanation on how/why this system was developed. Numbers and other variable types are all represented by a specific number of bytes. To you and me 10,300 is 10,300, but to the email program, it's a chr(49), chr(48), chr(44), etc. When I put 10300 in code, the compiler changes the string into 4 bytes (if I am using a long integer variable type). However, a string can be any length (I believe the maximum number of characters for a string in VB/VBA is 2 million, but not positive on that. Since the length is variable, the code has to know where the string starts, and where the string stops, so it knows how much memory it is going to use (since in ASCII, each character takes up 1 byte, and in Unicode they take up 2 bytes.). Because of this, the code needs to know where the string starts and where it stops, so it uses a 'delimiter'. Quite frankly, the reason double quotes seem so difficult to put into strings is because they chose a delimiter normally used within a string. If they had used something like chr(150), which isn't 'typable', it would have been easier to make strings, because when are you going to use chr(150) in normal text, however, it would make looking at most strings hard to see for a programmer. Even if they had used a non-typable character, they couldn't exclude the fact that someone MAY want to use that within the string itself. Thus, no matter what delimiter they were going to use, they had to provide a method of letting that delimiter fall within the string it was delimiting. To do that, they took the double approach. If the code finds the end delimiter, and finds it again, as the next character, it knows that the string isn't REALLY over, because it's been doubled, thus the code simply puts the delimiter within memory as part of the string itself. If it finds the end delimiter, and anything BUT the delimiter afterwards, then it knows it has found the end of that string. Make sense? Drew -----Original Message----- From: Helmut.E.Kotsch at t-online.de [mailto:Helmut.E.Kotsch at t-online.de] Sent: Tuesday, January 27, 2004 6:23 PM To: Access Developers discussion and problem solving Subject: AW: [AccessD] Concatenated stLinkCritria produces Type mismatcherror. Charlotte you are great. Thank you very much. Here I'm sitting at midnight in Germany defining my problem and there you come back within minutes with a workable solution. What is the alternative to using multiple double quotes? (I don't like them either) Where in the world would someone learn / read about the solution you provided. Even though it works, I don't understand it. To be honest, this whole "quotes syntax" (single and double) is a nightmare to me. Again, thanks a lot. Regards and have a nice day. Helmut Kotsch (Helmut.E.Kotsch at t-online.de) -----Ursprungliche Nachricht----- Von: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]Im Auftrag von Charlotte Foust Gesendet: Mittwoch, 28. Januar 2004 00:49 An: Access Developers discussion and problem solving Betreff: RE: [AccessD] Concatenated stLinkCritria produces Type mismatcherror. I don't like to use multiple double quotes like that because it's so hard to read. Your problem is in this line: stLinkCriteria = "[KundenName]=" & "'" & Me![KundenName] & "'" And "[VerbandNr]=" & Me![VerbandNr] Which should be: stLinkCriteria = "[KundenName]=" & "'" & Me![KundenName] & "'" & " And [VerbandNr]=" & Me![VerbandNr] Charlotte Foust -----Original Message----- From: Helmut Kotsch [mailto:Helmut.E.Kotsch at t-online.de] Sent: Tuesday, January 27, 2004 3:11 PM To: accessd at databaseadvisors.com Subject: [AccessD] Concatenated stLinkCritria produces Type mismatch error. Hi, I am trying to open a form where 2 conditions have to be met. When only one conditon (as shown in code below as sample#1 and sample#2) is set than it works ok. Sample#1 ==> OK Dim stDocName As String Dim stLinkCriteria As String stDocName = "VERDI-Kunden" stLinkCriteria = "[KundenName]=" & "'" & Me![KundenName] & "'" DoCmd.OpenForm stDocName, , , stLinkCriteria Sample#2 ==> OK Dim stDocName As String Dim stLinkCriteria As String stDocName = "VERDI-Kunden" stLinkCriteria = "[VerbandNr]=" & Me![VerbandNr] DoCmd.OpenForm stDocName, , , stLinkCriteria However when concatenating both conditions as shown in the following code I get a "Type mismatch" error. Dim stDocName As String Dim stLinkCriteria As String stDocName = "VERDI-Kunden" stLinkCriteria = "[KundenName]=" & "'" & Me![KundenName] & "'" And "[VerbandNr]=" & Me![VerbandNr] DoCmd.OpenForm stDocName, , , stLinkCriteria Hope someone can help before this one drives me grazy. Helmut Kotsch _______________________________________________ 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 _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From bruce_bruen at mlc.com.au Tue Jan 27 18:43:59 2004 From: bruce_bruen at mlc.com.au (bruce_bruen at mlc.com.au) Date: Wed, 28 Jan 2004 11:43:59 +1100 Subject: [AccessD] Concatenated stLinkCritria produces Type mismatch error. Message-ID: stLinkCriteria = "[KundenName]=" & "'" & Me![KundenName] & "' And [VerbandNr]=" & Me![VerbandNr] Youve left the "AND" out of your strLinkCriteria. Helmut.E.Kotsch at t-online. de (Helmut Kotsch) To: Sent by: cc: accessd-bounces at databasea Subject: [AccessD] Concatenated stLinkCritria produces Type mismatch error. dvisors.com 28/01/2004 10:11 Please respond to Access Developers discussion and problem solving Hi, I am trying to open a form where 2 conditions have to be met. When only one conditon (as shown in code below as sample#1 and sample#2) is set than it works ok. Sample#1 ==> OK Dim stDocName As String Dim stLinkCriteria As String stDocName = "VERDI-Kunden" stLinkCriteria = "[KundenName]=" & "'" & Me![KundenName] & "'" DoCmd.OpenForm stDocName, , , stLinkCriteria Sample#2 ==> OK Dim stDocName As String Dim stLinkCriteria As String stDocName = "VERDI-Kunden" stLinkCriteria = "[VerbandNr]=" & Me![VerbandNr] DoCmd.OpenForm stDocName, , , stLinkCriteria However when concatenating both conditions as shown in the following code I get a "Type mismatch" error. Dim stDocName As String Dim stLinkCriteria As String stDocName = "VERDI-Kunden" stLinkCriteria = "[KundenName]=" & "'" & Me![KundenName] & "'" And "[VerbandNr]=" & Me![VerbandNr] DoCmd.OpenForm stDocName, , , stLinkCriteria Hope someone can help before this one drives me grazy. Helmut Kotsch _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From bruce_bruen at mlc.com.au Tue Jan 27 18:52:51 2004 From: bruce_bruen at mlc.com.au (bruce_bruen at mlc.com.au) Date: Wed, 28 Jan 2004 11:52:51 +1100 Subject: [AccessD] Re: Make-table query points to c:\documents and settings?! Message-ID: Dont know if I really understand the question here but afaik the db can be put into the sql string directly as in: Create table [C:\temp\db1.mdb].t1 (f1 string); or have I lost the drift? BB "Robert L. Stewart" cc: Sent by: Subject: [AccessD] Re: Make-table query points to c:\documents and settings?! accessd-bounces at databasea dvisors.com 28/01/2004 06:17 Please respond to Access Developers discussion and problem solving Sander, What you have to do is open the other database in code. Then, you can execute the SQL statement to build the tables you are wanting. ADO would work fine for this. The path would be required to open the DB, but not to create the tables. All of this has to be done in code and it has to be done in pure SQL as 2 different SQL statements. First to create the table, second to append the data. So you actually have to open 2 database objects, current and remote. If you need help with the code, let me know and I will post it to the list. Robert At 12:03 PM 1/27/2004 -0600, you wrote: >Date: Mon, 26 Jan 2004 10:44:38 -0800 (PST) >From: Sad Der >Subject: Re: [AccessD] Make-table query points to c:\documents and > settings?! >To: Access Developers discussion and problem solving > >Message-ID: <20040126184438.97312.qmail at web60205.mail.yahoo.com> >Content-Type: text/plain; charset=us-ascii > >I build it in SQL view. There's no path in there >either... :-( > >Sander _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From paul.hartland at fsmail.net Wed Jan 28 03:28:17 2004 From: paul.hartland at fsmail.net (paul.hartland at fsmail.net) Date: Wed, 28 Jan 2004 10:28:17 +0100 (CET) Subject: [AccessD] Text File Into Access Using Visual Basic 6 Message-ID: <13710544.1075282097676.JavaMail.www@wwinf3005> To all, Can anyone tell me (preferably with sample code, if possible), what is the fastest way to import a .txt file into a predefined table in access via Visual Basic 6. My .txt file contains roughly 365,876 records with two fields ? Barcode, Price. This has to be imported into an Access table also containing two fields Barcode (text), Price (Number, Double, Fixed, 2 decimal places). The .txt file is comma delimited. I?m using Access XP and Visual Basic 6.0 as the front-end. Thanks in advance for any help as, this project needs to be ready for Monday morning Paul Hartland Freeserve AnyTime - HALF PRICE for the first 3 months - Save ?7.50 a month www.freeserve.com/anytime From gustav at cactus.dk Wed Jan 28 03:40:52 2004 From: gustav at cactus.dk (Gustav Brock) Date: Wed, 28 Jan 2004 10:40:52 +0100 Subject: [AccessD] Text File Into Access Using Visual Basic 6 In-Reply-To: <13710544.1075282097676.JavaMail.www@wwinf3005> References: <13710544.1075282097676.JavaMail.www@wwinf3005> Message-ID: <398636869.20040128104052@cactus.dk> Hi Paul That is to pay Seth a visit: http://puma.agron.ksu.edu/~sgsax/download/file_io.txt /gustav > Can anyone tell me (preferably with sample code, if possible), what > is the fastest way to import a .txt file into a predefined table in > access via Visual Basic 6. From paul.hartland at fsmail.net Wed Jan 28 04:07:31 2004 From: paul.hartland at fsmail.net (paul.hartland at fsmail.net) Date: Wed, 28 Jan 2004 11:07:31 +0100 (CET) Subject: [AccessD] Text File Into Access Using Visual Basic 6 Message-ID: <25701656.1075284451100.JavaMail.www@wwinf3005> Thanks Gustav Freeserve AnyTime - HALF PRICE for the first 3 months - Save ?7.50 a month www.freeserve.com/anytime From deanellis at iprimus.com.au Wed Jan 28 06:35:31 2004 From: deanellis at iprimus.com.au (Dean Ellis) Date: Wed, 28 Jan 2004 23:35:31 +1100 (AUS Eastern Daylight Time) Subject: [AccessD] Decompile Message-ID: <4017AC93.000011.80279@jedel> Hi All, My good friend Darren Dick introduced me to this site. I was wondering if any one knows anything about "Decompiling" Databases? I know how to compact the db and compile the code. But I understand you can decompile as well. Some direction on how to get this up and running would be great Cheers Dean From stephen at bondsoftware.co.nz Wed Jan 28 06:38:14 2004 From: stephen at bondsoftware.co.nz (Stephen Bond) Date: Thu, 29 Jan 2004 01:38:14 +1300 Subject: [AccessD] Decompile Message-ID: <70F3D727890C784291D8433E9C418F290885B1@server.bondsoftware.co.nz> You're burning the oil late ... Here's a couple of sites to start you off: http://www.trigeminal.com/usenet/usenet004.asp?1033 http://www.granite.ab.ca/access/decompile.htm Stephen Bond Otatara, New Zealand > -----Original Message----- > From: Dean Ellis [mailto:deanellis at iprimus.com.au] > Sent: Thursday, 29 January 2004 1:36 a.m. > To: AccessD > Subject: [AccessD] Decompile > > > Hi All, > > > > My good friend Darren Dick introduced me to this site. I was > wondering if > any one knows anything about "Decompiling" Databases? I know > how to compact > the db and compile the code. But I understand you can > decompile as well. > > > > Some direction on how to get this up and running would be great > > > > Cheers > > > > Dean > From Mark.Mitsules at ngc.com Wed Jan 28 06:40:07 2004 From: Mark.Mitsules at ngc.com (Mitsules, Mark S. (Newport News)) Date: Wed, 28 Jan 2004 07:40:07 -0500 Subject: [AccessD] Decompile Message-ID: Dean, Courtesy of Stuart Sanders... Mark **************** Thinking about this I thought of a cool (in my view) way of handling this, that is probably what Susan was talking about. Now I'm wondering why I didn't do this years ago. 1. Start Windows Explorer, 2. Select Tools and then Folder Options... 3. Click on the File Types Tab 4. Find the MDB file type 5. Click Advanced 6. Chances are there are 2 options. Open in bold font (denoting default) and New. You can pretty much add what you want here. For decompile, 7. Click New 8. Under action type Decompile 9. Under Application used to perform action type the equivalent for your install: "C:\Program Files\Microsoft Office\Office10\MSACCESS.EXE" /decompile "%1" 10 Click OK and exit out And wallah! You now right click an mdb and have the context option of decompiling it. But it doesn't stop there. For those of us juggling multiple versions of Access you can setup a right click option to open in each. Eg Open in 97 Open in 2000 Open in XP And make sure the path points to the correct version of access. Cheers Stuart **************** -----Original Message----- From: Dean Ellis [mailto:deanellis at iprimus.com.au] Sent: Wednesday, January 28, 2004 7:36 AM To: AccessD Subject: [AccessD] Decompile _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From Erwin.Craps at ithelps.be Wed Jan 28 07:49:00 2004 From: Erwin.Craps at ithelps.be (Erwin Craps - IT Helps) Date: Wed, 28 Jan 2004 14:49:00 +0100 Subject: [AccessD] Decompile Message-ID: <46B976F2B698FF46A4FE7636509B22DF03D191@stekelbes.ithelps.local> Mark YOU ARE GREAT!!! Stupid thing of me is, I very well know this... Just never tought of actualy dooing this for Access Erwin... -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Mitsules, Mark S. (Newport News) Sent: Wednesday, January 28, 2004 1:40 PM To: 'Access Developers discussion and problem solving' Subject: RE: [AccessD] Decompile Dean, Courtesy of Stuart Sanders... Mark **************** Thinking about this I thought of a cool (in my view) way of handling this, that is probably what Susan was talking about. Now I'm wondering why I didn't do this years ago. 1. Start Windows Explorer, 2. Select Tools and then Folder Options... 3. Click on the File Types Tab 4. Find the MDB file type 5. Click Advanced 6. Chances are there are 2 options. Open in bold font (denoting default) and New. You can pretty much add what you want here. For decompile, 7. Click New 8. Under action type Decompile 9. Under Application used to perform action type the equivalent for your install: "C:\Program Files\Microsoft Office\Office10\MSACCESS.EXE" /decompile "%1" 10 Click OK and exit out And wallah! You now right click an mdb and have the context option of decompiling it. But it doesn't stop there. For those of us juggling multiple versions of Access you can setup a right click option to open in each. Eg Open in 97 Open in 2000 Open in XP And make sure the path points to the correct version of access. Cheers Stuart **************** -----Original Message----- From: Dean Ellis [mailto:deanellis at iprimus.com.au] Sent: Wednesday, January 28, 2004 7:36 AM To: AccessD Subject: [AccessD] Decompile _______________________________________________ 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 From Mark.Mitsules at ngc.com Wed Jan 28 08:02:06 2004 From: Mark.Mitsules at ngc.com (Mitsules, Mark S. (Newport News)) Date: Wed, 28 Jan 2004 09:02:06 -0500 Subject: [AccessD] Decompile Message-ID: Erwin, "Greatness?" I take no credit in the solution...only in my archiving "skills". My ListServ folders are grouped by conversation topic. Dean's question contained the exact same subject line as the thread from August 2003. That is how I came across it so quickly, Dean's question bubbled to the top of the old thread and was seven messages above the solution provided by Stuart. Mark -----Original Message----- From: Erwin Craps - IT Helps [mailto:Erwin.Craps at ithelps.be] Sent: Wednesday, January 28, 2004 8:49 AM To: Access Developers discussion and problem solving Subject: RE: [AccessD] Decompile Mark YOU ARE GREAT!!! Stupid thing of me is, I very well know this... Just never tought of actualy dooing this for Access Erwin... -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Mitsules, Mark S. (Newport News) Sent: Wednesday, January 28, 2004 1:40 PM To: 'Access Developers discussion and problem solving' Subject: RE: [AccessD] Decompile Dean, Courtesy of Stuart Sanders... Mark **************** Thinking about this I thought of a cool (in my view) way of handling this, that is probably what Susan was talking about. Now I'm wondering why I didn't do this years ago. 1. Start Windows Explorer, 2. Select Tools and then Folder Options... 3. Click on the File Types Tab 4. Find the MDB file type 5. Click Advanced 6. Chances are there are 2 options. Open in bold font (denoting default) and New. You can pretty much add what you want here. For decompile, 7. Click New 8. Under action type Decompile 9. Under Application used to perform action type the equivalent for your install: "C:\Program Files\Microsoft Office\Office10\MSACCESS.EXE" /decompile "%1" 10 Click OK and exit out And wallah! You now right click an mdb and have the context option of decompiling it. But it doesn't stop there. For those of us juggling multiple versions of Access you can setup a right click option to open in each. Eg Open in 97 Open in 2000 Open in XP And make sure the path points to the correct version of access. Cheers Stuart **************** -----Original Message----- From: Dean Ellis [mailto:deanellis at iprimus.com.au] Sent: Wednesday, January 28, 2004 7:36 AM To: AccessD Subject: [AccessD] Decompile _______________________________________________ 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 _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From Erwin.Craps at ithelps.be Wed Jan 28 08:22:42 2004 From: Erwin.Craps at ithelps.be (Erwin Craps - IT Helps) Date: Wed, 28 Jan 2004 15:22:42 +0100 Subject: [AccessD] Decompile Message-ID: <46B976F2B698FF46A4FE7636509B22DF03D192@stekelbes.ithelps.local> Mark, I stick to what I just said, but for a different reason. YOU ARE SO GREAT!!! By the way, if more than one access it is a bit more complicated, I just experianced. The last Access version runned connects the MDB to that version. Then you loose the Decompile shells until that version is back the default. So you have to do this n time n version of access. Since I have A2K0, A2K2 and A2K3 on my pc, 3 times. I exported the registrey keys in a file for the tree access version in to one file. Everyone can download it from http://www.ithelps.be/temp/KeyForAccessDecompileShell.reg (watch for wrapping) Please, do not import the key straigtaway (by double clicking it). Edit it first and check if your access paths and versions match mine. The file says Access 2K0 in ..\Microsoft Office 2K\... Access 2K2 in ..\Microsoft Office\... Access 2K3 in ..\Microsoft Office 2003\... And ofcourse if I didn't put any trojan horses in it... Erwin -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Mitsules, Mark S. (Newport News) Sent: Wednesday, January 28, 2004 3:02 PM To: 'Access Developers discussion and problem solving' Subject: RE: [AccessD] Decompile Erwin, "Greatness?" I take no credit in the solution...only in my archiving "skills". My ListServ folders are grouped by conversation topic. Dean's question contained the exact same subject line as the thread from August 2003. That is how I came across it so quickly, Dean's question bubbled to the top of the old thread and was seven messages above the solution provided by Stuart. Mark -----Original Message----- From: Erwin Craps - IT Helps [mailto:Erwin.Craps at ithelps.be] Sent: Wednesday, January 28, 2004 8:49 AM To: Access Developers discussion and problem solving Subject: RE: [AccessD] Decompile Mark YOU ARE GREAT!!! Stupid thing of me is, I very well know this... Just never tought of actualy dooing this for Access Erwin... -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Mitsules, Mark S. (Newport News) Sent: Wednesday, January 28, 2004 1:40 PM To: 'Access Developers discussion and problem solving' Subject: RE: [AccessD] Decompile Dean, Courtesy of Stuart Sanders... Mark **************** Thinking about this I thought of a cool (in my view) way of handling this, that is probably what Susan was talking about. Now I'm wondering why I didn't do this years ago. 1. Start Windows Explorer, 2. Select Tools and then Folder Options... 3. Click on the File Types Tab 4. Find the MDB file type 5. Click Advanced 6. Chances are there are 2 options. Open in bold font (denoting default) and New. You can pretty much add what you want here. For decompile, 7. Click New 8. Under action type Decompile 9. Under Application used to perform action type the equivalent for your install: "C:\Program Files\Microsoft Office\Office10\MSACCESS.EXE" /decompile "%1" 10 Click OK and exit out And wallah! You now right click an mdb and have the context option of decompiling it. But it doesn't stop there. For those of us juggling multiple versions of Access you can setup a right click option to open in each. Eg Open in 97 Open in 2000 Open in XP And make sure the path points to the correct version of access. Cheers Stuart **************** -----Original Message----- From: Dean Ellis [mailto:deanellis at iprimus.com.au] Sent: Wednesday, January 28, 2004 7:36 AM To: AccessD Subject: [AccessD] Decompile _______________________________________________ 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 _______________________________________________ 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 From awithing at twcny.rr.com Wed Jan 28 08:38:12 2004 From: awithing at twcny.rr.com (augusta) Date: Wed, 28 Jan 2004 09:38:12 -0500 Subject: [AccessD] Vonage In-Reply-To: Message-ID: <200401281438.i0SEcElL005870@ms-smtp-03.nyroc.rr.com> John do you use Time Warner Central NY RR? > -----Original Message----- > From: accessd-bounces at databaseadvisors.com [mailto:accessd- > bounces at databaseadvisors.com] On Behalf Of John W. Colby > Sent: Tuesday, January 27, 2004 6:10 PM > To: Access Developers discussion and problem solving > Subject: RE: [AccessD] Vonage > > ******************************************************************* > Item Quantity Unit Subtotal > ******************************************************************* > Motorola Device 1 $0.00 $0.00 > Area Code: 315 - Syracuse 1 $0.00 $0.00 > Activation Fee 1 $29.99 $29.99 > *Residential Basic 500 1 $14.99 $14.99 > ----------------------------------- > > State Sales Tax: $0.00 > Federal Excise Tax: $1.35 > Regulatory Recovery Fee:$1.50 > Shipping: $9.95 > Total: $57.78 > > * Monthly Recurring Charge. > ******************************************************************* > > This does not include a charge of approximately $30 which you will be > charged for if you do not return the modem at the end of service. > > Now understand that the telephone company charged me a $60 activation fee > when I moved from one location to another location down the road 1/2 mile. > All just to change my billing from one jack to another in a switchboard. > Hmmm... > > In addition, ATM the Vonage $14.99 is a flat monthly fee, no taxes or > other > regulatory charges added. My land line STARTS at 11.53 for flat residence > line, plus 5.78 federal subscriber line charge, plus 1.43 Connecticut > sales > tax, plus .73 federal tax plus .20 E911 surcharge, plus .05 Connecticut > Service Fund, plus .39 number portability charge, plus .56 Universal > Service > fund (local), plus .14 Universal Service Fund (Long Distance). Talk about > nickel and dimeing you to death! > > I NEVER get out with under $25 on a "11.50" phone line, and with all the > "short" long distance, I rarely get out for under ~$35 WITHOUT long > distance, which is $.10/minute. For a couple of years I have used a > prepaid > calling card which I programmed into my phone to get my long distance for > $.039 per minute (slowly inching up, now $.045). > > Of course I also have to pay for my blazing fast internet connection, > which > is a ridiculous $45 / month. Makes the $15 ($25/$35) phone bill seem > rather > inconsequential. But I could never go back to dialup so since I have this > blazing fast internet, I might as well piggyback my phone off of it. > > I am pleased to say it is working great so far. > > John W. Colby > www.ColbyConsulting.com > > -----Original Message----- > From: accessd-bounces at databaseadvisors.com > [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Christopher > Hawkins > Sent: Tuesday, January 27, 2004 5:23 PM > To: accessd at databaseadvisors.com > Subject: RE: [AccessD] Vonage > > > $15/month sounds great, but what about setup fees or equipment > expenses? What's the "out the door" price look like? > > -Christopher- > > ---- Original Message ---- > From: JColby at dispec.com > To: accessd at databaseadvisors.com, > Subject: RE: [AccessD] Vonage > Date: Tue, 27 Jan 2004 15:05:07 -0500 > > >I received the phonemodem last night. Plugged it in (behind my > >router for > >those interested), waited 5 minutes, then picked up the receiver and > >made a > >call. Extremely easy to set up. > > > >The sound so far is crystal clear, no clicks / pops or echoes. I > >have a > >brand new ATT 2ghz cordless phone system which I plugged in to it. > >I can't > >tell the difference between this and the landline. > > > >I haven't done any heavy duty uploads / downloads though I will be > >doing > >some testing in the next few days. > > > >I went with the $15 / month package for 500 total minutes - local > >and long > >distance, with anything after that billed at $.039 / minute. If my > >useage > >averages more than 500 minutes I'll move up to the $25 package with > >unlimited local and 500 long distance minutes. Given my useage > >patterns I > >may very well end up with a $15 / month phone including long > >distance. > > > >So far so good. > > > >John W. Colby > >The database guy > > > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com From carbonnb at sympatico.ca Wed Jan 28 08:47:30 2004 From: carbonnb at sympatico.ca (Bryan Carbonnell) Date: Wed, 28 Jan 2004 9:47:30 -0500 Subject: [AccessD] Vonage Message-ID: <20040128144735.IDCX16454.tomts6-srv.bellnexxia.net@smtp.bellnexxia.net> OK folks, While VoIP may be an interesting technology, its discussion does not belong here on AccessD. If you want to continue the discussion, please do so over on DBA-Tech. Thanks, You loving Listmater.... -- Bryan Carbonnell - carbonnb at sympatico.ca Unfortunately common sense isn't so common! From jwcolby at colbyconsulting.com Wed Jan 28 09:01:15 2004 From: jwcolby at colbyconsulting.com (John W. Colby) Date: Wed, 28 Jan 2004 10:01:15 -0500 Subject: [AccessD] Vonage In-Reply-To: <200401281438.i0SEcElL005870@ms-smtp-03.nyroc.rr.com> Message-ID: No, mine is Cable Vision - Optimum Online. In fact what you see in the bill is a mistake I made (yes, I do occasionally make a mistake ;-). You can ask for a phone number in any area code. I initially asked for one in Syracuse since I have a sister-in-law living there and it would be local to her. What this meant however is that everyone here where I live (Connecticut) would have to pay long distance to reach me. Uhh... brain farts... so I changed my number back to a local (to my residence) Connecticut number. In fact, for $5 each / month you can get a additional "virtual" numbers so that you could get a number in the city where your mother lives (for example) that would be a local call to her. Or you can get a second "business" number that rings on the same phone. And of course, you can also get 800 numbers. AFAICT you could even get a second phone modem box and plug a second phone into it to have two completely separate (home / business?) phone systems running over the internet connection. That would be perfect for the SOHO that needs an inexpensive business phone completely separate from the home phone. This is pretty cool stuff. John W. Colby www.ColbyConsulting.com -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of augusta Sent: Wednesday, January 28, 2004 9:38 AM To: 'Access Developers discussion and problem solving' Subject: RE: [AccessD] Vonage John do you use Time Warner Central NY RR? > -----Original Message----- > From: accessd-bounces at databaseadvisors.com [mailto:accessd- > bounces at databaseadvisors.com] On Behalf Of John W. Colby > Sent: Tuesday, January 27, 2004 6:10 PM > To: Access Developers discussion and problem solving > Subject: RE: [AccessD] Vonage > > ******************************************************************* > Item Quantity Unit Subtotal > ******************************************************************* > Motorola Device 1 $0.00 $0.00 > Area Code: 315 - Syracuse 1 $0.00 $0.00 > Activation Fee 1 $29.99 $29.99 > *Residential Basic 500 1 $14.99 $14.99 > ----------------------------------- > > State Sales Tax: $0.00 > Federal Excise Tax: $1.35 > Regulatory Recovery Fee:$1.50 > Shipping: $9.95 > Total: $57.78 > > * Monthly Recurring Charge. > ******************************************************************* > > This does not include a charge of approximately $30 which you will be > charged for if you do not return the modem at the end of service. > > Now understand that the telephone company charged me a $60 activation fee > when I moved from one location to another location down the road 1/2 mile. > All just to change my billing from one jack to another in a switchboard. > Hmmm... > > In addition, ATM the Vonage $14.99 is a flat monthly fee, no taxes or > other > regulatory charges added. My land line STARTS at 11.53 for flat residence > line, plus 5.78 federal subscriber line charge, plus 1.43 Connecticut > sales > tax, plus .73 federal tax plus .20 E911 surcharge, plus .05 Connecticut > Service Fund, plus .39 number portability charge, plus .56 Universal > Service > fund (local), plus .14 Universal Service Fund (Long Distance). Talk about > nickel and dimeing you to death! > > I NEVER get out with under $25 on a "11.50" phone line, and with all the > "short" long distance, I rarely get out for under ~$35 WITHOUT long > distance, which is $.10/minute. For a couple of years I have used a > prepaid > calling card which I programmed into my phone to get my long distance for > $.039 per minute (slowly inching up, now $.045). > > Of course I also have to pay for my blazing fast internet connection, > which > is a ridiculous $45 / month. Makes the $15 ($25/$35) phone bill seem > rather > inconsequential. But I could never go back to dialup so since I have this > blazing fast internet, I might as well piggyback my phone off of it. > > I am pleased to say it is working great so far. > > John W. Colby > www.ColbyConsulting.com From Helmut.E.Kotsch at t-online.de Wed Jan 28 09:04:52 2004 From: Helmut.E.Kotsch at t-online.de (Helmut Kotsch) Date: Wed, 28 Jan 2004 16:04:52 +0100 Subject: AW: [AccessD] Concatenated stLinkCritria produces Type mismatcherror. In-Reply-To: <2F8793082E00D4119A1700B0D0216BF8022277CF@main2.marlow.com> Message-ID: Drew, thanks for your effort, appreciate it very much. Very good explanation. Think I have to reread it once and a while to keep it in mind. Helmut -----Urspr?ngliche Nachricht----- Von: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]Im Auftrag von DWUTKA at marlow.com Gesendet: Mittwoch, 28. Januar 2004 02:22 An: accessd at databaseadvisors.com Betreff: RE: [AccessD] Concatenated stLinkCritria produces Type mismatcherror. Let's see if I can break it down for you a bit. Double quotes OR single quotes are a string delimiter. Which means, that if either starts a string, that same character has to end the string. Double quotes is usually the one used (like in VBA, a single quote on it's own comments out a line....). So, when building a string, you have nothing to worry about, UNLESS you need to incorporate the delimiter into the string itself. So, if you want: Let's test this. "Let's test this." is the correct string. There is a single quote, but the delimiter isn't used within the string. If you want: Susie said, "I want chocolate ice cream!". Then it get's interesting. However, to represent a double quote, within a string delimited by double quotes, you just put two of them together, so, "Susie said, ""I want chocolate ice cream!""." is the correct string representation. Once you understand the doubling of the delimiter concept, the rest isn't to hard to figure out. So far I've only shown 'full' strings. If you need to put a string together from peices, the SAME rule applies, even though it may look different. If you want to include the dilimiter, you double it. So, if you have : Look for "something". where something is a variable, you would use this: "Look for """ & strSomething & """." Notice, that you have 3 parts to this string. The first part starts and ends with the delimiter ("). The last bit of the first part is a doubling of the double quote, then one more double quote to end the string. (So the delimiter is at the beginning and end of the 'string', and again, the doubling rule puts the delimiter within the string itself....because it's at the end of the segment, there are three in a row, but just remember, that's a double 'delimiter', followed by the delimiter itself...thus three in a row.) The second part is a variable, and is joined to the other parts with the ampersand. The last part, three double quotes, period, double quote, is the delimiter, a doubled delimiter (to represent it in the string on it's own), a period, then the closing delimiter. Now, let's say you want: Something"somethingelse" you would do this: strSomething & """" & strSomethingElse & """" Now you see 4 delimiters. Don't get side tracked. That is really an opening delimiter, the 'doubled' delimiter, and a closing delimiter. So if you saw """""", that produces a string of : "" (open delimiter, 2 doubled delimiters, and a closing delimiter....thus 6 all together, producing 2 double quotes for the contents of the string.) Does that all make sense? Just remember that to represent a delimiter within the string itself, you double the delimiter. Now, not to confuse the issue, but if you look at it even deeper, there is a perfectly logical explanation on how/why this system was developed. Numbers and other variable types are all represented by a specific number of bytes. To you and me 10,300 is 10,300, but to the email program, it's a chr(49), chr(48), chr(44), etc. When I put 10300 in code, the compiler changes the string into 4 bytes (if I am using a long integer variable type). However, a string can be any length (I believe the maximum number of characters for a string in VB/VBA is 2 million, but not positive on that. Since the length is variable, the code has to know where the string starts, and where the string stops, so it knows how much memory it is going to use (since in ASCII, each character takes up 1 byte, and in Unicode they take up 2 bytes.). Because of this, the code needs to know where the string starts and where it stops, so it uses a 'delimiter'. Quite frankly, the reason double quotes seem so difficult to put into strings is because they chose a delimiter normally used within a string. If they had used something like chr(150), which isn't 'typable', it would have been easier to make strings, because when are you going to use chr(150) in normal text, however, it would make looking at most strings hard to see for a programmer. Even if they had used a non-typable character, they couldn't exclude the fact that someone MAY want to use that within the string itself. Thus, no matter what delimiter they were going to use, they had to provide a method of letting that delimiter fall within the string it was delimiting. To do that, they took the double approach. If the code finds the end delimiter, and finds it again, as the next character, it knows that the string isn't REALLY over, because it's been doubled, thus the code simply puts the delimiter within memory as part of the string itself. If it finds the end delimiter, and anything BUT the delimiter afterwards, then it knows it has found the end of that string. Make sense? Drew -----Original Message----- From: Helmut.E.Kotsch at t-online.de [mailto:Helmut.E.Kotsch at t-online.de] Sent: Tuesday, January 27, 2004 6:23 PM To: Access Developers discussion and problem solving Subject: AW: [AccessD] Concatenated stLinkCritria produces Type mismatcherror. Charlotte you are great. Thank you very much. Here I'm sitting at midnight in Germany defining my problem and there you come back within minutes with a workable solution. What is the alternative to using multiple double quotes? (I don't like them either) Where in the world would someone learn / read about the solution you provided. Even though it works, I don't understand it. To be honest, this whole "quotes syntax" (single and double) is a nightmare to me. Again, thanks a lot. Regards and have a nice day. Helmut Kotsch (Helmut.E.Kotsch at t-online.de) -----Ursprungliche Nachricht----- Von: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]Im Auftrag von Charlotte Foust Gesendet: Mittwoch, 28. Januar 2004 00:49 An: Access Developers discussion and problem solving Betreff: RE: [AccessD] Concatenated stLinkCritria produces Type mismatcherror. I don't like to use multiple double quotes like that because it's so hard to read. Your problem is in this line: stLinkCriteria = "[KundenName]=" & "'" & Me![KundenName] & "'" And "[VerbandNr]=" & Me![VerbandNr] Which should be: stLinkCriteria = "[KundenName]=" & "'" & Me![KundenName] & "'" & " And [VerbandNr]=" & Me![VerbandNr] Charlotte Foust -----Original Message----- From: Helmut Kotsch [mailto:Helmut.E.Kotsch at t-online.de] Sent: Tuesday, January 27, 2004 3:11 PM To: accessd at databaseadvisors.com Subject: [AccessD] Concatenated stLinkCritria produces Type mismatch error. Hi, I am trying to open a form where 2 conditions have to be met. When only one conditon (as shown in code below as sample#1 and sample#2) is set than it works ok. Sample#1 ==> OK Dim stDocName As String Dim stLinkCriteria As String stDocName = "VERDI-Kunden" stLinkCriteria = "[KundenName]=" & "'" & Me![KundenName] & "'" DoCmd.OpenForm stDocName, , , stLinkCriteria Sample#2 ==> OK Dim stDocName As String Dim stLinkCriteria As String stDocName = "VERDI-Kunden" stLinkCriteria = "[VerbandNr]=" & Me![VerbandNr] DoCmd.OpenForm stDocName, , , stLinkCriteria However when concatenating both conditions as shown in the following code I get a "Type mismatch" error. Dim stDocName As String Dim stLinkCriteria As String stDocName = "VERDI-Kunden" stLinkCriteria = "[KundenName]=" & "'" & Me![KundenName] & "'" And "[VerbandNr]=" & Me![VerbandNr] DoCmd.OpenForm stDocName, , , stLinkCriteria Hope someone can help before this one drives me grazy. Helmut Kotsch _______________________________________________ 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 _______________________________________________ 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 From jwcolby at colbyconsulting.com Wed Jan 28 09:20:31 2004 From: jwcolby at colbyconsulting.com (John W. Colby) Date: Wed, 28 Jan 2004 10:20:31 -0500 Subject: [AccessD] Vonage In-Reply-To: <20040128144735.IDCX16454.tomts6-srv.bellnexxia.net@smtp.bellnexxia.net> Message-ID: Right, sorry. It's just been sooooo dead lately I thought I'd brighten things up a bit. ;-) John W. Colby www.ColbyConsulting.com -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Bryan Carbonnell Sent: Wednesday, January 28, 2004 9:47 AM To: accessd at databaseadvisors.com Subject: RE: [AccessD] Vonage OK folks, While VoIP may be an interesting technology, its discussion does not belong here on AccessD. If you want to continue the discussion, please do so over on DBA-Tech. Thanks, You loving Listmater.... -- Bryan Carbonnell - carbonnb at sympatico.ca Unfortunately common sense isn't so common! _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From carbonnb at sympatico.ca Wed Jan 28 09:32:09 2004 From: carbonnb at sympatico.ca (Bryan Carbonnell) Date: Wed, 28 Jan 2004 10:32:09 -0500 Subject: [AccessD] Vonage Message-ID: <20040128153234.WVO16714.tomts27-srv.bellnexxia.net@smtp.bellnexxia.net> > From: "John W. Colby" > Right, sorry. It's just been sooooo dead lately I thought I'd brighten > things up a bit. ;-) That's one of the reasons it was allowed to go on for a week. That and I'm just trying to catch up on my backlog :-)) -- Bryan Carbonnell - carbonnb at sympatico.ca Unfortunately common sense isn't so common! From John.Clark at niagaracounty.com Wed Jan 28 09:38:42 2004 From: John.Clark at niagaracounty.com (John Clark) Date: Wed, 28 Jan 2004 10:38:42 -0500 Subject: [AccessD] Question of process Message-ID: I am beginning a new project. The purpose of this program will be to track indictment cases for the District Attorney's office. My question isn't so much technical, like usual, but rather 'technique'. I'll start with a scenario: Lets say I am a Asst. DA, so I am in the system as such. Then after a couple of years, I go into private practice and become a defense attorney; I may now be in the system as the lawyer for a defendant. Now let's assume that I am assaulted and my attacker is charged, so now I am in this system as a victim of this case. Finally, I cross over to the dark side (I know lawyers are already there), and I am indicted for a crime of my own. I will now be in the system as a defendant, a victim, a defense attorney, and an ADA...these last two, very probably, several times. My situation is that I would like to bring up every instance of a person fitting this description, or similar ones. For Instance a report of the previous example might produce the following: JOHN W CLARK #2001-023 ADA #2001-102 ADA #2001-140 ADA #2002-334 ATTORNEY #2003-153 ATTORNEY #2003-543 VICTIM #2003-654 ATTORNEY #2004-030 DEFENDANT I had originally thought to create a table for the 'types' (i.e. attorney, ADA, victim, etc.), a table with names and personal info, an indictment table, and link these all via a fourth table, but this soon seemed insufficient. The average indictment number will have at least five people connected to it (Defendant, Attorney, ADA, Victim, and Judge), and possibly many more, with multiple victims and/or co-defendants. Am I over thinking this? Would it just be as simple as having a table for each type and searching these tables by indictment number later in the program? I thought that maybe, by typing this out, it would be clearer in my mind, by the time I was done, but I am still fuzzy with it! Thanks for any insight or advise you could give me! John W Clark From jeffrey.demulling at usbank.com Wed Jan 28 09:55:33 2004 From: jeffrey.demulling at usbank.com (jeffrey.demulling at usbank.com) Date: Wed, 28 Jan 2004 09:55:33 -0600 Subject: [AccessD] Question of process Message-ID: Maybe a table like the following: Case Type Name #2001-023 ADA John W. Clark #2001-102 ADA John W. Clark #2001-140 ADA John W. Clark #2002-334 ATTORNEY John W. Clark #2003-153 ATTORNEY John W. Clark #2003-543 VICTIM John W. Clark #2003-654 ATTORNEY John W. Clark #2004-030 DEFENDANT John W. Clark Then maybe when entering the data in the system you have the user input all of the parties to the case and the type of party they are. So the input form would be something like Name: <> Type: <> "John Clark" cc: Sent by: Subject: [AccessD] Question of process accessd-bounces at databasead visors.com 01/28/2004 09:38 AM Please respond to "Access Developers discussion and problem solving" I am beginning a new project. The purpose of this program will be to track indictment cases for the District Attorney's office. My question isn't so much technical, like usual, but rather 'technique'. I'll start with a scenario: Lets say I am a Asst. DA, so I am in the system as such. Then after a couple of years, I go into private practice and become a defense attorney; I may now be in the system as the lawyer for a defendant. Now let's assume that I am assaulted and my attacker is charged, so now I am in this system as a victim of this case. Finally, I cross over to the dark side (I know lawyers are already there), and I am indicted for a crime of my own. I will now be in the system as a defendant, a victim, a defense attorney, and an ADA...these last two, very probably, several times. My situation is that I would like to bring up every instance of a person fitting this description, or similar ones. For Instance a report of the previous example might produce the following: JOHN W CLARK #2001-023 ADA #2001-102 ADA #2001-140 ADA #2002-334 ATTORNEY #2003-153 ATTORNEY #2003-543 VICTIM #2003-654 ATTORNEY #2004-030 DEFENDANT I had originally thought to create a table for the 'types' (i.e. attorney, ADA, victim, etc.), a table with names and personal info, an indictment table, and link these all via a fourth table, but this soon seemed insufficient. The average indictment number will have at least five people connected to it (Defendant, Attorney, ADA, Victim, and Judge), and possibly many more, with multiple victims and/or co-defendants. Am I over thinking this? Would it just be as simple as having a table for each type and searching these tables by indictment number later in the program? I thought that maybe, by typing this out, it would be clearer in my mind, by the time I was done, but I am still fuzzy with it! Thanks for any insight or advise you could give me! John W Clark _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From jwcolby at colbyconsulting.com Wed Jan 28 10:08:09 2004 From: jwcolby at colbyconsulting.com (John W. Colby) Date: Wed, 28 Jan 2004 11:08:09 -0500 Subject: [AccessD] Question of process In-Reply-To: Message-ID: Just off the top of my head: PE_ID Autonumber (of course) ;-) PE_LName text - Person Last Name PE_FName text - Person First Name CT_ID Autonumber - contact type ID CT_Type Text - Type of contact CA_ID Autonumber - Case ID CA_Number text - Case Number CA_OtherStuff - Other fields PECA_ID Autonumber - Person Case ID PECA_IDPE long - Person ID PECA_IDCA long - Case ID PECA_IDCT long - Contact Type The first two tables are your two "main" tables, people and cases. The third is a contact type (Attorney, defendant etc) The fourth is a many-many which relates people and cases with a contact type. Something of that nature anyway. John W. Colby www.ColbyConsulting.com -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of John Clark Sent: Wednesday, January 28, 2004 10:39 AM To: accessd at databaseadvisors.com Subject: [AccessD] Question of process I am beginning a new project. The purpose of this program will be to track indictment cases for the District Attorney's office. My question isn't so much technical, like usual, but rather 'technique'. I'll start with a scenario: Lets say I am a Asst. DA, so I am in the system as such. Then after a couple of years, I go into private practice and become a defense attorney; I may now be in the system as the lawyer for a defendant. Now let's assume that I am assaulted and my attacker is charged, so now I am in this system as a victim of this case. Finally, I cross over to the dark side (I know lawyers are already there), and I am indicted for a crime of my own. I will now be in the system as a defendant, a victim, a defense attorney, and an ADA...these last two, very probably, several times. My situation is that I would like to bring up every instance of a person fitting this description, or similar ones. For Instance a report of the previous example might produce the following: JOHN W CLARK #2001-023 ADA #2001-102 ADA #2001-140 ADA #2002-334 ATTORNEY #2003-153 ATTORNEY #2003-543 VICTIM #2003-654 ATTORNEY #2004-030 DEFENDANT I had originally thought to create a table for the 'types' (i.e. attorney, ADA, victim, etc.), a table with names and personal info, an indictment table, and link these all via a fourth table, but this soon seemed insufficient. The average indictment number will have at least five people connected to it (Defendant, Attorney, ADA, Victim, and Judge), and possibly many more, with multiple victims and/or co-defendants. Am I over thinking this? Would it just be as simple as having a table for each type and searching these tables by indictment number later in the program? I thought that maybe, by typing this out, it would be clearer in my mind, by the time I was done, but I am still fuzzy with it! Thanks for any insight or advise you could give me! John W Clark _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From paul.hartland at fsmail.net Wed Jan 28 03:28:17 2004 From: paul.hartland at fsmail.net (paul.hartland at fsmail.net) Date: Wed, 28 Jan 2004 10:28:17 +0100 (CET) Subject: [AccessD] [dba-VB] Text File Into Access Using Visual Basic 6 Message-ID: <13710544.1075282097676.JavaMail.www@wwinf3005> To all, Can anyone tell me (preferably with sample code, if possible), what is the fastest way to import a .txt file into a predefined table in access via Visual Basic 6. My .txt file contains roughly 365,876 records with two fields ? Barcode, Price. This has to be imported into an Access table also containing two fields Barcode (text), Price (Number, Double, Fixed, 2 decimal places). The .txt file is comma delimited. I?m using Access XP and Visual Basic 6.0 as the front-end. Thanks in advance for any help as, this project needs to be ready for Monday morning Paul Hartland Freeserve AnyTime - HALF PRICE for the first 3 months - Save ?7.50 a month www.freeserve.com/anytime _______________________________________________ dba-VB mailing list dba-VB at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/dba-vb http://www.databaseadvisors.com From gustav at cactus.dk Wed Jan 28 10:17:26 2004 From: gustav at cactus.dk (Gustav Brock) Date: Wed, 28 Jan 2004 17:17:26 +0100 Subject: [AccessD] Question of process In-Reply-To: References: Message-ID: <14532431293.20040128171726@cactus.dk> Hi John One option is to add properties to the persons with "check-in" and "check-out" times, i.e - for each property - when this was assigned and when it was revoked and the type of property for this period. Thus you may have overlapping assignments of properties, temporary assignments and the full log or history of these assignments as well as current status. These properties should have their own properties as needed, some would be which other assignments, if any, each property could (not) coexist with. Following the same route, you could assign addresses, e-mail account, phone no. etc. to the persons; say, when a person moves, invalidate the old address by that date and record the new address to be valid from that date. Again, you'll be able to track a person's addresses over time while maintaining current location. /gustav > I am beginning a new project. The purpose of this program will be to > track indictment cases for the District Attorney's office. My question > isn't so much technical, like usual, but rather 'technique'. > I'll start with a scenario: > Lets say I am a Asst. DA, so I am in the system as such. Then after a > couple of years, I go into private practice and become a defense > attorney; I may now be in the system as the lawyer for a defendant. Now > let's assume that I am assaulted and my attacker is charged, so now I am > in this system as a victim of this case. Finally, I cross over to the > dark side (I know lawyers are already there), and I am indicted for a > crime of my own. I will now be in the system as a defendant, a victim, a > defense attorney, and an ADA...these last two, very probably, several > times. > My situation is that I would like to bring up every instance of a > person fitting this description, or similar ones. For Instance a report > of the previous example might produce the following: > JOHN W CLARK > #2001-023 ADA > #2001-102 ADA > #2001-140 ADA > #2002-334 ATTORNEY > #2003-153 ATTORNEY > #2003-543 VICTIM > #2003-654 ATTORNEY > #2004-030 DEFENDANT > I had originally thought to create a table for the 'types' (i.e. > attorney, ADA, victim, etc.), a table with names and personal info, an > indictment table, and link these all via a fourth table, but this soon > seemed insufficient. The average indictment number will have at least > five people connected to it (Defendant, Attorney, ADA, Victim, and > Judge), and possibly many more, with multiple victims and/or > co-defendants. > Am I over thinking this? Would it just be as simple as having a table > for each type and searching these tables by indictment number later in > the program? > I thought that maybe, by typing this out, it would be clearer in my > mind, by the time I was done, but I am still fuzzy with it! > Thanks for any insight or advise you could give me! > John W Clark From rl_stewart at highstream.net Wed Jan 28 10:56:47 2004 From: rl_stewart at highstream.net (Robert L. Stewart) Date: Wed, 28 Jan 2004 10:56:47 -0600 Subject: [AccessD] Re: Concatenated stLinkCritria produces Type mismatch In-Reply-To: <200401280244.i0S2imm26594@databaseadvisors.com> Message-ID: <5.1.0.14.2.20040128105124.02937368@pop3.highstream.net> Personally, I do not use the criteria on the form. I will base the form on a query. I just change the SQL for the query before opening the form. I use the same technique for reports. After doing it a couple of times, I think you will find it simple. If you need a code sample for the process, I can send it out to the list. Robert At 08:44 PM 1/27/2004 -0600, you wrote: >Date: Wed, 28 Jan 2004 11:03:57 +1000 >From: "Stuart McLachlan" >Subject: RE: [AccessD] Concatenated stLinkCritria produces Type > mismatcher ror. >To: Access Developers discussion and problem solving > >Message-ID: <4017971D.17970.2E2ECEE6 at localhost> >Content-Type: text/plain; charset=US-ASCII > >If it's only once or twice in an app, I also prefer to "avoid stranded >quotes". If there is going to be quite a bit of building such strings, I >prefer to do this: > >Function SQuote(BaseString as String) as String > SQuote = Chr$(39) & BaseString & Chr$(39) >EndFunction > >Function DQuote(BaseString as String) as String > DQuote = Chr$(34) & BaseString & Chr$(34) >EndFunction > > >Then I use: > >stLinkCriteria = "[KundenName]=" & SQuote(Me![KundenName]) & " And >[VerbandNr]=" & Me![VerbandNr] > >or > >stLinkCriteria = "[KundenName]=" & DQuote(Me![KundenName]) & " And >[VerbandNr]=" & Me![VerbandNr] > > > >On 27 Jan 2004 at 18:46, Brett Barabash wrote: > > > Personally, (and this is simply preference, I'm sure others will argue) I > > prefer also avoiding "stranded" quotes, so > > > > stLinkCriteria = "[KundenName]=" & "'" & Me![KundenName] & "'" & " And > > [VerbandNr]=" & Me![VerbandNr] > > > > Becomes: > > > > stLinkCriteria = "[KundenName]='" & Me![KundenName] & "' And > [VerbandNr]=" & > > Me![VerbandNr] > > > > Less string concatenation that way. The only catch is if your code window > > uses a sans serif font like Arial, Tahoma, etc, the quotes tend to mush > > together making my method less readable. Otherwise, I find it much easier > > to debug. > > > > > > -----Original Message----- > > From: Helmut.E.Kotsch at t-online.de [mailto:Helmut.E.Kotsch at t-online.de] > > Sent: Tuesday, January 27, 2004 6:23 PM > > To: Access Developers discussion and problem solving > > Subject: AW: [AccessD] Concatenated stLinkCritria produces Type > > mismatcherror. > > > > > > Charlotte you are great. Thank you very much. Here I'm sitting at midnight > > in Germany defining my problem and there you come back within minutes > with a > > workable solution. > > What is the alternative to using multiple double quotes? (I don't like them > > either) > > Where in the world would someone learn / read about the solution you > > provided. Even though it works, I don't understand it. > > To be honest, this whole "quotes syntax" (single and double) is a nightmare > > to me. > > > > Again, thanks a lot. > > Regards and have a nice day. > > > > Helmut Kotsch > > > > (Helmut.E.Kotsch at t-online.de) > > > > > > -----Ursprungliche Nachricht----- > > Von: accessd-bounces at databaseadvisors.com > > [mailto:accessd-bounces at databaseadvisors.com]Im Auftrag von Charlotte > > Foust > > Gesendet: Mittwoch, 28. Januar 2004 00:49 > > An: Access Developers discussion and problem solving > > Betreff: RE: [AccessD] Concatenated stLinkCritria produces Type > > mismatcherror. > > > > > > I don't like to use multiple double quotes like that because it's so > > hard to read. Your problem is in this line: > > > > stLinkCriteria = "[KundenName]=" & "'" & Me![KundenName] & "'" And > > "[VerbandNr]=" & Me![VerbandNr] > > > > Which should be: > > > > stLinkCriteria = "[KundenName]=" & "'" & Me![KundenName] & "'" & " > > And [VerbandNr]=" & Me![VerbandNr] > > > > Charlotte Foust > > > > -----Original Message----- > > From: Helmut Kotsch [mailto:Helmut.E.Kotsch at t-online.de] > > Sent: Tuesday, January 27, 2004 3:11 PM > > To: accessd at databaseadvisors.com > > Subject: [AccessD] Concatenated stLinkCritria produces Type mismatch > > error. > > > > > > Hi, > > I am trying to open a form where 2 conditions have to be met. When only > > one conditon (as shown in code below as sample#1 and sample#2) is set > > than it works ok. > > > > Sample#1 ==> OK > > > > Dim stDocName As String > > Dim stLinkCriteria As String > > stDocName = "VERDI-Kunden" > > stLinkCriteria = "[KundenName]=" & "'" & Me![KundenName] & "'" > > DoCmd.OpenForm stDocName, , , stLinkCriteria > > > > Sample#2 ==> OK > > > > Dim stDocName As String > > Dim stLinkCriteria As String > > stDocName = "VERDI-Kunden" > > stLinkCriteria = "[VerbandNr]=" & Me![VerbandNr] > > DoCmd.OpenForm stDocName, , , stLinkCriteria > > > > However when concatenating both conditions as shown in the following > > code I get a "Type mismatch" error. > > > > Dim stDocName As String > > Dim stLinkCriteria As String > > stDocName = "VERDI-Kunden" > > stLinkCriteria = "[KundenName]=" & "'" & Me![KundenName] & "'" And > > "[VerbandNr]=" & Me![VerbandNr] > > DoCmd.OpenForm stDocName, , , stLinkCriteria > > > > Hope someone can help before this one drives me grazy. > > > > > > Helmut Kotsch From James at fcidms.com Wed Jan 28 11:14:00 2004 From: James at fcidms.com (James Barash) Date: Wed, 28 Jan 2004 12:14:00 -0500 Subject: [AccessD] [dba-VB] Text File Into Access Using Visual Basic 6 In-Reply-To: Message-ID: Paul: Here is some code I've used. It's modified from some VB.net code but it should work appropriately using ADO. Public sub ImportTextFile(strConnectionString as string, strFilePath as string, strFileName as string, Optional strHeader as string = "NO") Dim cmdTestCommand As ADODB.Command Dim connTestConnection as ADODB.Connection Dim strHeader as string Dim strSQL as string set connTestConnection = new ADODB.Connection connTestConnection.ConnectionString = strConnectionString connTestConnection.Open set cmdTestCommand = new ADODB.command set cmdTestCommand.ActiveConnection = connTestConnection strSQL = "Insert into [" & strTableName & "] Select [BarCode], [Price] FROM [Text;DATABASE=" & strFilePath & ";HDR=" & strHeader & "].[" & strFileName & "]" cmdTestCommand.CommandText = strSQL cmdTestCommand.CommandType = adCmdText cmdTestCommand.Execute , , adExecuteNoRecords connTestConnection.Close set cmdTestCommand = nothing set connTestConnection = nothing End Sub This assumes a file with no header row. If you have a header row, you need to change strHeader = "YES" and the field names in the header need to match those in the table or you need to modify the Insert statement to alias the files field names to match the table field names. You need to supply a string for the Connection String to your mdb file, a string for the Path of the text file and a string for the name of the text file. I left out error checking but certainly you'd want to make sure the files exist first. Also, you need to make sure the text file is properly formatted and all the data matches your table definition. Hope this helps. James Barash -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of paul.hartland at fsmail.net Sent: Wednesday, January 28, 2004 4:28 AM To: dba-vb Cc: accessd Subject: [AccessD] [dba-VB] Text File Into Access Using Visual Basic 6 To all, Can anyone tell me (preferably with sample code, if possible), what is the fastest way to import a .txt file into a predefined table in access via Visual Basic 6. My .txt file contains roughly 365,876 records with two fields ? Barcode, Price. This has to be imported into an Access table also containing two fields Barcode (text), Price (Number, Double, Fixed, 2 decimal places). The .txt file is comma delimited. I?m using Access XP and Visual Basic 6.0 as the front-end. Thanks in advance for any help as, this project needs to be ready for Monday morning Paul Hartland Freeserve AnyTime - HALF PRICE for the first 3 months - Save ?7.50 a month www.freeserve.com/anytime _______________________________________________ dba-VB mailing list dba-VB at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/dba-vb http://www.databaseadvisors.com _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From jimdettman at earthlink.net Wed Jan 28 11:52:51 2004 From: jimdettman at earthlink.net (Jim Dettman) Date: Wed, 28 Jan 2004 12:52:51 -0500 Subject: [AccessD] Vonage In-Reply-To: <200401281438.i0SEcElL005870@ms-smtp-03.nyroc.rr.com> Message-ID: <> I do. I'm just North of Syracuse in Cicero. Jim Dettman President, Online Computer Services of WNY, Inc. (315) 699-3443 jimdettman at earthlink.net -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of augusta Sent: Wednesday, January 28, 2004 9:38 AM To: 'Access Developers discussion and problem solving' Subject: RE: [AccessD] Vonage John do you use Time Warner Central NY RR? > -----Original Message----- > From: accessd-bounces at databaseadvisors.com [mailto:accessd- > bounces at databaseadvisors.com] On Behalf Of John W. Colby > Sent: Tuesday, January 27, 2004 6:10 PM > To: Access Developers discussion and problem solving > Subject: RE: [AccessD] Vonage > > ******************************************************************* > Item Quantity Unit Subtotal > ******************************************************************* > Motorola Device 1 $0.00 $0.00 > Area Code: 315 - Syracuse 1 $0.00 $0.00 > Activation Fee 1 $29.99 $29.99 > *Residential Basic 500 1 $14.99 $14.99 > ----------------------------------- > > State Sales Tax: $0.00 > Federal Excise Tax: $1.35 > Regulatory Recovery Fee:$1.50 > Shipping: $9.95 > Total: $57.78 > > * Monthly Recurring Charge. > ******************************************************************* > > This does not include a charge of approximately $30 which you will be > charged for if you do not return the modem at the end of service. > > Now understand that the telephone company charged me a $60 activation fee > when I moved from one location to another location down the road 1/2 mile. > All just to change my billing from one jack to another in a switchboard. > Hmmm... > > In addition, ATM the Vonage $14.99 is a flat monthly fee, no taxes or > other > regulatory charges added. My land line STARTS at 11.53 for flat residence > line, plus 5.78 federal subscriber line charge, plus 1.43 Connecticut > sales > tax, plus .73 federal tax plus .20 E911 surcharge, plus .05 Connecticut > Service Fund, plus .39 number portability charge, plus .56 Universal > Service > fund (local), plus .14 Universal Service Fund (Long Distance). Talk about > nickel and dimeing you to death! > > I NEVER get out with under $25 on a "11.50" phone line, and with all the > "short" long distance, I rarely get out for under ~$35 WITHOUT long > distance, which is $.10/minute. For a couple of years I have used a > prepaid > calling card which I programmed into my phone to get my long distance for > $.039 per minute (slowly inching up, now $.045). > > Of course I also have to pay for my blazing fast internet connection, > which > is a ridiculous $45 / month. Makes the $15 ($25/$35) phone bill seem > rather > inconsequential. But I could never go back to dialup so since I have this > blazing fast internet, I might as well piggyback my phone off of it. > > I am pleased to say it is working great so far. > > John W. Colby > www.ColbyConsulting.com > > -----Original Message----- > From: accessd-bounces at databaseadvisors.com > [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Christopher > Hawkins > Sent: Tuesday, January 27, 2004 5:23 PM > To: accessd at databaseadvisors.com > Subject: RE: [AccessD] Vonage > > > $15/month sounds great, but what about setup fees or equipment > expenses? What's the "out the door" price look like? > > -Christopher- > > ---- Original Message ---- > From: JColby at dispec.com > To: accessd at databaseadvisors.com, > Subject: RE: [AccessD] Vonage > Date: Tue, 27 Jan 2004 15:05:07 -0500 > > >I received the phonemodem last night. Plugged it in (behind my > >router for > >those interested), waited 5 minutes, then picked up the receiver and > >made a > >call. Extremely easy to set up. > > > >The sound so far is crystal clear, no clicks / pops or echoes. I > >have a > >brand new ATT 2ghz cordless phone system which I plugged in to it. > >I can't > >tell the difference between this and the landline. > > > >I haven't done any heavy duty uploads / downloads though I will be > >doing > >some testing in the next few days. > > > >I went with the $15 / month package for 500 total minutes - local > >and long > >distance, with anything after that billed at $.039 / minute. If my > >useage > >averages more than 500 minutes I'll move up to the $25 package with > >unlimited local and 500 long distance minutes. Given my useage > >patterns I > >may very well end up with a $15 / month phone including long > >distance. > > > >So far so good. > > > >John W. Colby > >The database guy > > > _______________________________________________ > 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 From bchacc at san.rr.com Wed Jan 28 12:06:43 2004 From: bchacc at san.rr.com (Rocky Smolin - Beach Access Software) Date: Wed, 28 Jan 2004 10:06:43 -0800 Subject: [AccessD] Error 2468 - You can't carry out this action at the present time. Message-ID: <005c01c3e5c9$7cb85bf0$6601a8c0@HAL9002> Dear List: I am getting the following error message on a bound form: Error 2468 - You can't carry out this action at the present time. This form has a sub form linked to the main form by the main form's primary key. (Main form is P.O. Header, subform is P.O. Detail). I get this error if I try to delete two records in a row. DoCmd.SetWarnings False DoCmd.DoMenuItem acFormBar, acEditMenu, 8, , acMenuVer70 DoCmd.DoMenuItem acFormBar, acEditMenu, 6, , acMenuVer70 DoCmd.SetWarnings True I also get this error after I try to add a record. The problem started because I wanted to get the last PO in the file, add one to the PO number, and put the prefix and the new PO number ito the new record: DoCmd.GoToRecord , , acNewRec 'If rstPOHeader.RecordCount <> 0 Then ' rstPOHeader.MoveLast ' Me.fldPOPrefix = Nz(rstPOHeader!fldPOPrefix) ' If IsNumeric(rstPOHeader!fldPONumber) Then ' Me.fldPONumber = rstPOHeader!fldPONumber + 1 ' fldPOOrderDate.SetFocus ' Else ' Me.fldPONumber.SetFocus ' End If 'End If 'If Nz(Me.fldPOPrefix) = "" And Nz(rstPOHeader!fldPOPrefix) = "" Then _ Me.fldPOPrefix.SetFocus Right now the code is commented out. If I uncomment the two lines: ' rstPOHeader.MoveLast ' Me.fldPOPrefix = Nz(rstPOHeader!fldPOPrefix) I get the error when I try to save: DoCmd.DoMenuItem acFormBar, acRecordsMenu, acSaveRecord, , acMenuVer70 I checked the web and there is nothing. Has anyone encountered this before? Thanks and regards, Rocky Smolin Beach Access Software From jwcolby at colbyconsulting.com Wed Jan 28 12:11:47 2004 From: jwcolby at colbyconsulting.com (John W. Colby) Date: Wed, 28 Jan 2004 13:11:47 -0500 Subject: [AccessD] Vonage In-Reply-To: Message-ID: We should have lunch some time. My Sister-In-Law lives in Syracuse and we get over there quite often (in good weather). John W. Colby www.ColbyConsulting.com -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Jim Dettman Sent: Wednesday, January 28, 2004 12:53 PM To: Access Developers discussion and problem solving Subject: RE: [AccessD] Vonage <> I do. I'm just North of Syracuse in Cicero. Jim Dettman President, Online Computer Services of WNY, Inc. (315) 699-3443 jimdettman at earthlink.net -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of augusta Sent: Wednesday, January 28, 2004 9:38 AM To: 'Access Developers discussion and problem solving' Subject: RE: [AccessD] Vonage John do you use Time Warner Central NY RR? > -----Original Message----- > From: accessd-bounces at databaseadvisors.com [mailto:accessd- > bounces at databaseadvisors.com] On Behalf Of John W. Colby > Sent: Tuesday, January 27, 2004 6:10 PM > To: Access Developers discussion and problem solving > Subject: RE: [AccessD] Vonage > > ******************************************************************* > Item Quantity Unit Subtotal > ******************************************************************* > Motorola Device 1 $0.00 $0.00 > Area Code: 315 - Syracuse 1 $0.00 $0.00 > Activation Fee 1 $29.99 $29.99 > *Residential Basic 500 1 $14.99 $14.99 > ----------------------------------- > > State Sales Tax: $0.00 > Federal Excise Tax: $1.35 > Regulatory Recovery Fee:$1.50 > Shipping: $9.95 > Total: $57.78 > > * Monthly Recurring Charge. > ******************************************************************* > > This does not include a charge of approximately $30 which you will be > charged for if you do not return the modem at the end of service. > > Now understand that the telephone company charged me a $60 activation fee > when I moved from one location to another location down the road 1/2 mile. > All just to change my billing from one jack to another in a switchboard. > Hmmm... > > In addition, ATM the Vonage $14.99 is a flat monthly fee, no taxes or > other > regulatory charges added. My land line STARTS at 11.53 for flat residence > line, plus 5.78 federal subscriber line charge, plus 1.43 Connecticut > sales > tax, plus .73 federal tax plus .20 E911 surcharge, plus .05 Connecticut > Service Fund, plus .39 number portability charge, plus .56 Universal > Service > fund (local), plus .14 Universal Service Fund (Long Distance). Talk about > nickel and dimeing you to death! > > I NEVER get out with under $25 on a "11.50" phone line, and with all the > "short" long distance, I rarely get out for under ~$35 WITHOUT long > distance, which is $.10/minute. For a couple of years I have used a > prepaid > calling card which I programmed into my phone to get my long distance for > $.039 per minute (slowly inching up, now $.045). > > Of course I also have to pay for my blazing fast internet connection, > which > is a ridiculous $45 / month. Makes the $15 ($25/$35) phone bill seem > rather > inconsequential. But I could never go back to dialup so since I have this > blazing fast internet, I might as well piggyback my phone off of it. > > I am pleased to say it is working great so far. > > John W. Colby > www.ColbyConsulting.com > > -----Original Message----- > From: accessd-bounces at databaseadvisors.com > [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Christopher > Hawkins > Sent: Tuesday, January 27, 2004 5:23 PM > To: accessd at databaseadvisors.com > Subject: RE: [AccessD] Vonage > > > $15/month sounds great, but what about setup fees or equipment > expenses? What's the "out the door" price look like? > > -Christopher- > > ---- Original Message ---- > From: JColby at dispec.com > To: accessd at databaseadvisors.com, > Subject: RE: [AccessD] Vonage > Date: Tue, 27 Jan 2004 15:05:07 -0500 > > >I received the phonemodem last night. Plugged it in (behind my > >router for > >those interested), waited 5 minutes, then picked up the receiver and > >made a > >call. Extremely easy to set up. > > > >The sound so far is crystal clear, no clicks / pops or echoes. I > >have a > >brand new ATT 2ghz cordless phone system which I plugged in to it. > >I can't > >tell the difference between this and the landline. > > > >I haven't done any heavy duty uploads / downloads though I will be > >doing > >some testing in the next few days. > > > >I went with the $15 / month package for 500 total minutes - local > >and long > >distance, with anything after that billed at $.039 / minute. If my > >useage > >averages more than 500 minutes I'll move up to the $25 package with > >unlimited local and 500 long distance minutes. Given my useage > >patterns I > >may very well end up with a $15 / month phone including long > >distance. > > > >So far so good. > > > >John W. Colby > >The database guy > > > _______________________________________________ > 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 _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From ranthony at wrsystems.com Wed Jan 28 12:31:01 2004 From: ranthony at wrsystems.com (Randall Anthony) Date: Wed, 28 Jan 2004 13:31:01 -0500 Subject: [AccessD] Error 2468 - You can't carry out this action at the present time. Message-ID: <5F21A4E8B8DD734992EF9E70AC9D3064128A0E@mail2.wrsystems.com> Right off the top of my head, it has to do with the movefirst, movelast. I ran into this when converting A97 to A2K. Code worked in A97, not A2K and M$ said this was designed behavior. I'll try to find the article. -----Original Message----- From: Rocky Smolin - Beach Access Software [mailto:bchacc at san.rr.com] Sent: Wednesday, January 28, 2004 1:07 PM To: AccessD at databaseadvisors.com Subject: [AccessD] Error 2468 - You can't carry out this action at the present time. Dear List: I am getting the following error message on a bound form: Error 2468 - You can't carry out this action at the present time. This form has a sub form linked to the main form by the main form's primary key. (Main form is P.O. Header, subform is P.O. Detail). I get this error if I try to delete two records in a row. DoCmd.SetWarnings False DoCmd.DoMenuItem acFormBar, acEditMenu, 8, , acMenuVer70 DoCmd.DoMenuItem acFormBar, acEditMenu, 6, , acMenuVer70 DoCmd.SetWarnings True I also get this error after I try to add a record. The problem started because I wanted to get the last PO in the file, add one to the PO number, and put the prefix and the new PO number ito the new record: DoCmd.GoToRecord , , acNewRec 'If rstPOHeader.RecordCount <> 0 Then ' rstPOHeader.MoveLast ' Me.fldPOPrefix = Nz(rstPOHeader!fldPOPrefix) ' If IsNumeric(rstPOHeader!fldPONumber) Then ' Me.fldPONumber = rstPOHeader!fldPONumber + 1 ' fldPOOrderDate.SetFocus ' Else ' Me.fldPONumber.SetFocus ' End If 'End If 'If Nz(Me.fldPOPrefix) = "" And Nz(rstPOHeader!fldPOPrefix) = "" Then _ Me.fldPOPrefix.SetFocus Right now the code is commented out. If I uncomment the two lines: ' rstPOHeader.MoveLast ' Me.fldPOPrefix = Nz(rstPOHeader!fldPOPrefix) I get the error when I try to save: DoCmd.DoMenuItem acFormBar, acRecordsMenu, acSaveRecord, , acMenuVer70 I checked the web and there is nothing. Has anyone encountered this before? Thanks and regards, Rocky Smolin Beach Access Software _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From prodevmg at yahoo.com Wed Jan 28 12:49:21 2004 From: prodevmg at yahoo.com (Lonnie Johnson) Date: Wed, 28 Jan 2004 10:49:21 -0800 (PST) Subject: [AccessD] Access 97 to XP In-Reply-To: <5F21A4E8B8DD734992EF9E70AC9D3064128A0E@mail2.wrsystems.com> Message-ID: <20040128184921.50232.qmail@web20412.mail.yahoo.com> I am converting an application from 97 to XP. I have "unchecked" the box that says hide database window in the startup menu. However, I still get TWO access db icons on my task bar. One has my custom menu I have in the autoexec, the other has the database window and it's objects. Am I missing something here in XP? Lonnie Johnson ProDev, Professional Development of MS Access Databases Visit me at ==> http://www.prodev.us --------------------------------- Do you Yahoo!? Yahoo! SiteBuilder - Free web site building tool. Try it! From stephen at bondsoftware.co.nz Wed Jan 28 12:54:52 2004 From: stephen at bondsoftware.co.nz (Stephen Bond) Date: Thu, 29 Jan 2004 07:54:52 +1300 Subject: [AccessD] Access 97 to XP Message-ID: <70F3D727890C784291D8433E9C418F290885B2@server.bondsoftware.co.nz> Tools > Options > View > Windows in Taskbar (uncheck) > -----Original Message----- > From: Lonnie Johnson [mailto:prodevmg at yahoo.com] > Sent: Thursday, 29 January 2004 7:49 a.m. > To: Access Developers discussion and problem solving > Subject: [AccessD] Access 97 to XP > > > > I am converting an application from 97 to XP. I have > "unchecked" the box that says hide database window in the > startup menu. However, I still get TWO access db icons on my > task bar. One has my custom menu I have in the autoexec, the > other has the database window and it's objects. Am I missing > something here in XP? > > > > Lonnie Johnson > ProDev, Professional Development of MS Access Databases > Visit me at ==> http://www.prodev.us > > > > > > > > > > --------------------------------- > Do you Yahoo!? > Yahoo! SiteBuilder - Free web site building tool. Try it! > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com > From jimdettman at earthlink.net Wed Jan 28 12:59:32 2004 From: jimdettman at earthlink.net (Jim Dettman) Date: Wed, 28 Jan 2004 13:59:32 -0500 Subject: [AccessD] Vonage In-Reply-To: Message-ID: John, <> Definitely. <<(in good weather)>> Definitely Jim -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of John W. Colby Sent: Wednesday, January 28, 2004 1:12 PM To: Access Developers discussion and problem solving Subject: RE: [AccessD] Vonage We should have lunch some time. My Sister-In-Law lives in Syracuse and we get over there quite often (in good weather). John W. Colby www.ColbyConsulting.com -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Jim Dettman Sent: Wednesday, January 28, 2004 12:53 PM To: Access Developers discussion and problem solving Subject: RE: [AccessD] Vonage <> I do. I'm just North of Syracuse in Cicero. Jim Dettman President, Online Computer Services of WNY, Inc. (315) 699-3443 jimdettman at earthlink.net -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of augusta Sent: Wednesday, January 28, 2004 9:38 AM To: 'Access Developers discussion and problem solving' Subject: RE: [AccessD] Vonage John do you use Time Warner Central NY RR? > -----Original Message----- > From: accessd-bounces at databaseadvisors.com [mailto:accessd- > bounces at databaseadvisors.com] On Behalf Of John W. Colby > Sent: Tuesday, January 27, 2004 6:10 PM > To: Access Developers discussion and problem solving > Subject: RE: [AccessD] Vonage > > ******************************************************************* > Item Quantity Unit Subtotal > ******************************************************************* > Motorola Device 1 $0.00 $0.00 > Area Code: 315 - Syracuse 1 $0.00 $0.00 > Activation Fee 1 $29.99 $29.99 > *Residential Basic 500 1 $14.99 $14.99 > ----------------------------------- > > State Sales Tax: $0.00 > Federal Excise Tax: $1.35 > Regulatory Recovery Fee:$1.50 > Shipping: $9.95 > Total: $57.78 > > * Monthly Recurring Charge. > ******************************************************************* > > This does not include a charge of approximately $30 which you will be > charged for if you do not return the modem at the end of service. > > Now understand that the telephone company charged me a $60 activation fee > when I moved from one location to another location down the road 1/2 mile. > All just to change my billing from one jack to another in a switchboard. > Hmmm... > > In addition, ATM the Vonage $14.99 is a flat monthly fee, no taxes or > other > regulatory charges added. My land line STARTS at 11.53 for flat residence > line, plus 5.78 federal subscriber line charge, plus 1.43 Connecticut > sales > tax, plus .73 federal tax plus .20 E911 surcharge, plus .05 Connecticut > Service Fund, plus .39 number portability charge, plus .56 Universal > Service > fund (local), plus .14 Universal Service Fund (Long Distance). Talk about > nickel and dimeing you to death! > > I NEVER get out with under $25 on a "11.50" phone line, and with all the > "short" long distance, I rarely get out for under ~$35 WITHOUT long > distance, which is $.10/minute. For a couple of years I have used a > prepaid > calling card which I programmed into my phone to get my long distance for > $.039 per minute (slowly inching up, now $.045). > > Of course I also have to pay for my blazing fast internet connection, > which > is a ridiculous $45 / month. Makes the $15 ($25/$35) phone bill seem > rather > inconsequential. But I could never go back to dialup so since I have this > blazing fast internet, I might as well piggyback my phone off of it. > > I am pleased to say it is working great so far. > > John W. Colby > www.ColbyConsulting.com > > -----Original Message----- > From: accessd-bounces at databaseadvisors.com > [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Christopher > Hawkins > Sent: Tuesday, January 27, 2004 5:23 PM > To: accessd at databaseadvisors.com > Subject: RE: [AccessD] Vonage > > > $15/month sounds great, but what about setup fees or equipment > expenses? What's the "out the door" price look like? > > -Christopher- > > ---- Original Message ---- > From: JColby at dispec.com > To: accessd at databaseadvisors.com, > Subject: RE: [AccessD] Vonage > Date: Tue, 27 Jan 2004 15:05:07 -0500 > > >I received the phonemodem last night. Plugged it in (behind my > >router for > >those interested), waited 5 minutes, then picked up the receiver and > >made a > >call. Extremely easy to set up. > > > >The sound so far is crystal clear, no clicks / pops or echoes. I > >have a > >brand new ATT 2ghz cordless phone system which I plugged in to it. > >I can't > >tell the difference between this and the landline. > > > >I haven't done any heavy duty uploads / downloads though I will be > >doing > >some testing in the next few days. > > > >I went with the $15 / month package for 500 total minutes - local > >and long > >distance, with anything after that billed at $.039 / minute. If my > >useage > >averages more than 500 minutes I'll move up to the $25 package with > >unlimited local and 500 long distance minutes. Given my useage > >patterns I > >may very well end up with a $15 / month phone including long > >distance. > > > >So far so good. > > > >John W. Colby > >The database guy > > > _______________________________________________ > 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 _______________________________________________ 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 From jwcolby at colbyconsulting.com Wed Jan 28 13:03:15 2004 From: jwcolby at colbyconsulting.com (John W. Colby) Date: Wed, 28 Jan 2004 14:03:15 -0500 Subject: [AccessD] Getting internet data Message-ID: I need to get some internet data into a db. In order to do that I need to "navigate", specifically I have to enter a username / password which will bring me to a specific page. After that clicking on tabs at the top take me to other pages I'd also like to get data off of. Does anyone know how to do this from VBA? John W. Colby www.ColbyConsulting.com From DElam at jenkens.com Wed Jan 28 13:05:54 2004 From: DElam at jenkens.com (Elam, Debbie) Date: Wed, 28 Jan 2004 13:05:54 -0600 Subject: [AccessD] Access 97 to XP Message-ID: <7B1961ED924D1A459E378C9B1BB22B4C0106BA14@natexch.jenkens.com> Every open, unhidden window will have its own taskbar icon. If you notice, all of office is behaving this way now. Open multiple Word documents and each will have it's own icon too. Debbie -----Original Message----- From: Lonnie Johnson [mailto:prodevmg at yahoo.com] Sent: Wednesday, January 28, 2004 12:49 PM To: Access Developers discussion and problem solving Subject: [AccessD] Access 97 to XP I am converting an application from 97 to XP. I have "unchecked" the box that says hide database window in the startup menu. However, I still get TWO access db icons on my task bar. One has my custom menu I have in the autoexec, the other has the database window and it's objects. Am I missing something here in XP? Lonnie Johnson ProDev, Professional Development of MS Access Databases Visit me at ==> http://www.prodev.us --------------------------------- Do you Yahoo!? Yahoo! SiteBuilder - Free web site building tool. Try it! _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com - JENKENS & GILCHRIST E-MAIL NOTICE - This transmission may be: (1) subject to the Attorney-Client Privilege, (2) an attorney work product, or (3) strictly confidential. If you are not the intended recipient of this message, you may not disclose, print, copy or disseminate this information. If you have received this in error, please reply and notify the sender (only) and delete the message. Unauthorized interception of this e-mail is a violation of federal criminal law. This communication does not reflect an intention by the sender or the sender's client or principal to conduct a transaction or make any agreement by electronic means. Nothing contained in this message or in any attachment shall satisfy the requirements for a writing, and nothing contained herein shall constitute a contract or electronic signature under the Electronic Signatures in Global and National Commerce Act, any version of the Uniform Electronic Transactions Act or any other statute governing electronic transactions. From prodevmg at yahoo.com Wed Jan 28 13:14:14 2004 From: prodevmg at yahoo.com (Lonnie Johnson) Date: Wed, 28 Jan 2004 11:14:14 -0800 (PST) Subject: [AccessD] Access 97 to XP In-Reply-To: <70F3D727890C784291D8433E9C418F290885B2@server.bondsoftware.co.nz> Message-ID: <20040128191414.78062.qmail@web20419.mail.yahoo.com> Got it. Thanks. Stephen Bond wrote:Tools > Options > View > Windows in Taskbar (uncheck) > -----Original Message----- > From: Lonnie Johnson [mailto:prodevmg at yahoo.com] > Sent: Thursday, 29 January 2004 7:49 a.m. > To: Access Developers discussion and problem solving > Subject: [AccessD] Access 97 to XP > > > > I am converting an application from 97 to XP. I have > "unchecked" the box that says hide database window in the > startup menu. However, I still get TWO access db icons on my > task bar. One has my custom menu I have in the autoexec, the > other has the database window and it's objects. Am I missing > something here in XP? > > > > Lonnie Johnson > ProDev, Professional Development of MS Access Databases > Visit me at ==> http://www.prodev.us > > > > > > > > > > --------------------------------- > Do you Yahoo!? > Yahoo! SiteBuilder - Free web site building tool. Try it! > _______________________________________________ > 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 Lonnie Johnson ProDev, Professional Development of MS Access Databases Visit me at ==> http://www.prodev.us --------------------------------- Do you Yahoo!? Yahoo! SiteBuilder - Free web site building tool. Try it! From bchacc at san.rr.com Wed Jan 28 13:17:23 2004 From: bchacc at san.rr.com (Rocky Smolin - Beach Access Software) Date: Wed, 28 Jan 2004 11:17:23 -0800 Subject: [AccessD] Error 2468 - You can't carry out this action at the present time. References: <5F21A4E8B8DD734992EF9E70AC9D3064128A0E@mail2.wrsystems.com> Message-ID: <008d01c3e5d3$5bc2f770$6601a8c0@HAL9002> Randall: I think it doesn't have to do with the DAO recordset because the problem with two deletes in a row doesn't mess with that. Rocky ----- Original Message ----- From: "Randall Anthony" To: "'Access Developers discussion and problem solving'" Sent: Wednesday, January 28, 2004 10:31 AM Subject: RE: [AccessD] Error 2468 - You can't carry out this action at the present time. > Right off the top of my head, it has to do with the movefirst, movelast. I > ran into this when converting A97 to A2K. Code worked in A97, not A2K and > M$ said this was designed behavior. I'll try to find the article. > > -----Original Message----- > From: Rocky Smolin - Beach Access Software [mailto:bchacc at san.rr.com] > Sent: Wednesday, January 28, 2004 1:07 PM > To: AccessD at databaseadvisors.com > Subject: [AccessD] Error 2468 - You can't carry out this action at the > present time. > > Dear List: > > I am getting the following error message on a bound form: > > Error 2468 - You can't carry out this action at the present time. > > This form has a sub form linked to the main form by the main form's primary > key. (Main form is P.O. Header, subform is P.O. Detail). > > I get this error if I try to delete two records in a row. > > DoCmd.SetWarnings False > DoCmd.DoMenuItem acFormBar, acEditMenu, 8, , acMenuVer70 > DoCmd.DoMenuItem acFormBar, acEditMenu, 6, , acMenuVer70 > DoCmd.SetWarnings True > > I also get this error after I try to add a record. The problem started > because I wanted to get the last PO in the file, add one to the PO number, > and put the prefix and the new PO number ito the new record: > > DoCmd.GoToRecord , , acNewRec > > 'If rstPOHeader.RecordCount <> 0 Then > ' rstPOHeader.MoveLast > ' Me.fldPOPrefix = Nz(rstPOHeader!fldPOPrefix) > ' If IsNumeric(rstPOHeader!fldPONumber) Then > ' Me.fldPONumber = rstPOHeader!fldPONumber + 1 > ' fldPOOrderDate.SetFocus > ' Else > ' Me.fldPONumber.SetFocus > ' End If > 'End If > 'If Nz(Me.fldPOPrefix) = "" And Nz(rstPOHeader!fldPOPrefix) = "" Then _ > Me.fldPOPrefix.SetFocus > > Right now the code is commented out. If I uncomment the two lines: > > ' rstPOHeader.MoveLast > ' Me.fldPOPrefix = Nz(rstPOHeader!fldPOPrefix) > > I get the error when I try to save: > > DoCmd.DoMenuItem acFormBar, acRecordsMenu, acSaveRecord, , acMenuVer70 > > I checked the web and there is nothing. Has anyone encountered this before? > > Thanks and regards, > > Rocky Smolin > Beach Access Software > _______________________________________________ > 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 > From jeffrey.demulling at usbank.com Wed Jan 28 13:22:34 2004 From: jeffrey.demulling at usbank.com (jeffrey.demulling at usbank.com) Date: Wed, 28 Jan 2004 13:22:34 -0600 Subject: [AccessD] Days 360 Message-ID: I have the following function that is used to calculate the number of days based on a 360 day year. When I compare the results to Excel's Days360 formula I get a different result. The start date I am using is 11/30/2003 and an end date of 12/31/2003 My function returns 31 days and Excel returns 30 days. Can anyone see/tell me why I am getting a different result. TIA Jeff Function CalcDays360(mystartdate As Date, myEndDate As Date) As Double Dim mytotaldays mytotaldays = 0 Select Case DateDiff("m", mystartdate, myEndDate) Case 0 'Both dates are in the same month If myEndDate <> DateAdd("m", 1, DateSerial(Year(myEndDate), Month(myEndDate), 1)) - 1 Then mytotaldays = DateDiff("d", mystartdate, myEndDate) + 1 Else If Day(mystartdate) <> 31 Then mytotaldays = 30 - Day(mystartdate) + 1 Else mytotaldays = 1 End If End If Case Else 'Dates are not in the same month 'Determine Number of Days in the first month If Day(mystartdate) <> 31 Then mytotaldays = 30 - Day(mystartdate) + 1 Else mytotaldays = 1 End If 'Add Number of Days in the second month If myEndDate = DateAdd("m", 1, DateSerial(Year(myEndDate), Month(myEndDate), 1)) - 1 Or Day(myendate) = 30 Then mytotaldays = mytotaldays + 30 Else mytotaldays = mytotaldays + Day(myEndDate) End If 'Add 30 days to total number for each whole months between dates mytotaldays = mytotaldays + (30 * (DateDiff("m", mystartdate, myEndDate) - 1)) End Select CalcDays360 = mytotaldays End Function From bchacc at san.rr.com Wed Jan 28 13:34:16 2004 From: bchacc at san.rr.com (Rocky Smolin - Beach Access Software) Date: Wed, 28 Jan 2004 11:34:16 -0800 Subject: [AccessD] Error 2468 - You can't carry out this action at the present time. References: <5F21A4E8B8DD734992EF9E70AC9D3064128A0E@mail2.wrsystems.com> Message-ID: <009101c3e5d5$b851f700$6601a8c0@HAL9002> Randall: Tried this experiment just to get the DAO recordset out of the way. I deleted all references to it. Then I replaced: 'DoCmd.SetWarnings False 'DoCmd.DoMenuItem acFormBar, acEditMenu, 8, , acMenuVer70 'DoCmd.DoMenuItem acFormBar, acEditMenu, 6, , acMenuVer70 'DoCmd.SetWarnings True with DoCmd.RunCommand acCmdDelete I selected a record and ran that code which does the delete. Then before trying to delete the second record, I checked the table and the record was still there! So the delete (and probably other operations) are not completing for some reason. Pluse, when I get the error, I have to use the task manager to clear access. It won't quit, cant close any forms, etc. Any ideas? Many thanks in advance and regards, is ----- Original Message ----- From: "Randall Anthony" To: "'Access Developers discussion and problem solving'" Sent: Wednesday, January 28, 2004 10:31 AM Subject: RE: [AccessD] Error 2468 - You can't carry out this action at the present time. > Right off the top of my head, it has to do with the movefirst, movelast. I > ran into this when converting A97 to A2K. Code worked in A97, not A2K and > M$ said this was designed behavior. I'll try to find the article. > > -----Original Message----- > From: Rocky Smolin - Beach Access Software [mailto:bchacc at san.rr.com] > Sent: Wednesday, January 28, 2004 1:07 PM > To: AccessD at databaseadvisors.com > Subject: [AccessD] Error 2468 - You can't carry out this action at the > present time. > > Dear List: > > I am getting the following error message on a bound form: > > Error 2468 - You can't carry out this action at the present time. > > This form has a sub form linked to the main form by the main form's primary > key. (Main form is P.O. Header, subform is P.O. Detail). > > I get this error if I try to delete two records in a row. > > DoCmd.SetWarnings False > DoCmd.DoMenuItem acFormBar, acEditMenu, 8, , acMenuVer70 > DoCmd.DoMenuItem acFormBar, acEditMenu, 6, , acMenuVer70 > DoCmd.SetWarnings True > > I also get this error after I try to add a record. The problem started > because I wanted to get the last PO in the file, add one to the PO number, > and put the prefix and the new PO number ito the new record: > > DoCmd.GoToRecord , , acNewRec > > 'If rstPOHeader.RecordCount <> 0 Then > ' rstPOHeader.MoveLast > ' Me.fldPOPrefix = Nz(rstPOHeader!fldPOPrefix) > ' If IsNumeric(rstPOHeader!fldPONumber) Then > ' Me.fldPONumber = rstPOHeader!fldPONumber + 1 > ' fldPOOrderDate.SetFocus > ' Else > ' Me.fldPONumber.SetFocus > ' End If > 'End If > 'If Nz(Me.fldPOPrefix) = "" And Nz(rstPOHeader!fldPOPrefix) = "" Then _ > Me.fldPOPrefix.SetFocus > > Right now the code is commented out. If I uncomment the two lines: > > ' rstPOHeader.MoveLast > ' Me.fldPOPrefix = Nz(rstPOHeader!fldPOPrefix) > > I get the error when I try to save: > > DoCmd.DoMenuItem acFormBar, acRecordsMenu, acSaveRecord, , acMenuVer70 > > I checked the web and there is nothing. Has anyone encountered this before? > > Thanks and regards, > > Rocky Smolin > Beach Access Software > _______________________________________________ > 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 > From ranthony at wrsystems.com Wed Jan 28 13:40:46 2004 From: ranthony at wrsystems.com (Randall Anthony) Date: Wed, 28 Jan 2004 14:40:46 -0500 Subject: [AccessD] Error 2468 - You can't carry out this action at the present time. Message-ID: <5F21A4E8B8DD734992EF9E70AC9D3064128A0F@mail2.wrsystems.com> Whew... Took a while to find it, and at first glance it has nothing to do with your problem, but it may give you some ideas: Dim rst as DAO.recordset Set rst = CurrentDb.OpenRecordset("Customers",dbOpenDynaset,DbSeeChanges) Rst.FindFirst "[Country] = 'Mexico'" Do Until rst.NoMatch Rst.Delete Rst.FindNext "[Country] = 'Mexico'" Loop by design, when using the dbSeeChanges constant (in a Microsoft Jet workspace) JET will trap changes while two or more users (and/or methods) are editing or deleting the same record. Thereby, in your case when using dbSeeChanges you are able to see the result of the record deleted. (note: we tested this on local tables in your database application in both versions of Access: 97 and 2000) RESOLUTION/Workaround: You modified your code to Do Until rst.EOF rst.Delete rst.MoveNext Loop This eliminates the need of forcing JET to repoll the database as it was doing in your original code. -----Original Message----- From: Rocky Smolin - Beach Access Software [mailto:bchacc at san.rr.com] Sent: Wednesday, January 28, 2004 2:17 PM To: Access Developers discussion and problem solving Subject: Re: [AccessD] Error 2468 - You can't carry out this action at thepresent time. Randall: I think it doesn't have to do with the DAO recordset because the problem with two deletes in a row doesn't mess with that. Rocky ----- Original Message ----- From: "Randall Anthony" To: "'Access Developers discussion and problem solving'" Sent: Wednesday, January 28, 2004 10:31 AM Subject: RE: [AccessD] Error 2468 - You can't carry out this action at the present time. > Right off the top of my head, it has to do with the movefirst, movelast. I > ran into this when converting A97 to A2K. Code worked in A97, not A2K and > M$ said this was designed behavior. I'll try to find the article. > > -----Original Message----- > From: Rocky Smolin - Beach Access Software [mailto:bchacc at san.rr.com] > Sent: Wednesday, January 28, 2004 1:07 PM > To: AccessD at databaseadvisors.com > Subject: [AccessD] Error 2468 - You can't carry out this action at the > present time. > > Dear List: > > I am getting the following error message on a bound form: > > Error 2468 - You can't carry out this action at the present time. > > This form has a sub form linked to the main form by the main form's primary > key. (Main form is P.O. Header, subform is P.O. Detail). > > I get this error if I try to delete two records in a row. > > DoCmd.SetWarnings False > DoCmd.DoMenuItem acFormBar, acEditMenu, 8, , acMenuVer70 > DoCmd.DoMenuItem acFormBar, acEditMenu, 6, , acMenuVer70 > DoCmd.SetWarnings True > > I also get this error after I try to add a record. The problem started > because I wanted to get the last PO in the file, add one to the PO number, > and put the prefix and the new PO number ito the new record: > > DoCmd.GoToRecord , , acNewRec > > 'If rstPOHeader.RecordCount <> 0 Then > ' rstPOHeader.MoveLast > ' Me.fldPOPrefix = Nz(rstPOHeader!fldPOPrefix) > ' If IsNumeric(rstPOHeader!fldPONumber) Then > ' Me.fldPONumber = rstPOHeader!fldPONumber + 1 > ' fldPOOrderDate.SetFocus > ' Else > ' Me.fldPONumber.SetFocus > ' End If > 'End If > 'If Nz(Me.fldPOPrefix) = "" And Nz(rstPOHeader!fldPOPrefix) = "" Then _ > Me.fldPOPrefix.SetFocus > > Right now the code is commented out. If I uncomment the two lines: > > ' rstPOHeader.MoveLast > ' Me.fldPOPrefix = Nz(rstPOHeader!fldPOPrefix) > > I get the error when I try to save: > > DoCmd.DoMenuItem acFormBar, acRecordsMenu, acSaveRecord, , acMenuVer70 > > I checked the web and there is nothing. Has anyone encountered this before? > > Thanks and regards, > > Rocky Smolin > Beach Access Software > _______________________________________________ > 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 > _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From pedro at plex.nl Wed Jan 28 13:40:51 2004 From: pedro at plex.nl (Pedro Janssen) Date: Wed, 28 Jan 2004 20:40:51 +0100 Subject: [AccessD] error after converting (mailmerge) SOLVED References: <200401141408.i0EE8cNA020272@mailhostC.plex.net> <400F0480.5000602@shaw.ca> Message-ID: <001401c3e5d8$b2a1a320$f4c581d5@pedro> Hello Marty, it took me a while, but i solved the problem. After changing the code many times. Also with help from the one you gave me. I still received the error. I found an article in the Microsoft Knowledge base where the code i used in A97 was converted by microsoft to A2K. I changed my code to this one, but then i received an error that the ODBC could't open the database. I made a new access driver with the new .mdw file. Decompiled the database and both errors were gone. Thanks for your time. Pedro ----- Original Message ----- From: "MartyConnelly" To: "Access Developers discussion and problem solving" Sent: Thursday, January 22, 2004 12:00 AM Subject: Re: [AccessD] error after converting (mailmerge) > I can get this to work with Access97 to Word2003 (my default) by > dropping some extraneous code,ie. not using connection string. > The mdb I am opening is seperate from the one I am running Access in. > > It does however open 2 copies of word 1 default (document3.doc) and 1 > (form letters1.doc) > It also prints too. does not close either word document. > > Sub test() > Dim bltest As Boolean > bltest = True > CreateMergeDoc bltest, True > End Sub > Sub CreateMergeDoc(UseDDE As Boolean, PrintDoc As Boolean) > > Dim WordDoc As Word.Document > Dim strLetter As String > Dim strConnect As String > Dim WordApp As Word.Application > > Set WordApp = CreateObject("Word.Application") > > Set WordDoc = WordApp.Documents.Add > With WordDoc.MailMerge > > .OpenDataSource _ > Name:="C:\Documents and Settings\marty\My > Documents\WordMergetestold97.mdb", _ > ReadOnly:=True, LinkToSource:=True, _ > SQLStatement:="SELECT * FROM [Table1] WHERE Table1.MyField = " > & 123 & ";" > > ' With Fields > '............... > 'End With > > 'With WordApp.Selection > '............... > 'End With > > > With WordDoc.MailMerge > .DataSource.FirstRecord = 1 > Debug.Print .DataSource.TableName > .Destination = wdSendToNewDocument > > .Execute > > If PrintDoc Then > .Application.Options.PrintBackground = False > .Application.ActiveDocument.PrintOut > End If > End With > > WordApp.Visible = True > End With > End Sub > > pedro at plex.nl wrote: > > >Hello Group, > > > >i converted a A97 secured database to A2K. > >After making the changes in Wrkgadmin.exe and the ODBC Data Sources, i changed the names in the module. After running the mailmerge i get an error: Run-time error '5922' Word was unable to open the data source. The debug selects the .OpenDataSource from the code below. > > > >I figure out why this error occurs. > > > >TIA > > > >Pedro Janssen > > > > > > > > > >Sub CreateMergeDoc(UseDDE As Boolean, PrintDoc As Boolean) > > > > Dim WordDoc As Word.Document > > Dim strLetter As String > > Dim strConnect As String > > Dim WordApp As Word.Application > > > > Set WordApp = CreateObject("Word.Application") > > > > Set WordDoc = WordApp.Documents.Add > > With WordDoc.MailMerge > > If UseDDE Then > > strConnect = "QUERY Uitvoer" > > Else > > strConnect = "DSN=MS Access 2000 " _ > > & "Database;DBQ=E:\Cytologie\positieven\" _ > > & "BeveiligdPOSITIEVEN(A2K).mdb;" _ > > & "FIL=MS Access;" > > End If > > .OpenDataSource _ > > Name:="E:\Cytologie\positieven\BeveiligdPOSITIEVEN(A2K).mdb", _ > > ReadOnly:=True, LinkToSource:=True, _ > > Connection:=strConnect, _ > > SQLStatement:="SELECT * FROM [Uitvoer], [Aanvrager] WHERE Uitvoer.AanvragerID = Aanvrager.AanvragerID AND Uitvoer.ControleID = " & Forms![Brief]![veld] & ";" > > > > With Fields > > ............... > > End With > > > > With WordApp.Selection > > ............... > > End With > > > > > > With WordDoc.MailMerge > > .DataSource.FirstRecord = 1 > > > > .Destination = wdSendToNewDocument > > > > .Execute > > > > If PrintDoc Then > > .Application.Options.PrintBackground = False > > .Application.ActiveDocument.PrintOut > > End If > > End With > > > > WordApp.Visible = True > > End With > >End Sub > > > >_______________________________________________ > >AccessD mailing list > >AccessD at databaseadvisors.com > >http://databaseadvisors.com/mailman/listinfo/accessd > >Website: http://www.databaseadvisors.com > > > > > > > > -- > Marty Connelly > Victoria, B.C. > Canada > > > > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com > > From pedro at plex.nl Wed Jan 28 13:43:48 2004 From: pedro at plex.nl (Pedro Janssen) Date: Wed, 28 Jan 2004 20:43:48 +0100 Subject: [AccessD] error after converting (mailmerge) SOLVED References: <200401141408.i0EE8cNA020272@mailhostC.plex.net> <400F0480.5000602@shaw.ca> Message-ID: <001501c3e5d8$b3fb18a0$f4c581d5@pedro> Hello Marty, it took me a while, but i solved the problem. After changing the code many times. Also with help from the one you gave me. I still received the error. I found an article in the Microsoft Knowledge base where the code i used in A97 was converted by microsoft to A2K. I changed my code to this one, but then i received an error that the ODBC could't open the database. I made a new access odbc driver with the new .mdw file. Decompiled the database and both errors were gone. Thanks for your time. Pedro ----- Original Message ----- From: "MartyConnelly" To: "Access Developers discussion and problem solving" Sent: Thursday, January 22, 2004 12:00 AM Subject: Re: [AccessD] error after converting (mailmerge) > I can get this to work with Access97 to Word2003 (my default) by > dropping some extraneous code,ie. not using connection string. > The mdb I am opening is seperate from the one I am running Access in. > > It does however open 2 copies of word 1 default (document3.doc) and 1 > (form letters1.doc) > It also prints too. does not close either word document. > > Sub test() > Dim bltest As Boolean > bltest = True > CreateMergeDoc bltest, True > End Sub > Sub CreateMergeDoc(UseDDE As Boolean, PrintDoc As Boolean) > > Dim WordDoc As Word.Document > Dim strLetter As String > Dim strConnect As String > Dim WordApp As Word.Application > > Set WordApp = CreateObject("Word.Application") > > Set WordDoc = WordApp.Documents.Add > With WordDoc.MailMerge > > .OpenDataSource _ > Name:="C:\Documents and Settings\marty\My > Documents\WordMergetestold97.mdb", _ > ReadOnly:=True, LinkToSource:=True, _ > SQLStatement:="SELECT * FROM [Table1] WHERE Table1.MyField = " > & 123 & ";" > > ' With Fields > '............... > 'End With > > 'With WordApp.Selection > '............... > 'End With > > > With WordDoc.MailMerge > .DataSource.FirstRecord = 1 > Debug.Print .DataSource.TableName > .Destination = wdSendToNewDocument > > .Execute > > If PrintDoc Then > .Application.Options.PrintBackground = False > .Application.ActiveDocument.PrintOut > End If > End With > > WordApp.Visible = True > End With > End Sub > > pedro at plex.nl wrote: > > >Hello Group, > > > >i converted a A97 secured database to A2K. > >After making the changes in Wrkgadmin.exe and the ODBC Data Sources, i changed the names in the module. After running the mailmerge i get an error: Run-time error '5922' Word was unable to open the data source. The debug selects the .OpenDataSource from the code below. > > > >I figure out why this error occurs. > > > >TIA > > > >Pedro Janssen > > > > > > > > > >Sub CreateMergeDoc(UseDDE As Boolean, PrintDoc As Boolean) > > > > Dim WordDoc As Word.Document > > Dim strLetter As String > > Dim strConnect As String > > Dim WordApp As Word.Application > > > > Set WordApp = CreateObject("Word.Application") > > > > Set WordDoc = WordApp.Documents.Add > > With WordDoc.MailMerge > > If UseDDE Then > > strConnect = "QUERY Uitvoer" > > Else > > strConnect = "DSN=MS Access 2000 " _ > > & "Database;DBQ=E:\Cytologie\positieven\" _ > > & "BeveiligdPOSITIEVEN(A2K).mdb;" _ > > & "FIL=MS Access;" > > End If > > .OpenDataSource _ > > Name:="E:\Cytologie\positieven\BeveiligdPOSITIEVEN(A2K).mdb", _ > > ReadOnly:=True, LinkToSource:=True, _ > > Connection:=strConnect, _ > > SQLStatement:="SELECT * FROM [Uitvoer], [Aanvrager] WHERE Uitvoer.AanvragerID = Aanvrager.AanvragerID AND Uitvoer.ControleID = " & Forms![Brief]![veld] & ";" > > > > With Fields > > ............... > > End With > > > > With WordApp.Selection > > ............... > > End With > > > > > > With WordDoc.MailMerge > > .DataSource.FirstRecord = 1 > > > > .Destination = wdSendToNewDocument > > > > .Execute > > > > If PrintDoc Then > > .Application.Options.PrintBackground = False > > .Application.ActiveDocument.PrintOut > > End If > > End With > > > > WordApp.Visible = True > > End With > >End Sub > > > >_______________________________________________ > >AccessD mailing list > >AccessD at databaseadvisors.com > >http://databaseadvisors.com/mailman/listinfo/accessd > >Website: http://www.databaseadvisors.com > > > > > > > > -- > Marty Connelly > Victoria, B.C. > Canada > > > > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com > > From mikedorism at adelphia.net Wed Jan 28 14:09:34 2004 From: mikedorism at adelphia.net (Mike & Doris Manning) Date: Wed, 28 Jan 2004 15:09:34 -0500 Subject: [AccessD] Days 360 In-Reply-To: Message-ID: <000001c3e5da$a6455a20$8b194244@hargrove.internal> Access starts counting with "11/30/2003 12:00AM" whereas Excel doesn't include "11/30/2003" in the count. Just drop the +1 from your MyTotalDays calculation and you'll be okay. Doris Manning Database Administrator Hargrove Inc. www.hargroveinc.com -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of jeffrey.demulling at usbank.com Sent: Wednesday, January 28, 2004 2:23 PM To: accessd at databaseadvisors.com Subject: [AccessD] Days 360 I have the following function that is used to calculate the number of days based on a 360 day year. When I compare the results to Excel's Days360 formula I get a different result. The start date I am using is 11/30/2003 and an end date of 12/31/2003 My function returns 31 days and Excel returns 30 days. Can anyone see/tell me why I am getting a different result. TIA Jeff Function CalcDays360(mystartdate As Date, myEndDate As Date) As Double Dim mytotaldays mytotaldays = 0 Select Case DateDiff("m", mystartdate, myEndDate) Case 0 'Both dates are in the same month If myEndDate <> DateAdd("m", 1, DateSerial(Year(myEndDate), Month(myEndDate), 1)) - 1 Then mytotaldays = DateDiff("d", mystartdate, myEndDate) + 1 Else If Day(mystartdate) <> 31 Then mytotaldays = 30 - Day(mystartdate) + 1 Else mytotaldays = 1 End If End If Case Else 'Dates are not in the same month 'Determine Number of Days in the first month If Day(mystartdate) <> 31 Then mytotaldays = 30 - Day(mystartdate) + 1 Else mytotaldays = 1 End If 'Add Number of Days in the second month If myEndDate = DateAdd("m", 1, DateSerial(Year(myEndDate), Month(myEndDate), 1)) - 1 Or Day(myendate) = 30 Then mytotaldays = mytotaldays + 30 Else mytotaldays = mytotaldays + Day(myEndDate) End If 'Add 30 days to total number for each whole months between dates mytotaldays = mytotaldays + (30 * (DateDiff("m", mystartdate, myEndDate) - 1)) End Select CalcDays360 = mytotaldays End Function _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From bchacc at san.rr.com Wed Jan 28 14:10:37 2004 From: bchacc at san.rr.com (Rocky Smolin - Beach Access Software) Date: Wed, 28 Jan 2004 12:10:37 -0800 Subject: [AccessD] Error 2468 - You can't carry out this action at thepresent time. References: <5F21A4E8B8DD734992EF9E70AC9D3064128A0F@mail2.wrsystems.com> Message-ID: <00a701c3e5da$cb970850$6601a8c0@HAL9002> Randall: I see what they're saying. But unfortunately, I'm not using DAO in this case. It's a form bound to a table. Regards, Rocky ----- Original Message ----- From: "Randall Anthony" To: "'Access Developers discussion and problem solving'" Sent: Wednesday, January 28, 2004 11:40 AM Subject: RE: [AccessD] Error 2468 - You can't carry out this action at thepresent time. > Whew... Took a while to find it, and at first glance it has nothing to do > with your problem, but it may give you some ideas: > > Dim rst as DAO.recordset > Set rst = CurrentDb.OpenRecordset("Customers",dbOpenDynaset,DbSeeChanges) > Rst.FindFirst "[Country] = 'Mexico'" > Do Until rst.NoMatch > Rst.Delete > Rst.FindNext "[Country] = 'Mexico'" > Loop > > by design, when using the dbSeeChanges constant (in a Microsoft Jet > workspace) JET will trap changes while two or more users (and/or methods) > are editing or deleting the same record. Thereby, in your case when using > dbSeeChanges you are able to see the result of the record deleted. > (note: we tested this on local tables in your database application in both > versions of Access: 97 and 2000) > > RESOLUTION/Workaround: > You modified your code to > > Do Until rst.EOF > rst.Delete > rst.MoveNext > Loop > > This eliminates the need of forcing JET to repoll the database as it was > doing in your original code. > > -----Original Message----- > From: Rocky Smolin - Beach Access Software [mailto:bchacc at san.rr.com] > Sent: Wednesday, January 28, 2004 2:17 PM > To: Access Developers discussion and problem solving > Subject: Re: [AccessD] Error 2468 - You can't carry out this action at > thepresent time. > > Randall: > > I think it doesn't have to do with the DAO recordset because the problem > with two deletes in a row doesn't mess with that. > > Rocky > > ----- Original Message ----- > From: "Randall Anthony" > To: "'Access Developers discussion and problem solving'" > > Sent: Wednesday, January 28, 2004 10:31 AM > Subject: RE: [AccessD] Error 2468 - You can't carry out this action at the > present time. > > > > Right off the top of my head, it has to do with the movefirst, movelast. > I > > ran into this when converting A97 to A2K. Code worked in A97, not A2K and > > M$ said this was designed behavior. I'll try to find the article. > > > > -----Original Message----- > > From: Rocky Smolin - Beach Access Software [mailto:bchacc at san.rr.com] > > Sent: Wednesday, January 28, 2004 1:07 PM > > To: AccessD at databaseadvisors.com > > Subject: [AccessD] Error 2468 - You can't carry out this action at the > > present time. > > > > Dear List: > > > > I am getting the following error message on a bound form: > > > > Error 2468 - You can't carry out this action at the present time. > > > > This form has a sub form linked to the main form by the main form's > primary > > key. (Main form is P.O. Header, subform is P.O. Detail). > > > > I get this error if I try to delete two records in a row. > > > > DoCmd.SetWarnings False > > DoCmd.DoMenuItem acFormBar, acEditMenu, 8, , acMenuVer70 > > DoCmd.DoMenuItem acFormBar, acEditMenu, 6, , acMenuVer70 > > DoCmd.SetWarnings True > > > > I also get this error after I try to add a record. The problem started > > because I wanted to get the last PO in the file, add one to the PO number, > > and put the prefix and the new PO number ito the new record: > > > > DoCmd.GoToRecord , , acNewRec > > > > 'If rstPOHeader.RecordCount <> 0 Then > > ' rstPOHeader.MoveLast > > ' Me.fldPOPrefix = Nz(rstPOHeader!fldPOPrefix) > > ' If IsNumeric(rstPOHeader!fldPONumber) Then > > ' Me.fldPONumber = rstPOHeader!fldPONumber + 1 > > ' fldPOOrderDate.SetFocus > > ' Else > > ' Me.fldPONumber.SetFocus > > ' End If > > 'End If > > 'If Nz(Me.fldPOPrefix) = "" And Nz(rstPOHeader!fldPOPrefix) = "" Then > _ > > Me.fldPOPrefix.SetFocus > > > > Right now the code is commented out. If I uncomment the two lines: > > > > ' rstPOHeader.MoveLast > > ' Me.fldPOPrefix = Nz(rstPOHeader!fldPOPrefix) > > > > I get the error when I try to save: > > > > DoCmd.DoMenuItem acFormBar, acRecordsMenu, acSaveRecord, , acMenuVer70 > > > > I checked the web and there is nothing. Has anyone encountered this > before? > > > > Thanks and regards, > > > > Rocky Smolin > > Beach Access Software > > _______________________________________________ > > 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 > > > > _______________________________________________ > 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 > From ranthony at wrsystems.com Wed Jan 28 14:31:30 2004 From: ranthony at wrsystems.com (Randall Anthony) Date: Wed, 28 Jan 2004 15:31:30 -0500 Subject: [AccessD] Error 2468 - You can't carry out this action atthep resent time. Message-ID: <5F21A4E8B8DD734992EF9E70AC9D3064128A11@mail2.wrsystems.com> Sorry that didn't help, it seemed very similar to the problem I had. Good luck. -----Original Message----- From: Rocky Smolin - Beach Access Software [mailto:bchacc at san.rr.com] Sent: Wednesday, January 28, 2004 3:11 PM To: Access Developers discussion and problem solving Subject: Re: [AccessD] Error 2468 - You can't carry out this action atthepresent time. Randall: I see what they're saying. But unfortunately, I'm not using DAO in this case. It's a form bound to a table. Regards, Rocky ----- Original Message ----- From: "Randall Anthony" To: "'Access Developers discussion and problem solving'" Sent: Wednesday, January 28, 2004 11:40 AM Subject: RE: [AccessD] Error 2468 - You can't carry out this action at thepresent time. > Whew... Took a while to find it, and at first glance it has nothing to do > with your problem, but it may give you some ideas: > > Dim rst as DAO.recordset > Set rst = CurrentDb.OpenRecordset("Customers",dbOpenDynaset,DbSeeChanges) > Rst.FindFirst "[Country] = 'Mexico'" > Do Until rst.NoMatch > Rst.Delete > Rst.FindNext "[Country] = 'Mexico'" > Loop > > by design, when using the dbSeeChanges constant (in a Microsoft Jet > workspace) JET will trap changes while two or more users (and/or methods) > are editing or deleting the same record. Thereby, in your case when using > dbSeeChanges you are able to see the result of the record deleted. > (note: we tested this on local tables in your database application in both > versions of Access: 97 and 2000) > > RESOLUTION/Workaround: > You modified your code to > > Do Until rst.EOF > rst.Delete > rst.MoveNext > Loop > > This eliminates the need of forcing JET to repoll the database as it was > doing in your original code. > > -----Original Message----- > From: Rocky Smolin - Beach Access Software [mailto:bchacc at san.rr.com] > Sent: Wednesday, January 28, 2004 2:17 PM > To: Access Developers discussion and problem solving > Subject: Re: [AccessD] Error 2468 - You can't carry out this action at > thepresent time. > > Randall: > > I think it doesn't have to do with the DAO recordset because the problem > with two deletes in a row doesn't mess with that. > > Rocky > > ----- Original Message ----- > From: "Randall Anthony" > To: "'Access Developers discussion and problem solving'" > > Sent: Wednesday, January 28, 2004 10:31 AM > Subject: RE: [AccessD] Error 2468 - You can't carry out this action at the > present time. > > > > Right off the top of my head, it has to do with the movefirst, movelast. > I > > ran into this when converting A97 to A2K. Code worked in A97, not A2K and > > M$ said this was designed behavior. I'll try to find the article. > > > > -----Original Message----- > > From: Rocky Smolin - Beach Access Software [mailto:bchacc at san.rr.com] > > Sent: Wednesday, January 28, 2004 1:07 PM > > To: AccessD at databaseadvisors.com > > Subject: [AccessD] Error 2468 - You can't carry out this action at the > > present time. > > > > Dear List: > > > > I am getting the following error message on a bound form: > > > > Error 2468 - You can't carry out this action at the present time. > > > > This form has a sub form linked to the main form by the main form's > primary > > key. (Main form is P.O. Header, subform is P.O. Detail). > > > > I get this error if I try to delete two records in a row. > > > > DoCmd.SetWarnings False > > DoCmd.DoMenuItem acFormBar, acEditMenu, 8, , acMenuVer70 > > DoCmd.DoMenuItem acFormBar, acEditMenu, 6, , acMenuVer70 > > DoCmd.SetWarnings True > > > > I also get this error after I try to add a record. The problem started > > because I wanted to get the last PO in the file, add one to the PO number, > > and put the prefix and the new PO number ito the new record: > > > > DoCmd.GoToRecord , , acNewRec > > > > 'If rstPOHeader.RecordCount <> 0 Then > > ' rstPOHeader.MoveLast > > ' Me.fldPOPrefix = Nz(rstPOHeader!fldPOPrefix) > > ' If IsNumeric(rstPOHeader!fldPONumber) Then > > ' Me.fldPONumber = rstPOHeader!fldPONumber + 1 > > ' fldPOOrderDate.SetFocus > > ' Else > > ' Me.fldPONumber.SetFocus > > ' End If > > 'End If > > 'If Nz(Me.fldPOPrefix) = "" And Nz(rstPOHeader!fldPOPrefix) = "" Then > _ > > Me.fldPOPrefix.SetFocus > > > > Right now the code is commented out. If I uncomment the two lines: > > > > ' rstPOHeader.MoveLast > > ' Me.fldPOPrefix = Nz(rstPOHeader!fldPOPrefix) > > > > I get the error when I try to save: > > > > DoCmd.DoMenuItem acFormBar, acRecordsMenu, acSaveRecord, , acMenuVer70 > > > > I checked the web and there is nothing. Has anyone encountered this > before? > > > > Thanks and regards, > > > > Rocky Smolin > > Beach Access Software > > _______________________________________________ > > 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 > > > > _______________________________________________ > 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 > _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From DWUTKA at marlow.com Wed Jan 28 14:36:28 2004 From: DWUTKA at marlow.com (DWUTKA at marlow.com) Date: Wed, 28 Jan 2004 14:36:28 -0600 Subject: [AccessD] Decompile Message-ID: <2F8793082E00D4119A1700B0D0216BF8022277DC@main2.marlow.com> I've seen this several times, just never got around to doing it. (Still haven't, for the decompile.....). But I did add 'Open with Access 97', 'Open with Access 2000', and 'Open Secured DB'. Had to do it twice though, because once Access 2000 was opened, the settings switched, so I had to duplicate them. That Open Secured DB is something I should have put into place a while back. All of my secured databases have the same security settings for my 'personal' admin account, so no matter what database I build, with security, and no matter what .mdw I create, I can use the same account/password with any of the .mdw's, to gain admin access to it. Gotta love it! Thanks for the thread...it kicked me into gear on this... Drew -----Original Message----- From: Erwin Craps - IT Helps [mailto:Erwin.Craps at ithelps.be] Sent: Wednesday, January 28, 2004 7:49 AM To: Access Developers discussion and problem solving Subject: RE: [AccessD] Decompile Mark YOU ARE GREAT!!! Stupid thing of me is, I very well know this... Just never tought of actualy dooing this for Access Erwin... -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Mitsules, Mark S. (Newport News) Sent: Wednesday, January 28, 2004 1:40 PM To: 'Access Developers discussion and problem solving' Subject: RE: [AccessD] Decompile Dean, Courtesy of Stuart Sanders... Mark **************** Thinking about this I thought of a cool (in my view) way of handling this, that is probably what Susan was talking about. Now I'm wondering why I didn't do this years ago. 1. Start Windows Explorer, 2. Select Tools and then Folder Options... 3. Click on the File Types Tab 4. Find the MDB file type 5. Click Advanced 6. Chances are there are 2 options. Open in bold font (denoting default) and New. You can pretty much add what you want here. For decompile, 7. Click New 8. Under action type Decompile 9. Under Application used to perform action type the equivalent for your install: "C:\Program Files\Microsoft Office\Office10\MSACCESS.EXE" /decompile "%1" 10 Click OK and exit out And wallah! You now right click an mdb and have the context option of decompiling it. But it doesn't stop there. For those of us juggling multiple versions of Access you can setup a right click option to open in each. Eg Open in 97 Open in 2000 Open in XP And make sure the path points to the correct version of access. Cheers Stuart **************** -----Original Message----- From: Dean Ellis [mailto:deanellis at iprimus.com.au] Sent: Wednesday, January 28, 2004 7:36 AM To: AccessD Subject: [AccessD] Decompile _______________________________________________ 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 _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From DWUTKA at marlow.com Wed Jan 28 14:38:11 2004 From: DWUTKA at marlow.com (DWUTKA at marlow.com) Date: Wed, 28 Jan 2004 14:38:11 -0600 Subject: [AccessD] Concatenated stLinkCritria produces Type mismatcher ror. Message-ID: <2F8793082E00D4119A1700B0D0216BF8022277DD@main2.marlow.com> LOL. All of that was just to expound upon a simple, one rule foundation. Double the delimiter. Drew -----Original Message----- From: Helmut.E.Kotsch at t-online.de [mailto:Helmut.E.Kotsch at t-online.de] Sent: Wednesday, January 28, 2004 9:05 AM To: Access Developers discussion and problem solving Subject: AW: [AccessD] Concatenated stLinkCritria produces Type mismatcherror. Drew, thanks for your effort, appreciate it very much. Very good explanation. Think I have to reread it once and a while to keep it in mind. Helmut -----Urspr?ngliche Nachricht----- Von: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]Im Auftrag von DWUTKA at marlow.com Gesendet: Mittwoch, 28. Januar 2004 02:22 An: accessd at databaseadvisors.com Betreff: RE: [AccessD] Concatenated stLinkCritria produces Type mismatcherror. Let's see if I can break it down for you a bit. Double quotes OR single quotes are a string delimiter. Which means, that if either starts a string, that same character has to end the string. Double quotes is usually the one used (like in VBA, a single quote on it's own comments out a line....). So, when building a string, you have nothing to worry about, UNLESS you need to incorporate the delimiter into the string itself. So, if you want: Let's test this. "Let's test this." is the correct string. There is a single quote, but the delimiter isn't used within the string. If you want: Susie said, "I want chocolate ice cream!". Then it get's interesting. However, to represent a double quote, within a string delimited by double quotes, you just put two of them together, so, "Susie said, ""I want chocolate ice cream!""." is the correct string representation. Once you understand the doubling of the delimiter concept, the rest isn't to hard to figure out. So far I've only shown 'full' strings. If you need to put a string together from peices, the SAME rule applies, even though it may look different. If you want to include the dilimiter, you double it. So, if you have : Look for "something". where something is a variable, you would use this: "Look for """ & strSomething & """." Notice, that you have 3 parts to this string. The first part starts and ends with the delimiter ("). The last bit of the first part is a doubling of the double quote, then one more double quote to end the string. (So the delimiter is at the beginning and end of the 'string', and again, the doubling rule puts the delimiter within the string itself....because it's at the end of the segment, there are three in a row, but just remember, that's a double 'delimiter', followed by the delimiter itself...thus three in a row.) The second part is a variable, and is joined to the other parts with the ampersand. The last part, three double quotes, period, double quote, is the delimiter, a doubled delimiter (to represent it in the string on it's own), a period, then the closing delimiter. Now, let's say you want: Something"somethingelse" you would do this: strSomething & """" & strSomethingElse & """" Now you see 4 delimiters. Don't get side tracked. That is really an opening delimiter, the 'doubled' delimiter, and a closing delimiter. So if you saw """""", that produces a string of : "" (open delimiter, 2 doubled delimiters, and a closing delimiter....thus 6 all together, producing 2 double quotes for the contents of the string.) Does that all make sense? Just remember that to represent a delimiter within the string itself, you double the delimiter. Now, not to confuse the issue, but if you look at it even deeper, there is a perfectly logical explanation on how/why this system was developed. Numbers and other variable types are all represented by a specific number of bytes. To you and me 10,300 is 10,300, but to the email program, it's a chr(49), chr(48), chr(44), etc. When I put 10300 in code, the compiler changes the string into 4 bytes (if I am using a long integer variable type). However, a string can be any length (I believe the maximum number of characters for a string in VB/VBA is 2 million, but not positive on that. Since the length is variable, the code has to know where the string starts, and where the string stops, so it knows how much memory it is going to use (since in ASCII, each character takes up 1 byte, and in Unicode they take up 2 bytes.). Because of this, the code needs to know where the string starts and where it stops, so it uses a 'delimiter'. Quite frankly, the reason double quotes seem so difficult to put into strings is because they chose a delimiter normally used within a string. If they had used something like chr(150), which isn't 'typable', it would have been easier to make strings, because when are you going to use chr(150) in normal text, however, it would make looking at most strings hard to see for a programmer. Even if they had used a non-typable character, they couldn't exclude the fact that someone MAY want to use that within the string itself. Thus, no matter what delimiter they were going to use, they had to provide a method of letting that delimiter fall within the string it was delimiting. To do that, they took the double approach. If the code finds the end delimiter, and finds it again, as the next character, it knows that the string isn't REALLY over, because it's been doubled, thus the code simply puts the delimiter within memory as part of the string itself. If it finds the end delimiter, and anything BUT the delimiter afterwards, then it knows it has found the end of that string. Make sense? Drew -----Original Message----- From: Helmut.E.Kotsch at t-online.de [mailto:Helmut.E.Kotsch at t-online.de] Sent: Tuesday, January 27, 2004 6:23 PM To: Access Developers discussion and problem solving Subject: AW: [AccessD] Concatenated stLinkCritria produces Type mismatcherror. Charlotte you are great. Thank you very much. Here I'm sitting at midnight in Germany defining my problem and there you come back within minutes with a workable solution. What is the alternative to using multiple double quotes? (I don't like them either) Where in the world would someone learn / read about the solution you provided. Even though it works, I don't understand it. To be honest, this whole "quotes syntax" (single and double) is a nightmare to me. Again, thanks a lot. Regards and have a nice day. Helmut Kotsch (Helmut.E.Kotsch at t-online.de) -----Ursprungliche Nachricht----- Von: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]Im Auftrag von Charlotte Foust Gesendet: Mittwoch, 28. Januar 2004 00:49 An: Access Developers discussion and problem solving Betreff: RE: [AccessD] Concatenated stLinkCritria produces Type mismatcherror. I don't like to use multiple double quotes like that because it's so hard to read. Your problem is in this line: stLinkCriteria = "[KundenName]=" & "'" & Me![KundenName] & "'" And "[VerbandNr]=" & Me![VerbandNr] Which should be: stLinkCriteria = "[KundenName]=" & "'" & Me![KundenName] & "'" & " And [VerbandNr]=" & Me![VerbandNr] Charlotte Foust -----Original Message----- From: Helmut Kotsch [mailto:Helmut.E.Kotsch at t-online.de] Sent: Tuesday, January 27, 2004 3:11 PM To: accessd at databaseadvisors.com Subject: [AccessD] Concatenated stLinkCritria produces Type mismatch error. Hi, I am trying to open a form where 2 conditions have to be met. When only one conditon (as shown in code below as sample#1 and sample#2) is set than it works ok. Sample#1 ==> OK Dim stDocName As String Dim stLinkCriteria As String stDocName = "VERDI-Kunden" stLinkCriteria = "[KundenName]=" & "'" & Me![KundenName] & "'" DoCmd.OpenForm stDocName, , , stLinkCriteria Sample#2 ==> OK Dim stDocName As String Dim stLinkCriteria As String stDocName = "VERDI-Kunden" stLinkCriteria = "[VerbandNr]=" & Me![VerbandNr] DoCmd.OpenForm stDocName, , , stLinkCriteria However when concatenating both conditions as shown in the following code I get a "Type mismatch" error. Dim stDocName As String Dim stLinkCriteria As String stDocName = "VERDI-Kunden" stLinkCriteria = "[KundenName]=" & "'" & Me![KundenName] & "'" And "[VerbandNr]=" & Me![VerbandNr] DoCmd.OpenForm stDocName, , , stLinkCriteria Hope someone can help before this one drives me grazy. Helmut Kotsch _______________________________________________ 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 _______________________________________________ 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 _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From DWUTKA at marlow.com Wed Jan 28 14:39:28 2004 From: DWUTKA at marlow.com (DWUTKA at marlow.com) Date: Wed, 28 Jan 2004 14:39:28 -0600 Subject: [AccessD] Vonage Message-ID: <2F8793082E00D4119A1700B0D0216BF8022277DE@main2.marlow.com> Please note, that until this post, I have COMPLETELY stayed out of this thread! (just wanted that noted in the official 'how bad has Drew been lately' log. Drew -----Original Message----- From: Bryan Carbonnell [mailto:carbonnb at sympatico.ca] Sent: Wednesday, January 28, 2004 9:32 AM To: accessd at databaseadvisors.com Subject: Re: RE: [AccessD] Vonage > From: "John W. Colby" > Right, sorry. It's just been sooooo dead lately I thought I'd brighten > things up a bit. ;-) That's one of the reasons it was allowed to go on for a week. That and I'm just trying to catch up on my backlog :-)) -- Bryan Carbonnell - carbonnb at sympatico.ca Unfortunately common sense isn't so common! _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From ja at alldatacorp.com Wed Jan 28 13:44:53 2004 From: ja at alldatacorp.com (Joe K Anderson) Date: Wed, 28 Jan 2004 11:44:53 -0800 Subject: [AccessD] Error 2468 - You can't carry out this action at the present time. References: <5F21A4E8B8DD734992EF9E70AC9D3064128A0E@mail2.wrsystems.com> <009101c3e5d5$b851f700$6601a8c0@HAL9002> Message-ID: <017201c3e5d7$339073a0$6501a8c0@adiDWS> You may need to do a Requery between deletes? joe ----- Original Message ----- From: Rocky Smolin - Beach Access Software To: Access Developers discussion and problem solving Cc: Wayne Warren Angelucci ; Mark Krisburg ; Joe Anderson ; Gordon Bennett ; Dixon Foss ; Bob Heygood ; Barry Hynum Sent: 01-28-2004 11:34 Subject: Re: [AccessD] Error 2468 - You can't carry out this action at the present time. Randall: Tried this experiment just to get the DAO recordset out of the way. I deleted all references to it. Then I replaced: 'DoCmd.SetWarnings False 'DoCmd.DoMenuItem acFormBar, acEditMenu, 8, , acMenuVer70 'DoCmd.DoMenuItem acFormBar, acEditMenu, 6, , acMenuVer70 'DoCmd.SetWarnings True with DoCmd.RunCommand acCmdDelete I selected a record and ran that code which does the delete. Then before trying to delete the second record, I checked the table and the record was still there! So the delete (and probably other operations) are not completing for some reason. Pluse, when I get the error, I have to use the task manager to clear access. It won't quit, cant close any forms, etc. Any ideas? Many thanks in advance and regards, is ----- Original Message ----- From: "Randall Anthony" To: "'Access Developers discussion and problem solving'" Sent: Wednesday, January 28, 2004 10:31 AM Subject: RE: [AccessD] Error 2468 - You can't carry out this action at the present time. > Right off the top of my head, it has to do with the movefirst, movelast. I > ran into this when converting A97 to A2K. Code worked in A97, not A2K and > M$ said this was designed behavior. I'll try to find the article. > > -----Original Message----- > From: Rocky Smolin - Beach Access Software [mailto:bchacc at san.rr.com] > Sent: Wednesday, January 28, 2004 1:07 PM > To: AccessD at databaseadvisors.com > Subject: [AccessD] Error 2468 - You can't carry out this action at the > present time. > > Dear List: > > I am getting the following error message on a bound form: > > Error 2468 - You can't carry out this action at the present time. > > This form has a sub form linked to the main form by the main form's primary > key. (Main form is P.O. Header, subform is P.O. Detail). > > I get this error if I try to delete two records in a row. > > DoCmd.SetWarnings False > DoCmd.DoMenuItem acFormBar, acEditMenu, 8, , acMenuVer70 > DoCmd.DoMenuItem acFormBar, acEditMenu, 6, , acMenuVer70 > DoCmd.SetWarnings True > > I also get this error after I try to add a record. The problem started > because I wanted to get the last PO in the file, add one to the PO number, > and put the prefix and the new PO number ito the new record: > > DoCmd.GoToRecord , , acNewRec > > 'If rstPOHeader.RecordCount <> 0 Then > ' rstPOHeader.MoveLast > ' Me.fldPOPrefix = Nz(rstPOHeader!fldPOPrefix) > ' If IsNumeric(rstPOHeader!fldPONumber) Then > ' Me.fldPONumber = rstPOHeader!fldPONumber + 1 > ' fldPOOrderDate.SetFocus > ' Else > ' Me.fldPONumber.SetFocus > ' End If > 'End If > 'If Nz(Me.fldPOPrefix) = "" And Nz(rstPOHeader!fldPOPrefix) = "" Then _ > Me.fldPOPrefix.SetFocus > > Right now the code is commented out. If I uncomment the two lines: > > ' rstPOHeader.MoveLast > ' Me.fldPOPrefix = Nz(rstPOHeader!fldPOPrefix) > > I get the error when I try to save: > > DoCmd.DoMenuItem acFormBar, acRecordsMenu, acSaveRecord, , acMenuVer70 > > I checked the web and there is nothing. Has anyone encountered this before? > > Thanks and regards, > > Rocky Smolin > Beach Access Software > _______________________________________________ > 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 > From jeffrey.demulling at usbank.com Wed Jan 28 14:47:04 2004 From: jeffrey.demulling at usbank.com (jeffrey.demulling at usbank.com) Date: Wed, 28 Jan 2004 14:47:04 -0600 Subject: [AccessD] Days 360 Message-ID: Doris, Thanks for the help. After sending the email, I had to talk with my boss and asked her to go over the code also (she is not a programmer), but just talking it through with her made me realize the mistake. You just confirmed it. "Mike & Doris Manning" To: "'Access Developers discussion and problem solving'" Sent by: accessd-bounces at databasead cc: visors.com Subject: RE: [AccessD] Days 360 01/28/2004 02:09 PM Please respond to "Access Developers discussion and problem solving" Access starts counting with "11/30/2003 12:00AM" whereas Excel doesn't include "11/30/2003" in the count. Just drop the +1 from your MyTotalDays calculation and you'll be okay. Doris Manning Database Administrator Hargrove Inc. www.hargroveinc.com -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of jeffrey.demulling at usbank.com Sent: Wednesday, January 28, 2004 2:23 PM To: accessd at databaseadvisors.com Subject: [AccessD] Days 360 I have the following function that is used to calculate the number of days based on a 360 day year. When I compare the results to Excel's Days360 formula I get a different result. The start date I am using is 11/30/2003 and an end date of 12/31/2003 My function returns 31 days and Excel returns 30 days. Can anyone see/tell me why I am getting a different result. TIA Jeff Function CalcDays360(mystartdate As Date, myEndDate As Date) As Double Dim mytotaldays mytotaldays = 0 Select Case DateDiff("m", mystartdate, myEndDate) Case 0 'Both dates are in the same month If myEndDate <> DateAdd("m", 1, DateSerial(Year(myEndDate), Month(myEndDate), 1)) - 1 Then mytotaldays = DateDiff("d", mystartdate, myEndDate) + 1 Else If Day(mystartdate) <> 31 Then mytotaldays = 30 - Day(mystartdate) + 1 Else mytotaldays = 1 End If End If Case Else 'Dates are not in the same month 'Determine Number of Days in the first month If Day(mystartdate) <> 31 Then mytotaldays = 30 - Day(mystartdate) + 1 Else mytotaldays = 1 End If 'Add Number of Days in the second month If myEndDate = DateAdd("m", 1, DateSerial(Year(myEndDate), Month(myEndDate), 1)) - 1 Or Day(myendate) = 30 Then mytotaldays = mytotaldays + 30 Else mytotaldays = mytotaldays + Day(myEndDate) End If 'Add 30 days to total number for each whole months between dates mytotaldays = mytotaldays + (30 * (DateDiff("m", mystartdate, myEndDate) - 1)) End Select CalcDays360 = mytotaldays End Function _______________________________________________ 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 From Erwin.Craps at ithelps.be Wed Jan 28 14:53:03 2004 From: Erwin.Craps at ithelps.be (Erwin Craps - IT Helps) Date: Wed, 28 Jan 2004 21:53:03 +0100 Subject: [AccessD] Getting internet data Message-ID: <46B976F2B698FF46A4FE7636509B22DF03D199@stekelbes.ithelps.local> I done that before (and still using it) with a HTTP control from IP Works (I believe they changed name into something else). You can get the page in a string and analyse it further. I believe there is a basic control from MS also in Access or VB, a HTTP control. Only one thing I don't know and is the tricky part... The password. No experiance in that one. But you should look at a HTTP control. I have my first code done with the XML parser. There is a HTTP XML parser to, maybe this can do the trick to. Erwin -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of John W. Colby Sent: Wednesday, January 28, 2004 8:03 PM To: AccessD Subject: [AccessD] Getting internet data I need to get some internet data into a db. In order to do that I need to "navigate", specifically I have to enter a username / password which will bring me to a specific page. After that clicking on tabs at the top take me to other pages I'd also like to get data off of. Does anyone know how to do this from VBA? John W. Colby www.ColbyConsulting.com _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From bchacc at san.rr.com Wed Jan 28 15:03:36 2004 From: bchacc at san.rr.com (Rocky Smolin - Beach Access Software) Date: Wed, 28 Jan 2004 13:03:36 -0800 Subject: [AccessD] Error 2468 - You can't carry out this action at thepresent time. References: <5F21A4E8B8DD734992EF9E70AC9D3064128A0E@mail2.wrsystems.com> <009101c3e5d5$b851f700$6601a8c0@HAL9002> <017201c3e5d7$339073a0$6501a8c0@adiDWS> Message-ID: <00f101c3e5e2$32566c00$6601a8c0@HAL9002> I'm getting closer. I deleted the sub-form that on the second tab of the tab form and the two deletes worked. It has something to do with a sub form on a tab. Any clues, anybody? Rocky ----- Original Message ----- From: "Joe K Anderson" To: "Rocky Smolin - Beach Access Software" ; Cc: "Wayne Warren Angelucci" ; "Gordon Bennett" ; "Barry Hynum" ; "Dixon Foss" ; "Mark Krisburg" Sent: Wednesday, January 28, 2004 11:44 AM Subject: Re: [AccessD] Error 2468 - You can't carry out this action at thepresent time. You may need to do a Requery between deletes? joe ----- Original Message ----- From: Rocky Smolin - Beach Access Software To: Access Developers discussion and problem solving Cc: Wayne Warren Angelucci ; Mark Krisburg ; Joe Anderson ; Gordon Bennett ; Dixon Foss ; Bob Heygood ; Barry Hynum Sent: 01-28-2004 11:34 Subject: Re: [AccessD] Error 2468 - You can't carry out this action at the present time. Randall: Tried this experiment just to get the DAO recordset out of the way. I deleted all references to it. Then I replaced: 'DoCmd.SetWarnings False 'DoCmd.DoMenuItem acFormBar, acEditMenu, 8, , acMenuVer70 'DoCmd.DoMenuItem acFormBar, acEditMenu, 6, , acMenuVer70 'DoCmd.SetWarnings True with DoCmd.RunCommand acCmdDelete I selected a record and ran that code which does the delete. Then before trying to delete the second record, I checked the table and the record was still there! So the delete (and probably other operations) are not completing for some reason. Pluse, when I get the error, I have to use the task manager to clear access. It won't quit, cant close any forms, etc. Any ideas? Many thanks in advance and regards, is ----- Original Message ----- From: "Randall Anthony" To: "'Access Developers discussion and problem solving'" Sent: Wednesday, January 28, 2004 10:31 AM Subject: RE: [AccessD] Error 2468 - You can't carry out this action at the present time. > Right off the top of my head, it has to do with the movefirst, movelast. I > ran into this when converting A97 to A2K. Code worked in A97, not A2K and > M$ said this was designed behavior. I'll try to find the article. > > -----Original Message----- > From: Rocky Smolin - Beach Access Software [mailto:bchacc at san.rr.com] > Sent: Wednesday, January 28, 2004 1:07 PM > To: AccessD at databaseadvisors.com > Subject: [AccessD] Error 2468 - You can't carry out this action at the > present time. > > Dear List: > > I am getting the following error message on a bound form: > > Error 2468 - You can't carry out this action at the present time. > > This form has a sub form linked to the main form by the main form's primary > key. (Main form is P.O. Header, subform is P.O. Detail). > > I get this error if I try to delete two records in a row. > > DoCmd.SetWarnings False > DoCmd.DoMenuItem acFormBar, acEditMenu, 8, , acMenuVer70 > DoCmd.DoMenuItem acFormBar, acEditMenu, 6, , acMenuVer70 > DoCmd.SetWarnings True > > I also get this error after I try to add a record. The problem started > because I wanted to get the last PO in the file, add one to the PO number, > and put the prefix and the new PO number ito the new record: > > DoCmd.GoToRecord , , acNewRec > > 'If rstPOHeader.RecordCount <> 0 Then > ' rstPOHeader.MoveLast > ' Me.fldPOPrefix = Nz(rstPOHeader!fldPOPrefix) > ' If IsNumeric(rstPOHeader!fldPONumber) Then > ' Me.fldPONumber = rstPOHeader!fldPONumber + 1 > ' fldPOOrderDate.SetFocus > ' Else > ' Me.fldPONumber.SetFocus > ' End If > 'End If > 'If Nz(Me.fldPOPrefix) = "" And Nz(rstPOHeader!fldPOPrefix) = "" Then _ > Me.fldPOPrefix.SetFocus > > Right now the code is commented out. If I uncomment the two lines: > > ' rstPOHeader.MoveLast > ' Me.fldPOPrefix = Nz(rstPOHeader!fldPOPrefix) > > I get the error when I try to save: > > DoCmd.DoMenuItem acFormBar, acRecordsMenu, acSaveRecord, , acMenuVer70 > > I checked the web and there is nothing. Has anyone encountered this before? > > Thanks and regards, > > Rocky Smolin > Beach Access Software > _______________________________________________ > 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 > _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From KIsmert at TexasSystems.com Wed Jan 28 14:58:06 2004 From: KIsmert at TexasSystems.com (Ken Ismert) Date: Wed, 28 Jan 2004 14:58:06 -0600 Subject: [AccessD] Interface Callback Class Questions. In-Reply-To: <000201c3e4d1$2188ff30$6401a8c0@RG> Message-ID: <008201c3e5e1$6de5e0d0$2a3ca8c0@TEXASSYSTEMS.COM> Robert, To make this work, you need a public object interface or type library that both projects (your Host and Remote) can agree on. You could define an Interface class in the Remote db, set its Instancing property as 2 - PublicNotCreatable, allowing you to use objects that implement this interface in both the host and remote projects. But that is not strictly necessary, as you already have the Access public type library, which defines the Report interface, which both projects obviously understand. So, you could do it this way: 1. Add a Public Report Open function in a Remote module that returns an Access.Report You also need a matching Report Close function. 2. Add a Report class in the Host to sink events from the remote report. 3. Add code in a Host module to open and close the report. As I only have A2K, I can't answer the question as to whether the Report interface is forward compatible between A2K and AXP. I tend to think so. If not, you will be forced to use another approach, likely one involving interfaces. I do have a question for you: I found I couldn't reference a remote mdb from a host mde. I had to make the remote mdb into an mde, and reference it in the host, before I could successfully make the host mde. How did you get around this? -Ken Here is the code that I wrote to test this functionality: 1. Report Open/Close functions in a Remote module: ================================================== Public Sub RemoteReportClose(sReportName As String) On Error GoTo HandleErr DoCmd.Close acReport, sReportName Exit Sub HandleErr: Err.Raise Number:=Err.Number, _ Description:=Err.Description, _ Source:="modMain.RemoteReportClose" & vbCrLf & Err.Source Exit Sub End Sub Public Function RemoteReportOpen(sReportName As String) As Access.Report On Error GoTo HandleErr ' Init Set RemoteReportOpen = Nothing ' Open Report DoCmd.OpenReport sReportName, acViewPreview ' Return Set RemoteReportOpen = Application.Reports(sReportName) Exit Function HandleErr: Err.Raise Number:=Err.Number, _ Description:=Err.Description, _ Source:="modMain.RemoteReportOpen" & vbCrLf & Err.Source Exit Function End Function 2. The CReportHost class in the Host: ======================================= Option Compare Database Option Explicit Private Const pcsEventStub As String = "[Event Procedure]" Private WithEvents mrRpt As Access.Report Property Get IsOpen() As Boolean IsOpen = Not (mrRpt Is Nothing) End Property Property Get Name() As String Name = "" If mrRpt Is Nothing Then Exit Sub Name = mrRpt.Name End Property Public Sub CloseRemoteReport() On Error GoTo HandleErr ' Close Report if Open If mrRpt Is Nothing Then Exit Sub RemoteReportClose mrRpt.Name Exit Sub HandleErr: Err.Raise Number:=Err.Number, _ Description:=Err.Description, _ Source:="CReportHost.CloseRemoteReport" & vbCrLf & Err.Source Exit Sub End Sub Public Sub OpenRemoteReport(ReportName As String) On Error GoTo HandleErr ' Open Report Set mrRpt = RemoteReportOpen(ReportName) ' Hook Close Event mrRpt.OnClose = pcsEventStub Exit Sub HandleErr: Err.Raise Number:=Err.Number, _ Description:=Err.Description, _ Source:="CReportHost.OpenRemoteReport" & vbCrLf & Err.Source Exit Sub End Sub Private Sub Class_Terminate() On Error Resume Next CloseRemoteReport End Sub Private Sub mrRpt_Close() MsgBox "Report " & mrRpt.Name & " closed!" Set mrRpt = Nothing End Sub 3. Module-level Code in Host: ============================= Public grReportHost As CReportHost ' Call this routine to open a remote report Public Sub OpenRemoteReport(sReportName As String) On Error GoTo HandleErr ' Close current Report, if any If Not (grReportHost Is Nothing) Then If grReportHost.IsOpen Then grReportHost.CloseRemoteReport End If End If ' Remake Host Object Set grReportHost = New CReportHost ' Open Report grReportHost.OpenRemoteReport sReportName Exit Sub HandleErr: MsgBox "Error: " & Err.Number & vbCrLf _ & Err.Description & vbCrLf _ & "modMain.OpenRemoteReport" & vbCrLf & Err.Source Exit Sub End Sub -----Original Message----- From: Robert Gracie [mailto:Subscriptions at servicexp.com] Sent: Tuesday, January 27, 2004 6:29 AM To: 'Access Developers discussion and problem solving' Subject: [AccessD] Interface Callback Class Questions. Hello All AK2 mde referencing A2K mdb Objective: To open a report in a (host is an mde referenced to the .mdb) referenced .mdb and have all the events for a given report fire inside the host mde. I can do this for a report located inside the mde, however I can seem to figure out how to get the report inside the .mdb to see the class in the mde, as circular references are not permitted in access. Question: I was thinking that an Interface callback would be an option. So is it possible to use an interface callback across a referenced db to accomplish my objective? Any examples...? Thanks Robert Gracie From cfoust at infostatsystems.com Wed Jan 28 15:20:43 2004 From: cfoust at infostatsystems.com (Charlotte Foust) Date: Wed, 28 Jan 2004 13:20:43 -0800 Subject: [AccessD] Error 2468 - You can't carry out this action atthepresent time. Message-ID: It sounds like you may have the parent and child forms linked to the same dataset. Do you? Charlotte Foust -----Original Message----- From: Rocky Smolin - Beach Access Software [mailto:bchacc at san.rr.com] Sent: Wednesday, January 28, 2004 1:04 PM To: Access Developers discussion and problem solving Subject: Re: [AccessD] Error 2468 - You can't carry out this action atthepresent time. I'm getting closer. I deleted the sub-form that on the second tab of the tab form and the two deletes worked. It has something to do with a sub form on a tab. Any clues, anybody? Rocky ----- Original Message ----- From: "Joe K Anderson" To: "Rocky Smolin - Beach Access Software" ; Cc: "Wayne Warren Angelucci" ; "Gordon Bennett" ; "Barry Hynum" ; "Dixon Foss" ; "Mark Krisburg" Sent: Wednesday, January 28, 2004 11:44 AM Subject: Re: [AccessD] Error 2468 - You can't carry out this action at thepresent time. You may need to do a Requery between deletes? joe ----- Original Message ----- From: Rocky Smolin - Beach Access Software To: Access Developers discussion and problem solving Cc: Wayne Warren Angelucci ; Mark Krisburg ; Joe Anderson ; Gordon Bennett ; Dixon Foss ; Bob Heygood ; Barry Hynum Sent: 01-28-2004 11:34 Subject: Re: [AccessD] Error 2468 - You can't carry out this action at the present time. Randall: Tried this experiment just to get the DAO recordset out of the way. I deleted all references to it. Then I replaced: 'DoCmd.SetWarnings False 'DoCmd.DoMenuItem acFormBar, acEditMenu, 8, , acMenuVer70 'DoCmd.DoMenuItem acFormBar, acEditMenu, 6, , acMenuVer70 'DoCmd.SetWarnings True with DoCmd.RunCommand acCmdDelete I selected a record and ran that code which does the delete. Then before trying to delete the second record, I checked the table and the record was still there! So the delete (and probably other operations) are not completing for some reason. Pluse, when I get the error, I have to use the task manager to clear access. It won't quit, cant close any forms, etc. Any ideas? Many thanks in advance and regards, is ----- Original Message ----- From: "Randall Anthony" To: "'Access Developers discussion and problem solving'" Sent: Wednesday, January 28, 2004 10:31 AM Subject: RE: [AccessD] Error 2468 - You can't carry out this action at the present time. > Right off the top of my head, it has to do with the movefirst, movelast. I > ran into this when converting A97 to A2K. Code worked in A97, not A2K and > M$ said this was designed behavior. I'll try to find the article. > > -----Original Message----- > From: Rocky Smolin - Beach Access Software [mailto:bchacc at san.rr.com] > Sent: Wednesday, January 28, 2004 1:07 PM > To: AccessD at databaseadvisors.com > Subject: [AccessD] Error 2468 - You can't carry out this action at the > present time. > > Dear List: > > I am getting the following error message on a bound form: > > Error 2468 - You can't carry out this action at the present time. > > This form has a sub form linked to the main form by the main form's primary > key. (Main form is P.O. Header, subform is P.O. Detail). > > I get this error if I try to delete two records in a row. > > DoCmd.SetWarnings False > DoCmd.DoMenuItem acFormBar, acEditMenu, 8, , acMenuVer70 > DoCmd.DoMenuItem acFormBar, acEditMenu, 6, , acMenuVer70 > DoCmd.SetWarnings True > > I also get this error after I try to add a record. The problem started > because I wanted to get the last PO in the file, add one to the PO number, > and put the prefix and the new PO number ito the new record: > > DoCmd.GoToRecord , , acNewRec > > 'If rstPOHeader.RecordCount <> 0 Then > ' rstPOHeader.MoveLast > ' Me.fldPOPrefix = Nz(rstPOHeader!fldPOPrefix) > ' If IsNumeric(rstPOHeader!fldPONumber) Then > ' Me.fldPONumber = rstPOHeader!fldPONumber + 1 > ' fldPOOrderDate.SetFocus > ' Else > ' Me.fldPONumber.SetFocus > ' End If > 'End If > 'If Nz(Me.fldPOPrefix) = "" And Nz(rstPOHeader!fldPOPrefix) = "" Then _ > Me.fldPOPrefix.SetFocus > > Right now the code is commented out. If I uncomment the two lines: > > ' rstPOHeader.MoveLast > ' Me.fldPOPrefix = Nz(rstPOHeader!fldPOPrefix) > > I get the error when I try to save: > > DoCmd.DoMenuItem acFormBar, acRecordsMenu, acSaveRecord, , acMenuVer70 > > I checked the web and there is nothing. Has anyone encountered this before? > > Thanks and regards, > > Rocky Smolin > Beach Access Software > _______________________________________________ > 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 > _______________________________________________ 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 From cfoust at infostatsystems.com Wed Jan 28 15:24:17 2004 From: cfoust at infostatsystems.com (Charlotte Foust) Date: Wed, 28 Jan 2004 13:24:17 -0800 Subject: [AccessD] Decompile Message-ID: I don't bother with the registry keys, I just create a SendTo shortcut for each version of Access I'm running. Something like this: "C:\Program Files\Microsoft Office\Office10\MSACCESS.EXE" /wrkgrp C:\Windows\System32\MyWrk.mdw "%1" /decompile Then all I need do is right click the file in Windows explorer and pick the version I want to send it to for decompile. Charlotte Foust -----Original Message----- From: DWUTKA at marlow.com [mailto:DWUTKA at marlow.com] Sent: Wednesday, January 28, 2004 12:36 PM To: accessd at databaseadvisors.com Subject: RE: [AccessD] Decompile I've seen this several times, just never got around to doing it. (Still haven't, for the decompile.....). But I did add 'Open with Access 97', 'Open with Access 2000', and 'Open Secured DB'. Had to do it twice though, because once Access 2000 was opened, the settings switched, so I had to duplicate them. That Open Secured DB is something I should have put into place a while back. All of my secured databases have the same security settings for my 'personal' admin account, so no matter what database I build, with security, and no matter what .mdw I create, I can use the same account/password with any of the .mdw's, to gain admin access to it. Gotta love it! Thanks for the thread...it kicked me into gear on this... Drew -----Original Message----- From: Erwin Craps - IT Helps [mailto:Erwin.Craps at ithelps.be] Sent: Wednesday, January 28, 2004 7:49 AM To: Access Developers discussion and problem solving Subject: RE: [AccessD] Decompile Mark YOU ARE GREAT!!! Stupid thing of me is, I very well know this... Just never tought of actualy dooing this for Access Erwin... -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Mitsules, Mark S. (Newport News) Sent: Wednesday, January 28, 2004 1:40 PM To: 'Access Developers discussion and problem solving' Subject: RE: [AccessD] Decompile Dean, Courtesy of Stuart Sanders... Mark **************** Thinking about this I thought of a cool (in my view) way of handling this, that is probably what Susan was talking about. Now I'm wondering why I didn't do this years ago. 1. Start Windows Explorer, 2. Select Tools and then Folder Options... 3. Click on the File Types Tab 4. Find the MDB file type 5. Click Advanced 6. Chances are there are 2 options. Open in bold font (denoting default) and New. You can pretty much add what you want here. For decompile, 7. Click New 8. Under action type Decompile 9. Under Application used to perform action type the equivalent for your install: "C:\Program Files\Microsoft Office\Office10\MSACCESS.EXE" /decompile "%1" 10 Click OK and exit out And wallah! You now right click an mdb and have the context option of decompiling it. But it doesn't stop there. For those of us juggling multiple versions of Access you can setup a right click option to open in each. Eg Open in 97 Open in 2000 Open in XP And make sure the path points to the correct version of access. Cheers Stuart **************** -----Original Message----- From: Dean Ellis [mailto:deanellis at iprimus.com.au] Sent: Wednesday, January 28, 2004 7:36 AM To: AccessD Subject: [AccessD] Decompile _______________________________________________ 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 _______________________________________________ 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 From DWUTKA at marlow.com Wed Jan 28 15:29:39 2004 From: DWUTKA at marlow.com (DWUTKA at marlow.com) Date: Wed, 28 Jan 2004 15:29:39 -0600 Subject: [AccessD] Question of process Message-ID: <2F8793082E00D4119A1700B0D0216BF8022277DF@main2.marlow.com> I think you just need to apply the rules of normalization here. Build a 'person' table, with information that is common no matter what 'type' they are. Then, if you need more information for a particular type, build a table for the extra information, but give it a foriegn key field back to the person table. That way, the person ID will interrelate all types that a person is. Drew -----Original Message----- From: John Clark [mailto:John.Clark at niagaracounty.com] Sent: Wednesday, January 28, 2004 9:39 AM To: accessd at databaseadvisors.com Subject: [AccessD] Question of process I am beginning a new project. The purpose of this program will be to track indictment cases for the District Attorney's office. My question isn't so much technical, like usual, but rather 'technique'. I'll start with a scenario: Lets say I am a Asst. DA, so I am in the system as such. Then after a couple of years, I go into private practice and become a defense attorney; I may now be in the system as the lawyer for a defendant. Now let's assume that I am assaulted and my attacker is charged, so now I am in this system as a victim of this case. Finally, I cross over to the dark side (I know lawyers are already there), and I am indicted for a crime of my own. I will now be in the system as a defendant, a victim, a defense attorney, and an ADA...these last two, very probably, several times. My situation is that I would like to bring up every instance of a person fitting this description, or similar ones. For Instance a report of the previous example might produce the following: JOHN W CLARK #2001-023 ADA #2001-102 ADA #2001-140 ADA #2002-334 ATTORNEY #2003-153 ATTORNEY #2003-543 VICTIM #2003-654 ATTORNEY #2004-030 DEFENDANT I had originally thought to create a table for the 'types' (i.e. attorney, ADA, victim, etc.), a table with names and personal info, an indictment table, and link these all via a fourth table, but this soon seemed insufficient. The average indictment number will have at least five people connected to it (Defendant, Attorney, ADA, Victim, and Judge), and possibly many more, with multiple victims and/or co-defendants. Am I over thinking this? Would it just be as simple as having a table for each type and searching these tables by indictment number later in the program? I thought that maybe, by typing this out, it would be clearer in my mind, by the time I was done, but I am still fuzzy with it! Thanks for any insight or advise you could give me! John W Clark _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From DWUTKA at marlow.com Wed Jan 28 15:33:21 2004 From: DWUTKA at marlow.com (DWUTKA at marlow.com) Date: Wed, 28 Jan 2004 15:33:21 -0600 Subject: [AccessD] Getting internet data Message-ID: <2F8793082E00D4119A1700B0D0216BF8022277E0@main2.marlow.com> John, I wrote some code that that PUSHES data to a web page, but it would be a simple matter of reversing the process (sort of) to read data from the web. Here's the module I wrote to do that: Option Compare Database Public KatIE As InternetExplorer Function CheckForNull(strTemp) If IsNull(strTemp) Then CheckForNull = "" Else CheckForNull = strTemp End If End Function Function OpenKatExplorer() Dim rs As ADODB.Recordset Set rs = New ADODB.Recordset rs.Open "tblDefaultURL", CurrentProject.Connection, adOpenKeyset, adLockReadOnly rs.MoveFirst Set KatIE = Nothing Set KatIE = GetObject("", "InternetExplorer.Application") KatIE.Visible = True KatIE.Navigate rs.Fields(0).Value rs.Close Set rs = Nothing End Function Function SetKatData(strKey As String) On Error GoTo ErrorHandler Dim strSQL As String Dim rs As Recordset Dim rsTemp As Recordset Dim itm Dim tmpDate As Date Dim intMonth As Long Dim intYear As Long strSQL = "SELECT tblSORM_TWCC1S.I_strLastName, tblSORM_TWCC1S.I_strMiddleName, tblS" & _ "ORM_TWCC1S.I_strFirstName, tblSORM_TWCC1S.I_strSex, tblSORM_TWCC1S.I_strSocialSecu" & _ "rityNumber, tblSORM_TWCC1S.I_strHomePhone, tblSORM_TWCC1S.I_strWorkPhoneNumber, tb" & _ "lSORM_TWCC1S.P_logSpeakEnglish, tblSORM_TWCC1S.I_strStreetAddress1, tblSORM_TWCC1S" & _ ".I_strStreetAddress2, tblSORM_TWCC1S.I_strCity, tblSORM_TWCC1S.P_strCounty, tblSOR" & _ "M_TWCC1S.I_strZipCode, tblSORM_TWCC1S.IM_memIncidentDescription, tblSORM_TWCC1S.I_" & _ "strWorksiteLocation, tblSORM_TWCC1S.I_strSiteName, tblSORM_TWCC1S.S_strAddress1, t" & _ "blSORM_TWCC1S.S_strCounty, tblSORM_TWCC1S.S_strCity, tblSORM_TWCC1S.S_strState, tb" & _ "lSORM_TWCC1S.S_strZipCode, tblSORM_TWCC1S.IM_memWitnesses, tblSORM_TWCC1S.I_logDea" & _ "th, tblSORM_TWCC1S.I_strSupervisorNotified, tblSORM_TWCC1S.I_dtmNotifiedOfIncident" & _ ", tblSORM_TWCC1S.P_logRecruitedInState, tblSORM_TWCC1S.P_strJobClassification, tbl" & _ "SORM_TWCC1S.II_intHourPerDay, tblSORM_TWCC1S.II_curWagePerWeek, tblSORM_TWCC1S.SORM" & _ "_curLastPayCheck, tblSORM_TWCC1S.II_intDayPerWeek, tblSORM_TWCC1S.P_strMarried, t" & _ "blSORM_TWCC1S.P_intNumberOfDependents, tblSORM_TWCC1S.P_strSpouseName , tblSORM_TW" & _ "CC1S.I_strDoctorName, tblSORM_TWCC1S.D_strPhone, tblSORM_TWCC1S.D_strStreetAddress" & _ "1, tblSORM_TWCC1S.D_strCity, tblSORM_TWCC1S.D_strState, tblSORM_TWCC1S.D_strZipCod" & _ "e, tblSORM_TWCC1S.I_dtmIncidentDate, tblSORM_TWCC1S.I_dtmIncidentTime, tblSORM_TWC" & _ "C1S.C_strAddress1, tblSORM_TWCC1S.C_strPhone, tblSORM_TWCC1S.C_strCity, tblSORM_TW" & _ "CC1S.C_strState, tblSORM_TWCC1S.C_strZipCode, tblSORM_TWCC1S.C_strFederalTaxNumber" & _ ", tblSORM_TWCC1S.C_strSICStandard, tblSORM_TWCC1S.C_strSICSpecific, tblSORM_TWCC1S" & _ ".P_strPayCode, tblSORM_TWCC1S.P_dtmDateOfHire, tblSORM_TWCC1S.P_dtmDateOf" & _ "Birth, tblSORM_TWCC1S.P_strLanguage, tblSORM_TWCC1S.LD_dtmFirstLostDay, tblSORM_T" & _ "WCC1S.JobCompare, tblSORM_TWCC1S.I_dtmDateBackToWork, tblSORM_TWCC1S.Sorm_intLenOc" & _ "cYears, tblSORM_TWCC1S.Sorm_intLenOccMonths, tblSORM_TWCC1S.Sorm_logacci_prevent_r" & _ "eq, tblSORM_TWCC1S.Sorm_logacci_prevent_received, tblSORM_TWCC1S.Sorm_logOwner, " strSQL = strSQL & "tblSORM_TWCC1S.Sorm_intSickHours, tblSORM_TWCC1S" & _ ".Sorm_intAnnualLeave, tblSORM_TWCC1S.P_strLanguage, tblSORM_TWCC1S.I_strState, t" & _ "blSORM_TWCC1S.P_strCounty, tblSORM_TWCC1S.C_strPersonCompletingFormName" & _ ", tblSORM_TWCC1S.C_strPersonCompletingFormJobTitle, tblSORM_TWCC1S.Sorm_strAgencyLocationCode" & _ ", tblSORM_TWCC1S.Sorm_logacci_prevent_req, tblSORM_TWCC1S.Sorm_logacci_prevent_received " & _ "FROM tblSORM_TWCC1S " & _ "WHERE (((tblSORM_TWCC1S.pkCaseNumber)=""" & strKey & """));" Set rs = New ADODB.Recordset rs.Open strSQL, CurrentProject.Connection, adOpenKeyset, adLockReadOnly If rs.EOF = False Then rs.MoveFirst With KatIE.Document.theForm .lastname.Value = CheckForNull(rs.Fields(0).Value) .middlename.Value = CheckForNull(rs.Fields(1).Value) .firstname.Value = CheckForNull(rs.Fields(2).Value) Select Case UCase(Left(CheckForNull(rs.Fields(3).Value), 1)) Case "F" .gender(0).Checked = True Case "M" .gender(1).Checked = True End Select .SSN.Value = CheckForNull(rs.Fields(4).Value) .homephone.Value = CheckForNull(rs.Fields(5).Value) .employeephone.Value = CheckForNull(rs.Fields(6).Value) If rs.Fields(7).Value = True Then .english(0).Checked = True Else .english(1).Checked = True .language.Value = CheckForNull(rs.Fields(64).Value) End If .mail_address1.Value = CheckForNull(rs.Fields(8).Value) .mail_address2.Value = CheckForNull(rs.Fields(9).Value) .mail_city.Value = CheckForNull(rs.Fields(10).Value) For Each itm In .mail_county.options If Trim(UCase(Mid(itm.Text, 5))) = Trim(UCase(CheckForNull(rs.Fields(11).Value))) Then itm.Selected = True Exit For End If Next .mail_zip.Value = CheckForNull(rs.Fields(12).Value) .mail_state.Value = CheckForNull(rs.Fields(65).Value) .occurred_how.Value = CheckForNull(rs.Fields(13).Value) .injury_location.Value = CheckForNull(rs.Fields(14).Value) .site_address_name.Value = CheckForNull(rs.Fields(15).Value) .site_street.Value = CheckForNull(rs.Fields(16).Value) For Each itm In .site_county.options If Trim(UCase(Mid(itm.Text, 5))) = Trim(UCase(CheckForNull(rs.Fields(17).Value))) Then itm.Selected = True Exit For End If Next .site_city.Value = CheckForNull(rs.Fields(18).Value) .site_state.Value = CheckForNull(rs.Fields(19).Value) .site_zip.Value = CheckForNull(rs.Fields(20).Value) .witnesses.Value = CheckForNull(rs.Fields(21).Value) If rs.Fields(22).Value = True Then .emp_death(0).Checked = True Else .emp_death(1).Checked = True End If .supervisor_name.Value = CheckForNull(rs.Fields(23).Value) .report_date.Value = Format(CheckForNull(rs.Fields(24).Value), "mm/dd/yyyy") If CheckForNull(rs.Fields(25).Value) = True Then .tx_recruit(0).Checked = True Else .tx_recruit(1).Checked = True End If .injured_occupy.Value = CheckForNull(rs.Fields(26).Value) .pay_rate.Value = CheckForNull(rs.Fields(28).Value) .pay_frequency.Value = "W" .full_week_hours.Value = rs.Fields(27).Value * rs.Fields(30).Value .last_paycheck.Value = Format(CheckForNull(rs.Fields(29).Value), "#,##0.00") .full_week_days.Value = CheckForNull(rs.Fields(30).Value) For Each itm In .marital_status.options If Trim(UCase(itm.Text)) = Trim(UCase(CheckForNull(rs.Fields(31).Value))) Then itm.Selected = True Exit For End If Next .kid_number.Value = CheckForNull(rs.Fields(32).Value) .spouse_name.Value = CheckForNull(rs.Fields(33).Value) .doctor_name.Value = CheckForNull(rs.Fields(34).Value) .doctor_phone.Value = Format(CheckForNull(rs.Fields(35).Value), "000-000-0000") .doctor_street.Value = CheckForNull(rs.Fields(36).Value) .doctor_city.Value = CheckForNull(rs.Fields(37).Value) .doctor_state.Value = CheckForNull(rs.Fields(38).Value) .doctor_zip.Value = CheckForNull(rs.Fields(39).Value) .injury_date.Value = Format(CheckForNull(rs.Fields(40).Value), "mm/dd/yyyy") .injury_time.Value = Left(Format(CheckForNull(rs.Fields(41).Value), "hh:nnAMPM"), 5) If Hour(CheckForNull(rs.Fields(41).Value)) >= 12 Then .injury_AMPM(1).Checked = True Else .injury_AMPM(0).Checked = True End If .agency_mail_address.Value = CheckForNull(rs.Fields(42).Value) .agency_phone.Value = Format(CheckForNull(rs.Fields(43).Value), "000-000-0000") .agency_city.Value = CheckForNull(rs.Fields(44).Value) .agency_state.Value = CheckForNull(rs.Fields(45).Value) .agency_zip.Value = CheckForNull(rs.Fields(46).Value) .fed_id_num.Value = CheckForNull(rs.Fields(47).Value) .pSIC.Value = CheckForNull(rs.Fields(48).Value) .sSIC.Value = CheckForNull(rs.Fields(49).Value) .payroll_class_code.Value = CheckForNull(rs.Fields(50).Value) .hire_date.Value = Format(CheckForNull(rs.Fields(51).Value), "mm/dd/yyyy") .birth_date.Value = CheckForNull(rs.Fields(52).Value) .language.Value = CheckForNull(rs.Fields(53).Value) If IsNull(rs.Fields(54).Value) Then .loss_date.Value = "NLT" Else .loss_date.Value = Format(rs.Fields(54).Value, "mm/dd/yyyy") End If If UCase(CheckForNull(rs.Fields(55).Value)) = "YES" Then .normal_job(0).Checked = True Else .normal_job(1).Checked = True End If .return_date.Value = Format(CheckForNull(rs.Fields(56).Value), "mm/dd/yyyy") .occupy_years.Value = CheckForNull(rs.Fields(57).Value) .occupy_months.Value = CheckForNull(rs.Fields(58).Value) If rs.Fields(59).Value = True Then .accident_prevent_req_receive(0).Checked = True Else .accident_prevent_req_receive(1).Checked = True End If If rs.Fields(60).Value = True Then .accident_prevent_req_resolve(0).Checked = True Else .accident_prevent_req_resolve(1).Checked = True End If If rs.Fields(61).Value = True Then .officer(0).Checked = True Else .officer(1).Checked = True End If .injury_cause.Value = CheckForNull(rs.Fields(62).Value) .sick_leave.Value = CheckForNull(rs.Fields(62).Value) .annual_leave.Value = CheckForNull(rs.Fields(63).Value) .completing_name.Value = CheckForNull(rs.Fields(67).Value) .completing_title.Value = CheckForNull(rs.Fields(68).Value) .agency_lcode1.Value = CheckForNull(rs.Fields(69).Value) If rs.Fields(70).Value = True Then .accident_prevent_req_receive(0).Checked = True Else .accident_prevent_req_receive(1).Checked = True End If If rs.Fields(71).Value = True Then .accident_prevent_req_resolve(0).Checked = True Else .accident_prevent_req_resolve(1).Checked = True End If Set rsTemp = New ADODB.Recordset strSQL = "SELECT tblSORM_NatureOfInjury.SormN_strDescription " & _ "FROM tblSORM_NatureOfInjury " & _ "WHERE (((tblSORM_NatureOfInjury.SormN_fk_CaseNumber)=""" & strKey & """));" rsTemp.Open strSQL, CurrentProject.Connection, adOpenKeyset, adLockReadOnly If rsTemp.EOF = False Then rs.MoveFirst Do Until rsTemp.EOF = True For Each itm In .injury_nature.options If Trim(UCase(itm.Text)) = Trim(UCase(rsTemp.Fields(0).Value)) Then itm.Selected = True Exit For End If Next rsTemp.MoveNext Loop rsTemp.Close Set rsTemp = Nothing Set rsTemp = New ADODB.Recordset strSQL = "SELECT tblSORM_BodyPart.SormBDY_strDescription " & _ "FROM tblSORM_BODYPart " & _ "WHERE (((tblSORM_BodyPart.SormBDY_fk_CaseNumber)=""" & strKey & """));" rsTemp.Open strSQL, CurrentProject.Connection, adOpenKeyset, adLockReadOnly If rsTemp.EOF = False Then rs.MoveFirst Do Until rsTemp.EOF = True For Each itm In .part_injured.options If Trim(UCase(itm.Text)) = Trim(UCase(rsTemp.Fields(0).Value)) Then itm.Selected = True Exit For End If Next rsTemp.MoveNext Loop rsTemp.Close Set rsTemp = Nothing Set rsTemp = New ADODB.Recordset strSQL = "SELECT tblSORM_Cause.SormCS_strDescription " & _ "FROM tblSORM_Cause " & _ "WHERE (((tblSORM_Cause.SormCS_fk_CaseNumber)=""" & strKey & """));" rsTemp.Open strSQL, CurrentProject.Connection, adOpenKeyset, adLockReadOnly If rsTemp.EOF = False Then rs.MoveFirst Do Until rsTemp.EOF = True For Each itm In .injury_cause.options If Trim(UCase(itm.Text)) = Trim(UCase(rsTemp.Fields(0).Value)) Then itm.Selected = True Exit For End If Next rsTemp.MoveNext Loop rsTemp.Close Set rsTemp = Nothing tmpDate = CheckForNull(rs.Fields(51).Value) intMonth = 0 intYear = 0 tmpDate = tmpDate + (365.25 / 12) Do Until tmpDate >= rs.Fields(40).Value intMonth = intMonth + 1 If intMonth = 12 Then intMonth = 0 intYear = intYear + 1 End If tmpDate = tmpDate + (365.25 / 12) Loop .pos_service_years.Value = intYear .pos_service_months.Value = intMonth End With MsgBox "Done" Else MsgBox "No Data for this case number.", vbOKOnly + vbCritical, "No Data" End If rs.Close Set rs = Nothing Exit Function ErrorHandler: MsgBox "Data Upload failed." Err.Clear End Function -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of John W. Colby Sent: Wednesday, January 28, 2004 1:03 PM To: AccessD Subject: [AccessD] Getting internet data I need to get some internet data into a db. In order to do that I need to "navigate", specifically I have to enter a username / password which will bring me to a specific page. After that clicking on tabs at the top take me to other pages I'd also like to get data off of. Does anyone know how to do this from VBA? John W. Colby www.ColbyConsulting.com _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From DWUTKA at marlow.com Wed Jan 28 15:36:20 2004 From: DWUTKA at marlow.com (DWUTKA at marlow.com) Date: Wed, 28 Jan 2004 15:36:20 -0600 Subject: [AccessD] Getting internet data Message-ID: <2F8793082E00D4119A1700B0D0216BF8022277E1@main2.marlow.com> You may be able to 'browse' to secured sites, with the following URL: http://username:password at www.website.com This works for sites that use plain text password security, if you are prompted for a domain, along with a name and password, then the URL 'format' above won't work, but IE can be setup to use your currently logged on credentials. Drew -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Erwin Craps - IT Helps Sent: Wednesday, January 28, 2004 2:53 PM To: Access Developers discussion and problem solving Subject: RE: [AccessD] Getting internet data I done that before (and still using it) with a HTTP control from IP Works (I believe they changed name into something else). You can get the page in a string and analyse it further. I believe there is a basic control from MS also in Access or VB, a HTTP control. Only one thing I don't know and is the tricky part... The password. No experiance in that one. But you should look at a HTTP control. I have my first code done with the XML parser. There is a HTTP XML parser to, maybe this can do the trick to. Erwin -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of John W. Colby Sent: Wednesday, January 28, 2004 8:03 PM To: AccessD Subject: [AccessD] Getting internet data I need to get some internet data into a db. In order to do that I need to "navigate", specifically I have to enter a username / password which will bring me to a specific page. After that clicking on tabs at the top take me to other pages I'd also like to get data off of. Does anyone know how to do this from VBA? John W. Colby www.ColbyConsulting.com _______________________________________________ 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 From bchacc at san.rr.com Wed Jan 28 15:42:09 2004 From: bchacc at san.rr.com (Rocky Smolin - Beach Access Software) Date: Wed, 28 Jan 2004 13:42:09 -0800 Subject: [AccessD] Error 2468 - You can't carry out this actionatthepresent time. References: Message-ID: <012e01c3e5e7$94fbec90$6601a8c0@HAL9002> Charlotte: No the main form has record source "tblPOHeader" and the sub-form on the second page of the tab has record source "tblPODetail". Rocky ----- Original Message ----- From: "Charlotte Foust" To: "Access Developers discussion and problem solving" Sent: Wednesday, January 28, 2004 1:20 PM Subject: RE: [AccessD] Error 2468 - You can't carry out this actionatthepresent time. > It sounds like you may have the parent and child forms linked to the > same dataset. Do you? > > Charlotte Foust > > -----Original Message----- > From: Rocky Smolin - Beach Access Software [mailto:bchacc at san.rr.com] > Sent: Wednesday, January 28, 2004 1:04 PM > To: Access Developers discussion and problem solving > Subject: Re: [AccessD] Error 2468 - You can't carry out this action > atthepresent time. > > > I'm getting closer. I deleted the sub-form that on the second tab of > the tab form and the two deletes worked. > > It has something to do with a sub form on a tab. Any clues, anybody? > > Rocky > > ----- Original Message ----- > From: "Joe K Anderson" > To: "Rocky Smolin - Beach Access Software" ; > > Cc: "Wayne Warren Angelucci" ; "Gordon > Bennett" ; "Barry Hynum" > ; "Dixon Foss" ; "Mark Krisburg" > > Sent: Wednesday, January 28, 2004 11:44 AM > Subject: Re: [AccessD] Error 2468 - You can't carry out this action at > thepresent time. > > > You may need to do a Requery between deletes? > > joe > ----- Original Message ----- > From: Rocky Smolin - Beach Access Software > To: Access Developers discussion and problem solving > Cc: Wayne Warren Angelucci ; Mark Krisburg ; Joe Anderson ; Gordon > Bennett ; Dixon Foss ; Bob Heygood ; Barry Hynum > Sent: 01-28-2004 11:34 > Subject: Re: [AccessD] Error 2468 - You can't carry out this action at > the present time. > > > Randall: > > Tried this experiment just to get the DAO recordset out of the way. I > deleted all references to it. > > Then I replaced: > > 'DoCmd.SetWarnings False > 'DoCmd.DoMenuItem acFormBar, acEditMenu, 8, , acMenuVer70 > 'DoCmd.DoMenuItem acFormBar, acEditMenu, 6, , acMenuVer70 > 'DoCmd.SetWarnings True > > with > > DoCmd.RunCommand acCmdDelete > > I selected a record and ran that code which does the delete. Then > before > trying to delete the second record, I checked the table and the record > was > still there! > > So the delete (and probably other operations) are not completing for > some > reason. > > Pluse, when I get the error, I have to use the task manager to clear > access. > It won't quit, cant close any forms, etc. > > Any ideas? > > Many thanks in advance and regards, > > is > > ----- Original Message ----- > From: "Randall Anthony" > To: "'Access Developers discussion and problem solving'" > > Sent: Wednesday, January 28, 2004 10:31 AM > Subject: RE: [AccessD] Error 2468 - You can't carry out this action at > the > present time. > > > > Right off the top of my head, it has to do with the movefirst, > movelast. > I > > ran into this when converting A97 to A2K. Code worked in A97, not > A2K and > > M$ said this was designed behavior. I'll try to find the article. > > > > -----Original Message----- > > From: Rocky Smolin - Beach Access Software > [mailto:bchacc at san.rr.com] > > Sent: Wednesday, January 28, 2004 1:07 PM > > To: AccessD at databaseadvisors.com > > Subject: [AccessD] Error 2468 - You can't carry out this action at > the > > present time. > > > > Dear List: > > > > I am getting the following error message on a bound form: > > > > Error 2468 - You can't carry out this action at the present time. > > > > This form has a sub form linked to the main form by the main form's > primary > > key. (Main form is P.O. Header, subform is P.O. Detail). > > > > I get this error if I try to delete two records in a row. > > > > DoCmd.SetWarnings False > > DoCmd.DoMenuItem acFormBar, acEditMenu, 8, , acMenuVer70 > > DoCmd.DoMenuItem acFormBar, acEditMenu, 6, , acMenuVer70 > > DoCmd.SetWarnings True > > > > I also get this error after I try to add a record. The problem > started > > because I wanted to get the last PO in the file, add one to the PO > number, > > and put the prefix and the new PO number ito the new record: > > > > DoCmd.GoToRecord , , acNewRec > > > > 'If rstPOHeader.RecordCount <> 0 Then > > ' rstPOHeader.MoveLast > > ' Me.fldPOPrefix = Nz(rstPOHeader!fldPOPrefix) > > ' If IsNumeric(rstPOHeader!fldPONumber) Then > > ' Me.fldPONumber = rstPOHeader!fldPONumber + 1 > > ' fldPOOrderDate.SetFocus > > ' Else > > ' Me.fldPONumber.SetFocus > > ' End If > > 'End If > > 'If Nz(Me.fldPOPrefix) = "" And Nz(rstPOHeader!fldPOPrefix) = "" > Then > _ > > Me.fldPOPrefix.SetFocus > > > > Right now the code is commented out. If I uncomment the two lines: > > > > ' rstPOHeader.MoveLast > > ' Me.fldPOPrefix = Nz(rstPOHeader!fldPOPrefix) > > > > I get the error when I try to save: > > > > DoCmd.DoMenuItem acFormBar, acRecordsMenu, acSaveRecord, , > acMenuVer70 > > > > I checked the web and there is nothing. Has anyone encountered this > before? > > > > Thanks and regards, > > > > Rocky Smolin > > Beach Access Software > > _______________________________________________ > > 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 > > > _______________________________________________ > 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 > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com From my.lists at verizon.net Wed Jan 28 15:43:25 2004 From: my.lists at verizon.net (Francisco H Tapia) Date: Wed, 28 Jan 2004 13:43:25 -0800 Subject: [AccessD] Vonage In-Reply-To: <2F8793082E00D4119A1700B0D0216BF8022277DE@main2.marlow.com> References: <2F8793082E00D4119A1700B0D0216BF8022277DE@main2.marlow.com> Message-ID: <40182CFD.7090707@verizon.net> Drew who? ;o) -- -Francisco (I know, I know, this should be in OT or at least dba-tech) DWUTKA at marlow.com wrote: >Please note, that until this post, I have COMPLETELY stayed out of this >thread! (just wanted that noted in the official 'how bad has Drew >been lately' log. > >Drew > >-----Original Message----- >From: Bryan Carbonnell [mailto:carbonnb at sympatico.ca] >Sent: Wednesday, January 28, 2004 9:32 AM >To: accessd at databaseadvisors.com >Subject: Re: RE: [AccessD] Vonage > > > > >>From: "John W. Colby" >> >> > > > >>Right, sorry. It's just been sooooo dead lately I thought I'd brighten >>things up a bit. ;-) >> >> > >That's one of the reasons it was allowed to go on for a week. > >That and I'm just trying to catch up on my backlog :-)) > > > > > From prosoft6 at hotmail.com Wed Jan 28 15:43:35 2004 From: prosoft6 at hotmail.com (Julie Reardon-Taylor) Date: Wed, 28 Jan 2004 16:43:35 -0500 Subject: [AccessD] Vonage Message-ID: Hey, Include me too. I'm just an hour North of Syracuse in Watertown. Julie Reardon-Taylor PRO-SOFT OF NY, INC. www.pro-soft.net _________________________________________________________________ Scope out the new MSN Plus Internet Software ? optimizes dial-up to the max! http://join.msn.com/?pgmarket=en-us&page=byoa/plus&ST=1 From martyconnelly at shaw.ca Wed Jan 28 15:42:55 2004 From: martyconnelly at shaw.ca (MartyConnelly) Date: Wed, 28 Jan 2004 13:42:55 -0800 Subject: [AccessD] Getting internet data References: <46B976F2B698FF46A4FE7636509B22DF03D199@stekelbes.ithelps.local> Message-ID: <40182CDF.4070607@shaw.ca> Something like this may work Sub test() 'set reference to MS xml 3 or 4 Dim xmlhttp As MSXML2.XMLHTTP40 Set xmlhttp = New MSXML2.XMLHTTP40 'xmlhttp.Open "POST", "http://moneycentral.msn.com/investor/research/printrep.asp?Symbol=MSFT", False 'where uid and pwd are userid and password strings 'if this doesnt work the userid may have to be passed in the headers xmlhttp.Open "GET", "http://moneycentral.msn.com/scripts/webquote.dll?iPage=qd&Symbol=MSFT", False,uid.pwd xmlhttp.send 'xmlhttp.Open "POST", strURL, False 'xmlhttp.send (sString) Debug.Print xmlhttp.responseText 'then parse responseText string End Sub Erwin Craps - IT Helps wrote: >I done that before (and still using it) with a HTTP control from IP >Works (I believe they changed name into something else). >You can get the page in a string and analyse it further. >I believe there is a basic control from MS also in Access or VB, a HTTP >control. > >Only one thing I don't know and is the tricky part... The password. >No experiance in that one. But you should look at a HTTP control. > >I have my first code done with the XML parser. There is a HTTP XML >parser to, maybe this can do the trick to. > >Erwin > > >-----Original Message----- >From: accessd-bounces at databaseadvisors.com >[mailto:accessd-bounces at databaseadvisors.com] On Behalf Of John W. Colby >Sent: Wednesday, January 28, 2004 8:03 PM >To: AccessD >Subject: [AccessD] Getting internet data > >I need to get some internet data into a db. In order to do that I need >to "navigate", specifically I have to enter a username / password which >will bring me to a specific page. After that clicking on tabs at the >top take me to other pages I'd also like to get data off of. > >Does anyone know how to do this from VBA? > >John W. Colby >www.ColbyConsulting.com > > >_______________________________________________ >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 > > > -- Marty Connelly Victoria, B.C. Canada From bchacc at san.rr.com Wed Jan 28 16:13:25 2004 From: bchacc at san.rr.com (Rocky Smolin - Beach Access Software) Date: Wed, 28 Jan 2004 14:13:25 -0800 Subject: [AccessD] Error 2468 - You can't carry out this actionatthepresent time. References: Message-ID: <013201c3e5eb$f3402b50$6601a8c0@HAL9002> Charlotte: Further to my reply, I found that when I did a delete then, before I did anything else, I went and looked in the tblPOHeader and the record was still there. For some reason it's not completing the delete and that's why I think it's telling me that I can't make any moves at this time. Rocky ----- Original Message ----- From: "Charlotte Foust" To: "Access Developers discussion and problem solving" Sent: Wednesday, January 28, 2004 1:20 PM Subject: RE: [AccessD] Error 2468 - You can't carry out this actionatthepresent time. > It sounds like you may have the parent and child forms linked to the > same dataset. Do you? > > Charlotte Foust > > -----Original Message----- > From: Rocky Smolin - Beach Access Software [mailto:bchacc at san.rr.com] > Sent: Wednesday, January 28, 2004 1:04 PM > To: Access Developers discussion and problem solving > Subject: Re: [AccessD] Error 2468 - You can't carry out this action > atthepresent time. > > > I'm getting closer. I deleted the sub-form that on the second tab of > the tab form and the two deletes worked. > > It has something to do with a sub form on a tab. Any clues, anybody? > > Rocky > > ----- Original Message ----- > From: "Joe K Anderson" > To: "Rocky Smolin - Beach Access Software" ; > > Cc: "Wayne Warren Angelucci" ; "Gordon > Bennett" ; "Barry Hynum" > ; "Dixon Foss" ; "Mark Krisburg" > > Sent: Wednesday, January 28, 2004 11:44 AM > Subject: Re: [AccessD] Error 2468 - You can't carry out this action at > thepresent time. > > > You may need to do a Requery between deletes? > > joe > ----- Original Message ----- > From: Rocky Smolin - Beach Access Software > To: Access Developers discussion and problem solving > Cc: Wayne Warren Angelucci ; Mark Krisburg ; Joe Anderson ; Gordon > Bennett ; Dixon Foss ; Bob Heygood ; Barry Hynum > Sent: 01-28-2004 11:34 > Subject: Re: [AccessD] Error 2468 - You can't carry out this action at > the present time. > > > Randall: > > Tried this experiment just to get the DAO recordset out of the way. I > deleted all references to it. > > Then I replaced: > > 'DoCmd.SetWarnings False > 'DoCmd.DoMenuItem acFormBar, acEditMenu, 8, , acMenuVer70 > 'DoCmd.DoMenuItem acFormBar, acEditMenu, 6, , acMenuVer70 > 'DoCmd.SetWarnings True > > with > > DoCmd.RunCommand acCmdDelete > > I selected a record and ran that code which does the delete. Then > before > trying to delete the second record, I checked the table and the record > was > still there! > > So the delete (and probably other operations) are not completing for > some > reason. > > Pluse, when I get the error, I have to use the task manager to clear > access. > It won't quit, cant close any forms, etc. > > Any ideas? > > Many thanks in advance and regards, > > is > > ----- Original Message ----- > From: "Randall Anthony" > To: "'Access Developers discussion and problem solving'" > > Sent: Wednesday, January 28, 2004 10:31 AM > Subject: RE: [AccessD] Error 2468 - You can't carry out this action at > the > present time. > > > > Right off the top of my head, it has to do with the movefirst, > movelast. > I > > ran into this when converting A97 to A2K. Code worked in A97, not > A2K and > > M$ said this was designed behavior. I'll try to find the article. > > > > -----Original Message----- > > From: Rocky Smolin - Beach Access Software > [mailto:bchacc at san.rr.com] > > Sent: Wednesday, January 28, 2004 1:07 PM > > To: AccessD at databaseadvisors.com > > Subject: [AccessD] Error 2468 - You can't carry out this action at > the > > present time. > > > > Dear List: > > > > I am getting the following error message on a bound form: > > > > Error 2468 - You can't carry out this action at the present time. > > > > This form has a sub form linked to the main form by the main form's > primary > > key. (Main form is P.O. Header, subform is P.O. Detail). > > > > I get this error if I try to delete two records in a row. > > > > DoCmd.SetWarnings False > > DoCmd.DoMenuItem acFormBar, acEditMenu, 8, , acMenuVer70 > > DoCmd.DoMenuItem acFormBar, acEditMenu, 6, , acMenuVer70 > > DoCmd.SetWarnings True > > > > I also get this error after I try to add a record. The problem > started > > because I wanted to get the last PO in the file, add one to the PO > number, > > and put the prefix and the new PO number ito the new record: > > > > DoCmd.GoToRecord , , acNewRec > > > > 'If rstPOHeader.RecordCount <> 0 Then > > ' rstPOHeader.MoveLast > > ' Me.fldPOPrefix = Nz(rstPOHeader!fldPOPrefix) > > ' If IsNumeric(rstPOHeader!fldPONumber) Then > > ' Me.fldPONumber = rstPOHeader!fldPONumber + 1 > > ' fldPOOrderDate.SetFocus > > ' Else > > ' Me.fldPONumber.SetFocus > > ' End If > > 'End If > > 'If Nz(Me.fldPOPrefix) = "" And Nz(rstPOHeader!fldPOPrefix) = "" > Then > _ > > Me.fldPOPrefix.SetFocus > > > > Right now the code is commented out. If I uncomment the two lines: > > > > ' rstPOHeader.MoveLast > > ' Me.fldPOPrefix = Nz(rstPOHeader!fldPOPrefix) > > > > I get the error when I try to save: > > > > DoCmd.DoMenuItem acFormBar, acRecordsMenu, acSaveRecord, , > acMenuVer70 > > > > I checked the web and there is nothing. Has anyone encountered this > before? > > > > Thanks and regards, > > > > Rocky Smolin > > Beach Access Software > > _______________________________________________ > > 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 > > > _______________________________________________ > 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 > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com From andrew.haslett at ilc.gov.au Wed Jan 28 16:27:27 2004 From: andrew.haslett at ilc.gov.au (Haslett, Andrew) Date: Thu, 29 Jan 2004 08:57:27 +1030 Subject: [AccessD] OT: Getting internet data Message-ID: >From memory you can use the XMLHTTP component to scrape URL's. Can't recall any authentication methods, although there's been a couple of versions I think. Cheers, Andrew -----Original Message----- From: DWUTKA at marlow.com [mailto:DWUTKA at marlow.com] Sent: Thursday, 29 January 2004 8:06 AM To: accessd at databaseadvisors.com Subject: RE: [AccessD] Getting internet data You may be able to 'browse' to secured sites, with the following URL: http://username:password at www.website.com This works for sites that use plain text password security, if you are prompted for a domain, along with a name and password, then the URL 'format' above won't work, but IE can be setup to use your currently logged on credentials. Drew -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Erwin Craps - IT Helps Sent: Wednesday, January 28, 2004 2:53 PM To: Access Developers discussion and problem solving Subject: RE: [AccessD] Getting internet data I done that before (and still using it) with a HTTP control from IP Works (I believe they changed name into something else). You can get the page in a string and analyse it further. I believe there is a basic control from MS also in Access or VB, a HTTP control. Only one thing I don't know and is the tricky part... The password. No experiance in that one. But you should look at a HTTP control. I have my first code done with the XML parser. There is a HTTP XML parser to, maybe this can do the trick to. Erwin -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of John W. Colby Sent: Wednesday, January 28, 2004 8:03 PM To: AccessD Subject: [AccessD] Getting internet data I need to get some internet data into a db. In order to do that I need to "navigate", specifically I have to enter a username / password which will bring me to a specific page. After that clicking on tabs at the top take me to other pages I'd also like to get data off of. Does anyone know how to do this from VBA? John W. Colby www.ColbyConsulting.com _______________________________________________ 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 _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com IMPORTANT - PLEASE READ ******************** This email and any files transmitted with it are confidential and may contain information protected by law from disclosure. If you have received this message in error, please notify the sender immediately and delete this email from your system. No warranty is given that this email or files, if attached to this email, are free from computer viruses or other defects. They are provided on the basis the user assumes all responsibility for loss, damage or consequence resulting directly or indirectly from their use, whether caused by the negligence of the sender or not. From mastercafe at ctv.es Wed Jan 28 17:11:07 2004 From: mastercafe at ctv.es (MastercafeCTV) Date: Thu, 29 Jan 2004 00:11:07 +0100 Subject: [AccessD] Snapshot export fail In-Reply-To: <2F8793082E00D4119A1700B0D0216BF8022277DC@main2.marlow.com> Message-ID: <001f01c3e5f4$03312840$0200a8c0@servercafe> We have a main Form to prepare the output for the reports (to screen, excel or printer), for the screen que use de SNP format with this sentece: DoCmd.OutputTo acOutputReport, stDocName, acFormatSNP, "c:\STEEL\SNP\" & stDocName & ".snp" DoCmd.OpenForm "SnapShot", acNormal, , , acFormEdit, acDialog, "c:\STEEL\SNP\" & stDocName & ".snp" In the second line we open the main form that retrieve the SNP file that we create on the first line. The problem is that some computer indicate that OUTPUT FORMAT not AVAILABLE. We install Win2k with AXP and run fine only in 2 computers, and the other 4 not possible. We try to install the snaphot control, and check the main library, AXP is full installed. What happen?? What is the problem?? What we forget to do?? Juan =========================================== MASTERCAFE SL - NIF B-82.617.614 www.mastercafe.com Deleg. Asturias Tel 985.88.49.44 / 627.531.764 Fax 627.500.205 info at mastercafe.com juan at mastercafe.com Deleg. Madrid Tel 627.474.285 cecilia at mastercafe.com =========================================== From doug at murphyscreativity.com Wed Jan 28 17:44:35 2004 From: doug at murphyscreativity.com (Doug Murphy) Date: Wed, 28 Jan 2004 15:44:35 -0800 Subject: [AccessD] Error # 3343 Unrecognized database format In-Reply-To: Message-ID: <001a01c3e5f8$afdde1b0$8500a8c0@CX615377a> Folks, I have a client who has started getting an Error #3343 on their back end DB. The DB is Access 97. From what I can find on this error it usually has to do with database writes being interupted or hard shutdowns. They claim that there have been no changes to thier network and that all computers are working fine. I am going up to their site tomorrow to see if I can figure out what is going on. Any suggestions on what to look for asside from the normal Access maintenance related things. I am not a network person so don't really know how to diagnose those types of issues that might be causing this problem. Thanks for any suggestions you can provide. Doug From cfoust at infostatsystems.com Wed Jan 28 17:47:59 2004 From: cfoust at infostatsystems.com (Charlotte Foust) Date: Wed, 28 Jan 2004 15:47:59 -0800 Subject: [AccessD] Error 2468 - You can't carry out thisactionatthepresent time. Message-ID: Rocky, I suspect you're running into an issue I've seen in somewhat similar circumstances, where the deletion didn't actually seem to get processed until I requeried the subform. Have you tried a DBEngine.Idle dbRefreshCache after the deletion? Charlotte Foust -----Original Message----- From: Rocky Smolin - Beach Access Software [mailto:bchacc at san.rr.com] Sent: Wednesday, January 28, 2004 2:13 PM To: Access Developers discussion and problem solving Subject: Re: [AccessD] Error 2468 - You can't carry out thisactionatthepresent time. Charlotte: Further to my reply, I found that when I did a delete then, before I did anything else, I went and looked in the tblPOHeader and the record was still there. For some reason it's not completing the delete and that's why I think it's telling me that I can't make any moves at this time. Rocky ----- Original Message ----- From: "Charlotte Foust" To: "Access Developers discussion and problem solving" Sent: Wednesday, January 28, 2004 1:20 PM Subject: RE: [AccessD] Error 2468 - You can't carry out this actionatthepresent time. > It sounds like you may have the parent and child forms linked to the > same dataset. Do you? > > Charlotte Foust > > -----Original Message----- > From: Rocky Smolin - Beach Access Software [mailto:bchacc at san.rr.com] > Sent: Wednesday, January 28, 2004 1:04 PM > To: Access Developers discussion and problem solving > Subject: Re: [AccessD] Error 2468 - You can't carry out this action > atthepresent time. > > > I'm getting closer. I deleted the sub-form that on the second tab of > the tab form and the two deletes worked. > > It has something to do with a sub form on a tab. Any clues, anybody? > > Rocky > > ----- Original Message ----- > From: "Joe K Anderson" > To: "Rocky Smolin - Beach Access Software" ; > > Cc: "Wayne Warren Angelucci" ; "Gordon > Bennett" ; "Barry Hynum" > ; "Dixon Foss" ; "Mark Krisburg" > > Sent: Wednesday, January 28, 2004 11:44 AM > Subject: Re: [AccessD] Error 2468 - You can't carry out this action at > thepresent time. > > > You may need to do a Requery between deletes? > > joe > ----- Original Message ----- > From: Rocky Smolin - Beach Access Software > To: Access Developers discussion and problem solving > Cc: Wayne Warren Angelucci ; Mark Krisburg ; Joe Anderson ; Gordon > Bennett ; Dixon Foss ; Bob Heygood ; Barry Hynum > Sent: 01-28-2004 11:34 > Subject: Re: [AccessD] Error 2468 - You can't carry out this action > at the present time. > > > Randall: > > Tried this experiment just to get the DAO recordset out of the way. I > deleted all references to it. > > Then I replaced: > > 'DoCmd.SetWarnings False > 'DoCmd.DoMenuItem acFormBar, acEditMenu, 8, , acMenuVer70 > 'DoCmd.DoMenuItem acFormBar, acEditMenu, 6, , acMenuVer70 > 'DoCmd.SetWarnings True > > with > > DoCmd.RunCommand acCmdDelete > > I selected a record and ran that code which does the delete. Then > before > trying to delete the second record, I checked the table and the > record was > still there! > > So the delete (and probably other operations) are not completing for > some > reason. > > Pluse, when I get the error, I have to use the task manager to clear > access. > It won't quit, cant close any forms, etc. > > Any ideas? > > Many thanks in advance and regards, > > is > > ----- Original Message ----- > From: "Randall Anthony" > To: "'Access Developers discussion and problem solving'" > > Sent: Wednesday, January 28, 2004 10:31 AM > Subject: RE: [AccessD] Error 2468 - You can't carry out this action > at the > present time. > > > > Right off the top of my head, it has to do with the movefirst, > movelast. > I > > ran into this when converting A97 to A2K. Code worked in A97, not > A2K and > > M$ said this was designed behavior. I'll try to find the article. > > > > -----Original Message----- > > From: Rocky Smolin - Beach Access Software > [mailto:bchacc at san.rr.com] > > Sent: Wednesday, January 28, 2004 1:07 PM > > To: AccessD at databaseadvisors.com > > Subject: [AccessD] Error 2468 - You can't carry out this action at > the > > present time. > > > > Dear List: > > > > I am getting the following error message on a bound form: > > > > Error 2468 - You can't carry out this action at the present time. > > > > This form has a sub form linked to the main form by the main form's > primary > > key. (Main form is P.O. Header, subform is P.O. Detail). > > > > I get this error if I try to delete two records in a row. > > > > DoCmd.SetWarnings False > > DoCmd.DoMenuItem acFormBar, acEditMenu, 8, , acMenuVer70 > > DoCmd.DoMenuItem acFormBar, acEditMenu, 6, , acMenuVer70 > > DoCmd.SetWarnings True > > > > I also get this error after I try to add a record. The problem > started > > because I wanted to get the last PO in the file, add one to the PO > number, > > and put the prefix and the new PO number ito the new record: > > > > DoCmd.GoToRecord , , acNewRec > > > > 'If rstPOHeader.RecordCount <> 0 Then > > ' rstPOHeader.MoveLast > > ' Me.fldPOPrefix = Nz(rstPOHeader!fldPOPrefix) > > ' If IsNumeric(rstPOHeader!fldPONumber) Then > > ' Me.fldPONumber = rstPOHeader!fldPONumber + 1 > > ' fldPOOrderDate.SetFocus > > ' Else > > ' Me.fldPONumber.SetFocus > > ' End If > > 'End If > > 'If Nz(Me.fldPOPrefix) = "" And Nz(rstPOHeader!fldPOPrefix) = "" > Then > _ > > Me.fldPOPrefix.SetFocus > > > > Right now the code is commented out. If I uncomment the two lines: > > > > ' rstPOHeader.MoveLast > > ' Me.fldPOPrefix = Nz(rstPOHeader!fldPOPrefix) > > > > I get the error when I try to save: > > > > DoCmd.DoMenuItem acFormBar, acRecordsMenu, acSaveRecord, , > acMenuVer70 > > > > I checked the web and there is nothing. Has anyone encountered this > before? > > > > Thanks and regards, > > > > Rocky Smolin > > Beach Access Software > > _______________________________________________ > > 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 > > > _______________________________________________ > 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 > _______________________________________________ > 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 From awithing at twcny.rr.com Wed Jan 28 17:53:31 2004 From: awithing at twcny.rr.com (augusta) Date: Wed, 28 Jan 2004 18:53:31 -0500 Subject: [AccessD] Vonage In-Reply-To: Message-ID: <200401282353.i0SNrWEk000698@ms-smtp-02.nyroc.rr.com> Come to lunch in Clayton! > -----Original Message----- > From: accessd-bounces at databaseadvisors.com [mailto:accessd- > bounces at databaseadvisors.com] On Behalf Of John W. Colby > Sent: Wednesday, January 28, 2004 1:12 PM > To: Access Developers discussion and problem solving > Subject: RE: [AccessD] Vonage > > We should have lunch some time. My Sister-In-Law lives in Syracuse and we > get over there quite often (in good weather). > > John W. Colby > www.ColbyConsulting.com > > -----Original Message----- > From: accessd-bounces at databaseadvisors.com > [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Jim Dettman > Sent: Wednesday, January 28, 2004 12:53 PM > To: Access Developers discussion and problem solving > Subject: RE: [AccessD] Vonage > > > <> > > I do. I'm just North of Syracuse in Cicero. > > Jim Dettman > President, > Online Computer Services of WNY, Inc. > (315) 699-3443 > jimdettman at earthlink.net > > -----Original Message----- > From: accessd-bounces at databaseadvisors.com > [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of augusta > Sent: Wednesday, January 28, 2004 9:38 AM > To: 'Access Developers discussion and problem solving' > Subject: RE: [AccessD] Vonage > > > John do you use Time Warner Central NY RR? > > > -----Original Message----- > > From: accessd-bounces at databaseadvisors.com [mailto:accessd- > > bounces at databaseadvisors.com] On Behalf Of John W. Colby > > Sent: Tuesday, January 27, 2004 6:10 PM > > To: Access Developers discussion and problem solving > > Subject: RE: [AccessD] Vonage > > > > ******************************************************************* > > Item Quantity Unit Subtotal > > ******************************************************************* > > Motorola Device 1 $0.00 $0.00 > > Area Code: 315 - Syracuse 1 $0.00 $0.00 > > Activation Fee 1 $29.99 $29.99 > > *Residential Basic 500 1 $14.99 $14.99 > > ----------------------------------- > > > > State Sales Tax: $0.00 > > Federal Excise Tax: $1.35 > > Regulatory Recovery Fee:$1.50 > > Shipping: $9.95 > > Total: $57.78 > > > > * Monthly Recurring Charge. > > ******************************************************************* > > > > This does not include a charge of approximately $30 which you will be > > charged for if you do not return the modem at the end of service. > > > > Now understand that the telephone company charged me a $60 activation > fee > > when I moved from one location to another location down the road 1/2 > mile. > > All just to change my billing from one jack to another in a switchboard. > > Hmmm... > > > > In addition, ATM the Vonage $14.99 is a flat monthly fee, no taxes or > > other > > regulatory charges added. My land line STARTS at 11.53 for flat > residence > > line, plus 5.78 federal subscriber line charge, plus 1.43 Connecticut > > sales > > tax, plus .73 federal tax plus .20 E911 surcharge, plus .05 Connecticut > > Service Fund, plus .39 number portability charge, plus .56 Universal > > Service > > fund (local), plus .14 Universal Service Fund (Long Distance). Talk > about > > nickel and dimeing you to death! > > > > I NEVER get out with under $25 on a "11.50" phone line, and with all the > > "short" long distance, I rarely get out for under ~$35 WITHOUT long > > distance, which is $.10/minute. For a couple of years I have used a > > prepaid > > calling card which I programmed into my phone to get my long distance > for > > $.039 per minute (slowly inching up, now $.045). > > > > Of course I also have to pay for my blazing fast internet connection, > > which > > is a ridiculous $45 / month. Makes the $15 ($25/$35) phone bill seem > > rather > > inconsequential. But I could never go back to dialup so since I have > this > > blazing fast internet, I might as well piggyback my phone off of it. > > > > I am pleased to say it is working great so far. > > > > John W. Colby > > www.ColbyConsulting.com > > > > -----Original Message----- > > From: accessd-bounces at databaseadvisors.com > > [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Christopher > > Hawkins > > Sent: Tuesday, January 27, 2004 5:23 PM > > To: accessd at databaseadvisors.com > > Subject: RE: [AccessD] Vonage > > > > > > $15/month sounds great, but what about setup fees or equipment > > expenses? What's the "out the door" price look like? > > > > -Christopher- > > > > ---- Original Message ---- > > From: JColby at dispec.com > > To: accessd at databaseadvisors.com, > > Subject: RE: [AccessD] Vonage > > Date: Tue, 27 Jan 2004 15:05:07 -0500 > > > > >I received the phonemodem last night. Plugged it in (behind my > > >router for > > >those interested), waited 5 minutes, then picked up the receiver and > > >made a > > >call. Extremely easy to set up. > > > > > >The sound so far is crystal clear, no clicks / pops or echoes. I > > >have a > > >brand new ATT 2ghz cordless phone system which I plugged in to it. > > >I can't > > >tell the difference between this and the landline. > > > > > >I haven't done any heavy duty uploads / downloads though I will be > > >doing > > >some testing in the next few days. > > > > > >I went with the $15 / month package for 500 total minutes - local > > >and long > > >distance, with anything after that billed at $.039 / minute. If my > > >useage > > >averages more than 500 minutes I'll move up to the $25 package with > > >unlimited local and 500 long distance minutes. Given my useage > > >patterns I > > >may very well end up with a $15 / month phone including long > > >distance. > > > > > >So far so good. > > > > > >John W. Colby > > >The database guy > > > > > > _______________________________________________ > > 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 > > > _______________________________________________ > 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 From andrew.haslett at ilc.gov.au Wed Jan 28 17:57:58 2004 From: andrew.haslett at ilc.gov.au (Haslett, Andrew) Date: Thu, 29 Jan 2004 10:27:58 +1030 Subject: [AccessD] Getting internet data Message-ID: Might want to check out this article. Looks like this feature will soon be removed: http://support.microsoft.com/?kbid=834489 -----Original Message----- From: DWUTKA at marlow.com [mailto:DWUTKA at marlow.com] Sent: Thursday, 29 January 2004 8:06 AM To: accessd at databaseadvisors.com Subject: RE: [AccessD] Getting internet data You may be able to 'browse' to secured sites, with the following URL: http://username:password at www.website.com This works for sites that use plain text password security, if you are prompted for a domain, along with a name and password, then the URL 'format' above won't work, but IE can be setup to use your currently logged on credentials. Drew -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Erwin Craps - IT Helps Sent: Wednesday, January 28, 2004 2:53 PM To: Access Developers discussion and problem solving Subject: RE: [AccessD] Getting internet data I done that before (and still using it) with a HTTP control from IP Works (I believe they changed name into something else). You can get the page in a string and analyse it further. I believe there is a basic control from MS also in Access or VB, a HTTP control. Only one thing I don't know and is the tricky part... The password. No experiance in that one. But you should look at a HTTP control. I have my first code done with the XML parser. There is a HTTP XML parser to, maybe this can do the trick to. Erwin -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of John W. Colby Sent: Wednesday, January 28, 2004 8:03 PM To: AccessD Subject: [AccessD] Getting internet data I need to get some internet data into a db. In order to do that I need to "navigate", specifically I have to enter a username / password which will bring me to a specific page. After that clicking on tabs at the top take me to other pages I'd also like to get data off of. Does anyone know how to do this from VBA? John W. Colby www.ColbyConsulting.com _______________________________________________ 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 _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com IMPORTANT - PLEASE READ ******************** This email and any files transmitted with it are confidential and may contain information protected by law from disclosure. If you have received this message in error, please notify the sender immediately and delete this email from your system. No warranty is given that this email or files, if attached to this email, are free from computer viruses or other defects. They are provided on the basis the user assumes all responsibility for loss, damage or consequence resulting directly or indirectly from their use, whether caused by the negligence of the sender or not. From bchacc at san.rr.com Wed Jan 28 17:57:15 2004 From: bchacc at san.rr.com (Rocky Smolin - Beach Access Software) Date: Wed, 28 Jan 2004 15:57:15 -0800 Subject: [AccessD] Error # 3343 Unrecognized database format References: <001a01c3e5f8$afdde1b0$8500a8c0@CX615377a> Message-ID: <01b001c3e5fa$74c4dff0$6601a8c0@HAL9002> Doug: In my limited experience, this has been caused by a faulty NIC in one of the client machines. Hard to pin down because it will be intermittent. Last time a client experienced periodic corruptions of their back end it was traced to the NIC on one machine. Replaced that NIC and it stopped corrupting. You might look at their oldest machines or see if someone put a $7.95 NIC in one of the boxes. HTH Rocky ----- Original Message ----- From: "Doug Murphy" To: "'Access Developers discussion and problem solving'" Sent: Wednesday, January 28, 2004 3:44 PM Subject: [AccessD] Error # 3343 Unrecognized database format > Folks, > > I have a client who has started getting an Error #3343 on their back end > DB. The DB is Access 97. From what I can find on this error it usually > has to do with database writes being interupted or hard shutdowns. They > claim that there have been no changes to thier network and that all > computers are working fine. I am going up to their site tomorrow to see > if I can figure out what is going on. Any suggestions on what to look > for asside from the normal Access maintenance related things. I am not > a network person so don't really know how to diagnose those types of > issues that might be causing this problem. > > Thanks for any suggestions you can provide. > > Doug > > > > > > > > > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com > From bchacc at san.rr.com Wed Jan 28 18:08:18 2004 From: bchacc at san.rr.com (Rocky Smolin - Beach Access Software) Date: Wed, 28 Jan 2004 16:08:18 -0800 Subject: [AccessD] Error 2468 - You can't carry out thisactionatthepresenttime. References: Message-ID: <01d201c3e5fb$ffb96d00$6601a8c0@HAL9002> No but you can bet I will right now. (What's Engine.Idle do?) Rocky ----- Original Message ----- From: "Charlotte Foust" To: "Access Developers discussion and problem solving" Sent: Wednesday, January 28, 2004 3:47 PM Subject: RE: [AccessD] Error 2468 - You can't carry out thisactionatthepresenttime. > Rocky, > > I suspect you're running into an issue I've seen in somewhat similar > circumstances, where the deletion didn't actually seem to get processed > until I requeried the subform. Have you tried a DBEngine.Idle > dbRefreshCache after the deletion? > > Charlotte Foust > > -----Original Message----- > From: Rocky Smolin - Beach Access Software [mailto:bchacc at san.rr.com] > Sent: Wednesday, January 28, 2004 2:13 PM > To: Access Developers discussion and problem solving > Subject: Re: [AccessD] Error 2468 - You can't carry out > thisactionatthepresent time. > > > Charlotte: > > Further to my reply, I found that when I did a delete then, before I did > anything else, I went and looked in the tblPOHeader and the record was > still there. For some reason it's not completing the delete and that's > why I think it's telling me that I can't make any moves at this time. > > Rocky > > ----- Original Message ----- > From: "Charlotte Foust" > To: "Access Developers discussion and problem solving" > > Sent: Wednesday, January 28, 2004 1:20 PM > Subject: RE: [AccessD] Error 2468 - You can't carry out this > actionatthepresent time. > > > > It sounds like you may have the parent and child forms linked to the > > same dataset. Do you? > > > > Charlotte Foust > > > > -----Original Message----- > > From: Rocky Smolin - Beach Access Software [mailto:bchacc at san.rr.com] > > Sent: Wednesday, January 28, 2004 1:04 PM > > To: Access Developers discussion and problem solving > > Subject: Re: [AccessD] Error 2468 - You can't carry out this action > > atthepresent time. > > > > > > I'm getting closer. I deleted the sub-form that on the second tab of > > the tab form and the two deletes worked. > > > > It has something to do with a sub form on a tab. Any clues, anybody? > > > > Rocky > > > > ----- Original Message ----- > > From: "Joe K Anderson" > > To: "Rocky Smolin - Beach Access Software" ; > > > > Cc: "Wayne Warren Angelucci" ; "Gordon > > Bennett" ; "Barry Hynum" > > ; "Dixon Foss" ; "Mark Krisburg" > > > > Sent: Wednesday, January 28, 2004 11:44 AM > > Subject: Re: [AccessD] Error 2468 - You can't carry out this action at > > thepresent time. > > > > > > You may need to do a Requery between deletes? > > > > joe > > ----- Original Message ----- > > From: Rocky Smolin - Beach Access Software > > To: Access Developers discussion and problem solving > > Cc: Wayne Warren Angelucci ; Mark Krisburg ; Joe Anderson ; Gordon > > Bennett ; Dixon Foss ; Bob Heygood ; Barry Hynum > > Sent: 01-28-2004 11:34 > > Subject: Re: [AccessD] Error 2468 - You can't carry out this action > > at the present time. > > > > > > Randall: > > > > Tried this experiment just to get the DAO recordset out of the way. > I > > deleted all references to it. > > > > Then I replaced: > > > > 'DoCmd.SetWarnings False > > 'DoCmd.DoMenuItem acFormBar, acEditMenu, 8, , acMenuVer70 > > 'DoCmd.DoMenuItem acFormBar, acEditMenu, 6, , acMenuVer70 > > 'DoCmd.SetWarnings True > > > > with > > > > DoCmd.RunCommand acCmdDelete > > > > I selected a record and ran that code which does the delete. Then > > before > > trying to delete the second record, I checked the table and the > > record was > > still there! > > > > So the delete (and probably other operations) are not completing for > > > some > > reason. > > > > Pluse, when I get the error, I have to use the task manager to clear > > > access. > > It won't quit, cant close any forms, etc. > > > > Any ideas? > > > > Many thanks in advance and regards, > > > > is > > > > ----- Original Message ----- > > From: "Randall Anthony" > > To: "'Access Developers discussion and problem solving'" > > > > Sent: Wednesday, January 28, 2004 10:31 AM > > Subject: RE: [AccessD] Error 2468 - You can't carry out this action > > at the > > present time. > > > > > > > Right off the top of my head, it has to do with the movefirst, > > movelast. > > I > > > ran into this when converting A97 to A2K. Code worked in A97, not > > > A2K and > > > M$ said this was designed behavior. I'll try to find the article. > > > > > > -----Original Message----- > > > From: Rocky Smolin - Beach Access Software > > [mailto:bchacc at san.rr.com] > > > Sent: Wednesday, January 28, 2004 1:07 PM > > > To: AccessD at databaseadvisors.com > > > Subject: [AccessD] Error 2468 - You can't carry out this action at > > > the > > > present time. > > > > > > Dear List: > > > > > > I am getting the following error message on a bound form: > > > > > > Error 2468 - You can't carry out this action at the present time. > > > > > > This form has a sub form linked to the main form by the main > form's > > primary > > > key. (Main form is P.O. Header, subform is P.O. Detail). > > > > > > I get this error if I try to delete two records in a row. > > > > > > DoCmd.SetWarnings False > > > DoCmd.DoMenuItem acFormBar, acEditMenu, 8, , acMenuVer70 > > > DoCmd.DoMenuItem acFormBar, acEditMenu, 6, , acMenuVer70 > > > DoCmd.SetWarnings True > > > > > > I also get this error after I try to add a record. The problem > > started > > > because I wanted to get the last PO in the file, add one to the PO > > > number, > > > and put the prefix and the new PO number ito the new record: > > > > > > DoCmd.GoToRecord , , acNewRec > > > > > > 'If rstPOHeader.RecordCount <> 0 Then > > > ' rstPOHeader.MoveLast > > > ' Me.fldPOPrefix = Nz(rstPOHeader!fldPOPrefix) > > > ' If IsNumeric(rstPOHeader!fldPONumber) Then > > > ' Me.fldPONumber = rstPOHeader!fldPONumber + 1 > > > ' fldPOOrderDate.SetFocus > > > ' Else > > > ' Me.fldPONumber.SetFocus > > > ' End If > > > 'End If > > > 'If Nz(Me.fldPOPrefix) = "" And Nz(rstPOHeader!fldPOPrefix) = > "" > > Then > > _ > > > Me.fldPOPrefix.SetFocus > > > > > > Right now the code is commented out. If I uncomment the two > lines: > > > > > > ' rstPOHeader.MoveLast > > > ' Me.fldPOPrefix = Nz(rstPOHeader!fldPOPrefix) > > > > > > I get the error when I try to save: > > > > > > DoCmd.DoMenuItem acFormBar, acRecordsMenu, acSaveRecord, , > > acMenuVer70 > > > > > > I checked the web and there is nothing. Has anyone encountered > this > > before? > > > > > > Thanks and regards, > > > > > > Rocky Smolin > > > Beach Access Software > > > _______________________________________________ > > > 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 > > > > > _______________________________________________ > > 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 > > _______________________________________________ > > 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 > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com > From bchacc at san.rr.com Wed Jan 28 18:17:30 2004 From: bchacc at san.rr.com (Rocky Smolin - Beach Access Software) Date: Wed, 28 Jan 2004 16:17:30 -0800 Subject: [AccessD] Error 2468 - You can't carry out thisactionatthepresenttime. References: Message-ID: <01dc01c3e5fd$4926ec00$6601a8c0@HAL9002> Rats. No soap. Got the error on the second delete after adding the dbengineidle and the subfrm requery like this: DoCmd.SetWarnings False DoCmd.DoMenuItem acFormBar, acEditMenu, 8, , acMenuVer70 DoCmd.DoMenuItem acFormBar, acEditMenu, 6, , acMenuVer70 DoCmd.SetWarnings True DBEngine.Idle dbRefreshCache Me.Requery Me!subfrmPODetail.Requery Any other ideas? Thanks and regards, Rocky ----- Original Message ----- From: "Charlotte Foust" To: "Access Developers discussion and problem solving" Sent: Wednesday, January 28, 2004 3:47 PM Subject: RE: [AccessD] Error 2468 - You can't carry out thisactionatthepresenttime. > Rocky, > > I suspect you're running into an issue I've seen in somewhat similar > circumstances, where the deletion didn't actually seem to get processed > until I requeried the subform. Have you tried a DBEngine.Idle > dbRefreshCache after the deletion? > > Charlotte Foust > > -----Original Message----- > From: Rocky Smolin - Beach Access Software [mailto:bchacc at san.rr.com] > Sent: Wednesday, January 28, 2004 2:13 PM > To: Access Developers discussion and problem solving > Subject: Re: [AccessD] Error 2468 - You can't carry out > thisactionatthepresent time. > > > Charlotte: > > Further to my reply, I found that when I did a delete then, before I did > anything else, I went and looked in the tblPOHeader and the record was > still there. For some reason it's not completing the delete and that's > why I think it's telling me that I can't make any moves at this time. > > Rocky > > ----- Original Message ----- > From: "Charlotte Foust" > To: "Access Developers discussion and problem solving" > > Sent: Wednesday, January 28, 2004 1:20 PM > Subject: RE: [AccessD] Error 2468 - You can't carry out this > actionatthepresent time. > > > > It sounds like you may have the parent and child forms linked to the > > same dataset. Do you? > > > > Charlotte Foust > > > > -----Original Message----- > > From: Rocky Smolin - Beach Access Software [mailto:bchacc at san.rr.com] > > Sent: Wednesday, January 28, 2004 1:04 PM > > To: Access Developers discussion and problem solving > > Subject: Re: [AccessD] Error 2468 - You can't carry out this action > > atthepresent time. > > > > > > I'm getting closer. I deleted the sub-form that on the second tab of > > the tab form and the two deletes worked. > > > > It has something to do with a sub form on a tab. Any clues, anybody? > > > > Rocky > > > > ----- Original Message ----- > > From: "Joe K Anderson" > > To: "Rocky Smolin - Beach Access Software" ; > > > > Cc: "Wayne Warren Angelucci" ; "Gordon > > Bennett" ; "Barry Hynum" > > ; "Dixon Foss" ; "Mark Krisburg" > > > > Sent: Wednesday, January 28, 2004 11:44 AM > > Subject: Re: [AccessD] Error 2468 - You can't carry out this action at > > thepresent time. > > > > > > You may need to do a Requery between deletes? > > > > joe > > ----- Original Message ----- > > From: Rocky Smolin - Beach Access Software > > To: Access Developers discussion and problem solving > > Cc: Wayne Warren Angelucci ; Mark Krisburg ; Joe Anderson ; Gordon > > Bennett ; Dixon Foss ; Bob Heygood ; Barry Hynum > > Sent: 01-28-2004 11:34 > > Subject: Re: [AccessD] Error 2468 - You can't carry out this action > > at the present time. > > > > > > Randall: > > > > Tried this experiment just to get the DAO recordset out of the way. > I > > deleted all references to it. > > > > Then I replaced: > > > > 'DoCmd.SetWarnings False > > 'DoCmd.DoMenuItem acFormBar, acEditMenu, 8, , acMenuVer70 > > 'DoCmd.DoMenuItem acFormBar, acEditMenu, 6, , acMenuVer70 > > 'DoCmd.SetWarnings True > > > > with > > > > DoCmd.RunCommand acCmdDelete > > > > I selected a record and ran that code which does the delete. Then > > before > > trying to delete the second record, I checked the table and the > > record was > > still there! > > > > So the delete (and probably other operations) are not completing for > > > some > > reason. > > > > Pluse, when I get the error, I have to use the task manager to clear > > > access. > > It won't quit, cant close any forms, etc. > > > > Any ideas? > > > > Many thanks in advance and regards, > > > > is > > > > ----- Original Message ----- > > From: "Randall Anthony" > > To: "'Access Developers discussion and problem solving'" > > > > Sent: Wednesday, January 28, 2004 10:31 AM > > Subject: RE: [AccessD] Error 2468 - You can't carry out this action > > at the > > present time. > > > > > > > Right off the top of my head, it has to do with the movefirst, > > movelast. > > I > > > ran into this when converting A97 to A2K. Code worked in A97, not > > > A2K and > > > M$ said this was designed behavior. I'll try to find the article. > > > > > > -----Original Message----- > > > From: Rocky Smolin - Beach Access Software > > [mailto:bchacc at san.rr.com] > > > Sent: Wednesday, January 28, 2004 1:07 PM > > > To: AccessD at databaseadvisors.com > > > Subject: [AccessD] Error 2468 - You can't carry out this action at > > > the > > > present time. > > > > > > Dear List: > > > > > > I am getting the following error message on a bound form: > > > > > > Error 2468 - You can't carry out this action at the present time. > > > > > > This form has a sub form linked to the main form by the main > form's > > primary > > > key. (Main form is P.O. Header, subform is P.O. Detail). > > > > > > I get this error if I try to delete two records in a row. > > > > > > DoCmd.SetWarnings False > > > DoCmd.DoMenuItem acFormBar, acEditMenu, 8, , acMenuVer70 > > > DoCmd.DoMenuItem acFormBar, acEditMenu, 6, , acMenuVer70 > > > DoCmd.SetWarnings True > > > > > > I also get this error after I try to add a record. The problem > > started > > > because I wanted to get the last PO in the file, add one to the PO > > > number, > > > and put the prefix and the new PO number ito the new record: > > > > > > DoCmd.GoToRecord , , acNewRec > > > > > > 'If rstPOHeader.RecordCount <> 0 Then > > > ' rstPOHeader.MoveLast > > > ' Me.fldPOPrefix = Nz(rstPOHeader!fldPOPrefix) > > > ' If IsNumeric(rstPOHeader!fldPONumber) Then > > > ' Me.fldPONumber = rstPOHeader!fldPONumber + 1 > > > ' fldPOOrderDate.SetFocus > > > ' Else > > > ' Me.fldPONumber.SetFocus > > > ' End If > > > 'End If > > > 'If Nz(Me.fldPOPrefix) = "" And Nz(rstPOHeader!fldPOPrefix) = > "" > > Then > > _ > > > Me.fldPOPrefix.SetFocus > > > > > > Right now the code is commented out. If I uncomment the two > lines: > > > > > > ' rstPOHeader.MoveLast > > > ' Me.fldPOPrefix = Nz(rstPOHeader!fldPOPrefix) > > > > > > I get the error when I try to save: > > > > > > DoCmd.DoMenuItem acFormBar, acRecordsMenu, acSaveRecord, , > > acMenuVer70 > > > > > > I checked the web and there is nothing. Has anyone encountered > this > > before? > > > > > > Thanks and regards, > > > > > > Rocky Smolin > > > Beach Access Software > > > _______________________________________________ > > > 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 > > > > > _______________________________________________ > > 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 > > _______________________________________________ > > 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 > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com > From cfoust at infostatsystems.com Wed Jan 28 18:22:08 2004 From: cfoust at infostatsystems.com (Charlotte Foust) Date: Wed, 28 Jan 2004 16:22:08 -0800 Subject: [AccessD] Error 2468 - You can't carry outthisactionatthepresenttime. Message-ID: Ack! Lose that old A95 code, please! I can't even read it any more. Comment out the SetWarnings False and see what Access tells you about the operation. HOY! I just noticed that you appear to be running this from the parent form. Which form are you trying to delete a record from? Charlotte Foust -----Original Message----- From: Rocky Smolin - Beach Access Software [mailto:bchacc at san.rr.com] Sent: Wednesday, January 28, 2004 4:18 PM To: Access Developers discussion and problem solving Subject: Re: [AccessD] Error 2468 - You can't carry outthisactionatthepresenttime. Rats. No soap. Got the error on the second delete after adding the dbengineidle and the subfrm requery like this: DoCmd.SetWarnings False DoCmd.DoMenuItem acFormBar, acEditMenu, 8, , acMenuVer70 DoCmd.DoMenuItem acFormBar, acEditMenu, 6, , acMenuVer70 DoCmd.SetWarnings True DBEngine.Idle dbRefreshCache Me.Requery Me!subfrmPODetail.Requery Any other ideas? Thanks and regards, Rocky ----- Original Message ----- From: "Charlotte Foust" To: "Access Developers discussion and problem solving" Sent: Wednesday, January 28, 2004 3:47 PM Subject: RE: [AccessD] Error 2468 - You can't carry out thisactionatthepresenttime. > Rocky, > > I suspect you're running into an issue I've seen in somewhat similar > circumstances, where the deletion didn't actually seem to get > processed until I requeried the subform. Have you tried a > DBEngine.Idle dbRefreshCache after the deletion? > > Charlotte Foust > > -----Original Message----- > From: Rocky Smolin - Beach Access Software [mailto:bchacc at san.rr.com] > Sent: Wednesday, January 28, 2004 2:13 PM > To: Access Developers discussion and problem solving > Subject: Re: [AccessD] Error 2468 - You can't carry out > thisactionatthepresent time. > > > Charlotte: > > Further to my reply, I found that when I did a delete then, before I > did anything else, I went and looked in the tblPOHeader and the record > was still there. For some reason it's not completing the delete and > that's why I think it's telling me that I can't make any moves at this > time. > > Rocky > > ----- Original Message ----- > From: "Charlotte Foust" > To: "Access Developers discussion and problem solving" > > Sent: Wednesday, January 28, 2004 1:20 PM > Subject: RE: [AccessD] Error 2468 - You can't carry out this > actionatthepresent time. > > > > It sounds like you may have the parent and child forms linked to the > > same dataset. Do you? > > > > Charlotte Foust > > > > -----Original Message----- > > From: Rocky Smolin - Beach Access Software > > [mailto:bchacc at san.rr.com] > > Sent: Wednesday, January 28, 2004 1:04 PM > > To: Access Developers discussion and problem solving > > Subject: Re: [AccessD] Error 2468 - You can't carry out this action > > atthepresent time. > > > > > > I'm getting closer. I deleted the sub-form that on the second tab > > of the tab form and the two deletes worked. > > > > It has something to do with a sub form on a tab. Any clues, > > anybody? > > > > Rocky > > > > ----- Original Message ----- > > From: "Joe K Anderson" > > To: "Rocky Smolin - Beach Access Software" ; > > > > Cc: "Wayne Warren Angelucci" ; "Gordon > > Bennett" ; "Barry Hynum" > > ; "Dixon Foss" ; "Mark Krisburg" > > > > Sent: Wednesday, January 28, 2004 11:44 AM > > Subject: Re: [AccessD] Error 2468 - You can't carry out this action > > at thepresent time. > > > > > > You may need to do a Requery between deletes? > > > > joe > > ----- Original Message ----- > > From: Rocky Smolin - Beach Access Software > > To: Access Developers discussion and problem solving > > Cc: Wayne Warren Angelucci ; Mark Krisburg ; Joe Anderson ; Gordon > > Bennett ; Dixon Foss ; Bob Heygood ; Barry Hynum > > Sent: 01-28-2004 11:34 > > Subject: Re: [AccessD] Error 2468 - You can't carry out this > > action at the present time. > > > > > > Randall: > > > > Tried this experiment just to get the DAO recordset out of the > > way. > I > > deleted all references to it. > > > > Then I replaced: > > > > 'DoCmd.SetWarnings False > > 'DoCmd.DoMenuItem acFormBar, acEditMenu, 8, , acMenuVer70 > > 'DoCmd.DoMenuItem acFormBar, acEditMenu, 6, , acMenuVer70 > > 'DoCmd.SetWarnings True > > > > with > > > > DoCmd.RunCommand acCmdDelete > > > > I selected a record and ran that code which does the delete. Then > > before > > trying to delete the second record, I checked the table and the > > record was > > still there! > > > > So the delete (and probably other operations) are not completing > > for > > > some > > reason. > > > > Pluse, when I get the error, I have to use the task manager to > > clear > > > access. > > It won't quit, cant close any forms, etc. > > > > Any ideas? > > > > Many thanks in advance and regards, > > > > is > > > > ----- Original Message ----- > > From: "Randall Anthony" > > To: "'Access Developers discussion and problem solving'" > > > > Sent: Wednesday, January 28, 2004 10:31 AM > > Subject: RE: [AccessD] Error 2468 - You can't carry out this > > action at the > > present time. > > > > > > > Right off the top of my head, it has to do with the movefirst, > > movelast. > > I > > > ran into this when converting A97 to A2K. Code worked in A97, > > not > > > A2K and > > > M$ said this was designed behavior. I'll try to find the article. > > > > > > -----Original Message----- > > > From: Rocky Smolin - Beach Access Software > > [mailto:bchacc at san.rr.com] > > > Sent: Wednesday, January 28, 2004 1:07 PM > > > To: AccessD at databaseadvisors.com > > > Subject: [AccessD] Error 2468 - You can't carry out this action > > at > > > the > > > present time. > > > > > > Dear List: > > > > > > I am getting the following error message on a bound form: > > > > > > Error 2468 - You can't carry out this action at the present time. > > > > > > This form has a sub form linked to the main form by the main > form's > > primary > > > key. (Main form is P.O. Header, subform is P.O. Detail). > > > > > > I get this error if I try to delete two records in a row. > > > > > > DoCmd.SetWarnings False > > > DoCmd.DoMenuItem acFormBar, acEditMenu, 8, , acMenuVer70 > > > DoCmd.DoMenuItem acFormBar, acEditMenu, 6, , acMenuVer70 > > > DoCmd.SetWarnings True > > > > > > I also get this error after I try to add a record. The problem > > started > > > because I wanted to get the last PO in the file, add one to the > > PO > > > number, > > > and put the prefix and the new PO number ito the new record: > > > > > > DoCmd.GoToRecord , , acNewRec > > > > > > 'If rstPOHeader.RecordCount <> 0 Then > > > ' rstPOHeader.MoveLast > > > ' Me.fldPOPrefix = Nz(rstPOHeader!fldPOPrefix) > > > ' If IsNumeric(rstPOHeader!fldPONumber) Then > > > ' Me.fldPONumber = rstPOHeader!fldPONumber + 1 > > > ' fldPOOrderDate.SetFocus > > > ' Else > > > ' Me.fldPONumber.SetFocus > > > ' End If > > > 'End If > > > 'If Nz(Me.fldPOPrefix) = "" And Nz(rstPOHeader!fldPOPrefix) = > "" > > Then > > _ > > > Me.fldPOPrefix.SetFocus > > > > > > Right now the code is commented out. If I uncomment the two > lines: > > > > > > ' rstPOHeader.MoveLast > > > ' Me.fldPOPrefix = Nz(rstPOHeader!fldPOPrefix) > > > > > > I get the error when I try to save: > > > > > > DoCmd.DoMenuItem acFormBar, acRecordsMenu, acSaveRecord, , > > acMenuVer70 > > > > > > I checked the web and there is nothing. Has anyone encountered > this > > before? > > > > > > Thanks and regards, > > > > > > Rocky Smolin > > > Beach Access Software > > > _______________________________________________ > > > 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 > > > > > _______________________________________________ > > 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 > > _______________________________________________ > > 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 > _______________________________________________ > 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 From DWUTKA at marlow.com Wed Jan 28 18:26:05 2004 From: DWUTKA at marlow.com (DWUTKA at marlow.com) Date: Wed, 28 Jan 2004 18:26:05 -0600 Subject: [AccessD] Getting internet data Message-ID: <2F8793082E00D4119A1700B0D0216BF8022277F5@main2.marlow.com> WHAT is microsoft thinking! Grrrr..... Somedays I just think Redmond been smoking something funny! If I download that update, I'm just going to disable it in the registry. I like their user work arounds: Don't use it. Tough. At least, that's what they sounded like! Drew -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Haslett, Andrew Sent: Wednesday, January 28, 2004 5:58 PM To: 'Access Developers discussion and problem solving' Subject: RE: [AccessD] Getting internet data Might want to check out this article. Looks like this feature will soon be removed: http://support.microsoft.com/?kbid=834489 -----Original Message----- From: DWUTKA at marlow.com [mailto:DWUTKA at marlow.com] Sent: Thursday, 29 January 2004 8:06 AM To: accessd at databaseadvisors.com Subject: RE: [AccessD] Getting internet data You may be able to 'browse' to secured sites, with the following URL: http://username:password at www.website.com This works for sites that use plain text password security, if you are prompted for a domain, along with a name and password, then the URL 'format' above won't work, but IE can be setup to use your currently logged on credentials. Drew -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Erwin Craps - IT Helps Sent: Wednesday, January 28, 2004 2:53 PM To: Access Developers discussion and problem solving Subject: RE: [AccessD] Getting internet data I done that before (and still using it) with a HTTP control from IP Works (I believe they changed name into something else). You can get the page in a string and analyse it further. I believe there is a basic control from MS also in Access or VB, a HTTP control. Only one thing I don't know and is the tricky part... The password. No experiance in that one. But you should look at a HTTP control. I have my first code done with the XML parser. There is a HTTP XML parser to, maybe this can do the trick to. Erwin -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of John W. Colby Sent: Wednesday, January 28, 2004 8:03 PM To: AccessD Subject: [AccessD] Getting internet data I need to get some internet data into a db. In order to do that I need to "navigate", specifically I have to enter a username / password which will bring me to a specific page. After that clicking on tabs at the top take me to other pages I'd also like to get data off of. Does anyone know how to do this from VBA? John W. Colby www.ColbyConsulting.com _______________________________________________ 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 _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com IMPORTANT - PLEASE READ ******************** This email and any files transmitted with it are confidential and may contain information protected by law from disclosure. If you have received this message in error, please notify the sender immediately and delete this email from your system. No warranty is given that this email or files, if attached to this email, are free from computer viruses or other defects. They are provided on the basis the user assumes all responsibility for loss, damage or consequence resulting directly or indirectly from their use, whether caused by the negligence of the sender or not. _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From jwcolby at colbyconsulting.com Wed Jan 28 18:29:21 2004 From: jwcolby at colbyconsulting.com (John W. Colby) Date: Wed, 28 Jan 2004 19:29:21 -0500 Subject: [AccessD] Vonage In-Reply-To: <200401282353.i0SNrWEk000698@ms-smtp-02.nyroc.rr.com> Message-ID: LOL. I can't tell you the number of times I've driven right by there. My wife is from Massena and we drive up 81 to 37 and across. John W. Colby www.ColbyConsulting.com -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of augusta Sent: Wednesday, January 28, 2004 6:54 PM To: 'Access Developers discussion and problem solving' Subject: RE: [AccessD] Vonage Come to lunch in Clayton! > -----Original Message----- > From: accessd-bounces at databaseadvisors.com [mailto:accessd- > bounces at databaseadvisors.com] On Behalf Of John W. Colby > Sent: Wednesday, January 28, 2004 1:12 PM > To: Access Developers discussion and problem solving > Subject: RE: [AccessD] Vonage > > We should have lunch some time. My Sister-In-Law lives in Syracuse and we > get over there quite often (in good weather). > > John W. Colby > www.ColbyConsulting.com > > -----Original Message----- > From: accessd-bounces at databaseadvisors.com > [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Jim Dettman > Sent: Wednesday, January 28, 2004 12:53 PM > To: Access Developers discussion and problem solving > Subject: RE: [AccessD] Vonage > > > <> > > I do. I'm just North of Syracuse in Cicero. > > Jim Dettman > President, > Online Computer Services of WNY, Inc. > (315) 699-3443 > jimdettman at earthlink.net > > -----Original Message----- > From: accessd-bounces at databaseadvisors.com > [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of augusta > Sent: Wednesday, January 28, 2004 9:38 AM > To: 'Access Developers discussion and problem solving' > Subject: RE: [AccessD] Vonage > > > John do you use Time Warner Central NY RR? > > > -----Original Message----- > > From: accessd-bounces at databaseadvisors.com [mailto:accessd- > > bounces at databaseadvisors.com] On Behalf Of John W. Colby > > Sent: Tuesday, January 27, 2004 6:10 PM > > To: Access Developers discussion and problem solving > > Subject: RE: [AccessD] Vonage > > > > ******************************************************************* > > Item Quantity Unit Subtotal > > ******************************************************************* > > Motorola Device 1 $0.00 $0.00 > > Area Code: 315 - Syracuse 1 $0.00 $0.00 > > Activation Fee 1 $29.99 $29.99 > > *Residential Basic 500 1 $14.99 $14.99 > > ----------------------------------- > > > > State Sales Tax: $0.00 > > Federal Excise Tax: $1.35 > > Regulatory Recovery Fee:$1.50 > > Shipping: $9.95 > > Total: $57.78 > > > > * Monthly Recurring Charge. > > ******************************************************************* > > > > This does not include a charge of approximately $30 which you will be > > charged for if you do not return the modem at the end of service. > > > > Now understand that the telephone company charged me a $60 activation > fee > > when I moved from one location to another location down the road 1/2 > mile. > > All just to change my billing from one jack to another in a switchboard. > > Hmmm... > > > > In addition, ATM the Vonage $14.99 is a flat monthly fee, no taxes or > > other > > regulatory charges added. My land line STARTS at 11.53 for flat > residence > > line, plus 5.78 federal subscriber line charge, plus 1.43 Connecticut > > sales > > tax, plus .73 federal tax plus .20 E911 surcharge, plus .05 Connecticut > > Service Fund, plus .39 number portability charge, plus .56 Universal > > Service > > fund (local), plus .14 Universal Service Fund (Long Distance). Talk > about > > nickel and dimeing you to death! > > > > I NEVER get out with under $25 on a "11.50" phone line, and with all the > > "short" long distance, I rarely get out for under ~$35 WITHOUT long > > distance, which is $.10/minute. For a couple of years I have used a > > prepaid > > calling card which I programmed into my phone to get my long distance > for > > $.039 per minute (slowly inching up, now $.045). > > > > Of course I also have to pay for my blazing fast internet connection, > > which > > is a ridiculous $45 / month. Makes the $15 ($25/$35) phone bill seem > > rather > > inconsequential. But I could never go back to dialup so since I have > this > > blazing fast internet, I might as well piggyback my phone off of it. > > > > I am pleased to say it is working great so far. > > > > John W. Colby > > www.ColbyConsulting.com > > > > -----Original Message----- > > From: accessd-bounces at databaseadvisors.com > > [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Christopher > > Hawkins > > Sent: Tuesday, January 27, 2004 5:23 PM > > To: accessd at databaseadvisors.com > > Subject: RE: [AccessD] Vonage > > > > > > $15/month sounds great, but what about setup fees or equipment > > expenses? What's the "out the door" price look like? > > > > -Christopher- > > > > ---- Original Message ---- > > From: JColby at dispec.com > > To: accessd at databaseadvisors.com, > > Subject: RE: [AccessD] Vonage > > Date: Tue, 27 Jan 2004 15:05:07 -0500 > > > > >I received the phonemodem last night. Plugged it in (behind my > > >router for > > >those interested), waited 5 minutes, then picked up the receiver and > > >made a > > >call. Extremely easy to set up. > > > > > >The sound so far is crystal clear, no clicks / pops or echoes. I > > >have a > > >brand new ATT 2ghz cordless phone system which I plugged in to it. > > >I can't > > >tell the difference between this and the landline. > > > > > >I haven't done any heavy duty uploads / downloads though I will be > > >doing > > >some testing in the next few days. > > > > > >I went with the $15 / month package for 500 total minutes - local > > >and long > > >distance, with anything after that billed at $.039 / minute. If my > > >useage > > >averages more than 500 minutes I'll move up to the $25 package with > > >unlimited local and 500 long distance minutes. Given my useage > > >patterns I > > >may very well end up with a $15 / month phone including long > > >distance. > > > > > >So far so good. > > > > > >John W. Colby > > >The database guy > > > > > > _______________________________________________ > > 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 > > > _______________________________________________ > 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 _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From bchacc at san.rr.com Wed Jan 28 19:06:42 2004 From: bchacc at san.rr.com (Rocky Smolin - Beach Access Software) Date: Wed, 28 Jan 2004 17:06:42 -0800 Subject: [AccessD] Error 2468 - You can't carryoutthisactionatthepresenttime. References: Message-ID: <022a01c3e604$28942140$6601a8c0@HAL9002> Trying to delete from the parent form. A parent record that has no child records. For delete what should I use: DoCmd.RunCommand acDeleteRecord? That code came from the command button wizard. Rocky ----- Original Message ----- From: "Charlotte Foust" To: "Access Developers discussion and problem solving" Sent: Wednesday, January 28, 2004 4:22 PM Subject: RE: [AccessD] Error 2468 - You can't carryoutthisactionatthepresenttime. > Ack! Lose that old A95 code, please! I can't even read it any more. > Comment out the SetWarnings False and see what Access tells you about > the operation. > > HOY! I just noticed that you appear to be running this from the parent > form. Which form are you trying to delete a record from? > > Charlotte Foust > > -----Original Message----- > From: Rocky Smolin - Beach Access Software [mailto:bchacc at san.rr.com] > Sent: Wednesday, January 28, 2004 4:18 PM > To: Access Developers discussion and problem solving > Subject: Re: [AccessD] Error 2468 - You can't carry > outthisactionatthepresenttime. > > > Rats. No soap. Got the error on the second delete after adding the > dbengineidle and the subfrm requery like this: > > > DoCmd.SetWarnings False > DoCmd.DoMenuItem acFormBar, acEditMenu, 8, , acMenuVer70 > DoCmd.DoMenuItem acFormBar, acEditMenu, 6, , acMenuVer70 > DoCmd.SetWarnings True > > DBEngine.Idle dbRefreshCache > > Me.Requery > Me!subfrmPODetail.Requery > > Any other ideas? > > Thanks and regards, > > Rocky > > ----- Original Message ----- > From: "Charlotte Foust" > To: "Access Developers discussion and problem solving" > > Sent: Wednesday, January 28, 2004 3:47 PM > Subject: RE: [AccessD] Error 2468 - You can't carry out > thisactionatthepresenttime. > > > > Rocky, > > > > I suspect you're running into an issue I've seen in somewhat similar > > circumstances, where the deletion didn't actually seem to get > > processed until I requeried the subform. Have you tried a > > DBEngine.Idle dbRefreshCache after the deletion? > > > > Charlotte Foust > > > > -----Original Message----- > > From: Rocky Smolin - Beach Access Software [mailto:bchacc at san.rr.com] > > Sent: Wednesday, January 28, 2004 2:13 PM > > To: Access Developers discussion and problem solving > > Subject: Re: [AccessD] Error 2468 - You can't carry out > > thisactionatthepresent time. > > > > > > Charlotte: > > > > Further to my reply, I found that when I did a delete then, before I > > did anything else, I went and looked in the tblPOHeader and the record > > > was still there. For some reason it's not completing the delete and > > that's why I think it's telling me that I can't make any moves at this > > > time. > > > > Rocky > > > > ----- Original Message ----- > > From: "Charlotte Foust" > > To: "Access Developers discussion and problem solving" > > > > Sent: Wednesday, January 28, 2004 1:20 PM > > Subject: RE: [AccessD] Error 2468 - You can't carry out this > > actionatthepresent time. > > > > > > > It sounds like you may have the parent and child forms linked to the > > > > same dataset. Do you? > > > > > > Charlotte Foust > > > > > > -----Original Message----- > > > From: Rocky Smolin - Beach Access Software > > > [mailto:bchacc at san.rr.com] > > > Sent: Wednesday, January 28, 2004 1:04 PM > > > To: Access Developers discussion and problem solving > > > Subject: Re: [AccessD] Error 2468 - You can't carry out this action > > > atthepresent time. > > > > > > > > > I'm getting closer. I deleted the sub-form that on the second tab > > > of the tab form and the two deletes worked. > > > > > > It has something to do with a sub form on a tab. Any clues, > > > anybody? > > > > > > Rocky > > > > > > ----- Original Message ----- > > > From: "Joe K Anderson" > > > To: "Rocky Smolin - Beach Access Software" ; > > > > > > Cc: "Wayne Warren Angelucci" ; "Gordon > > > Bennett" ; "Barry Hynum" > > > ; "Dixon Foss" ; "Mark Krisburg" > > > > > > > Sent: Wednesday, January 28, 2004 11:44 AM > > > Subject: Re: [AccessD] Error 2468 - You can't carry out this action > > > at thepresent time. > > > > > > > > > You may need to do a Requery between deletes? > > > > > > joe > > > ----- Original Message ----- > > > From: Rocky Smolin - Beach Access Software > > > To: Access Developers discussion and problem solving > > > Cc: Wayne Warren Angelucci ; Mark Krisburg ; Joe Anderson ; Gordon > > > > Bennett ; Dixon Foss ; Bob Heygood ; Barry Hynum > > > Sent: 01-28-2004 11:34 > > > Subject: Re: [AccessD] Error 2468 - You can't carry out this > > > action at the present time. > > > > > > > > > Randall: > > > > > > Tried this experiment just to get the DAO recordset out of the > > > way. > > I > > > deleted all references to it. > > > > > > Then I replaced: > > > > > > 'DoCmd.SetWarnings False > > > 'DoCmd.DoMenuItem acFormBar, acEditMenu, 8, , acMenuVer70 > > > 'DoCmd.DoMenuItem acFormBar, acEditMenu, 6, , acMenuVer70 > > > 'DoCmd.SetWarnings True > > > > > > with > > > > > > DoCmd.RunCommand acCmdDelete > > > > > > I selected a record and ran that code which does the delete. Then > > > > before > > > trying to delete the second record, I checked the table and the > > > record was > > > still there! > > > > > > So the delete (and probably other operations) are not completing > > > for > > > > > some > > > reason. > > > > > > Pluse, when I get the error, I have to use the task manager to > > > clear > > > > > access. > > > It won't quit, cant close any forms, etc. > > > > > > Any ideas? > > > > > > Many thanks in advance and regards, > > > > > > is > > > > > > ----- Original Message ----- > > > From: "Randall Anthony" > > > To: "'Access Developers discussion and problem solving'" > > > > > > Sent: Wednesday, January 28, 2004 10:31 AM > > > Subject: RE: [AccessD] Error 2468 - You can't carry out this > > > action at the > > > present time. > > > > > > > > > > Right off the top of my head, it has to do with the movefirst, > > > movelast. > > > I > > > > ran into this when converting A97 to A2K. Code worked in A97, > > > not > > > > > A2K and > > > > M$ said this was designed behavior. I'll try to find the > article. > > > > > > > > -----Original Message----- > > > > From: Rocky Smolin - Beach Access Software > > > [mailto:bchacc at san.rr.com] > > > > Sent: Wednesday, January 28, 2004 1:07 PM > > > > To: AccessD at databaseadvisors.com > > > > Subject: [AccessD] Error 2468 - You can't carry out this action > > > at > > > > > the > > > > present time. > > > > > > > > Dear List: > > > > > > > > I am getting the following error message on a bound form: > > > > > > > > Error 2468 - You can't carry out this action at the present > time. > > > > > > > > This form has a sub form linked to the main form by the main > > form's > > > primary > > > > key. (Main form is P.O. Header, subform is P.O. Detail). > > > > > > > > I get this error if I try to delete two records in a row. > > > > > > > > DoCmd.SetWarnings False > > > > DoCmd.DoMenuItem acFormBar, acEditMenu, 8, , acMenuVer70 > > > > DoCmd.DoMenuItem acFormBar, acEditMenu, 6, , acMenuVer70 > > > > DoCmd.SetWarnings True > > > > > > > > I also get this error after I try to add a record. The problem > > > started > > > > because I wanted to get the last PO in the file, add one to the > > > PO > > > > > number, > > > > and put the prefix and the new PO number ito the new record: > > > > > > > > DoCmd.GoToRecord , , acNewRec > > > > > > > > 'If rstPOHeader.RecordCount <> 0 Then > > > > ' rstPOHeader.MoveLast > > > > ' Me.fldPOPrefix = Nz(rstPOHeader!fldPOPrefix) > > > > ' If IsNumeric(rstPOHeader!fldPONumber) Then > > > > ' Me.fldPONumber = rstPOHeader!fldPONumber + 1 > > > > ' fldPOOrderDate.SetFocus > > > > ' Else > > > > ' Me.fldPONumber.SetFocus > > > > ' End If > > > > 'End If > > > > 'If Nz(Me.fldPOPrefix) = "" And Nz(rstPOHeader!fldPOPrefix) > = > > "" > > > Then > > > _ > > > > Me.fldPOPrefix.SetFocus > > > > > > > > Right now the code is commented out. If I uncomment the two > > lines: > > > > > > > > ' rstPOHeader.MoveLast > > > > ' Me.fldPOPrefix = Nz(rstPOHeader!fldPOPrefix) > > > > > > > > I get the error when I try to save: > > > > > > > > DoCmd.DoMenuItem acFormBar, acRecordsMenu, acSaveRecord, , > > > acMenuVer70 > > > > > > > > I checked the web and there is nothing. Has anyone encountered > > this > > > before? > > > > > > > > Thanks and regards, > > > > > > > > Rocky Smolin > > > > Beach Access Software > > > > _______________________________________________ > > > > 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 > > > > > > > _______________________________________________ > > > 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 > > > _______________________________________________ > > > 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 > > _______________________________________________ > > 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 > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com > From cfoust at infostatsystems.com Wed Jan 28 19:16:55 2004 From: cfoust at infostatsystems.com (Charlotte Foust) Date: Wed, 28 Jan 2004 17:16:55 -0800 Subject: [AccessD] Error 2468 - You can'tcarryoutthisactionatthepresenttime. Message-ID: Yep, the command button wizard still writes Access 95 code. Cute, huh? Is there anything else on your form that has a connection to the same table the parent form is based on? If not, then you need to make sure there is a current record before you try deleting again. You might stick some debug.print code in there to print the current Me.fldPOPrefix or return the Me.NewRecord flag to see where you are. If you wind up on a new record by deleting the last record in the recordset, then you'll get an error if you try to go to a new record. If you're on the new record when you try to delete, you'll get an error because there is no current record. If you have started to create a new record, you can't delete it because it isn't saved, and you can't go to NewRecord for the same reason. Any way you look at it, it pays to make sure you know where you are before you try to do anything. Charlotte Foust -----Original Message----- From: Rocky Smolin - Beach Access Software [mailto:bchacc at san.rr.com] Sent: Wednesday, January 28, 2004 5:07 PM To: Access Developers discussion and problem solving Subject: Re: [AccessD] Error 2468 - You can'tcarryoutthisactionatthepresenttime. Trying to delete from the parent form. A parent record that has no child records. For delete what should I use: DoCmd.RunCommand acDeleteRecord? That code came from the command button wizard. Rocky ----- Original Message ----- From: "Charlotte Foust" To: "Access Developers discussion and problem solving" Sent: Wednesday, January 28, 2004 4:22 PM Subject: RE: [AccessD] Error 2468 - You can't carryoutthisactionatthepresenttime. > Ack! Lose that old A95 code, please! I can't even read it any more. > Comment out the SetWarnings False and see what Access tells you about > the operation. > > HOY! I just noticed that you appear to be running this from the > parent form. Which form are you trying to delete a record from? > > Charlotte Foust > > -----Original Message----- > From: Rocky Smolin - Beach Access Software [mailto:bchacc at san.rr.com] > Sent: Wednesday, January 28, 2004 4:18 PM > To: Access Developers discussion and problem solving > Subject: Re: [AccessD] Error 2468 - You can't carry > outthisactionatthepresenttime. > > > Rats. No soap. Got the error on the second delete after adding the > dbengineidle and the subfrm requery like this: > > > DoCmd.SetWarnings False > DoCmd.DoMenuItem acFormBar, acEditMenu, 8, , acMenuVer70 > DoCmd.DoMenuItem acFormBar, acEditMenu, 6, , acMenuVer70 > DoCmd.SetWarnings True > > DBEngine.Idle dbRefreshCache > > Me.Requery > Me!subfrmPODetail.Requery > > Any other ideas? > > Thanks and regards, > > Rocky > > ----- Original Message ----- > From: "Charlotte Foust" > To: "Access Developers discussion and problem solving" > > Sent: Wednesday, January 28, 2004 3:47 PM > Subject: RE: [AccessD] Error 2468 - You can't carry out > thisactionatthepresenttime. > > > > Rocky, > > > > I suspect you're running into an issue I've seen in somewhat similar > > circumstances, where the deletion didn't actually seem to get > > processed until I requeried the subform. Have you tried a > > DBEngine.Idle dbRefreshCache after the deletion? > > > > Charlotte Foust > > > > -----Original Message----- > > From: Rocky Smolin - Beach Access Software > > [mailto:bchacc at san.rr.com] > > Sent: Wednesday, January 28, 2004 2:13 PM > > To: Access Developers discussion and problem solving > > Subject: Re: [AccessD] Error 2468 - You can't carry out > > thisactionatthepresent time. > > > > > > Charlotte: > > > > Further to my reply, I found that when I did a delete then, before I > > did anything else, I went and looked in the tblPOHeader and the > > record > > > was still there. For some reason it's not completing the delete and > > that's why I think it's telling me that I can't make any moves at > > this > > > time. > > > > Rocky > > > > ----- Original Message ----- > > From: "Charlotte Foust" > > To: "Access Developers discussion and problem solving" > > > > Sent: Wednesday, January 28, 2004 1:20 PM > > Subject: RE: [AccessD] Error 2468 - You can't carry out this > > actionatthepresent time. > > > > > > > It sounds like you may have the parent and child forms linked to > > > the > > > > same dataset. Do you? > > > > > > Charlotte Foust > > > > > > -----Original Message----- > > > From: Rocky Smolin - Beach Access Software > > > [mailto:bchacc at san.rr.com] > > > Sent: Wednesday, January 28, 2004 1:04 PM > > > To: Access Developers discussion and problem solving > > > Subject: Re: [AccessD] Error 2468 - You can't carry out this > > > action atthepresent time. > > > > > > > > > I'm getting closer. I deleted the sub-form that on the second tab > > > of the tab form and the two deletes worked. > > > > > > It has something to do with a sub form on a tab. Any clues, > > > anybody? > > > > > > Rocky > > > > > > ----- Original Message ----- > > > From: "Joe K Anderson" > > > To: "Rocky Smolin - Beach Access Software" ; > > > > > > Cc: "Wayne Warren Angelucci" ; "Gordon > > > Bennett" ; "Barry Hynum" > > > ; "Dixon Foss" ; "Mark > > > Krisburg" > > > > > > > Sent: Wednesday, January 28, 2004 11:44 AM > > > Subject: Re: [AccessD] Error 2468 - You can't carry out this > > > action at thepresent time. > > > > > > > > > You may need to do a Requery between deletes? > > > > > > joe > > > ----- Original Message ----- > > > From: Rocky Smolin - Beach Access Software > > > To: Access Developers discussion and problem solving > > > Cc: Wayne Warren Angelucci ; Mark Krisburg ; Joe Anderson ; > > > Gordon > > > > Bennett ; Dixon Foss ; Bob Heygood ; Barry Hynum > > > Sent: 01-28-2004 11:34 > > > Subject: Re: [AccessD] Error 2468 - You can't carry out this > > > action at the present time. > > > > > > > > > Randall: > > > > > > Tried this experiment just to get the DAO recordset out of the > > > way. > > I > > > deleted all references to it. > > > > > > Then I replaced: > > > > > > 'DoCmd.SetWarnings False > > > 'DoCmd.DoMenuItem acFormBar, acEditMenu, 8, , acMenuVer70 > > > 'DoCmd.DoMenuItem acFormBar, acEditMenu, 6, , acMenuVer70 > > > 'DoCmd.SetWarnings True > > > > > > with > > > > > > DoCmd.RunCommand acCmdDelete > > > > > > I selected a record and ran that code which does the delete. > > > Then > > > > before > > > trying to delete the second record, I checked the table and the > > > record was > > > still there! > > > > > > So the delete (and probably other operations) are not completing > > > for > > > > > some > > > reason. > > > > > > Pluse, when I get the error, I have to use the task manager to > > > clear > > > > > access. > > > It won't quit, cant close any forms, etc. > > > > > > Any ideas? > > > > > > Many thanks in advance and regards, > > > > > > is > > > > > > ----- Original Message ----- > > > From: "Randall Anthony" > > > To: "'Access Developers discussion and problem solving'" > > > > > > Sent: Wednesday, January 28, 2004 10:31 AM > > > Subject: RE: [AccessD] Error 2468 - You can't carry out this > > > action at the > > > present time. > > > > > > > > > > Right off the top of my head, it has to do with the movefirst, > > > movelast. > > > I > > > > ran into this when converting A97 to A2K. Code worked in A97, > > > not > > > > > A2K and > > > > M$ said this was designed behavior. I'll try to find the > article. > > > > > > > > -----Original Message----- > > > > From: Rocky Smolin - Beach Access Software > > > [mailto:bchacc at san.rr.com] > > > > Sent: Wednesday, January 28, 2004 1:07 PM > > > > To: AccessD at databaseadvisors.com > > > > Subject: [AccessD] Error 2468 - You can't carry out this > > > action at > > > > > the > > > > present time. > > > > > > > > Dear List: > > > > > > > > I am getting the following error message on a bound form: > > > > > > > > Error 2468 - You can't carry out this action at the present > time. > > > > > > > > This form has a sub form linked to the main form by the main > > form's > > > primary > > > > key. (Main form is P.O. Header, subform is P.O. Detail). > > > > > > > > I get this error if I try to delete two records in a row. > > > > > > > > DoCmd.SetWarnings False > > > > DoCmd.DoMenuItem acFormBar, acEditMenu, 8, , acMenuVer70 > > > > DoCmd.DoMenuItem acFormBar, acEditMenu, 6, , acMenuVer70 > > > > DoCmd.SetWarnings True > > > > > > > > I also get this error after I try to add a record. The > > > problem started > > > > because I wanted to get the last PO in the file, add one to > > > the PO > > > > > number, > > > > and put the prefix and the new PO number ito the new record: > > > > > > > > DoCmd.GoToRecord , , acNewRec > > > > > > > > 'If rstPOHeader.RecordCount <> 0 Then > > > > ' rstPOHeader.MoveLast > > > > ' Me.fldPOPrefix = Nz(rstPOHeader!fldPOPrefix) > > > > ' If IsNumeric(rstPOHeader!fldPONumber) Then > > > > ' Me.fldPONumber = rstPOHeader!fldPONumber + 1 > > > > ' fldPOOrderDate.SetFocus > > > > ' Else > > > > ' Me.fldPONumber.SetFocus > > > > ' End If > > > > 'End If > > > > 'If Nz(Me.fldPOPrefix) = "" And Nz(rstPOHeader!fldPOPrefix) > = > > "" > > > Then > > > _ > > > > Me.fldPOPrefix.SetFocus > > > > > > > > Right now the code is commented out. If I uncomment the two > > lines: > > > > > > > > ' rstPOHeader.MoveLast > > > > ' Me.fldPOPrefix = Nz(rstPOHeader!fldPOPrefix) > > > > > > > > I get the error when I try to save: > > > > > > > > DoCmd.DoMenuItem acFormBar, acRecordsMenu, acSaveRecord, , > > > acMenuVer70 > > > > > > > > I checked the web and there is nothing. Has anyone > > > encountered > > this > > > before? > > > > > > > > Thanks and regards, > > > > > > > > Rocky Smolin > > > > Beach Access Software > > > > _______________________________________________ > > > > 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 > > > > > > > _______________________________________________ > > > 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 > > > _______________________________________________ > > > 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 > > _______________________________________________ > > 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 > _______________________________________________ > 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 From carbonnb at sympatico.ca Wed Jan 28 19:48:03 2004 From: carbonnb at sympatico.ca (Bryan Carbonnell) Date: Wed, 28 Jan 2004 20:48:03 -0500 Subject: [AccessD] Vonage In-Reply-To: References: <200401282353.i0SNrWEk000698@ms-smtp-02.nyroc.rr.com> Message-ID: <40182003.32485.B4C567@localhost> OK folks, now we are drifting dangerously close to OT fodder. -- Bryan Carbonnell - carbonnb at sympatico.ca You're just jealous because the voices only talk to me. From Subscriptions at servicexp.com Wed Jan 28 20:04:22 2004 From: Subscriptions at servicexp.com (Robert Gracie) Date: Wed, 28 Jan 2004 21:04:22 -0500 Subject: [AccessD] Interface Callback Class Questions. In-Reply-To: <008201c3e5e1$6de5e0d0$2a3ca8c0@TEXASSYSTEMS.COM> Message-ID: <000001c3e60c$371f73b0$6501a8c0@RG> Ken, Thank you very much for the help. RE: Yep your correct, you can't reference an "un-compiled" reference in an mde, which does change my approach a bit. The object however remains the same.. I implemented your solution below, and noted a few problems. The report fires, however none of the events (Close) are being hooked. I can run the report once, any attempt to run the report again fails on "RemoteReportClose mrRpt.Name" ERROR Number 2467....... Object or property... either does not exist or is closed...... I tried it in both A2K and AXP Formats, same results Do I need to hook the opening report to the events in the CReportHost class internally of the opening report, such as on the OnOpen event? I'm new to the "DEEP" Programming method so I could be way off base..... What do you think? Do you do any teaching? You are a good teacher..... Thanks For the Help Ken... Robert Gracie -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Ken Ismert Sent: Wednesday, January 28, 2004 3:58 PM To: 'Access Developers discussion and problem solving' Subject: RE: [AccessD] Interface Callback Class Questions. Robert, To make this work, you need a public object interface or type library that both projects (your Host and Remote) can agree on. You could define an Interface class in the Remote db, set its Instancing property as 2 - PublicNotCreatable, allowing you to use objects that implement this interface in both the host and remote projects. But that is not strictly necessary, as you already have the Access public type library, which defines the Report interface, which both projects obviously understand. So, you could do it this way: 1. Add a Public Report Open function in a Remote module that returns an Access.Report You also need a matching Report Close function. 2. Add a Report class in the Host to sink events from the remote report. 3. Add code in a Host module to open and close the report. As I only have A2K, I can't answer the question as to whether the Report interface is forward compatible between A2K and AXP. I tend to think so. If not, you will be forced to use another approach, likely one involving interfaces. I do have a question for you: I found I couldn't reference a remote mdb from a host mde. I had to make the remote mdb into an mde, and reference it in the host, before I could successfully make the host mde. How did you get around this? -Ken Here is the code that I wrote to test this functionality: 1. Report Open/Close functions in a Remote module: ================================================== Public Sub RemoteReportClose(sReportName As String) On Error GoTo HandleErr DoCmd.Close acReport, sReportName Exit Sub HandleErr: Err.Raise Number:=Err.Number, _ Description:=Err.Description, _ Source:="modMain.RemoteReportClose" & vbCrLf & Err.Source Exit Sub End Sub Public Function RemoteReportOpen(sReportName As String) As Access.Report On Error GoTo HandleErr ' Init Set RemoteReportOpen = Nothing ' Open Report DoCmd.OpenReport sReportName, acViewPreview ' Return Set RemoteReportOpen = Application.Reports(sReportName) Exit Function HandleErr: Err.Raise Number:=Err.Number, _ Description:=Err.Description, _ Source:="modMain.RemoteReportOpen" & vbCrLf & Err.Source Exit Function End Function 2. The CReportHost class in the Host: ======================================= Option Compare Database Option Explicit Private Const pcsEventStub As String = "[Event Procedure]" Private WithEvents mrRpt As Access.Report Property Get IsOpen() As Boolean IsOpen = Not (mrRpt Is Nothing) End Property Property Get Name() As String Name = "" If mrRpt Is Nothing Then Exit Sub Name = mrRpt.Name End Property Public Sub CloseRemoteReport() On Error GoTo HandleErr ' Close Report if Open If mrRpt Is Nothing Then Exit Sub RemoteReportClose mrRpt.Name Exit Sub HandleErr: Err.Raise Number:=Err.Number, _ Description:=Err.Description, _ Source:="CReportHost.CloseRemoteReport" & vbCrLf & Err.Source Exit Sub End Sub Public Sub OpenRemoteReport(ReportName As String) On Error GoTo HandleErr ' Open Report Set mrRpt = RemoteReportOpen(ReportName) ' Hook Close Event mrRpt.OnClose = pcsEventStub Exit Sub HandleErr: Err.Raise Number:=Err.Number, _ Description:=Err.Description, _ Source:="CReportHost.OpenRemoteReport" & vbCrLf & Err.Source Exit Sub End Sub Private Sub Class_Terminate() On Error Resume Next CloseRemoteReport End Sub Private Sub mrRpt_Close() MsgBox "Report " & mrRpt.Name & " closed!" Set mrRpt = Nothing End Sub 3. Module-level Code in Host: ============================= Public grReportHost As CReportHost ' Call this routine to open a remote report Public Sub OpenRemoteReport(sReportName As String) On Error GoTo HandleErr ' Close current Report, if any If Not (grReportHost Is Nothing) Then If grReportHost.IsOpen Then grReportHost.CloseRemoteReport End If End If ' Remake Host Object Set grReportHost = New CReportHost ' Open Report grReportHost.OpenRemoteReport sReportName Exit Sub HandleErr: MsgBox "Error: " & Err.Number & vbCrLf _ & Err.Description & vbCrLf _ & "modMain.OpenRemoteReport" & vbCrLf & Err.Source Exit Sub End Sub -----Original Message----- From: Robert Gracie [mailto:Subscriptions at servicexp.com] Sent: Tuesday, January 27, 2004 6:29 AM To: 'Access Developers discussion and problem solving' Subject: [AccessD] Interface Callback Class Questions. Hello All AK2 mde referencing A2K mdb Objective: To open a report in a (host is an mde referenced to the .mdb) referenced .mdb and have all the events for a given report fire inside the host mde. I can do this for a report located inside the mde, however I can seem to figure out how to get the report inside the .mdb to see the class in the mde, as circular references are not permitted in access. Question: I was thinking that an Interface callback would be an option. So is it possible to use an interface callback across a referenced db to accomplish my objective? Any examples...? Thanks Robert Gracie _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From accessd at shaw.ca Wed Jan 28 20:08:05 2004 From: accessd at shaw.ca (Jim Lawrence (AccessD)) Date: Wed, 28 Jan 2004 18:08:05 -0800 Subject: [AccessD] Error 2468 - You can't carry out this action at the present time. In-Reply-To: <005c01c3e5c9$7cb85bf0$6601a8c0@HAL9002> Message-ID: Hi Rocky: My suggestion and unfortunately I do not have the code at my finger tips. 1. Open a DAO recordset, selecting all the records to be removed, in dynamic mode with optimistic lock set (dbOpenDynamic, dbOptimistic). 2. Turn error off and set error to 0. When looping through the recordset, deleting/updating the content watch for an error number change...someone may be in one the records and you will not be able to delete it...other errors can (for the most part) be ignored. 3. Run requery and turn the errors on. HTH Jim -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Rocky Smolin - Beach Access Software Sent: Wednesday, January 28, 2004 10:07 AM To: AccessD at databaseadvisors.com Subject: [AccessD] Error 2468 - You can't carry out this action at the present time. Dear List: I am getting the following error message on a bound form: Error 2468 - You can't carry out this action at the present time. This form has a sub form linked to the main form by the main form's primary key. (Main form is P.O. Header, subform is P.O. Detail). I get this error if I try to delete two records in a row. DoCmd.SetWarnings False DoCmd.DoMenuItem acFormBar, acEditMenu, 8, , acMenuVer70 DoCmd.DoMenuItem acFormBar, acEditMenu, 6, , acMenuVer70 DoCmd.SetWarnings True I also get this error after I try to add a record. The problem started because I wanted to get the last PO in the file, add one to the PO number, and put the prefix and the new PO number ito the new record: DoCmd.GoToRecord , , acNewRec 'If rstPOHeader.RecordCount <> 0 Then ' rstPOHeader.MoveLast ' Me.fldPOPrefix = Nz(rstPOHeader!fldPOPrefix) ' If IsNumeric(rstPOHeader!fldPONumber) Then ' Me.fldPONumber = rstPOHeader!fldPONumber + 1 ' fldPOOrderDate.SetFocus ' Else ' Me.fldPONumber.SetFocus ' End If 'End If 'If Nz(Me.fldPOPrefix) = "" And Nz(rstPOHeader!fldPOPrefix) = "" Then _ Me.fldPOPrefix.SetFocus Right now the code is commented out. If I uncomment the two lines: ' rstPOHeader.MoveLast ' Me.fldPOPrefix = Nz(rstPOHeader!fldPOPrefix) I get the error when I try to save: DoCmd.DoMenuItem acFormBar, acRecordsMenu, acSaveRecord, , acMenuVer70 I checked the web and there is nothing. Has anyone encountered this before? Thanks and regards, Rocky Smolin Beach Access Software _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From bchacc at san.rr.com Wed Jan 28 20:34:20 2004 From: bchacc at san.rr.com (Rocky Smolin - Beach Access Software) Date: Wed, 28 Jan 2004 18:34:20 -0800 Subject: [AccessD] Error 2468 - You can'tcarryoutthisactionatthepresenttime. References: Message-ID: <024001c3e610$66b99750$6601a8c0@HAL9002> "Any way you look at it, it pays to make sure you know where you are before you try to do anything. " Good advice at any time. Brain fade dictates I address this in the a.m. Thanks for your input and have a nice night. Rocky ----- Original Message ----- From: "Charlotte Foust" To: "Access Developers discussion and problem solving" Sent: Wednesday, January 28, 2004 5:16 PM Subject: RE: [AccessD] Error 2468 - You can'tcarryoutthisactionatthepresenttime. > Yep, the command button wizard still writes Access 95 code. Cute, huh? > > Is there anything else on your form that has a connection to the same > table the parent form is based on? If not, then you need to make sure > there is a current record before you try deleting again. You might > stick some debug.print code in there to print the current Me.fldPOPrefix > or return the Me.NewRecord flag to see where you are. If you wind up on > a new record by deleting the last record in the recordset, then you'll > get an error if you try to go to a new record. If you're on the new > record when you try to delete, you'll get an error because there is no > current record. If you have started to create a new record, you can't > delete it because it isn't saved, and you can't go to NewRecord for the > same reason. Any way you look at it, it pays to make sure you know > where you are before you try to do anything. > > Charlotte Foust > > -----Original Message----- > From: Rocky Smolin - Beach Access Software [mailto:bchacc at san.rr.com] > Sent: Wednesday, January 28, 2004 5:07 PM > To: Access Developers discussion and problem solving > Subject: Re: [AccessD] Error 2468 - You > can'tcarryoutthisactionatthepresenttime. > > > Trying to delete from the parent form. A parent record that has no > child records. > > For delete what should I use: DoCmd.RunCommand acDeleteRecord? > > That code came from the command button wizard. > > Rocky > > ----- Original Message ----- > From: "Charlotte Foust" > To: "Access Developers discussion and problem solving" > > Sent: Wednesday, January 28, 2004 4:22 PM > Subject: RE: [AccessD] Error 2468 - You can't > carryoutthisactionatthepresenttime. > > > > Ack! Lose that old A95 code, please! I can't even read it any more. > > Comment out the SetWarnings False and see what Access tells you about > > the operation. > > > > HOY! I just noticed that you appear to be running this from the > > parent form. Which form are you trying to delete a record from? > > > > Charlotte Foust > > > > -----Original Message----- > > From: Rocky Smolin - Beach Access Software [mailto:bchacc at san.rr.com] > > Sent: Wednesday, January 28, 2004 4:18 PM > > To: Access Developers discussion and problem solving > > Subject: Re: [AccessD] Error 2468 - You can't carry > > outthisactionatthepresenttime. > > > > > > Rats. No soap. Got the error on the second delete after adding the > > dbengineidle and the subfrm requery like this: > > > > > > DoCmd.SetWarnings False > > DoCmd.DoMenuItem acFormBar, acEditMenu, 8, , acMenuVer70 > > DoCmd.DoMenuItem acFormBar, acEditMenu, 6, , acMenuVer70 > > DoCmd.SetWarnings True > > > > DBEngine.Idle dbRefreshCache > > > > Me.Requery > > Me!subfrmPODetail.Requery > > > > Any other ideas? > > > > Thanks and regards, > > > > Rocky > > > > ----- Original Message ----- > > From: "Charlotte Foust" > > To: "Access Developers discussion and problem solving" > > > > Sent: Wednesday, January 28, 2004 3:47 PM > > Subject: RE: [AccessD] Error 2468 - You can't carry out > > thisactionatthepresenttime. > > > > > > > Rocky, > > > > > > I suspect you're running into an issue I've seen in somewhat similar > > > > circumstances, where the deletion didn't actually seem to get > > > processed until I requeried the subform. Have you tried a > > > DBEngine.Idle dbRefreshCache after the deletion? > > > > > > Charlotte Foust > > > > > > -----Original Message----- > > > From: Rocky Smolin - Beach Access Software > > > [mailto:bchacc at san.rr.com] > > > Sent: Wednesday, January 28, 2004 2:13 PM > > > To: Access Developers discussion and problem solving > > > Subject: Re: [AccessD] Error 2468 - You can't carry out > > > thisactionatthepresent time. > > > > > > > > > Charlotte: > > > > > > Further to my reply, I found that when I did a delete then, before I > > > > did anything else, I went and looked in the tblPOHeader and the > > > record > > > > > was still there. For some reason it's not completing the delete and > > > > that's why I think it's telling me that I can't make any moves at > > > this > > > > > time. > > > > > > Rocky > > > > > > ----- Original Message ----- > > > From: "Charlotte Foust" > > > To: "Access Developers discussion and problem solving" > > > > > > Sent: Wednesday, January 28, 2004 1:20 PM > > > Subject: RE: [AccessD] Error 2468 - You can't carry out this > > > actionatthepresent time. > > > > > > > > > > It sounds like you may have the parent and child forms linked to > > > > the > > > > > > same dataset. Do you? > > > > > > > > Charlotte Foust > > > > > > > > -----Original Message----- > > > > From: Rocky Smolin - Beach Access Software > > > > [mailto:bchacc at san.rr.com] > > > > Sent: Wednesday, January 28, 2004 1:04 PM > > > > To: Access Developers discussion and problem solving > > > > Subject: Re: [AccessD] Error 2468 - You can't carry out this > > > > action atthepresent time. > > > > > > > > > > > > I'm getting closer. I deleted the sub-form that on the second tab > > > > > of the tab form and the two deletes worked. > > > > > > > > It has something to do with a sub form on a tab. Any clues, > > > > anybody? > > > > > > > > Rocky > > > > > > > > ----- Original Message ----- > > > > From: "Joe K Anderson" > > > > To: "Rocky Smolin - Beach Access Software" ; > > > > > > > > Cc: "Wayne Warren Angelucci" ; "Gordon > > > > Bennett" ; "Barry Hynum" > > > > ; "Dixon Foss" ; "Mark > > > > Krisburg" > > > > > > > > > > Sent: Wednesday, January 28, 2004 11:44 AM > > > > Subject: Re: [AccessD] Error 2468 - You can't carry out this > > > > action at thepresent time. > > > > > > > > > > > > You may need to do a Requery between deletes? > > > > > > > > joe > > > > ----- Original Message ----- > > > > From: Rocky Smolin - Beach Access Software > > > > To: Access Developers discussion and problem solving > > > > Cc: Wayne Warren Angelucci ; Mark Krisburg ; Joe Anderson ; > > > > Gordon > > > > > > Bennett ; Dixon Foss ; Bob Heygood ; Barry Hynum > > > > Sent: 01-28-2004 11:34 > > > > Subject: Re: [AccessD] Error 2468 - You can't carry out this > > > > action at the present time. > > > > > > > > > > > > Randall: > > > > > > > > Tried this experiment just to get the DAO recordset out of the > > > > way. > > > I > > > > deleted all references to it. > > > > > > > > Then I replaced: > > > > > > > > 'DoCmd.SetWarnings False > > > > 'DoCmd.DoMenuItem acFormBar, acEditMenu, 8, , acMenuVer70 > > > > 'DoCmd.DoMenuItem acFormBar, acEditMenu, 6, , acMenuVer70 > > > > 'DoCmd.SetWarnings True > > > > > > > > with > > > > > > > > DoCmd.RunCommand acCmdDelete > > > > > > > > I selected a record and ran that code which does the delete. > > > > Then > > > > > > before > > > > trying to delete the second record, I checked the table and the > > > > record was > > > > still there! > > > > > > > > So the delete (and probably other operations) are not completing > > > > > for > > > > > > > some > > > > reason. > > > > > > > > Pluse, when I get the error, I have to use the task manager to > > > > clear > > > > > > > access. > > > > It won't quit, cant close any forms, etc. > > > > > > > > Any ideas? > > > > > > > > Many thanks in advance and regards, > > > > > > > > is > > > > > > > > ----- Original Message ----- > > > > From: "Randall Anthony" > > > > To: "'Access Developers discussion and problem solving'" > > > > > > > > Sent: Wednesday, January 28, 2004 10:31 AM > > > > Subject: RE: [AccessD] Error 2468 - You can't carry out this > > > > action at the > > > > present time. > > > > > > > > > > > > > Right off the top of my head, it has to do with the movefirst, > > > > > movelast. > > > > I > > > > > ran into this when converting A97 to A2K. Code worked in A97, > > > > > not > > > > > > > A2K and > > > > > M$ said this was designed behavior. I'll try to find the > > article. > > > > > > > > > > -----Original Message----- > > > > > From: Rocky Smolin - Beach Access Software > > > > [mailto:bchacc at san.rr.com] > > > > > Sent: Wednesday, January 28, 2004 1:07 PM > > > > > To: AccessD at databaseadvisors.com > > > > > Subject: [AccessD] Error 2468 - You can't carry out this > > > > action at > > > > > > > the > > > > > present time. > > > > > > > > > > Dear List: > > > > > > > > > > I am getting the following error message on a bound form: > > > > > > > > > > Error 2468 - You can't carry out this action at the present > > time. > > > > > > > > > > This form has a sub form linked to the main form by the main > > > form's > > > > primary > > > > > key. (Main form is P.O. Header, subform is P.O. Detail). > > > > > > > > > > I get this error if I try to delete two records in a row. > > > > > > > > > > DoCmd.SetWarnings False > > > > > DoCmd.DoMenuItem acFormBar, acEditMenu, 8, , acMenuVer70 > > > > > DoCmd.DoMenuItem acFormBar, acEditMenu, 6, , acMenuVer70 > > > > > DoCmd.SetWarnings True > > > > > > > > > > I also get this error after I try to add a record. The > > > > problem started > > > > > because I wanted to get the last PO in the file, add one to > > > > the PO > > > > > > > number, > > > > > and put the prefix and the new PO number ito the new record: > > > > > > > > > > DoCmd.GoToRecord , , acNewRec > > > > > > > > > > 'If rstPOHeader.RecordCount <> 0 Then > > > > > ' rstPOHeader.MoveLast > > > > > ' Me.fldPOPrefix = Nz(rstPOHeader!fldPOPrefix) > > > > > ' If IsNumeric(rstPOHeader!fldPONumber) Then > > > > > ' Me.fldPONumber = rstPOHeader!fldPONumber + 1 > > > > > ' fldPOOrderDate.SetFocus > > > > > ' Else > > > > > ' Me.fldPONumber.SetFocus > > > > > ' End If > > > > > 'End If > > > > > 'If Nz(Me.fldPOPrefix) = "" And > Nz(rstPOHeader!fldPOPrefix) > > = > > > "" > > > > Then > > > > _ > > > > > Me.fldPOPrefix.SetFocus > > > > > > > > > > Right now the code is commented out. If I uncomment the two > > > lines: > > > > > > > > > > ' rstPOHeader.MoveLast > > > > > ' Me.fldPOPrefix = Nz(rstPOHeader!fldPOPrefix) > > > > > > > > > > I get the error when I try to save: > > > > > > > > > > DoCmd.DoMenuItem acFormBar, acRecordsMenu, acSaveRecord, , > > > > acMenuVer70 > > > > > > > > > > I checked the web and there is nothing. Has anyone > > > > encountered > > > this > > > > before? > > > > > > > > > > Thanks and regards, > > > > > > > > > > Rocky Smolin > > > > > Beach Access Software > > > > > _______________________________________________ > > > > > 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 > > > > > > > > > _______________________________________________ > > > > 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 > > > > _______________________________________________ > > > > 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 > > > _______________________________________________ > > > 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 > > _______________________________________________ > > 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 > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com From gustav at cactus.dk Thu Jan 29 04:16:04 2004 From: gustav at cactus.dk (Gustav Brock) Date: Thu, 29 Jan 2004 11:16:04 +0100 Subject: [AccessD] Days 360 In-Reply-To: References: Message-ID: <69582338.20040129111604@cactus.dk> Hi Jeffrey First, are you aware of the typo here: > Month(myEndDate), 1)) - 1 Or Day(myendate) = 30 Then Second, a performance as Excel's Days360() may not be the ultimate goal as it not up to the standards. Visit this link to read more and for data samples: http://www.entisoft.com/ESTools/MathFinancial_Days360.HTML /gustav > I have the following function that is used to calculate the number of days > based on a 360 day year. When I compare the results to Excel's Days360 > formula I get a different result. > The start date I am using is 11/30/2003 and an end date of 12/31/2003 > My function returns 31 days and Excel returns 30 days. > Can anyone see/tell me why I am getting a different result. > TIA > Jeff > Function CalcDays360(mystartdate As Date, myEndDate As Date) As Double > Dim mytotaldays > mytotaldays = 0 > Select Case DateDiff("m", mystartdate, myEndDate) > Case 0 'Both dates are in the same month > If myEndDate <> DateAdd("m", 1, DateSerial(Year(myEndDate), > Month(myEndDate), 1)) - 1 Then > mytotaldays = DateDiff("d", mystartdate, myEndDate) + 1 > Else > If Day(mystartdate) <> 31 Then > mytotaldays = 30 - Day(mystartdate) + 1 > Else > mytotaldays = 1 > End If > End If > Case Else 'Dates are not in the same month > 'Determine Number of Days in the first month > If Day(mystartdate) <> 31 Then > mytotaldays = 30 - Day(mystartdate) + 1 > Else > mytotaldays = 1 > End If > 'Add Number of Days in the second month > If myEndDate = DateAdd("m", 1, DateSerial(Year(myEndDate), > Month(myEndDate), 1)) - 1 Or Day(myendate) = 30 Then > mytotaldays = mytotaldays + 30 > Else > mytotaldays = mytotaldays + Day(myEndDate) > End If > 'Add 30 days to total number for each whole months between dates > mytotaldays = mytotaldays + (30 * (DateDiff("m", mystartdate, > myEndDate) - 1)) > End Select > CalcDays360 = mytotaldays > End Function From accessd666 at yahoo.com Thu Jan 29 07:08:08 2004 From: accessd666 at yahoo.com (Sad Der) Date: Thu, 29 Jan 2004 05:08:08 -0800 (PST) Subject: [AccessD] Store all days between 2 dates / Type Mismatch Message-ID: <20040129130808.68198.qmail@web60209.mail.yahoo.com> Hi group, does anybody know how I can fill an array with the DATES between a startdate and an enddate? I'm using datediff to calculate the no of days. I want to use this in a loop e.g.: Dim x as Integer Dim arrDays() as Variant Dim intNumberOfDays as Integer dim strStart as String Dim strEnd as String intNumberOfDays = DateDiff("d", strStart, strEnd) ReDim arrDays(intNumberOfDays) for x = 0 to intNumberOfDays arrDays(x) = strStart + x next x I keep getting a Type Mismatch error. I also tried: arrDays(x) = CVAR(strStart + x) Any ideas? TIA. Sander Example: StartDate EndDate Return value(s) 21/01/2004 21/01/2004 21/01/2004 21/01/2004 22/01/2004 21/01/2004;22/01/2004 31/12/2003 02/01/2004 31/12/2003;01/01/2004;02/01/2004 __________________________________ Do you Yahoo!? Yahoo! SiteBuilder - Free web site building tool. Try it! http://webhosting.yahoo.com/ps/sb/ From gustav at cactus.dk Thu Jan 29 07:19:48 2004 From: gustav at cactus.dk (Gustav Brock) Date: Thu, 29 Jan 2004 14:19:48 +0100 Subject: [AccessD] Store all days between 2 dates / Type Mismatch In-Reply-To: <20040129130808.68198.qmail@web60209.mail.yahoo.com> References: <20040129130808.68198.qmail@web60209.mail.yahoo.com> Message-ID: <10820606520.20040129141948@cactus.dk> Hi Sad Never use strings for dates. Either change to datatype Date or convert the strings to date/time values: > intNumberOfDays = DateDiff("d", CDate(strStart), CDate(strEnd)) > ReDim arrDays(intNumberOfDays) > for x = 0 to intNumberOfDays > arrDays(x) = DateAdd("d", x, CDate(strStart)) > next x /gustav > does anybody know how I can fill an array with the > DATES between a startdate and an enddate? > I'm using datediff to calculate the no of days. I want > to use this in a loop e.g.: > Dim x as Integer > Dim arrDays() as Variant > Dim intNumberOfDays as Integer > dim strStart as String > Dim strEnd as String > intNumberOfDays = DateDiff("d", strStart, strEnd) > ReDim arrDays(intNumberOfDays) > for x = 0 to intNumberOfDays > arrDays(x) = strStart + x > next x > I keep getting a Type Mismatch error. I also tried: > arrDays(x) = CVAR(strStart + x) > Any ideas? > TIA. > Sander > Example: > StartDate EndDate Return value(s) > 21/01/2004 21/01/2004 21/01/2004 > 21/01/2004 22/01/2004 21/01/2004;22/01/2004 > 31/12/2003 02/01/2004 31/12/2003;01/01/2004;02/01/2004 From Erwin.Craps at ithelps.be Thu Jan 29 07:24:46 2004 From: Erwin.Craps at ithelps.be (Erwin Craps - IT Helps) Date: Thu, 29 Jan 2004 14:24:46 +0100 Subject: [AccessD] Store all days between 2 dates / Type Mismatch Message-ID: <46B976F2B698FF46A4FE7636509B22DF03D1A2@stekelbes.ithelps.local> Just at first sight strStart strEnd Should be date type and not string An I supose arrDays() to. -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Sad Der Sent: Thursday, January 29, 2004 2:08 PM To: Acces User Group Subject: [AccessD] Store all days between 2 dates / Type Mismatch Hi group, does anybody know how I can fill an array with the DATES between a startdate and an enddate? I'm using datediff to calculate the no of days. I want to use this in a loop e.g.: Dim x as Integer Dim arrDays() as Variant Dim intNumberOfDays as Integer dim strStart as String Dim strEnd as String intNumberOfDays = DateDiff("d", strStart, strEnd) ReDim arrDays(intNumberOfDays) for x = 0 to intNumberOfDays arrDays(x) = strStart + x next x I keep getting a Type Mismatch error. I also tried: arrDays(x) = CVAR(strStart + x) Any ideas? TIA. Sander Example: StartDate EndDate Return value(s) 21/01/2004 21/01/2004 21/01/2004 21/01/2004 22/01/2004 21/01/2004;22/01/2004 31/12/2003 02/01/2004 31/12/2003;01/01/2004;02/01/2004 __________________________________ Do you Yahoo!? Yahoo! SiteBuilder - Free web site building tool. Try it! http://webhosting.yahoo.com/ps/sb/ _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From paul.hartland at fsmail.net Thu Jan 29 07:26:30 2004 From: paul.hartland at fsmail.net (paul.hartland at fsmail.net) Date: Thu, 29 Jan 2004 14:26:30 +0100 (CET) Subject: [AccessD] Store all days between 2 dates / Type Mismatch Message-ID: <21974776.1075382790483.JavaMail.www@wwinf3003> Sander, Try this: Dim x as Integer Dim arrDays() as Variant Dim StartDate as Date Dim EndDate As Date Dim IncDate As Date x = 0 IncDate = StartDate Do Until(IncDate>EndDate) arrDays(x) = IncDate x = x + 1 IncDate = IncDate + 1 Loop Paul Message date : Jan 29 2004, 01:17 PM >From : "Sad Der" To : "Acces User Group" Copy to : Subject : [AccessD] Store all days between 2 dates / Type Mismatch Hi group, does anybody know how I can fill an array with the DATES between a startdate and an enddate? I'm using datediff to calculate the no of days. I want to use this in a loop e.g.: Dim x as Integer Dim arrDays() as Variant Dim intNumberOfDays as Integer dim strStart as String Dim strEnd as String intNumberOfDays = DateDiff("d", strStart, strEnd) ReDim arrDays(intNumberOfDays) for x = 0 to intNumberOfDays arrDays(x) = strStart + x next x I keep getting a Type Mismatch error. I also tried: arrDays(x) = CVAR(strStart + x) Any ideas? TIA. Sander Example: StartDate EndDate Return value(s) 21/01/2004 21/01/2004 21/01/2004 21/01/2004 22/01/2004 21/01/2004;22/01/2004 31/12/2003 02/01/2004 31/12/2003;01/01/2004;02/01/2004 __________________________________ Do you Yahoo!? Yahoo! SiteBuilder - Free web site building tool. Try it! http://webhosting.yahoo.com/ps/sb/ _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com Freeserve AnyTime - HALF PRICE for the first 3 months - Save ?7.50 a month www.freeserve.com/anytime From weeden1949 at hotmail.com Thu Jan 29 08:20:38 2004 From: weeden1949 at hotmail.com (Greg Smith) Date: Thu, 29 Jan 2004 08:20:38 -0600 Subject: [AccessD] Error # 3343 Unrecognized database format References: <001a01c3e5f8$afdde1b0$8500a8c0@CX615377a> Message-ID: Doug: I've seen this before. One of my clients has A97 FE and BE and occasionally gets the "Unrecognized db ... error". Their MIS guy has found that almost every time it happened they had a bad switch, bad NIC, or bad wiring which was causing the user's FE to break the connection improperly, leaving the BE in a questionable state. Of course, the same thing can occur if users reboot their computers or reset them without logging out of Access first. HTH! Greg Smith weeden1949 at hotmail.com ----- Original Message ----- From: "Doug Murphy" To: "'Access Developers discussion and problem solving'" Sent: Wednesday, January 28, 2004 5:44 PM Subject: [AccessD] Error # 3343 Unrecognized database format Folks, I have a client who has started getting an Error #3343 on their back end DB. The DB is Access 97. From what I can find on this error it usually has to do with database writes being interupted or hard shutdowns. They claim that there have been no changes to thier network and that all etc. etc. From ggonzalez at cccis.com Thu Jan 29 09:28:18 2004 From: ggonzalez at cccis.com (ggonzalez at cccis.com) Date: Thu, 29 Jan 2004 09:28:18 -0600 Subject: [AccessD] Access as Service Message-ID: Has anyone ever had to run an Access application as a service on a computer? if so can you pint me in the direction on how I could do this. Thanks! From Oleg_123 at xuppa.com Thu Jan 29 10:12:07 2004 From: Oleg_123 at xuppa.com (Oleg_123 at xuppa.com) Date: Thu, 29 Jan 2004 11:12:07 -0500 (EST) Subject: [AccessD] macro can't find function In-Reply-To: References: <005401c3be4a$9a497ab0$69fa2250@servercafe> Message-ID: <39791.12.3.132.98.1075392727.squirrel@heck.bay9.com> Group, I have a long macro that opens several queries, at the end its suppose to RunCode - function, however it gives me an message "The expression you entered has a function name that xxx can't find". When I run that function separetely it works fine, and the name is spelled correctly since i didn't type it but selected it using their device what should i do ? ----------------------------------------- Get Breaking News from CNN, ABC, NBC, CBS Now. http://www.xuppa.com/news/?link=webmail From andy at minstersystems.co.uk Thu Jan 29 10:27:36 2004 From: andy at minstersystems.co.uk (Andy Lacey) Date: Thu, 29 Jan 2004 16:27:36 -0000 Subject: [AccessD] macro can't find function In-Reply-To: <39791.12.3.132.98.1075392727.squirrel@heck.bay9.com> Message-ID: <006701c3e684$cecba530$b274d0d5@minster33c3r25> Oleg In a macro the function has to be expressed as fn(), ie. no = sign before it but must have the parentheses. May be worth checking. Oh and the function must of course be Public. Andy Lacey http://www.minstersystems.co.uk > -----Original Message----- > From: accessd-bounces at databaseadvisors.com > [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of > Oleg_123 at xuppa.com > Sent: 29 January 2004 16:12 > To: accessd at databaseadvisors.com > Subject: RE: [AccessD] macro can't find function > > > Group, > > I have a long macro that opens several queries, at the end > its suppose to RunCode - function, however it gives me an > message "The expression you entered has a function name that > xxx can't find". When I run that function separetely it works > fine, and the name is spelled correctly since i didn't type > it but selected it using their device what should i do ? > > > ----------------------------------------- > Get Breaking News from CNN, ABC, NBC, CBS Now. > http://www.xuppa.com/news/?link=webmail > > > > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/a> ccessd > Website: > http://www.databaseadvisors.com > > From HollisVJ at pgdp.usec.com Thu Jan 29 10:29:16 2004 From: HollisVJ at pgdp.usec.com (Hollis,Virginia) Date: Thu, 29 Jan 2004 10:29:16 -0600 Subject: [AccessD] Code Not Working in XP Message-ID: <618EB4D6DDCDD3119B0A00508B6FD37A0CB0CFBD@cntexchange.pgdp.usec.com> I have been using the code shown below to access data on our Intranet. The code matches a field entry in the database and looks up the details. In this example it finds a stock number. Problem: The code does not work for users that are running XP. It does not do anything, it will not even try to access the web. They click the button and nothing happens. What can I do to correct this for users of XP? Virginia _____ strPath = " http://web.com/vr.asp?xml=orafin%2Stock= " strFile = strPath & Me.StockNumber If Dir(strFile) = "" Then strFile = strPath & Me.StockNumber End If Call fHandleFile(strFile, WIN_MAX) From serbach at new.rr.com Thu Jan 29 10:37:03 2004 From: serbach at new.rr.com (Steven W. Erbach) Date: Thu, 29 Jan 2004 10:37:03 -0600 Subject: [AccessD] This doesn't look right Message-ID: <20040129103703.1501118476.serbach@new.rr.com> Dear Group, I'm "re-factoring" an application that I took over from a developer who's reducing her workload to devote more time to her family. There is a query that looks curious to me and I wonder if you lot could give me some insight into how Access works. The query creates a SubTotal and has four Criteria rows and, of course, the Total line is activated. The query looks at four fields on an open form (frmReport) which feed values into the query. Two of those fields are txtLogStartDate and txtLogEndDate. The other two are txtCity and txtCounty. The four Criteria rows look at various combinations of whether txtCity and txtCounty are filled in or not on the form that feeds the query. The ArrivalDate in the query grid looks at the range of dates between txtLogStartDate and txtLogEndDate on the form. What's odd is that, at first, the ArrivalDate query column had WHERE in the Total line. The County and City columns show Group By. The range of dates is supposed to be the same for every one of the four Criteria rows...BUT with ArrivalDate set to WHERE there was only one Criteria statement in the first row of the four Criteria rows. It looked like this: Between [Forms]![frmReport]![txtLogStartDate] And [Forms]![frmReport]![txtLogEndDate] Or Between [Forms]![frmReport]![txtLogStartDate] And [Forms]![frmReport]![txtLogEndDate] Or Between [Forms]![frmReport]![txtLogStartDate] And [Forms]![frmReport]![txtLogEndDate] Or Between [Forms]![frmReport]![txtLogStartDate] And [Forms]![frmReport]![txtLogEndDate] (Sorry for the wrap) That is, that entire thing was in one cell of one row of the Criteria grid. I tried to cut and paste individual "Between" statements into each of the four rows of the Criteria grid; but when I saved the query, closed it, and re-opened it, that huge long multiple-Between statement re-appeared in just the first row of the Criteria grid. However, when I changed the ArrivalDate Total line to GROUP BY and *then* cut and paste individual Between statements into each row of the Criteria grid, when I saved, closed, and re-opened the query the Between statements stayed where they were; that is, one for each of the four rows of the Criteria grid. Now, it was obvious to me that the two forms of the query would produce different results, and that turned out to be true. My question is this: when you're putting together a multi-Criteria row query and you want one column to show the same criteria in each row, the natural thing to do is choose WHERE in the Total row. You can test the query while you're designing it and you'll get results. But when you save the query, thinking that you've done your duty, you're actually saving something incorrect since, if you don't look at it again, Access will re-format all those WHERE statements in each row of the Criteria grid into one concatenated statement in one row. I thought I knew queries pretty well, but this one throws me. In the SQL statement formed when the ArrivalDate showed WHERE, that big long concatenated multi-Between statement wound up in the WHERE clause. (Didn't matter whether the Between statements were in separate criteria rows or not.) But when I reformed the query to split the Between statements into separate Criteria rows and selected GROUP BY for the ArrivalDate column, the Between criteria wound up in the HAVING clause. I guess it's just an experience thing, right? Regards, Steve Erbach Scientific Marketing Neenah, WI 920-969-0504 Message created with Bloomba Disclaimer: No tree was killed in the transmission of this message. However, several coulombs of electrons were temporarily inconvenienced. From bchacc at san.rr.com Thu Jan 29 10:51:18 2004 From: bchacc at san.rr.com (Rocky Smolin - Beach Access Software) Date: Thu, 29 Jan 2004 08:51:18 -0800 Subject: [AccessD] Error 2468 - You can'tcarry out this action at the present time - solved References: <024001c3e610$66b99750$6601a8c0@HAL9002> Message-ID: <00ed01c3e688$1dd64bf0$6601a8c0@HAL9002> Charlotte: Well I solved it. It turns out that I'm using the ADH resizing code and had the resizer called in the open event of the subform. When I removed that one line of code, everything started to work. I have no idea why that resizing code hosed the record operations. But once I figured out it was something in the subform, I deleted all the subform code and everything worked that failed before. So then I restored the code and began to remove one module at a time and it wasn't long before I removed the OnOpen event code and everything worked. So then since there was only a few lines of code in that module, it was a simple matter to guess it was the adhScaleForm routine. Thanks for your input. Rocky ----- Original Message ----- From: "Rocky Smolin - Beach Access Software" To: "Access Developers discussion and problem solving" Sent: Wednesday, January 28, 2004 6:34 PM Subject: Re: [AccessD] Error 2468 - You can'tcarryoutthisactionatthepresenttime. > "Any way you look at it, it pays to make sure you know where you are before > you try to do anything. " > > Good advice at any time. Brain fade dictates I address this in the a.m. > Thanks for your input and have a nice night. > > Rocky > > > ----- Original Message ----- > From: "Charlotte Foust" > To: "Access Developers discussion and problem solving" > > Sent: Wednesday, January 28, 2004 5:16 PM > Subject: RE: [AccessD] Error 2468 - You > can'tcarryoutthisactionatthepresenttime. > > > > Yep, the command button wizard still writes Access 95 code. Cute, huh? > > > > Is there anything else on your form that has a connection to the same > > table the parent form is based on? If not, then you need to make sure > > there is a current record before you try deleting again. You might > > stick some debug.print code in there to print the current Me.fldPOPrefix > > or return the Me.NewRecord flag to see where you are. If you wind up on > > a new record by deleting the last record in the recordset, then you'll > > get an error if you try to go to a new record. If you're on the new > > record when you try to delete, you'll get an error because there is no > > current record. If you have started to create a new record, you can't > > delete it because it isn't saved, and you can't go to NewRecord for the > > same reason. Any way you look at it, it pays to make sure you know > > where you are before you try to do anything. > > > > Charlotte Foust > > > > -----Original Message----- > > From: Rocky Smolin - Beach Access Software [mailto:bchacc at san.rr.com] > > Sent: Wednesday, January 28, 2004 5:07 PM > > To: Access Developers discussion and problem solving > > Subject: Re: [AccessD] Error 2468 - You > > can'tcarryoutthisactionatthepresenttime. > > > > > > Trying to delete from the parent form. A parent record that has no > > child records. > > > > For delete what should I use: DoCmd.RunCommand acDeleteRecord? > > > > That code came from the command button wizard. > > > > Rocky > > > > ----- Original Message ----- > > From: "Charlotte Foust" > > To: "Access Developers discussion and problem solving" > > > > Sent: Wednesday, January 28, 2004 4:22 PM > > Subject: RE: [AccessD] Error 2468 - You can't > > carryoutthisactionatthepresenttime. > > > > > > > Ack! Lose that old A95 code, please! I can't even read it any more. > > > Comment out the SetWarnings False and see what Access tells you about > > > the operation. > > > > > > HOY! I just noticed that you appear to be running this from the > > > parent form. Which form are you trying to delete a record from? > > > > > > Charlotte Foust > > > > > > -----Original Message----- > > > From: Rocky Smolin - Beach Access Software [mailto:bchacc at san.rr.com] > > > Sent: Wednesday, January 28, 2004 4:18 PM > > > To: Access Developers discussion and problem solving > > > Subject: Re: [AccessD] Error 2468 - You can't carry > > > outthisactionatthepresenttime. > > > > > > > > > Rats. No soap. Got the error on the second delete after adding the > > > dbengineidle and the subfrm requery like this: > > > > > > > > > DoCmd.SetWarnings False > > > DoCmd.DoMenuItem acFormBar, acEditMenu, 8, , acMenuVer70 > > > DoCmd.DoMenuItem acFormBar, acEditMenu, 6, , acMenuVer70 > > > DoCmd.SetWarnings True > > > > > > DBEngine.Idle dbRefreshCache > > > > > > Me.Requery > > > Me!subfrmPODetail.Requery > > > > > > Any other ideas? > > > > > > Thanks and regards, > > > > > > Rocky > > > > > > ----- Original Message ----- > > > From: "Charlotte Foust" > > > To: "Access Developers discussion and problem solving" > > > > > > Sent: Wednesday, January 28, 2004 3:47 PM > > > Subject: RE: [AccessD] Error 2468 - You can't carry out > > > thisactionatthepresenttime. > > > > > > > > > > Rocky, > > > > > > > > I suspect you're running into an issue I've seen in somewhat similar > > > > > > circumstances, where the deletion didn't actually seem to get > > > > processed until I requeried the subform. Have you tried a > > > > DBEngine.Idle dbRefreshCache after the deletion? > > > > > > > > Charlotte Foust > > > > > > > > -----Original Message----- > > > > From: Rocky Smolin - Beach Access Software > > > > [mailto:bchacc at san.rr.com] > > > > Sent: Wednesday, January 28, 2004 2:13 PM > > > > To: Access Developers discussion and problem solving > > > > Subject: Re: [AccessD] Error 2468 - You can't carry out > > > > thisactionatthepresent time. > > > > > > > > > > > > Charlotte: > > > > > > > > Further to my reply, I found that when I did a delete then, before I > > > > > > did anything else, I went and looked in the tblPOHeader and the > > > > record > > > > > > > was still there. For some reason it's not completing the delete and > > > > > > that's why I think it's telling me that I can't make any moves at > > > > this > > > > > > > time. > > > > > > > > Rocky > > > > > > > > ----- Original Message ----- > > > > From: "Charlotte Foust" > > > > To: "Access Developers discussion and problem solving" > > > > > > > > Sent: Wednesday, January 28, 2004 1:20 PM > > > > Subject: RE: [AccessD] Error 2468 - You can't carry out this > > > > actionatthepresent time. > > > > > > > > > > > > > It sounds like you may have the parent and child forms linked to > > > > > the > > > > > > > > same dataset. Do you? > > > > > > > > > > Charlotte Foust > > > > > > > > > > -----Original Message----- > > > > > From: Rocky Smolin - Beach Access Software > > > > > [mailto:bchacc at san.rr.com] > > > > > Sent: Wednesday, January 28, 2004 1:04 PM > > > > > To: Access Developers discussion and problem solving > > > > > Subject: Re: [AccessD] Error 2468 - You can't carry out this > > > > > action atthepresent time. > > > > > > > > > > > > > > > I'm getting closer. I deleted the sub-form that on the second tab > > > > > > > of the tab form and the two deletes worked. > > > > > > > > > > It has something to do with a sub form on a tab. Any clues, > > > > > anybody? > > > > > > > > > > Rocky > > > > > > > > > > ----- Original Message ----- > > > > > From: "Joe K Anderson" > > > > > To: "Rocky Smolin - Beach Access Software" ; > > > > > > > > > > Cc: "Wayne Warren Angelucci" ; "Gordon > > > > > Bennett" ; "Barry Hynum" > > > > > ; "Dixon Foss" ; "Mark > > > > > Krisburg" > > > > > > > > > > > > > Sent: Wednesday, January 28, 2004 11:44 AM > > > > > Subject: Re: [AccessD] Error 2468 - You can't carry out this > > > > > action at thepresent time. > > > > > > > > > > > > > > > You may need to do a Requery between deletes? > > > > > > > > > > joe > > > > > ----- Original Message ----- > > > > > From: Rocky Smolin - Beach Access Software > > > > > To: Access Developers discussion and problem solving > > > > > Cc: Wayne Warren Angelucci ; Mark Krisburg ; Joe Anderson ; > > > > > Gordon > > > > > > > > Bennett ; Dixon Foss ; Bob Heygood ; Barry Hynum > > > > > Sent: 01-28-2004 11:34 > > > > > Subject: Re: [AccessD] Error 2468 - You can't carry out this > > > > > action at the present time. > > > > > > > > > > > > > > > Randall: > > > > > > > > > > Tried this experiment just to get the DAO recordset out of the > > > > > way. > > > > I > > > > > deleted all references to it. > > > > > > > > > > Then I replaced: > > > > > > > > > > 'DoCmd.SetWarnings False > > > > > 'DoCmd.DoMenuItem acFormBar, acEditMenu, 8, , acMenuVer70 > > > > > 'DoCmd.DoMenuItem acFormBar, acEditMenu, 6, , acMenuVer70 > > > > > 'DoCmd.SetWarnings True > > > > > > > > > > with > > > > > > > > > > DoCmd.RunCommand acCmdDelete > > > > > > > > > > I selected a record and ran that code which does the delete. > > > > > Then > > > > > > > > before > > > > > trying to delete the second record, I checked the table and the > > > > > record was > > > > > still there! > > > > > > > > > > So the delete (and probably other operations) are not completing > > > > > > > for > > > > > > > > > some > > > > > reason. > > > > > > > > > > Pluse, when I get the error, I have to use the task manager to > > > > > clear > > > > > > > > > access. > > > > > It won't quit, cant close any forms, etc. > > > > > > > > > > Any ideas? > > > > > > > > > > Many thanks in advance and regards, > > > > > > > > > > is > > > > > > > > > > ----- Original Message ----- > > > > > From: "Randall Anthony" > > > > > To: "'Access Developers discussion and problem solving'" > > > > > > > > > > Sent: Wednesday, January 28, 2004 10:31 AM > > > > > Subject: RE: [AccessD] Error 2468 - You can't carry out this > > > > > action at the > > > > > present time. > > > > > > > > > > > > > > > > Right off the top of my head, it has to do with the movefirst, > > > > > > > movelast. > > > > > I > > > > > > ran into this when converting A97 to A2K. Code worked in A97, > > > > > > > not > > > > > > > > > A2K and > > > > > > M$ said this was designed behavior. I'll try to find the > > > article. > > > > > > > > > > > > -----Original Message----- > > > > > > From: Rocky Smolin - Beach Access Software > > > > > [mailto:bchacc at san.rr.com] > > > > > > Sent: Wednesday, January 28, 2004 1:07 PM > > > > > > To: AccessD at databaseadvisors.com > > > > > > Subject: [AccessD] Error 2468 - You can't carry out this > > > > > action at > > > > > > > > > the > > > > > > present time. > > > > > > > > > > > > Dear List: > > > > > > > > > > > > I am getting the following error message on a bound form: > > > > > > > > > > > > Error 2468 - You can't carry out this action at the present > > > time. > > > > > > > > > > > > This form has a sub form linked to the main form by the main > > > > form's > > > > > primary > > > > > > key. (Main form is P.O. Header, subform is P.O. Detail). > > > > > > > > > > > > I get this error if I try to delete two records in a row. > > > > > > > > > > > > DoCmd.SetWarnings False > > > > > > DoCmd.DoMenuItem acFormBar, acEditMenu, 8, , acMenuVer70 > > > > > > DoCmd.DoMenuItem acFormBar, acEditMenu, 6, , acMenuVer70 > > > > > > DoCmd.SetWarnings True > > > > > > > > > > > > I also get this error after I try to add a record. The > > > > > problem started > > > > > > because I wanted to get the last PO in the file, add one to > > > > > the PO > > > > > > > > > number, > > > > > > and put the prefix and the new PO number ito the new record: > > > > > > > > > > > > DoCmd.GoToRecord , , acNewRec > > > > > > > > > > > > 'If rstPOHeader.RecordCount <> 0 Then > > > > > > ' rstPOHeader.MoveLast > > > > > > ' Me.fldPOPrefix = Nz(rstPOHeader!fldPOPrefix) > > > > > > ' If IsNumeric(rstPOHeader!fldPONumber) Then > > > > > > ' Me.fldPONumber = rstPOHeader!fldPONumber + 1 > > > > > > ' fldPOOrderDate.SetFocus > > > > > > ' Else > > > > > > ' Me.fldPONumber.SetFocus > > > > > > ' End If > > > > > > 'End If > > > > > > 'If Nz(Me.fldPOPrefix) = "" And > > Nz(rstPOHeader!fldPOPrefix) > > > = > > > > "" > > > > > Then > > > > > _ > > > > > > Me.fldPOPrefix.SetFocus > > > > > > > > > > > > Right now the code is commented out. If I uncomment the two > > > > lines: > > > > > > > > > > > > ' rstPOHeader.MoveLast > > > > > > ' Me.fldPOPrefix = Nz(rstPOHeader!fldPOPrefix) > > > > > > > > > > > > I get the error when I try to save: > > > > > > > > > > > > DoCmd.DoMenuItem acFormBar, acRecordsMenu, acSaveRecord, , > > > > > acMenuVer70 > > > > > > > > > > > > I checked the web and there is nothing. Has anyone > > > > > encountered > > > > this > > > > > before? > > > > > > > > > > > > Thanks and regards, > > > > > > > > > > > > Rocky Smolin > > > > > > Beach Access Software > > > > > > _______________________________________________ > > > > > > 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 > > > > > > > > > > > _______________________________________________ > > > > > 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 > > > > > _______________________________________________ > > > > > 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 > > > > _______________________________________________ > > > > 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 > > > _______________________________________________ > > > 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 > > _______________________________________________ > > 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 From roz.clarke at donnslaw.co.uk Thu Jan 29 10:54:02 2004 From: roz.clarke at donnslaw.co.uk (Roz Clarke) Date: Thu, 29 Jan 2004 16:54:02 -0000 Subject: [AccessD] Charts Message-ID: <61F915314798D311A2F800A0C9C83188047C6A1F@dibble.observatory.donnslaw.co.uk> Hi all. Hope everyone is well. I have a problem with a chart I need to display in Access. I used to do this by exporting data to Excel but the connection to Excel has been so slow and unstable that I am now trying to bring it within Access. The data I need to display is in a cross-tab query, where I have categories as the row header and months of the year as the column header. I need to show all the months even though we currently have data only for January. If I base the chart on the cross-tab, I cannot see a way to tell it that each column should be an axis entry. If I base the chart on a select query, it correctly allows me to set 'month' as an axis, but only shows me January. Can anyone help? TIA Roz From Oleg_123 at xuppa.com Thu Jan 29 10:52:19 2004 From: Oleg_123 at xuppa.com (Oleg_123 at xuppa.com) Date: Thu, 29 Jan 2004 11:52:19 -0500 (EST) Subject: [AccessD] macro can't find function In-Reply-To: <006701c3e684$cecba530$b274d0d5@minster33c3r25> References: <39791.12.3.132.98.1075392727.squirrel@heck.bay9.com> <006701c3e684$cecba530$b274d0d5@minster33c3r25> Message-ID: <39923.12.3.132.98.1075395139.squirrel@heck.bay9.com> it's public (of course ;-) and this is how it looks -- BreakName () i decided to try to make that macro call another macro which contains the function > Oleg > > In a macro the function has to be expressed as fn(), ie. no = sign > before it but must have the parentheses. May be worth checking. Oh and > the function must of course be Public. > > Andy Lacey > http://www.minstersystems.co.uk > >> -----Original Message----- >> From: accessd-bounces at databaseadvisors.com >> [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of >> Oleg_123 at xuppa.com >> Sent: 29 January 2004 16:12 >> To: accessd at databaseadvisors.com >> Subject: RE: [AccessD] macro can't find function >> >> >> Group, >> >> I have a long macro that opens several queries, at the end >> its suppose to RunCode - function, however it gives me an >> message "The expression you entered has a function name that >> xxx can't find". When I run that function separetely it works >> fine, and the name is spelled correctly since i didn't type >> it but selected it using their device what should i do ? >> >> >> ----------------------------------------- >> Get Breaking News from CNN, ABC, NBC, CBS Now. >> http://www.xuppa.com/news/?link=webmail >> >> >> >> _______________________________________________ >> AccessD mailing list >> AccessD at databaseadvisors.com >> http://databaseadvisors.com/mailman/listinfo/a> ccessd >> Website: >> http://www.databaseadvisors.com >> >> > > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com ----------------------------------------- Get Breaking News from CNN, ABC, NBC, CBS Now. http://www.xuppa.com/news/?link=webmail From my.lists at verizon.net Thu Jan 29 10:52:19 2004 From: my.lists at verizon.net (Francisco H Tapia) Date: Thu, 29 Jan 2004 08:52:19 -0800 Subject: [AccessD] Access as Service In-Reply-To: References: Message-ID: <40193A43.9010304@verizon.net> Access is a huge application for loading as a service... I've never attempted to set up access as a service, however I've seen many articles on the web about setting up a vb service, so try searching in codehound.com, or planet-source-code.com for those keywords... -- -Francisco ggonzalez at cccis.com wrote: > > > >Has anyone ever had to run an Access application as a service on a >computer? if so can you pint me in the direction on how I could do this. > >Thanks! > > > From rl_stewart at highstream.net Thu Jan 29 10:54:25 2004 From: rl_stewart at highstream.net (Robert L. Stewart) Date: Thu, 29 Jan 2004 10:54:25 -0600 Subject: [AccessD] Re: Error 2468 - You can't carryoutthisactionatthepresenttime In-Reply-To: <200401291635.i0TGZLm08364@databaseadvisors.com> Message-ID: <5.1.0.14.2.20040129105105.02998e38@pop3.highstream.net> Rocky, Try this: Application.RunCommand 223 Robert At 10:35 AM 1/29/2004 -0600, you wrote: >Date: Wed, 28 Jan 2004 17:06:42 -0800 >From: "Rocky Smolin - Beach Access Software" >Subject: Re: [AccessD] Error 2468 - You can't > carryoutthisactionatthepresenttime. >To: "Access Developers discussion and problem solving" > >Message-ID: <022a01c3e604$28942140$6601a8c0 at HAL9002> >Content-Type: text/plain; charset="iso-8859-1" > >Trying to delete from the parent form. A parent record that has no child >records. > >For delete what should I use: DoCmd.RunCommand acDeleteRecord? > >That code came from the command button wizard. > >Rocky From cfoust at infostatsystems.com Thu Jan 29 10:57:39 2004 From: cfoust at infostatsystems.com (Charlotte Foust) Date: Thu, 29 Jan 2004 08:57:39 -0800 Subject: [AccessD] This doesn't look right Message-ID: There's a difference between WHERE and HAVING, as you discovered. Using WHERE in a totals query doesn't include the field being evaluated in the output fields, it just filters the result based on that field. HAVING includes the field being evaluated, and that has a profound effect of the results, since you're also grouping by those fields. Charlotte Foust -----Original Message----- From: Steven W. Erbach [mailto:serbach at new.rr.com] Sent: Thursday, January 29, 2004 8:37 AM To: Access Developers discussion and problem solving Subject: [AccessD] This doesn't look right Dear Group, I'm "re-factoring" an application that I took over from a developer who's reducing her workload to devote more time to her family. There is a query that looks curious to me and I wonder if you lot could give me some insight into how Access works. The query creates a SubTotal and has four Criteria rows and, of course, the Total line is activated. The query looks at four fields on an open form (frmReport) which feed values into the query. Two of those fields are txtLogStartDate and txtLogEndDate. The other two are txtCity and txtCounty. The four Criteria rows look at various combinations of whether txtCity and txtCounty are filled in or not on the form that feeds the query. The ArrivalDate in the query grid looks at the range of dates between txtLogStartDate and txtLogEndDate on the form. What's odd is that, at first, the ArrivalDate query column had WHERE in the Total line. The County and City columns show Group By. The range of dates is supposed to be the same for every one of the four Criteria rows...BUT with ArrivalDate set to WHERE there was only one Criteria statement in the first row of the four Criteria rows. It looked like this: Between [Forms]![frmReport]![txtLogStartDate] And [Forms]![frmReport]![txtLogEndDate] Or Between [Forms]![frmReport]![txtLogStartDate] And [Forms]![frmReport]![txtLogEndDate] Or Between [Forms]![frmReport]![txtLogStartDate] And [Forms]![frmReport]![txtLogEndDate] Or Between [Forms]![frmReport]![txtLogStartDate] And [Forms]![frmReport]![txtLogEndDate] (Sorry for the wrap) That is, that entire thing was in one cell of one row of the Criteria grid. I tried to cut and paste individual "Between" statements into each of the four rows of the Criteria grid; but when I saved the query, closed it, and re-opened it, that huge long multiple-Between statement re-appeared in just the first row of the Criteria grid. However, when I changed the ArrivalDate Total line to GROUP BY and *then* cut and paste individual Between statements into each row of the Criteria grid, when I saved, closed, and re-opened the query the Between statements stayed where they were; that is, one for each of the four rows of the Criteria grid. Now, it was obvious to me that the two forms of the query would produce different results, and that turned out to be true. My question is this: when you're putting together a multi-Criteria row query and you want one column to show the same criteria in each row, the natural thing to do is choose WHERE in the Total row. You can test the query while you're designing it and you'll get results. But when you save the query, thinking that you've done your duty, you're actually saving something incorrect since, if you don't look at it again, Access will re-format all those WHERE statements in each row of the Criteria grid into one concatenated statement in one row. I thought I knew queries pretty well, but this one throws me. In the SQL statement formed when the ArrivalDate showed WHERE, that big long concatenated multi-Between statement wound up in the WHERE clause. (Didn't matter whether the Between statements were in separate criteria rows or not.) But when I reformed the query to split the Between statements into separate Criteria rows and selected GROUP BY for the ArrivalDate column, the Between criteria wound up in the HAVING clause. I guess it's just an experience thing, right? Regards, Steve Erbach Scientific Marketing Neenah, WI 920-969-0504 Message created with Bloomba Disclaimer: No tree was killed in the transmission of this message. However, several coulombs of electrons were temporarily inconvenienced. _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From cfoust at infostatsystems.com Thu Jan 29 10:58:54 2004 From: cfoust at infostatsystems.com (Charlotte Foust) Date: Thu, 29 Jan 2004 08:58:54 -0800 Subject: [AccessD] Error 2468 - You can'tcarry out this action at thepresent time - solved Message-ID: Glad you got it solved. Sometimes the obvious gets overlooked. Charlotte Foust -----Original Message----- From: Rocky Smolin - Beach Access Software [mailto:bchacc at san.rr.com] Sent: Thursday, January 29, 2004 8:51 AM To: Access Developers discussion and problem solving Subject: Re: [AccessD] Error 2468 - You can'tcarry out this action at thepresent time - solved Charlotte: Well I solved it. It turns out that I'm using the ADH resizing code and had the resizer called in the open event of the subform. When I removed that one line of code, everything started to work. I have no idea why that resizing code hosed the record operations. But once I figured out it was something in the subform, I deleted all the subform code and everything worked that failed before. So then I restored the code and began to remove one module at a time and it wasn't long before I removed the OnOpen event code and everything worked. So then since there was only a few lines of code in that module, it was a simple matter to guess it was the adhScaleForm routine. Thanks for your input. Rocky ----- Original Message ----- From: "Rocky Smolin - Beach Access Software" To: "Access Developers discussion and problem solving" Sent: Wednesday, January 28, 2004 6:34 PM Subject: Re: [AccessD] Error 2468 - You can'tcarryoutthisactionatthepresenttime. > "Any way you look at it, it pays to make sure you know where you are before > you try to do anything. " > > Good advice at any time. Brain fade dictates I address this in the > a.m. Thanks for your input and have a nice night. > > Rocky > > > ----- Original Message ----- > From: "Charlotte Foust" > To: "Access Developers discussion and problem solving" > > Sent: Wednesday, January 28, 2004 5:16 PM > Subject: RE: [AccessD] Error 2468 - You > can'tcarryoutthisactionatthepresenttime. > > > > Yep, the command button wizard still writes Access 95 code. Cute, > > huh? > > > > Is there anything else on your form that has a connection to the > > same table the parent form is based on? If not, then you need to > > make sure there is a current record before you try deleting again. > > You might stick some debug.print code in there to print the current > > Me.fldPOPrefix or return the Me.NewRecord flag to see where you are. > > If you wind up on a new record by deleting the last record in the > > recordset, then you'll get an error if you try to go to a new > > record. If you're on the new record when you try to delete, you'll get an error because there is no > > current record. If you have started to create a new record, you can't > > delete it because it isn't saved, and you can't go to NewRecord for > > the same reason. Any way you look at it, it pays to make sure you > > know where you are before you try to do anything. > > > > Charlotte Foust > > > > -----Original Message----- > > From: Rocky Smolin - Beach Access Software > > [mailto:bchacc at san.rr.com] > > Sent: Wednesday, January 28, 2004 5:07 PM > > To: Access Developers discussion and problem solving > > Subject: Re: [AccessD] Error 2468 - You > > can'tcarryoutthisactionatthepresenttime. > > > > > > Trying to delete from the parent form. A parent record that has no > > child records. > > > > For delete what should I use: DoCmd.RunCommand acDeleteRecord? > > > > That code came from the command button wizard. > > > > Rocky > > > > ----- Original Message ----- > > From: "Charlotte Foust" > > To: "Access Developers discussion and problem solving" > > > > Sent: Wednesday, January 28, 2004 4:22 PM > > Subject: RE: [AccessD] Error 2468 - You can't > > carryoutthisactionatthepresenttime. > > > > > > > Ack! Lose that old A95 code, please! I can't even read it any > > > more. Comment out the SetWarnings False and see what Access tells > > > you about the operation. > > > > > > HOY! I just noticed that you appear to be running this from the > > > parent form. Which form are you trying to delete a record from? > > > > > > Charlotte Foust > > > > > > -----Original Message----- > > > From: Rocky Smolin - Beach Access Software > > > [mailto:bchacc at san.rr.com] > > > Sent: Wednesday, January 28, 2004 4:18 PM > > > To: Access Developers discussion and problem solving > > > Subject: Re: [AccessD] Error 2468 - You can't carry > > > outthisactionatthepresenttime. > > > > > > > > > Rats. No soap. Got the error on the second delete after adding > > > the dbengineidle and the subfrm requery like this: > > > > > > > > > DoCmd.SetWarnings False > > > DoCmd.DoMenuItem acFormBar, acEditMenu, 8, , acMenuVer70 > > > DoCmd.DoMenuItem acFormBar, acEditMenu, 6, , acMenuVer70 > > > DoCmd.SetWarnings True > > > > > > DBEngine.Idle dbRefreshCache > > > > > > Me.Requery > > > Me!subfrmPODetail.Requery > > > > > > Any other ideas? > > > > > > Thanks and regards, > > > > > > Rocky > > > > > > ----- Original Message ----- > > > From: "Charlotte Foust" > > > To: "Access Developers discussion and problem solving" > > > > > > Sent: Wednesday, January 28, 2004 3:47 PM > > > Subject: RE: [AccessD] Error 2468 - You can't carry out > > > thisactionatthepresenttime. > > > > > > > > > > Rocky, > > > > > > > > I suspect you're running into an issue I've seen in somewhat > > > > similar > > > > > > circumstances, where the deletion didn't actually seem to get > > > > processed until I requeried the subform. Have you tried a > > > > DBEngine.Idle dbRefreshCache after the deletion? > > > > > > > > Charlotte Foust > > > > > > > > -----Original Message----- > > > > From: Rocky Smolin - Beach Access Software > > > > [mailto:bchacc at san.rr.com] > > > > Sent: Wednesday, January 28, 2004 2:13 PM > > > > To: Access Developers discussion and problem solving > > > > Subject: Re: [AccessD] Error 2468 - You can't carry out > > > > thisactionatthepresent time. > > > > > > > > > > > > Charlotte: > > > > > > > > Further to my reply, I found that when I did a delete then, > > > > before I > > > > > > did anything else, I went and looked in the tblPOHeader and the > > > > record > > > > > > > was still there. For some reason it's not completing the delete > > > > and > > > > > > that's why I think it's telling me that I can't make any moves > > > > at this > > > > > > > time. > > > > > > > > Rocky > > > > > > > > ----- Original Message ----- > > > > From: "Charlotte Foust" > > > > To: "Access Developers discussion and problem solving" > > > > > > > > Sent: Wednesday, January 28, 2004 1:20 PM > > > > Subject: RE: [AccessD] Error 2468 - You can't carry out this > > > > actionatthepresent time. > > > > > > > > > > > > > It sounds like you may have the parent and child forms linked > > > > > to the > > > > > > > > same dataset. Do you? > > > > > > > > > > Charlotte Foust > > > > > > > > > > -----Original Message----- > > > > > From: Rocky Smolin - Beach Access Software > > > > > [mailto:bchacc at san.rr.com] > > > > > Sent: Wednesday, January 28, 2004 1:04 PM > > > > > To: Access Developers discussion and problem solving > > > > > Subject: Re: [AccessD] Error 2468 - You can't carry out this > > > > > action atthepresent time. > > > > > > > > > > > > > > > I'm getting closer. I deleted the sub-form that on the second > > > > > tab > > > > > > > of the tab form and the two deletes worked. > > > > > > > > > > It has something to do with a sub form on a tab. Any clues, > > > > > anybody? > > > > > > > > > > Rocky > > > > > > > > > > ----- Original Message ----- > > > > > From: "Joe K Anderson" > > > > > To: "Rocky Smolin - Beach Access Software" > > > > > ; > > > > > Cc: "Wayne Warren Angelucci" ; > > > > > "Gordon Bennett" ; "Barry > > > > > Hynum" ; "Dixon Foss" ; > > > > > "Mark Krisburg" > > > > > > > > > > > > > Sent: Wednesday, January 28, 2004 11:44 AM > > > > > Subject: Re: [AccessD] Error 2468 - You can't carry out this > > > > > action at thepresent time. > > > > > > > > > > > > > > > You may need to do a Requery between deletes? > > > > > > > > > > joe > > > > > ----- Original Message ----- > > > > > From: Rocky Smolin - Beach Access Software > > > > > To: Access Developers discussion and problem solving > > > > > Cc: Wayne Warren Angelucci ; Mark Krisburg ; Joe Anderson ; > > > > > Gordon > > > > > > > > Bennett ; Dixon Foss ; Bob Heygood ; Barry Hynum > > > > > Sent: 01-28-2004 11:34 > > > > > Subject: Re: [AccessD] Error 2468 - You can't carry out this > > > > > action at the present time. > > > > > > > > > > > > > > > Randall: > > > > > > > > > > Tried this experiment just to get the DAO recordset out of > > > > > the way. > > > > I > > > > > deleted all references to it. > > > > > > > > > > Then I replaced: > > > > > > > > > > 'DoCmd.SetWarnings False > > > > > 'DoCmd.DoMenuItem acFormBar, acEditMenu, 8, , acMenuVer70 > > > > > 'DoCmd.DoMenuItem acFormBar, acEditMenu, 6, , acMenuVer70 > > > > > 'DoCmd.SetWarnings True > > > > > > > > > > with > > > > > > > > > > DoCmd.RunCommand acCmdDelete > > > > > > > > > > I selected a record and ran that code which does the delete. > > > > > Then > > > > > > > > before > > > > > trying to delete the second record, I checked the table and > > > > > the record was > > > > > still there! > > > > > > > > > > So the delete (and probably other operations) are not > > > > > completing > > > > > > > for > > > > > > > > > some > > > > > reason. > > > > > > > > > > Pluse, when I get the error, I have to use the task manager > > > > > to clear > > > > > > > > > access. > > > > > It won't quit, cant close any forms, etc. > > > > > > > > > > Any ideas? > > > > > > > > > > Many thanks in advance and regards, > > > > > > > > > > is > > > > > > > > > > ----- Original Message ----- > > > > > From: "Randall Anthony" > > > > > To: "'Access Developers discussion and problem solving'" > > > > > > > > > > Sent: Wednesday, January 28, 2004 10:31 AM > > > > > Subject: RE: [AccessD] Error 2468 - You can't carry out this > > > > > action at the > > > > > present time. > > > > > > > > > > > > > > > > Right off the top of my head, it has to do with the > > > > > movefirst, > > > > > > > movelast. > > > > > I > > > > > > ran into this when converting A97 to A2K. Code worked in > > > > > A97, > > > > > > > not > > > > > > > > > A2K and > > > > > > M$ said this was designed behavior. I'll try to find the > > > article. > > > > > > > > > > > > -----Original Message----- > > > > > > From: Rocky Smolin - Beach Access Software > > > > > [mailto:bchacc at san.rr.com] > > > > > > Sent: Wednesday, January 28, 2004 1:07 PM > > > > > > To: AccessD at databaseadvisors.com > > > > > > Subject: [AccessD] Error 2468 - You can't carry out this > > > > > action at > > > > > > > > > the > > > > > > present time. > > > > > > > > > > > > Dear List: > > > > > > > > > > > > I am getting the following error message on a bound form: > > > > > > > > > > > > Error 2468 - You can't carry out this action at the > > > > > present > > > time. > > > > > > > > > > > > This form has a sub form linked to the main form by the > > > > > main > > > > form's > > > > > primary > > > > > > key. (Main form is P.O. Header, subform is P.O. Detail). > > > > > > > > > > > > I get this error if I try to delete two records in a row. > > > > > > > > > > > > DoCmd.SetWarnings False > > > > > > DoCmd.DoMenuItem acFormBar, acEditMenu, 8, , acMenuVer70 > > > > > > DoCmd.DoMenuItem acFormBar, acEditMenu, 6, , acMenuVer70 > > > > > > DoCmd.SetWarnings True > > > > > > > > > > > > I also get this error after I try to add a record. The > > > > > problem started > > > > > > because I wanted to get the last PO in the file, add one > > > > > to the PO > > > > > > > > > number, > > > > > > and put the prefix and the new PO number ito the new record: > > > > > > > > > > > > DoCmd.GoToRecord , , acNewRec > > > > > > > > > > > > 'If rstPOHeader.RecordCount <> 0 Then > > > > > > ' rstPOHeader.MoveLast > > > > > > ' Me.fldPOPrefix = Nz(rstPOHeader!fldPOPrefix) > > > > > > ' If IsNumeric(rstPOHeader!fldPONumber) Then > > > > > > ' Me.fldPONumber = rstPOHeader!fldPONumber + 1 > > > > > > ' fldPOOrderDate.SetFocus > > > > > > ' Else > > > > > > ' Me.fldPONumber.SetFocus > > > > > > ' End If > > > > > > 'End If > > > > > > 'If Nz(Me.fldPOPrefix) = "" And > > Nz(rstPOHeader!fldPOPrefix) > > > = > > > > "" > > > > > Then > > > > > _ > > > > > > Me.fldPOPrefix.SetFocus > > > > > > > > > > > > Right now the code is commented out. If I uncomment the > > > > > two > > > > lines: > > > > > > > > > > > > ' rstPOHeader.MoveLast > > > > > > ' Me.fldPOPrefix = Nz(rstPOHeader!fldPOPrefix) > > > > > > > > > > > > I get the error when I try to save: > > > > > > > > > > > > DoCmd.DoMenuItem acFormBar, acRecordsMenu, acSaveRecord, , > > > > > acMenuVer70 > > > > > > > > > > > > I checked the web and there is nothing. Has anyone > > > > > encountered > > > > this > > > > > before? > > > > > > > > > > > > Thanks and regards, > > > > > > > > > > > > Rocky Smolin > > > > > > Beach Access Software > > > > > > _______________________________________________ > > > > > > 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 > > > > > > > > > > > _______________________________________________ > > > > > 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 > > > > > _______________________________________________ > > > > > 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 > > > > _______________________________________________ > > > > 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 > > > _______________________________________________ > > > 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 > > _______________________________________________ > > 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 _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From bchacc at san.rr.com Thu Jan 29 11:02:59 2004 From: bchacc at san.rr.com (Rocky Smolin - Beach Access Software) Date: Thu, 29 Jan 2004 09:02:59 -0800 Subject: [AccessD] Error 2468 - You can'tcarry out this action at thepresent time - solved References: <024001c3e610$66b99750$6601a8c0@HAL9002> <00ed01c3e688$1dd64bf0$6601a8c0@HAL9002> Message-ID: <011401c3e689$bf9273a0$6601a8c0@HAL9002> Uh-oh. Write in haste. Repent at leisure. Can now add multiple POs but deletes still do not work. Back to the drawing board. Rocky ----- Original Message ----- From: "Rocky Smolin - Beach Access Software" To: "Access Developers discussion and problem solving" Sent: Thursday, January 29, 2004 8:51 AM Subject: Re: [AccessD] Error 2468 - You can'tcarry out this action at thepresent time - solved > Charlotte: > > Well I solved it. It turns out that I'm using the ADH resizing code and had > the resizer called in the open event of the subform. When I removed that > one line of code, everything started to work. I have no idea why that > resizing code hosed the record operations. > > But once I figured out it was something in the subform, I deleted all the > subform code and everything worked that failed before. So then I restored > the code and began to remove one module at a time and it wasn't long before > I removed the OnOpen event code and everything worked. So then since there > was only a few lines of code in that module, it was a simple matter to guess > it was the adhScaleForm routine. > > Thanks for your input. > > Rocky > > ----- Original Message ----- > From: "Rocky Smolin - Beach Access Software" > To: "Access Developers discussion and problem solving" > > Sent: Wednesday, January 28, 2004 6:34 PM > Subject: Re: [AccessD] Error 2468 - You > can'tcarryoutthisactionatthepresenttime. > > > > "Any way you look at it, it pays to make sure you know where you are > before > > you try to do anything. " > > > > Good advice at any time. Brain fade dictates I address this in the a.m. > > Thanks for your input and have a nice night. > > > > Rocky > > > > > > ----- Original Message ----- > > From: "Charlotte Foust" > > To: "Access Developers discussion and problem solving" > > > > Sent: Wednesday, January 28, 2004 5:16 PM > > Subject: RE: [AccessD] Error 2468 - You > > can'tcarryoutthisactionatthepresenttime. > > > > > > > Yep, the command button wizard still writes Access 95 code. Cute, huh? > > > > > > Is there anything else on your form that has a connection to the same > > > table the parent form is based on? If not, then you need to make sure > > > there is a current record before you try deleting again. You might > > > stick some debug.print code in there to print the current Me.fldPOPrefix > > > or return the Me.NewRecord flag to see where you are. If you wind up on > > > a new record by deleting the last record in the recordset, then you'll > > > get an error if you try to go to a new record. If you're on the new > > > record when you try to delete, you'll get an error because there is no > > > current record. If you have started to create a new record, you can't > > > delete it because it isn't saved, and you can't go to NewRecord for the > > > same reason. Any way you look at it, it pays to make sure you know > > > where you are before you try to do anything. > > > > > > Charlotte Foust > > > > > > -----Original Message----- > > > From: Rocky Smolin - Beach Access Software [mailto:bchacc at san.rr.com] > > > Sent: Wednesday, January 28, 2004 5:07 PM > > > To: Access Developers discussion and problem solving > > > Subject: Re: [AccessD] Error 2468 - You > > > can'tcarryoutthisactionatthepresenttime. > > > > > > > > > Trying to delete from the parent form. A parent record that has no > > > child records. > > > > > > For delete what should I use: DoCmd.RunCommand acDeleteRecord? > > > > > > That code came from the command button wizard. > > > > > > Rocky > > > > > > ----- Original Message ----- > > > From: "Charlotte Foust" > > > To: "Access Developers discussion and problem solving" > > > > > > Sent: Wednesday, January 28, 2004 4:22 PM > > > Subject: RE: [AccessD] Error 2468 - You can't > > > carryoutthisactionatthepresenttime. > > > > > > > > > > Ack! Lose that old A95 code, please! I can't even read it any more. > > > > Comment out the SetWarnings False and see what Access tells you about > > > > the operation. > > > > > > > > HOY! I just noticed that you appear to be running this from the > > > > parent form. Which form are you trying to delete a record from? > > > > > > > > Charlotte Foust > > > > > > > > -----Original Message----- > > > > From: Rocky Smolin - Beach Access Software [mailto:bchacc at san.rr.com] > > > > Sent: Wednesday, January 28, 2004 4:18 PM > > > > To: Access Developers discussion and problem solving > > > > Subject: Re: [AccessD] Error 2468 - You can't carry > > > > outthisactionatthepresenttime. > > > > > > > > > > > > Rats. No soap. Got the error on the second delete after adding the > > > > dbengineidle and the subfrm requery like this: > > > > > > > > > > > > DoCmd.SetWarnings False > > > > DoCmd.DoMenuItem acFormBar, acEditMenu, 8, , acMenuVer70 > > > > DoCmd.DoMenuItem acFormBar, acEditMenu, 6, , acMenuVer70 > > > > DoCmd.SetWarnings True > > > > > > > > DBEngine.Idle dbRefreshCache > > > > > > > > Me.Requery > > > > Me!subfrmPODetail.Requery > > > > > > > > Any other ideas? > > > > > > > > Thanks and regards, > > > > > > > > Rocky > > > > > > > > ----- Original Message ----- > > > > From: "Charlotte Foust" > > > > To: "Access Developers discussion and problem solving" > > > > > > > > Sent: Wednesday, January 28, 2004 3:47 PM > > > > Subject: RE: [AccessD] Error 2468 - You can't carry out > > > > thisactionatthepresenttime. > > > > > > > > > > > > > Rocky, > > > > > > > > > > I suspect you're running into an issue I've seen in somewhat similar > > > > > > > > circumstances, where the deletion didn't actually seem to get > > > > > processed until I requeried the subform. Have you tried a > > > > > DBEngine.Idle dbRefreshCache after the deletion? > > > > > > > > > > Charlotte Foust > > > > > > > > > > -----Original Message----- > > > > > From: Rocky Smolin - Beach Access Software > > > > > [mailto:bchacc at san.rr.com] > > > > > Sent: Wednesday, January 28, 2004 2:13 PM > > > > > To: Access Developers discussion and problem solving > > > > > Subject: Re: [AccessD] Error 2468 - You can't carry out > > > > > thisactionatthepresent time. > > > > > > > > > > > > > > > Charlotte: > > > > > > > > > > Further to my reply, I found that when I did a delete then, before I > > > > > > > > did anything else, I went and looked in the tblPOHeader and the > > > > > record > > > > > > > > > was still there. For some reason it's not completing the delete and > > > > > > > > that's why I think it's telling me that I can't make any moves at > > > > > this > > > > > > > > > time. > > > > > > > > > > Rocky > > > > > > > > > > ----- Original Message ----- > > > > > From: "Charlotte Foust" > > > > > To: "Access Developers discussion and problem solving" > > > > > > > > > > Sent: Wednesday, January 28, 2004 1:20 PM > > > > > Subject: RE: [AccessD] Error 2468 - You can't carry out this > > > > > actionatthepresent time. > > > > > > > > > > > > > > > > It sounds like you may have the parent and child forms linked to > > > > > > the > > > > > > > > > > same dataset. Do you? > > > > > > > > > > > > Charlotte Foust > > > > > > > > > > > > -----Original Message----- > > > > > > From: Rocky Smolin - Beach Access Software > > > > > > [mailto:bchacc at san.rr.com] > > > > > > Sent: Wednesday, January 28, 2004 1:04 PM > > > > > > To: Access Developers discussion and problem solving > > > > > > Subject: Re: [AccessD] Error 2468 - You can't carry out this > > > > > > action atthepresent time. > > > > > > > > > > > > > > > > > > I'm getting closer. I deleted the sub-form that on the second tab > > > > > > > > > of the tab form and the two deletes worked. > > > > > > > > > > > > It has something to do with a sub form on a tab. Any clues, > > > > > > anybody? > > > > > > > > > > > > Rocky > > > > > > > > > > > > ----- Original Message ----- > > > > > > From: "Joe K Anderson" > > > > > > To: "Rocky Smolin - Beach Access Software" ; > > > > > > > > > > > > Cc: "Wayne Warren Angelucci" ; "Gordon > > > > > > Bennett" ; "Barry Hynum" > > > > > > ; "Dixon Foss" ; "Mark > > > > > > Krisburg" > > > > > > > > > > > > > > > > Sent: Wednesday, January 28, 2004 11:44 AM > > > > > > Subject: Re: [AccessD] Error 2468 - You can't carry out this > > > > > > action at thepresent time. > > > > > > > > > > > > > > > > > > You may need to do a Requery between deletes? > > > > > > > > > > > > joe > > > > > > ----- Original Message ----- > > > > > > From: Rocky Smolin - Beach Access Software > > > > > > To: Access Developers discussion and problem solving > > > > > > Cc: Wayne Warren Angelucci ; Mark Krisburg ; Joe Anderson ; > > > > > > Gordon > > > > > > > > > > Bennett ; Dixon Foss ; Bob Heygood ; Barry Hynum > > > > > > Sent: 01-28-2004 11:34 > > > > > > Subject: Re: [AccessD] Error 2468 - You can't carry out this > > > > > > action at the present time. > > > > > > > > > > > > > > > > > > Randall: > > > > > > > > > > > > Tried this experiment just to get the DAO recordset out of the > > > > > > way. > > > > > I > > > > > > deleted all references to it. > > > > > > > > > > > > Then I replaced: > > > > > > > > > > > > 'DoCmd.SetWarnings False > > > > > > 'DoCmd.DoMenuItem acFormBar, acEditMenu, 8, , acMenuVer70 > > > > > > 'DoCmd.DoMenuItem acFormBar, acEditMenu, 6, , acMenuVer70 > > > > > > 'DoCmd.SetWarnings True > > > > > > > > > > > > with > > > > > > > > > > > > DoCmd.RunCommand acCmdDelete > > > > > > > > > > > > I selected a record and ran that code which does the delete. > > > > > > Then > > > > > > > > > > before > > > > > > trying to delete the second record, I checked the table and the > > > > > > record was > > > > > > still there! > > > > > > > > > > > > So the delete (and probably other operations) are not completing > > > > > > > > > for > > > > > > > > > > > some > > > > > > reason. > > > > > > > > > > > > Pluse, when I get the error, I have to use the task manager to > > > > > > clear > > > > > > > > > > > access. > > > > > > It won't quit, cant close any forms, etc. > > > > > > > > > > > > Any ideas? > > > > > > > > > > > > Many thanks in advance and regards, > > > > > > > > > > > > is > > > > > > > > > > > > ----- Original Message ----- > > > > > > From: "Randall Anthony" > > > > > > To: "'Access Developers discussion and problem solving'" > > > > > > > > > > > > Sent: Wednesday, January 28, 2004 10:31 AM > > > > > > Subject: RE: [AccessD] Error 2468 - You can't carry out this > > > > > > action at the > > > > > > present time. > > > > > > > > > > > > > > > > > > > Right off the top of my head, it has to do with the movefirst, > > > > > > > > > movelast. > > > > > > I > > > > > > > ran into this when converting A97 to A2K. Code worked in A97, > > > > > > > > > not > > > > > > > > > > > A2K and > > > > > > > M$ said this was designed behavior. I'll try to find the > > > > article. > > > > > > > > > > > > > > -----Original Message----- > > > > > > > From: Rocky Smolin - Beach Access Software > > > > > > [mailto:bchacc at san.rr.com] > > > > > > > Sent: Wednesday, January 28, 2004 1:07 PM > > > > > > > To: AccessD at databaseadvisors.com > > > > > > > Subject: [AccessD] Error 2468 - You can't carry out this > > > > > > action at > > > > > > > > > > > the > > > > > > > present time. > > > > > > > > > > > > > > Dear List: > > > > > > > > > > > > > > I am getting the following error message on a bound form: > > > > > > > > > > > > > > Error 2468 - You can't carry out this action at the present > > > > time. > > > > > > > > > > > > > > This form has a sub form linked to the main form by the main > > > > > form's > > > > > > primary > > > > > > > key. (Main form is P.O. Header, subform is P.O. Detail). > > > > > > > > > > > > > > I get this error if I try to delete two records in a row. > > > > > > > > > > > > > > DoCmd.SetWarnings False > > > > > > > DoCmd.DoMenuItem acFormBar, acEditMenu, 8, , acMenuVer70 > > > > > > > DoCmd.DoMenuItem acFormBar, acEditMenu, 6, , acMenuVer70 > > > > > > > DoCmd.SetWarnings True > > > > > > > > > > > > > > I also get this error after I try to add a record. The > > > > > > problem started > > > > > > > because I wanted to get the last PO in the file, add one to > > > > > > the PO > > > > > > > > > > > number, > > > > > > > and put the prefix and the new PO number ito the new record: > > > > > > > > > > > > > > DoCmd.GoToRecord , , acNewRec > > > > > > > > > > > > > > 'If rstPOHeader.RecordCount <> 0 Then > > > > > > > ' rstPOHeader.MoveLast > > > > > > > ' Me.fldPOPrefix = Nz(rstPOHeader!fldPOPrefix) > > > > > > > ' If IsNumeric(rstPOHeader!fldPONumber) Then > > > > > > > ' Me.fldPONumber = rstPOHeader!fldPONumber + 1 > > > > > > > ' fldPOOrderDate.SetFocus > > > > > > > ' Else > > > > > > > ' Me.fldPONumber.SetFocus > > > > > > > ' End If > > > > > > > 'End If > > > > > > > 'If Nz(Me.fldPOPrefix) = "" And > > > Nz(rstPOHeader!fldPOPrefix) > > > > = > > > > > "" > > > > > > Then > > > > > > _ > > > > > > > Me.fldPOPrefix.SetFocus > > > > > > > > > > > > > > Right now the code is commented out. If I uncomment the two > > > > > lines: > > > > > > > > > > > > > > ' rstPOHeader.MoveLast > > > > > > > ' Me.fldPOPrefix = Nz(rstPOHeader!fldPOPrefix) > > > > > > > > > > > > > > I get the error when I try to save: > > > > > > > > > > > > > > DoCmd.DoMenuItem acFormBar, acRecordsMenu, acSaveRecord, , > > > > > > acMenuVer70 > > > > > > > > > > > > > > I checked the web and there is nothing. Has anyone > > > > > > encountered > > > > > this > > > > > > before? > > > > > > > > > > > > > > Thanks and regards, > > > > > > > > > > > > > > Rocky Smolin > > > > > > > Beach Access Software > > > > > > > _______________________________________________ > > > > > > > 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 > > > > > > > > > > > > > _______________________________________________ > > > > > > 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 > > > > > > _______________________________________________ > > > > > > 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 > > > > > _______________________________________________ > > > > > 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 > > > > _______________________________________________ > > > > 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 > > > _______________________________________________ > > > 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 > > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com > From Lambert.Heenan at AIG.com Thu Jan 29 11:08:00 2004 From: Lambert.Heenan at AIG.com (Heenan, Lambert) Date: Thu, 29 Jan 2004 12:08:00 -0500 Subject: [AccessD] macro can't find function Message-ID: <8B98F8EA48F8BA47A2F24E0D0AF40CF407AD7D71@xlivmbx12.aig.com> I'd suggest you get rid of the space between "BreakName" and the opening parentheses. Lambert > -----Original Message----- > From: Oleg_123 at xuppa.com [SMTP:Oleg_123 at xuppa.com] > Sent: Thursday, January 29, 2004 11:52 AM > To: accessd at databaseadvisors.com > Subject: RE: [AccessD] macro can't find function > > it's public (of course ;-) > and this is how it looks -- BreakName () > > i decided to try to make that macro call another macro which contains the > function > > > Oleg > > > > In a macro the function has to be expressed as fn(), ie. no = sign > > before it but must have the parentheses. May be worth checking. Oh and > > the function must of course be Public. > > > > Andy Lacey > > http://www.minstersystems.co.uk > > > >> -----Original Message----- > >> From: accessd-bounces at databaseadvisors.com > >> [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of > >> Oleg_123 at xuppa.com > >> Sent: 29 January 2004 16:12 > >> To: accessd at databaseadvisors.com > >> Subject: RE: [AccessD] macro can't find function > >> > >> > >> Group, > >> > >> I have a long macro that opens several queries, at the end > >> its suppose to RunCode - function, however it gives me an > >> message "The expression you entered has a function name that > >> xxx can't find". When I run that function separetely it works > >> fine, and the name is spelled correctly since i didn't type > >> it but selected it using their device what should i do ? > >> > >> > >> ----------------------------------------- > >> Get Breaking News from CNN, ABC, NBC, CBS Now. > >> http://www.xuppa.com/news/?link=webmail > >> > >> > >> > >> _______________________________________________ > >> AccessD mailing list > >> AccessD at databaseadvisors.com > >> http://databaseadvisors.com/mailman/listinfo/a> ccessd > >> Website: > >> http://www.databaseadvisors.com > >> > >> > > > > _______________________________________________ > > AccessD mailing list > > AccessD at databaseadvisors.com > > http://databaseadvisors.com/mailman/listinfo/accessd > > Website: http://www.databaseadvisors.com > > > > ----------------------------------------- > Get Breaking News from CNN, ABC, NBC, CBS Now. > http://www.xuppa.com/news/?link=webmail > > > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com From Erwin.Craps at ithelps.be Thu Jan 29 11:12:08 2004 From: Erwin.Craps at ithelps.be (Erwin Craps - IT Helps) Date: Thu, 29 Jan 2004 18:12:08 +0100 Subject: [AccessD] Code Not Working in XP Message-ID: <46B976F2B698FF46A4FE7636509B22DF03D1A8@stekelbes.ithelps.local> What the code in fHandleFile? -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Hollis,Virginia Sent: Thursday, January 29, 2004 5:29 PM To: 'accessD at databaseadvisors.com' Subject: [AccessD] Code Not Working in XP I have been using the code shown below to access data on our Intranet. The code matches a field entry in the database and looks up the details. In this example it finds a stock number. Problem: The code does not work for users that are running XP. It does not do anything, it will not even try to access the web. They click the button and nothing happens. What can I do to correct this for users of XP? Virginia _____ strPath = " http://web.com/vr.asp?xml=orafin%2Stock= " strFile = strPath & Me.StockNumber If Dir(strFile) = "" Then strFile = strPath & Me.StockNumber End If Call fHandleFile(strFile, WIN_MAX) _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From andy at minstersystems.co.uk Thu Jan 29 11:14:19 2004 From: andy at minstersystems.co.uk (Andy Lacey) Date: Thu, 29 Jan 2004 17:14:19 -0000 Subject: [AccessD] macro can't find function In-Reply-To: <8B98F8EA48F8BA47A2F24E0D0AF40CF407AD7D71@xlivmbx12.aig.com> Message-ID: <007101c3e68b$55342830$b274d0d5@minster33c3r25> Beat me to it Lambert :-) Andy Lacey http://www.minstersystems.co.uk > -----Original Message----- > From: accessd-bounces at databaseadvisors.com > [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of > Heenan, Lambert > Sent: 29 January 2004 17:08 > To: 'Access Developers discussion and problem solving' > Subject: RE: [AccessD] macro can't find function > > > I'd suggest you get rid of the space between "BreakName" and > the opening parentheses. > > Lambert > > > -----Original Message----- > > From: Oleg_123 at xuppa.com [SMTP:Oleg_123 at xuppa.com] > > Sent: Thursday, January 29, 2004 11:52 AM > > To: accessd at databaseadvisors.com > > Subject: RE: [AccessD] macro can't find function > > > > it's public (of course ;-) > > and this is how it looks -- BreakName () > > > > i decided to try to make that macro call another macro > which contains > > the function > > > > > Oleg > > > > > > In a macro the function has to be expressed as fn(), ie. > no = sign > > > before it but must have the parentheses. May be worth > checking. Oh > > > and the function must of course be Public. > > > > > > Andy Lacey > > > http://www.minstersystems.co.uk > > > > > >> -----Original Message----- > > >> From: accessd-bounces at databaseadvisors.com > > >> [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of > > >> Oleg_123 at xuppa.com > > >> Sent: 29 January 2004 16:12 > > >> To: accessd at databaseadvisors.com > > >> Subject: RE: [AccessD] macro can't find function > > >> > > >> > > >> Group, > > >> > > >> I have a long macro that opens several queries, at the end its > > >> suppose to RunCode - function, however it gives me an > message "The > > >> expression you entered has a function name that xxx can't find". > > >> When I run that function separetely it works fine, and > the name is > > >> spelled correctly since i didn't type it but selected it using > > >> their device what should i do ? > > >> > > >> > > >> ----------------------------------------- > > >> Get Breaking News from CNN, ABC, NBC, CBS Now. > > >> http://www.xuppa.com/news/?link=webmail > > >> > > >> > > >> > > >> _______________________________________________ > > >> AccessD mailing list > > >> AccessD at databaseadvisors.com > > >> http://databaseadvisors.com/mailman/listinfo/a> ccessd > > >> Website: > > >> http://www.databaseadvisors.com > > >> > > >> > > > > > > _______________________________________________ > > > AccessD mailing list > > > AccessD at databaseadvisors.com > > > http://databaseadvisors.com/mailman/listinfo/accessd > > > Website: http://www.databaseadvisors.com > > > > > > > > ----------------------------------------- > > Get Breaking News from CNN, ABC, NBC, CBS Now. > > http://www.xuppa.com/news/?link=webmail > > > > > > _______________________________________________ > > 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/a> ccessd > Website: > http://www.databaseadvisors.com > > From serbach at new.rr.com Thu Jan 29 11:21:44 2004 From: serbach at new.rr.com (Steven W. Erbach) Date: Thu, 29 Jan 2004 11:21:44 -0600 Subject: [AccessD] This doesn't look right Message-ID: <20040129112144.741233039.serbach@new.rr.com> Charlotte, >> HAVING includes the field being evaluated, and that has a profound effect of the results, since you're also grouping by those fields. << Very succinctly explained. Thank you. This could wind up to be embarrassing since this app has been in operation for some time using the original developer's code. I just took it over at the beginning of the month. Will I be a savior or a stooge? The question of the day... Regards, Steve Erbach Scientific Marketing Neenah, WI 920-969-0504 Message created with Bloomba Disclaimer: No tree was killed in the transmission of this message. However, several coulombs of electrons were temporarily inconvenienced. From HollisVJ at pgdp.usec.com Thu Jan 29 11:27:12 2004 From: HollisVJ at pgdp.usec.com (Hollis,Virginia) Date: Thu, 29 Jan 2004 11:27:12 -0600 Subject: [AccessD] Pick out the Year Message-ID: <618EB4D6DDCDD3119B0A00508B6FD37A0CB0CFBF@cntexchange.pgdp.usec.com> I have a date field showing the standard date format of mm/dd/yyyy. I need to group and count records by the month & year. For example, I need a count of all records entered in January 04. How do I parse out the month from the date? I tried the left function, but get a data type mismatch. Virginia From stephen at bondsoftware.co.nz Thu Jan 29 11:33:57 2004 From: stephen at bondsoftware.co.nz (Stephen Bond) Date: Fri, 30 Jan 2004 06:33:57 +1300 Subject: [AccessD] Charts Message-ID: <70F3D727890C784291D8433E9C418F290885B4@server.bondsoftware.co.nz> Making an assumption here that you have a Cross-tab Q with the month column header formatted MM ... * go to Query Properties, and put something like this in the 'Column Headings' entry: 1;2;3;4;5;6;7;8;9;10;11;12 This will force a column heading for each month. Stephen Bond > -----Original Message----- > From: Roz Clarke [mailto:roz.clarke at donnslaw.co.uk] > Sent: Friday, 30 January 2004 5:54 a.m. > To: 'Access Developers discussion and problem solving' > Subject: [AccessD] Charts > > > Hi all. Hope everyone is well. > > I have a problem with a chart I need to display in Access. I > used to do this > by exporting data to Excel but the connection to Excel has > been so slow and > unstable that I am now trying to bring it within Access. > > The data I need to display is in a cross-tab query, where I > have categories > as the row header and months of the year as the column > header. I need to > show all the months even though we currently have data only > for January. > > If I base the chart on the cross-tab, I cannot see a way to > tell it that > each column should be an axis entry. If I base the chart on a > select query, > it correctly allows me to set 'month' as an axis, but only > shows me January. > > Can anyone help? > > TIA > > Roz > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com > From HollisVJ at pgdp.usec.com Thu Jan 29 11:45:18 2004 From: HollisVJ at pgdp.usec.com (Hollis,Virginia) Date: Thu, 29 Jan 2004 11:45:18 -0600 Subject: [AccessD] Code Not Working in XP Message-ID: <618EB4D6DDCDD3119B0A00508B6FD37A0CB0CFC1@cntexchange.pgdp.usec.com> It is from Dev Ashish, API: Start an app with ShellExecute This is the link to the site & the code: http://www.mvps.org/access/api/api0018.htm Virginia -----Original Message----- From: Erwin Craps - IT Helps [mailto:Erwin.Craps at ithelps.be] Sent: Thursday, January 29, 2004 11:12 AM To: Access Developers discussion and problem solving Subject: RE: [AccessD] Code Not Working in XP What the code in fHandleFile? -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Hollis,Virginia Sent: Thursday, January 29, 2004 5:29 PM To: 'accessD at databaseadvisors.com' Subject: [AccessD] Code Not Working in XP I have been using the code shown below to access data on our Intranet. The code matches a field entry in the database and looks up the details. In this example it finds a stock number. Problem: The code does not work for users that are running XP. It does not do anything, it will not even try to access the web. They click the button and nothing happens. What can I do to correct this for users of XP? Virginia _____ strPath = " http://web.com/vr.asp?xml=orafin%2Stock= " strFile = strPath & Me.StockNumber If Dir(strFile) = "" Then strFile = strPath & Me.StockNumber End If Call fHandleFile(strFile, WIN_MAX) _______________________________________________ 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 From gustav at cactus.dk Thu Jan 29 11:46:17 2004 From: gustav at cactus.dk (Gustav Brock) Date: Thu, 29 Jan 2004 18:46:17 +0100 Subject: [AccessD] Pick out the Year In-Reply-To: <618EB4D6DDCDD3119B0A00508B6FD37A0CB0CFBF@cntexchange.pgdp.usec.com> References: <618EB4D6DDCDD3119B0A00508B6FD37A0CB0CFBF@cntexchange.pgdp.usec.com> Message-ID: <11836595721.20040129184617@cactus.dk> Hi Virginia How about .. Group By Year(datefield), Month(datefield); /gustav > I have a date field showing the standard date format of mm/dd/yyyy. I need > to group and count records by the month & year. For example, I need a count > of all records entered in January 04. > How do I parse out the month from the date? I tried the left function, but > get a data type mismatch. From cfoust at infostatsystems.com Thu Jan 29 11:49:03 2004 From: cfoust at infostatsystems.com (Charlotte Foust) Date: Thu, 29 Jan 2004 09:49:03 -0800 Subject: [AccessD] This doesn't look right Message-ID: If they've been looking at bogus information all this time, it's hard to tell. "Shoot the messenger" often prevails, but if the information is being used to make business decisions, would they rather make them on valid information or not? Charlotte Foust -----Original Message----- From: Steven W. Erbach [mailto:serbach at new.rr.com] Sent: Thursday, January 29, 2004 9:22 AM To: Access Developers discussion and problem solving Subject: RE: [AccessD] This doesn't look right Charlotte, >> HAVING includes the field being evaluated, and that has a profound >> effect of the results, since you're also grouping by those fields. << Very succinctly explained. Thank you. This could wind up to be embarrassing since this app has been in operation for some time using the original developer's code. I just took it over at the beginning of the month. Will I be a savior or a stooge? The question of the day... Regards, Steve Erbach Scientific Marketing Neenah, WI 920-969-0504 Message created with Bloomba Disclaimer: No tree was killed in the transmission of this message. However, several coulombs of electrons were temporarily inconvenienced. _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From roz.clarke at donnslaw.co.uk Thu Jan 29 12:03:35 2004 From: roz.clarke at donnslaw.co.uk (Roz Clarke) Date: Thu, 29 Jan 2004 18:03:35 -0000 Subject: [AccessD] Charts Message-ID: <61F915314798D311A2F800A0C9C83188047C6A22@dibble.observatory.donnslaw.co.uk> Sorry Stephen, I guess I wasn't clear enough I have the column headings set in my cross-tab query and that works just fine. The problem is when I try to base a line graph on that data... I just can't see a way to do it. -----Original Message----- From: Stephen Bond [mailto:stephen at bondsoftware.co.nz] Sent: 29 January 2004 17:34 To: Access Developers discussion and problem solving Subject: RE: [AccessD] Charts Making an assumption here that you have a Cross-tab Q with the month column header formatted MM ... * go to Query Properties, and put something like this in the 'Column Headings' entry: 1;2;3;4;5;6;7;8;9;10;11;12 This will force a column heading for each month. Stephen Bond > -----Original Message----- > From: Roz Clarke [mailto:roz.clarke at donnslaw.co.uk] > Sent: Friday, 30 January 2004 5:54 a.m. > To: 'Access Developers discussion and problem solving' > Subject: [AccessD] Charts > > > Hi all. Hope everyone is well. > > I have a problem with a chart I need to display in Access. I > used to do this > by exporting data to Excel but the connection to Excel has > been so slow and > unstable that I am now trying to bring it within Access. > > The data I need to display is in a cross-tab query, where I > have categories > as the row header and months of the year as the column > header. I need to > show all the months even though we currently have data only > for January. > > If I base the chart on the cross-tab, I cannot see a way to > tell it that > each column should be an axis entry. If I base the chart on a > select query, > it correctly allows me to set 'month' as an axis, but only > shows me January. > > Can anyone help? > > TIA > > Roz > _______________________________________________ > 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 From BBarabash at TappeConstruction.com Thu Jan 29 12:10:55 2004 From: BBarabash at TappeConstruction.com (Brett Barabash) Date: Thu, 29 Jan 2004 12:10:55 -0600 Subject: [AccessD] Pick out the Year Message-ID: <426071E0B0A6D311B3C0006008B0AB23AFE2FD@TAPPEEXCH01> How about: DatePart("yyyy", ) -----Original Message----- From: Hollis,Virginia [mailto:HollisVJ at pgdp.usec.com] Sent: Thursday, January 29, 2004 11:27 AM To: 'Access Developers discussion and problem solving' Subject: [AccessD] Pick out the Year I have a date field showing the standard date format of mm/dd/yyyy. I need to group and count records by the month & year. For example, I need a count of all records entered in January 04. How do I parse out the month from the date? I tried the left function, but get a data type mismatch. Virginia -------------------------------------------------------------------------------------------------------------------- This email and any files transmitted with it are confidential and intended solely for the use of the individual or entity to whom they are addressed. If you have received this email in error please notify the originator of the message. This footer also confirms that this email message has been scanned for the presence of computer viruses. Any views expressed in this message are those of the individual sender, except where the sender specifies and with authority, states them to be the views of Tappe Construction Co. Scanning of this message and addition of this footer is performed by SurfControl E-mail Filter software in conjunction with virus detection software. From KIsmert at TexasSystems.com Thu Jan 29 12:14:43 2004 From: KIsmert at TexasSystems.com (Ken Ismert) Date: Thu, 29 Jan 2004 12:14:43 -0600 Subject: [AccessD] Interface Callback Class Questions. In-Reply-To: <000001c3e60c$371f73b0$6501a8c0@RG> Message-ID: <005801c3e693$c52df410$2a3ca8c0@TEXASSYSTEMS.COM> Robert, > The report fires, however none of the events (Close) are being hooked. The only thing I can think of here is that the Report must have a module for a class to hook its events. Double-check that 'Has Module' is Yes in report properties. The module can be blank. > I can run the report once, any attempt to run the report again fails on > "RemoteReportClose mrRpt.Name" ERROR Number 2467....... Object or > property... either does not exist or is closed...... I think that if you can hook the Close event, this problem will go away. CReportHost relies on the Close event to set it's mrRpt reference to Nothing. If the close event fails, you get a dangling reference - mrRpt is pointing to an object that has shutdown, and won't respond to further native property or method requests. It is important to note that the Report object is still in memory, because it still has one reference, mrRpt, keeping it alive. This does suggest adding a failsafe to the CReportHost.CloseRemoteReport method: Public Sub CloseRemoteReport() On Error GoTo HandleErr ' Close Report if Open If mrRpt Is Nothing Then Exit Sub ' Fires mrRpt_Close RemoteReportClose mrRpt.Name Exit Sub HandleErr: Select Case Err.Number Case 2467 ' Object or Property doesn't exist or is closed ' User closed Report, but mrRpt_Close event failed: ' Release reference to allow the Report to terminate Set mrRpt = Nothing Case Else Err.Raise Number:=Err.Number, _ Description:=Err.Description, _ Source:="CReportHost.CloseRemoteReport" & vbCrLf & Err.Source End Select Exit Sub End Sub > Do I need to hook the opening report to the events in the CReportHost > class internally of the opening report, such as on the OnOpen event? I'm > new to the "DEEP" Programming method so I could be way off base..... One way to look at this is that Events are a 'pull' mechanism. In other words, declaring an object WithEvents means that you are receiving events from that object, with no setup on that object's side required. The COM object framework handles the detials of making sure all subscribers get the events they signed up for. This is completely transparent to the object generating the events. What's more, there is no way in VB6 to tell within an object, say a Report, that other objects are sinking it's events, AFAIK. (An aside: since Reports and Forms are not 'standard' COM objects, you have to go through the trouble of hooking their events. This isn't entirely bad, as it does allow you to selectively enable/disable events at runtime, if you so need.) So, the short answer is, for traditional events, you don't hook events in the object that generates them. However, if you choose to use interfaces, you can implement a 'push' style callback mechanism. In this case, lets say an object, O, wants to receive 'events'(or more correctly, callbacks) from another object, P. O would present itself to P, usually through a subscribe call, like: ' Code within O rP.Init Me ' Send reference to myself to P P, when it wants to call back O, would do something like: ' Code within P rO.Method ' Some method defined in an interface ' implemented by O Of course, O has to unsubscribe when it shuts down: ' Code within O rP.Term Me ' P sets rO to nothing, allowing ' O to terminate Interface callbacks, from O's perspective, look and act very much like events, except that explicit setup and shutdown are required. From P's perspective, events and callbacks are very different. Events are internally defined in P, and raised using RaiseEvent. Callbacks are done using methods of an externally defined interface, with an object supplied to P at runtime. Anyway, thanks for your flattering words, and I hope this helps. -Ken From rl_stewart at highstream.net Thu Jan 29 12:43:36 2004 From: rl_stewart at highstream.net (Robert L. Stewart) Date: Thu, 29 Jan 2004 12:43:36 -0600 Subject: [AccessD] Re: This doesn't look right In-Reply-To: <200401291635.i0TGZLm08364@databaseadvisors.com> Message-ID: <5.1.0.14.2.20040129124114.028fce58@pop3.highstream.net> Steven, To re-engineer it the best way, I would use 2 queries. One to hold the SQL without criteria. And the second to replace the SQL with what is in the first one plus the criteria from the form. It makes it much cleaner and easier to debug later. Robert At 10:35 AM 1/29/2004 -0600, you wrote: >Date: Thu, 29 Jan 2004 10:37:03 -0600 >From: "Steven W. Erbach" >Subject: [AccessD] This doesn't look right >To: "Access Developers discussion and problem solving" > >Message-ID: <20040129103703.1501118476.serbach at new.rr.com> >Content-Type: text/plain > >Dear Group, > >I'm "re-factoring" an application that I took over from a developer who's >reducing her workload to devote more time to her family. There is a query >that looks curious to me and I wonder if you lot could give me some >insight into how Access works. > >The query creates a SubTotal and has four Criteria rows and, of course, >the Total line is activated. The query looks at four fields on an open >form (frmReport) which feed values into the query. Two of those fields are >txtLogStartDate and txtLogEndDate. The other two are txtCity and txtCounty. > >The four Criteria rows look at various combinations of whether txtCity and >txtCounty are filled in or not on the form that feeds the query. The >ArrivalDate in the query grid looks at the range of dates between >txtLogStartDate and txtLogEndDate on the form. > >What's odd is that, at first, the ArrivalDate query column had WHERE in >the Total line. The County and City columns show Group By. The range of >dates is supposed to be the same for every one of the four Criteria >rows...BUT with ArrivalDate set to WHERE there was only one Criteria >statement in the first row of the four Criteria rows. It looked like this: > >Between [Forms]![frmReport]![txtLogStartDate] And >[Forms]![frmReport]![txtLogEndDate] Or Between >[Forms]![frmReport]![txtLogStartDate] And >[Forms]![frmReport]![txtLogEndDate] Or Between >[Forms]![frmReport]![txtLogStartDate] And >[Forms]![frmReport]![txtLogEndDate] Or Between >[Forms]![frmReport]![txtLogStartDate] And [Forms]![frmReport]![txtLogEndDate] > >(Sorry for the wrap) That is, that entire thing was in one cell of one row >of the Criteria grid. I tried to cut and paste individual "Between" >statements into each of the four rows of the Criteria grid; but when I >saved the query, closed it, and re-opened it, that huge long >multiple-Between statement re-appeared in just the first row of the >Criteria grid. > >However, when I changed the ArrivalDate Total line to GROUP BY and *then* >cut and paste individual Between statements into each row of the Criteria >grid, when I saved, closed, and re-opened the query the Between statements >stayed where they were; that is, one for each of the four rows of the >Criteria grid. > >Now, it was obvious to me that the two forms of the query would produce >different results, and that turned out to be true. My question is this: >when you're putting together a multi-Criteria row query and you want one >column to show the same criteria in each row, the natural thing to do is >choose WHERE in the Total row. You can test the query while you're >designing it and you'll get results. But when you save the query, thinking >that you've done your duty, you're actually saving something incorrect >since, if you don't look at it again, Access will re-format all those >WHERE statements in each row of the Criteria grid into one concatenated >statement in one row. > >I thought I knew queries pretty well, but this one throws me. In the SQL >statement formed when the ArrivalDate showed WHERE, that big long >concatenated multi-Between statement wound up in the WHERE clause. (Didn't >matter whether the Between statements were in separate criteria rows or >not.) But when I reformed the query to split the Between statements into >separate Criteria rows and selected GROUP BY for the ArrivalDate column, >the Between criteria wound up in the HAVING clause. > >I guess it's just an experience thing, right? > >Regards, > >Steve Erbach >Scientific Marketing >Neenah, WI >920-969-0504 From serbach at new.rr.com Thu Jan 29 13:10:25 2004 From: serbach at new.rr.com (Steven W. Erbach) Date: Thu, 29 Jan 2004 13:10:25 -0600 Subject: [AccessD] Re: This doesn't look right Message-ID: <20040129131025.118890213.serbach@new.rr.com> Robert, Thanks for the suggestion. I appreciate it. Regards, Steve Erbach Scientific Marketing Neenah, WI 920-969-0504 Message created with Bloomba Disclaimer: No tree was killed in the transmission of this message. However, several coulombs of electrons were temporarily inconvenienced. From garykjos at hotmail.com Thu Jan 29 13:25:43 2004 From: garykjos at hotmail.com (Gary Kjos) Date: Thu, 29 Jan 2004 13:25:43 -0600 Subject: [AccessD] Pick out the Year Message-ID: Hi Virginia, When I want to do this I usually will create a field in a query with the formatted date in year/month format. Something like; OrderYearMonth: Format(OrderDate,"yyyy/mm") Gary Kjos garykjos at hotmail.com >From: "Hollis,Virginia" >Reply-To: Access Developers discussion and problem >solving >To: "'Access Developers discussion and problem solving'" > >Subject: [AccessD] Pick out the Year >Date: Thu, 29 Jan 2004 11:27:12 -0600 > >I have a date field showing the standard date format of mm/dd/yyyy. I need >to group and count records by the month & year. For example, I need a count >of all records entered in January 04. > >How do I parse out the month from the date? I tried the left function, but >get a data type mismatch. > >Virginia >_______________________________________________ >AccessD mailing list >AccessD at databaseadvisors.com >http://databaseadvisors.com/mailman/listinfo/accessd >Website: http://www.databaseadvisors.com _________________________________________________________________ Let the new MSN Premium Internet Software make the most of your high-speed experience. http://join.msn.com/?pgmarket=en-us&page=byoa/prem&ST=1 From Jim.Hale at FleetPride.com Thu Jan 29 13:20:23 2004 From: Jim.Hale at FleetPride.com (Hale, Jim) Date: Thu, 29 Jan 2004 13:20:23 -0600 Subject: [AccessD] Charts Message-ID: <6A6AA9DF57E4F046BDA1E273BDDB677201AA2C@corp-es01.fleetpride.com> You might explore using pivot charts in Excel. I export the data either manually or in code to a hidden excel worksheet. The chart does the hard work. It is very flexible. It is easier to show than explain so I am sending you an example. HTH Jim Hale -----Original Message----- From: Roz Clarke [mailto:roz.clarke at donnslaw.co.uk] Sent: Thursday, January 29, 2004 12:04 PM To: 'Access Developers discussion and problem solving' Subject: RE: [AccessD] Charts Sorry Stephen, I guess I wasn't clear enough I have the column headings set in my cross-tab query and that works just fine. The problem is when I try to base a line graph on that data... I just can't see a way to do it. -----Original Message----- From: Stephen Bond [mailto:stephen at bondsoftware.co.nz] Sent: 29 January 2004 17:34 To: Access Developers discussion and problem solving Subject: RE: [AccessD] Charts Making an assumption here that you have a Cross-tab Q with the month column header formatted MM ... * go to Query Properties, and put something like this in the 'Column Headings' entry: 1;2;3;4;5;6;7;8;9;10;11;12 This will force a column heading for each month. Stephen Bond > -----Original Message----- > From: Roz Clarke [mailto:roz.clarke at donnslaw.co.uk] > Sent: Friday, 30 January 2004 5:54 a.m. > To: 'Access Developers discussion and problem solving' > Subject: [AccessD] Charts > > > Hi all. Hope everyone is well. > > I have a problem with a chart I need to display in Access. I > used to do this > by exporting data to Excel but the connection to Excel has > been so slow and > unstable that I am now trying to bring it within Access. > > The data I need to display is in a cross-tab query, where I > have categories > as the row header and months of the year as the column > header. I need to > show all the months even though we currently have data only > for January. > > If I base the chart on the cross-tab, I cannot see a way to > tell it that > each column should be an axis entry. If I base the chart on a > select query, > it correctly allows me to set 'month' as an axis, but only > shows me January. > > Can anyone help? > > TIA > > Roz > _______________________________________________ > 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 _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From rl_stewart at highstream.net Thu Jan 29 13:38:37 2004 From: rl_stewart at highstream.net (Robert L. Stewart) Date: Thu, 29 Jan 2004 13:38:37 -0600 Subject: [AccessD] Using Dates In-Reply-To: <200401291800.i0TI0Hm13057@databaseadvisors.com> Message-ID: <5.1.0.14.2.20040129132506.028deff8@pop3.highstream.net> All, I have been seeing a lot of people posting lately in many of the lists about how to do different tings with dates. Here is what I do. I have what is called a Date Dimension table. A dimension table is one used in data warehouses. In this case, it is great for relational data also. The date table has all of the things done to a date that can be done. Here is a sample structure: Date_ID Date/Time (loaded using the date() function) PK Year_Nbr Number, integer Year_Txt Text(4) Month_Nbr Number, byte Month_Nbr_Txt Text(2) Month_Name Text(15) Month_Name_Abbrv Text(3) Day_of_Month_Nbr Number, byte Day_of_Month_Nbr Text(2) Day_Of_Year_Nbr Number, integer Week_Of_Year_Nbr Number, byte Quarter_Nbr Number, byte Quarter_Nbr_Txt Text(2) Fiscal_Period Text(10) Weekday_Flag Text(1) Holiday_Flag Text(1) Last_Day_In_Month_Flag Text(1) By using this table joined to the date, you do not have to do any functions against a date to filter by month, your, quarter, or whatever. If anyone has questions about this, just send them to the list and I will answer them as best I can. Robert From stephen at bondsoftware.co.nz Thu Jan 29 13:43:47 2004 From: stephen at bondsoftware.co.nz (Stephen Bond) Date: Fri, 30 Jan 2004 08:43:47 +1300 Subject: [AccessD] Charts Message-ID: <70F3D727890C784291D8433E9C418F298F55@server.bondsoftware.co.nz> I see what you're up against - I've never been a fan of Access charts ..... Excel always excels .... I had a bit of a play, I'm afraid my approach has overtones of sledgehammer, but tell me what you think: I created a new local table called tblMasterMonths, one field called MM, type number (byte). Filled the table with 12 records, values 1, 2, 3, ... 12. To build the query underlying the Chart, I took the select query I had (the one that only shows me January) and altered it to include tblMasterMonths, with a Left Join from tblmasterMonths to the query that contains the raw data. This forces months with no data to still have an entry in the output. Use the output from this into the Chart. Stephen Bond > -----Original Message----- > From: Roz Clarke [mailto:roz.clarke at donnslaw.co.uk] > Sent: Friday, 30 January 2004 7:04 a.m. > To: 'Access Developers discussion and problem solving' > Subject: RE: [AccessD] Charts > > > Sorry Stephen, I guess I wasn't clear enough > > I have the column headings set in my cross-tab query and that > works just > fine. The problem is when I try to base a line graph on that > data... I just > can't see a way to do it. > > -----Original Message----- > From: Stephen Bond [mailto:stephen at bondsoftware.co.nz] > Sent: 29 January 2004 17:34 > To: Access Developers discussion and problem solving > Subject: RE: [AccessD] Charts > > > Making an assumption here that you have a Cross-tab Q with > the month column > header formatted MM ... > > * go to Query Properties, and put something like this in the 'Column > Headings' entry: 1;2;3;4;5;6;7;8;9;10;11;12 > > This will force a column heading for each month. > > Stephen Bond > > > -----Original Message----- > > From: Roz Clarke [mailto:roz.clarke at donnslaw.co.uk] > > Sent: Friday, 30 January 2004 5:54 a.m. > > To: 'Access Developers discussion and problem solving' > > Subject: [AccessD] Charts > > > > > > Hi all. Hope everyone is well. > > > > I have a problem with a chart I need to display in Access. I > > used to do this > > by exporting data to Excel but the connection to Excel has > > been so slow and > > unstable that I am now trying to bring it within Access. > > > > The data I need to display is in a cross-tab query, where I > > have categories > > as the row header and months of the year as the column > > header. I need to > > show all the months even though we currently have data only > > for January. > > > > If I base the chart on the cross-tab, I cannot see a way to > > tell it that > > each column should be an axis entry. If I base the chart on a > > select query, > > it correctly allows me to set 'month' as an axis, but only > > shows me January. > > > > Can anyone help? > > > > TIA > > > > Roz > > _______________________________________________ > > 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 > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com > From DWUTKA at marlow.com Thu Jan 29 14:23:18 2004 From: DWUTKA at marlow.com (DWUTKA at marlow.com) Date: Thu, 29 Jan 2004 14:23:18 -0600 Subject: [AccessD] Pick out the Year Message-ID: <2F8793082E00D4119A1700B0D0216BF802227808@main2.marlow.com> Just setup the field like this: MonthYear: Format([YourDateField],"mmyyyy") Then group that field. Should do the trick. You can't 'parse' a date data type, because it's not a string (it's actually a double floating point.). To get the Month, or Year of a date, use the Month() and Year() functions. However, you just want to format the month/Year combo, the Format function works well. Drew -----Original Message----- From: accessd-bounces at databaseadvisors.com To: 'Access Developers discussion and problem solving' Sent: 1/29/04 11:27 AM Subject: [AccessD] Pick out the Year I have a date field showing the standard date format of mm/dd/yyyy. I need to group and count records by the month & year. For example, I need a count of all records entered in January 04. How do I parse out the month from the date? I tried the left function, but get a data type mismatch. Virginia _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From martyconnelly at shaw.ca Thu Jan 29 14:24:19 2004 From: martyconnelly at shaw.ca (MartyConnelly) Date: Thu, 29 Jan 2004 12:24:19 -0800 Subject: [AccessD] This doesn't look right References: Message-ID: <40196BF3.5030905@shaw.ca> I know of an oil and gas company TransAlta in Calgary that lost $24 million last summer due to an Excel spreadsheet error. Ray Panko at University of Hawaii came up with a figure of 4% of all cells in Excel have logic errors ,without doing deep debugging or using analysis tools. Errors are not unusual. Charlotte Foust wrote: >If they've been looking at bogus information all this time, it's hard to >tell. "Shoot the messenger" often prevails, but if the information is >being used to make business decisions, would they rather make them on >valid information or not? > >Charlotte Foust > >-----Original Message----- >From: Steven W. Erbach [mailto:serbach at new.rr.com] >Sent: Thursday, January 29, 2004 9:22 AM >To: Access Developers discussion and problem solving >Subject: RE: [AccessD] This doesn't look right > > >Charlotte, > > > >>>HAVING includes the field being evaluated, and that has a profound >>>effect of the results, since you're also grouping by those fields. << >>> >>> > >Very succinctly explained. Thank you. This could wind up to be >embarrassing since this app has been in operation for some time using >the original developer's code. I just took it over at the beginning of >the month. Will I be a savior or a stooge? The question of the day... > >Regards, > >Steve Erbach >Scientific Marketing >Neenah, WI >920-969-0504 > >Message created with Bloomba > >Disclaimer: No tree was killed in the transmission of this message. >However, several coulombs of electrons were temporarily inconvenienced. > >_______________________________________________ >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 > > > -- Marty Connelly Victoria, B.C. Canada From cfoust at infostatsystems.com Thu Jan 29 14:34:58 2004 From: cfoust at infostatsystems.com (Charlotte Foust) Date: Thu, 29 Jan 2004 12:34:58 -0800 Subject: [AccessD] Using Dates Message-ID: Yes, it's a very effective tool for doing date filtering in queries and reports. I've used it in data warehouse type applications and also where users wanted to be able to get results for the last 6 months and compare that to the same period last year or some similar kind of time frame slicing and dicing. The biggest problem with it is creating the code to keep it updated. I usually only updated it once a year to add the new year's values. Charlotte Foust -----Original Message----- From: Robert L. Stewart [mailto:rl_stewart at highstream.net] Sent: Thursday, January 29, 2004 11:39 AM To: accessd at databaseadvisors.com Subject: [AccessD] Using Dates All, I have been seeing a lot of people posting lately in many of the lists about how to do different tings with dates. Here is what I do. I have what is called a Date Dimension table. A dimension table is one used in data warehouses. In this case, it is great for relational data also. The date table has all of the things done to a date that can be done. Here is a sample structure: Date_ID Date/Time (loaded using the date() function) PK Year_Nbr Number, integer Year_Txt Text(4) Month_Nbr Number, byte Month_Nbr_Txt Text(2) Month_Name Text(15) Month_Name_Abbrv Text(3) Day_of_Month_Nbr Number, byte Day_of_Month_Nbr Text(2) Day_Of_Year_Nbr Number, integer Week_Of_Year_Nbr Number, byte Quarter_Nbr Number, byte Quarter_Nbr_Txt Text(2) Fiscal_Period Text(10) Weekday_Flag Text(1) Holiday_Flag Text(1) Last_Day_In_Month_Flag Text(1) By using this table joined to the date, you do not have to do any functions against a date to filter by month, your, quarter, or whatever. If anyone has questions about this, just send them to the list and I will answer them as best I can. Robert _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From cfoust at infostatsystems.com Thu Jan 29 14:36:12 2004 From: cfoust at infostatsystems.com (Charlotte Foust) Date: Thu, 29 Jan 2004 12:36:12 -0800 Subject: [AccessD] This doesn't look right Message-ID: Sounds like an argument for Access. Charlotte Foust -----Original Message----- From: MartyConnelly [mailto:martyconnelly at shaw.ca] Sent: Thursday, January 29, 2004 12:24 PM To: Access Developers discussion and problem solving Subject: Re: [AccessD] This doesn't look right I know of an oil and gas company TransAlta in Calgary that lost $24 million last summer due to an Excel spreadsheet error. Ray Panko at University of Hawaii came up with a figure of 4% of all cells in Excel have logic errors ,without doing deep debugging or using analysis tools. Errors are not unusual. Charlotte Foust wrote: >If they've been looking at bogus information all this time, it's hard >to tell. "Shoot the messenger" often prevails, but if the information >is being used to make business decisions, would they rather make them >on valid information or not? > >Charlotte Foust > >-----Original Message----- >From: Steven W. Erbach [mailto:serbach at new.rr.com] >Sent: Thursday, January 29, 2004 9:22 AM >To: Access Developers discussion and problem solving >Subject: RE: [AccessD] This doesn't look right > > >Charlotte, > > > >>>HAVING includes the field being evaluated, and that has a profound >>>effect of the results, since you're also grouping by those fields. << >>> >>> > >Very succinctly explained. Thank you. This could wind up to be >embarrassing since this app has been in operation for some time using >the original developer's code. I just took it over at the beginning of >the month. Will I be a savior or a stooge? The question of the day... > >Regards, > >Steve Erbach >Scientific Marketing >Neenah, WI >920-969-0504 > >Message created with Bloomba > >Disclaimer: No tree was killed in the transmission of this message. >However, several coulombs of electrons were temporarily inconvenienced. > >_______________________________________________ >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 > > > -- Marty Connelly Victoria, B.C. Canada _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From stuart at lexacorp.com.pg Thu Jan 29 16:16:09 2004 From: stuart at lexacorp.com.pg (Stuart McLachlan) Date: Fri, 30 Jan 2004 08:16:09 +1000 Subject: [AccessD] Access as Service In-Reply-To: Message-ID: <401A12C9.60.187A9A@localhost> On 29 Jan 2004 at 9:28, ggonzalez at cccis.com wrote: > > Has anyone ever had to run an Access application as a service on a > computer? if so can you pint me in the direction on how I could do this. > Never tried it with Access, but take a look at FireDaemon http://www.firedaemon.com/ "FireDaemon is a utility that allows you to install and run virtually any native Win32 application or script (eg. BAT/CMD, Perl, Java, Python, TCL/TK) as a Windows NT/2K/XP/2K3/Longhorn service. FireDaemon features easy configuration (via GUI or XML), a low memory/CPU overhead, subprocess prioritisation, custom environments, CPU binding plus monitoring and logging to the event log and on-disk log files. " -- Lexacorp Ltd http://www.lexacorp.com.pg Information Technology Consultancy, Software Development,System Support. From pharold at proftesting.com Thu Jan 29 18:34:40 2004 From: pharold at proftesting.com (Perry Harold) Date: Thu, 29 Jan 2004 19:34:40 -0500 Subject: [AccessD] Code Not Working in XP In-Reply-To: <618EB4D6DDCDD3119B0A00508B6FD37A0CB0CFBD@cntexchange.pgdp.usec.com> Message-ID: <001301c3e6c8$d8cc2110$082da8c0@D58BT131> Maybe something with the permission settings on the XP boxes. Had something similar that worked great with 98 & did the same thing as yours when switching to XP until some permissions were set to allow them access to the shared resources. Perry Harold -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Hollis,Virginia Sent: Thursday, January 29, 2004 11:29 AM To: 'accessD at databaseadvisors.com' Subject: [AccessD] Code Not Working in XP I have been using the code shown below to access data on our Intranet. The code matches a field entry in the database and looks up the details. In this example it finds a stock number. Problem: The code does not work for users that are running XP. It does not do anything, it will not even try to access the web. They click the button and nothing happens. What can I do to correct this for users of XP? Virginia _____ strPath = " http://web.com/vr.asp?xml=orafin%2Stock= " strFile = strPath & Me.StockNumber If Dir(strFile) = "" Then strFile = strPath & Me.StockNumber End If Call fHandleFile(strFile, WIN_MAX) _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From Subscriptions at servicexp.com Thu Jan 29 20:17:19 2004 From: Subscriptions at servicexp.com (Robert Gracie) Date: Thu, 29 Jan 2004 21:17:19 -0500 Subject: [AccessD] Interface Callback Class Questions. In-Reply-To: <005801c3e693$c52df410$2a3ca8c0@TEXASSYSTEMS.COM> Message-ID: <000201c3e6d7$30d74fc0$6501a8c0@RG> Ken, Thanks A Million!! Yep the report did not have module....:-), and that solved the problem... How in the world do I sink the OnPrint, or OnFormat events... with mrRpt.Section(acDetail).OnPrint = pcsEventStub I think I have tried every possible stub, and it seems like it's just ignored.... Thanks Again!! Robert Gracie -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Ken Ismert Sent: Thursday, January 29, 2004 1:15 PM To: 'Access Developers discussion and problem solving' Subject: RE: [AccessD] Interface Callback Class Questions. Robert, > The report fires, however none of the events (Close) are being hooked. The only thing I can think of here is that the Report must have a module for a class to hook its events. Double-check that 'Has Module' is Yes in report properties. The module can be blank. > I can run the report once, any attempt to run the report again fails > on "RemoteReportClose mrRpt.Name" ERROR Number 2467....... Object or > property... either does not exist or is closed...... I think that if you can hook the Close event, this problem will go away. CReportHost relies on the Close event to set it's mrRpt reference to Nothing. If the close event fails, you get a dangling reference - mrRpt is pointing to an object that has shutdown, and won't respond to further native property or method requests. It is important to note that the Report object is still in memory, because it still has one reference, mrRpt, keeping it alive. This does suggest adding a failsafe to the CReportHost.CloseRemoteReport method: Public Sub CloseRemoteReport() On Error GoTo HandleErr ' Close Report if Open If mrRpt Is Nothing Then Exit Sub ' Fires mrRpt_Close RemoteReportClose mrRpt.Name Exit Sub HandleErr: Select Case Err.Number Case 2467 ' Object or Property doesn't exist or is closed ' User closed Report, but mrRpt_Close event failed: ' Release reference to allow the Report to terminate Set mrRpt = Nothing Case Else Err.Raise Number:=Err.Number, _ Description:=Err.Description, _ Source:="CReportHost.CloseRemoteReport" & vbCrLf & Err.Source End Select Exit Sub End Sub > Do I need to hook the opening report to the events in the CReportHost > class internally of the opening report, such as on the OnOpen event? > I'm new to the "DEEP" Programming method so I could be way off > base..... One way to look at this is that Events are a 'pull' mechanism. In other words, declaring an object WithEvents means that you are receiving events from that object, with no setup on that object's side required. The COM object framework handles the detials of making sure all subscribers get the events they signed up for. This is completely transparent to the object generating the events. What's more, there is no way in VB6 to tell within an object, say a Report, that other objects are sinking it's events, AFAIK. (An aside: since Reports and Forms are not 'standard' COM objects, you have to go through the trouble of hooking their events. This isn't entirely bad, as it does allow you to selectively enable/disable events at runtime, if you so need.) So, the short answer is, for traditional events, you don't hook events in the object that generates them. However, if you choose to use interfaces, you can implement a 'push' style callback mechanism. In this case, lets say an object, O, wants to receive 'events'(or more correctly, callbacks) from another object, P. O would present itself to P, usually through a subscribe call, like: ' Code within O rP.Init Me ' Send reference to myself to P P, when it wants to call back O, would do something like: ' Code within P rO.Method ' Some method defined in an interface ' implemented by O Of course, O has to unsubscribe when it shuts down: ' Code within O rP.Term Me ' P sets rO to nothing, allowing ' O to terminate Interface callbacks, from O's perspective, look and act very much like events, except that explicit setup and shutdown are required. From P's perspective, events and callbacks are very different. Events are internally defined in P, and raised using RaiseEvent. Callbacks are done using methods of an externally defined interface, with an object supplied to P at runtime. Anyway, thanks for your flattering words, and I hope this helps. -Ken _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From accessd666 at yahoo.com Fri Jan 30 01:08:11 2004 From: accessd666 at yahoo.com (Sad Der) Date: Thu, 29 Jan 2004 23:08:11 -0800 (PST) Subject: [AccessD] OT: Cannot get rid of spam! Message-ID: <20040130070811.68143.qmail@web60206.mail.yahoo.com> Hi group, approx 2 weeks ago I saw that my mailbox for my AccessD-list mail was full. I then saw that I had only a 'couple' (100+) e-mails in it. I checked my Bulk folder and it was full with 'microsoft' updates. They all came from e-mail like: qweerejkks at yahoo.com 2q323312 at yahoo.com etc. I receive these mails every day. They keep comming in until my mailbox is completely full. I tried blocking the mailadresses, but since they change every day that didn't work. I tried blocking the 'domain' www.yahoo.com, that also didn't work. I tried to unsubscribe from the mails, no info about that in the mails I checked my Microsoft account, Yahoo account for any subscriptions and i canceled them all. Result? The mails keep coming in! How do I get rid of these mails? TIA!! Sander __________________________________ Do you Yahoo!? Yahoo! SiteBuilder - Free web site building tool. Try it! http://webhosting.yahoo.com/ps/sb/ From accessd666 at yahoo.com Fri Jan 30 01:16:12 2004 From: accessd666 at yahoo.com (Sad Der) Date: Thu, 29 Jan 2004 23:16:12 -0800 (PST) Subject: [AccessD] Charts In-Reply-To: <6A6AA9DF57E4F046BDA1E273BDDB677201AA2C@corp-es01.fleetpride.com> Message-ID: <20040130071612.28363.qmail@web60209.mail.yahoo.com> Jim, please tell me how do you create a Pivot Table in excel using a table in Access?! TIA Sander --- "Hale, Jim" wrote: > You might explore using pivot charts in Excel. I > export the data either > manually or in code to a hidden excel worksheet. The > chart does the hard > work. It is very flexible. It is easier to show than > explain so I am sending > you an example. HTH > Jim Hale > > -----Original Message----- > From: Roz Clarke [mailto:roz.clarke at donnslaw.co.uk] > Sent: Thursday, January 29, 2004 12:04 PM > To: 'Access Developers discussion and problem > solving' > Subject: RE: [AccessD] Charts > > > Sorry Stephen, I guess I wasn't clear enough > > I have the column headings set in my cross-tab query > and that works just > fine. The problem is when I try to base a line graph > on that data... I just > can't see a way to do it. > > -----Original Message----- > From: Stephen Bond > [mailto:stephen at bondsoftware.co.nz] > Sent: 29 January 2004 17:34 > To: Access Developers discussion and problem solving > Subject: RE: [AccessD] Charts > > > Making an assumption here that you have a Cross-tab > Q with the month column > header formatted MM ... > > * go to Query Properties, and put something like > this in the 'Column > Headings' entry: 1;2;3;4;5;6;7;8;9;10;11;12 > > This will force a column heading for each month. > > Stephen Bond > > > -----Original Message----- > > From: Roz Clarke > [mailto:roz.clarke at donnslaw.co.uk] > > Sent: Friday, 30 January 2004 5:54 a.m. > > To: 'Access Developers discussion and problem > solving' > > Subject: [AccessD] Charts > > > > > > Hi all. Hope everyone is well. > > > > I have a problem with a chart I need to display in > Access. I > > used to do this > > by exporting data to Excel but the connection to > Excel has > > been so slow and > > unstable that I am now trying to bring it within > Access. > > > > The data I need to display is in a cross-tab > query, where I > > have categories > > as the row header and months of the year as the > column > > header. I need to > > show all the months even though we currently have > data only > > for January. > > > > If I base the chart on the cross-tab, I cannot see > a way to > > tell it that > > each column should be an axis entry. If I base the > chart on a > > select query, > > it correctly allows me to set 'month' as an axis, > but only > > shows me January. > > > > Can anyone help? > > > > TIA > > > > Roz > > _______________________________________________ > > 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 > _______________________________________________ > 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 __________________________________ Do you Yahoo!? Yahoo! SiteBuilder - Free web site building tool. Try it! http://webhosting.yahoo.com/ps/sb/ From roz.clarke at donnslaw.co.uk Fri Jan 30 03:11:02 2004 From: roz.clarke at donnslaw.co.uk (Roz Clarke) Date: Fri, 30 Jan 2004 09:11:02 -0000 Subject: [AccessD] Charts Message-ID: <61F915314798D311A2F800A0C9C83188047C6A25@dibble.observatory.donnslaw.co.uk> Thanks. It looks interesting... if I can get the data link to run smoothly I'll give it a whirl, and even if I can't manage that, it looks like I have things to learn about using pivot tables in Excel. -----Original Message----- From: Hale, Jim [mailto:Jim.Hale at FleetPride.com] Sent: 29 January 2004 19:20 To: 'Access Developers discussion and problem solving' Subject: RE: [AccessD] Charts You might explore using pivot charts in Excel. I export the data either manually or in code to a hidden excel worksheet. The chart does the hard work. It is very flexible. It is easier to show than explain so I am sending you an example. HTH Jim Hale -----Original Message----- From: Roz Clarke [mailto:roz.clarke at donnslaw.co.uk] Sent: Thursday, January 29, 2004 12:04 PM To: 'Access Developers discussion and problem solving' Subject: RE: [AccessD] Charts Sorry Stephen, I guess I wasn't clear enough I have the column headings set in my cross-tab query and that works just fine. The problem is when I try to base a line graph on that data... I just can't see a way to do it. -----Original Message----- From: Stephen Bond [mailto:stephen at bondsoftware.co.nz] Sent: 29 January 2004 17:34 To: Access Developers discussion and problem solving Subject: RE: [AccessD] Charts Making an assumption here that you have a Cross-tab Q with the month column header formatted MM ... * go to Query Properties, and put something like this in the 'Column Headings' entry: 1;2;3;4;5;6;7;8;9;10;11;12 This will force a column heading for each month. Stephen Bond > -----Original Message----- > From: Roz Clarke [mailto:roz.clarke at donnslaw.co.uk] > Sent: Friday, 30 January 2004 5:54 a.m. > To: 'Access Developers discussion and problem solving' > Subject: [AccessD] Charts > > > Hi all. Hope everyone is well. > > I have a problem with a chart I need to display in Access. I used to > do this by exporting data to Excel but the connection to Excel has > been so slow and > unstable that I am now trying to bring it within Access. > > The data I need to display is in a cross-tab query, where I have > categories as the row header and months of the year as the column > header. I need to > show all the months even though we currently have data only > for January. > > If I base the chart on the cross-tab, I cannot see a way to tell it > that each column should be an axis entry. If I base the chart on a > select query, > it correctly allows me to set 'month' as an axis, but only > shows me January. > > Can anyone help? > > TIA > > Roz > _______________________________________________ > 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 _______________________________________________ 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 From roz.clarke at donnslaw.co.uk Fri Jan 30 03:18:06 2004 From: roz.clarke at donnslaw.co.uk (Roz Clarke) Date: Fri, 30 Jan 2004 09:18:06 -0000 Subject: [AccessD] Charts Message-ID: <61F915314798D311A2F800A0C9C83188047C6A26@dibble.observatory.donnslaw.co.uk> I don't know about sledgehammer but it sounds like it could do the job... :) -----Original Message----- From: Stephen Bond [mailto:stephen at bondsoftware.co.nz] Sent: 29 January 2004 19:44 To: Access Developers discussion and problem solving Subject: RE: [AccessD] Charts I see what you're up against - I've never been a fan of Access charts ..... Excel always excels .... I had a bit of a play, I'm afraid my approach has overtones of sledgehammer, but tell me what you think: I created a new local table called tblMasterMonths, one field called MM, type number (byte). Filled the table with 12 records, values 1, 2, 3, ... 12. To build the query underlying the Chart, I took the select query I had (the one that only shows me January) and altered it to include tblMasterMonths, with a Left Join from tblmasterMonths to the query that contains the raw data. This forces months with no data to still have an entry in the output. Use the output from this into the Chart. Stephen Bond > -----Original Message----- > From: Roz Clarke [mailto:roz.clarke at donnslaw.co.uk] > Sent: Friday, 30 January 2004 7:04 a.m. > To: 'Access Developers discussion and problem solving' > Subject: RE: [AccessD] Charts > > > Sorry Stephen, I guess I wasn't clear enough > > I have the column headings set in my cross-tab query and that > works just > fine. The problem is when I try to base a line graph on that > data... I just > can't see a way to do it. > > -----Original Message----- > From: Stephen Bond [mailto:stephen at bondsoftware.co.nz] > Sent: 29 January 2004 17:34 > To: Access Developers discussion and problem solving > Subject: RE: [AccessD] Charts > > > Making an assumption here that you have a Cross-tab Q with > the month column > header formatted MM ... > > * go to Query Properties, and put something like this in the 'Column > Headings' entry: 1;2;3;4;5;6;7;8;9;10;11;12 > > This will force a column heading for each month. > > Stephen Bond > > > -----Original Message----- > > From: Roz Clarke [mailto:roz.clarke at donnslaw.co.uk] > > Sent: Friday, 30 January 2004 5:54 a.m. > > To: 'Access Developers discussion and problem solving' > > Subject: [AccessD] Charts > > > > > > Hi all. Hope everyone is well. > > > > I have a problem with a chart I need to display in Access. I used to > > do this by exporting data to Excel but the connection to Excel has > > been so slow and > > unstable that I am now trying to bring it within Access. > > > > The data I need to display is in a cross-tab query, where I have > > categories as the row header and months of the year as the column > > header. I need to > > show all the months even though we currently have data only > > for January. > > > > If I base the chart on the cross-tab, I cannot see a way to tell it > > that each column should be an axis entry. If I base the chart on a > > select query, > > it correctly allows me to set 'month' as an axis, but only > > shows me January. > > > > Can anyone help? > > > > TIA > > > > Roz > > _______________________________________________ > > 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 > _______________________________________________ > 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 From my.lists at verizon.net Fri Jan 30 04:19:24 2004 From: my.lists at verizon.net (Francisco H Tapia) Date: Fri, 30 Jan 2004 02:19:24 -0800 Subject: [AccessD] OT: Cannot get rid of spam! In-Reply-To: <20040130070811.68143.qmail@web60206.mail.yahoo.com> References: <20040130070811.68143.qmail@web60206.mail.yahoo.com> Message-ID: <401A2FAC.9060809@verizon.net> Plain and simple, you don't the faked' microsoft emails are viruses... i'd not open those if I were you... lastly if you hookinto thes inboxes via an email client such as hotmail popper for hotmail then a nice program like thunderbird or some other 3rd party program, you'll find that you'll almost never see these emails again :) hths. btw, I cc'ed the tech list as this thread can potentially outgrow itself... :) -- -Francisco Sad Der wrote: > Hi group, > > approx 2 weeks ago I saw that my mailbox for my > AccessD-list mail was full. I then saw that I had only > a 'couple' (100+) e-mails in it. I checked my Bulk > folder and it was full with 'microsoft' updates. They > all came from e-mail like: > > qweerejkks at yahoo.com > 2q323312 at yahoo.com > etc. > > I receive these mails every day. They keep comming in > until my mailbox is completely full. > I tried blocking the mailadresses, but since they > change every day that didn't work. > I tried blocking the 'domain' www.yahoo.com, that also > didn't work. > I tried to unsubscribe from the mails, no info about > that in the mails > I checked my Microsoft account, Yahoo account for any > subscriptions and i canceled them all. > Result? The mails keep coming in! > > How do I get rid of these mails? > > TIA!! > > Sander > From gustav at cactus.dk Fri Jan 30 04:52:45 2004 From: gustav at cactus.dk (Gustav Brock) Date: Fri, 30 Jan 2004 11:52:45 +0100 Subject: [AccessD] Using Dates In-Reply-To: <5.1.0.14.2.20040129132506.028deff8@pop3.highstream.net> References: <5.1.0.14.2.20040129132506.028deff8@pop3.highstream.net> Message-ID: <15711059162.20040130115245@cactus.dk> Hi Robert > I have been seeing a lot of people posting lately in many of the lists > about how to do different tings with dates. Here is what I do. I have > what is called a Date Dimension table. A dimension table is one used in > data warehouses. In this case, it is great for relational data also. The > date table has all of the things done to a date that can be done. Yes, Charlotte has mentioned this before and we had a thread touching this (Calculating days, July 2003). The main reason for reluctancy to follow your method would be the large amount of redundant data and the fact that Access is pretty fast in date operations using the built in functions except Format() which is slow. Thus, it may be faster to use Month() than to establish a join to a another table to look up the month of a date. However, there may be situations where that could be advantageous but I can see no reason to store both the month number as well as the string value of the month number. The example Charlotte mentioned was (I think) storing the holiday flag. Indeed, what should be stored in such a table should be values that can not - or only with some difficulty - be calculated like banking days which mostly follows days not being weekends/holidays but not always. Another example is working days. It could be useful to include field like Workingday_of_Month First_Workingday_In_Month_Flag Last_Workingday_In_Month_Flag Also, I would suggest flags stored as Boolean. /gustav > Here is > a sample structure: > Date_ID Date/Time (loaded using the date() function) PK > Year_Nbr Number, integer > Year_Txt Text(4) > Month_Nbr Number, byte > Month_Nbr_Txt Text(2) > Month_Name Text(15) > Month_Name_Abbrv Text(3) > Day_of_Month_Nbr Number, byte > Day_of_Month_Nbr Text(2) > Day_Of_Year_Nbr Number, integer > Week_Of_Year_Nbr Number, byte > Quarter_Nbr Number, byte > Quarter_Nbr_Txt Text(2) > Fiscal_Period Text(10) > Weekday_Flag Text(1) > Holiday_Flag Text(1) > Last_Day_In_Month_Flag Text(1) > By using this table joined to the date, you do not have to do any functions > against a date to filter by month, your, quarter, or whatever. > If anyone has questions about this, just send them to the list and I will > answer them as best I can. > Robert From rbgajewski at adelphia.net Fri Jan 30 05:51:37 2004 From: rbgajewski at adelphia.net (Bob Gajewski) Date: Fri, 30 Jan 2004 06:51:37 -0500 Subject: [AccessD] OT: Cannot get rid of spam! In-Reply-To: <20040130070811.68143.qmail@web60206.mail.yahoo.com> Message-ID: Suggestions: 1) NEVER open these emails, especially if they are from other than a microsoft.com address - and that is no guarantee, as the sending address can be spoofed. 2) NEVER use the "opt out" links included in these emails. All that does is validate to the sender that your email address is valid, and they will send you even more. 3) Invest in a "spam-blocker" software program; there are many reasonably good ones out there, and they are often free or at least low priced. Personally, I have been using "iHateSpam", and it works quite well (cost is about $15 ??). Good Luck! Bob Gajewski -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Sad Der Sent: Friday, January 30, 2004 02:08 To: Acces User Group Subject: [AccessD] OT: Cannot get rid of spam! Hi group, approx 2 weeks ago I saw that my mailbox for my AccessD-list mail was full. I then saw that I had only a 'couple' (100+) e-mails in it. I checked my Bulk folder and it was full with 'microsoft' updates. They all came from e-mail like: qweerejkks at yahoo.com 2q323312 at yahoo.com etc. I receive these mails every day. They keep comming in until my mailbox is completely full. I tried blocking the mailadresses, but since they change every day that didn't work. I tried blocking the 'domain' www.yahoo.com, that also didn't work. I tried to unsubscribe from the mails, no info about that in the mails I checked my Microsoft account, Yahoo account for any subscriptions and i canceled them all. Result? The mails keep coming in! How do I get rid of these mails? TIA!! Sander __________________________________ Do you Yahoo!? Yahoo! SiteBuilder - Free web site building tool. Try it! http://webhosting.yahoo.com/ps/sb/ _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From Bryan_Carbonnell at cbc.ca Fri Jan 30 07:04:00 2004 From: Bryan_Carbonnell at cbc.ca (Bryan Carbonnell) Date: Fri, 30 Jan 2004 08:04:00 -0500 Subject: [AccessD] Getting internet data Message-ID: They are thinking that maybe, just maybe it's time to start following RFC specs for IE? >From RFC 1738: "An HTTP URL takes the form: http://:/? where and are as described in Section 3.1. If : is omitted, the port defaults to 80. No user name or password is allowed. is an HTTP selector, and is a query" Naw, sorry, I must be smoking something funny. Bryan Carbonnell bryan_carbonnell at cbc.ca >>> DWUTKA at marlow.com 28-Jan-04 7:26:05 PM >>> WHAT is microsoft thinking! Grrrr..... Somedays I just think Redmond been smoking something funny! If I download that update, I'm just going to disable it in the registry. I like their user work arounds: Don't use it. Tough. At least, that's what they sounded like! Drew From Bryan_Carbonnell at cbc.ca Fri Jan 30 07:06:28 2004 From: Bryan_Carbonnell at cbc.ca (Bryan Carbonnell) Date: Fri, 30 Jan 2004 08:06:28 -0500 Subject: [AccessD] OT: Cannot get rid of spam! Message-ID: My response to this over on dba-tech. Bryan Carbonnell bryan_carbonnell at cbc.ca >>> rbgajewski at adelphia.net 30-Jan-04 6:51:37 AM >>> Suggestions: 1) NEVER open these emails, especially if they are from other than a microsoft.com address - and that is no guarantee, as the sending address can be spoofed. 2) NEVER use the "opt out" links included in these emails. All that does is validate to the sender that your email address is valid, and they will send you even more. 3) Invest in a "spam-blocker" software program; there are many reasonably good ones out there, and they are often free or at least low priced. Personally, I have been using "iHateSpam", and it works quite well (cost is about $15 ??). Good Luck! Bob Gajewski -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Sad Der Sent: Friday, January 30, 2004 02:08 To: Acces User Group Subject: [AccessD] OT: Cannot get rid of spam! Hi group, approx 2 weeks ago I saw that my mailbox for my AccessD-list mail was full. I then saw that I had only a 'couple' (100+) e-mails in it. I checked my Bulk folder and it was full with 'microsoft' updates. They all came from e-mail like: qweerejkks at yahoo.com 2q323312 at yahoo.com etc. I receive these mails every day. They keep comming in until my mailbox is completely full. I tried blocking the mailadresses, but since they change every day that didn't work. I tried blocking the 'domain' www.yahoo.com, that also didn't work. I tried to unsubscribe from the mails, no info about that in the mails I checked my Microsoft account, Yahoo account for any subscriptions and i canceled them all. Result? The mails keep coming in! How do I get rid of these mails? TIA!! Sander __________________________________ Do you Yahoo!? Yahoo! SiteBuilder - Free web site building tool. Try it! http://webhosting.yahoo.com/ps/sb/ _______________________________________________ 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 From jimdettman at earthlink.net Fri Jan 30 07:23:37 2004 From: jimdettman at earthlink.net (Jim Dettman) Date: Fri, 30 Jan 2004 08:23:37 -0500 Subject: [AccessD] Access as Service In-Reply-To: Message-ID: Drop an e-mail to Drew Wutka. I believe he has played around with that. Jim Dettman President, Online Computer Services of WNY, Inc. (315) 699-3443 jimdettman at earthlink.net -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of ggonzalez at cccis.com Sent: Thursday, January 29, 2004 10:28 AM To: Access Developers discussion and problem solving Subject: Re: [AccessD] Access as Service Has anyone ever had to run an Access application as a service on a computer? if so can you pint me in the direction on how I could do this. Thanks! _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From rl_stewart at highstream.net Fri Jan 30 07:28:58 2004 From: rl_stewart at highstream.net (Robert L. Stewart) Date: Fri, 30 Jan 2004 07:28:58 -0600 Subject: [AccessD] Re: Using Dates In-Reply-To: <200401301304.i0UD4nm19566@databaseadvisors.com> Message-ID: <5.1.0.14.2.20040130072451.028f4078@pop3.highstream.net> Charlotte, I have a function that I run that populates the table with about 100 years of data. Since that is only a little over 36,500 rows, it is relatively small. The only thing that has to be done then is to define holidays for each year. After it is created, it makes handling dates so much simpler for end users and programmers alike. ;-) Robert At 07:04 AM 1/30/2004 -0600, you wrote: >Date: Thu, 29 Jan 2004 12:34:58 -0800 >From: "Charlotte Foust" >Subject: RE: [AccessD] Using Dates >To: "Access Developers discussion and problem solving" > >Message-ID: > >Content-Type: text/plain; charset="us-ascii" > >Yes, it's a very effective tool for doing date filtering in queries and >reports. I've used it in data warehouse type applications and also >where users wanted to be able to get results for the last 6 months and >compare that to the same period last year or some similar kind of time >frame slicing and dicing. The biggest problem with it is creating the >code to keep it updated. I usually only updated it once a year to add >the new year's values. > >Charlotte Foust From rl_stewart at highstream.net Fri Jan 30 07:41:18 2004 From: rl_stewart at highstream.net (Robert L. Stewart) Date: Fri, 30 Jan 2004 07:41:18 -0600 Subject: [AccessD] Re: Using Dates In-Reply-To: <200401301304.i0UD4nm19566@databaseadvisors.com> Message-ID: <5.1.0.14.2.20040130073341.029d9da0@pop3.highstream.net> Gustav, Since I am using SQL Server for all my BEs, I use Char(1) for the Flag columns. Personal preference since I do not like to deal with 0 and 1 or -1. In Access (JET) itself, I would store it as a boolean. There are a number of other columns that I have in the actual one that I use. And, I actually keep the Fiscal Period in a related table because of the possibility of have different departments/companies operating under different Fiscal Periods. I was trying to keep the example simple. A join is generally cheaper than doing the calculations. Though that is not always the case. Also, since I do use SQL Server, I do this join in a view on the server side and not on the client. Thanks for adding to my post. It is great when we can exchange ideas. ;-) Robert At 07:04 AM 1/30/2004 -0600, you wrote: >From: Gustav Brock >Subject: Re: [AccessD] Using Dates >To: Access Developers discussion and problem solving > >Message-ID: <15711059162.20040130115245 at cactus.dk> >Content-Type: text/plain; charset=us-ascii > >Hi Robert > > > I have been seeing a lot of people posting lately in many of the lists > > about how to do different tings with dates. Here is what I do. I have > > what is called a Date Dimension table. A dimension table is one used in > > data warehouses. In this case, it is great for relational data also. The > > date table has all of the things done to a date that can be done. > >Yes, Charlotte has mentioned this before and we had a thread touching >this (Calculating days, July 2003). > >The main reason for reluctancy to follow your method would be the >large amount of redundant data and the fact that Access is pretty fast >in date operations using the built in functions except Format() which >is slow. Thus, it may be faster to use Month() than to establish a >join to a another table to look up the month of a date. However, there >may be situations where that could be advantageous but I can see no >reason to store both the month number as well as the string value of >the month number. > >The example Charlotte mentioned was (I think) storing the holiday >flag. Indeed, what should be stored in such a table should be values >that can not - or only with some difficulty - be calculated like >banking days which mostly follows days not being weekends/holidays but >not always. >Another example is working days. It could be useful to include field >like > > Workingday_of_Month > First_Workingday_In_Month_Flag > Last_Workingday_In_Month_Flag > >Also, I would suggest flags stored as Boolean. > >/gustav From gustav at cactus.dk Fri Jan 30 07:54:57 2004 From: gustav at cactus.dk (Gustav Brock) Date: Fri, 30 Jan 2004 14:54:57 +0100 Subject: [AccessD] Re: Using Dates In-Reply-To: <5.1.0.14.2.20040130073341.029d9da0@pop3.highstream.net> References: <5.1.0.14.2.20040130073341.029d9da0@pop3.highstream.net> Message-ID: <19921990590.20040130145457@cactus.dk> Hi Robert OK. I had Jet in mind. /gustav > Since I am using SQL Server for all my BEs, I use Char(1) for the Flag > columns. Personal preference since I do not like to deal with 0 and 1 or > -1. In Access (JET) itself, I would store it as a boolean. There are a > number of other columns that I have in the actual one that I use. And, I > actually keep the Fiscal Period in a related table because of the > possibility of have different departments/companies operating under > different Fiscal Periods. I was trying to keep the example simple. > A join is generally cheaper than doing the calculations. Though that is > not always the case. Also, since I do use SQL Server, I do this join in a > view on the server side and not on the client. > Thanks for adding to my post. It is great when we can exchange ideas. ;-) > Robert > At 07:04 AM 1/30/2004 -0600, you wrote: >>From: Gustav Brock >>Subject: Re: [AccessD] Using Dates >>To: Access Developers discussion and problem solving >> >>Message-ID: <15711059162.20040130115245 at cactus.dk> >>Content-Type: text/plain; charset=us-ascii >> >>Hi Robert >> >> > I have been seeing a lot of people posting lately in many of the lists >> > about how to do different tings with dates. Here is what I do. I have >> > what is called a Date Dimension table. A dimension table is one used in >> > data warehouses. In this case, it is great for relational data also. The >> > date table has all of the things done to a date that can be done. >> >>Yes, Charlotte has mentioned this before and we had a thread touching >>this (Calculating days, July 2003). >> >>The main reason for reluctancy to follow your method would be the >>large amount of redundant data and the fact that Access is pretty fast >>in date operations using the built in functions except Format() which >>is slow. Thus, it may be faster to use Month() than to establish a >>join to a another table to look up the month of a date. However, there >>may be situations where that could be advantageous but I can see no >>reason to store both the month number as well as the string value of >>the month number. >> >>The example Charlotte mentioned was (I think) storing the holiday >>flag. Indeed, what should be stored in such a table should be values >>that can not - or only with some difficulty - be calculated like >>banking days which mostly follows days not being weekends/holidays but >>not always. >>Another example is working days. It could be useful to include field >>like >> >> Workingday_of_Month >> First_Workingday_In_Month_Flag >> Last_Workingday_In_Month_Flag >> >>Also, I would suggest flags stored as Boolean. >> >>/gustav From stuart at lexacorp.com.pg Fri Jan 30 07:45:23 2004 From: stuart at lexacorp.com.pg (Stuart McLachlan) Date: Fri, 30 Jan 2004 23:45:23 +1000 Subject: [AccessD] Getting internet data In-Reply-To: Message-ID: <401AEC93.8817.36B3596@localhost> What? MS follow the RFCs, you've definitely been smoking something funny :-) On 30 Jan 2004 at 8:04, Bryan Carbonnell wrote: > They are thinking that maybe, just maybe it's time to start following > RFC specs for IE? > > >From RFC 1738: > > "An HTTP URL takes the form: > > http://:/? > > where and are as described in Section 3.1. If : > is omitted, the port defaults to 80. No user name or password is > allowed. is an HTTP selector, and is a query" > > Naw, sorry, I must be smoking something funny. > > Bryan Carbonnell > bryan_carbonnell at cbc.ca > > >>> DWUTKA at marlow.com 28-Jan-04 7:26:05 PM >>> > WHAT is microsoft thinking! Grrrr..... Somedays I just think Redmond > been > smoking something funny! > > If I download that update, I'm just going to disable it in the > registry. > > I like their user work arounds: > Don't use it. > Tough. > > At least, that's what they sounded like! > > Drew > > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com -- Lexacorp Ltd http://www.lexacorp.com.pg Information Technology Consultancy, Software Development,System Support. From jwcolby at colbyconsulting.com Fri Jan 30 07:58:19 2004 From: jwcolby at colbyconsulting.com (John W. Colby) Date: Fri, 30 Jan 2004 08:58:19 -0500 Subject: [AccessD] Getting ALL word instances Message-ID: Folks, I am trying to clean up after my merge stuff. If the user fails to close the document, I have to do so before I can continue. My mail stuff opens two documents, which appear to be TWO instances of word. Further the user may already have a document of their own open. It LOOKS like when several word documents are open, each one is an instance of word. There is an icon in the toolbar for each document. I have the following code (which works, kind of): Public objWord As Word.Application Function OpenWord() As Word.Application On Error Resume Next Set objWord = GetObject(, "Word.Application") If objWord Is Nothing Then Else objWord.Visible = True End If End Function Function TestWrdClose() OpenWord objWord.Quit False Set objWord = Nothing End Function The problem is, that if I have three docs open, when I call TestWrdClose ONE TIME, all word docs close. So.... I need to close any instances of word that I opened, yet leave any instances that THEY opened. I know (think) I can use code like First question... Is it possible to open an instance of Word and give it a "name" such that I can search for that "name", get a handle to that instance, and then close it?. Second question... I assume that in order to close it, all I need to do is use the application.close once I have a handle? Or is it just a simple matter of closing all my own documents, then seeing if any documents are open, and if not closing the word instance? John W. Colby www.ColbyConsulting.com From Bryan_Carbonnell at cbc.ca Fri Jan 30 08:12:21 2004 From: Bryan_Carbonnell at cbc.ca (Bryan Carbonnell) Date: Fri, 30 Jan 2004 09:12:21 -0500 Subject: [AccessD] Getting internet data Message-ID: Yea, that's what I thought too. :-)) Bryan Carbonnell bryan_carbonnell at cbc.ca >>> stuart at lexacorp.com.pg 30-Jan-04 8:45:23 AM >>> What? MS follow the RFCs, you've definitely been smoking something funny :-) On 30 Jan 2004 at 8:04, Bryan Carbonnell wrote: > They are thinking that maybe, just maybe it's time to start following > RFC specs for IE? From John.Clark at niagaracounty.com Fri Jan 30 08:14:54 2004 From: John.Clark at niagaracounty.com (John Clark) Date: Fri, 30 Jan 2004 09:14:54 -0500 Subject: [AccessD] Question of process Message-ID: Thanks for all the input on this dilemma. And sorry it took so long to respond, but, while doing this, something else arose. It turns out that they don't always have an SSN, so I am not sure how to tell exactly who is who. I know I can match by name and DOB, and that will probably work, but I don't think I can guarantee the integrity by doing this. I have discussed with them some 'procedural' modifications. It seems that it might be a possibility to get SSNs before entering, if their procedures changed. This is also important, because lawyers, as a group, seem to be more particular about their names. For instance, if I was a lawyer, I might not go by, "John W Clark," but rather, "J Wallace Clark," and this is how I would be in the system. Yet, if I were to be processed for a crime, the police agency would probably list me by the "First, Middle Init, Last" format. They have confirmed this thinking, but also conceded that this is a rarity; having only happened once in the last dozen or so years. It will be in my documentation though--just to save my butt, when it happens that second time, which given my luck will probably happen about a month after I deliver the program. Thanks again! PS I will reserve the right to revisit this topic, at a later time! Take care! J Wallace Clark (I'm going to act lawyerish) >>> DWUTKA at marlow.com 01/28/04 04:29PM >>> I think you just need to apply the rules of normalization here. Build a 'person' table, with information that is common no matter what 'type' they are. Then, if you need more information for a particular type, build a table for the extra information, but give it a foriegn key field back to the person table. That way, the person ID will interrelate all types that a person is. Drew -----Original Message----- From: John Clark [mailto:John.Clark at niagaracounty.com] Sent: Wednesday, January 28, 2004 9:39 AM To: accessd at databaseadvisors.com Subject: [AccessD] Question of process I am beginning a new project. The purpose of this program will be to track indictment cases for the District Attorney's office. My question isn't so much technical, like usual, but rather 'technique'. I'll start with a scenario: Lets say I am a Asst. DA, so I am in the system as such. Then after a couple of years, I go into private practice and become a defense attorney; I may now be in the system as the lawyer for a defendant. Now let's assume that I am assaulted and my attacker is charged, so now I am in this system as a victim of this case. Finally, I cross over to the dark side (I know lawyers are already there), and I am indicted for a crime of my own. I will now be in the system as a defendant, a victim, a defense attorney, and an ADA...these last two, very probably, several times. My situation is that I would like to bring up every instance of a person fitting this description, or similar ones. For Instance a report of the previous example might produce the following: JOHN W CLARK #2001-023 ADA #2001-102 ADA #2001-140 ADA #2002-334 ATTORNEY #2003-153 ATTORNEY #2003-543 VICTIM #2003-654 ATTORNEY #2004-030 DEFENDANT I had originally thought to create a table for the 'types' (i.e. attorney, ADA, victim, etc.), a table with names and personal info, an indictment table, and link these all via a fourth table, but this soon seemed insufficient. The average indictment number will have at least five people connected to it (Defendant, Attorney, ADA, Victim, and Judge), and possibly many more, with multiple victims and/or co-defendants. Am I over thinking this? Would it just be as simple as having a table for each type and searching these tables by indictment number later in the program? I thought that maybe, by typing this out, it would be clearer in my mind, by the time I was done, but I am still fuzzy with it! Thanks for any insight or advise you could give me! John W Clark _______________________________________________ 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 From Lambert.Heenan at AIG.com Fri Jan 30 08:18:14 2004 From: Lambert.Heenan at AIG.com (Heenan, Lambert) Date: Fri, 30 Jan 2004 09:18:14 -0500 Subject: [AccessD] OT: Cannot get rid of spam! Message-ID: <8B98F8EA48F8BA47A2F24E0D0AF40CF407AD7D79@xlivmbx12.aig.com> Check out K9 at http://www.keir.net/k9.html Works a treat and it's postcardware. > -----Original Message----- > From: Sad Der [SMTP:accessd666 at yahoo.com] > Sent: Friday, January 30, 2004 2:08 AM > To: Acces User Group > Subject: [AccessD] OT: Cannot get rid of spam! > > Hi group, > > approx 2 weeks ago I saw that my mailbox for my > AccessD-list mail was full. I then saw that I had only > a 'couple' (100+) e-mails in it. I checked my Bulk > folder and it was full with 'microsoft' updates. They > all came from e-mail like: > > qweerejkks at yahoo.com > 2q323312 at yahoo.com > etc. > > I receive these mails every day. They keep comming in > until my mailbox is completely full. > I tried blocking the mailadresses, but since they > change every day that didn't work. > I tried blocking the 'domain' www.yahoo.com, that also > didn't work. > I tried to unsubscribe from the mails, no info about > that in the mails > I checked my Microsoft account, Yahoo account for any > subscriptions and i canceled them all. > Result? The mails keep coming in! > > How do I get rid of these mails? > > TIA!! > > Sander > > __________________________________ > Do you Yahoo!? > Yahoo! SiteBuilder - Free web site building tool. Try it! > http://webhosting.yahoo.com/ps/sb/ > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com From John.Clark at niagaracounty.com Fri Jan 30 08:22:42 2004 From: John.Clark at niagaracounty.com (John Clark) Date: Fri, 30 Jan 2004 09:22:42 -0500 Subject: [AccessD] This should be simple...but... Message-ID: On a form I am working on, I am trying to provide 'leading dots', between the label and text box. I want to make all labels equal by doing this, which means some will have more or less dots than others. I usually don't do this, because of what I am now experiencing; they don't all line up. They are slightly off, but enough to notice. EXAMPLE: (These are slightly off also) Name ....................: Address .................: City ........................: St ..........................: Zip .........................: Any ideas on this? Maybe even alternatives? Thanks, J Wallace Clark (Hey, this lawerese is kinda fun) From Bryan_Carbonnell at cbc.ca Fri Jan 30 08:29:24 2004 From: Bryan_Carbonnell at cbc.ca (Bryan Carbonnell) Date: Fri, 30 Jan 2004 09:29:24 -0500 Subject: [AccessD] Getting ALL word instances Message-ID: > It LOOKS like when several word documents are open, each one is an instance > of word. There is an icon in the toolbar for each document. I have the > following code (which works, kind of): What version of Word are you dealing with? Word 2K (and Higher I think) actually only open one instance of Word, but put each document in it's own "button" in the task bar. If want to visually verify that you only have one instance open, have a look at the Close buttons in the Upper right corner. If you have two documents open, when looking at either document you should only have a close button in the title bar if the docs are in the instance of Word. If you have a close button in the tile bar AND the menu bar, then you have two separate instances of Word open. I see a couple of problems with your code. Basically what I don't see is how you deal with Word not being opened at all. Here is how I deal with automating word: 'Get pointer to Word Object ' Handle Error In-Line On Error Resume Next Set objWord = GetObject(, "Word.Application") If Err.Number = 429 Then 'If we got an error, that means there was no Word Instance Set objWord = CreateObject("Word.Application") 'Set Flag to let us know we opened Word bolOpenedWord = True End If 'Make Word Instance visible objWord.Visible = True 'Reset Error Handler On Error GoTo 0 'Do your processing stuff here 'Time to close up shop 'Did we create the Word instance we are using ' or did we reuse an open instance? If bolOpenedWord = True Then 'We created an instance, so now we need to close it. objWord.Quit End If Set objWord = Nothing Does this sort of answer your question? Basically yyou need to keep track of if you open Word or are reusing an already opened instance of Word and only closing Word if YOU created it. You will still need to close your docs though. Bryan Carbonnell bryan_carbonnelL at cbc.ca >>> jwcolby at colbyconsulting.com 30-Jan-04 8:58:19 AM >>> Folks, I am trying to clean up after my merge stuff. If the user fails to close the document, I have to do so before I can continue. My mail stuff opens two documents, which appear to be TWO instances of word. Further the user may already have a document of their own open. It LOOKS like when several word documents are open, each one is an instance of word. There is an icon in the toolbar for each document. I have the following code (which works, kind of): Public objWord As Word.Application Function OpenWord() As Word.Application On Error Resume Next Set objWord = GetObject(, "Word.Application") If objWord Is Nothing Then Else objWord.Visible = True End If End Function Function TestWrdClose() OpenWord objWord.Quit False Set objWord = Nothing End Function The problem is, that if I have three docs open, when I call TestWrdClose ONE TIME, all word docs close. So.... I need to close any instances of word that I opened, yet leave any instances that THEY opened. I know (think) I can use code like First question... Is it possible to open an instance of Word and give it a "name" such that I can search for that "name", get a handle to that instance, and then close it?. Second question... I assume that in order to close it, all I need to do is use the application.close once I have a handle? Or is it just a simple matter of closing all my own documents, then seeing if any documents are open, and if not closing the word instance? John W. Colby www.ColbyConsulting.com _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From wdhindman at bellsouth.net Fri Jan 30 08:53:40 2004 From: wdhindman at bellsouth.net (William Hindman) Date: Fri, 30 Jan 2004 09:53:40 -0500 Subject: [AccessD] This should be simple...but... References: Message-ID: <007e01c3e740$db594610$6101a8c0@dejpolsys> John ...www.lebans.com has a sample mdb on how to produce and manage leader dots ...HTH :) William Hindman Government is not reason, government is not persuasion, government is force. It is a dangerous servant." G. Washington ----- Original Message ----- From: "John Clark" To: Sent: Friday, January 30, 2004 9:22 AM Subject: [AccessD] This should be simple...but... > On a form I am working on, I am trying to provide 'leading dots', > between the label and text box. I want to make all labels equal by doing > this, which means some will have more or less dots than others. I > usually don't do this, because of what I am now experiencing; they don't > all line up. They are slightly off, but enough to notice. > > EXAMPLE: (These are slightly off also) > > Name ....................: > Address .................: > City ........................: > St ..........................: > Zip .........................: > > Any ideas on this? Maybe even alternatives? > > Thanks, > J Wallace Clark (Hey, this lawerese is kinda fun) > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com > From Bryan_Carbonnell at cbc.ca Fri Jan 30 09:01:50 2004 From: Bryan_Carbonnell at cbc.ca (Bryan Carbonnell) Date: Fri, 30 Jan 2004 10:01:50 -0500 Subject: [AccessD] This should be simple...but... Message-ID: John, The easiest way is to use a fixed width font, such as Courier, for the label font. Bryan Carbonnell bryan_carbonnell at cbc.ca >>> John.Clark at niagaracounty.com 30-Jan-04 9:22:42 AM >>> On a form I am working on, I am trying to provide 'leading dots', between the label and text box. I want to make all labels equal by doing this, which means some will have more or less dots than others. I usually don't do this, because of what I am now experiencing; they don't all line up. They are slightly off, but enough to notice. EXAMPLE: (These are slightly off also) Name ....................: Address .................: City ........................: St ..........................: Zip .........................: Any ideas on this? Maybe even alternatives? From JColby at dispec.com Fri Jan 30 09:26:54 2004 From: JColby at dispec.com (Colby, John) Date: Fri, 30 Jan 2004 10:26:54 -0500 Subject: [AccessD] Getting ALL word instances Message-ID: <05C61C52D7CAD211A7830008C7DF6F1079BD0D@DISABILITYINS01> >What version of Word are you dealing with? Office2K or XP >Basically yyou need to keep track of if you open Word or are reusing an already opened instance of Word and only closing Word if YOU created it. You will still need to close your docs though. That's what I thought. Thanks, John W. Colby The database guy -----Original Message----- From: Bryan Carbonnell [mailto:Bryan_Carbonnell at cbc.ca] Sent: Friday, January 30, 2004 9:29 AM To: accessd at databaseadvisors.com Subject: Re: [AccessD] Getting ALL word instances > It LOOKS like when several word documents are open, each one is an instance > of word. There is an icon in the toolbar for each document. I have the > following code (which works, kind of): What version of Word are you dealing with? Word 2K (and Higher I think) actually only open one instance of Word, but put each document in it's own "button" in the task bar. If want to visually verify that you only have one instance open, have a look at the Close buttons in the Upper right corner. If you have two documents open, when looking at either document you should only have a close button in the title bar if the docs are in the instance of Word. If you have a close button in the tile bar AND the menu bar, then you have two separate instances of Word open. I see a couple of problems with your code. Basically what I don't see is how you deal with Word not being opened at all. Here is how I deal with automating word: 'Get pointer to Word Object ' Handle Error In-Line On Error Resume Next Set objWord = GetObject(, "Word.Application") If Err.Number = 429 Then 'If we got an error, that means there was no Word Instance Set objWord = CreateObject("Word.Application") 'Set Flag to let us know we opened Word bolOpenedWord = True End If 'Make Word Instance visible objWord.Visible = True 'Reset Error Handler On Error GoTo 0 'Do your processing stuff here 'Time to close up shop 'Did we create the Word instance we are using ' or did we reuse an open instance? If bolOpenedWord = True Then 'We created an instance, so now we need to close it. objWord.Quit End If Set objWord = Nothing Does this sort of answer your question? Basically yyou need to keep track of if you open Word or are reusing an already opened instance of Word and only closing Word if YOU created it. You will still need to close your docs though. Bryan Carbonnell bryan_carbonnelL at cbc.ca >>> jwcolby at colbyconsulting.com 30-Jan-04 8:58:19 AM >>> Folks, I am trying to clean up after my merge stuff. If the user fails to close the document, I have to do so before I can continue. My mail stuff opens two documents, which appear to be TWO instances of word. Further the user may already have a document of their own open. It LOOKS like when several word documents are open, each one is an instance of word. There is an icon in the toolbar for each document. I have the following code (which works, kind of): Public objWord As Word.Application Function OpenWord() As Word.Application On Error Resume Next Set objWord = GetObject(, "Word.Application") If objWord Is Nothing Then Else objWord.Visible = True End If End Function Function TestWrdClose() OpenWord objWord.Quit False Set objWord = Nothing End Function The problem is, that if I have three docs open, when I call TestWrdClose ONE TIME, all word docs close. So.... I need to close any instances of word that I opened, yet leave any instances that THEY opened. I know (think) I can use code like First question... Is it possible to open an instance of Word and give it a "name" such that I can search for that "name", get a handle to that instance, and then close it?. Second question... I assume that in order to close it, all I need to do is use the application.close once I have a handle? Or is it just a simple matter of closing all my own documents, then seeing if any documents are open, and if not closing the word instance? John W. Colby www.ColbyConsulting.com _______________________________________________ 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 From cfoust at infostatsystems.com Fri Jan 30 10:03:20 2004 From: cfoust at infostatsystems.com (Charlotte Foust) Date: Fri, 30 Jan 2004 08:03:20 -0800 Subject: [AccessD] Using Dates Message-ID: You misunderstood me, Gustav. I indeed have used something like what Robert described. The reason is that the dimension table can then be used directly as a rowsource for comboboxes, etc. and when joined to another table on the date key, it makes it very simple to query out something like the last 6 months without resorting to any kind of date manipulation but just using the month numbers. What might not have been clear is that those month numbers aren't necessarily just 1 to 12. There's usually also a month number from the start of the table, as there is a running year number. It may also include a quarter in year column and a quarter number from start. It looks a bit bizarre until you learn how useful it can be It is actually a fast technique since it is designed to filter data in very large tables quickly. You want the data for last year? Look at the date, find the year number and then look all the records where the year number is 1 less. You don't have to manipulate dates at all that way and you can use integer math. A dimension table does, indeed, contain "redundant" data because that is the way that kind of table is designed. It is not a data entry table at all. It is strictly a lookup table and its only purpose is to provide a fast way to return a set of specific records without doing a bunch of calculations. I don't build one for a hundred year period, because my clients usually want a specific start date, and I build from that. Charlotte Foust -----Original Message----- From: Gustav Brock [mailto:gustav at cactus.dk] Sent: Friday, January 30, 2004 2:53 AM To: Access Developers discussion and problem solving Subject: Re: [AccessD] Using Dates Hi Robert > I have been seeing a lot of people posting lately in many of the lists > about how to do different tings with dates. Here is what I do. I > have what is called a Date Dimension table. A dimension table is one > used in data warehouses. In this case, it is great for relational > data also. The date table has all of the things done to a date that > can be done. Yes, Charlotte has mentioned this before and we had a thread touching this (Calculating days, July 2003). The main reason for reluctancy to follow your method would be the large amount of redundant data and the fact that Access is pretty fast in date operations using the built in functions except Format() which is slow. Thus, it may be faster to use Month() than to establish a join to a another table to look up the month of a date. However, there may be situations where that could be advantageous but I can see no reason to store both the month number as well as the string value of the month number. The example Charlotte mentioned was (I think) storing the holiday flag. Indeed, what should be stored in such a table should be values that can not - or only with some difficulty - be calculated like banking days which mostly follows days not being weekends/holidays but not always. Another example is working days. It could be useful to include field like Workingday_of_Month First_Workingday_In_Month_Flag Last_Workingday_In_Month_Flag Also, I would suggest flags stored as Boolean. /gustav > Here is > a sample structure: > Date_ID Date/Time (loaded using the date() function) PK > Year_Nbr Number, integer > Year_Txt Text(4) > Month_Nbr Number, byte > Month_Nbr_Txt Text(2) > Month_Name Text(15) > Month_Name_Abbrv Text(3) > Day_of_Month_Nbr Number, byte > Day_of_Month_Nbr Text(2) > Day_Of_Year_Nbr Number, integer > Week_Of_Year_Nbr Number, byte > Quarter_Nbr Number, byte > Quarter_Nbr_Txt Text(2) > Fiscal_Period Text(10) > Weekday_Flag Text(1) > Holiday_Flag Text(1) > Last_Day_In_Month_Flag Text(1) > By using this table joined to the date, you do not have to do any > functions > against a date to filter by month, your, quarter, or whatever. > If anyone has questions about this, just send them to the list and I > will > answer them as best I can. > Robert _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From Oleg_123 at xuppa.com Fri Jan 30 10:46:32 2004 From: Oleg_123 at xuppa.com (Oleg_123 at xuppa.com) Date: Fri, 30 Jan 2004 11:46:32 -0500 (EST) Subject: [AccessD] macro can't find function In-Reply-To: <007101c3e68b$55342830$b274d0d5@minster33c3r25> References: <8B98F8EA48F8BA47A2F24E0D0AF40CF407AD7D71@xlivmbx12.aig.com> <007101c3e68b$55342830$b274d0d5@minster33c3r25> Message-ID: <41912.12.3.132.98.1075481192.squirrel@heck.bay9.com> still gives me the same error :--( > Beat me to it Lambert :-) > > Andy Lacey > http://www.minstersystems.co.uk > >> -----Original Message----- >> From: accessd-bounces at databaseadvisors.com >> [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of >> Heenan, Lambert >> Sent: 29 January 2004 17:08 >> To: 'Access Developers discussion and problem solving' >> Subject: RE: [AccessD] macro can't find function >> >> >> I'd suggest you get rid of the space between "BreakName" and >> the opening parentheses. >> >> Lambert >> >> > -----Original Message----- >> > From: Oleg_123 at xuppa.com [SMTP:Oleg_123 at xuppa.com] >> > Sent: Thursday, January 29, 2004 11:52 AM >> > To: accessd at databaseadvisors.com >> > Subject: RE: [AccessD] macro can't find function >> > >> > it's public (of course ;-) >> > and this is how it looks -- BreakName () >> > >> > i decided to try to make that macro call another macro >> which contains >> > the function >> > >> > > Oleg >> > > >> > > In a macro the function has to be expressed as fn(), ie. >> no = sign >> > > before it but must have the parentheses. May be worth >> checking. Oh >> > > and the function must of course be Public. >> > > >> > > Andy Lacey >> > > http://www.minstersystems.co.uk >> > > >> > >> -----Original Message----- >> > >> From: accessd-bounces at databaseadvisors.com >> > >> [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of >> Oleg_123 at xuppa.com >> > >> Sent: 29 January 2004 16:12 >> > >> To: accessd at databaseadvisors.com >> > >> Subject: RE: [AccessD] macro can't find function >> > >> >> > >> >> > >> Group, >> > >> >> > >> I have a long macro that opens several queries, at the end its >> suppose to RunCode - function, however it gives me an >> message "The >> > >> expression you entered has a function name that xxx can't find". >> When I run that function separetely it works fine, and >> the name is >> > >> spelled correctly since i didn't type it but selected it using >> their device what should i do ? >> > >> >> > >> >> > >> ----------------------------------------- >> > >> Get Breaking News from CNN, ABC, NBC, CBS Now. >> > >> http://www.xuppa.com/news/?link=webmail >> > >> >> > >> >> > >> >> > >> _______________________________________________ >> > >> AccessD mailing list >> > >> AccessD at databaseadvisors.com >> > >> http://databaseadvisors.com/mailman/listinfo/a> ccessd >> > >> Website: >> > >> http://www.databaseadvisors.com >> > >> >> > >> >> > > >> > > _______________________________________________ >> > > AccessD mailing list >> > > AccessD at databaseadvisors.com >> > > http://databaseadvisors.com/mailman/listinfo/accessd >> > > Website: http://www.databaseadvisors.com >> > >> > >> > >> > ----------------------------------------- >> > Get Breaking News from CNN, ABC, NBC, CBS Now. >> > http://www.xuppa.com/news/?link=webmail >> > >> > >> > _______________________________________________ >> > 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/a> ccessd >> Website: >> http://www.databaseadvisors.com >> >> > > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com ----------------------------------------- Get Breaking News from CNN, ABC, NBC, CBS Now. http://www.xuppa.com/news/?link=webmail From Bryan_Carbonnell at cbc.ca Fri Jan 30 11:33:42 2004 From: Bryan_Carbonnell at cbc.ca (Bryan Carbonnell) Date: Fri, 30 Jan 2004 12:33:42 -0500 Subject: [AccessD] Getting ALL word instances Message-ID: What I said about the close buttons should hold for XP, except, IIRC, there is a setting that will allow you to switch Word back to an MDI interface, like W97 and not an SDI like W2K. Bryan Carbonnell bryan_carbonnell at cbc.ca >>> JColby at dispec.com 30-Jan-04 10:26:54 AM >>> >What version of Word are you dealing with? Office2K or XP >Basically yyou need to keep track of if you open Word or are reusing an already opened instance of Word and only closing Word if YOU created it. You will still need to close your docs though. That's what I thought. Thanks, John W. Colby The database guy -----Original Message----- From: Bryan Carbonnell [mailto:Bryan_Carbonnell at cbc.ca] Sent: Friday, January 30, 2004 9:29 AM To: accessd at databaseadvisors.com Subject: Re: [AccessD] Getting ALL word instances > It LOOKS like when several word documents are open, each one is an instance > of word. There is an icon in the toolbar for each document. I have the > following code (which works, kind of): What version of Word are you dealing with? Word 2K (and Higher I think) actually only open one instance of Word, but put each document in it's own "button" in the task bar. If want to visually verify that you only have one instance open, have a look at the Close buttons in the Upper right corner. If you have two documents open, when looking at either document you should only have a close button in the title bar if the docs are in the instance of Word. If you have a close button in the tile bar AND the menu bar, then you have two separate instances of Word open. I see a couple of problems with your code. Basically what I don't see is how you deal with Word not being opened at all. Here is how I deal with automating word: 'Get pointer to Word Object ' Handle Error In-Line On Error Resume Next Set objWord = GetObject(, "Word.Application") If Err.Number = 429 Then 'If we got an error, that means there was no Word Instance Set objWord = CreateObject("Word.Application") 'Set Flag to let us know we opened Word bolOpenedWord = True End If 'Make Word Instance visible objWord.Visible = True 'Reset Error Handler On Error GoTo 0 'Do your processing stuff here 'Time to close up shop 'Did we create the Word instance we are using ' or did we reuse an open instance? If bolOpenedWord = True Then 'We created an instance, so now we need to close it. objWord.Quit End If Set objWord = Nothing Does this sort of answer your question? Basically yyou need to keep track of if you open Word or are reusing an already opened instance of Word and only closing Word if YOU created it. You will still need to close your docs though. Bryan Carbonnell bryan_carbonnelL at cbc.ca >>> jwcolby at colbyconsulting.com 30-Jan-04 8:58:19 AM >>> Folks, I am trying to clean up after my merge stuff. If the user fails to close the document, I have to do so before I can continue. My mail stuff opens two documents, which appear to be TWO instances of word. Further the user may already have a document of their own open. It LOOKS like when several word documents are open, each one is an instance of word. There is an icon in the toolbar for each document. I have the following code (which works, kind of): Public objWord As Word.Application Function OpenWord() As Word.Application On Error Resume Next Set objWord = GetObject(, "Word.Application") If objWord Is Nothing Then Else objWord.Visible = True End If End Function Function TestWrdClose() OpenWord objWord.Quit False Set objWord = Nothing End Function The problem is, that if I have three docs open, when I call TestWrdClose ONE TIME, all word docs close. So.... I need to close any instances of word that I opened, yet leave any instances that THEY opened. I know (think) I can use code like First question... Is it possible to open an instance of Word and give it a "name" such that I can search for that "name", get a handle to that instance, and then close it?. Second question... I assume that in order to close it, all I need to do is use the application.close once I have a handle? Or is it just a simple matter of closing all my own documents, then seeing if any documents are open, and if not closing the word instance? John W. Colby www.ColbyConsulting.com _______________________________________________ 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 _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From KIsmert at TexasSystems.com Fri Jan 30 11:25:25 2004 From: KIsmert at TexasSystems.com (Ken Ismert) Date: Fri, 30 Jan 2004 11:25:25 -0600 Subject: [AccessD] Using Dates In-Reply-To: <15711059162.20040130115245@cactus.dk> Message-ID: <004401c3e756$0c898a50$2a3ca8c0@TEXASSYSTEMS.COM> Gustav, In my estimation, the simplicity and flexibility that the Date Dimension table provides will outweigh its drawbacks for all but the most basic of date query tasks. For example, with a Date table, it would be possible to write a single parameterized query that would provide answers for a wide range of date related questions, like: * All January sales in the table * All sales for weeks with a holiday since 2000 * All weekend sales for June, July and August of 2002 The results could easily be returned an any text or numeric date format desired. While you could do all of this with date calculations and the Format function in one query, it would be very complex, and the computational overhead would likely be prohibitive. You'd probably be forced to break it into smaller queries, with the added maintainance that entails. Alternately, you could build a custom WHERE clause for each question, but you've only moved the complexity from the query to code. It also shines when you need to calculate working day intervals, as mentioned. I wish I had known about Date tables when I was developing a Purchase Order Expediting module, which needed to know the number of working days between the Order Date and the Required date. Using a properly setup Date table would have simplified my code, and provided better results. -Ken -----Original Message----- From: Gustav Brock [mailto:gustav at cactus.dk] Sent: Friday, January 30, 2004 4:53 AM To: Access Developers discussion and problem solving Subject: Re: [AccessD] Using Dates Hi Robert > I have been seeing a lot of people posting lately in many of the lists > about how to do different tings with dates. Here is what I do. I have > what is called a Date Dimension table. A dimension table is one used in > data warehouses. In this case, it is great for relational data also. The > date table has all of the things done to a date that can be done. Yes, Charlotte has mentioned this before and we had a thread touching this (Calculating days, July 2003). The main reason for reluctancy to follow your method would be the large amount of redundant data and the fact that Access is pretty fast in date operations using the built in functions except Format() which is slow. Thus, it may be faster to use Month() than to establish a join to a another table to look up the month of a date. However, there may be situations where that could be advantageous but I can see no reason to store both the month number as well as the string value of the month number. The example Charlotte mentioned was (I think) storing the holiday flag. Indeed, what should be stored in such a table should be values that can not - or only with some difficulty - be calculated like banking days which mostly follows days not being weekends/holidays but not always. Another example is working days. It could be useful to include field like Workingday_of_Month First_Workingday_In_Month_Flag Last_Workingday_In_Month_Flag Also, I would suggest flags stored as Boolean. /gustav > Here is > a sample structure: > Date_ID Date/Time (loaded using the date() function) PK > Year_Nbr Number, integer > Year_Txt Text(4) > Month_Nbr Number, byte > Month_Nbr_Txt Text(2) > Month_Name Text(15) > Month_Name_Abbrv Text(3) > Day_of_Month_Nbr Number, byte > Day_of_Month_Nbr Text(2) > Day_Of_Year_Nbr Number, integer > Week_Of_Year_Nbr Number, byte > Quarter_Nbr Number, byte > Quarter_Nbr_Txt Text(2) > Fiscal_Period Text(10) > Weekday_Flag Text(1) > Holiday_Flag Text(1) > Last_Day_In_Month_Flag Text(1) > By using this table joined to the date, you do not have to do any functions > against a date to filter by month, your, quarter, or whatever. > If anyone has questions about this, just send them to the list and I will > answer them as best I can. > Robert From HollisVJ at pgdp.usec.com Fri Jan 30 11:52:20 2004 From: HollisVJ at pgdp.usec.com (Hollis,Virginia) Date: Fri, 30 Jan 2004 11:52:20 -0600 Subject: [AccessD] Code Not Working in XP Message-ID: <618EB4D6DDCDD3119B0A00508B6FD37A0CB0CFE0@cntexchange.pgdp.usec.com> Do you know what needed to be changed with the permissions? I talked to IT about the problem and they do not know what I am talking about. They said they need specifics. I do not know enough about XP or how they have the permissions set up to give them an answer. Virginia -----Original Message----- From: Perry Harold [mailto:pharold at proftesting.com] Sent: Thursday, January 29, 2004 6:35 PM To: 'Access Developers discussion and problem solving' Subject: RE: [AccessD] Code Not Working in XP Maybe something with the permission settings on the XP boxes. Had something similar that worked great with 98 & did the same thing as yours when switching to XP until some permissions were set to allow them access to the shared resources. Perry Harold -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Hollis,Virginia Sent: Thursday, January 29, 2004 11:29 AM To: 'accessD at databaseadvisors.com' Subject: [AccessD] Code Not Working in XP I have been using the code shown below to access data on our Intranet. The code matches a field entry in the database and looks up the details. In this example it finds a stock number. Problem: The code does not work for users that are running XP. It does not do anything, it will not even try to access the web. They click the button and nothing happens. What can I do to correct this for users of XP? Virginia _____ strPath = " http://web.com/vr.asp?xml=orafin%2Stock= strFile = strPath & Me.StockNumber If Dir(strFile) = "" Then strFile = strPath & Me.StockNumber End If Call fHandleFile(strFile, WIN_MAX) _______________________________________________ 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 From JColby at dispec.com Fri Jan 30 11:58:44 2004 From: JColby at dispec.com (Colby, John) Date: Fri, 30 Jan 2004 12:58:44 -0500 Subject: [AccessD] Using Dates Message-ID: <05C61C52D7CAD211A7830008C7DF6F1079BD12@DISABILITYINS01> I have to assume though that you only create these as required for reporting? The overhead would be enormous otherwise. John W. Colby The database guy -----Original Message----- From: Ken Ismert [mailto:KIsmert at TexasSystems.com] Sent: Friday, January 30, 2004 12:25 PM To: 'Access Developers discussion and problem solving' Subject: RE: [AccessD] Using Dates Gustav, In my estimation, the simplicity and flexibility that the Date Dimension table provides will outweigh its drawbacks for all but the most basic of date query tasks. For example, with a Date table, it would be possible to write a single parameterized query that would provide answers for a wide range of date related questions, like: * All January sales in the table * All sales for weeks with a holiday since 2000 * All weekend sales for June, July and August of 2002 The results could easily be returned an any text or numeric date format desired. While you could do all of this with date calculations and the Format function in one query, it would be very complex, and the computational overhead would likely be prohibitive. You'd probably be forced to break it into smaller queries, with the added maintainance that entails. Alternately, you could build a custom WHERE clause for each question, but you've only moved the complexity from the query to code. It also shines when you need to calculate working day intervals, as mentioned. I wish I had known about Date tables when I was developing a Purchase Order Expediting module, which needed to know the number of working days between the Order Date and the Required date. Using a properly setup Date table would have simplified my code, and provided better results. -Ken -----Original Message----- From: Gustav Brock [mailto:gustav at cactus.dk] Sent: Friday, January 30, 2004 4:53 AM To: Access Developers discussion and problem solving Subject: Re: [AccessD] Using Dates Hi Robert > I have been seeing a lot of people posting lately in many of the lists > about how to do different tings with dates. Here is what I do. I have > what is called a Date Dimension table. A dimension table is one used in > data warehouses. In this case, it is great for relational data also. The > date table has all of the things done to a date that can be done. Yes, Charlotte has mentioned this before and we had a thread touching this (Calculating days, July 2003). The main reason for reluctancy to follow your method would be the large amount of redundant data and the fact that Access is pretty fast in date operations using the built in functions except Format() which is slow. Thus, it may be faster to use Month() than to establish a join to a another table to look up the month of a date. However, there may be situations where that could be advantageous but I can see no reason to store both the month number as well as the string value of the month number. The example Charlotte mentioned was (I think) storing the holiday flag. Indeed, what should be stored in such a table should be values that can not - or only with some difficulty - be calculated like banking days which mostly follows days not being weekends/holidays but not always. Another example is working days. It could be useful to include field like Workingday_of_Month First_Workingday_In_Month_Flag Last_Workingday_In_Month_Flag Also, I would suggest flags stored as Boolean. /gustav > Here is > a sample structure: > Date_ID Date/Time (loaded using the date() function) PK > Year_Nbr Number, integer > Year_Txt Text(4) > Month_Nbr Number, byte > Month_Nbr_Txt Text(2) > Month_Name Text(15) > Month_Name_Abbrv Text(3) > Day_of_Month_Nbr Number, byte > Day_of_Month_Nbr Text(2) > Day_Of_Year_Nbr Number, integer > Week_Of_Year_Nbr Number, byte > Quarter_Nbr Number, byte > Quarter_Nbr_Txt Text(2) > Fiscal_Period Text(10) > Weekday_Flag Text(1) > Holiday_Flag Text(1) > Last_Day_In_Month_Flag Text(1) > By using this table joined to the date, you do not have to do any functions > against a date to filter by month, your, quarter, or whatever. > If anyone has questions about this, just send them to the list and I will > answer them as best I can. > Robert _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From bchacc at san.rr.com Fri Jan 30 12:00:16 2004 From: bchacc at san.rr.com (Rocky Smolin - Beach Access Software) Date: Fri, 30 Jan 2004 10:00:16 -0800 Subject: [AccessD] Error 2468 - You can'tcarry out this action at thepresent time - notsolved References: <024001c3e610$66b99750$6601a8c0@HAL9002> <00ed01c3e688$1dd64bf0$6601a8c0@HAL9002> Message-ID: <013b01c3e75a$eb743400$6601a8c0@HAL9002> Charlotte (or anybody else with a wild idea): This is the strangest Access problem I've ever encountered. I have tracked the problem down to one field on the sub-form. When I delete that field, everything works. The field is named fldPODUnitCost and is the unit cost of the purchase order detail line. (BTW, I checked the back end definition of this field and didn't see anything different from the other numeric fields.) On the theory that there was some difference in a property of this text box from one that was working, I tried deleting the text box, copying the text box which holds the quantity ordered (fldPODQuantityOrdered) and changing the name and Control Source back to fldPODUnitCost. No luck. Then I tried deleting the fldPODUnitCost and dropping it in fresh from the Field List. Same problem. Here's two strange things: 1) there are two calculated fields on the sub-form which use fldPODUnitCost the extension (=[fldPODUnitCost]*[fldPODQuantityOrdered]) and the total of the lines (=Sum([fldPODUnitCost]*[fldPODQuantityOrdered])). These fields both display the correct information even though fldPODUnitCost isn't on the form. 2) there's a line of code in a procedure which referenced fldPODUnitCost: Me.fldPODUnitCost = rs!MaterialCost which pulls the unit cost from the Part Master table - a DAO record set. When I step through the code (F8) it sails right through this line as if the control was there and inserts the right value from rs!MaterialCost. But it ain't there. What do you make of this? Thanks in advance, Rocky Smolin Beach Access Software ----- Original Message ----- > > > "Any way you look at it, it pays to make sure you know where you are > before > > you try to do anything. " > > > > Good advice at any time. Brain fade dictates I address this in the a.m. > > Thanks for your input and have a nice night. > > > > Rocky > > > > > > ----- Original Message ----- > > From: "Charlotte Foust" > > To: "Access Developers discussion and problem solving" > > > > Sent: Wednesday, January 28, 2004 5:16 PM > > Subject: RE: [AccessD] Error 2468 - You > > can'tcarryoutthisactionatthepresenttime. > > > > > > > Yep, the command button wizard still writes Access 95 code. Cute, huh? > > > > > > Is there anything else on your form that has a connection to the same > > > table the parent form is based on? If not, then you need to make sure > > > there is a current record before you try deleting again. You might > > > stick some debug.print code in there to print the current Me.fldPOPrefix > > > or return the Me.NewRecord flag to see where you are. If you wind up on > > > a new record by deleting the last record in the recordset, then you'll > > > get an error if you try to go to a new record. If you're on the new > > > record when you try to delete, you'll get an error because there is no > > > current record. If you have started to create a new record, you can't > > > delete it because it isn't saved, and you can't go to NewRecord for the > > > same reason. Any way you look at it, it pays to make sure you know > > > where you are before you try to do anything. > > > > > > Charlotte Foust > > > > > > -----Original Message----- > > > From: Rocky Smolin - Beach Access Software [mailto:bchacc at san.rr.com] > > > Sent: Wednesday, January 28, 2004 5:07 PM > > > To: Access Developers discussion and problem solving > > > Subject: Re: [AccessD] Error 2468 - You > > > can'tcarryoutthisactionatthepresenttime. > > > > > > > > > Trying to delete from the parent form. A parent record that has no > > > child records. > > > > > > For delete what should I use: DoCmd.RunCommand acDeleteRecord? > > > > > > That code came from the command button wizard. > > > > > > Rocky > > > > > > ----- Original Message ----- > > > From: "Charlotte Foust" > > > To: "Access Developers discussion and problem solving" > > > > > > Sent: Wednesday, January 28, 2004 4:22 PM > > > Subject: RE: [AccessD] Error 2468 - You can't > > > carryoutthisactionatthepresenttime. > > > > > > > > > > Ack! Lose that old A95 code, please! I can't even read it any more. > > > > Comment out the SetWarnings False and see what Access tells you about > > > > the operation. > > > > > > > > HOY! I just noticed that you appear to be running this from the > > > > parent form. Which form are you trying to delete a record from? > > > > > > > > Charlotte Foust > > > > > > > > -----Original Message----- > > > > From: Rocky Smolin - Beach Access Software [mailto:bchacc at san.rr.com] > > > > Sent: Wednesday, January 28, 2004 4:18 PM > > > > To: Access Developers discussion and problem solving > > > > Subject: Re: [AccessD] Error 2468 - You can't carry > > > > outthisactionatthepresenttime. > > > > > > > > > > > > Rats. No soap. Got the error on the second delete after adding the > > > > dbengineidle and the subfrm requery like this: > > > > > > > > > > > > DoCmd.SetWarnings False > > > > DoCmd.DoMenuItem acFormBar, acEditMenu, 8, , acMenuVer70 > > > > DoCmd.DoMenuItem acFormBar, acEditMenu, 6, , acMenuVer70 > > > > DoCmd.SetWarnings True > > > > > > > > DBEngine.Idle dbRefreshCache > > > > > > > > Me.Requery > > > > Me!subfrmPODetail.Requery > > > > > > > > Any other ideas? > > > > > > > > Thanks and regards, > > > > > > > > Rocky > > > > > > > > ----- Original Message ----- > > > > From: "Charlotte Foust" > > > > To: "Access Developers discussion and problem solving" > > > > > > > > Sent: Wednesday, January 28, 2004 3:47 PM > > > > Subject: RE: [AccessD] Error 2468 - You can't carry out > > > > thisactionatthepresenttime. > > > > > > > > > > > > > Rocky, > > > > > > > > > > I suspect you're running into an issue I've seen in somewhat similar > > > > > > > > circumstances, where the deletion didn't actually seem to get > > > > > processed until I requeried the subform. Have you tried a > > > > > DBEngine.Idle dbRefreshCache after the deletion? > > > > > > > > > > Charlotte Foust > > > > > > > > > > -----Original Message----- > > > > > From: Rocky Smolin - Beach Access Software > > > > > [mailto:bchacc at san.rr.com] > > > > > Sent: Wednesday, January 28, 2004 2:13 PM > > > > > To: Access Developers discussion and problem solving > > > > > Subject: Re: [AccessD] Error 2468 - You can't carry out > > > > > thisactionatthepresent time. > > > > > > > > > > > > > > > Charlotte: > > > > > > > > > > Further to my reply, I found that when I did a delete then, before I > > > > > > > > did anything else, I went and looked in the tblPOHeader and the > > > > > record > > > > > > > > > was still there. For some reason it's not completing the delete and > > > > > > > > that's why I think it's telling me that I can't make any moves at > > > > > this > > > > > > > > > time. > > > > > > > > > > Rocky > > > > > > > > > > ----- Original Message ----- > > > > > From: "Charlotte Foust" > > > > > To: "Access Developers discussion and problem solving" > > > > > > > > > > Sent: Wednesday, January 28, 2004 1:20 PM > > > > > Subject: RE: [AccessD] Error 2468 - You can't carry out this > > > > > actionatthepresent time. > > > > > > > > > > > > > > > > It sounds like you may have the parent and child forms linked to > > > > > > the > > > > > > > > > > same dataset. Do you? > > > > > > > > > > > > Charlotte Foust > > > > > > > > > > > > -----Original Message----- > > > > > > From: Rocky Smolin - Beach Access Software > > > > > > [mailto:bchacc at san.rr.com] > > > > > > Sent: Wednesday, January 28, 2004 1:04 PM > > > > > > To: Access Developers discussion and problem solving > > > > > > Subject: Re: [AccessD] Error 2468 - You can't carry out this > > > > > > action atthepresent time. > > > > > > > > > > > > > > > > > > I'm getting closer. I deleted the sub-form that on the second tab > > > > > > > > > of the tab form and the two deletes worked. > > > > > > > > > > > > It has something to do with a sub form on a tab. Any clues, > > > > > > anybody? > > > > > > > > > > > > Rocky > > > > > > > > > > > > ----- Original Message ----- > > > > > > From: "Joe K Anderson" > > > > > > To: "Rocky Smolin - Beach Access Software" ; > > > > > > > > > > > > Cc: "Wayne Warren Angelucci" ; "Gordon > > > > > > Bennett" ; "Barry Hynum" > > > > > > ; "Dixon Foss" ; "Mark > > > > > > Krisburg" > > > > > > > > > > > > > > > > Sent: Wednesday, January 28, 2004 11:44 AM > > > > > > Subject: Re: [AccessD] Error 2468 - You can't carry out this > > > > > > action at thepresent time. > > > > > > > > > > > > > > > > > > You may need to do a Requery between deletes? > > > > > > > > > > > > joe > > > > > > ----- Original Message ----- > > > > > > From: Rocky Smolin - Beach Access Software > > > > > > To: Access Developers discussion and problem solving > > > > > > Cc: Wayne Warren Angelucci ; Mark Krisburg ; Joe Anderson ; > > > > > > Gordon > > > > > > > > > > Bennett ; Dixon Foss ; Bob Heygood ; Barry Hynum > > > > > > Sent: 01-28-2004 11:34 > > > > > > Subject: Re: [AccessD] Error 2468 - You can't carry out this > > > > > > action at the present time. > > > > > > > > > > > > > > > > > > Randall: > > > > > > > > > > > > Tried this experiment just to get the DAO recordset out of the > > > > > > way. > > > > > I > > > > > > deleted all references to it. > > > > > > > > > > > > Then I replaced: > > > > > > > > > > > > 'DoCmd.SetWarnings False > > > > > > 'DoCmd.DoMenuItem acFormBar, acEditMenu, 8, , acMenuVer70 > > > > > > 'DoCmd.DoMenuItem acFormBar, acEditMenu, 6, , acMenuVer70 > > > > > > 'DoCmd.SetWarnings True > > > > > > > > > > > > with > > > > > > > > > > > > DoCmd.RunCommand acCmdDelete > > > > > > > > > > > > I selected a record and ran that code which does the delete. > > > > > > Then > > > > > > > > > > before > > > > > > trying to delete the second record, I checked the table and the > > > > > > record was > > > > > > still there! > > > > > > > > > > > > So the delete (and probably other operations) are not completing > > > > > > > > > for > > > > > > > > > > > some > > > > > > reason. > > > > > > > > > > > > Pluse, when I get the error, I have to use the task manager to > > > > > > clear > > > > > > > > > > > access. > > > > > > It won't quit, cant close any forms, etc. > > > > > > > > > > > > Any ideas? > > > > > > > > > > > > Many thanks in advance and regards, > > > > > > > > > > > > is > > > > > > > > > > > > ----- Original Message ----- > > > > > > From: "Randall Anthony" > > > > > > To: "'Access Developers discussion and problem solving'" > > > > > > > > > > > > Sent: Wednesday, January 28, 2004 10:31 AM > > > > > > Subject: RE: [AccessD] Error 2468 - You can't carry out this > > > > > > action at the > > > > > > present time. > > > > > > > > > > > > > > > > > > > Right off the top of my head, it has to do with the movefirst, > > > > > > > > > movelast. > > > > > > I > > > > > > > ran into this when converting A97 to A2K. Code worked in A97, > > > > > > > > > not > > > > > > > > > > > A2K and > > > > > > > M$ said this was designed behavior. I'll try to find the > > > > article. > > > > > > > > > > > > > > -----Original Message----- > > > > > > > From: Rocky Smolin - Beach Access Software > > > > > > [mailto:bchacc at san.rr.com] > > > > > > > Sent: Wednesday, January 28, 2004 1:07 PM > > > > > > > To: AccessD at databaseadvisors.com > > > > > > > Subject: [AccessD] Error 2468 - You can't carry out this > > > > > > action at > > > > > > > > > > > the > > > > > > > present time. > > > > > > > > > > > > > > Dear List: > > > > > > > > > > > > > > I am getting the following error message on a bound form: > > > > > > > > > > > > > > Error 2468 - You can't carry out this action at the present > > > > time. > > > > > > > > > > > > > > This form has a sub form linked to the main form by the main > > > > > form's > > > > > > primary > > > > > > > key. (Main form is P.O. Header, subform is P.O. Detail). > > > > > > > > > > > > > > I get this error if I try to delete two records in a row. > > > > > > > > > > > > > > DoCmd.SetWarnings False > > > > > > > DoCmd.DoMenuItem acFormBar, acEditMenu, 8, , acMenuVer70 > > > > > > > DoCmd.DoMenuItem acFormBar, acEditMenu, 6, , acMenuVer70 > > > > > > > DoCmd.SetWarnings True > > > > > > > > > > > > > > I also get this error after I try to add a record. The > > > > > > problem started > > > > > > > because I wanted to get the last PO in the file, add one to > > > > > > the PO > > > > > > > > > > > number, > > > > > > > and put the prefix and the new PO number ito the new record: > > > > > > > > > > > > > > DoCmd.GoToRecord , , acNewRec > > > > > > > > > > > > > > 'If rstPOHeader.RecordCount <> 0 Then > > > > > > > ' rstPOHeader.MoveLast > > > > > > > ' Me.fldPOPrefix = Nz(rstPOHeader!fldPOPrefix) > > > > > > > ' If IsNumeric(rstPOHeader!fldPONumber) Then > > > > > > > ' Me.fldPONumber = rstPOHeader!fldPONumber + 1 > > > > > > > ' fldPOOrderDate.SetFocus > > > > > > > ' Else > > > > > > > ' Me.fldPONumber.SetFocus > > > > > > > ' End If > > > > > > > 'End If > > > > > > > 'If Nz(Me.fldPOPrefix) = "" And > > > Nz(rstPOHeader!fldPOPrefix) > > > > = > > > > > "" > > > > > > Then > > > > > > _ > > > > > > > Me.fldPOPrefix.SetFocus > > > > > > > > > > > > > > Right now the code is commented out. If I uncomment the two > > > > > lines: > > > > > > > > > > > > > > ' rstPOHeader.MoveLast > > > > > > > ' Me.fldPOPrefix = Nz(rstPOHeader!fldPOPrefix) > > > > > > > > > > > > > > I get the error when I try to save: > > > > > > > > > > > > > > DoCmd.DoMenuItem acFormBar, acRecordsMenu, acSaveRecord, , > > > > > > acMenuVer70 > > > > > > > > > > > > > > I checked the web and there is nothing. Has anyone > > > > > > encountered > > > > > this > > > > > > before? > > > > > > > > > > > > > > Thanks and regards, > > > > > > > > > > > > > > Rocky Smolin > > > > > > > Beach Access Software > > > > > > > _______________________________________________ > > > > > > > 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 > > > > > > > > > > > > > _______________________________________________ > > > > > > 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 > > > > > > _______________________________________________ > > > > > > 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 > > > > > _______________________________________________ > > > > > 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 > > > > _______________________________________________ > > > > 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 > > > _______________________________________________ > > > 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 > > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com > From hoopesg at hotmail.com Fri Jan 30 12:12:00 2004 From: hoopesg at hotmail.com (Gina Hoopes) Date: Fri, 30 Jan 2004 12:12:00 -0600 Subject: [AccessD] DatePart Question Message-ID: This may be a dumb question, but here goes. I have a table full of data that I need to query, and what I need returned is the data from last month. If I query the Max on DatePart("m",PeriodEnd) on the data that's there now, I get a 12 which is correct (from 12/31/03). But, next month we will have added January '04 data, so the latest data in the PeriodEnd field will be 1/31/04, but when I query for just the month, am I going to get a 1? I guess I'm asking if the Max function is still going to look at the whole date and return just the DatePart of "m", or will 12 be considered alone, and therefore greater than 1? I'm always open to an easier method, if you've got any ideas. Thanks, Gina _________________________________________________________________ High-speed users?be more efficient online with the new MSN Premium Internet Software. http://join.msn.com/?pgmarket=en-us&page=byoa/prem&ST=1 From KIsmert at TexasSystems.com Fri Jan 30 11:44:49 2004 From: KIsmert at TexasSystems.com (Ken Ismert) Date: Fri, 30 Jan 2004 11:44:49 -0600 Subject: [AccessD] Interface Callback Class Questions. In-Reply-To: <000201c3e6d7$30d74fc0$6501a8c0@RG> Message-ID: <004601c3e758$c24313a0$2a3ca8c0@TEXASSYSTEMS.COM> Robert, Oh, now you're getting greedy! ;-) The report object can't sink section events. Likely, you'd have to invent a section class that sinks section events. You'd need to make a collection of Section objects for all the sections used in your report, and have them hook the OnPrint or OnFormat events for their individual section. The collection would be maintained in your Report object, so its responsibilities would expand to hooking report events, setting up the section collection, having them hook their section events, and possibly servicing the section object requests. -Ken -----Original Message----- From: Robert Gracie [mailto:Subscriptions at servicexp.com] Sent: Thursday, January 29, 2004 8:17 PM To: 'Access Developers discussion and problem solving' Subject: RE: [AccessD] Interface Callback Class Questions. Ken, Thanks A Million!! Yep the report did not have module....:-), and that solved the problem... How in the world do I sink the OnPrint, or OnFormat events... with mrRpt.Section(acDetail).OnPrint = pcsEventStub I think I have tried every possible stub, and it seems like it's just ignored.... Thanks Again!! Robert Gracie From dw-murphy at cox.net Fri Jan 30 12:21:30 2004 From: dw-murphy at cox.net (Doug Murphy) Date: Fri, 30 Jan 2004 10:21:30 -0800 Subject: [AccessD] Error # 3343 Unrecognized database format In-Reply-To: Message-ID: <001601c3e75d$e4fcbf90$8500a8c0@CX615377a> Thanks Greg and Rocky, I visited the customer and found that the problem, while still unaceptable, is something that happens infrequently. When I got the call it sounded like it was happening every time they used the DB. Fortunately every time they close the system down it backs itself up. The network they use has just kind of grown so there are lots of places network errors could be introduced. The good thing is they will be upgrading their network soon so hopefully this will be a thing of the past. Doug Douglas Murphy Murphy's Creativity (619) 334-5121 doug at murphyscreativity.com www.murphyscreativity.com -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Greg Smith Sent: Thursday, January 29, 2004 6:21 AM To: Access Developers discussion and problem solving Subject: Re: [AccessD] Error # 3343 Unrecognized database format Doug: I've seen this before. One of my clients has A97 FE and BE and occasionally gets the "Unrecognized db ... error". Their MIS guy has found that almost every time it happened they had a bad switch, bad NIC, or bad wiring which was causing the user's FE to break the connection improperly, leaving the BE in a questionable state. Of course, the same thing can occur if users reboot their computers or reset them without logging out of Access first. HTH! Greg Smith weeden1949 at hotmail.com ----- Original Message ----- From: "Doug Murphy" To: "'Access Developers discussion and problem solving'" Sent: Wednesday, January 28, 2004 5:44 PM Subject: [AccessD] Error # 3343 Unrecognized database format Folks, I have a client who has started getting an Error #3343 on their back end DB. The DB is Access 97. From what I can find on this error it usually has to do with database writes being interupted or hard shutdowns. They claim that there have been no changes to thier network and that all etc. etc. _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From bchacc at san.rr.com Fri Jan 30 12:27:12 2004 From: bchacc at san.rr.com (Rocky Smolin - Beach Access Software) Date: Fri, 30 Jan 2004 10:27:12 -0800 Subject: [AccessD] Displaying the Control SOurce of a text box Message-ID: <014401c3e75e$adf03ad0$6601a8c0@HAL9002> Dear List: I'm trying to display the control source of a text box. I can get the name - ctl.Name - but can't find the syntax for getting the control source. Anybody know? MTIA, Rocky Smolin Beach Access Software From bchacc at san.rr.com Fri Jan 30 12:38:56 2004 From: bchacc at san.rr.com (Rocky Smolin - Beach Access Software) Date: Fri, 30 Jan 2004 10:38:56 -0800 Subject: [AccessD] This should be simple...but... References: Message-ID: <017201c3e760$5197b7c0$6601a8c0@HAL9002> John: Could you set the width of the label to a fixed width? That should cut off the dots no matter how many there are. This is not a solution to your problem but if I have a bunch of text boxes aligned vertically with labels to the left, I right align the labels with a colon at the end and it looks real nice. HTH Rocky ----- Original Message ----- From: "John Clark" To: Sent: Friday, January 30, 2004 6:22 AM Subject: [AccessD] This should be simple...but... > On a form I am working on, I am trying to provide 'leading dots', > between the label and text box. I want to make all labels equal by doing > this, which means some will have more or less dots than others. I > usually don't do this, because of what I am now experiencing; they don't > all line up. They are slightly off, but enough to notice. > > EXAMPLE: (These are slightly off also) > > Name ....................: > Address .................: > City ........................: > St ..........................: > Zip .........................: > > Any ideas on this? Maybe even alternatives? > > Thanks, > J Wallace Clark (Hey, this lawerese is kinda fun) > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com > From bchacc at san.rr.com Fri Jan 30 12:39:53 2004 From: bchacc at san.rr.com (Rocky Smolin - Beach Access Software) Date: Fri, 30 Jan 2004 10:39:53 -0800 Subject: [AccessD] Error # 3343 Unrecognized database format References: <001601c3e75d$e4fcbf90$8500a8c0@CX615377a> Message-ID: <018e01c3e760$73c801b0$6601a8c0@HAL9002> Hopefully they won't automatically back up their corrupted database... Rocky ----- Original Message ----- From: "Doug Murphy" To: "'Access Developers discussion and problem solving'" Sent: Friday, January 30, 2004 10:21 AM Subject: RE: [AccessD] Error # 3343 Unrecognized database format > Thanks Greg and Rocky, > > I visited the customer and found that the problem, while still > unaceptable, is something that happens infrequently. When I got the > call it sounded like it was happening every time they used the DB. > Fortunately every time they close the system down it backs itself up. > The network they use has just kind of grown so there are lots of places > network errors could be introduced. The good thing is they will be > upgrading their network soon so hopefully this will be a thing of the > past. > > Doug > > Douglas Murphy > Murphy's Creativity > (619) 334-5121 > doug at murphyscreativity.com > www.murphyscreativity.com > > > > > -----Original Message----- > From: accessd-bounces at databaseadvisors.com > [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Greg Smith > Sent: Thursday, January 29, 2004 6:21 AM > To: Access Developers discussion and problem solving > Subject: Re: [AccessD] Error # 3343 Unrecognized database format > > > Doug: > > I've seen this before. One of my clients has A97 FE and BE and > occasionally gets the "Unrecognized db ... error". Their MIS guy has > found that almost every time it happened they had a bad switch, bad NIC, > or bad wiring which was causing the user's FE to break the connection > improperly, leaving the BE in a questionable state. Of course, the same > thing can occur if users reboot their computers or reset them without > logging out of Access first. > > HTH! > > Greg Smith > weeden1949 at hotmail.com > > > ----- Original Message ----- > From: "Doug Murphy" > To: "'Access Developers discussion and problem solving'" > > Sent: Wednesday, January 28, 2004 5:44 PM > Subject: [AccessD] Error # 3343 Unrecognized database format > > > Folks, > > I have a client who has started getting an Error #3343 on their back end > DB. The DB is Access 97. From what I can find on this error it usually > has to do with database writes being interupted or hard shutdowns. They > claim that there have been no changes to thier network and that all etc. > etc. _______________________________________________ > 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 From rl_stewart at highstream.net Fri Jan 30 12:53:58 2004 From: rl_stewart at highstream.net (Robert L. Stewart) Date: Fri, 30 Jan 2004 12:53:58 -0600 Subject: [AccessD] Re: This should be simple...but... In-Reply-To: <200401301800.i0UI0Qm16112@databaseadvisors.com> Message-ID: <5.1.0.14.2.20040130125205.0299c820@pop3.highstream.net> Use a pad function to chance the text displayed and change the font to a mono-spaced font. Here is the function. Watch out for line wrap. Function PadString(strText As String, intWidth As Integer, _ strSide As String, Optional strPad As String = " ") As String ' Pad strText on either side, so the whole output is ' at least intWidth characters. ' If strText is longer than intWidth, just return strText. ' If strPad is wider than one character, this code only takes ' the first character for padding with it. ' Parameters: ' strText: ' Input text ' intWidth: ' Minimum width of the output. If ' Len(strText) < intWidth, then the ' output will be exactly intWidth characters ' wide. The code will not truncate strText, ' no matter what. ' strSide: ' This is either L or R for Left or Right ' strPad (Optional, default is " "): ' string whose first character will ' be used to pad the output. ' Returns: ' Return Value: ' strText, padded on the specified side with ' the first character of strPad. ' Example: ' PadString("Name", 10, "R", ".") returns ' "Name......" ' If Len(strText) > intWidth Then PadString = strText End If If strSide = "R" Then PadString = Left$(strText & String(intWidth, strPad), intWidth) Else PadString = Right$(String(intWidth, strPad) & strText, intWidth) End If End Function This will not align text to the center, only left or right. Paste this into a module, then in the immediate window type ? PadString("Name", 10, "R", ".") You should see Name...... Robert At 12:00 PM 1/30/2004 -0600, you wrote: >Date: Fri, 30 Jan 2004 09:22:42 -0500 >From: "John Clark" >Subject: [AccessD] This should be simple...but... >To: >Message-ID: >Content-Type: text/plain; charset=US-ASCII > >On a form I am working on, I am trying to provide 'leading dots', >between the label and text box. I want to make all labels equal by doing >this, which means some will have more or less dots than others. I >usually don't do this, because of what I am now experiencing; they don't >all line up. They are slightly off, but enough to notice. > >EXAMPLE: (These are slightly off also) > >Name ....................: >Address .................: >City ........................: >St ..........................: >Zip .........................: > >Any ideas on this? Maybe even alternatives? > >Thanks, >J Wallace Clark (Hey, this lawerese is kinda fun) From KIsmert at TexasSystems.com Fri Jan 30 12:39:56 2004 From: KIsmert at TexasSystems.com (Ken Ismert) Date: Fri, 30 Jan 2004 12:39:56 -0600 Subject: [AccessD] Using Dates In-Reply-To: <05C61C52D7CAD211A7830008C7DF6F1079BD12@DISABILITYINS01> Message-ID: <005c01c3e760$759e6f60$2a3ca8c0@TEXASSYSTEMS.COM> Right. My first example was an ad-hoc reporting type of thing. The second, PO Expediting, is a nightly ETL process that reads all active POs from the accounting system, compares it with receiving, flags late orders, and compiles a list of everything that needs follow up. As far as the overhead, Robert's table had about 102 bytes per date record. Rounding that up to 8 records per kilobyte, you could fit over 22 years worth of data in a megabyte - not a big table by most standards. Indexing against 8 byte datetime fields adds additional overhead, but if that was a concern, you could store and index dates as Modified Julian Dates, which would usually require no more than a smallint. -Ken -----Original Message----- From: Colby, John [mailto:JColby at dispec.com] Sent: Friday, January 30, 2004 11:59 AM To: 'Access Developers discussion and problem solving' Subject: RE: [AccessD] Using Dates I have to assume though that you only create these as required for reporting? The overhead would be enormous otherwise. John W. Colby The database guy -----Original Message----- From: Ken Ismert [mailto:KIsmert at TexasSystems.com] Sent: Friday, January 30, 2004 12:25 PM To: 'Access Developers discussion and problem solving' Subject: RE: [AccessD] Using Dates Gustav, In my estimation, the simplicity and flexibility that the Date Dimension table provides will outweigh its drawbacks for all but the most basic of date query tasks. For example, with a Date table, it would be possible to write a single parameterized query that would provide answers for a wide range of date related questions, like: * All January sales in the table * All sales for weeks with a holiday since 2000 * All weekend sales for June, July and August of 2002 The results could easily be returned an any text or numeric date format desired. While you could do all of this with date calculations and the Format function in one query, it would be very complex, and the computational overhead would likely be prohibitive. You'd probably be forced to break it into smaller queries, with the added maintainance that entails. Alternately, you could build a custom WHERE clause for each question, but you've only moved the complexity from the query to code. It also shines when you need to calculate working day intervals, as mentioned. I wish I had known about Date tables when I was developing a Purchase Order Expediting module, which needed to know the number of working days between the Order Date and the Required date. Using a properly setup Date table would have simplified my code, and provided better results. -Ken From JColby at dispec.com Fri Jan 30 12:56:36 2004 From: JColby at dispec.com (Colby, John) Date: Fri, 30 Jan 2004 13:56:36 -0500 Subject: [AccessD] Error # 3343 Unrecognized database format Message-ID: <05C61C52D7CAD211A7830008C7DF6F1079BD19@DISABILITYINS01> >Hopefully they won't automatically back up their corrupted database... lol. You can bet on it! John W. Colby The database guy -----Original Message----- From: Rocky Smolin - Beach Access Software [mailto:bchacc at san.rr.com] Sent: Friday, January 30, 2004 1:40 PM To: Access Developers discussion and problem solving Subject: Re: [AccessD] Error # 3343 Unrecognized database format Hopefully they won't automatically back up their corrupted database... Rocky ----- Original Message ----- From: "Doug Murphy" To: "'Access Developers discussion and problem solving'" Sent: Friday, January 30, 2004 10:21 AM Subject: RE: [AccessD] Error # 3343 Unrecognized database format > Thanks Greg and Rocky, > > I visited the customer and found that the problem, while still > unaceptable, is something that happens infrequently. When I got the > call it sounded like it was happening every time they used the DB. > Fortunately every time they close the system down it backs itself up. > The network they use has just kind of grown so there are lots of places > network errors could be introduced. The good thing is they will be > upgrading their network soon so hopefully this will be a thing of the > past. > > Doug > > Douglas Murphy > Murphy's Creativity > (619) 334-5121 > doug at murphyscreativity.com > www.murphyscreativity.com > > > > > -----Original Message----- > From: accessd-bounces at databaseadvisors.com > [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Greg Smith > Sent: Thursday, January 29, 2004 6:21 AM > To: Access Developers discussion and problem solving > Subject: Re: [AccessD] Error # 3343 Unrecognized database format > > > Doug: > > I've seen this before. One of my clients has A97 FE and BE and > occasionally gets the "Unrecognized db ... error". Their MIS guy has > found that almost every time it happened they had a bad switch, bad NIC, > or bad wiring which was causing the user's FE to break the connection > improperly, leaving the BE in a questionable state. Of course, the same > thing can occur if users reboot their computers or reset them without > logging out of Access first. > > HTH! > > Greg Smith > weeden1949 at hotmail.com > > > ----- Original Message ----- > From: "Doug Murphy" > To: "'Access Developers discussion and problem solving'" > > Sent: Wednesday, January 28, 2004 5:44 PM > Subject: [AccessD] Error # 3343 Unrecognized database format > > > Folks, > > I have a client who has started getting an Error #3343 on their back end > DB. The DB is Access 97. From what I can find on this error it usually > has to do with database writes being interupted or hard shutdowns. They > claim that there have been no changes to thier network and that all etc. > etc. _______________________________________________ > 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 _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From rl_stewart at highstream.net Fri Jan 30 12:58:28 2004 From: rl_stewart at highstream.net (Robert L. Stewart) Date: Fri, 30 Jan 2004 12:58:28 -0600 Subject: [AccessD] Re: Using Dates In-Reply-To: <200401301800.i0UI0Qm16112@databaseadvisors.com> Message-ID: <5.1.0.14.2.20040130125736.029a5740@pop3.highstream.net> Actually, you have a "standard" date dimension table that everyone uses and the overhead is minimal. At 12:00 PM 1/30/2004 -0600, you wrote: >Date: Fri, 30 Jan 2004 12:58:44 -0500 >From: "Colby, John" >Subject: RE: [AccessD] Using Dates >To: "'Access Developers discussion and problem solving'" > >Message-ID: <05C61C52D7CAD211A7830008C7DF6F1079BD12 at DISABILITYINS01> >Content-Type: text/plain; charset="iso-8859-1" > >I have to assume though that you only create these as required for >reporting? The overhead would be enormous otherwise. > >John W. Colby From JColby at dispec.com Fri Jan 30 13:05:57 2004 From: JColby at dispec.com (Colby, John) Date: Fri, 30 Jan 2004 14:05:57 -0500 Subject: [AccessD] RE: Using Dates Message-ID: <05C61C52D7CAD211A7830008C7DF6F1079BD1A@DISABILITYINS01> I think I finally "got it". This is joined to any date to pull out the various pieces needed? Then you build a function to populate this thing for the dates that your app needs? I think I might just appreciate this one! ;-) John W. Colby The database guy -----Original Message----- From: Robert L. Stewart [mailto:rl_stewart at highstream.net] Sent: Friday, January 30, 2004 1:58 PM To: accessd at databaseadvisors.com Cc: JColby at dispec.com Subject: Re: Using Dates Actually, you have a "standard" date dimension table that everyone uses and the overhead is minimal. At 12:00 PM 1/30/2004 -0600, you wrote: >Date: Fri, 30 Jan 2004 12:58:44 -0500 >From: "Colby, John" >Subject: RE: [AccessD] Using Dates >To: "'Access Developers discussion and problem solving'" > >Message-ID: <05C61C52D7CAD211A7830008C7DF6F1079BD12 at DISABILITYINS01> >Content-Type: text/plain; charset="iso-8859-1" > >I have to assume though that you only create these as required for >reporting? The overhead would be enormous otherwise. > >John W. Colby From doug at murphyscreativity.com Fri Jan 30 13:13:59 2004 From: doug at murphyscreativity.com (Doug Murphy) Date: Fri, 30 Jan 2004 11:13:59 -0800 Subject: [AccessD] Displaying the Control SOurce of a text box In-Reply-To: <014401c3e75e$adf03ad0$6601a8c0@HAL9002> Message-ID: <001a01c3e765$36b23e30$8500a8c0@CX615377a> Control.controlsource Douglas Murphy Murphy's Creativity (619) 334-5121 doug at murphyscreativity.com www.murphyscreativity.com -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Rocky Smolin - Beach Access Software Sent: Friday, January 30, 2004 10:27 AM To: AccessD at databaseadvisors.com Subject: [AccessD] Displaying the Control SOurce of a text box Dear List: I'm trying to display the control source of a text box. I can get the name - ctl.Name - but can't find the syntax for getting the control source. Anybody know? MTIA, Rocky Smolin Beach Access Software _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From dw-murphy at cox.net Fri Jan 30 13:14:45 2004 From: dw-murphy at cox.net (Doug Murphy) Date: Fri, 30 Jan 2004 11:14:45 -0800 Subject: [AccessD] Error # 3343 Unrecognized database format In-Reply-To: <018e01c3e760$73c801b0$6601a8c0@HAL9002> Message-ID: <001b01c3e765$523c42e0$8500a8c0@CX615377a> The process is first the DB compacts which fails on the corupted DB and generates a message to the operator informing them of the problem and ends the process. The last good backup is still there. Doug Douglas Murphy Murphy's Creativity (619) 334-5121 doug at murphyscreativity.com www.murphyscreativity.com -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Rocky Smolin - Beach Access Software Sent: Friday, January 30, 2004 10:40 AM To: Access Developers discussion and problem solving Subject: Re: [AccessD] Error # 3343 Unrecognized database format Hopefully they won't automatically back up their corrupted database... Rocky ----- Original Message ----- From: "Doug Murphy" To: "'Access Developers discussion and problem solving'" Sent: Friday, January 30, 2004 10:21 AM Subject: RE: [AccessD] Error # 3343 Unrecognized database format > Thanks Greg and Rocky, > > I visited the customer and found that the problem, while still > unaceptable, is something that happens infrequently. When I got the > call it sounded like it was happening every time they used the DB. > Fortunately every time they close the system down it backs itself up. > The network they use has just kind of grown so there are lots of > places network errors could be introduced. The good thing is they > will be upgrading their network soon so hopefully this will be a thing > of the past. > > Doug > > Douglas Murphy > Murphy's Creativity > (619) 334-5121 > doug at murphyscreativity.com > www.murphyscreativity.com > > > > > -----Original Message----- > From: accessd-bounces at databaseadvisors.com > [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Greg Smith > Sent: Thursday, January 29, 2004 6:21 AM > To: Access Developers discussion and problem solving > Subject: Re: [AccessD] Error # 3343 Unrecognized database format > > > Doug: > > I've seen this before. One of my clients has A97 FE and BE and > occasionally gets the "Unrecognized db ... error". Their MIS guy has > found that almost every time it happened they had a bad switch, bad > NIC, or bad wiring which was causing the user's FE to break the > connection improperly, leaving the BE in a questionable state. Of > course, the same thing can occur if users reboot their computers or > reset them without logging out of Access first. > > HTH! > > Greg Smith > weeden1949 at hotmail.com > > > ----- Original Message ----- > From: "Doug Murphy" > To: "'Access Developers discussion and problem solving'" > > Sent: Wednesday, January 28, 2004 5:44 PM > Subject: [AccessD] Error # 3343 Unrecognized database format > > > Folks, > > I have a client who has started getting an Error #3343 on their back > end DB. The DB is Access 97. From what I can find on this error it > usually has to do with database writes being interupted or hard > shutdowns. They claim that there have been no changes to thier > network and that all etc. etc. > _______________________________________________ > 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 _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From joconnell at indy.rr.com Fri Jan 30 13:26:45 2004 From: joconnell at indy.rr.com (Joseph O'Connell) Date: Fri, 30 Jan 2004 14:26:45 -0500 Subject: [AccessD] DatePart Question Message-ID: <087301c3e767$004b79e0$6701a8c0@joe> Gina, If I understand what you are asking, then stated a different way would be: select all records whose date is prior to the first day of this month (1/1/04) and greater than or equal to the first day of the prior month (12/1/03). Your query should consider the full date, not just the month. Assuming that you always want to key off of today's date, the date of the first day of this month is: DateSerial(DatePart("yyyy",Date()),DatePart("m",Date()),1) and the date of the first day of the prior month is: DateAdd("m",-1,DateSerial(DatePart("yyyy",Date()),DatePart("m",Date()),1) Combining them in a where clause for your query would be: WHERE ((tblTableName.dtmDateFieldName)=DateAdd("m",-1,DateSerial(DatePart("yyyy",D ate()),DatePart("m",Date()),1))) Using less than the first day of the current month and greater than or equal to the first day of the prior month ensures that the query will work properly if your field also includes the time. This should work for any date/time, even January. Joe O'Connell -----Original Message----- From: Gina Hoopes To: AccessD at databaseadvisors.com Date: Friday, January 30, 2004 1:26 PM Subject: [AccessD] DatePart Question This may be a dumb question, but here goes. I have a table full of data that I need to query, and what I need returned is the data from last month. If I query the Max on DatePart("m",PeriodEnd) on the data that's there now, I get a 12 which is correct (from 12/31/03). But, next month we will have added January '04 data, so the latest data in the PeriodEnd field will be 1/31/04, but when I query for just the month, am I going to get a 1? I guess I'm asking if the Max function is still going to look at the whole date and return just the DatePart of "m", or will 12 be considered alone, and therefore greater than 1? I'm always open to an easier method, if you've got any ideas. Thanks, Gina _________________________________________________________________ High-speed users-be more efficient online with the new MSN Premium Internet Software. http://join.msn.com/?pgmarket=en-us&page=byoa/prem&ST=1 _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From bchacc at san.rr.com Fri Jan 30 13:37:53 2004 From: bchacc at san.rr.com (Rocky Smolin - Beach Access Software) Date: Fri, 30 Jan 2004 11:37:53 -0800 Subject: [AccessD] Displaying the Control SOurce of a text box References: <001a01c3e765$36b23e30$8500a8c0@CX615377a> Message-ID: <01f101c3e768$8e167f80$6601a8c0@HAL9002> Go it. Thanks. Only works for certain controls. Rocky ----- Original Message ----- From: "Doug Murphy" To: "'Access Developers discussion and problem solving'" Sent: Friday, January 30, 2004 11:13 AM Subject: RE: [AccessD] Displaying the Control SOurce of a text box > Control.controlsource > > Douglas Murphy > Murphy's Creativity > (619) 334-5121 > doug at murphyscreativity.com > www.murphyscreativity.com > > > > > -----Original Message----- > From: accessd-bounces at databaseadvisors.com > [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Rocky Smolin > - Beach Access Software > Sent: Friday, January 30, 2004 10:27 AM > To: AccessD at databaseadvisors.com > Subject: [AccessD] Displaying the Control SOurce of a text box > > > Dear List: > > I'm trying to display the control source of a text box. I can get the > name - ctl.Name - but can't find the syntax for getting the control > source. > > Anybody know? > > MTIA, > > Rocky Smolin > Beach Access Software _______________________________________________ > 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 > From dw-murphy at cox.net Fri Jan 30 13:11:22 2004 From: dw-murphy at cox.net (Doug Murphy) Date: Fri, 30 Jan 2004 11:11:22 -0800 Subject: [AccessD] Error # 3343 Unrecognized database format In-Reply-To: <018e01c3e760$73c801b0$6601a8c0@HAL9002> Message-ID: <001901c3e764$d95e5610$8500a8c0@CX615377a> The process is first the DB compacts which fails on the corupted DB and generates a message to the operator informing them of the problem and ends the process. The last good backup is still there. Doug Douglas Murphy Murphy's Creativity (619) 334-5121 doug at murphyscreativity.com www.murphyscreativity.com -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Rocky Smolin - Beach Access Software Sent: Friday, January 30, 2004 10:40 AM To: Access Developers discussion and problem solving Subject: Re: [AccessD] Error # 3343 Unrecognized database format Hopefully they won't automatically back up their corrupted database... Rocky ----- Original Message ----- From: "Doug Murphy" To: "'Access Developers discussion and problem solving'" Sent: Friday, January 30, 2004 10:21 AM Subject: RE: [AccessD] Error # 3343 Unrecognized database format > Thanks Greg and Rocky, > > I visited the customer and found that the problem, while still > unaceptable, is something that happens infrequently. When I got the > call it sounded like it was happening every time they used the DB. > Fortunately every time they close the system down it backs itself up. > The network they use has just kind of grown so there are lots of > places network errors could be introduced. The good thing is they > will be upgrading their network soon so hopefully this will be a thing > of the past. > > Doug > > Douglas Murphy > Murphy's Creativity > (619) 334-5121 > doug at murphyscreativity.com > www.murphyscreativity.com > > > > > -----Original Message----- > From: accessd-bounces at databaseadvisors.com > [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Greg Smith > Sent: Thursday, January 29, 2004 6:21 AM > To: Access Developers discussion and problem solving > Subject: Re: [AccessD] Error # 3343 Unrecognized database format > > > Doug: > > I've seen this before. One of my clients has A97 FE and BE and > occasionally gets the "Unrecognized db ... error". Their MIS guy has > found that almost every time it happened they had a bad switch, bad > NIC, or bad wiring which was causing the user's FE to break the > connection improperly, leaving the BE in a questionable state. Of > course, the same thing can occur if users reboot their computers or > reset them without logging out of Access first. > > HTH! > > Greg Smith > weeden1949 at hotmail.com > > > ----- Original Message ----- > From: "Doug Murphy" > To: "'Access Developers discussion and problem solving'" > > Sent: Wednesday, January 28, 2004 5:44 PM > Subject: [AccessD] Error # 3343 Unrecognized database format > > > Folks, > > I have a client who has started getting an Error #3343 on their back > end DB. The DB is Access 97. From what I can find on this error it > usually has to do with database writes being interupted or hard > shutdowns. They claim that there have been no changes to thier > network and that all etc. etc. > _______________________________________________ > 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 _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From BBarabash at TappeConstruction.com Fri Jan 30 13:45:52 2004 From: BBarabash at TappeConstruction.com (Brett Barabash) Date: Fri, 30 Jan 2004 13:45:52 -0600 Subject: [AccessD] OT - Friday Humor Message-ID: <426071E0B0A6D311B3C0006008B0AB23AFE305@TAPPEEXCH01> Just stumbled across this as a link from Joel on Software Funny because it is so true... http://neopoleon.com/blog/posts/434.aspx Brett Barabash, MCP Tappe Construction, Co. Eagan, MN bbarabash at tappeconstruction.com (651) 256-6831 "One thing a computer can do that most humans can't is be sealed up in a cardboard box and sit in a warehouse." -Jack Handey -------------------------------------------------------------------------------------------------------------------- This email and any files transmitted with it are confidential and intended solely for the use of the individual or entity to whom they are addressed. If you have received this email in error please notify the originator of the message. This footer also confirms that this email message has been scanned for the presence of computer viruses. Any views expressed in this message are those of the individual sender, except where the sender specifies and with authority, states them to be the views of Tappe Construction Co. Scanning of this message and addition of this footer is performed by SurfControl E-mail Filter software in conjunction with virus detection software. From John.Clark at niagaracounty.com Fri Jan 30 13:47:32 2004 From: John.Clark at niagaracounty.com (John Clark) Date: Fri, 30 Jan 2004 14:47:32 -0500 Subject: [AccessD] Re: This should be simple...but... Message-ID: This is pretty cool code. I thought about doing something like this, but I thought it would be too 'difficult' or in-depth to make it worthwhile. But, this is actually quite simple for what it accomplishes. I really didn't want to use a universal font, and although I agree w/Rocky about the right justify, it just doesn't look right in this case. I was going to do that though, until I got this code. Thanks Robert! This will be a keeper for me. John >>> rl_stewart at highstream.net 01/30/04 01:53PM >>> Use a pad function to chance the text displayed and change the font to a mono-spaced font. Here is the function. Watch out for line wrap. Function PadString(strText As String, intWidth As Integer, _ strSide As String, Optional strPad As String = " ") As String ' Pad strText on either side, so the whole output is ' at least intWidth characters. ' If strText is longer than intWidth, just return strText. ' If strPad is wider than one character, this code only takes ' the first character for padding with it. ' Parameters: ' strText: ' Input text ' intWidth: ' Minimum width of the output. If ' Len(strText) < intWidth, then the ' output will be exactly intWidth characters ' wide. The code will not truncate strText, ' no matter what. ' strSide: ' This is either L or R for Left or Right ' strPad (Optional, default is " "): ' string whose first character will ' be used to pad the output. ' Returns: ' Return Value: ' strText, padded on the specified side with ' the first character of strPad. ' Example: ' PadString("Name", 10, "R", ".") returns ' "Name......" ' If Len(strText) > intWidth Then PadString = strText End If If strSide = "R" Then PadString = Left$(strText & String(intWidth, strPad), intWidth) Else PadString = Right$(String(intWidth, strPad) & strText, intWidth) End If End Function This will not align text to the center, only left or right. Paste this into a module, then in the immediate window type ? PadString("Name", 10, "R", ".") You should see Name...... Robert At 12:00 PM 1/30/2004 -0600, you wrote: >Date: Fri, 30 Jan 2004 09:22:42 -0500 >From: "John Clark" >Subject: [AccessD] This should be simple...but... >To: >Message-ID: >Content-Type: text/plain; charset=US-ASCII > >On a form I am working on, I am trying to provide 'leading dots', >between the label and text box. I want to make all labels equal by doing >this, which means some will have more or less dots than others. I >usually don't do this, because of what I am now experiencing; they don't >all line up. They are slightly off, but enough to notice. > >EXAMPLE: (These are slightly off also) > >Name ....................: >Address .................: >City ........................: >St ..........................: >Zip .........................: > >Any ideas on this? Maybe even alternatives? > >Thanks, >J Wallace Clark (Hey, this lawerese is kinda fun) _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From hoopesg at hotmail.com Fri Jan 30 14:03:59 2004 From: hoopesg at hotmail.com (Gina Hoopes) Date: Fri, 30 Jan 2004 14:03:59 -0600 Subject: [AccessD] DatePart Question Message-ID: Thank you, Joe. I think that sounds much better than what I was using. Gina From: "Joseph O'Connell" To: , Subject: Re: [AccessD] DatePart Question Date: Fri, 30 Jan 2004 14:26:45 -0500 Gina, If I understand what you are asking, then stated a different way would be: select all records whose date is prior to the first day of this month (1/1/04) and greater than or equal to the first day of the prior month (12/1/03). Your query should consider the full date, not just the month. Assuming that you always want to key off of today's date, the date of the first day of this month is: DateSerial(DatePart("yyyy",Date()),DatePart("m",Date()),1) and the date of the first day of the prior month is: DateAdd("m",-1,DateSerial(DatePart("yyyy",Date()),DatePart("m",Date()),1) Combining them in a where clause for your query would be: WHERE ((tblTableName.dtmDateFieldName)=DateAdd("m",-1,DateSerial(DatePart("yyyy",D ate()),DatePart("m",Date()),1))) Using less than the first day of the current month and greater than or equal to the first day of the prior month ensures that the query will work properly if your field also includes the time. This should work for any date/time, even January. Joe O'Connell -----Original Message----- From: Gina Hoopes To: AccessD at databaseadvisors.com Date: Friday, January 30, 2004 1:26 PM Subject: [AccessD] DatePart Question This may be a dumb question, but here goes. I have a table full of data that I need to query, and what I need returned is the data from last month. If I query the Max on DatePart("m",PeriodEnd) on the data that's there now, I get a 12 which is correct (from 12/31/03). But, next month we will have added January '04 data, so the latest data in the PeriodEnd field will be 1/31/04, but when I query for just the month, am I going to get a 1? I guess I'm asking if the Max function is still going to look at the whole date and return just the DatePart of "m", or will 12 be considered alone, and therefore greater than 1? I'm always open to an easier method, if you've got any ideas. Thanks, Gina _________________________________________________________________ Find high-speed ?net deals ? comparison-shop your local providers here. https://broadband.msn.com From jwcolby at colbyconsulting.com Fri Jan 30 14:28:23 2004 From: jwcolby at colbyconsulting.com (John W. Colby) Date: Fri, 30 Jan 2004 15:28:23 -0500 Subject: [AccessD] Displaying the Control SOurce of a text box In-Reply-To: <01f101c3e768$8e167f80$6601a8c0@HAL9002> Message-ID: Rocky, A "control" is a generic type that can contain any control, even a label. Obviously a label can't have a control source. Thus... To see it using autosense etc. it would have to be dimensioned as type textbox. John W. Colby www.ColbyConsulting.com -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Rocky Smolin - Beach Access Software Sent: Friday, January 30, 2004 2:38 PM To: Access Developers discussion and problem solving Subject: Re: [AccessD] Displaying the Control SOurce of a text box Go it. Thanks. Only works for certain controls. Rocky ----- Original Message ----- From: "Doug Murphy" To: "'Access Developers discussion and problem solving'" Sent: Friday, January 30, 2004 11:13 AM Subject: RE: [AccessD] Displaying the Control SOurce of a text box > Control.controlsource > > Douglas Murphy > Murphy's Creativity > (619) 334-5121 > doug at murphyscreativity.com > www.murphyscreativity.com > > > > > -----Original Message----- > From: accessd-bounces at databaseadvisors.com > [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Rocky Smolin > - Beach Access Software > Sent: Friday, January 30, 2004 10:27 AM > To: AccessD at databaseadvisors.com > Subject: [AccessD] Displaying the Control SOurce of a text box > > > Dear List: > > I'm trying to display the control source of a text box. I can get the > name - ctl.Name - but can't find the syntax for getting the control > source. > > Anybody know? > > MTIA, > > Rocky Smolin > Beach Access Software _______________________________________________ > 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 > _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From Oleg_123 at xuppa.com Fri Jan 30 14:59:00 2004 From: Oleg_123 at xuppa.com (Oleg_123 at xuppa.com) Date: Fri, 30 Jan 2004 15:59:00 -0500 (EST) Subject: [AccessD] Opening report on desired record In-Reply-To: References: <01f101c3e768$8e167f80$6601a8c0@HAL9002> Message-ID: <42162.12.3.132.98.1075496340.squirrel@heck.bay9.com> Hey Group I have a form that opens report, and I'd like it open on the record thats selected on the form. Bith are coming from the same table. How can I do that ? (i am in access97) textbox is called employeenumber Dim stDocName As String stDocName = "Carol" DoCmd.OpenReport stDocName, acPreview where stDocName![employee name] = Me.employeenumber.Text ----------------------------------------- Get Breaking News from CNN, ABC, NBC, CBS Now. http://www.xuppa.com/news/?link=webmail From HollisVJ at pgdp.usec.com Fri Jan 30 15:37:10 2004 From: HollisVJ at pgdp.usec.com (Hollis,Virginia) Date: Fri, 30 Jan 2004 15:37:10 -0600 Subject: [AccessD] Code Not Working in XP Message-ID: <618EB4D6DDCDD3119B0A00508B6FD37A0CB0CFED@cntexchange.pgdp.usec.com> Ok, I have been playing around on Microsoft site today. It looks like the problem may be the rundll32.exe in the fHandleFile code. I haven't figured out why yet or what would need to be changed to correct this. Any ideas? Virginia -----Original Message----- From: Hollis,Virginia [mailto:HollisVJ at pgdp.usec.com] Sent: Friday, January 30, 2004 11:52 AM To: 'Access Developers discussion and problem solving' Subject: RE: [AccessD] Code Not Working in XP Do you know what needed to be changed with the permissions? I talked to IT about the problem and they do not know what I am talking about. They said they need specifics. I do not know enough about XP or how they have the permissions set up to give them an answer. Virginia -----Original Message----- From: Perry Harold [mailto:pharold at proftesting.com] Sent: Thursday, January 29, 2004 6:35 PM To: 'Access Developers discussion and problem solving' Subject: RE: [AccessD] Code Not Working in XP Maybe something with the permission settings on the XP boxes. Had something similar that worked great with 98 & did the same thing as yours when switching to XP until some permissions were set to allow them access to the shared resources. Perry Harold -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Hollis,Virginia Sent: Thursday, January 29, 2004 11:29 AM To: 'accessD at databaseadvisors.com' Subject: [AccessD] Code Not Working in XP I have been using the code shown below to access data on our Intranet. The code matches a field entry in the database and looks up the details. In this example it finds a stock number. Problem: The code does not work for users that are running XP. It does not do anything, it will not even try to access the web. They click the button and nothing happens. What can I do to correct this for users of XP? Virginia _____ strPath = " http://web.com/vr.asp?xml=orafin%2Stock= strFile = strPath & Me.StockNumber If Dir(strFile) = "" Then strFile = strPath & Me.StockNumber End If Call fHandleFile(strFile, WIN_MAX) From DWUTKA at marlow.com Fri Jan 30 15:50:57 2004 From: DWUTKA at marlow.com (DWUTKA at marlow.com) Date: Fri, 30 Jan 2004 15:50:57 -0600 Subject: [AccessD] Access as Service Message-ID: <2F8793082E00D4119A1700B0D0216BF80222780F@main2.marlow.com> Whoops, how did I miss the original....ack, need more coffee... Drew -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Jim Dettman Sent: Friday, January 30, 2004 7:24 AM To: Access Developers discussion and problem solving Subject: RE: [AccessD] Access as Service Drop an e-mail to Drew Wutka. I believe he has played around with that. Jim Dettman President, Online Computer Services of WNY, Inc. (315) 699-3443 jimdettman at earthlink.net -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of ggonzalez at cccis.com Sent: Thursday, January 29, 2004 10:28 AM To: Access Developers discussion and problem solving Subject: Re: [AccessD] Access as Service Has anyone ever had to run an Access application as a service on a computer? if so can you pint me in the direction on how I could do this. Thanks! _______________________________________________ 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 From DWUTKA at marlow.com Fri Jan 30 16:01:42 2004 From: DWUTKA at marlow.com (DWUTKA at marlow.com) Date: Fri, 30 Jan 2004 16:01:42 -0600 Subject: [AccessD] Access as Service Message-ID: <2F8793082E00D4119A1700B0D0216BF802227810@main2.marlow.com> Not Access directly. There is an NT service control, and it works well with a VB program, but msaccess.exe has a pretty big memory footprint, I don't think you'd want to use it directly as a service. Drew -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of ggonzalez at cccis.com Sent: Thursday, January 29, 2004 9:28 AM To: Access Developers discussion and problem solving Subject: Re: [AccessD] Access as Service Has anyone ever had to run an Access application as a service on a computer? if so can you pint me in the direction on how I could do this. Thanks! _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From pedro at plex.nl Fri Jan 30 16:07:07 2004 From: pedro at plex.nl (Pedro Janssen) Date: Fri, 30 Jan 2004 23:07:07 +0100 Subject: [AccessD] error 3309 Message-ID: <000801c3e77e$3eb85830$f1c581d5@pedro> Hello Group, i get an error inserting some new fields in a table. The value of this property is to large (Error 3309). The help says something about: that i am trying to adjust a property value of an object, larger then 2 kb. I don't understand why i am getting this eror. The table is large, about 200 fields. Most of the fields are valuta-fields and checkboxes. About 25 fields are lookup fields. Do i go beyond the maiximum of the tables properties??? TIA Pedro Janssen From ggonzalez at cccis.com Fri Jan 30 16:36:33 2004 From: ggonzalez at cccis.com (ggonzalez at cccis.com) Date: Fri, 30 Jan 2004 16:36:33 -0600 Subject: [AccessD] Access as Service Message-ID: Thanks, All I am going to look at creating somthing in VB. DWUTKA at marlow.com Sent by: To: accessd at databaseadvisors.com accessd-bounces at databasea cc: dvisors.com Subject: RE: [AccessD] Access as Service 01/30/2004 04:01 PM Please respond to Access Developers discussion and problem solving Not Access directly. There is an NT service control, and it works well with a VB program, but msaccess.exe has a pretty big memory footprint, I don't think you'd want to use it directly as a service. Drew -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of ggonzalez at cccis.com Sent: Thursday, January 29, 2004 9:28 AM To: Access Developers discussion and problem solving Subject: Re: [AccessD] Access as Service Has anyone ever had to run an Access application as a service on a computer? if so can you pint me in the direction on how I could do this. Thanks! _______________________________________________ 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 From Subscriptions at servicexp.com Fri Jan 30 17:19:20 2004 From: Subscriptions at servicexp.com (Robert Gracie) Date: Fri, 30 Jan 2004 18:19:20 -0500 Subject: [AccessD] Interface Callback Class Questions. In-Reply-To: <004601c3e758$c24313a0$2a3ca8c0@TEXASSYSTEMS.COM> Message-ID: <000301c3e787$7d7581c0$6501a8c0@RG> Go figure...., now that changes things for me...... Thanks For All Your Help!! Robert Gracie -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Ken Ismert Sent: Friday, January 30, 2004 12:45 PM To: 'Access Developers discussion and problem solving' Subject: RE: [AccessD] Interface Callback Class Questions. Robert, Oh, now you're getting greedy! ;-) The report object can't sink section events. Likely, you'd have to invent a section class that sinks section events. You'd need to make a collection of Section objects for all the sections used in your report, and have them hook the OnPrint or OnFormat events for their individual section. The collection would be maintained in your Report object, so its responsibilities would expand to hooking report events, setting up the section collection, having them hook their section events, and possibly servicing the section object requests. -Ken -----Original Message----- From: Robert Gracie [mailto:Subscriptions at servicexp.com] Sent: Thursday, January 29, 2004 8:17 PM To: 'Access Developers discussion and problem solving' Subject: RE: [AccessD] Interface Callback Class Questions. Ken, Thanks A Million!! Yep the report did not have module....:-), and that solved the problem... How in the world do I sink the OnPrint, or OnFormat events... with mrRpt.Section(acDetail).OnPrint = pcsEventStub I think I have tried every possible stub, and it seems like it's just ignored.... Thanks Again!! Robert Gracie _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From martyconnelly at shaw.ca Fri Jan 30 19:40:51 2004 From: martyconnelly at shaw.ca (MartyConnelly) Date: Fri, 30 Jan 2004 17:40:51 -0800 Subject: [AccessD] Code Not Working in XP References: <618EB4D6DDCDD3119B0A00508B6FD37A0CB0CFED@cntexchange.pgdp.usec.com> Message-ID: <401B07A3.4080309@shaw.ca> Okay this test code below works for me on WinXP. It opens up an IE window or overwrites it if one is open So a coupleof things to try 1. put your final value for strfile in the url address of IE on a WinXP box and see if it works, the url may be jiggered or you may have a security permission problem in IE (internet options) that is causing a problem There is some weird way to query these IE permissions in VBA code. and reset them, I have seen it somewhere. You would be amazed at what you can stick in an IE URL address bar and it works. Like the following javascript:alert("Actual URL address: " + location.protocol + "//" + location.hostname + "/"); 2. You may want to rewrite this with an xmlhttp get method as per code further below, if you are trying to parse some returned value 3. try this code works on WinXP access97 Sub testda() Dim strfile As String Dim strpath As String 'strpath = " http://web.com/vr.asp?xml=orafin%2Stock=" ' " ' strfile = strpath & Me.StockNumber ' If Dir(strfile) = "" Then ' strfile = strpath & Me.StockNumber ' End If strfile = "http://moneycentral.msn.com/investor/research/printrep.asp?Symbol=MSFT" Call fHandleFile(strfile, WIN_MAX) End Sub ------- Dim xmlhttp As MSXML2.XMLHTTP40 Dim sString As String Dim strURL As String sString = "?iPage=qd&Symbol=MSFT" strURL = "http://moneycentral.msn.com/scripts/webquote.dll" Set xmlhttp = New MSXML2.XMLHTTP40 xmlhttp.Open "GET", "http://moneycentral.msn.com/scripts/webquote.dll?iPage=qd&Symbol=MSFT", False xmlhttp.send Debug.Print xmlhttp.responseText Hollis,Virginia wrote: >Ok, I have been playing around on Microsoft site today. It looks like the >problem may be the rundll32.exe in the fHandleFile code. I haven't figured >out why yet or what would need to be changed to correct this. > >Any ideas? > >Virginia > >-----Original Message----- >From: Hollis,Virginia [mailto:HollisVJ at pgdp.usec.com] >Sent: Friday, January 30, 2004 11:52 AM >To: 'Access Developers discussion and problem solving' >Subject: RE: [AccessD] Code Not Working in XP > > >Do you know what needed to be changed with the permissions? I talked to IT >about the problem and they do not know what I am talking about. They said >they need specifics. I do not know enough about XP or how they have the >permissions set up to give them an answer. > >Virginia > >-----Original Message----- >From: Perry Harold [mailto:pharold at proftesting.com] >Sent: Thursday, January 29, 2004 6:35 PM >To: 'Access Developers discussion and problem solving' >Subject: RE: [AccessD] Code Not Working in XP > > >Maybe something with the permission settings on the XP boxes. Had something >similar that worked great with 98 & did the same thing as yours when >switching to XP until some permissions were set to allow them access to the >shared resources. > >Perry Harold > >-----Original Message----- >From: accessd-bounces at databaseadvisors.com >[mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Hollis,Virginia >Sent: Thursday, January 29, 2004 11:29 AM >To: 'accessD at databaseadvisors.com' >Subject: [AccessD] Code Not Working in XP > > >I have been using the code shown below to access data on our Intranet. The >code matches a field entry in the database and looks up the details. In this >example it finds a stock number. > >Problem: The code does not work for users that are running XP. It does not >do anything, it will not even try to access the web. They click the button >and nothing happens. > >What can I do to correct this for users of XP? > >Virginia > _____ > > strPath = " http://web.com/vr.asp?xml=orafin%2Stock= > > strFile = strPath & Me.StockNumber > > If Dir(strFile) = "" Then > strFile = strPath & Me.StockNumber > End If > > Call fHandleFile(strFile, WIN_MAX) >_______________________________________________ >AccessD mailing list >AccessD at databaseadvisors.com >http://databaseadvisors.com/mailman/listinfo/accessd >Website: http://www.databaseadvisors.com > > > -- Marty Connelly Victoria, B.C. Canada From clh at christopherhawkins.com Fri Jan 30 22:42:14 2004 From: clh at christopherhawkins.com (Christopher Hawkins) Date: Fri, 30 Jan 2004 21:42:14 -0700 Subject: [AccessD] A2003: Masked bitmaps as button images? Message-ID: <410-22004163144214150@christopherhawkins.com> All, I'm trying to create some pretty navigation buttons for a client. I have a great set of icons to use, but cannot figure out how to tell Access to render each icon's mask color as transparant. This works like a chamr in VB, of course - but I need it to work in Access as well! I thought that the ImageList controls might work, but then I discovered that although I can put my icons into the ImageList, I cannot assign those images to any of my buttons. I've got to be doing something wrong. There's no way these features aren't offered in Access. Heeeeeelp... -Christopher- From rl_stewart at highstream.net Fri Jan 30 23:36:38 2004 From: rl_stewart at highstream.net (Robert L. Stewart) Date: Fri, 30 Jan 2004 23:36:38 -0600 Subject: [AccessD] Re: This should be simple...but... In-Reply-To: <200401302027.i0UKRmm29485@databaseadvisors.com> Message-ID: <5.1.0.14.2.20040130233056.0195da68@pop3.highstream.net> John, Thanks. I try to do things in a very generic manner. It makes it very useable. I did figure out that you could use it to center also. Something like: CenteredValue: PadString(PadString("Name", 10, "R", "."),20 - len("Name"),"L",".") Should return something like: ......NAME...... Robert At 02:27 PM 1/30/2004 -0600, you wrote: >Date: Fri, 30 Jan 2004 14:47:32 -0500 >From: "John Clark" >Subject: [AccessD] Re: This should be simple...but... >To: >Message-ID: >Content-Type: text/plain; charset=US-ASCII > >This is pretty cool code. I thought about doing something like this, but >I thought it would be too 'difficult' or in-depth to make it worthwhile. >But, this is actually quite simple for what it accomplishes. > >I really didn't want to use a universal font, and although I agree >w/Rocky about the right justify, it just doesn't look right in this >case. I was going to do that though, until I got this code. > >Thanks Robert! This will be a keeper for me. > >John From rl_stewart at highstream.net Fri Jan 30 23:39:52 2004 From: rl_stewart at highstream.net (Robert L. Stewart) Date: Fri, 30 Jan 2004 23:39:52 -0600 Subject: [AccessD] Re: DatePart Question In-Reply-To: <200401302027.i0UKRmm29485@databaseadvisors.com> Message-ID: <5.1.0.14.2.20040130233712.01977120@pop3.highstream.net> Gina, What are you going to do when the year changes and you have data for 2 January's in 2 years? The year has to be part of what you us in the query. Try using the date dimension table technique I have been talking about and it will smooth things out for you and dates (well dates in the database anyway ;-)) ). Robert At 02:27 PM 1/30/2004 -0600, you wrote: >From: Gina Hoopes >To: AccessD at databaseadvisors.com >Date: Friday, January 30, 2004 1:26 PM >Subject: [AccessD] DatePart Question > > >This may be a dumb question, but here goes. I have a table full of data >that I need to query, and what I need returned is the data from last month. >If I query the Max on DatePart("m",PeriodEnd) on the data that's there now, >I get a 12 which is correct (from 12/31/03). But, next month we will have >added January '04 data, so the latest data in the PeriodEnd field will be >1/31/04, but when I query for just the month, am I going to get a 1? I >guess I'm asking if the Max function is still going to look at the whole >date and return just the DatePart of "m", or will 12 be considered alone, >and therefore greater than 1? > >I'm always open to an easier method, if you've got any ideas. > >Thanks, >Gina From Erwin.Craps at ithelps.be Sat Jan 31 02:56:08 2004 From: Erwin.Craps at ithelps.be (Erwin Craps - IT Helps) Date: Sat, 31 Jan 2004 09:56:08 +0100 Subject: [AccessD] OT - Friday Humor Message-ID: <46B976F2B698FF46A4FE7636509B22DF03D1B2@stekelbes.ithelps.local> I have mixed feelings... Is this funny or is this sad?! But it is healthy to laugh about your sad things, its a first step to improvement :-) Erwin -----Oorspronkelijk bericht----- Van: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] Namens Brett Barabash Verzonden: vrijdag 30 januari 2004 20:46 Aan: 'accessd at databaseadvisors.com' Onderwerp: [AccessD] OT - Friday Humor Just stumbled across this as a link from Joel on Software Funny because it is so true... http://neopoleon.com/blog/posts/434.aspx Brett Barabash, MCP Tappe Construction, Co. Eagan, MN bbarabash at tappeconstruction.com (651) 256-6831 "One thing a computer can do that most humans can't is be sealed up in a cardboard box and sit in a warehouse." -Jack Handey ------------------------------------------------------------------------ -------------------------------------------- This email and any files transmitted with it are confidential and intended solely for the use of the individual or entity to whom they are addressed. If you have received this email in error please notify the originator of the message. This footer also confirms that this email message has been scanned for the presence of computer viruses. Any views expressed in this message are those of the individual sender, except where the sender specifies and with authority, states them to be the views of Tappe Construction Co. Scanning of this message and addition of this footer is performed by SurfControl E-mail Filter software in conjunction with virus detection software. _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From gustav at cactus.dk Sat Jan 31 04:50:57 2004 From: gustav at cactus.dk (Gustav Brock) Date: Sat, 31 Jan 2004 11:50:57 +0100 Subject: [AccessD] DatePart Question In-Reply-To: References: Message-ID: <787082133.20040131115057@cactus.dk> Hi Gina > .. I have a table full of data that I need to query, and what I > need returned is the data from last month. Why not use DateDiff(): SELECT * FROM tblYourTable WHERE DateDiff("m",[PeriodEnd],Date())=1; /gustav From gustav at cactus.dk Sat Jan 31 05:54:44 2004 From: gustav at cactus.dk (Gustav Brock) Date: Sat, 31 Jan 2004 12:54:44 +0100 Subject: [AccessD] This should be simple...but... In-Reply-To: References: Message-ID: <13410909156.20040131125444@cactus.dk> Hi John > On a form I am working on, I am trying to provide 'leading dots', > between the label and text box. I want to make all labels equal by doing > this, which means some will have more or less dots than others. I > usually don't do this, because of what I am now experiencing; they don't > all line up. They are slightly off, but enough to notice. > EXAMPLE: (These are slightly off also) > Name ....................: > Address .................: > City ........................: > St ..........................: > Zip .........................: > Any ideas on this? Maybe even alternatives? Why not create a right justified label containing: .............................: Then duplicate this into all relevant positions. Finally, resize all labels with text to the width of the text plus a space and mark them as "Move to front". Of course, this technique won't work if the background "colour" of the text labels is transparent. On the other hand, any font can be selected for the text and a different font may be used for the punctuation. /gustav From andy at minstersystems.co.uk Sat Jan 31 09:08:34 2004 From: andy at minstersystems.co.uk (Andy Lacey) Date: Sat, 31 Jan 2004 15:08:34 -0000 Subject: [AccessD] Opening report on desired record In-Reply-To: <42162.12.3.132.98.1075496340.squirrel@heck.bay9.com> Message-ID: <01ab01c3e80c$18b85110$b274d0d5@minster33c3r25> Oleg Do something like this Dim stDocName As String Dim strSQL as string strSQL = "[employee name] = '" & Me!employeenumber stDocName = "Carol" DoCmd.OpenReport stDocName, acPreview, , strSQL However you seem to be comparing a field called Employee Number against a form control called EmployeeNumber. Did you mean to? Andy Lacey http://www.minstersystems.co.uk > -----Original Message----- > From: accessd-bounces at databaseadvisors.com > [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of > Oleg_123 at xuppa.com > Sent: 30 January 2004 20:59 > To: accessd at databaseadvisors.com > Subject: [AccessD] Opening report on desired record > > > Hey Group > > I have a form that opens report, and I'd like it open on the > record thats selected on the form. Bith are coming from the > same table. How can I do that ? (i am in access97) textbox is > called employeenumber > > > > Dim stDocName As String > > stDocName = "Carol" > DoCmd.OpenReport stDocName, acPreview > where stDocName![employee name] = Me.employeenumber.Text > > > ----------------------------------------- > Get Breaking News from CNN, ABC, NBC, CBS Now. > http://www.xuppa.com/news/?link=webmail > > > > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/a> ccessd > Website: > http://www.databaseadvisors.com > > From andy at minstersystems.co.uk Sat Jan 31 09:08:34 2004 From: andy at minstersystems.co.uk (Andy Lacey) Date: Sat, 31 Jan 2004 15:08:34 -0000 Subject: [AccessD] macro can't find function In-Reply-To: <41912.12.3.132.98.1075481192.squirrel@heck.bay9.com> Message-ID: <01ad01c3e80c$19312a90$b274d0d5@minster33c3r25> Well all I can think is a) rename the function (could BreakName possibly be a reserved word?) and/or b) decompile, repair etc to be sure it isn't just glitchy. Other than that I cn't see what the problem is. Andy Lacey http://www.minstersystems.co.uk > -----Original Message----- > From: accessd-bounces at databaseadvisors.com > [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of > Oleg_123 at xuppa.com > Sent: 30 January 2004 16:47 > To: accessd at databaseadvisors.com > Subject: RE: [AccessD] macro can't find function > > > still gives me the same error :--( > > > > > Beat me to it Lambert :-) > > > > Andy Lacey > > http://www.minstersystems.co.uk > > > >> -----Original Message----- > >> From: accessd-bounces at databaseadvisors.com > >> [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Heenan, > >> Lambert > >> Sent: 29 January 2004 17:08 > >> To: 'Access Developers discussion and problem solving' > >> Subject: RE: [AccessD] macro can't find function > >> > >> > >> I'd suggest you get rid of the space between "BreakName" and the > >> opening parentheses. > >> > >> Lambert > >> > >> > -----Original Message----- > >> > From: Oleg_123 at xuppa.com [SMTP:Oleg_123 at xuppa.com] > >> > Sent: Thursday, January 29, 2004 11:52 AM > >> > To: accessd at databaseadvisors.com > >> > Subject: RE: [AccessD] macro can't find function > >> > > >> > it's public (of course ;-) > >> > and this is how it looks -- BreakName () > >> > > >> > i decided to try to make that macro call another macro > >> which contains > >> > the function > >> > > >> > > Oleg > >> > > > >> > > In a macro the function has to be expressed as fn(), ie. > >> no = sign > >> > > before it but must have the parentheses. May be worth > >> checking. Oh > >> > > and the function must of course be Public. > >> > > > >> > > Andy Lacey > >> > > http://www.minstersystems.co.uk > >> > > > >> > >> -----Original Message----- > >> > >> From: accessd-bounces at databaseadvisors.com > >> > >> [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of > >> Oleg_123 at xuppa.com > >> > >> Sent: 29 January 2004 16:12 > >> > >> To: accessd at databaseadvisors.com > >> > >> Subject: RE: [AccessD] macro can't find function > >> > >> > >> > >> > >> > >> Group, > >> > >> > >> > >> I have a long macro that opens several queries, at the end its > >> suppose to RunCode - function, however it gives me an message "The > >> > >> expression you entered has a function name that xxx > can't find". > >> When I run that function separetely it works fine, and > >> the name is > >> > >> spelled correctly since i didn't type it but selected it using > >> their device what should i do ? > >> > >> > >> > >> > >> > >> ----------------------------------------- > >> > >> Get Breaking News from CNN, ABC, NBC, CBS Now. > >> > >> http://www.xuppa.com/news/?link=webmail > >> > >> > >> > >> > >> > >> > >> > >> _______________________________________________ > >> > >> AccessD mailing list > >> > >> AccessD at databaseadvisors.com > >> > >> http://databaseadvisors.com/mailman/listinfo/a> ccessd > >> > >> Website: > >> > >> http://www.databaseadvisors.com > >> > >> > >> > >> > >> > > > >> > > _______________________________________________ > >> > > AccessD mailing list > >> > > AccessD at databaseadvisors.com > >> > > http://databaseadvisors.com/mailman/listinfo/accessd > >> > > Website: http://www.databaseadvisors.com > >> > > >> > > >> > > >> > ----------------------------------------- > >> > Get Breaking News from CNN, ABC, NBC, CBS Now. > >> > http://www.xuppa.com/news/?link=webmail > >> > > >> > > >> > _______________________________________________ > >> > 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/a> ccessd > >> Website: > >> http://www.databaseadvisors.com > >> > >> > > > > _______________________________________________ > > AccessD mailing list > > AccessD at databaseadvisors.com > > http://databaseadvisors.com/mailman/listinfo/accessd > > Website: http://www.databaseadvisors.com > > > > ----------------------------------------- > Get Breaking News from CNN, ABC, NBC, CBS Now. > http://www.xuppa.com/news/?link=webmail > > > > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/a> ccessd > Website: > http://www.databaseadvisors.com > > From gustav at cactus.dk Sat Jan 31 09:50:59 2004 From: gustav at cactus.dk (Gustav Brock) Date: Sat, 31 Jan 2004 16:50:59 +0100 Subject: [AccessD] ER tools ... In-Reply-To: <009d01c2b92d$8e2b6270$8e01a8c0@Rock> References: <2F8793082E00D4119A1700B0D0216BF801D81D16@main2.marlow.com> <000c01c2b930$7cdcf760$eca39a44@tomvideo> <009d01c2b92d$8e2b6270$8e01a8c0@Rock> Message-ID: <9325083998.20040131165059@cactus.dk> Hi Arthur et all Another tool in the cheap category is Charonware CASE Studio 2: http://www.casestudio.com If you don't need reverse engineering, the Lite package will do at a very low price. Still, the Full package is not expensive. Both support Access and most of the major open source engines like MaxDB (SAP DB) and Firebird. Anyone having experience with this product? /gustav > Free: CoreModel > Cheap: DeZign > Pricey: ERwin, PowerDesigner > My personal fave at the moment is DeZign but I'm looking carefully at > CoreModel. None of my current clients can afford the pricey set of > alternatives, but in that set I really liked PowerDesigner. > Google the names and you'll be there in a second. > ----- Original Message ----- > From: "Tom Adams" > To: > Sent: Saturday, January 11, 2003 12:15 AM > Subject: [AccessD] ER tools ... >> Arthur said: >> >> I don't build any tables directly; always through an ER tool, >> >> Just found this. Can you give us your recommendations and any >> comments about those you don't recommend? >> >> Thanks - Tom From jwcolby at colbyconsulting.com Sat Jan 31 10:37:50 2004 From: jwcolby at colbyconsulting.com (John W. Colby) Date: Sat, 31 Jan 2004 11:37:50 -0500 Subject: [AccessD] Upsizing wizard Message-ID: I am trying to upsize a reasonably large database and four tables, two of which are main tables, failed to upsize (table skipped or export failed). Does the wizard provide any error log which would point me to the reason for the failure? John W. Colby www.ColbyConsulting.com From jwcolby at colbyconsulting.com Sat Jan 31 10:42:22 2004 From: jwcolby at colbyconsulting.com (John W. Colby) Date: Sat, 31 Jan 2004 11:42:22 -0500 Subject: [AccessD] Upsizing wizard In-Reply-To: Message-ID: Looking at the tables in SQL Server manager, the table structure made it out there, but no data which leads me to believe perhaps some data field caused the problem. Any thoughts? John W. Colby www.ColbyConsulting.com -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of John W. Colby Sent: Saturday, January 31, 2004 11:38 AM To: AccessD Subject: [AccessD] Upsizing wizard I am trying to upsize a reasonably large database and four tables, two of which are main tables, failed to upsize (table skipped or export failed). Does the wizard provide any error log which would point me to the reason for the failure? John W. Colby www.ColbyConsulting.com _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From mwp.reid at qub.ac.uk Sat Jan 31 11:41:25 2004 From: mwp.reid at qub.ac.uk (Martin Reid) Date: Sat, 31 Jan 2004 17:41:25 -0000 Subject: [AccessD] Upsizing wizard References: Message-ID: <002e01c3e821$7396e6e0$09f66e51@martin1> John As before it could be dates? Did you read the upsizing report? It should be saved int he same folder as the MDB file. I always use upsizing pro now before moving anything in an MDB file. Its more than worwth the $100 Martin ----- Original Message ----- From: "John W. Colby" To: "Access Developers discussion and problem solving" Sent: Saturday, January 31, 2004 4:42 PM Subject: RE: [AccessD] Upsizing wizard > Looking at the tables in SQL Server manager, the table structure made it out > there, but no data which leads me to believe perhaps some data field caused > the problem. Any thoughts? > > John W. Colby > www.ColbyConsulting.com > > -----Original Message----- > From: accessd-bounces at databaseadvisors.com > [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of John W. Colby > Sent: Saturday, January 31, 2004 11:38 AM > To: AccessD > Subject: [AccessD] Upsizing wizard > > > I am trying to upsize a reasonably large database and four tables, two of > which are main tables, failed to upsize (table skipped or export failed). > Does the wizard provide any error log which would point me to the reason for > the failure? > > John W. Colby > www.ColbyConsulting.com > > > _______________________________________________ > 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 > From gustav at cactus.dk Sat Jan 31 11:55:31 2004 From: gustav at cactus.dk (Gustav Brock) Date: Sat, 31 Jan 2004 18:55:31 +0100 Subject: [AccessD] Upsizing wizard In-Reply-To: References: Message-ID: <6232555932.20040131185531@cactus.dk> Hi John > I am trying to upsize a reasonably large database and four tables, two of > which are main tables, failed to upsize (table skipped or export failed). > Does the wizard provide any error log which would point me to the reason for > the failure? If only four tables, you could on behalf of us give Case Studio 2 a whirl (Full, not Lite): http://www.casestudio.com/enu/download.aspx The demo will handle six entities (tables) while handling all queries (views). Reverse engineering of an Access database requires a few selections. Watch this tiny avi movie to learn how: http://www.casestudio.com/download/movies/CS2_re_access.zip Of course, no data will be transferred; you'll have to do that afterwards. It could be interesting to know how a real life case is handled. /gustav From jwcolby at colbyconsulting.com Sat Jan 31 12:14:59 2004 From: jwcolby at colbyconsulting.com (John W. Colby) Date: Sat, 31 Jan 2004 13:14:59 -0500 Subject: [AccessD] Upsizing wizard In-Reply-To: <6232555932.20040131185531@cactus.dk> Message-ID: Since the structure was upsized, I went into the DTS and tried the import from there. In all cases so far, the problem has been data entry errors in date fields. Things like Disability dates of 1022 AD. Been disabled a LONG time, some of these folks! John W. Colby www.ColbyConsulting.com -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Gustav Brock Sent: Saturday, January 31, 2004 12:56 PM To: Access Developers discussion and problem solving Subject: Re: [AccessD] Upsizing wizard Hi John > I am trying to upsize a reasonably large database and four tables, two of > which are main tables, failed to upsize (table skipped or export failed). > Does the wizard provide any error log which would point me to the reason for > the failure? If only four tables, you could on behalf of us give Case Studio 2 a whirl (Full, not Lite): http://www.casestudio.com/enu/download.aspx The demo will handle six entities (tables) while handling all queries (views). Reverse engineering of an Access database requires a few selections. Watch this tiny avi movie to learn how: http://www.casestudio.com/download/movies/CS2_re_access.zip Of course, no data will be transferred; you'll have to do that afterwards. It could be interesting to know how a real life case is handled. /gustav _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From jwcolby at colbyconsulting.com Sat Jan 31 13:00:12 2004 From: jwcolby at colbyconsulting.com (John W. Colby) Date: Sat, 31 Jan 2004 14:00:12 -0500 Subject: [AccessD] Export query to SQL Server Message-ID: Is there a way to export an entire query to SQL Server? I don't want to have to go manually recreate my queries out there. John W. Colby www.ColbyConsulting.com From mwp.reid at qub.ac.uk Sat Jan 31 13:09:06 2004 From: mwp.reid at qub.ac.uk (Martin Reid) Date: Sat, 31 Jan 2004 19:09:06 -0000 Subject: [AccessD] Export query to SQL Server References: Message-ID: <000d01c3e82d$b44b1e20$09f66e51@martin1> John Only thos e the upsizing wiz will pick up the reszt I do manually usually creating stored procedures. Simly cut and paste the SQL into the Query Analyser and convert to a stored procedure. The QA will highligh the error lines for you. Slightly different version of SQL used. Access 2003 does a good job reporting non upsized queries which helps speed this up a bit. I have head of a tool called Proc Blaster. Not sure of the URL Martin ----- Original Message ----- From: "John W. Colby" To: "AccessD" Sent: Saturday, January 31, 2004 7:00 PM Subject: [AccessD] Export query to SQL Server > Is there a way to export an entire query to SQL Server? I don't want to > have to go manually recreate my queries out there. > > John W. Colby > www.ColbyConsulting.com > > > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com > From deanellis at iprimus.com.au Sat Jan 31 17:18:49 2004 From: deanellis at iprimus.com.au (Dean Ellis) Date: Sun, 1 Feb 2004 10:18:49 +1100 (AUS Eastern Daylight Time) Subject: [AccessD] Trapping Key STrokes Message-ID: <401C37D9.000008.02541@jedel> Good Morning (or Afternoon) Group. I am having some difficulty in trapping the CTRL ALT DEL keystroke in Access and VB. Can anyone help? The code so Far: Private Sub Form_Load() Me.KeyPreview = True End Sub ------------------------------------------ Private Sub Form_KeyDown(KeyCode As Integer, Shift As Integer) Select Case KeyCode Case (vbKeyControl + Alt + Del) SendKeys = "" MsgBox "Nope" End Select End Sub -------------------------------------------------- Thanks in Advance Cheers Dean From stuart at lexacorp.com.pg Sat Jan 31 17:48:15 2004 From: stuart at lexacorp.com.pg (Stuart McLachlan) Date: Sun, 01 Feb 2004 09:48:15 +1000 Subject: [AccessD] Trapping Key STrokes In-Reply-To: <401C37D9.000008.02541@jedel> Message-ID: <401CCB5F.23786.15F8F0@localhost> On 1 Feb 2004 at 10:18, Dean Ellis wrote: > Good Morning (or Afternoon) Group. > > I am having some difficulty in trapping the CTRL ALT DEL keystroke in Access > and VB. Can anyone help? > > The code so Far: > You're solution won't work - Ctrl+Alt+Del is trapped at a lower level. If you are still using Win9X, there are ways to do it (you fool Windows into thinking that a screensaver is running), but that doesn't work on NT,2K or XP. It would be possible by writing your own GINA, but I really don't think you want to go there. That's certainly not an Access or VB solution. Take a look at (watch for linew wrap) http://msdn.microsoft.com/library/default.asp?url=/library/en-us/security/security/winlogon_and_gina.asp One possible commercial solution is: "KeyboardControl Software Development Kit allows your Win32 applications to filter out any keystroke or combination keystroke such as PrintScreen, Alt+Tab, Alt+F4, Ctrl+Tab, Ctrl+Alt+Del, Alt+Esc, Ctrl+F4, etc. on all versions of Windows including Windows 95/98/Me and Windows NT/2000/XP" See http://www.meliorasoft.com/kits/keyboard/index.htm -- Lexacorp Ltd http://www.lexacorp.com.pg Information Technology Consultancy, Software Development,System Support. From stuart at lexacorp.com.pg Sat Jan 31 17:50:32 2004 From: stuart at lexacorp.com.pg (Stuart McLachlan) Date: Sun, 01 Feb 2004 09:50:32 +1000 Subject: [AccessD] Export query to SQL Server In-Reply-To: Message-ID: <401CCBE8.5785.181008@localhost> On 31 Jan 2004 at 14:00, John W. Colby wrote: > Is there a way to export an entire query to SQL Server? I don't want to > have to go manually recreate my queries out there. > Open the Access query in SQL view and then copy/paste? It will often take a fair bit of editing afterwards though. -- Lexacorp Ltd http://www.lexacorp.com.pg Information Technology Consultancy, Software Development,System Support. From jwcolby at colbyconsulting.com Sat Jan 31 18:02:00 2004 From: jwcolby at colbyconsulting.com (John W. Colby) Date: Sat, 31 Jan 2004 19:02:00 -0500 Subject: [AccessD] Export query to SQL Server In-Reply-To: <000d01c3e82d$b44b1e20$09f66e51@martin1> Message-ID: So the idea is to move the tables back into a copy of the FE and upsize the whole? John W. Colby www.ColbyConsulting.com -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Martin Reid Sent: Saturday, January 31, 2004 2:09 PM To: Access Developers discussion and problem solving Subject: Re: [AccessD] Export query to SQL Server John Only thos e the upsizing wiz will pick up the reszt I do manually usually creating stored procedures. Simly cut and paste the SQL into the Query Analyser and convert to a stored procedure. The QA will highligh the error lines for you. Slightly different version of SQL used. Access 2003 does a good job reporting non upsized queries which helps speed this up a bit. I have head of a tool called Proc Blaster. Not sure of the URL Martin ----- Original Message ----- From: "John W. Colby" To: "AccessD" Sent: Saturday, January 31, 2004 7:00 PM Subject: [AccessD] Export query to SQL Server > Is there a way to export an entire query to SQL Server? I don't want to > have to go manually recreate my queries out there. > > John W. Colby > www.ColbyConsulting.com > > > _______________________________________________ > 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 From jwcolby at colbyconsulting.com Sat Jan 31 19:44:31 2004 From: jwcolby at colbyconsulting.com (John W. Colby) Date: Sat, 31 Jan 2004 20:44:31 -0500 Subject: [AccessD] SQL Server queries - appending strings Message-ID: In Access I often do things in queries like: [LastName] & ", " & [FirstName] This appears to be bad syntax in SQL Server. Is there an equivalent? John W. Colby www.ColbyConsulting.com From jmoss111 at bellsouth.net Sat Jan 31 22:03:24 2004 From: jmoss111 at bellsouth.net (JMoss) Date: Sat, 31 Jan 2004 20:03:24 -0800 Subject: [AccessD] SQL Server queries - appending strings References: Message-ID: <000501c3e878$56a7c160$75a09a44@bitchamq5cupg3> John, Lose the brackets and substitute + for & and ' for ". Jim ----- Original Message ----- From: "John W. Colby" To: "SQLServer" ; "AccessD" Sent: Saturday, January 31, 2004 5:44 PM Subject: [AccessD] SQL Server queries - appending strings > In Access I often do things in queries like: [LastName] & ", " & [FirstName] > > This appears to be bad syntax in SQL Server. Is there an equivalent? > > John W. Colby > www.ColbyConsulting.com > > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com > From stuart at lexacorp.com.pg Sat Jan 31 19:59:23 2004 From: stuart at lexacorp.com.pg (Stuart McLachlan) Date: Sun, 01 Feb 2004 11:59:23 +1000 Subject: [AccessD] SQL Server queries - appending strings In-Reply-To: Message-ID: <401CEA1B.21659.8E078E@localhost> On 31 Jan 2004 at 20:44, John W. Colby wrote: > In Access I often do things in queries like: [LastName] & ", " & [FirstName] > > This appears to be bad syntax in SQL Server. Is there an equivalent? > Lastname + ', ' + FirstName Text delimiters are single quotes. String concatenation uses "+". "&" performs an AND logical bitwise comparison. -- Lexacorp Ltd http://www.lexacorp.com.pg Information Technology Consultancy, Software Development,System Support. From jwcolby at colbyconsulting.com Sat Jan 31 20:27:35 2004 From: jwcolby at colbyconsulting.com (John W. Colby) Date: Sat, 31 Jan 2004 21:27:35 -0500 Subject: [AccessD] was SQL Server queries - appending strings In-Reply-To: <401CEA1B.21659.8E078E@localhost> Message-ID: Thanks both of you. I have a client that purchased SQL Server and so it's time to get off the dime and learn this stuff. The client uses A2K. Now that I am changing to SQL Server I have to get the server doing more of the work - the whole point is of course to speed things up. For technical reasons (a whole SLEW of reasons) going to an ADP is NOT an option any time in the near future, if at all. I have a main tabbed form which uses a multi-table join to get live data from a client / claim . The client wanted it that way so that the user could edit fields in either table. Views appear to be similar to tables, i.e. I can link to them and they show up in the table window. Is there a way to pass parameters to them? "Where LastName like col*" etc? ATM, I pull the whole recordset and then filter down to a single record. Not fast, but after the initial pull the filter proceeds at a reasonable rate. I can then "filter" to a specific claim reasonably fast. I would like to change this to actually ask SQL Server for a view of exactly one record each time they want to see a claim. Thus avoiding the "pull the entire recordset across the net, now pull the index, etc. This must be editable so AFAIK I cannot use stored procedures which would allow passing parameters. Because this is A2K AFAIK I cannot assign a recordset to the form's recordsource property. What are my options here? Do I have any? John W. Colby www.ColbyConsulting.com -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Stuart McLachlan Sent: Saturday, January 31, 2004 8:59 PM To: Access Developers discussion and problem solving Subject: Re: [AccessD] SQL Server queries - appending strings On 31 Jan 2004 at 20:44, John W. Colby wrote: > In Access I often do things in queries like: [LastName] & ", " & [FirstName] > > This appears to be bad syntax in SQL Server. Is there an equivalent? > Lastname + ', ' + FirstName Text delimiters are single quotes. String concatenation uses "+". "&" performs an AND logical bitwise comparison. -- Lexacorp Ltd http://www.lexacorp.com.pg Information Technology Consultancy, Software Development,System Support. _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From jwcolby at colbyconsulting.com Sat Jan 31 19:44:31 2004 From: jwcolby at colbyconsulting.com (John W. Colby) Date: Sat, 31 Jan 2004 20:44:31 -0500 Subject: [AccessD] [dba-SQLServer]SQL Server queries - appending strings Message-ID: In Access I often do things in queries like: [LastName] & ", " & [FirstName] This appears to be bad syntax in SQL Server. Is there an equivalent? John W. Colby www.ColbyConsulting.com _______________________________________________ dba-SQLServer mailing list dba-SQLServer at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/dba-sqlserver http://www.databaseadvisors.com From artful at rogers.com Thu Jan 1 04:06:11 2004 From: artful at rogers.com (Arthur Fuller) Date: Thu, 1 Jan 2004 02:06:11 -0800 Subject: AW: [AccessD] Hiding Main Access Window In-Reply-To: <1292795.1072863925548.JavaMail.www@wwinf3004> Message-ID: <030501c3d04e$eda25090$6701a8c0@rock> One way to do this is to create an image file having the same name as your application MDB but with a different extension and place it in the same directory as the MDB. Access will load this image instead of its native logo. I have never tried to create a one-pixel image file but I'm guessing that it would work too. Arthur -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of paul.hartland at fsmail.net Sent: Wednesday, December 31, 2003 1:45 AM To: Access Developers discussion and problem solving Subject: Re: AW: [AccessD] Hiding Main Access Window Sorry but I don?t think I have explained correctly, when you first open Access that?s the screen I want to hide I know I can hide database windows etc from Tools/StartUp. Lets say we go to START/PROGRAMS and click on Microsoft Access and you get the blank access screen from which you can creat a new database, open existing etc. That?s the screen I want to hide, the actual Access screen. Sorry for any confusion. Paul Hartland Message date : Dec 31 2003, 09:39 AM >From : Helmut Kotsch To : Access Developers discussion and problem solving Copy to : Subject : AW: [AccessD] Hiding Main Access Window Paul, that's easy, even I can answer this one. Tools => Start..=> uncheck the "Show Database Window" Checkbox. I took this info from my installed German version of Access 2000, hope I translated the fieldnames alright. Regards and have a nice day. Helmut Kotsch -----Urspr?ngliche Nachricht----- Von: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]Im Auftrag von paul.hartland at fsmail.net Gesendet: Mittwoch, 31. Dezember 2003 10:17 An: accessd Betreff: [AccessD] Hiding Main Access Window To all, I?m sure I have seen this somewhere but can?t for the life of me remember where, I have an Access 2000 application that a few people have a shortcut to on their machines, which when opened opens the main Access window (as usual) and a switchboard. Is there anyway I can hide the main Access window so that the application looks similar to a Visual Basic application ? Thanks in advance for all your help. Paul Hartland Freeserve AnyTime - HALF PRICE for the first 3 months - Save ?7.50 a month www.freeserve.com/anytime _______________________________________________ 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 Freeserve AnyTime - HALF PRICE for the first 3 months - Save ?7.50 a month www.freeserve.com/anytime _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From andy at minstersystems.co.uk Thu Jan 1 07:05:44 2004 From: andy at minstersystems.co.uk (Andy Lacey) Date: Thu, 1 Jan 2004 13:05:44 -0000 Subject: [AccessD] Happy New Year - was Your contact info In-Reply-To: <3FF2F7BF.25733.17E6C8A@localhost> Message-ID: <00e601c3d067$f78540e0$b274d0d5@minster33c3r25> You're right Bryan it was 8pm here, but we managed a bevy or two before we hit the hay around 3 after a rousing chorus of Auld Lang Syne. Start the new year as you mean to go on, I say. Happy New Year to everyone. Andy Lacey http://www.minstersystems.co.uk > -----Original Message----- > From: accessd-bounces at databaseadvisors.com > [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of > Bryan Carbonnell > Sent: 31 December 2003 21:22 > To: Access Developers discussion and problem solving > Subject: Re: [AccessD] Your contact info > > > On 31 Dec 2003 at 16:10, William Hindman wrote: > > > ...not to bang on him too hard Andy but this has happened before > > Not picking on you William, you just happen to be the last in line > > I have also contacted him and am still waiting for a reply. I have a > gut feeling that this was an automated post from Plaxo. > > Don't worry, the mods are on it, so can we drop it. If any decisions > are to be made, your wonderful mod team will take care of it. > > Everyone have a safe and Happy New Year. > > BTW Andy, what are you doing posting at 8 pm on New Years Eve? > Shouldn't you be out enjoying a beverage or 3? > > > ...nice guy but its not his first time around the block with this > :( > > True, but still no reason for derogatory spelling comments either. I > can't spell worth a darn myself. > > -- > Bryan Carbonnell - carbonnb at sympatico.ca > Never let a computer see you hurry. > > > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com > > From mastercafe at ctv.es Thu Jan 1 13:29:40 2004 From: mastercafe at ctv.es (MastercafeCTV) Date: Thu, 1 Jan 2004 20:29:40 +0100 Subject: AW: [AccessD] Hiding Main Access Window In-Reply-To: <030501c3d04e$eda25090$6701a8c0@rock> Message-ID: <000c01c3d09d$9a4df8f0$69fa2250@servercafe> Efectivelly we take a BMP file with same name that application (mdb/mde) and in the same directory that this and supply the main Access warning for our logo. Thanks Arthur great information. Juan Menendez =========================================== MASTERCAFE SL - NIF B-82.617.614 www.mastercafe.com Deleg. Asturias Tel 985.88.49.44 / 627.531.764 Fax 627.500.205 info at mastercafe.com juan at mastercafe.com Deleg. Madrid Tel 627.474.285 cecilia at mastercafe.com =========================================== -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Arthur Fuller Sent: jueves, 01 de enero de 2004 11:06 To: 'Access Developers discussion and problem solving' Subject: RE: AW: [AccessD] Hiding Main Access Window One way to do this is to create an image file having the same name as your application MDB but with a different extension and place it in the same directory as the MDB. Access will load this image instead of its native logo. I have never tried to create a one-pixel image file but I'm guessing that it would work too. Arthur -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of paul.hartland at fsmail.net Sent: Wednesday, December 31, 2003 1:45 AM To: Access Developers discussion and problem solving Subject: Re: AW: [AccessD] Hiding Main Access Window Sorry but I don?t think I have explained correctly, when you first open Access that?s the screen I want to hide I know I can hide database windows etc from Tools/StartUp. Lets say we go to START/PROGRAMS and click on Microsoft Access and you get the blank access screen from which you can creat a new database, open existing etc. That?s the screen I want to hide, the actual Access screen. Sorry for any confusion. Paul Hartland Message date : Dec 31 2003, 09:39 AM >From : Helmut Kotsch To : Access Developers discussion and problem solving Copy to : Subject : AW: [AccessD] Hiding Main Access Window Paul, that's easy, even I can answer this one. Tools => Start..=> uncheck the "Show Database Window" Checkbox. I took this info from my installed German version of Access 2000, hope I translated the fieldnames alright. Regards and have a nice day. Helmut Kotsch -----Urspr?ngliche Nachricht----- Von: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]Im Auftrag von paul.hartland at fsmail.net Gesendet: Mittwoch, 31. Dezember 2003 10:17 An: accessd Betreff: [AccessD] Hiding Main Access Window To all, I?m sure I have seen this somewhere but can?t for the life of me remember where, I have an Access 2000 application that a few people have a shortcut to on their machines, which when opened opens the main Access window (as usual) and a switchboard. Is there anyway I can hide the main Access window so that the application looks similar to a Visual Basic application ? Thanks in advance for all your help. Paul Hartland Freeserve AnyTime - HALF PRICE for the first 3 months - Save ?7.50 a month www.freeserve.com/anytime _______________________________________________ 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 Freeserve AnyTime - HALF PRICE for the first 3 months - Save ?7.50 a month www.freeserve.com/anytime _______________________________________________ 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 From jwcolby at colbyconsulting.com Thu Jan 1 14:12:48 2004 From: jwcolby at colbyconsulting.com (John W. Colby) Date: Thu, 1 Jan 2004 15:12:48 -0500 Subject: [AccessD] test Message-ID: John W. Colby www.ColbyConsulting.com From starkey at wanadoo.nl Thu Jan 1 15:56:16 2004 From: starkey at wanadoo.nl (StaRKeY) Date: Thu, 1 Jan 2004 22:56:16 +0100 Subject: [AccessD] test In-Reply-To: Message-ID: test ok:-) -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of John W. Colby Sent: donderdag 1 januari 2004 21:13 To: AccessD Subject: [AccessD] test John W. Colby www.ColbyConsulting.com _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com --- avast! Antivirus: Outbound message clean. Virus Database (VPS): 30-12-2003 Tested on: 1-1-2004 22:56:16 avast! is copyright (c) 2000-2003 ALWIL Software. http://www.avast.com From wdhindman at bellsouth.net Thu Jan 1 16:11:58 2004 From: wdhindman at bellsouth.net (William Hindman) Date: Thu, 1 Jan 2004 17:11:58 -0500 Subject: [AccessD] test References: Message-ID: <000a01c3d0b4$46519bf0$6101a8c0@dejpolsys> ...test originator not ok :) William Hindman - Next Year In The Free State! ----- Original Message ----- From: "StaRKeY" To: "Access Developers discussion and problem solving" Sent: Thursday, January 01, 2004 4:56 PM Subject: RE: [AccessD] test > test ok:-) > > -----Original Message----- > From: accessd-bounces at databaseadvisors.com > [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of John W. Colby > Sent: donderdag 1 januari 2004 21:13 > To: AccessD > Subject: [AccessD] test > > > > > John W. Colby > www.ColbyConsulting.com > > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com > > > --- > avast! Antivirus: Outbound message clean. > Virus Database (VPS): 30-12-2003 > Tested on: 1-1-2004 22:56:16 > avast! is copyright (c) 2000-2003 ALWIL Software. > http://www.avast.com > > > > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com > From jwcolby at colbyconsulting.com Thu Jan 1 16:19:49 2004 From: jwcolby at colbyconsulting.com (John W. Colby) Date: Thu, 1 Jan 2004 17:19:49 -0500 Subject: [AccessD] test In-Reply-To: <000a01c3d0b4$46519bf0$6101a8c0@dejpolsys> Message-ID: LOL. Better than some... After that it's the percentages that matter. John W. Colby www.ColbyConsulting.com -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of William Hindman Sent: Thursday, January 01, 2004 5:12 PM To: Access Developers discussion and problem solving Subject: Re: [AccessD] test ...test originator not ok :) William Hindman - Next Year In The Free State! ----- Original Message ----- From: "StaRKeY" To: "Access Developers discussion and problem solving" Sent: Thursday, January 01, 2004 4:56 PM Subject: RE: [AccessD] test > test ok:-) > > -----Original Message----- > From: accessd-bounces at databaseadvisors.com > [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of John W. Colby > Sent: donderdag 1 januari 2004 21:13 > To: AccessD > Subject: [AccessD] test > > > > > John W. Colby > www.ColbyConsulting.com > > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com > > > --- > avast! Antivirus: Outbound message clean. > Virus Database (VPS): 30-12-2003 > Tested on: 1-1-2004 22:56:16 > avast! is copyright (c) 2000-2003 ALWIL Software. > http://www.avast.com > > > > _______________________________________________ > 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 From wdhindman at bellsouth.net Thu Jan 1 16:35:55 2004 From: wdhindman at bellsouth.net (William Hindman) Date: Thu, 1 Jan 2004 17:35:55 -0500 Subject: [AccessD] test References: Message-ID: <000801c3d0b7$9f0540a0$6101a8c0@dejpolsys> ...hey, as long as you can still laugh, eh? :) ...hope you and Mary and the kids had a good xmas and New Years :) William Hindman - Next Year In The Free State! ----- Original Message ----- From: "John W. Colby" To: "Access Developers discussion and problem solving" Sent: Thursday, January 01, 2004 5:19 PM Subject: RE: [AccessD] test > LOL. Better than some... After that it's the percentages that matter. > > John W. Colby > www.ColbyConsulting.com > > -----Original Message----- > From: accessd-bounces at databaseadvisors.com > [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of William > Hindman > Sent: Thursday, January 01, 2004 5:12 PM > To: Access Developers discussion and problem solving > Subject: Re: [AccessD] test > > > ...test originator not ok :) > > William Hindman > - Next Year In The Free State! > > > ----- Original Message ----- > From: "StaRKeY" > To: "Access Developers discussion and problem solving" > > Sent: Thursday, January 01, 2004 4:56 PM > Subject: RE: [AccessD] test > > > > test ok:-) > > > > -----Original Message----- > > From: accessd-bounces at databaseadvisors.com > > [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of John W. Colby > > Sent: donderdag 1 januari 2004 21:13 > > To: AccessD > > Subject: [AccessD] test > > > > > > > > > > John W. Colby > > www.ColbyConsulting.com > > > > _______________________________________________ > > AccessD mailing list > > AccessD at databaseadvisors.com > > http://databaseadvisors.com/mailman/listinfo/accessd > > Website: http://www.databaseadvisors.com > > > > > > --- > > avast! Antivirus: Outbound message clean. > > Virus Database (VPS): 30-12-2003 > > Tested on: 1-1-2004 22:56:16 > > avast! is copyright (c) 2000-2003 ALWIL Software. > > http://www.avast.com > > > > > > > > _______________________________________________ > > 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 > > > > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com > From jwcolby at colbyconsulting.com Thu Jan 1 19:17:43 2004 From: jwcolby at colbyconsulting.com (John W. Colby) Date: Thu, 1 Jan 2004 20:17:43 -0500 Subject: [AccessD] Where do they store the toolbar info Message-ID: I am going through a database I inherited trying to make the thing look and act consistent. One thing that I am running across is that some forms have toolbars on such as "web design", "Form view" etc. If you go to design view / properties / others, there is no toolbar in any of the toolbar properties on this tab. This is something that has always puzzled me and I never really ever figured out. This (what toolbars are being displayed) is "context sensitive", i.e. if you click in the menu at the top of a form while in view mode (not design view) and select a toolbar from the menu that appears, then close the form, the form "retains" that toolbar as it opens next time. That is simply nuts to me, who wants the form design toolbar viewable to the user just because you used it yourself? Anyway, where the ^%*&^%(*^) is this stuff stored? Does anyone have code to go find and get rid of these things throughout an application (all forms). I'm currently opening every form and if they have any of these menus, right clicking on the top, unselecting the menu and saving (closing) the form which gets rid of it... until the next time it is closed with one of these menus selected. Help!!! John W. Colby www.ColbyConsulting.com From davesharpe2 at cox.net Thu Jan 1 19:28:44 2004 From: davesharpe2 at cox.net (Dave Sharpe) Date: Thu, 1 Jan 2004 20:28:44 -0500 Subject: [AccessD] Where do they store the toolbar info References: Message-ID: <005501c3d0cf$c3779e70$dd2f0a44@bcsext6137> John I've never worked in this area but the document below (" Programming in MS Access using Macros and Toolbars ") http://home.twcny.rr.com/accesssig/MS%20Access%20Macros.pdf might be of assistance Dave ----- Original Message ----- From: "John W. Colby" To: "AccessD" Sent: Thursday, January 01, 2004 8:17 PM Subject: [AccessD] Where do they store the toolbar info I am going through a database I inherited trying to make the thing look and act consistent. One thing that I am running across is that some forms have toolbars on such as "web design", "Form view" etc. If you go to design view / properties / others, there is no toolbar in any of the toolbar properties on this tab. This is something that has always puzzled me and I never really ever figured out. This (what toolbars are being displayed) is "context sensitive", i.e. if you click in the menu at the top of a form while in view mode (not design view) and select a toolbar from the menu that appears, then close the form, the form "retains" that toolbar as it opens next time. That is simply nuts to me, who wants the form design toolbar viewable to the user just because you used it yourself? Anyway, where the ^%*&^%(*^) is this stuff stored? Does anyone have code to go find and get rid of these things throughout an application (all forms). I'm currently opening every form and if they have any of these menus, right clicking on the top, unselecting the menu and saving (closing) the form which gets rid of it... until the next time it is closed with one of these menus selected. Help!!! John W. Colby www.ColbyConsulting.com _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From accessd at shaw.ca Fri Jan 2 05:58:26 2004 From: accessd at shaw.ca (Jim Lawrence (AccessD)) Date: Fri, 02 Jan 2004 03:58:26 -0800 Subject: [AccessD] Where do they store the toolbar info In-Reply-To: Message-ID: Hi John: I am not sure whether this is the case but when ever I have had some custom tool bars, all have been implemented through macros. (The only place in which I use those things.) There is a way to do in A2000 plus, through a 'command' code but I have never bothered to researched it myself. HTH Jim -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of John W. Colby Sent: Thursday, January 01, 2004 5:18 PM To: AccessD Subject: [AccessD] Where do they store the toolbar info I am going through a database I inherited trying to make the thing look and act consistent. One thing that I am running across is that some forms have toolbars on such as "web design", "Form view" etc. If you go to design view / properties / others, there is no toolbar in any of the toolbar properties on this tab. This is something that has always puzzled me and I never really ever figured out. This (what toolbars are being displayed) is "context sensitive", i.e. if you click in the menu at the top of a form while in view mode (not design view) and select a toolbar from the menu that appears, then close the form, the form "retains" that toolbar as it opens next time. That is simply nuts to me, who wants the form design toolbar viewable to the user just because you used it yourself? Anyway, where the ^%*&^%(*^) is this stuff stored? Does anyone have code to go find and get rid of these things throughout an application (all forms). I'm currently opening every form and if they have any of these menus, right clicking on the top, unselecting the menu and saving (closing) the form which gets rid of it... until the next time it is closed with one of these menus selected. Help!!! John W. Colby www.ColbyConsulting.com _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From glen_mcwilliams at msn.com Fri Jan 2 06:16:39 2004 From: glen_mcwilliams at msn.com (Glen McWilliams) Date: Fri, 2 Jan 2004 04:16:39 -0800 Subject: [AccessD] Where do they store the toolbar info References: Message-ID: John You should be able to walk through the CommandBars collection, setting the visible property for each to false. Somewhere code to do this, which I will post. HTH Glen McWilliams ----- Original Message ----- From: Jim Lawrence (AccessD) To: Access Developers discussion and problem solving Sent: Friday, January 02, 2004 3:58 AM Subject: RE: [AccessD] Where do they store the toolbar info Hi John: I am not sure whether this is the case but when ever I have had some custom tool bars, all have been implemented through macros. (The only place in which I use those things.) There is a way to do in A2000 plus, through a 'command' code but I have never bothered to researched it myself. HTH Jim -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of John W. Colby Sent: Thursday, January 01, 2004 5:18 PM To: AccessD Subject: [AccessD] Where do they store the toolbar info I am going through a database I inherited trying to make the thing look and act consistent. One thing that I am running across is that some forms have toolbars on such as "web design", "Form view" etc. If you go to design view / properties / others, there is no toolbar in any of the toolbar properties on this tab. This is something that has always puzzled me and I never really ever figured out. This (what toolbars are being displayed) is "context sensitive", i.e. if you click in the menu at the top of a form while in view mode (not design view) and select a toolbar from the menu that appears, then close the form, the form "retains" that toolbar as it opens next time. That is simply nuts to me, who wants the form design toolbar viewable to the user just because you used it yourself? Anyway, where the ^%*&^%(*^) is this stuff stored? Does anyone have code to go find and get rid of these things throughout an application (all forms). I'm currently opening every form and if they have any of these menus, right clicking on the top, unselecting the menu and saving (closing) the form which gets rid of it... until the next time it is closed with one of these menus selected. Help!!! John W. Colby www.ColbyConsulting.com _______________________________________________ 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 From jimdettman at earthlink.net Fri Jan 2 09:30:35 2004 From: jimdettman at earthlink.net (Jim Dettman) Date: Fri, 2 Jan 2004 10:30:35 -0500 Subject: [AccessD] Where do they store the toolbar info In-Reply-To: Message-ID: John, <> Depends on version as to the actual table name, but it's a system table. For example, for A97 it is MSysCmdBars. For A2000 and up, I believe it's MSysAccessObjects. <> I don't have any. I've always disabled all built-in toolbars and done my own via code since A2 days. Might want to check the MVP site or look at some of the command bar collection stuff for code. Jim Dettman President, Online Computer Services of WNY, Inc. (315) 699-3443 jimdettman at earthlink.net -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of John W. Colby Sent: Thursday, January 01, 2004 8:18 PM To: AccessD Subject: [AccessD] Where do they store the toolbar info I am going through a database I inherited trying to make the thing look and act consistent. One thing that I am running across is that some forms have toolbars on such as "web design", "Form view" etc. If you go to design view / properties / others, there is no toolbar in any of the toolbar properties on this tab. This is something that has always puzzled me and I never really ever figured out. This (what toolbars are being displayed) is "context sensitive", i.e. if you click in the menu at the top of a form while in view mode (not design view) and select a toolbar from the menu that appears, then close the form, the form "retains" that toolbar as it opens next time. That is simply nuts to me, who wants the form design toolbar viewable to the user just because you used it yourself? Does anyone have code to go find and get rid of these things throughout an application (all forms). I'm currently opening every form and if they have any of these menus, right clicking on the top, unselecting the menu and saving (closing) the form which gets rid of it... until the next time it is closed with one of these menus selected. Help!!! John W. Colby www.ColbyConsulting.com _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From markamatte at hotmail.com Fri Jan 2 10:18:35 2004 From: markamatte at hotmail.com (Mark A Matte) Date: Fri, 02 Jan 2004 16:18:35 +0000 Subject: AW: [AccessD] Hiding Main Access Window Message-ID: Hello All, I see this thread is still alive. My impression was that he wanted to hide the application window...but some of the suggestions seem to be towards the splash screen. I sent a sample DB that Drew Wutka created to Paul offline. I'm not sure if he received it...but it uses the function below to hide the application window. Hope it helps!!! Mark A. Matte Public Function fAccessWindow(Optional Procedure As String, Optional SwitchStatus As Boolean, Optional StatusCheck As Boolean) As Boolean If Procedure = "Hide" Then dwReturn = ShowWindow(Application.hWndAccessApp, SW_HIDE) End If If Procedure = "Show" Then dwReturn = ShowWindow(Application.hWndAccessApp, SW_SHOWMAXIMIZED) End If If Procedure = "Minimize" Then dwReturn = ShowWindow(Application.hWndAccessApp, SW_SHOWMINIMIZED) End If If SwitchStatus = True Then If IsWindowVisible(hWndAccessApp) = 1 Then dwReturn = ShowWindow(Application.hWndAccessApp, SW_HIDE) Else dwReturn = ShowWindow(Application.hWndAccessApp, SW_SHOWMAXIMIZED) End If End If If StatusCheck = True Then If IsWindowVisible(hWndAccessApp) = 0 Then fAccessWindow = False End If If IsWindowVisible(hWndAccessApp) = 1 Then fAccessWindow = True End If End If End Function >From: "MastercafeCTV" >Reply-To: Access Developers discussion and problem >solving >To: "'Access Developers discussion and problem >solving'" >Subject: RE: AW: [AccessD] Hiding Main Access Window >Date: Thu, 1 Jan 2004 20:29:40 +0100 > >Efectivelly we take a BMP file with same name that application (mdb/mde) >and >in the same directory that this and supply the main Access warning for our >logo. > >Thanks Arthur great information. > >Juan Menendez > > >=========================================== >MASTERCAFE SL - NIF B-82.617.614 >www.mastercafe.com >Deleg. Asturias >Tel 985.88.49.44 / 627.531.764 >Fax 627.500.205 >info at mastercafe.com >juan at mastercafe.com >Deleg. Madrid >Tel 627.474.285 >cecilia at mastercafe.com >=========================================== > > >-----Original Message----- >From: accessd-bounces at databaseadvisors.com >[mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Arthur Fuller >Sent: jueves, 01 de enero de 2004 11:06 >To: 'Access Developers discussion and problem solving' >Subject: RE: AW: [AccessD] Hiding Main Access Window > > >One way to do this is to create an image file having the same name as your >application MDB but with a different extension and place it in the same >directory as the MDB. Access will load this image instead of its native >logo. I have never tried to create a one-pixel image file but I'm guessing >that it would work too. > >Arthur > >-----Original Message----- >From: accessd-bounces at databaseadvisors.com >[mailto:accessd-bounces at databaseadvisors.com] On Behalf Of >paul.hartland at fsmail.net >Sent: Wednesday, December 31, 2003 1:45 AM >To: Access Developers discussion and problem solving >Subject: Re: AW: [AccessD] Hiding Main Access Window > > >Sorry but I don?t think I have explained correctly, when you first open >Access that?s the screen I want to hide I know I can hide database windows >etc from Tools/StartUp. Lets say we go to START/PROGRAMS and click on >Microsoft Access and you get the blank access screen from which you can >creat a new database, open existing etc. That?s the screen I want to hide, >the actual Access screen. > >Sorry for any confusion. > >Paul Hartland > > > > > > >Message date : Dec 31 2003, 09:39 AM > >From : Helmut Kotsch >To : Access Developers discussion and problem solving >Copy to : >Subject : AW: [AccessD] Hiding Main Access Window >Paul, >that's easy, even I can answer this one. >Tools => Start..=> uncheck the "Show Database Window" Checkbox. I took this >info from my installed German version of Access 2000, hope I translated the >fieldnames alright. > >Regards and have a nice day. > >Helmut Kotsch > > >-----Urspr?ngliche Nachricht----- >Von: accessd-bounces at databaseadvisors.com >[mailto:accessd-bounces at databaseadvisors.com]Im Auftrag von >paul.hartland at fsmail.net >Gesendet: Mittwoch, 31. Dezember 2003 10:17 >An: accessd >Betreff: [AccessD] Hiding Main Access Window > > >To all, > >I?m sure I have seen this somewhere but can?t for the life of me remember >where, I have an Access 2000 application that a few people have a shortcut >to on their machines, which when opened opens the main Access window (as >usual) and a switchboard. Is there anyway I can hide the main Access window >so that the application looks similar to a Visual Basic application ? > >Thanks in advance for all your help. > >Paul Hartland >Freeserve AnyTime - HALF PRICE for the first 3 months - Save ?7.50 a month >www.freeserve.com/anytime _______________________________________________ >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 >Freeserve AnyTime - HALF PRICE for the first 3 months - Save ?7.50 a month >www.freeserve.com/anytime _______________________________________________ >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 > >_______________________________________________ >AccessD mailing list >AccessD at databaseadvisors.com >http://databaseadvisors.com/mailman/listinfo/accessd >Website: http://www.databaseadvisors.com _________________________________________________________________ Take advantage of our limited-time introductory offer for dial-up Internet access. http://join.msn.com/?page=dept/dialup From john at winhaven.net Fri Jan 2 10:32:05 2004 From: john at winhaven.net (John Bartow) Date: Fri, 2 Jan 2004 10:32:05 -0600 Subject: [AccessD] Where do they store the toolbar info In-Reply-To: Message-ID: Hi John, I had a similar problem recently. Commandbars are wierd ducks for sure. Anyway, I used Speed Ferret to change all of the command bars references to the ones that I wanted (my own) for each type of object. I would imagine any search and replace tool could do the same, if you are using another one. Sorry, I don't have much in the way of code to manipulate command bars to address these types of problems. John B. > -----Original Message----- > From: accessd-bounces at databaseadvisors.com > [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of John W. Colby > Sent: Thursday, January 01, 2004 7:18 PM > To: AccessD > Subject: [AccessD] Where do they store the toolbar info > > > I am going through a database I inherited trying to make the > thing look and > act consistent. One thing that I am running across is that some > forms have > toolbars on such as "web design", "Form view" etc. If you go to > design view > / properties / others, there is no toolbar in any of the toolbar > properties > on this tab. > > This is something that has always puzzled me and I never really > ever figured > out. This (what toolbars are being displayed) is "context > sensitive", i.e. > if you click in the menu at the top of a form while in view mode > (not design > view) and select a toolbar from the menu that appears, then close > the form, > the form "retains" that toolbar as it opens next time. > > That is simply nuts to me, who wants the form design toolbar > viewable to the > user just because you used it yourself? > > Anyway, where the ^%*&^%(*^) is this stuff stored? Does anyone > have code to > go find and get rid of these things throughout an application (all forms). > I'm currently opening every form and if they have any of these > menus, right > clicking on the top, unselecting the menu and saving (closing) the form > which gets rid of it... until the next time it is closed with one of these > menus selected. > > Help!!! > > John W. Colby > www.ColbyConsulting.com > > > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com > > From gustav at cactus.dk Fri Jan 2 11:08:56 2004 From: gustav at cactus.dk (Gustav Brock) Date: Fri, 2 Jan 2004 18:08:56 +0100 Subject: [AccessD] Writing raw RTF document using VBA - Solved In-Reply-To: <7837311130.20031101202713@cactus.dk> References: <5614351436.20030524150347@cactus.dk> <1429226064.20031031183338@cactus.dk> <7837311130.20031101202713@cactus.dk> Message-ID: <17433585032.20040102180856@cactus.dk> Hi William, Tom et all Referring to my post from 2003-11-01, I did an implementation of this and it rocks. > First, here's one solution for extracting the RTF body: > Having reached this point it's a simple matter to assemble and write > the full RTF document .. > I'm pretty sure this won't be able concatenate any collection of RTF > documents whatever the size. But until further testing has been > carried out, I guess it will be able to concatenate a vast amount of > small RTF docs like those found and produced in an ocx controlled RTF > memobox. I modified the code slightly to write the RTF document item by item and that certainly speeds up the process. A test with 20.000 small items created in less than one minute a 8 MB RTF document which Word used longer time to open and - having done so - reported to have a size of 2.500 pages. Have in mind, that an RTF document written this way is extremely compact compared to a similar but bloated document created directly in Word. This is the modification (main structure only): If rst.RecordCount > 0 Then ' Build output filename. strRTFFile = FunctionToCreateFileName() ' Set RTF header. strRTF = cstrRTFBodyHeader ' Create RTF file. intFile = FreeFile Open strRTFFile For Output As #intFile ' Write RTF header. Print #intFile, strRTF ' Concatenate RTF bodies. With rst While .EOF = False varMemo = LookupMemo(!ID, !Description) If Not IsNull(varMemo) Then If Not IsRTF(varMemo) Then varMemo = ConvTexttoRTF(varMemo, False) Else Call ClearRTFNullEnd(varMemo) End If Call AppendRTFCrLf(varMemo) Call ClearRTFNewLineEnd(varMemo) strTxt = TrimTextBodyRTF(varMemo, True) & cstrRTFFontPlain If Len(strTxt) > 0 Then Call ClearRTFFontSize(strTxt) strRTF = cstrRTFFontPlain & Space(1) & strTxt & cstrRTFFontPlain & cstrRTFNewLine ' Append this RTF paragraph. Print #intFile, strRTF End If End If .MoveNext Wend .Close End With ' Append RTF closing bracket. strRTF = cstrRTFBodyEnd Print #intFile, strRTF ' Close RTF file. Close #intFile ' Reset RTB object. strRTF = ConvTexttoRTF(vbNullString, True) End If Happy New Year! /gustav From jwcolby at colbyconsulting.com Fri Jan 2 12:38:12 2004 From: jwcolby at colbyconsulting.com (John W. Colby) Date: Fri, 2 Jan 2004 13:38:12 -0500 Subject: [AccessD] Where do they store the toolbar info In-Reply-To: Message-ID: John, I've discovered that the toolbars I am discussing are either showing or not for EVERY form, though thinking back on it I'm a bit confused about this because I would go through a bunch of small forms in this app and one would display the toolbar, the next would not. In any case, at this specific moment the right click toolbar menu that opens when I right click the menu bar at the top of the app had 5 toolbars available to be clicked. Clipboard Form view Web ToolbarDataEntry (a custom toolbar) ToolBarMenu (a custom toolbar) Any one or ALL of these can be selected / deselected while a form is open. If you close the form and open another form, the toolbars are still open, although again I swear that some forms showed them, others didn't. At any rate, I discovered that if you right click the menu bar, then select customize, a slew of toolbars are available to be displayed by checking the check box to the left of each. However, if you select a toolbar and go into properties, there are several checkboxes available: Allow Customizing Allow Resizing Allow Moving Allow Show/Hiding If you unclick the Allow Show/hiding then you can't cause that toolbar to appear even if you select it, where normally you would be able to display the toolbar just by checking it's selector checkbox. So IF it is currently displayed, you can't cause it to go away. If it's not displayed, you can't cause it to display. It then turns out that you can customize your development environment by (for example): Going into design view of something like a form. Make sure Allow show/hiding is checked for a toolbar you want go into Customize and select the toolbars you want for that view (design / form). Deselect Allow show / hide for those toolbars. Now you can't get rid of the toolbars in that view (design forms) Go into View forms (viewing the form opened). make sure Allow show/hide is checked for the toolbar you want Go into customize and select the toolbar(s) you want displayed (or deselect any "problem" toolbars you DON'T want) Deselect Allow show/hide for those toolbars. Now the toolbars selected cannot be deselected and the ones you DON'T want can't be selected. It seems like a royal PITA to set this up. There are so many toolbars that you have to futz with to get things right, however it looks like when you are done this problem would go away. And I still don't know how Access stores what toolbars are being viewed in any view of any given access object (form/report/module etc). It looks like a form in view mode can have a set of toolbars, a different set in design view, reports have a set in view mode, a different set in design mode etc. all of which can then be "locked down" so that nothing can be taken away and likewise nothing extra can be added. But WHAT A PAIN doing it manually. John W. Colby www.ColbyConsulting.com -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of John Bartow Sent: Friday, January 02, 2004 11:32 AM To: Access Developers discussion and problem solving Subject: RE: [AccessD] Where do they store the toolbar info Hi John, I had a similar problem recently. Commandbars are wierd ducks for sure. Anyway, I used Speed Ferret to change all of the command bars references to the ones that I wanted (my own) for each type of object. I would imagine any search and replace tool could do the same, if you are using another one. Sorry, I don't have much in the way of code to manipulate command bars to address these types of problems. John B. > -----Original Message----- > From: accessd-bounces at databaseadvisors.com > [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of John W. Colby > Sent: Thursday, January 01, 2004 7:18 PM > To: AccessD > Subject: [AccessD] Where do they store the toolbar info > > > I am going through a database I inherited trying to make the > thing look and > act consistent. One thing that I am running across is that some > forms have > toolbars on such as "web design", "Form view" etc. If you go to > design view > / properties / others, there is no toolbar in any of the toolbar > properties > on this tab. > > This is something that has always puzzled me and I never really > ever figured > out. This (what toolbars are being displayed) is "context > sensitive", i.e. > if you click in the menu at the top of a form while in view mode > (not design > view) and select a toolbar from the menu that appears, then close > the form, > the form "retains" that toolbar as it opens next time. > > That is simply nuts to me, who wants the form design toolbar > viewable to the > user just because you used it yourself? > > Anyway, where the ^%*&^%(*^) is this stuff stored? Does anyone > have code to > go find and get rid of these things throughout an application (all forms). > I'm currently opening every form and if they have any of these > menus, right > clicking on the top, unselecting the menu and saving (closing) the form > which gets rid of it... until the next time it is closed with one of these > menus selected. > > Help!!! > > John W. Colby > www.ColbyConsulting.com > > > _______________________________________________ > 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 From DWUTKA at marlow.com Fri Jan 2 17:10:48 2004 From: DWUTKA at marlow.com (DWUTKA at marlow.com) Date: Fri, 2 Jan 2004 17:10:48 -0600 Subject: [AccessD] Msldbusr.dll Registration Error Message-ID: <2F8793082E00D4119A1700B0D0216BF8022276D6@main2.marlow.com> Now a post like that is going to get me off my butt and start building my site again! Just need to find the time! Actually had a friend create that image for me....not very artistic myself! Drew -----Original Message----- From: tortise at paradise.net.nz [mailto:tortise at paradise.net.nz] Sent: Tuesday, December 30, 2003 7:10 PM To: Access Developers discussion and problem solving Subject: Re: [AccessD] Msldbusr.dll Registration Error Drew That's a neat wolf icon on your site.... Have you considered adding a small sound file to your home page...of a wolf howling like they do? I was waiting for it...but it didn't come..... OK perhaps I should have sent this on Friday, but I plead Friday is a public holiday.... btw thanks for your site! Kind regards, Dr David Hingston Director Chequers Software Limited Wellington, New Zealand. www.cheqsoft.com Crafters of: Break Reminder - For safe and efficient PC use - www.breakreminder.com TimesOwn - International Time Zone Calculator a click away - http://www.cheqsoft.com/timesown.html Clipboard Express - Cut and paste storage and web form filler - http://www.cheqsoft.com/clipboard.html MP3Detective - MP3 Player manager - http://www.cheqsoft.com/mp3detective.html Engines2Go = E2Go Fast and friendly Internet searching - have you tried it? http://www.E2Go.com/ ----- Original Message ----- From: To: Sent: Wednesday, December 31, 2003 12:48 PM Subject: RE: [AccessD] Msldbusr.dll Registration Error > No problem. By the way, if you go to my site.. http://www.wolfwares.com and > go to the Microsoft Access section, on of the few things I have on my site > is my Database Users database, which probably does what you are looking for, > without that .dll. _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From john at winhaven.net Fri Jan 2 17:14:52 2004 From: john at winhaven.net (John Bartow) Date: Fri, 2 Jan 2004 17:14:52 -0600 Subject: [AccessD] Where do they store the toolbar info In-Reply-To: Message-ID: John, I think you've summed it up pretty well here. The CommandBar system seems to be a flexible system but not very developer friendly. It could definitely use a more comprehensive UI to configure options for each form/report object. Because I distribute apps using Access runtime, and built-in CommandBars aren't available under runtime, I have created a set of custom toolbars that I use for runtime use: tbrMenu; mbrMenu; sbrMenu for all menu forms tbrPopup; mbrPopup; sbrPopup for all pop-up forms tbrBasic; mbrBasic; sbrBasic for all standard forms tbrReport; mbrReport; sbrReport for all reports etc. I then customize a CommandBar if needed for a particular form or control. By doing this I can just import CommandBars from a previously built app and not have to spend time creating them. Before distributing for runtime use I set the "AllowBuiltinToolbars" property to false so my users will never get the built-in set of CommandBars. John B. PS: I think the same crew worked on the CommandBar UI that put the task options in Outlook 2k. I guess things could be worse! Here's a trick that might make you appreciate the CommandBar UI better: Try to find "Set Reminders on Tasks with Due Dates" in Outlook 2k - I guarantee that its on one of the four different dialogs boxes (each having three or less options on it) used to set task option. > -----Original Message----- > From: accessd-bounces at databaseadvisors.com > [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of John W. Colby > Sent: Friday, January 02, 2004 12:38 PM > To: Access Developers discussion and problem solving > Subject: RE: [AccessD] Where do they store the toolbar info > > > John, > > I've discovered that the toolbars I am discussing are either > showing or not > for EVERY form, though thinking back on it I'm a bit confused about this > because I would go through a bunch of small forms in this app and > one would > display the toolbar, the next would not. > > In any case, at this specific moment the right click toolbar menu > that opens > when I right click the menu bar at the top of the app had 5 toolbars > available to be clicked. > > Clipboard > Form view > Web > ToolbarDataEntry (a custom toolbar) > ToolBarMenu (a custom toolbar) > > Any one or ALL of these can be selected / deselected while a form is open. > If you close the form and open another form, the toolbars are still open, > although again I swear that some forms showed them, others didn't. > > At any rate, I discovered that if you right click the menu bar, > then select > customize, a slew of toolbars are available to be displayed by > checking the > check box to the left of each. However, if you select a toolbar > and go into > properties, there are several checkboxes available: > > Allow Customizing > Allow Resizing > Allow Moving > Allow Show/Hiding > > If you unclick the Allow Show/hiding then you can't cause that toolbar to > appear even if you select it, where normally you would be able to display > the toolbar just by checking it's selector checkbox. > > So IF it is currently displayed, you can't cause it to go away. > If it's not > displayed, you can't cause it to display. > > It then turns out that you can customize your development environment by > (for example): > > Going into design view of something like a form. > Make sure Allow show/hiding is checked for a toolbar you want > go into Customize and select the toolbars you want for that view (design / > form). > Deselect Allow show / hide for those toolbars. > > Now you can't get rid of the toolbars in that view (design forms) > > Go into View forms (viewing the form opened). > make sure Allow show/hide is checked for the toolbar you want > Go into customize and select the toolbar(s) you want displayed > (or deselect > any "problem" toolbars you DON'T want) > Deselect Allow show/hide for those toolbars. > > Now the toolbars selected cannot be deselected and the ones you DON'T want > can't be selected. > > It seems like a royal PITA to set this up. There are so many > toolbars that > you have to futz with to get things right, however it looks like when you > are done this problem would go away. > > And I still don't know how Access stores what toolbars are being viewed in > any view of any given access object (form/report/module etc). It > looks like > a form in view mode can have a set of toolbars, a different set in design > view, reports have a set in view mode, a different set in design mode etc. > all of which can then be "locked down" so that nothing can be > taken away and > likewise nothing extra can be added. > > But WHAT A PAIN doing it manually. > > John W. Colby > www.ColbyConsulting.com > > -----Original Message----- > From: accessd-bounces at databaseadvisors.com > [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of John Bartow > Sent: Friday, January 02, 2004 11:32 AM > To: Access Developers discussion and problem solving > Subject: RE: [AccessD] Where do they store the toolbar info > > > Hi John, > I had a similar problem recently. Commandbars are wierd ducks for sure. > Anyway, I used Speed Ferret to change all of the command bars > references to > the ones that I wanted (my own) for each type of object. I would > imagine any > search and replace tool could do the same, if you are using another one. > > Sorry, I don't have much in the way of code to manipulate command bars to > address these types of problems. > > John B. > > > -----Original Message----- > > From: accessd-bounces at databaseadvisors.com > > [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of John W. Colby > > Sent: Thursday, January 01, 2004 7:18 PM > > To: AccessD > > Subject: [AccessD] Where do they store the toolbar info > > > > > > I am going through a database I inherited trying to make the > > thing look and > > act consistent. One thing that I am running across is that some > > forms have > > toolbars on such as "web design", "Form view" etc. If you go to > > design view > > / properties / others, there is no toolbar in any of the toolbar > > properties > > on this tab. > > > > This is something that has always puzzled me and I never really > > ever figured > > out. This (what toolbars are being displayed) is "context > > sensitive", i.e. > > if you click in the menu at the top of a form while in view mode > > (not design > > view) and select a toolbar from the menu that appears, then close > > the form, > > the form "retains" that toolbar as it opens next time. > > > > That is simply nuts to me, who wants the form design toolbar > > viewable to the > > user just because you used it yourself? > > > > Anyway, where the ^%*&^%(*^) is this stuff stored? Does anyone > > have code to > > go find and get rid of these things throughout an application > (all forms). > > I'm currently opening every form and if they have any of these > > menus, right > > clicking on the top, unselecting the menu and saving (closing) the form > > which gets rid of it... until the next time it is closed with > one of these > > menus selected. > > > > Help!!! > > > > John W. Colby > > www.ColbyConsulting.com > > > > > > _______________________________________________ > > 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 > > > > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com > > From DWUTKA at marlow.com Fri Jan 2 17:18:51 2004 From: DWUTKA at marlow.com (DWUTKA at marlow.com) Date: Fri, 2 Jan 2004 17:18:51 -0600 Subject: [AccessD] Hiding Main Access Window Message-ID: <2F8793082E00D4119A1700B0D0216BF8022276D7@main2.marlow.com> Yes, you can do this, it requires the ShowWindow API call. It is commonly known that you also need to set all of the forms that you want visible to have their popup property set to yes, but also in 2000, that you need the modal property set to yes also. I have a method that does not require the modal property in 2000. Go to the Access section of my site (http://www.wolfwares.com) and download the Always On Top database. It does exactly what you want (and a little more, it puts the form 'always on top', kinda handy....). Susan and I actually published an article about that...should be out this month in Inside Microsoft Access. Drew -----Original Message----- From: paul.hartland at fsmail.net [mailto:paul.hartland at fsmail.net] Sent: Wednesday, December 31, 2003 3:17 AM To: accessd Subject: [AccessD] Hiding Main Access Window To all, I'm sure I have seen this somewhere but can't for the life of me remember where, I have an Access 2000 application that a few people have a shortcut to on their machines, which when opened opens the main Access window (as usual) and a switchboard. Is there anyway I can hide the main Access window so that the application looks similar to a Visual Basic application ? Thanks in advance for all your help. Paul Hartland Freeserve AnyTime - HALF PRICE for the first 3 months - Save ?7.50 a month www.freeserve.com/anytime _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From DWUTKA at marlow.com Fri Jan 2 17:19:17 2004 From: DWUTKA at marlow.com (DWUTKA at marlow.com) Date: Fri, 2 Jan 2004 17:19:17 -0600 Subject: [AccessD] Hiding Main Access Window Message-ID: <2F8793082E00D4119A1700B0D0216BF8022276D8@main2.marlow.com> Not true....just requires API calls... Drew -----Original Message----- From: MastercafeCTV [mailto:mastercafe at ctv.es] Sent: Wednesday, December 31, 2003 7:35 AM To: 'Access Developers discussion and problem solving' Subject: RE: [AccessD] Hiding Main Access Window We only can hide the main Access intro screen when you put only Runtime for Access (without any Access application). Then take parameters in the Intro application. On las version 2.0 we use and INI file to do this, but actually don't run. Happy new year for all developers and Access Groups from Asturias - SPAIN Juan Menendez =========================================== MASTERCAFE SL - NIF B-82.617.614 www.mastercafe.com Deleg. Asturias Tel 985.88.49.44 / 627.531.764 Fax 627.500.205 info at mastercafe.com juan at mastercafe.com Deleg. Madrid Tel 627.474.285 cecilia at mastercafe.com =========================================== -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of paul.hartland at fsmail.net Sent: mi?rcoles, 31 de diciembre de 2003 10:17 To: accessd Subject: [AccessD] Hiding Main Access Window To all, I'm sure I have seen this somewhere but can't for the life of me remember where, I have an Access 2000 application that a few people have a shortcut to on their machines, which when opened opens the main Access window (as usual) and a switchboard. Is there anyway I can hide the main Access window so that the application looks similar to a Visual Basic application ? Thanks in advance for all your help. Paul Hartland Freeserve AnyTime - HALF PRICE for the first 3 months - Save ?7.50 a month www.freeserve.com/anytime _______________________________________________ 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 From DWUTKA at marlow.com Fri Jan 2 17:26:38 2004 From: DWUTKA at marlow.com (DWUTKA at marlow.com) Date: Fri, 2 Jan 2004 17:26:38 -0600 Subject: AW: [AccessD] Hiding Main Access Window Message-ID: <2F8793082E00D4119A1700B0D0216BF8022276D9@main2.marlow.com> He's not talking splash screen. Paul, just an FYI, don't be surprised with the replies to your post. It's a common confusion with Access developers. Many people hide the db window, which can be done from the tools menu, however, to hide the Access window itself requires the ShowWindow API. It's not very difficult to do, because Application.hWndAccessWindow (I think) is the method to retrieve the hWnd of the Access Application window....very handy, let's you do all sorts of things to the Access Window if you want. However, the reason for the confusion is that a lot of developers (and this is NOT meant to be deragotory), develop specifically for Access, so there is no need to remove the Access window, since it is the tool in which the .mdb's are written for. Ironically, hiding the Access window was the first VBA code I ever messed with, because when I started in Access (back in 99), I was using all macros, and procedures. Worked great for what I needed. But I was creating a db for completely computer illiterate personnel, so I wanted as few things on the screen as possible, and there just was no way to hide the Access Window through non-VBA methods. (I even tried our companies help desk, who immediately gave me instructions to hide the db window......That night I figured out how to get the code on the Access Web to work, and when I let the help desk know how to solve that particular issue, I was told to never call them again...go figure...) Drew -----Original Message----- From: Arthur Fuller [mailto:artful at rogers.com] Sent: Thursday, January 01, 2004 4:06 AM To: 'Access Developers discussion and problem solving' Subject: RE: AW: [AccessD] Hiding Main Access Window One way to do this is to create an image file having the same name as your application MDB but with a different extension and place it in the same directory as the MDB. Access will load this image instead of its native logo. I have never tried to create a one-pixel image file but I'm guessing that it would work too. Arthur -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of paul.hartland at fsmail.net Sent: Wednesday, December 31, 2003 1:45 AM To: Access Developers discussion and problem solving Subject: Re: AW: [AccessD] Hiding Main Access Window Sorry but I don't think I have explained correctly, when you first open Access that's the screen I want to hide I know I can hide database windows etc from Tools/StartUp. Lets say we go to START/PROGRAMS and click on Microsoft Access and you get the blank access screen from which you can creat a new database, open existing etc. That's the screen I want to hide, the actual Access screen. Sorry for any confusion. Paul Hartland Message date : Dec 31 2003, 09:39 AM >From : Helmut Kotsch To : Access Developers discussion and problem solving Copy to : Subject : AW: [AccessD] Hiding Main Access Window Paul, that's easy, even I can answer this one. Tools => Start..=> uncheck the "Show Database Window" Checkbox. I took this info from my installed German version of Access 2000, hope I translated the fieldnames alright. Regards and have a nice day. Helmut Kotsch -----Urspr?ngliche Nachricht----- Von: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]Im Auftrag von paul.hartland at fsmail.net Gesendet: Mittwoch, 31. Dezember 2003 10:17 An: accessd Betreff: [AccessD] Hiding Main Access Window To all, I'm sure I have seen this somewhere but can't for the life of me remember where, I have an Access 2000 application that a few people have a shortcut to on their machines, which when opened opens the main Access window (as usual) and a switchboard. Is there anyway I can hide the main Access window so that the application looks similar to a Visual Basic application ? Thanks in advance for all your help. Paul Hartland Freeserve AnyTime - HALF PRICE for the first 3 months - Save ?7.50 a month www.freeserve.com/anytime _______________________________________________ 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 Freeserve AnyTime - HALF PRICE for the first 3 months - Save ?7.50 a month www.freeserve.com/anytime _______________________________________________ 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 From DWUTKA at marlow.com Fri Jan 2 17:28:38 2004 From: DWUTKA at marlow.com (DWUTKA at marlow.com) Date: Fri, 2 Jan 2004 17:28:38 -0600 Subject: AW: [AccessD] Hiding Main Access Window Message-ID: <2F8793082E00D4119A1700B0D0216BF8022276DA@main2.marlow.com> Ummm, that code won't work without the API declare statement! I posted a reply to a link of my Always on Top db, which actually works better.....hehehehe Drew -----Original Message----- From: Mark A Matte [mailto:markamatte at hotmail.com] Sent: Friday, January 02, 2004 10:19 AM To: accessd at databaseadvisors.com Subject: RE: AW: [AccessD] Hiding Main Access Window Hello All, I see this thread is still alive. My impression was that he wanted to hide the application window...but some of the suggestions seem to be towards the splash screen. I sent a sample DB that Drew Wutka created to Paul offline. I'm not sure if he received it...but it uses the function below to hide the application window. Hope it helps!!! Mark A. Matte Public Function fAccessWindow(Optional Procedure As String, Optional SwitchStatus As Boolean, Optional StatusCheck As Boolean) As Boolean If Procedure = "Hide" Then dwReturn = ShowWindow(Application.hWndAccessApp, SW_HIDE) End If If Procedure = "Show" Then dwReturn = ShowWindow(Application.hWndAccessApp, SW_SHOWMAXIMIZED) End If If Procedure = "Minimize" Then dwReturn = ShowWindow(Application.hWndAccessApp, SW_SHOWMINIMIZED) End If If SwitchStatus = True Then If IsWindowVisible(hWndAccessApp) = 1 Then dwReturn = ShowWindow(Application.hWndAccessApp, SW_HIDE) Else dwReturn = ShowWindow(Application.hWndAccessApp, SW_SHOWMAXIMIZED) End If End If If StatusCheck = True Then If IsWindowVisible(hWndAccessApp) = 0 Then fAccessWindow = False End If If IsWindowVisible(hWndAccessApp) = 1 Then fAccessWindow = True End If End If End Function >From: "MastercafeCTV" >Reply-To: Access Developers discussion and problem >solving >To: "'Access Developers discussion and problem >solving'" >Subject: RE: AW: [AccessD] Hiding Main Access Window >Date: Thu, 1 Jan 2004 20:29:40 +0100 > >Efectivelly we take a BMP file with same name that application (mdb/mde) >and >in the same directory that this and supply the main Access warning for our >logo. > >Thanks Arthur great information. > >Juan Menendez > > >=========================================== >MASTERCAFE SL - NIF B-82.617.614 >www.mastercafe.com >Deleg. Asturias >Tel 985.88.49.44 / 627.531.764 >Fax 627.500.205 >info at mastercafe.com >juan at mastercafe.com >Deleg. Madrid >Tel 627.474.285 >cecilia at mastercafe.com >=========================================== > > >-----Original Message----- >From: accessd-bounces at databaseadvisors.com >[mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Arthur Fuller >Sent: jueves, 01 de enero de 2004 11:06 >To: 'Access Developers discussion and problem solving' >Subject: RE: AW: [AccessD] Hiding Main Access Window > > >One way to do this is to create an image file having the same name as your >application MDB but with a different extension and place it in the same >directory as the MDB. Access will load this image instead of its native >logo. I have never tried to create a one-pixel image file but I'm guessing >that it would work too. > >Arthur > >-----Original Message----- >From: accessd-bounces at databaseadvisors.com >[mailto:accessd-bounces at databaseadvisors.com] On Behalf Of >paul.hartland at fsmail.net >Sent: Wednesday, December 31, 2003 1:45 AM >To: Access Developers discussion and problem solving >Subject: Re: AW: [AccessD] Hiding Main Access Window > > >Sorry but I don't think I have explained correctly, when you first open >Access that's the screen I want to hide I know I can hide database windows >etc from Tools/StartUp. Lets say we go to START/PROGRAMS and click on >Microsoft Access and you get the blank access screen from which you can >creat a new database, open existing etc. That's the screen I want to hide, >the actual Access screen. > >Sorry for any confusion. > >Paul Hartland > > > > > > >Message date : Dec 31 2003, 09:39 AM > >From : Helmut Kotsch >To : Access Developers discussion and problem solving >Copy to : >Subject : AW: [AccessD] Hiding Main Access Window >Paul, >that's easy, even I can answer this one. >Tools => Start..=> uncheck the "Show Database Window" Checkbox. I took this >info from my installed German version of Access 2000, hope I translated the >fieldnames alright. > >Regards and have a nice day. > >Helmut Kotsch > > >-----Urspr?ngliche Nachricht----- >Von: accessd-bounces at databaseadvisors.com >[mailto:accessd-bounces at databaseadvisors.com]Im Auftrag von >paul.hartland at fsmail.net >Gesendet: Mittwoch, 31. Dezember 2003 10:17 >An: accessd >Betreff: [AccessD] Hiding Main Access Window > > >To all, > >I'm sure I have seen this somewhere but can't for the life of me remember >where, I have an Access 2000 application that a few people have a shortcut >to on their machines, which when opened opens the main Access window (as >usual) and a switchboard. Is there anyway I can hide the main Access window >so that the application looks similar to a Visual Basic application ? > >Thanks in advance for all your help. > >Paul Hartland >Freeserve AnyTime - HALF PRICE for the first 3 months - Save ?7.50 a month >www.freeserve.com/anytime _______________________________________________ >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 >Freeserve AnyTime - HALF PRICE for the first 3 months - Save ?7.50 a month >www.freeserve.com/anytime _______________________________________________ >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 > >_______________________________________________ >AccessD mailing list >AccessD at databaseadvisors.com >http://databaseadvisors.com/mailman/listinfo/accessd >Website: http://www.databaseadvisors.com _________________________________________________________________ Take advantage of our limited-time introductory offer for dial-up Internet access. http://join.msn.com/?page=dept/dialup _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From jwcolby at colbyconsulting.com Fri Jan 2 18:53:37 2004 From: jwcolby at colbyconsulting.com (John W. Colby) Date: Fri, 2 Jan 2004 19:53:37 -0500 Subject: [AccessD] Mac address Message-ID: Does anyone have code for retrieving the Mac address of the network card in a PC? John W. Colby www.ColbyConsulting.com From stuart at lexacorp.com.pg Fri Jan 2 20:52:29 2004 From: stuart at lexacorp.com.pg (Stuart McLachlan) Date: Sat, 03 Jan 2004 12:52:29 +1000 Subject: [AccessD] Mac address In-Reply-To: Message-ID: <3FF6BB0D.2676.C3BB1D@localhost> On 2 Jan 2004 at 19:53, John W. Colby wrote: > Does anyone have code for retrieving the Mac address of the network card in > a PC? > This will do it. I got it from http://www.vbadmincode.btinternet.co.uk/code.htm: Private Const NCBASTAT = &H33 Private Const NCBNAMSZ = 16 Private Const HEAP_ZERO_MEMORY = &H8 Private Const HEAP_GENERATE_EXCEPTIONS = &H4 Private Const NCBRESET = &H32 Private Type NCB ncb_command As Byte 'Integer ncb_retcode As Byte 'Integer ncb_lsn As Byte 'Integer ncb_num As Byte ' Integer ncb_buffer As Long 'String ncb_length As Integer ncb_callname As String * NCBNAMSZ ncb_name As String * NCBNAMSZ ncb_rto As Byte 'Integer ncb_sto As Byte ' Integer ncb_post As Long ncb_lana_num As Byte 'Integer ncb_cmd_cplt As Byte 'Integer ncb_reserve(9) As Byte ' Reserved, must be 0 ncb_event As Long End Type Private Type ADAPTER_STATUS adapter_address(5) As Byte 'As String * 6 rev_major As Byte 'Integer reserved0 As Byte 'Integer adapter_type As Byte 'Integer rev_minor As Byte 'Integer duration As Integer frmr_recv As Integer frmr_xmit As Integer iframe_recv_err As Integer xmit_aborts As Integer xmit_success As Long recv_success As Long iframe_xmit_err As Integer recv_buff_unavail As Integer t1_timeouts As Integer ti_timeouts As Integer Reserved1 As Long free_ncbs As Integer max_cfg_ncbs As Integer max_ncbs As Integer xmit_buf_unavail As Integer max_dgram_size As Integer pending_sess As Integer max_cfg_sess As Integer max_sess As Integer max_sess_pkt_size As Integer name_count As Integer End Type Private Type NAME_BUFFER name As String * NCBNAMSZ name_num As Integer name_flags As Integer End Type Private Type ASTAT adapt As ADAPTER_STATUS NameBuff(30) As NAME_BUFFER End Type Private Declare Function Netbios Lib "netapi32.dll" _ (pncb As NCB) As Byte Private Declare Sub CopyMemory Lib "kernel32" Alias "RtlMoveMemory" ( _ hpvDest As Any, ByVal hpvSource As Long, ByVal cbCopy As Long) Private Declare Function GetProcessHeap Lib "kernel32" () As Long Private Declare Function HeapAlloc Lib "kernel32" _ (ByVal hHeap As Long, ByVal dwFlags As Long, _ ByVal dwBytes As Long) As Long Private Declare Function HeapFree Lib "kernel32" (ByVal hHeap As Long, _ ByVal dwFlags As Long, lpMem As Any) As Long Sub Command0_Click() Dim myNcb As NCB Dim bRet As Byte myNcb.ncb_command = NCBRESET bRet = Netbios(myNcb) myNcb.ncb_command = NCBASTAT myNcb.ncb_lana_num = 0 myNcb.ncb_callname = "* " Dim myASTAT As ASTAT, tempASTAT As ASTAT Dim pASTAT As Long myNcb.ncb_length = Len(myASTAT) Debug.Print Err.LastDllError pASTAT = HeapAlloc(GetProcessHeap(), HEAP_GENERATE_EXCEPTIONS _ Or HEAP_ZERO_MEMORY, myNcb.ncb_length) If pASTAT = 0 Then Debug.Print "memory allcoation failed!" Exit Sub End If myNcb.ncb_buffer = pASTAT bRet = Netbios(myNcb) Debug.Print Err.LastDllError CopyMemory myASTAT, myNcb.ncb_buffer, Len(myASTAT) MsgBox Hex(myASTAT.adapt.adapter_address(0)) & " " & _ Hex(myASTAT.adapt.adapter_address(1)) _ & " " & Hex(myASTAT.adapt.adapter_address(2)) & " " _ & Hex(myASTAT.adapt.adapter_address(3)) _ & " " & Hex(myASTAT.adapt.adapter_address(4)) & " " _ & Hex(myASTAT.adapt.adapter_address(5)) HeapFree GetProcessHeap(), 0, pASTAT End Sub -- Lexacorp Ltd http://www.lexacorp.com.pg Information Technology Consultancy, Software Development,System Support. From dwaters at usinternet.com Fri Jan 2 21:14:47 2004 From: dwaters at usinternet.com (Dan Waters) Date: Fri, 2 Jan 2004 21:14:47 -0600 Subject: [AccessD] Mac address In-Reply-To: <25416409.1073091540716.JavaMail.root@sniper.marix.com> Message-ID: <000001c3d1a7$c194e490$de1811d8@DanWaters> John - I don't have a clue what a Mac Address is but this API might do it. Private Declare Function GetMacAddressFromBlob Lib "npptools.dll" (ByRef hBlob As hBlob, ByVal pOwnerName As String, ByVal pCategoryName As String, ByVal pTagName As String, ByVal pMacAddress As String) As Long I found this in a utility call API Viewer at: http://www.activevb.de/rubriken/apiviewer/index-apiviewereng.html Dan Waters -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of John W. Colby Sent: Friday, January 02, 2004 6:54 PM To: AccessD Subject: [AccessD] Mac address Does anyone have code for retrieving the Mac address of the network card in a PC? John W. Colby www.ColbyConsulting.com _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From tinanfields at torchlake.com Sat Jan 3 03:44:11 2004 From: tinanfields at torchlake.com (Tina Norris Fields) Date: Sat, 03 Jan 2004 04:44:11 -0500 Subject: [AccessD] Form as Subform - Query Fails - Why? Message-ID: <3FF68EEB.30204@torchlake.com> Hi, Probably I am missing something but I don't understand why this bright idea of mine didn't work. Here's the picture: I have a little calendar form with textboxes BeginningDate and EndingDate. I have a little parameter query that uses a date range set Between BeginningDate And EndingDate to select the appropriate records. The query creates a table of records of people who have made contributions within the date range. This table is the data source for a Word document, the acknowledgement letter. I thought I'd be really clever and make a form with instructions - "select the beginning and ending dates on this calendar" "click this button to create the acknowledgement table" etc. So, I plugged the calendar form in as a subform on this clever instruction form, rather than popping open the calendar form. Setting the beginning and ending dates in the calendar, once it was a subform, did not provide the query with its parameters. I played around with setting the dates on the calendar-form-as-subform, then opening the calendar form independently - the dates were not set in the independent form, only in the subform. So, clearly, the instance of the calendar-form-as-subform to the instruction form is a new beast - sort of. Making design changes to the calendar-form-as-subform, such as background color, applies those changes to the independent calendar form. But, setting textbox values from within the calendar-form-as-subform does not set those values in the independent form. Do I really have two beasties here? If so, why can I not find a way to identify the textboxes in the subform so my query can use them? It looked like such a nice idea! What am I doing wrong? Thanks, Tina From papparuff at comcast.net Sat Jan 3 06:20:53 2004 From: papparuff at comcast.net (John Ruff) Date: Sat, 3 Jan 2004 04:20:53 -0800 Subject: [AccessD] Form as Subform - Query Fails - Why? In-Reply-To: <3FF68EEB.30204@torchlake.com> Message-ID: <000101c3d1f4$08452340$6501a8c0@papparuff> There are a couple of methods o set values on a main form (Independent form as you call it) from a subform) ' The txtDate is the name of the object in the subform that sets the date 1. Forms!NameOfIndependentForm!txtFromDate=txtDate 2. Parent!txtFromDate=txtDate I prefer the 2nd method myself. John V. Ruff - The Eternal Optimist :-) "Commit to the Lord whatever you do, and your plans will succeed." Proverbs 16:3 -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Tina Norris Fields Sent: Saturday, January 03, 2004 1:44 AM To: accessd at databaseadvisors.com Subject: [AccessD] Form as Subform - Query Fails - Why? Hi, Probably I am missing something but I don't understand why this bright idea of mine didn't work. Here's the picture: I have a little calendar form with textboxes BeginningDate and EndingDate. I have a little parameter query that uses a date range set Between BeginningDate And EndingDate to select the appropriate records. The query creates a table of records of people who have made contributions within the date range. This table is the data source for a Word document, the acknowledgement letter. I thought I'd be really clever and make a form with instructions - "select the beginning and ending dates on this calendar" "click this button to create the acknowledgement table" etc. So, I plugged the calendar form in as a subform on this clever instruction form, rather than popping open the calendar form. Setting the beginning and ending dates in the calendar, once it was a subform, did not provide the query with its parameters. I played around with setting the dates on the calendar-form-as-subform, then opening the calendar form independently - the dates were not set in the independent form, only in the subform. So, clearly, the instance of the calendar-form-as-subform to the instruction form is a new beast - sort of. Making design changes to the calendar-form-as-subform, such as background color, applies those changes to the independent calendar form. But, setting textbox values from within the calendar-form-as-subform does not set those values in the independent form. Do I really have two beasties here? If so, why can I not find a way to identify the textboxes in the subform so my query can use them? It looked like such a nice idea! What am I doing wrong? Thanks, Tina _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From jwcolby at colbyconsulting.com Sat Jan 3 09:37:02 2004 From: jwcolby at colbyconsulting.com (John W. Colby) Date: Sat, 3 Jan 2004 10:37:02 -0500 Subject: [AccessD] Mac address In-Reply-To: <3FF6BB0D.2676.C3BB1D@localhost> Message-ID: Nope, comes back 0:0:0:0 I have found a half dozen solutions, and all do this. It appears to be a case of which protocol you are bound to. This uses netbios which (apparently) my computer isn't using. It seems like a network card, or it's driver, could just be asked what the mac address is. John W. Colby www.ColbyConsulting.com -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Stuart McLachlan Sent: Friday, January 02, 2004 9:52 PM To: Access Developers discussion and problem solving Subject: Re: [AccessD] Mac address On 2 Jan 2004 at 19:53, John W. Colby wrote: > Does anyone have code for retrieving the Mac address of the network card in > a PC? > This will do it. I got it from http://www.vbadmincode.btinternet.co.uk/code.htm: Private Const NCBASTAT = &H33 Private Const NCBNAMSZ = 16 Private Const HEAP_ZERO_MEMORY = &H8 Private Const HEAP_GENERATE_EXCEPTIONS = &H4 Private Const NCBRESET = &H32 Private Type NCB ncb_command As Byte 'Integer ncb_retcode As Byte 'Integer ncb_lsn As Byte 'Integer ncb_num As Byte ' Integer ncb_buffer As Long 'String ncb_length As Integer ncb_callname As String * NCBNAMSZ ncb_name As String * NCBNAMSZ ncb_rto As Byte 'Integer ncb_sto As Byte ' Integer ncb_post As Long ncb_lana_num As Byte 'Integer ncb_cmd_cplt As Byte 'Integer ncb_reserve(9) As Byte ' Reserved, must be 0 ncb_event As Long End Type Private Type ADAPTER_STATUS adapter_address(5) As Byte 'As String * 6 rev_major As Byte 'Integer reserved0 As Byte 'Integer adapter_type As Byte 'Integer rev_minor As Byte 'Integer duration As Integer frmr_recv As Integer frmr_xmit As Integer iframe_recv_err As Integer xmit_aborts As Integer xmit_success As Long recv_success As Long iframe_xmit_err As Integer recv_buff_unavail As Integer t1_timeouts As Integer ti_timeouts As Integer Reserved1 As Long free_ncbs As Integer max_cfg_ncbs As Integer max_ncbs As Integer xmit_buf_unavail As Integer max_dgram_size As Integer pending_sess As Integer max_cfg_sess As Integer max_sess As Integer max_sess_pkt_size As Integer name_count As Integer End Type Private Type NAME_BUFFER name As String * NCBNAMSZ name_num As Integer name_flags As Integer End Type Private Type ASTAT adapt As ADAPTER_STATUS NameBuff(30) As NAME_BUFFER End Type Private Declare Function Netbios Lib "netapi32.dll" _ (pncb As NCB) As Byte Private Declare Sub CopyMemory Lib "kernel32" Alias "RtlMoveMemory" ( _ hpvDest As Any, ByVal hpvSource As Long, ByVal cbCopy As Long) Private Declare Function GetProcessHeap Lib "kernel32" () As Long Private Declare Function HeapAlloc Lib "kernel32" _ (ByVal hHeap As Long, ByVal dwFlags As Long, _ ByVal dwBytes As Long) As Long Private Declare Function HeapFree Lib "kernel32" (ByVal hHeap As Long, _ ByVal dwFlags As Long, lpMem As Any) As Long Sub Command0_Click() Dim myNcb As NCB Dim bRet As Byte myNcb.ncb_command = NCBRESET bRet = Netbios(myNcb) myNcb.ncb_command = NCBASTAT myNcb.ncb_lana_num = 0 myNcb.ncb_callname = "* " Dim myASTAT As ASTAT, tempASTAT As ASTAT Dim pASTAT As Long myNcb.ncb_length = Len(myASTAT) Debug.Print Err.LastDllError pASTAT = HeapAlloc(GetProcessHeap(), HEAP_GENERATE_EXCEPTIONS _ Or HEAP_ZERO_MEMORY, myNcb.ncb_length) If pASTAT = 0 Then Debug.Print "memory allcoation failed!" Exit Sub End If myNcb.ncb_buffer = pASTAT bRet = Netbios(myNcb) Debug.Print Err.LastDllError CopyMemory myASTAT, myNcb.ncb_buffer, Len(myASTAT) MsgBox Hex(myASTAT.adapt.adapter_address(0)) & " " & _ Hex(myASTAT.adapt.adapter_address(1)) _ & " " & Hex(myASTAT.adapt.adapter_address(2)) & " " _ & Hex(myASTAT.adapt.adapter_address(3)) _ & " " & Hex(myASTAT.adapt.adapter_address(4)) & " " _ & Hex(myASTAT.adapt.adapter_address(5)) HeapFree GetProcessHeap(), 0, pASTAT End Sub -- Lexacorp Ltd http://www.lexacorp.com.pg Information Technology Consultancy, Software Development,System Support. _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From accessd at shaw.ca Sat Jan 3 10:44:27 2004 From: accessd at shaw.ca (Jim Lawrence (AccessD)) Date: Sat, 03 Jan 2004 08:44:27 -0800 Subject: [AccessD] Mac address In-Reply-To: Message-ID: Hi John: Do you require the MAC address or are you just looking for an absolute way to uniquely identify a station? >From what I understand, there is no definitive method for obtaining a computer's MAC address. It depends on the OS, protocols installed and sometimes things can get confusing between other cards and modems. I have always used the station name to define a unique PC (no two computers can exist, on a particular network/domain with the same name, net and subnet)...and I have code for that, if you need it. HTH Jim -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of John W. Colby Sent: Saturday, January 03, 2004 7:37 AM To: Access Developers discussion and problem solving Subject: RE: [AccessD] Mac address Nope, comes back 0:0:0:0 I have found a half dozen solutions, and all do this. It appears to be a case of which protocol you are bound to. This uses netbios which (apparently) my computer isn't using. It seems like a network card, or it's driver, could just be asked what the mac address is. John W. Colby www.ColbyConsulting.com -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Stuart McLachlan Sent: Friday, January 02, 2004 9:52 PM To: Access Developers discussion and problem solving Subject: Re: [AccessD] Mac address On 2 Jan 2004 at 19:53, John W. Colby wrote: > Does anyone have code for retrieving the Mac address of the network card in > a PC? > This will do it. I got it from http://www.vbadmincode.btinternet.co.uk/code.htm: Private Const NCBASTAT = &H33 Private Const NCBNAMSZ = 16 Private Const HEAP_ZERO_MEMORY = &H8 Private Const HEAP_GENERATE_EXCEPTIONS = &H4 Private Const NCBRESET = &H32 Private Type NCB ncb_command As Byte 'Integer ncb_retcode As Byte 'Integer ncb_lsn As Byte 'Integer ncb_num As Byte ' Integer ncb_buffer As Long 'String ncb_length As Integer ncb_callname As String * NCBNAMSZ ncb_name As String * NCBNAMSZ ncb_rto As Byte 'Integer ncb_sto As Byte ' Integer ncb_post As Long ncb_lana_num As Byte 'Integer ncb_cmd_cplt As Byte 'Integer ncb_reserve(9) As Byte ' Reserved, must be 0 ncb_event As Long End Type Private Type ADAPTER_STATUS adapter_address(5) As Byte 'As String * 6 rev_major As Byte 'Integer reserved0 As Byte 'Integer adapter_type As Byte 'Integer rev_minor As Byte 'Integer duration As Integer frmr_recv As Integer frmr_xmit As Integer iframe_recv_err As Integer xmit_aborts As Integer xmit_success As Long recv_success As Long iframe_xmit_err As Integer recv_buff_unavail As Integer t1_timeouts As Integer ti_timeouts As Integer Reserved1 As Long free_ncbs As Integer max_cfg_ncbs As Integer max_ncbs As Integer xmit_buf_unavail As Integer max_dgram_size As Integer pending_sess As Integer max_cfg_sess As Integer max_sess As Integer max_sess_pkt_size As Integer name_count As Integer End Type Private Type NAME_BUFFER name As String * NCBNAMSZ name_num As Integer name_flags As Integer End Type Private Type ASTAT adapt As ADAPTER_STATUS NameBuff(30) As NAME_BUFFER End Type Private Declare Function Netbios Lib "netapi32.dll" _ (pncb As NCB) As Byte Private Declare Sub CopyMemory Lib "kernel32" Alias "RtlMoveMemory" ( _ hpvDest As Any, ByVal hpvSource As Long, ByVal cbCopy As Long) Private Declare Function GetProcessHeap Lib "kernel32" () As Long Private Declare Function HeapAlloc Lib "kernel32" _ (ByVal hHeap As Long, ByVal dwFlags As Long, _ ByVal dwBytes As Long) As Long Private Declare Function HeapFree Lib "kernel32" (ByVal hHeap As Long, _ ByVal dwFlags As Long, lpMem As Any) As Long Sub Command0_Click() Dim myNcb As NCB Dim bRet As Byte myNcb.ncb_command = NCBRESET bRet = Netbios(myNcb) myNcb.ncb_command = NCBASTAT myNcb.ncb_lana_num = 0 myNcb.ncb_callname = "* " Dim myASTAT As ASTAT, tempASTAT As ASTAT Dim pASTAT As Long myNcb.ncb_length = Len(myASTAT) Debug.Print Err.LastDllError pASTAT = HeapAlloc(GetProcessHeap(), HEAP_GENERATE_EXCEPTIONS _ Or HEAP_ZERO_MEMORY, myNcb.ncb_length) If pASTAT = 0 Then Debug.Print "memory allcoation failed!" Exit Sub End If myNcb.ncb_buffer = pASTAT bRet = Netbios(myNcb) Debug.Print Err.LastDllError CopyMemory myASTAT, myNcb.ncb_buffer, Len(myASTAT) MsgBox Hex(myASTAT.adapt.adapter_address(0)) & " " & _ Hex(myASTAT.adapt.adapter_address(1)) _ & " " & Hex(myASTAT.adapt.adapter_address(2)) & " " _ & Hex(myASTAT.adapt.adapter_address(3)) _ & " " & Hex(myASTAT.adapt.adapter_address(4)) & " " _ & Hex(myASTAT.adapt.adapter_address(5)) HeapFree GetProcessHeap(), 0, pASTAT End Sub -- Lexacorp Ltd http://www.lexacorp.com.pg Information Technology Consultancy, Software Development,System Support. _______________________________________________ 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 From jimdettman at earthlink.net Sat Jan 3 11:01:02 2004 From: jimdettman at earthlink.net (Jim Dettman) Date: Sat, 3 Jan 2004 12:01:02 -0500 Subject: [AccessD] Mac address In-Reply-To: Message-ID: John, I've send a code MDB off list. Jim Dettman President, Online Computer Services of WNY, Inc. (315) 699-3443 jimdettman at earthlink.net -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of John W. Colby Sent: Friday, January 02, 2004 7:54 PM To: AccessD Subject: [AccessD] Mac address Does anyone have code for retrieving the Mac address of the network card in a PC? John W. Colby www.ColbyConsulting.com _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From tinanfields at torchlake.com Sat Jan 3 11:09:28 2004 From: tinanfields at torchlake.com (Tina Norris Fields) Date: Sat, 03 Jan 2004 12:09:28 -0500 Subject: [AccessD] Form as Subform - Query Fails - Why? References: <000101c3d1f4$08452340$6501a8c0@papparuff> Message-ID: <3FF6F748.40804@torchlake.com> Hi John, Thanks for the reply. I think I have not been completely clear about my quandary. The parameter query selects records based on the following: Between [Forms]![fCalendar]![BeginningDate] And [Forms]![fCalendar]![EndingDate] - which works fine as long as one sets the dates by opening fCalendar as a stand-alone form. I made a form with a series of instructions, hoping to guide my user from step to step without having to remind the user to set the dates first in the fCalendar - the idea was to embed an instance of the fCalendar in the instruction form - set the dates right here in what is now a subform of the instruction form. If one sets the dates in the embedded instance of fCalendar, the query does not find its parameters. Well, say I to myself, I probably need to tell the query where to find those date textboxes, but I do not find a way to identify them other than as they are already identified . Is there a collection other than [Forms] I need to find? When I examine my fCalendar through the subform control, I see all the correct textbox names - it certainly appears to be the same form - why does setting its dates not provide the necessary parameters to the query? I don't see it. Tina Norris Fields also an optimist BTW I like your Proverbs choice :) John Ruff wrote: >There are a couple of methods o set values on a main form (Independent form >as you call it) from a subform) > >' The txtDate is the name of the object in the subform that sets the date > >1. Forms!NameOfIndependentForm!txtFromDate=txtDate >2. Parent!txtFromDate=txtDate > >I prefer the 2nd method myself. > > >John V. Ruff - The Eternal Optimist :-) > >"Commit to the Lord whatever you do, > and your plans will succeed." Proverbs 16:3 > > > >-----Original Message----- >From: accessd-bounces at databaseadvisors.com >[mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Tina Norris >Fields >Sent: Saturday, January 03, 2004 1:44 AM >To: accessd at databaseadvisors.com >Subject: [AccessD] Form as Subform - Query Fails - Why? > > >Hi, > >Probably I am missing something but I don't understand why this bright >idea of mine didn't work. Here's the picture: > >I have a little calendar form with textboxes BeginningDate and >EndingDate. I have a little parameter query that uses a date range set >Between BeginningDate And EndingDate to select the appropriate records. >The query creates a table of records of people who have made >contributions within the date range. This table is the data source for >a Word document, the acknowledgement letter. > >I thought I'd be really clever and make a form with instructions - >"select the beginning and ending dates on this calendar" "click this >button to create the acknowledgement table" etc. So, I plugged the >calendar form in as a subform on this clever instruction form, rather >than popping open the calendar form. Setting the beginning and ending >dates in the calendar, once it was a subform, did not provide the query >with its parameters. > >I played around with setting the dates on the calendar-form-as-subform, >then opening the calendar form independently - the dates were not set in >the independent form, only in the subform. So, clearly, the instance of >the calendar-form-as-subform to the instruction form is a new beast - >sort of. Making design changes to the calendar-form-as-subform, such as >background color, applies those changes to the independent calendar >form. But, setting textbox values from within the >calendar-form-as-subform does not set those values in the independent >form. Do I really have two beasties here? If so, why can I not find a >way to identify the textboxes in the subform so my query can use them? > >It looked like such a nice idea! What am I doing wrong? > >Thanks, >Tina > > > > > >_______________________________________________ >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 > > > From jwcolby at colbyconsulting.com Sat Jan 3 11:14:16 2004 From: jwcolby at colbyconsulting.com (John W. Colby) Date: Sat, 3 Jan 2004 12:14:16 -0500 Subject: [AccessD] Mac address In-Reply-To: Message-ID: Well... I'm looking at a machine specific piece for copy protection. The work station name might be specific to a network, but is created by the software (or user doing the install) so if the machine went down (as many of mine have over the last few years) if the user didn't select the same name then the key wouldn't work. John W. Colby www.ColbyConsulting.com -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Jim Lawrence (AccessD) Sent: Saturday, January 03, 2004 11:44 AM To: Access Developers discussion and problem solving Subject: RE: [AccessD] Mac address Hi John: Do you require the MAC address or are you just looking for an absolute way to uniquely identify a station? >From what I understand, there is no definitive method for obtaining a computer's MAC address. It depends on the OS, protocols installed and sometimes things can get confusing between other cards and modems. I have always used the station name to define a unique PC (no two computers can exist, on a particular network/domain with the same name, net and subnet)...and I have code for that, if you need it. HTH Jim -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of John W. Colby Sent: Saturday, January 03, 2004 7:37 AM To: Access Developers discussion and problem solving Subject: RE: [AccessD] Mac address Nope, comes back 0:0:0:0 I have found a half dozen solutions, and all do this. It appears to be a case of which protocol you are bound to. This uses netbios which (apparently) my computer isn't using. It seems like a network card, or it's driver, could just be asked what the mac address is. John W. Colby www.ColbyConsulting.com -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Stuart McLachlan Sent: Friday, January 02, 2004 9:52 PM To: Access Developers discussion and problem solving Subject: Re: [AccessD] Mac address On 2 Jan 2004 at 19:53, John W. Colby wrote: > Does anyone have code for retrieving the Mac address of the network card in > a PC? > This will do it. I got it from http://www.vbadmincode.btinternet.co.uk/code.htm: Private Const NCBASTAT = &H33 Private Const NCBNAMSZ = 16 Private Const HEAP_ZERO_MEMORY = &H8 Private Const HEAP_GENERATE_EXCEPTIONS = &H4 Private Const NCBRESET = &H32 Private Type NCB ncb_command As Byte 'Integer ncb_retcode As Byte 'Integer ncb_lsn As Byte 'Integer ncb_num As Byte ' Integer ncb_buffer As Long 'String ncb_length As Integer ncb_callname As String * NCBNAMSZ ncb_name As String * NCBNAMSZ ncb_rto As Byte 'Integer ncb_sto As Byte ' Integer ncb_post As Long ncb_lana_num As Byte 'Integer ncb_cmd_cplt As Byte 'Integer ncb_reserve(9) As Byte ' Reserved, must be 0 ncb_event As Long End Type Private Type ADAPTER_STATUS adapter_address(5) As Byte 'As String * 6 rev_major As Byte 'Integer reserved0 As Byte 'Integer adapter_type As Byte 'Integer rev_minor As Byte 'Integer duration As Integer frmr_recv As Integer frmr_xmit As Integer iframe_recv_err As Integer xmit_aborts As Integer xmit_success As Long recv_success As Long iframe_xmit_err As Integer recv_buff_unavail As Integer t1_timeouts As Integer ti_timeouts As Integer Reserved1 As Long free_ncbs As Integer max_cfg_ncbs As Integer max_ncbs As Integer xmit_buf_unavail As Integer max_dgram_size As Integer pending_sess As Integer max_cfg_sess As Integer max_sess As Integer max_sess_pkt_size As Integer name_count As Integer End Type Private Type NAME_BUFFER name As String * NCBNAMSZ name_num As Integer name_flags As Integer End Type Private Type ASTAT adapt As ADAPTER_STATUS NameBuff(30) As NAME_BUFFER End Type Private Declare Function Netbios Lib "netapi32.dll" _ (pncb As NCB) As Byte Private Declare Sub CopyMemory Lib "kernel32" Alias "RtlMoveMemory" ( _ hpvDest As Any, ByVal hpvSource As Long, ByVal cbCopy As Long) Private Declare Function GetProcessHeap Lib "kernel32" () As Long Private Declare Function HeapAlloc Lib "kernel32" _ (ByVal hHeap As Long, ByVal dwFlags As Long, _ ByVal dwBytes As Long) As Long Private Declare Function HeapFree Lib "kernel32" (ByVal hHeap As Long, _ ByVal dwFlags As Long, lpMem As Any) As Long Sub Command0_Click() Dim myNcb As NCB Dim bRet As Byte myNcb.ncb_command = NCBRESET bRet = Netbios(myNcb) myNcb.ncb_command = NCBASTAT myNcb.ncb_lana_num = 0 myNcb.ncb_callname = "* " Dim myASTAT As ASTAT, tempASTAT As ASTAT Dim pASTAT As Long myNcb.ncb_length = Len(myASTAT) Debug.Print Err.LastDllError pASTAT = HeapAlloc(GetProcessHeap(), HEAP_GENERATE_EXCEPTIONS _ Or HEAP_ZERO_MEMORY, myNcb.ncb_length) If pASTAT = 0 Then Debug.Print "memory allcoation failed!" Exit Sub End If myNcb.ncb_buffer = pASTAT bRet = Netbios(myNcb) Debug.Print Err.LastDllError CopyMemory myASTAT, myNcb.ncb_buffer, Len(myASTAT) MsgBox Hex(myASTAT.adapt.adapter_address(0)) & " " & _ Hex(myASTAT.adapt.adapter_address(1)) _ & " " & Hex(myASTAT.adapt.adapter_address(2)) & " " _ & Hex(myASTAT.adapt.adapter_address(3)) _ & " " & Hex(myASTAT.adapt.adapter_address(4)) & " " _ & Hex(myASTAT.adapt.adapter_address(5)) HeapFree GetProcessHeap(), 0, pASTAT End Sub -- Lexacorp Ltd http://www.lexacorp.com.pg Information Technology Consultancy, Software Development,System Support. _______________________________________________ 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 _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From gustav at cactus.dk Sat Jan 3 11:48:50 2004 From: gustav at cactus.dk (Gustav Brock) Date: Sat, 3 Jan 2004 18:48:50 +0100 Subject: [AccessD] Form as Subform - Query Fails - Why? In-Reply-To: <3FF6F748.40804@torchlake.com> References: <000101c3d1f4$08452340$6501a8c0@papparuff> <3FF6F748.40804@torchlake.com> Message-ID: <16831194214.20040103184850@cactus.dk> Hi Tina Try with Between [Forms]![fInstructions]![subYourSubformControlName].Form![BeginningDate] And [Forms]![fInstructions]![subYourSubformControlName].Form![EndingDate] /gustav > Hi John, > Thanks for the reply. I think I have not been completely clear about my > quandary. The parameter query selects records based on the following: > Between [Forms]![fCalendar]![BeginningDate] And > [Forms]![fCalendar]![EndingDate] > - which works fine as long as one sets the dates by opening fCalendar as > a stand-alone form. > I made a form with a series of instructions, hoping to guide my user > from step to step without having to remind the user to set the dates > first in the fCalendar - > the idea was to embed an instance of the fCalendar in the instruction > form - set the dates right here in what is now a subform of the > instruction form. > If one sets the dates in the embedded instance of fCalendar, the query > does not find its parameters. Well, say I to myself, I probably need to > tell the query where to find those date textboxes, but I do not find a > way to identify them other than as they are already identified . Is > there a collection other than [Forms] I need to find? When I examine my > fCalendar through the subform control, I see all the correct textbox > names - it certainly appears to be the same form - why does setting its > dates not provide the necessary parameters to the query? I don't see it. From gustav at cactus.dk Sat Jan 3 11:53:21 2004 From: gustav at cactus.dk (Gustav Brock) Date: Sat, 3 Jan 2004 18:53:21 +0100 Subject: [AccessD] Mac address In-Reply-To: References: Message-ID: <9731465094.20040103185321@cactus.dk> Hi John Hmm ... so the user changes his/hers NIC and is hosed ..? /gustav > Date: 2004-01-03 18:14 > Well... I'm looking at a machine specific piece for copy protection. The > work station name might be specific to a network, but is created by the > software (or user doing the install) so if the machine went down (as many of > mine have over the last few years) if the user didn't select the same name > then the key wouldn't work. From tinanfields at torchlake.com Sat Jan 3 12:03:07 2004 From: tinanfields at torchlake.com (Tina Norris Fields) Date: Sat, 03 Jan 2004 13:03:07 -0500 Subject: [AccessD] Form as Subform - Query Fails - Why? References: <000101c3d1f4$08452340$6501a8c0@papparuff> <3FF6F748.40804@torchlake.com> <16831194214.20040103184850@cactus.dk> Message-ID: <3FF703DB.9070707@torchlake.com> Thanks Gustav, I will try that - Tina Gustav Brock wrote: >Hi Tina > >Try with > > Between > [Forms]![fInstructions]![subYourSubformControlName].Form![BeginningDate] > And > [Forms]![fInstructions]![subYourSubformControlName].Form![EndingDate] > >/gustav > > > > >>Hi John, >> >> > > > >>Thanks for the reply. I think I have not been completely clear about my >>quandary. The parameter query selects records based on the following: >> >> > > > >>Between [Forms]![fCalendar]![BeginningDate] And >>[Forms]![fCalendar]![EndingDate] >> >> > > > >>- which works fine as long as one sets the dates by opening fCalendar as >>a stand-alone form. >> >> > > > >>I made a form with a series of instructions, hoping to guide my user >>from step to step without having to remind the user to set the dates >>first in the fCalendar - >>the idea was to embed an instance of the fCalendar in the instruction >>form - set the dates right here in what is now a subform of the >>instruction form. >> >> > > > >>If one sets the dates in the embedded instance of fCalendar, the query >>does not find its parameters. Well, say I to myself, I probably need to >>tell the query where to find those date textboxes, but I do not find a >>way to identify them other than as they are already identified . Is >>there a collection other than [Forms] I need to find? When I examine my >>fCalendar through the subform control, I see all the correct textbox >>names - it certainly appears to be the same form - why does setting its >>dates not provide the necessary parameters to the query? I don't see it. >> >> > >_______________________________________________ >AccessD mailing list >AccessD at databaseadvisors.com >http://databaseadvisors.com/mailman/listinfo/accessd >Website: http://www.databaseadvisors.com > > > From jwcolby at colbyconsulting.com Sat Jan 3 12:34:49 2004 From: jwcolby at colbyconsulting.com (John W. Colby) Date: Sat, 3 Jan 2004 13:34:49 -0500 Subject: [AccessD] Mac address In-Reply-To: <9731465094.20040103185321@cactus.dk> Message-ID: Yea, but you have to start somewhere. More and more NICs are embedded right in the motherboards so this is getting less and less likely. John W. Colby www.ColbyConsulting.com -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Gustav Brock Sent: Saturday, January 03, 2004 12:53 PM To: Access Developers discussion and problem solving Subject: Re: [AccessD] Mac address Hi John Hmm ... so the user changes his/hers NIC and is hosed ..? /gustav > Date: 2004-01-03 18:14 > Well... I'm looking at a machine specific piece for copy protection. The > work station name might be specific to a network, but is created by the > software (or user doing the install) so if the machine went down (as many of > mine have over the last few years) if the user didn't select the same name > then the key wouldn't work. _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From Subscriptions at servicexp.com Sat Jan 3 13:08:57 2004 From: Subscriptions at servicexp.com (Robert Gracie) Date: Sat, 3 Jan 2004 14:08:57 -0500 Subject: [AccessD] Mac address In-Reply-To: Message-ID: John, Will this get you started.. Paste in a Module....... Public Const MAX_HOSTNAME_LEN = 132 Public Const MAX_DOMAIN_NAME_LEN = 132 Public Const MAX_SCOPE_ID_LEN = 260 Public Const MAX_ADAPTER_NAME_LENGTH = 260 Public Const MAX_ADAPTER_ADDRESS_LENGTH = 8 Public Const MAX_ADAPTER_DESCRIPTION_LENGTH = 132 Public Const ERROR_BUFFER_OVERFLOW = 111 Public Const MIB_IF_TYPE_ETHERNET = 6 Public Const MIB_IF_TYPE_TOKENRING = 9 Public Const MIB_IF_TYPE_FDDI = 15 Public Const MIB_IF_TYPE_PPP = 23 Public Const MIB_IF_TYPE_LOOPBACK = 24 Public Const MIB_IF_TYPE_SLIP = 28 Type IP_ADDR_STRING Next As Long IpAddress As String * 16 IpMask As String * 16 Context As Long End Type Type IP_ADAPTER_INFO Next As Long ComboIndex As Long AdapterName As String * MAX_ADAPTER_NAME_LENGTH Description As String * MAX_ADAPTER_DESCRIPTION_LENGTH AddressLength As Long Address(MAX_ADAPTER_ADDRESS_LENGTH - 1) As Byte Index As Long Type As Long DhcpEnabled As Long CurrentIpAddress As Long IpAddressList As IP_ADDR_STRING GatewayList As IP_ADDR_STRING DhcpServer As IP_ADDR_STRING HaveWins As Byte PrimaryWinsServer As IP_ADDR_STRING SecondaryWinsServer As IP_ADDR_STRING LeaseObtained As Long LeaseExpires As Long End Type Type FIXED_INFO HostName As String * MAX_HOSTNAME_LEN DomainName As String * MAX_DOMAIN_NAME_LEN CurrentDnsServer As Long DnsServerList As IP_ADDR_STRING NodeType As Long ScopeId As String * MAX_SCOPE_ID_LEN EnableRouting As Long EnableProxy As Long EnableDns As Long End Type Public Declare Function GetNetworkParams Lib "IPHlpApi.dll" _ (FixedInfo As Any, pOutBufLen As Long) As Long Public Declare Function GetAdaptersInfo Lib "IPHlpApi.dll" _ (IpAdapterInfo As Any, pOutBufLen As Long) As Long Public Declare Sub CopyMemory Lib "kernel32" Alias "RtlMoveMemory" _ (Destination As Any, Source As Any, ByVal Length As Long) Sub main() Dim error As Long Dim FixedInfoSize As Long Dim AdapterInfoSize As Long Dim i As Integer Dim PhysicalAddress As String Dim NewTime As Date Dim AdapterInfo As IP_ADAPTER_INFO Dim AddrStr As IP_ADDR_STRING Dim FixedInfo As FIXED_INFO Dim Buffer As IP_ADDR_STRING Dim pAddrStr As Long Dim pAdapt As Long Dim Buffer2 As IP_ADAPTER_INFO Dim FixedInfoBuffer() As Byte Dim AdapterInfoBuffer() As Byte ' Get the main IP configuration information for this machine ' using a FIXED_INFO structure. FixedInfoSize = 0 error = GetNetworkParams(ByVal 0&, FixedInfoSize) If error <> 0 Then If error <> ERROR_BUFFER_OVERFLOW Then MsgBox "GetNetworkParams sizing failed with error " & error Exit Sub End If End If ReDim FixedInfoBuffer(FixedInfoSize - 1) error = GetNetworkParams(FixedInfoBuffer(0), FixedInfoSize) If error = 0 Then CopyMemory FixedInfo, FixedInfoBuffer(0), FixedInfoSize MsgBox "Host Name: " & FixedInfo.HostName MsgBox "DNS Servers: " & FixedInfo.DnsServerList.IpAddress pAddrStr = FixedInfo.DnsServerList.Next Do While pAddrStr <> 0 CopyMemory Buffer, ByVal pAddrStr, LenB(Buffer) MsgBox "DNS Servers: " & Buffer.IpAddress pAddrStr = Buffer.Next Loop Select Case FixedInfo.NodeType Case 1 MsgBox "Node type: Broadcast" Case 2 MsgBox "Node type: Peer to peer" Case 4 MsgBox "Node type: Mixed" Case 8 MsgBox "Node type: Hybrid" Case Else MsgBox "Unknown node type" End Select MsgBox "NetBIOS Scope ID: " & FixedInfo.ScopeId If FixedInfo.EnableRouting Then MsgBox "IP Routing Enabled " Else MsgBox "IP Routing not enabled" End If If FixedInfo.EnableProxy Then MsgBox "WINS Proxy Enabled " Else MsgBox "WINS Proxy not Enabled " End If If FixedInfo.EnableDns Then MsgBox "NetBIOS Resolution Uses DNS " Else MsgBox "NetBIOS Resolution Does not use DNS " End If Else MsgBox "GetNetworkParams failed with error " & error Exit Sub End If ' Enumerate all of the adapter specific information using the ' IP_ADAPTER_INFO structure. ' Note: IP_ADAPTER_INFO contains a linked list of adapter entries. AdapterInfoSize = 0 error = GetAdaptersInfo(ByVal 0&, AdapterInfoSize) If error <> 0 Then If error <> ERROR_BUFFER_OVERFLOW Then MsgBox "GetAdaptersInfo sizing failed with error " & error Exit Sub End If End If ReDim AdapterInfoBuffer(AdapterInfoSize - 1) ' Get actual adapter information error = GetAdaptersInfo(AdapterInfoBuffer(0), AdapterInfoSize) If error <> 0 Then MsgBox "GetAdaptersInfo failed with error " & error Exit Sub End If ' Allocate memory CopyMemory AdapterInfo, AdapterInfoBuffer(0), AdapterInfoSize pAdapt = AdapterInfo.Next Do CopyMemory Buffer2, AdapterInfo, AdapterInfoSize Select Case Buffer2.Type Case MIB_IF_TYPE_ETHERNET MsgBox "Adapter name: Ethernet adapter " Case MIB_IF_TYPE_TOKENRING MsgBox "Adapter name: Token Ring adapter " Case MIB_IF_TYPE_FDDI MsgBox "Adapter name: FDDI adapter " Case MIB_IF_TYPE_PPP MsgBox "Adapter name: PPP adapter" Case MIB_IF_TYPE_LOOPBACK MsgBox "Adapter name: Loopback adapter " Case MIB_IF_TYPE_SLIP MsgBox "Adapter name: Slip adapter " Case Else MsgBox "Adapter name: Other adapter " End Select MsgBox "AdapterDescription: " & Buffer2.Description PhysicalAddress = "" For i = 0 To Buffer2.AddressLength - 1 PhysicalAddress = PhysicalAddress & Hex(Buffer2.Address(i)) If i < Buffer2.AddressLength - 1 Then PhysicalAddress = PhysicalAddress & "-" End If Next MsgBox "Physical Address: " & PhysicalAddress If Buffer2.DhcpEnabled Then MsgBox "DHCP Enabled " Else MsgBox "DHCP disabled" End If MsgBox "IP Address: " & Buffer2.IpAddressList.IpAddress MsgBox "Subnet Mask: " & Buffer2.IpAddressList.IpMask pAddrStr = Buffer2.IpAddressList.Next Do While pAddrStr <> 0 CopyMemory Buffer, Buffer2.IpAddressList, LenB(Buffer) MsgBox "IP Address: " & Buffer.IpAddress MsgBox "Subnet Mask: " & Buffer.IpMask pAddrStr = Buffer.Next If pAddrStr <> 0 Then CopyMemory Buffer2.IpAddressList, ByVal pAddrStr, _ LenB(Buffer2.IpAddressList) End If Loop MsgBox "Default Gateway: " & Buffer2.GatewayList.IpAddress pAddrStr = Buffer2.GatewayList.Next Do While pAddrStr <> 0 CopyMemory Buffer, Buffer2.GatewayList, LenB(Buffer) MsgBox "IP Address: " & Buffer.IpAddress pAddrStr = Buffer.Next If pAddrStr <> 0 Then CopyMemory Buffer2.GatewayList, ByVal pAddrStr, _ LenB(Buffer2.GatewayList) End If Loop MsgBox "DHCP Server: " & Buffer2.DhcpServer.IpAddress MsgBox "Primary WINS Server: " & _ Buffer2.PrimaryWinsServer.IpAddress MsgBox "Secondary WINS Server: " & _ Buffer2.SecondaryWinsServer.IpAddress ' Display time. NewTime = DateAdd("s", Buffer2.LeaseObtained, #1/1/1970#) MsgBox "Lease Obtained: " & _ CStr(Format(NewTime, "dddd, mmm d hh:mm:ss yyyy")) NewTime = DateAdd("s", Buffer2.LeaseExpires, #1/1/1970#) MsgBox "Lease Expires : " & _ CStr(Format(NewTime, "dddd, mmm d hh:mm:ss yyyy")) pAdapt = Buffer2.Next If pAdapt <> 0 Then CopyMemory AdapterInfo, ByVal pAdapt, AdapterInfoSize End If Loop Until pAdapt = 0 End Sub Robert Gracie www.servicexp.com -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of John W. Colby Sent: Saturday, January 03, 2004 1:35 PM To: Access Developers discussion and problem solving Subject: RE: [AccessD] Mac address Yea, but you have to start somewhere. More and more NICs are embedded right in the motherboards so this is getting less and less likely. John W. Colby www.ColbyConsulting.com -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Gustav Brock Sent: Saturday, January 03, 2004 12:53 PM To: Access Developers discussion and problem solving Subject: Re: [AccessD] Mac address Hi John Hmm ... so the user changes his/hers NIC and is hosed ..? /gustav > Date: 2004-01-03 18:14 > Well... I'm looking at a machine specific piece for copy protection. The > work station name might be specific to a network, but is created by the > software (or user doing the install) so if the machine went down (as many of > mine have over the last few years) if the user didn't select the same name > then the key wouldn't work. _______________________________________________ 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 From tinanfields at torchlake.com Sat Jan 3 13:30:25 2004 From: tinanfields at torchlake.com (Tina Norris Fields) Date: Sat, 03 Jan 2004 14:30:25 -0500 Subject: [AccessD] Form as Subform - Query Fails - Why? References: <000101c3d1f4$08452340$6501a8c0@papparuff> <3FF6F748.40804@torchlake.com> <16831194214.20040103184850@cactus.dk> Message-ID: <3FF71851.7020309@torchlake.com> Hi Gustav, I tried the syntax you gave me, and although it is always possible I screwed up in the typing, I don't think I did. The message box still came up looking for the parameters. So, I tried another tack. I made a copy of my fCalendar, renamed it frmAcknowledgeCalendar, and expanded it to accommodate the other controls I want. Great! My queries all work. For the time being my needs on this are met, but I am still very curious about what I am missing to make the original idea work. This one ends up LOOKING like the original idea, but it isn't really what I started with. Now, on to the next bit. As the last step, I want my user to click a button to launch the Word form document, which will be kept in the same directory as the little database. Here is the wizard-created event procedure to simply launch Word: Private Sub cmdOpenWordDoc_Click() On Error GoTo Err_cmdOpenWordDoc_Click Dim oApp As Object Set oApp = CreateObject("Word.Application") oApp.Visible = True Exit_cmdOpenWordDoc_Click: Exit Sub Err_cmdOpenWordDoc_Click: MsgBox Err.Description Resume Exit_cmdOpenWordDoc_Click End Sub What I want to do is edit this sub to force it to open TLA_Acknowledge_Form.doc. I know this is eminently do-able, but I'm uncertain of my command language here. I think I saw something on this subject a little while back on this list, but I'll be lazy and ask - what do I need to do to tell it to open my form document? Thanks, Tina Gustav Brock wrote: >Hi Tina > >Try with > > Between > [Forms]![fInstructions]![subYourSubformControlName].Form![BeginningDate] > And > [Forms]![fInstructions]![subYourSubformControlName].Form![EndingDate] > >/gustav > > > > >>Hi John, >> >> > > > >>Thanks for the reply. I think I have not been completely clear about my >>quandary. The parameter query selects records based on the following: >> >> > > > >>Between [Forms]![fCalendar]![BeginningDate] And >>[Forms]![fCalendar]![EndingDate] >> >> > > > >>- which works fine as long as one sets the dates by opening fCalendar as >>a stand-alone form. >> >> > > > >>I made a form with a series of instructions, hoping to guide my user >>from step to step without having to remind the user to set the dates >>first in the fCalendar - >>the idea was to embed an instance of the fCalendar in the instruction >>form - set the dates right here in what is now a subform of the >>instruction form. >> >> > > > >>If one sets the dates in the embedded instance of fCalendar, the query >>does not find its parameters. Well, say I to myself, I probably need to >>tell the query where to find those date textboxes, but I do not find a >>way to identify them other than as they are already identified . Is >>there a collection other than [Forms] I need to find? When I examine my >>fCalendar through the subform control, I see all the correct textbox >>names - it certainly appears to be the same form - why does setting its >>dates not provide the necessary parameters to the query? I don't see it. >> >> > >_______________________________________________ >AccessD mailing list >AccessD at databaseadvisors.com >http://databaseadvisors.com/mailman/listinfo/accessd >Website: http://www.databaseadvisors.com > > > From martyconnelly at shaw.ca Sat Jan 3 14:06:35 2004 From: martyconnelly at shaw.ca (MartyConnelly) Date: Sat, 03 Jan 2004 12:06:35 -0800 Subject: [AccessD] Mac address References: Message-ID: <3FF720CB.8060602@shaw.ca> If you have WinXP Pro from cmd window Getmac /V /FO List You can also get via WMI with code John W. Colby wrote: >Nope, comes back 0:0:0:0 > >I have found a half dozen solutions, and all do this. It appears to be a >case of which protocol you are bound to. This uses netbios which >(apparently) my computer isn't using. > >It seems like a network card, or it's driver, could just be asked what the >mac address is. > >John W. Colby >www.ColbyConsulting.com > >-----Original Message----- >From: accessd-bounces at databaseadvisors.com >[mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Stuart >McLachlan >Sent: Friday, January 02, 2004 9:52 PM >To: Access Developers discussion and problem solving >Subject: Re: [AccessD] Mac address > > >On 2 Jan 2004 at 19:53, John W. Colby wrote: > > > >>Does anyone have code for retrieving the Mac address of the network card >> >> >in > > >>a PC? >> >> >> > >This will do it. I got it from >http://www.vbadmincode.btinternet.co.uk/code.htm: > > >Private Const NCBASTAT = &H33 >Private Const NCBNAMSZ = 16 >Private Const HEAP_ZERO_MEMORY = &H8 >Private Const HEAP_GENERATE_EXCEPTIONS = &H4 >Private Const NCBRESET = &H32 > >Private Type NCB > > ncb_command As Byte 'Integer > ncb_retcode As Byte 'Integer > ncb_lsn As Byte 'Integer > ncb_num As Byte ' Integer > ncb_buffer As Long 'String > ncb_length As Integer > ncb_callname As String * NCBNAMSZ > ncb_name As String * NCBNAMSZ > ncb_rto As Byte 'Integer > ncb_sto As Byte ' Integer > ncb_post As Long > ncb_lana_num As Byte 'Integer > ncb_cmd_cplt As Byte 'Integer > ncb_reserve(9) As Byte ' Reserved, must be 0 > ncb_event As Long > End Type > Private Type ADAPTER_STATUS > adapter_address(5) As Byte 'As String * 6 > rev_major As Byte 'Integer > reserved0 As Byte 'Integer > adapter_type As Byte 'Integer > rev_minor As Byte 'Integer > duration As Integer > frmr_recv As Integer > frmr_xmit As Integer > iframe_recv_err As Integer > xmit_aborts As Integer > xmit_success As Long > recv_success As Long > iframe_xmit_err As Integer > recv_buff_unavail As Integer > t1_timeouts As Integer > ti_timeouts As Integer > Reserved1 As Long > free_ncbs As Integer > max_cfg_ncbs As Integer > max_ncbs As Integer > xmit_buf_unavail As Integer > max_dgram_size As Integer > pending_sess As Integer > max_cfg_sess As Integer > max_sess As Integer > max_sess_pkt_size As Integer > name_count As Integer > End Type > Private Type NAME_BUFFER > name As String * NCBNAMSZ > name_num As Integer > name_flags As Integer > End Type > Private Type ASTAT > adapt As ADAPTER_STATUS > NameBuff(30) As NAME_BUFFER > End Type > > Private Declare Function Netbios Lib "netapi32.dll" _ > (pncb As NCB) As Byte > Private Declare Sub CopyMemory Lib "kernel32" Alias "RtlMoveMemory" ( _ > hpvDest As Any, ByVal hpvSource As Long, ByVal cbCopy As Long) > Private Declare Function GetProcessHeap Lib "kernel32" () As Long > Private Declare Function HeapAlloc Lib "kernel32" _ > (ByVal hHeap As Long, ByVal dwFlags As Long, _ > ByVal dwBytes As Long) As Long > Private Declare Function HeapFree Lib "kernel32" (ByVal hHeap As Long, _ > ByVal dwFlags As Long, lpMem As Any) As Long > > Sub Command0_Click() > Dim myNcb As NCB > Dim bRet As Byte > myNcb.ncb_command = NCBRESET > bRet = Netbios(myNcb) > > myNcb.ncb_command = NCBASTAT > myNcb.ncb_lana_num = 0 > myNcb.ncb_callname = "* " > > Dim myASTAT As ASTAT, tempASTAT As ASTAT > Dim pASTAT As Long > myNcb.ncb_length = Len(myASTAT) > Debug.Print Err.LastDllError > pASTAT = HeapAlloc(GetProcessHeap(), HEAP_GENERATE_EXCEPTIONS _ > Or HEAP_ZERO_MEMORY, myNcb.ncb_length) > If pASTAT = 0 Then > Debug.Print "memory allcoation failed!" > Exit Sub > End If > myNcb.ncb_buffer = pASTAT > bRet = Netbios(myNcb) > Debug.Print Err.LastDllError > CopyMemory myASTAT, myNcb.ncb_buffer, Len(myASTAT) > MsgBox Hex(myASTAT.adapt.adapter_address(0)) & " " & _ > Hex(myASTAT.adapt.adapter_address(1)) _ > & " " & Hex(myASTAT.adapt.adapter_address(2)) & " " _ > & Hex(myASTAT.adapt.adapter_address(3)) _ > & " " & Hex(myASTAT.adapt.adapter_address(4)) & " " _ > & Hex(myASTAT.adapt.adapter_address(5)) > HeapFree GetProcessHeap(), 0, pASTAT > End Sub > >-- >Lexacorp Ltd >http://www.lexacorp.com.pg >Information Technology Consultancy, Software Development,System >Support. > > > >_______________________________________________ >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 > > > -- Marty Connelly Victoria, B.C. Canada From jwcolby at colbyconsulting.com Sat Jan 3 14:47:01 2004 From: jwcolby at colbyconsulting.com (John W. Colby) Date: Sat, 3 Jan 2004 15:47:01 -0500 Subject: [AccessD] Mac address In-Reply-To: Message-ID: That may have done it, at least for my computer. This appears to be one of those things that may be windows version dependent. Thanks anyway, it does seem to work for mine! John W. Colby www.ColbyConsulting.com -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Robert Gracie Sent: Saturday, January 03, 2004 2:09 PM To: Access Developers discussion and problem solving Subject: RE: [AccessD] Mac address John, Will this get you started.. Paste in a Module....... Public Const MAX_HOSTNAME_LEN = 132 Public Const MAX_DOMAIN_NAME_LEN = 132 Public Const MAX_SCOPE_ID_LEN = 260 Public Const MAX_ADAPTER_NAME_LENGTH = 260 Public Const MAX_ADAPTER_ADDRESS_LENGTH = 8 Public Const MAX_ADAPTER_DESCRIPTION_LENGTH = 132 Public Const ERROR_BUFFER_OVERFLOW = 111 Public Const MIB_IF_TYPE_ETHERNET = 6 Public Const MIB_IF_TYPE_TOKENRING = 9 Public Const MIB_IF_TYPE_FDDI = 15 Public Const MIB_IF_TYPE_PPP = 23 Public Const MIB_IF_TYPE_LOOPBACK = 24 Public Const MIB_IF_TYPE_SLIP = 28 Type IP_ADDR_STRING Next As Long IpAddress As String * 16 IpMask As String * 16 Context As Long End Type Type IP_ADAPTER_INFO Next As Long ComboIndex As Long AdapterName As String * MAX_ADAPTER_NAME_LENGTH Description As String * MAX_ADAPTER_DESCRIPTION_LENGTH AddressLength As Long Address(MAX_ADAPTER_ADDRESS_LENGTH - 1) As Byte Index As Long Type As Long DhcpEnabled As Long CurrentIpAddress As Long IpAddressList As IP_ADDR_STRING GatewayList As IP_ADDR_STRING DhcpServer As IP_ADDR_STRING HaveWins As Byte PrimaryWinsServer As IP_ADDR_STRING SecondaryWinsServer As IP_ADDR_STRING LeaseObtained As Long LeaseExpires As Long End Type Type FIXED_INFO HostName As String * MAX_HOSTNAME_LEN DomainName As String * MAX_DOMAIN_NAME_LEN CurrentDnsServer As Long DnsServerList As IP_ADDR_STRING NodeType As Long ScopeId As String * MAX_SCOPE_ID_LEN EnableRouting As Long EnableProxy As Long EnableDns As Long End Type Public Declare Function GetNetworkParams Lib "IPHlpApi.dll" _ (FixedInfo As Any, pOutBufLen As Long) As Long Public Declare Function GetAdaptersInfo Lib "IPHlpApi.dll" _ (IpAdapterInfo As Any, pOutBufLen As Long) As Long Public Declare Sub CopyMemory Lib "kernel32" Alias "RtlMoveMemory" _ (Destination As Any, Source As Any, ByVal Length As Long) Sub main() Dim error As Long Dim FixedInfoSize As Long Dim AdapterInfoSize As Long Dim i As Integer Dim PhysicalAddress As String Dim NewTime As Date Dim AdapterInfo As IP_ADAPTER_INFO Dim AddrStr As IP_ADDR_STRING Dim FixedInfo As FIXED_INFO Dim Buffer As IP_ADDR_STRING Dim pAddrStr As Long Dim pAdapt As Long Dim Buffer2 As IP_ADAPTER_INFO Dim FixedInfoBuffer() As Byte Dim AdapterInfoBuffer() As Byte ' Get the main IP configuration information for this machine ' using a FIXED_INFO structure. FixedInfoSize = 0 error = GetNetworkParams(ByVal 0&, FixedInfoSize) If error <> 0 Then If error <> ERROR_BUFFER_OVERFLOW Then MsgBox "GetNetworkParams sizing failed with error " & error Exit Sub End If End If ReDim FixedInfoBuffer(FixedInfoSize - 1) error = GetNetworkParams(FixedInfoBuffer(0), FixedInfoSize) If error = 0 Then CopyMemory FixedInfo, FixedInfoBuffer(0), FixedInfoSize MsgBox "Host Name: " & FixedInfo.HostName MsgBox "DNS Servers: " & FixedInfo.DnsServerList.IpAddress pAddrStr = FixedInfo.DnsServerList.Next Do While pAddrStr <> 0 CopyMemory Buffer, ByVal pAddrStr, LenB(Buffer) MsgBox "DNS Servers: " & Buffer.IpAddress pAddrStr = Buffer.Next Loop Select Case FixedInfo.NodeType Case 1 MsgBox "Node type: Broadcast" Case 2 MsgBox "Node type: Peer to peer" Case 4 MsgBox "Node type: Mixed" Case 8 MsgBox "Node type: Hybrid" Case Else MsgBox "Unknown node type" End Select MsgBox "NetBIOS Scope ID: " & FixedInfo.ScopeId If FixedInfo.EnableRouting Then MsgBox "IP Routing Enabled " Else MsgBox "IP Routing not enabled" End If If FixedInfo.EnableProxy Then MsgBox "WINS Proxy Enabled " Else MsgBox "WINS Proxy not Enabled " End If If FixedInfo.EnableDns Then MsgBox "NetBIOS Resolution Uses DNS " Else MsgBox "NetBIOS Resolution Does not use DNS " End If Else MsgBox "GetNetworkParams failed with error " & error Exit Sub End If ' Enumerate all of the adapter specific information using the ' IP_ADAPTER_INFO structure. ' Note: IP_ADAPTER_INFO contains a linked list of adapter entries. AdapterInfoSize = 0 error = GetAdaptersInfo(ByVal 0&, AdapterInfoSize) If error <> 0 Then If error <> ERROR_BUFFER_OVERFLOW Then MsgBox "GetAdaptersInfo sizing failed with error " & error Exit Sub End If End If ReDim AdapterInfoBuffer(AdapterInfoSize - 1) ' Get actual adapter information error = GetAdaptersInfo(AdapterInfoBuffer(0), AdapterInfoSize) If error <> 0 Then MsgBox "GetAdaptersInfo failed with error " & error Exit Sub End If ' Allocate memory CopyMemory AdapterInfo, AdapterInfoBuffer(0), AdapterInfoSize pAdapt = AdapterInfo.Next Do CopyMemory Buffer2, AdapterInfo, AdapterInfoSize Select Case Buffer2.Type Case MIB_IF_TYPE_ETHERNET MsgBox "Adapter name: Ethernet adapter " Case MIB_IF_TYPE_TOKENRING MsgBox "Adapter name: Token Ring adapter " Case MIB_IF_TYPE_FDDI MsgBox "Adapter name: FDDI adapter " Case MIB_IF_TYPE_PPP MsgBox "Adapter name: PPP adapter" Case MIB_IF_TYPE_LOOPBACK MsgBox "Adapter name: Loopback adapter " Case MIB_IF_TYPE_SLIP MsgBox "Adapter name: Slip adapter " Case Else MsgBox "Adapter name: Other adapter " End Select MsgBox "AdapterDescription: " & Buffer2.Description PhysicalAddress = "" For i = 0 To Buffer2.AddressLength - 1 PhysicalAddress = PhysicalAddress & Hex(Buffer2.Address(i)) If i < Buffer2.AddressLength - 1 Then PhysicalAddress = PhysicalAddress & "-" End If Next MsgBox "Physical Address: " & PhysicalAddress If Buffer2.DhcpEnabled Then MsgBox "DHCP Enabled " Else MsgBox "DHCP disabled" End If MsgBox "IP Address: " & Buffer2.IpAddressList.IpAddress MsgBox "Subnet Mask: " & Buffer2.IpAddressList.IpMask pAddrStr = Buffer2.IpAddressList.Next Do While pAddrStr <> 0 CopyMemory Buffer, Buffer2.IpAddressList, LenB(Buffer) MsgBox "IP Address: " & Buffer.IpAddress MsgBox "Subnet Mask: " & Buffer.IpMask pAddrStr = Buffer.Next If pAddrStr <> 0 Then CopyMemory Buffer2.IpAddressList, ByVal pAddrStr, _ LenB(Buffer2.IpAddressList) End If Loop MsgBox "Default Gateway: " & Buffer2.GatewayList.IpAddress pAddrStr = Buffer2.GatewayList.Next Do While pAddrStr <> 0 CopyMemory Buffer, Buffer2.GatewayList, LenB(Buffer) MsgBox "IP Address: " & Buffer.IpAddress pAddrStr = Buffer.Next If pAddrStr <> 0 Then CopyMemory Buffer2.GatewayList, ByVal pAddrStr, _ LenB(Buffer2.GatewayList) End If Loop MsgBox "DHCP Server: " & Buffer2.DhcpServer.IpAddress MsgBox "Primary WINS Server: " & _ Buffer2.PrimaryWinsServer.IpAddress MsgBox "Secondary WINS Server: " & _ Buffer2.SecondaryWinsServer.IpAddress ' Display time. NewTime = DateAdd("s", Buffer2.LeaseObtained, #1/1/1970#) MsgBox "Lease Obtained: " & _ CStr(Format(NewTime, "dddd, mmm d hh:mm:ss yyyy")) NewTime = DateAdd("s", Buffer2.LeaseExpires, #1/1/1970#) MsgBox "Lease Expires : " & _ CStr(Format(NewTime, "dddd, mmm d hh:mm:ss yyyy")) pAdapt = Buffer2.Next If pAdapt <> 0 Then CopyMemory AdapterInfo, ByVal pAdapt, AdapterInfoSize End If Loop Until pAdapt = 0 End Sub Robert Gracie www.servicexp.com -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of John W. Colby Sent: Saturday, January 03, 2004 1:35 PM To: Access Developers discussion and problem solving Subject: RE: [AccessD] Mac address Yea, but you have to start somewhere. More and more NICs are embedded right in the motherboards so this is getting less and less likely. John W. Colby www.ColbyConsulting.com -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Gustav Brock Sent: Saturday, January 03, 2004 12:53 PM To: Access Developers discussion and problem solving Subject: Re: [AccessD] Mac address Hi John Hmm ... so the user changes his/hers NIC and is hosed ..? /gustav > Date: 2004-01-03 18:14 > Well... I'm looking at a machine specific piece for copy protection. The > work station name might be specific to a network, but is created by the > software (or user doing the install) so if the machine went down (as many of > mine have over the last few years) if the user didn't select the same name > then the key wouldn't work. _______________________________________________ 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 _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From DWUTKA at marlow.com Sat Jan 3 14:46:54 2004 From: DWUTKA at marlow.com (DWUTKA at marlow.com) Date: Sat, 3 Jan 2004 14:46:54 -0600 Subject: [AccessD] Mac address Message-ID: <2F8793082E00D4119A1700B0D0216BF8022276DB@main2.marlow.com> I am attaching a VB mod, one of the functions is fGetMACAddress. Should do what you want. Sorry for the attachment, but it is small. Drew -----Original Message----- From: John W. Colby [mailto:jwcolby at colbyconsulting.com] Sent: Friday, January 02, 2004 6:54 PM To: AccessD Subject: [AccessD] Mac address Does anyone have code for retrieving the Mac address of the network card in a PC? John W. Colby www.ColbyConsulting.com _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From Erwin.Craps at ithelps.be Sat Jan 3 15:51:00 2004 From: Erwin.Craps at ithelps.be (Erwin Craps - IT Helps) Date: Sat, 3 Jan 2004 22:51:00 +0100 Subject: [AccessD] Mac address Message-ID: <46B976F2B698FF46A4FE7636509B22DF03D075@stekelbes.ithelps.local> John, as an alternative you could use the serial number of the harddisk format. When a disk is formatted it receives a serialnumber that can be used for this purpose. If the disk is reformatted than you would get a new serial. This looks more appropriate to me then a mac address. I used a while ago in a app that needed protection. When is disk is re-formatted your software needs to be re-installed anyway. When using togheter with some easy challenge/response code you can re-activate the user by phone. I don't have the code overhere but if you need it please met me know? Erwin -----Oorspronkelijk bericht----- Van: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] Namens John W. Colby Verzonden: zaterdag 3 januari 2004 21:47 Aan: Access Developers discussion and problem solving Onderwerp: RE: [AccessD] Mac address That may have done it, at least for my computer. This appears to be one of those things that may be windows version dependent. Thanks anyway, it does seem to work for mine! John W. Colby www.ColbyConsulting.com -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Robert Gracie Sent: Saturday, January 03, 2004 2:09 PM To: Access Developers discussion and problem solving Subject: RE: [AccessD] Mac address John, Will this get you started.. Paste in a Module....... Public Const MAX_HOSTNAME_LEN = 132 Public Const MAX_DOMAIN_NAME_LEN = 132 Public Const MAX_SCOPE_ID_LEN = 260 Public Const MAX_ADAPTER_NAME_LENGTH = 260 Public Const MAX_ADAPTER_ADDRESS_LENGTH = 8 Public Const MAX_ADAPTER_DESCRIPTION_LENGTH = 132 Public Const ERROR_BUFFER_OVERFLOW = 111 Public Const MIB_IF_TYPE_ETHERNET = 6 Public Const MIB_IF_TYPE_TOKENRING = 9 Public Const MIB_IF_TYPE_FDDI = 15 Public Const MIB_IF_TYPE_PPP = 23 Public Const MIB_IF_TYPE_LOOPBACK = 24 Public Const MIB_IF_TYPE_SLIP = 28 Type IP_ADDR_STRING Next As Long IpAddress As String * 16 IpMask As String * 16 Context As Long End Type Type IP_ADAPTER_INFO Next As Long ComboIndex As Long AdapterName As String * MAX_ADAPTER_NAME_LENGTH Description As String * MAX_ADAPTER_DESCRIPTION_LENGTH AddressLength As Long Address(MAX_ADAPTER_ADDRESS_LENGTH - 1) As Byte Index As Long Type As Long DhcpEnabled As Long CurrentIpAddress As Long IpAddressList As IP_ADDR_STRING GatewayList As IP_ADDR_STRING DhcpServer As IP_ADDR_STRING HaveWins As Byte PrimaryWinsServer As IP_ADDR_STRING SecondaryWinsServer As IP_ADDR_STRING LeaseObtained As Long LeaseExpires As Long End Type Type FIXED_INFO HostName As String * MAX_HOSTNAME_LEN DomainName As String * MAX_DOMAIN_NAME_LEN CurrentDnsServer As Long DnsServerList As IP_ADDR_STRING NodeType As Long ScopeId As String * MAX_SCOPE_ID_LEN EnableRouting As Long EnableProxy As Long EnableDns As Long End Type Public Declare Function GetNetworkParams Lib "IPHlpApi.dll" _ (FixedInfo As Any, pOutBufLen As Long) As Long Public Declare Function GetAdaptersInfo Lib "IPHlpApi.dll" _ (IpAdapterInfo As Any, pOutBufLen As Long) As Long Public Declare Sub CopyMemory Lib "kernel32" Alias "RtlMoveMemory" _ (Destination As Any, Source As Any, ByVal Length As Long) Sub main() Dim error As Long Dim FixedInfoSize As Long Dim AdapterInfoSize As Long Dim i As Integer Dim PhysicalAddress As String Dim NewTime As Date Dim AdapterInfo As IP_ADAPTER_INFO Dim AddrStr As IP_ADDR_STRING Dim FixedInfo As FIXED_INFO Dim Buffer As IP_ADDR_STRING Dim pAddrStr As Long Dim pAdapt As Long Dim Buffer2 As IP_ADAPTER_INFO Dim FixedInfoBuffer() As Byte Dim AdapterInfoBuffer() As Byte ' Get the main IP configuration information for this machine ' using a FIXED_INFO structure. FixedInfoSize = 0 error = GetNetworkParams(ByVal 0&, FixedInfoSize) If error <> 0 Then If error <> ERROR_BUFFER_OVERFLOW Then MsgBox "GetNetworkParams sizing failed with error " & error Exit Sub End If End If ReDim FixedInfoBuffer(FixedInfoSize - 1) error = GetNetworkParams(FixedInfoBuffer(0), FixedInfoSize) If error = 0 Then CopyMemory FixedInfo, FixedInfoBuffer(0), FixedInfoSize MsgBox "Host Name: " & FixedInfo.HostName MsgBox "DNS Servers: " & FixedInfo.DnsServerList.IpAddress pAddrStr = FixedInfo.DnsServerList.Next Do While pAddrStr <> 0 CopyMemory Buffer, ByVal pAddrStr, LenB(Buffer) MsgBox "DNS Servers: " & Buffer.IpAddress pAddrStr = Buffer.Next Loop Select Case FixedInfo.NodeType Case 1 MsgBox "Node type: Broadcast" Case 2 MsgBox "Node type: Peer to peer" Case 4 MsgBox "Node type: Mixed" Case 8 MsgBox "Node type: Hybrid" Case Else MsgBox "Unknown node type" End Select MsgBox "NetBIOS Scope ID: " & FixedInfo.ScopeId If FixedInfo.EnableRouting Then MsgBox "IP Routing Enabled " Else MsgBox "IP Routing not enabled" End If If FixedInfo.EnableProxy Then MsgBox "WINS Proxy Enabled " Else MsgBox "WINS Proxy not Enabled " End If If FixedInfo.EnableDns Then MsgBox "NetBIOS Resolution Uses DNS " Else MsgBox "NetBIOS Resolution Does not use DNS " End If Else MsgBox "GetNetworkParams failed with error " & error Exit Sub End If ' Enumerate all of the adapter specific information using the ' IP_ADAPTER_INFO structure. ' Note: IP_ADAPTER_INFO contains a linked list of adapter entries. AdapterInfoSize = 0 error = GetAdaptersInfo(ByVal 0&, AdapterInfoSize) If error <> 0 Then If error <> ERROR_BUFFER_OVERFLOW Then MsgBox "GetAdaptersInfo sizing failed with error " & error Exit Sub End If End If ReDim AdapterInfoBuffer(AdapterInfoSize - 1) ' Get actual adapter information error = GetAdaptersInfo(AdapterInfoBuffer(0), AdapterInfoSize) If error <> 0 Then MsgBox "GetAdaptersInfo failed with error " & error Exit Sub End If ' Allocate memory CopyMemory AdapterInfo, AdapterInfoBuffer(0), AdapterInfoSize pAdapt = AdapterInfo.Next Do CopyMemory Buffer2, AdapterInfo, AdapterInfoSize Select Case Buffer2.Type Case MIB_IF_TYPE_ETHERNET MsgBox "Adapter name: Ethernet adapter " Case MIB_IF_TYPE_TOKENRING MsgBox "Adapter name: Token Ring adapter " Case MIB_IF_TYPE_FDDI MsgBox "Adapter name: FDDI adapter " Case MIB_IF_TYPE_PPP MsgBox "Adapter name: PPP adapter" Case MIB_IF_TYPE_LOOPBACK MsgBox "Adapter name: Loopback adapter " Case MIB_IF_TYPE_SLIP MsgBox "Adapter name: Slip adapter " Case Else MsgBox "Adapter name: Other adapter " End Select MsgBox "AdapterDescription: " & Buffer2.Description PhysicalAddress = "" For i = 0 To Buffer2.AddressLength - 1 PhysicalAddress = PhysicalAddress & Hex(Buffer2.Address(i)) If i < Buffer2.AddressLength - 1 Then PhysicalAddress = PhysicalAddress & "-" End If Next MsgBox "Physical Address: " & PhysicalAddress If Buffer2.DhcpEnabled Then MsgBox "DHCP Enabled " Else MsgBox "DHCP disabled" End If MsgBox "IP Address: " & Buffer2.IpAddressList.IpAddress MsgBox "Subnet Mask: " & Buffer2.IpAddressList.IpMask pAddrStr = Buffer2.IpAddressList.Next Do While pAddrStr <> 0 CopyMemory Buffer, Buffer2.IpAddressList, LenB(Buffer) MsgBox "IP Address: " & Buffer.IpAddress MsgBox "Subnet Mask: " & Buffer.IpMask pAddrStr = Buffer.Next If pAddrStr <> 0 Then CopyMemory Buffer2.IpAddressList, ByVal pAddrStr, _ LenB(Buffer2.IpAddressList) End If Loop MsgBox "Default Gateway: " & Buffer2.GatewayList.IpAddress pAddrStr = Buffer2.GatewayList.Next Do While pAddrStr <> 0 CopyMemory Buffer, Buffer2.GatewayList, LenB(Buffer) MsgBox "IP Address: " & Buffer.IpAddress pAddrStr = Buffer.Next If pAddrStr <> 0 Then CopyMemory Buffer2.GatewayList, ByVal pAddrStr, _ LenB(Buffer2.GatewayList) End If Loop MsgBox "DHCP Server: " & Buffer2.DhcpServer.IpAddress MsgBox "Primary WINS Server: " & _ Buffer2.PrimaryWinsServer.IpAddress MsgBox "Secondary WINS Server: " & _ Buffer2.SecondaryWinsServer.IpAddress ' Display time. NewTime = DateAdd("s", Buffer2.LeaseObtained, #1/1/1970#) MsgBox "Lease Obtained: " & _ CStr(Format(NewTime, "dddd, mmm d hh:mm:ss yyyy")) NewTime = DateAdd("s", Buffer2.LeaseExpires, #1/1/1970#) MsgBox "Lease Expires : " & _ CStr(Format(NewTime, "dddd, mmm d hh:mm:ss yyyy")) pAdapt = Buffer2.Next If pAdapt <> 0 Then CopyMemory AdapterInfo, ByVal pAdapt, AdapterInfoSize End If Loop Until pAdapt = 0 End Sub Robert Gracie www.servicexp.com -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of John W. Colby Sent: Saturday, January 03, 2004 1:35 PM To: Access Developers discussion and problem solving Subject: RE: [AccessD] Mac address Yea, but you have to start somewhere. More and more NICs are embedded right in the motherboards so this is getting less and less likely. John W. Colby www.ColbyConsulting.com -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Gustav Brock Sent: Saturday, January 03, 2004 12:53 PM To: Access Developers discussion and problem solving Subject: Re: [AccessD] Mac address Hi John Hmm ... so the user changes his/hers NIC and is hosed ..? /gustav > Date: 2004-01-03 18:14 > Well... I'm looking at a machine specific piece for copy protection. > The work station name might be specific to a network, but is created > by the software (or user doing the install) so if the machine went > down (as many of > mine have over the last few years) if the user didn't select the same > name then the key wouldn't work. _______________________________________________ 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 _______________________________________________ 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 From jwcolby at colbyconsulting.com Sat Jan 3 16:55:45 2004 From: jwcolby at colbyconsulting.com (John W. Colby) Date: Sat, 3 Jan 2004 17:55:45 -0500 Subject: [AccessD] Mac address In-Reply-To: <46B976F2B698FF46A4FE7636509B22DF03D075@stekelbes.ithelps.local> Message-ID: Erwin, I used the disk SN in my last copy protection system. In the end, if it exists at all, a NIC is virtually never changed so it works wonderfully for this. But yea, I know how to do the disk sn thing. John W. Colby www.ColbyConsulting.com -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Erwin Craps - IT Helps Sent: Saturday, January 03, 2004 4:51 PM To: Access Developers discussion and problem solving Subject: RE: [AccessD] Mac address John, as an alternative you could use the serial number of the harddisk format. When a disk is formatted it receives a serialnumber that can be used for this purpose. If the disk is reformatted than you would get a new serial. This looks more appropriate to me then a mac address. I used a while ago in a app that needed protection. When is disk is re-formatted your software needs to be re-installed anyway. When using togheter with some easy challenge/response code you can re-activate the user by phone. I don't have the code overhere but if you need it please met me know? Erwin -----Oorspronkelijk bericht----- Van: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] Namens John W. Colby Verzonden: zaterdag 3 januari 2004 21:47 Aan: Access Developers discussion and problem solving Onderwerp: RE: [AccessD] Mac address That may have done it, at least for my computer. This appears to be one of those things that may be windows version dependent. Thanks anyway, it does seem to work for mine! John W. Colby www.ColbyConsulting.com -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Robert Gracie Sent: Saturday, January 03, 2004 2:09 PM To: Access Developers discussion and problem solving Subject: RE: [AccessD] Mac address John, Will this get you started.. Paste in a Module....... Public Const MAX_HOSTNAME_LEN = 132 Public Const MAX_DOMAIN_NAME_LEN = 132 Public Const MAX_SCOPE_ID_LEN = 260 Public Const MAX_ADAPTER_NAME_LENGTH = 260 Public Const MAX_ADAPTER_ADDRESS_LENGTH = 8 Public Const MAX_ADAPTER_DESCRIPTION_LENGTH = 132 Public Const ERROR_BUFFER_OVERFLOW = 111 Public Const MIB_IF_TYPE_ETHERNET = 6 Public Const MIB_IF_TYPE_TOKENRING = 9 Public Const MIB_IF_TYPE_FDDI = 15 Public Const MIB_IF_TYPE_PPP = 23 Public Const MIB_IF_TYPE_LOOPBACK = 24 Public Const MIB_IF_TYPE_SLIP = 28 Type IP_ADDR_STRING Next As Long IpAddress As String * 16 IpMask As String * 16 Context As Long End Type Type IP_ADAPTER_INFO Next As Long ComboIndex As Long AdapterName As String * MAX_ADAPTER_NAME_LENGTH Description As String * MAX_ADAPTER_DESCRIPTION_LENGTH AddressLength As Long Address(MAX_ADAPTER_ADDRESS_LENGTH - 1) As Byte Index As Long Type As Long DhcpEnabled As Long CurrentIpAddress As Long IpAddressList As IP_ADDR_STRING GatewayList As IP_ADDR_STRING DhcpServer As IP_ADDR_STRING HaveWins As Byte PrimaryWinsServer As IP_ADDR_STRING SecondaryWinsServer As IP_ADDR_STRING LeaseObtained As Long LeaseExpires As Long End Type Type FIXED_INFO HostName As String * MAX_HOSTNAME_LEN DomainName As String * MAX_DOMAIN_NAME_LEN CurrentDnsServer As Long DnsServerList As IP_ADDR_STRING NodeType As Long ScopeId As String * MAX_SCOPE_ID_LEN EnableRouting As Long EnableProxy As Long EnableDns As Long End Type Public Declare Function GetNetworkParams Lib "IPHlpApi.dll" _ (FixedInfo As Any, pOutBufLen As Long) As Long Public Declare Function GetAdaptersInfo Lib "IPHlpApi.dll" _ (IpAdapterInfo As Any, pOutBufLen As Long) As Long Public Declare Sub CopyMemory Lib "kernel32" Alias "RtlMoveMemory" _ (Destination As Any, Source As Any, ByVal Length As Long) Sub main() Dim error As Long Dim FixedInfoSize As Long Dim AdapterInfoSize As Long Dim i As Integer Dim PhysicalAddress As String Dim NewTime As Date Dim AdapterInfo As IP_ADAPTER_INFO Dim AddrStr As IP_ADDR_STRING Dim FixedInfo As FIXED_INFO Dim Buffer As IP_ADDR_STRING Dim pAddrStr As Long Dim pAdapt As Long Dim Buffer2 As IP_ADAPTER_INFO Dim FixedInfoBuffer() As Byte Dim AdapterInfoBuffer() As Byte ' Get the main IP configuration information for this machine ' using a FIXED_INFO structure. FixedInfoSize = 0 error = GetNetworkParams(ByVal 0&, FixedInfoSize) If error <> 0 Then If error <> ERROR_BUFFER_OVERFLOW Then MsgBox "GetNetworkParams sizing failed with error " & error Exit Sub End If End If ReDim FixedInfoBuffer(FixedInfoSize - 1) error = GetNetworkParams(FixedInfoBuffer(0), FixedInfoSize) If error = 0 Then CopyMemory FixedInfo, FixedInfoBuffer(0), FixedInfoSize MsgBox "Host Name: " & FixedInfo.HostName MsgBox "DNS Servers: " & FixedInfo.DnsServerList.IpAddress pAddrStr = FixedInfo.DnsServerList.Next Do While pAddrStr <> 0 CopyMemory Buffer, ByVal pAddrStr, LenB(Buffer) MsgBox "DNS Servers: " & Buffer.IpAddress pAddrStr = Buffer.Next Loop Select Case FixedInfo.NodeType Case 1 MsgBox "Node type: Broadcast" Case 2 MsgBox "Node type: Peer to peer" Case 4 MsgBox "Node type: Mixed" Case 8 MsgBox "Node type: Hybrid" Case Else MsgBox "Unknown node type" End Select MsgBox "NetBIOS Scope ID: " & FixedInfo.ScopeId If FixedInfo.EnableRouting Then MsgBox "IP Routing Enabled " Else MsgBox "IP Routing not enabled" End If If FixedInfo.EnableProxy Then MsgBox "WINS Proxy Enabled " Else MsgBox "WINS Proxy not Enabled " End If If FixedInfo.EnableDns Then MsgBox "NetBIOS Resolution Uses DNS " Else MsgBox "NetBIOS Resolution Does not use DNS " End If Else MsgBox "GetNetworkParams failed with error " & error Exit Sub End If ' Enumerate all of the adapter specific information using the ' IP_ADAPTER_INFO structure. ' Note: IP_ADAPTER_INFO contains a linked list of adapter entries. AdapterInfoSize = 0 error = GetAdaptersInfo(ByVal 0&, AdapterInfoSize) If error <> 0 Then If error <> ERROR_BUFFER_OVERFLOW Then MsgBox "GetAdaptersInfo sizing failed with error " & error Exit Sub End If End If ReDim AdapterInfoBuffer(AdapterInfoSize - 1) ' Get actual adapter information error = GetAdaptersInfo(AdapterInfoBuffer(0), AdapterInfoSize) If error <> 0 Then MsgBox "GetAdaptersInfo failed with error " & error Exit Sub End If ' Allocate memory CopyMemory AdapterInfo, AdapterInfoBuffer(0), AdapterInfoSize pAdapt = AdapterInfo.Next Do CopyMemory Buffer2, AdapterInfo, AdapterInfoSize Select Case Buffer2.Type Case MIB_IF_TYPE_ETHERNET MsgBox "Adapter name: Ethernet adapter " Case MIB_IF_TYPE_TOKENRING MsgBox "Adapter name: Token Ring adapter " Case MIB_IF_TYPE_FDDI MsgBox "Adapter name: FDDI adapter " Case MIB_IF_TYPE_PPP MsgBox "Adapter name: PPP adapter" Case MIB_IF_TYPE_LOOPBACK MsgBox "Adapter name: Loopback adapter " Case MIB_IF_TYPE_SLIP MsgBox "Adapter name: Slip adapter " Case Else MsgBox "Adapter name: Other adapter " End Select MsgBox "AdapterDescription: " & Buffer2.Description PhysicalAddress = "" For i = 0 To Buffer2.AddressLength - 1 PhysicalAddress = PhysicalAddress & Hex(Buffer2.Address(i)) If i < Buffer2.AddressLength - 1 Then PhysicalAddress = PhysicalAddress & "-" End If Next MsgBox "Physical Address: " & PhysicalAddress If Buffer2.DhcpEnabled Then MsgBox "DHCP Enabled " Else MsgBox "DHCP disabled" End If MsgBox "IP Address: " & Buffer2.IpAddressList.IpAddress MsgBox "Subnet Mask: " & Buffer2.IpAddressList.IpMask pAddrStr = Buffer2.IpAddressList.Next Do While pAddrStr <> 0 CopyMemory Buffer, Buffer2.IpAddressList, LenB(Buffer) MsgBox "IP Address: " & Buffer.IpAddress MsgBox "Subnet Mask: " & Buffer.IpMask pAddrStr = Buffer.Next If pAddrStr <> 0 Then CopyMemory Buffer2.IpAddressList, ByVal pAddrStr, _ LenB(Buffer2.IpAddressList) End If Loop MsgBox "Default Gateway: " & Buffer2.GatewayList.IpAddress pAddrStr = Buffer2.GatewayList.Next Do While pAddrStr <> 0 CopyMemory Buffer, Buffer2.GatewayList, LenB(Buffer) MsgBox "IP Address: " & Buffer.IpAddress pAddrStr = Buffer.Next If pAddrStr <> 0 Then CopyMemory Buffer2.GatewayList, ByVal pAddrStr, _ LenB(Buffer2.GatewayList) End If Loop MsgBox "DHCP Server: " & Buffer2.DhcpServer.IpAddress MsgBox "Primary WINS Server: " & _ Buffer2.PrimaryWinsServer.IpAddress MsgBox "Secondary WINS Server: " & _ Buffer2.SecondaryWinsServer.IpAddress ' Display time. NewTime = DateAdd("s", Buffer2.LeaseObtained, #1/1/1970#) MsgBox "Lease Obtained: " & _ CStr(Format(NewTime, "dddd, mmm d hh:mm:ss yyyy")) NewTime = DateAdd("s", Buffer2.LeaseExpires, #1/1/1970#) MsgBox "Lease Expires : " & _ CStr(Format(NewTime, "dddd, mmm d hh:mm:ss yyyy")) pAdapt = Buffer2.Next If pAdapt <> 0 Then CopyMemory AdapterInfo, ByVal pAdapt, AdapterInfoSize End If Loop Until pAdapt = 0 End Sub Robert Gracie www.servicexp.com -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of John W. Colby Sent: Saturday, January 03, 2004 1:35 PM To: Access Developers discussion and problem solving Subject: RE: [AccessD] Mac address Yea, but you have to start somewhere. More and more NICs are embedded right in the motherboards so this is getting less and less likely. John W. Colby www.ColbyConsulting.com -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Gustav Brock Sent: Saturday, January 03, 2004 12:53 PM To: Access Developers discussion and problem solving Subject: Re: [AccessD] Mac address Hi John Hmm ... so the user changes his/hers NIC and is hosed ..? /gustav > Date: 2004-01-03 18:14 > Well... I'm looking at a machine specific piece for copy protection. > The work station name might be specific to a network, but is created > by the software (or user doing the install) so if the machine went > down (as many of > mine have over the last few years) if the user didn't select the same > name then the key wouldn't work. _______________________________________________ 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 _______________________________________________ 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 _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From stuart at lexacorp.com.pg Sat Jan 3 17:59:46 2004 From: stuart at lexacorp.com.pg (Stuart McLachlan) Date: Sun, 04 Jan 2004 09:59:46 +1000 Subject: [AccessD] Mac address In-Reply-To: References: <9731465094.20040103185321@cactus.dk> Message-ID: <3FF7E412.32402.29D45F@localhost> Take a look at http://www.klcconsulting.net/smac/ for a way to defeat this copy protection scheme. (Follow the link to "the research of Kyle Lai" for a lot of good info on MAC addresses) On 3 Jan 2004 at 13:34, John W. Colby wrote: > Yea, but you have to start somewhere. More and more NICs are embedded right > in the motherboards so this is getting less and less likely. > > John W. Colby > www.ColbyConsulting.com > > -----Original Message----- > From: accessd-bounces at databaseadvisors.com > [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Gustav Brock > Sent: Saturday, January 03, 2004 12:53 PM > To: Access Developers discussion and problem solving > Subject: Re: [AccessD] Mac address > > > Hi John > > Hmm ... so the user changes his/hers NIC and is hosed ..? > > /gustav > > > > Date: 2004-01-03 18:14 > > > Well... I'm looking at a machine specific piece for copy protection. The > > work station name might be specific to a network, but is created by the > > software (or user doing the install) so if the machine went down (as many > of > > mine have over the last few years) if the user didn't select the same name > > then the key wouldn't work. > -- Lexacorp Ltd http://www.lexacorp.com.pg Information Technology Consultancy, Software Development,System Support. From Subscriptions at servicexp.com Sat Jan 3 20:50:12 2004 From: Subscriptions at servicexp.com (Robert Gracie) Date: Sat, 3 Jan 2004 21:50:12 -0500 Subject: [AccessD] Anyone try Code Jack? In-Reply-To: <3FF7E412.32402.29D45F@localhost> Message-ID: Is anyone using this product/services? What do you think? http://www.artifactsoftware.com/ Robert Gracie www.servicexp.com From jwcolby at colbyconsulting.com Sat Jan 3 21:48:49 2004 From: jwcolby at colbyconsulting.com (John W. Colby) Date: Sat, 3 Jan 2004 22:48:49 -0500 Subject: [AccessD] Mac address In-Reply-To: <3FF7E412.32402.29D45F@localhost> Message-ID: LOL. I learned a long time ago not to sweat the small stuff. If there are hackers figuring out how to hack Microsoft's $100 million copy protection, I am not going to survive a determined attempt to get around my stuff. On the other hand, I assume you lock your front door. And I assume there is glass in the door that anyone who wants in could just smash to reach in and unlock your door. So why do you bother? Because the lock keeps 99% of the people out of your house. 99% is good enough for me. I will not even bat an eyelash nor give a second thought to the other 1%. 99% of the effort COULD be spent stopping (or failing to stop) that last 1%. John W. Colby www.ColbyConsulting.com -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Stuart McLachlan Sent: Saturday, January 03, 2004 7:00 PM To: Access Developers discussion and problem solving Subject: RE: [AccessD] Mac address Take a look at http://www.klcconsulting.net/smac/ for a way to defeat this copy protection scheme. (Follow the link to "the research of Kyle Lai" for a lot of good info on MAC addresses) On 3 Jan 2004 at 13:34, John W. Colby wrote: > Yea, but you have to start somewhere. More and more NICs are embedded right > in the motherboards so this is getting less and less likely. > > John W. Colby > www.ColbyConsulting.com > > -----Original Message----- > From: accessd-bounces at databaseadvisors.com > [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Gustav Brock > Sent: Saturday, January 03, 2004 12:53 PM > To: Access Developers discussion and problem solving > Subject: Re: [AccessD] Mac address > > > Hi John > > Hmm ... so the user changes his/hers NIC and is hosed ..? > > /gustav > > > > Date: 2004-01-03 18:14 > > > Well... I'm looking at a machine specific piece for copy protection. The > > work station name might be specific to a network, but is created by the > > software (or user doing the install) so if the machine went down (as many > of > > mine have over the last few years) if the user didn't select the same name > > then the key wouldn't work. > -- Lexacorp Ltd http://www.lexacorp.com.pg Information Technology Consultancy, Software Development,System Support. _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From carbonnb at sympatico.ca Sat Jan 3 21:55:13 2004 From: carbonnb at sympatico.ca (Bryan Carbonnell) Date: Sat, 03 Jan 2004 22:55:13 -0500 Subject: [AccessD] Mac address In-Reply-To: <2F8793082E00D4119A1700B0D0216BF8022276DB@main2.marlow.com> Message-ID: <3FF74851.11214.E5036@localhost> On 3 Jan 2004 at 14:46, DWUTKA at marlow.com wrote: > I am attaching a VB mod, one of the functions is fGetMACAddress. > Should do what you want. Sorry for the attachment, but it is small. Tsk, tsk tsk Drew. Attachemnts are a no-no on the list. Besides the list software strips everything but plain old text. You will need to resend your VB module to JC directly. -- Bryan Carbonnell - carbonnb at sympatico.ca On the keyboard of life, always keep one finger on the escape key. From d.dick at uws.edu.au Sun Jan 4 05:26:43 2004 From: d.dick at uws.edu.au (Darren DICK) Date: Sun, 4 Jan 2004 22:26:43 +1100 Subject: [AccessD] A2K: Trap Key stroke Message-ID: <000a01c3d2b5$a2890c70$20669a89@DDICK> Hello all I have some key down code to trap key strokes. Pretty basic stuff What do I type after I have trapped the key stoke eg F1 to stop any further processing? Many thanks in advance Darren EG Private Sub Form_KeyDown(KeyCode As Integer, Shift As Integer) Select Case KeyCode Case vbKeyF1 'What do I type here to stop the processing of (In this case F1) 'I DON'T wanna see the help screen Case vbKeyF2 blah blah blah From gustav at cactus.dk Sun Jan 4 05:39:23 2004 From: gustav at cactus.dk (Gustav Brock) Date: Sun, 4 Jan 2004 12:39:23 +0100 Subject: [AccessD] A2K: Trap Key stroke In-Reply-To: <000a01c3d2b5$a2890c70$20669a89@DDICK> References: <000a01c3d2b5$a2890c70$20669a89@DDICK> Message-ID: <10715453460.20040104123923@cactus.dk> Hi Darren KeyCode = 0 /gustav > Hello all > I have some key down code to trap key strokes. Pretty basic stuff > What do I type after I have trapped the key stoke eg F1 to stop any further processing? > Many thanks in advance > Darren > EG > Private Sub Form_KeyDown(KeyCode As Integer, Shift As Integer) > Select Case KeyCode > Case vbKeyF1 > 'What do I type here to stop the processing of (In this case F1) > 'I DON'T wanna see the help screen > Case vbKeyF2 > blah blah blah From d.dick at uws.edu.au Sun Jan 4 05:50:28 2004 From: d.dick at uws.edu.au (Darren DICK) Date: Sun, 4 Jan 2004 22:50:28 +1100 Subject: [AccessD] A2K: Trap Key stroke References: <000a01c3d2b5$a2890c70$20669a89@DDICK> <10715453460.20040104123923@cactus.dk> Message-ID: <008001c3d2b8$f3cb0590$20669a89@DDICK> Gustav You Da Man Thanks.....again Legend be thy name Many thanks Darren ----- Original Message ----- From: "Gustav Brock" To: "Access Developers discussion and problem solving" Sent: Sunday, January 04, 2004 10:39 PM Subject: Re: [AccessD] A2K: Trap Key stroke > Hi Darren > > KeyCode = 0 > > /gustav > > > > Hello all > > I have some key down code to trap key strokes. Pretty basic stuff > > What do I type after I have trapped the key stoke eg F1 to stop any further processing? > > > Many thanks in advance > > > Darren > > > EG > > Private Sub Form_KeyDown(KeyCode As Integer, Shift As Integer) > > > Select Case KeyCode > > Case vbKeyF1 > > 'What do I type here to stop the processing of (In this case F1) > > 'I DON'T wanna see the help screen > > Case vbKeyF2 > > blah blah blah > > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com From tinanfields at torchlake.com Sun Jan 4 06:35:33 2004 From: tinanfields at torchlake.com (Tina Norris Fields) Date: Sun, 04 Jan 2004 07:35:33 -0500 Subject: [AccessD] Form as Subform - Query Fails - Why? References: <000101c3d1f4$08452340$6501a8c0@papparuff> <3FF6F748.40804@torchlake.com> <16831194214.20040103184850@cactus.dk> Message-ID: <3FF80895.1090508@torchlake.com> Hi again Gustav, I ended up keeping the button to just launch Word. I created a little macro in Word to open the acknowledgement form letter, which already looks for its data source as the tblAcknowledgePay in the TLA database. My user has only to click to merge the document, and there are her acknowledgement letters! It all looks much more spiffy and easy now than what she was doing - seriously. It used to be advisable to close Access before launching Word and loading a document to merge data from a database - (A95, A97) since Word would open an instance of Access as part of the merge process, and having two copies of Access open at one time placed heavy demands on the system resources. That no longer appears to be the case. I'm delighted. However, during my work on this little modification, from time to time Word would fail to find the data source with which it has been linked forever and functionality would disappear, i.e., the merge toolbar dimmed and no commands worked, Closing the programs and relaunching them fixed that usually. Now that I've finished fiddling with it, just running the queries and launching the merge form document, things are behaving nicely. I did study the Microsoft Automation help file, but the things it suggested weren't recognized from within Access, so I still have some learning to do there. Objects such as wordApp and wordDoc were unrecognized from within Access - worked great from within Word. So there has to be an import statement or something like that to tell Access to look to another library of objects, too. Back to the books! Thanks for your help. I will work on the syntax until the thing does work for me, I can see the situation arising again sometime. Best regards, Tina Gustav Brock wrote: >Hi Tina > >Try with > > Between > [Forms]![fInstructions]![subYourSubformControlName].Form![BeginningDate] > And > [Forms]![fInstructions]![subYourSubformControlName].Form![EndingDate] > >/gustav > > > > >>Hi John, >> >> > > > >>Thanks for the reply. I think I have not been completely clear about my >>quandary. The parameter query selects records based on the following: >> >> > > > >>Between [Forms]![fCalendar]![BeginningDate] And >>[Forms]![fCalendar]![EndingDate] >> >> > > > >>- which works fine as long as one sets the dates by opening fCalendar as >>a stand-alone form. >> >> > > > >>I made a form with a series of instructions, hoping to guide my user >>from step to step without having to remind the user to set the dates >>first in the fCalendar - >>the idea was to embed an instance of the fCalendar in the instruction >>form - set the dates right here in what is now a subform of the >>instruction form. >> >> > > > >>If one sets the dates in the embedded instance of fCalendar, the query >>does not find its parameters. Well, say I to myself, I probably need to >>tell the query where to find those date textboxes, but I do not find a >>way to identify them other than as they are already identified . Is >>there a collection other than [Forms] I need to find? When I examine my >>fCalendar through the subform control, I see all the correct textbox >>names - it certainly appears to be the same form - why does setting its >>dates not provide the necessary parameters to the query? I don't see it. >> >> > >_______________________________________________ >AccessD mailing list >AccessD at databaseadvisors.com >http://databaseadvisors.com/mailman/listinfo/accessd >Website: http://www.databaseadvisors.com > > > From andrew.haslett at ilc.gov.au Sun Jan 4 08:01:43 2004 From: andrew.haslett at ilc.gov.au (Haslett, Andrew) Date: Mon, 5 Jan 2004 00:31:43 +1030 Subject: [AccessD] Mac address Message-ID: Hard Disk SN is far better than using the MAC address. Jees, some BIOS these days even allow you to change your MAC address yourself. -----Original Message----- From: John W. Colby [mailto:jwcolby at colbyconsulting.com] Sent: Sunday, 4 January 2004 2:19 PM To: Access Developers discussion and problem solving Subject: RE: [AccessD] Mac address LOL. I learned a long time ago not to sweat the small stuff. If there are hackers figuring out how to hack Microsoft's $100 million copy protection, I am not going to survive a determined attempt to get around my stuff. On the other hand, I assume you lock your front door. And I assume there is glass in the door that anyone who wants in could just smash to reach in and unlock your door. So why do you bother? Because the lock keeps 99% of the people out of your house. 99% is good enough for me. I will not even bat an eyelash nor give a second thought to the other 1%. 99% of the effort COULD be spent stopping (or failing to stop) that last 1%. John W. Colby www.ColbyConsulting.com -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Stuart McLachlan Sent: Saturday, January 03, 2004 7:00 PM To: Access Developers discussion and problem solving Subject: RE: [AccessD] Mac address Take a look at http://www.klcconsulting.net/smac/ for a way to defeat this copy protection scheme. (Follow the link to "the research of Kyle Lai" for a lot of good info on MAC addresses) On 3 Jan 2004 at 13:34, John W. Colby wrote: > Yea, but you have to start somewhere. More and more NICs are embedded right > in the motherboards so this is getting less and less likely. > > John W. Colby > www.ColbyConsulting.com > > -----Original Message----- > From: accessd-bounces at databaseadvisors.com > [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Gustav Brock > Sent: Saturday, January 03, 2004 12:53 PM > To: Access Developers discussion and problem solving > Subject: Re: [AccessD] Mac address > > > Hi John > > Hmm ... so the user changes his/hers NIC and is hosed ..? > > /gustav > > > > Date: 2004-01-03 18:14 > > > Well... I'm looking at a machine specific piece for copy protection. The > > work station name might be specific to a network, but is created by > > the software (or user doing the install) so if the machine went down > > (as many > of > > mine have over the last few years) if the user didn't select the > > same name > > then the key wouldn't work. > -- Lexacorp Ltd http://www.lexacorp.com.pg Information Technology Consultancy, Software Development,System Support. _______________________________________________ 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 IMPORTANT - PLEASE READ ******************** This email and any files transmitted with it are confidential and may contain information protected by law from disclosure. If you have received this message in error, please notify the sender immediately and delete this email from your system. No warranty is given that this email or files, if attached to this email, are free from computer viruses or other defects. They are provided on the basis the user assumes all responsibility for loss, damage or consequence resulting directly or indirectly from their use, whether caused by the negligence of the sender or not. From gustav at cactus.dk Sun Jan 4 08:17:58 2004 From: gustav at cactus.dk (Gustav Brock) Date: Sun, 4 Jan 2004 15:17:58 +0100 Subject: [AccessD] Form as Subform - Query Fails - Why? In-Reply-To: <3FF80895.1090508@torchlake.com> References: <000101c3d1f4$08452340$6501a8c0@papparuff> <3FF6F748.40804@torchlake.com> <16831194214.20040103184850@cactus.dk> <3FF80895.1090508@torchlake.com> Message-ID: <18324968683.20040104151758@cactus.dk> Hi Tina Oops, I'm not the Word guru, sorry - actually, I only touch Word when forced to ... so someone else will have to help you. Or look up the archive - I faintly recall several threads on Word automation and/or mail merge and Access. /gustav From jwcolby at colbyconsulting.com Sun Jan 4 10:52:31 2004 From: jwcolby at colbyconsulting.com (John W. Colby) Date: Sun, 4 Jan 2004 11:52:31 -0500 Subject: [AccessD] Mac address In-Reply-To: Message-ID: And how does that make the disk sn better. That DOES change with every format (and every new HD). When was the last time YOU changed your MAC address? As form myself, I've NEVER done so. When was the last YOU formatted (or replaced) your hard disk? As for myself, at LEAST half dozen times over 4 systems just in the last 4 or 5 years. Hmmm.... Never or 1/2 dozen times... John W. Colby www.ColbyConsulting.com -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Haslett, Andrew Sent: Sunday, January 04, 2004 9:02 AM To: 'Access Developers discussion and problem solving' Subject: RE: [AccessD] Mac address Hard Disk SN is far better than using the MAC address. Jees, some BIOS these days even allow you to change your MAC address yourself. -----Original Message----- From: John W. Colby [mailto:jwcolby at colbyconsulting.com] Sent: Sunday, 4 January 2004 2:19 PM To: Access Developers discussion and problem solving Subject: RE: [AccessD] Mac address LOL. I learned a long time ago not to sweat the small stuff. If there are hackers figuring out how to hack Microsoft's $100 million copy protection, I am not going to survive a determined attempt to get around my stuff. On the other hand, I assume you lock your front door. And I assume there is glass in the door that anyone who wants in could just smash to reach in and unlock your door. So why do you bother? Because the lock keeps 99% of the people out of your house. 99% is good enough for me. I will not even bat an eyelash nor give a second thought to the other 1%. 99% of the effort COULD be spent stopping (or failing to stop) that last 1%. John W. Colby www.ColbyConsulting.com -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Stuart McLachlan Sent: Saturday, January 03, 2004 7:00 PM To: Access Developers discussion and problem solving Subject: RE: [AccessD] Mac address Take a look at http://www.klcconsulting.net/smac/ for a way to defeat this copy protection scheme. (Follow the link to "the research of Kyle Lai" for a lot of good info on MAC addresses) On 3 Jan 2004 at 13:34, John W. Colby wrote: > Yea, but you have to start somewhere. More and more NICs are embedded right > in the motherboards so this is getting less and less likely. > > John W. Colby > www.ColbyConsulting.com > > -----Original Message----- > From: accessd-bounces at databaseadvisors.com > [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Gustav Brock > Sent: Saturday, January 03, 2004 12:53 PM > To: Access Developers discussion and problem solving > Subject: Re: [AccessD] Mac address > > > Hi John > > Hmm ... so the user changes his/hers NIC and is hosed ..? > > /gustav > > > > Date: 2004-01-03 18:14 > > > Well... I'm looking at a machine specific piece for copy protection. The > > work station name might be specific to a network, but is created by > > the software (or user doing the install) so if the machine went down > > (as many > of > > mine have over the last few years) if the user didn't select the > > same name > > then the key wouldn't work. > -- Lexacorp Ltd http://www.lexacorp.com.pg Information Technology Consultancy, Software Development,System Support. _______________________________________________ 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 IMPORTANT - PLEASE READ ******************** This email and any files transmitted with it are confidential and may contain information protected by law from disclosure. If you have received this message in error, please notify the sender immediately and delete this email from your system. No warranty is given that this email or files, if attached to this email, are free from computer viruses or other defects. They are provided on the basis the user assumes all responsibility for loss, damage or consequence resulting directly or indirectly from their use, whether caused by the negligence of the sender or not. _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From Developer at UltraDNT.com Sun Jan 4 11:06:02 2004 From: Developer at UltraDNT.com (Developer) Date: Sun, 4 Jan 2004 12:06:02 -0500 Subject: [AccessD] Form as Subform - Query Fails - Why? In-Reply-To: <3FF80895.1090508@torchlake.com> Message-ID: <000a01c3d2e5$08d311e0$7001a8c0@COA3> Tina: Your automation code was not recognized because, as I recall from an earlier post, your Access button was using the CreateObject method to open Word. This is the "late binding" approach, and is useful because it is version indepenedent. You have to add a reference in a module under Project/References to the version of Word you are using to get intellisense and recognizable constants. I posted earlier about this, also, concerning Access to Word MailMerge ... Basically, my preferred method is to have a form that takes the input parameters from the user, generate a recordset from their parameters, loop the recordset and write the data to a .CSV file (I always use "c:\temp\rpt.csv"), and then merge that to a .DOT. All the Word DOT's for my app are stored in the same folder as the BE .mdb, so I can dynamically generate a list box of available DOTs at run-time, and all look for "c:\temp\rpt.csv". This avoids that "toolbar" issue (which I have seen too many times) and as a CSV, the data is also "Excel-ready", so I can use the same code, and then open Excel instead of mail merging to Word. This method also lets the user develop new merge letters, without changing the application. Hth, Steve -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Tina Norris Fields Sent: Sunday, January 04, 2004 7:36 AM To: Access Developers discussion and problem solving Subject: Re: [AccessD] Form as Subform - Query Fails - Why? Hi again Gustav, I ended up keeping the button to just launch Word. I created a little macro in Word to open the acknowledgement form letter, which already looks for its data source as the tblAcknowledgePay in the TLA database. My user has only to click to merge the document, and there are her acknowledgement letters! It all looks much more spiffy and easy now than what she was doing - seriously. It used to be advisable to close Access before launching Word and loading a document to merge data from a database - (A95, A97) since Word would open an instance of Access as part of the merge process, and having two copies of Access open at one time placed heavy demands on the system resources. That no longer appears to be the case. I'm delighted. However, during my work on this little modification, from time to time Word would fail to find the data source with which it has been linked forever and functionality would disappear, i.e., the merge toolbar dimmed and no commands worked, Closing the programs and relaunching them fixed that usually. Now that I've finished fiddling with it, just running the queries and launching the merge form document, things are behaving nicely. I did study the Microsoft Automation help file, but the things it suggested weren't recognized from within Access, so I still have some learning to do there. Objects such as wordApp and wordDoc were unrecognized from within Access - worked great from within Word. So there has to be an import statement or something like that to tell Access to look to another library of objects, too. Back to the books! Thanks for your help. I will work on the syntax until the thing does work for me, I can see the situation arising again sometime. Best regards, Tina Gustav Brock wrote: >Hi Tina > >Try with > > Between > > [Forms]![fInstructions]![subYourSubformControlName].Form![BeginningDate] > And > [Forms]![fInstructions]![subYourSubformControlName].Form![EndingDate] > >/gustav > > > > >>Hi John, >> >> > > > >>Thanks for the reply. I think I have not been completely clear about >>my >>quandary. The parameter query selects records based on the following: >> >> > > > >>Between [Forms]![fCalendar]![BeginningDate] And >>[Forms]![fCalendar]![EndingDate] >> >> > > > >>- which works fine as long as one sets the dates by opening fCalendar >>as >>a stand-alone form. >> >> > > > >>I made a form with a series of instructions, hoping to guide my user >>from step to step without having to remind the user to set the dates >>first in the fCalendar - >>the idea was to embed an instance of the fCalendar in the instruction >>form - set the dates right here in what is now a subform of the >>instruction form. >> >> > > > >>If one sets the dates in the embedded instance of fCalendar, the query >>does not find its parameters. Well, say I to myself, I probably need to >>tell the query where to find those date textboxes, but I do not find a >>way to identify them other than as they are already identified . Is >>there a collection other than [Forms] I need to find? When I examine my >>fCalendar through the subform control, I see all the correct textbox >>names - it certainly appears to be the same form - why does setting its >>dates not provide the necessary parameters to the query? I don't see it. >> >> > >_______________________________________________ >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 From jimdettman at earthlink.net Sun Jan 4 11:57:11 2004 From: jimdettman at earthlink.net (Jim Dettman) Date: Sun, 4 Jan 2004 12:57:11 -0500 Subject: [AccessD] Mac address In-Reply-To: Message-ID: I would agree. A MAC address is usually a lot more stable then a HD serial number. I wasn't aware though that a spoof utility was out there. Looks like the code will need to dig a little deeper and get the actual hardware address. BTW I'm not sure why that code I sent you returned 0.0.0.0. did the same thing here on Win98SE. It's never failed before, but then it's been a few years since I used it. I looked it over real quick and I see it's making a NetBIOS call, which the success of might be dependant on the protocols loaded. Jim Dettman President, Online Computer Services of WNY, Inc. (315) 699-3443 jimdettman at earthlink.net -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of John W. Colby Sent: Sunday, January 04, 2004 11:53 AM To: Access Developers discussion and problem solving Subject: RE: [AccessD] Mac address And how does that make the disk sn better. That DOES change with every format (and every new HD). When was the last time YOU changed your MAC address? As form myself, I've NEVER done so. When was the last YOU formatted (or replaced) your hard disk? As for myself, at LEAST half dozen times over 4 systems just in the last 4 or 5 years. Hmmm.... Never or 1/2 dozen times... John W. Colby www.ColbyConsulting.com -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Haslett, Andrew Sent: Sunday, January 04, 2004 9:02 AM To: 'Access Developers discussion and problem solving' Subject: RE: [AccessD] Mac address Hard Disk SN is far better than using the MAC address. Jees, some BIOS these days even allow you to change your MAC address yourself. -----Original Message----- From: John W. Colby [mailto:jwcolby at colbyconsulting.com] Sent: Sunday, 4 January 2004 2:19 PM To: Access Developers discussion and problem solving Subject: RE: [AccessD] Mac address LOL. I learned a long time ago not to sweat the small stuff. If there are hackers figuring out how to hack Microsoft's $100 million copy protection, I am not going to survive a determined attempt to get around my stuff. On the other hand, I assume you lock your front door. And I assume there is glass in the door that anyone who wants in could just smash to reach in and unlock your door. So why do you bother? Because the lock keeps 99% of the people out of your house. 99% is good enough for me. I will not even bat an eyelash nor give a second thought to the other 1%. 99% of the effort COULD be spent stopping (or failing to stop) that last 1%. John W. Colby www.ColbyConsulting.com -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Stuart McLachlan Sent: Saturday, January 03, 2004 7:00 PM To: Access Developers discussion and problem solving Subject: RE: [AccessD] Mac address Take a look at http://www.klcconsulting.net/smac/ for a way to defeat this copy protection scheme. (Follow the link to "the research of Kyle Lai" for a lot of good info on MAC addresses) On 3 Jan 2004 at 13:34, John W. Colby wrote: > Yea, but you have to start somewhere. More and more NICs are embedded right > in the motherboards so this is getting less and less likely. > > John W. Colby > www.ColbyConsulting.com > > -----Original Message----- > From: accessd-bounces at databaseadvisors.com > [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Gustav Brock > Sent: Saturday, January 03, 2004 12:53 PM > To: Access Developers discussion and problem solving > Subject: Re: [AccessD] Mac address > > > Hi John > > Hmm ... so the user changes his/hers NIC and is hosed ..? > > /gustav > > > > Date: 2004-01-03 18:14 > > > Well... I'm looking at a machine specific piece for copy protection. The > > work station name might be specific to a network, but is created by > > the software (or user doing the install) so if the machine went down > > (as many > of > > mine have over the last few years) if the user didn't select the > > same name > > then the key wouldn't work. > -- Lexacorp Ltd http://www.lexacorp.com.pg Information Technology Consultancy, Software Development,System Support. _______________________________________________ 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 IMPORTANT - PLEASE READ ******************** This email and any files transmitted with it are confidential and may contain information protected by law from disclosure. If you have received this message in error, please notify the sender immediately and delete this email from your system. No warranty is given that this email or files, if attached to this email, are free from computer viruses or other defects. They are provided on the basis the user assumes all responsibility for loss, damage or consequence resulting directly or indirectly from their use, whether caused by the negligence of the sender or not. _______________________________________________ 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 From Erwin.Craps at ithelps.be Sun Jan 4 14:45:07 2004 From: Erwin.Craps at ithelps.be (Erwin Craps - IT Helps) Date: Sun, 4 Jan 2004 21:45:07 +0100 Subject: [AccessD] Mac address Message-ID: <46B976F2B698FF46A4FE7636509B22DF03D076@stekelbes.ithelps.local> This 0.0.0.0 could result from having multiple nic's in your pc. If you have a PPP connector you would receive a MAC address from that to, but when not connected this would be 0 I'm not compleetly sure of this but a PPP dial adapter is a nic to. And it could be wrongly set to the first nic in the binding. What I wanna say is that you would need to itterate trough the list of all nic's and verify which mac address you want to use. 2 or 3 nic's per pc are not uncommon. For example . 1x NIC 1x PPP modem dial 1x PPPoE ADSL modem If you wanna verify just type ipconfig /ALL in a dos window in NT/2K/XP, the result is a complete list of all adapters AND MAC address. Type winipcfg in W9X, you get a form where you can chose from the multiple nic's and see there MAC address. Erwin -----Oorspronkelijk bericht----- Van: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] Namens Jim Dettman Verzonden: zondag 4 januari 2004 18:57 Aan: Access Developers discussion and problem solving Onderwerp: RE: [AccessD] Mac address I would agree. A MAC address is usually a lot more stable then a HD serial number. I wasn't aware though that a spoof utility was out there. Looks like the code will need to dig a little deeper and get the actual hardware address. BTW I'm not sure why that code I sent you returned 0.0.0.0. did the same thing here on Win98SE. It's never failed before, but then it's been a few years since I used it. I looked it over real quick and I see it's making a NetBIOS call, which the success of might be dependant on the protocols loaded. Jim Dettman President, Online Computer Services of WNY, Inc. (315) 699-3443 jimdettman at earthlink.net -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of John W. Colby Sent: Sunday, January 04, 2004 11:53 AM To: Access Developers discussion and problem solving Subject: RE: [AccessD] Mac address And how does that make the disk sn better. That DOES change with every format (and every new HD). When was the last time YOU changed your MAC address? As form myself, I've NEVER done so. When was the last YOU formatted (or replaced) your hard disk? As for myself, at LEAST half dozen times over 4 systems just in the last 4 or 5 years. Hmmm.... Never or 1/2 dozen times... John W. Colby www.ColbyConsulting.com -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Haslett, Andrew Sent: Sunday, January 04, 2004 9:02 AM To: 'Access Developers discussion and problem solving' Subject: RE: [AccessD] Mac address Hard Disk SN is far better than using the MAC address. Jees, some BIOS these days even allow you to change your MAC address yourself. -----Original Message----- From: John W. Colby [mailto:jwcolby at colbyconsulting.com] Sent: Sunday, 4 January 2004 2:19 PM To: Access Developers discussion and problem solving Subject: RE: [AccessD] Mac address LOL. I learned a long time ago not to sweat the small stuff. If there are hackers figuring out how to hack Microsoft's $100 million copy protection, I am not going to survive a determined attempt to get around my stuff. On the other hand, I assume you lock your front door. And I assume there is glass in the door that anyone who wants in could just smash to reach in and unlock your door. So why do you bother? Because the lock keeps 99% of the people out of your house. 99% is good enough for me. I will not even bat an eyelash nor give a second thought to the other 1%. 99% of the effort COULD be spent stopping (or failing to stop) that last 1%. John W. Colby www.ColbyConsulting.com -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Stuart McLachlan Sent: Saturday, January 03, 2004 7:00 PM To: Access Developers discussion and problem solving Subject: RE: [AccessD] Mac address Take a look at http://www.klcconsulting.net/smac/ for a way to defeat this copy protection scheme. (Follow the link to "the research of Kyle Lai" for a lot of good info on MAC addresses) On 3 Jan 2004 at 13:34, John W. Colby wrote: > Yea, but you have to start somewhere. More and more NICs are embedded right > in the motherboards so this is getting less and less likely. > > John W. Colby > www.ColbyConsulting.com > > -----Original Message----- > From: accessd-bounces at databaseadvisors.com > [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Gustav Brock > Sent: Saturday, January 03, 2004 12:53 PM > To: Access Developers discussion and problem solving > Subject: Re: [AccessD] Mac address > > > Hi John > > Hmm ... so the user changes his/hers NIC and is hosed ..? > > /gustav > > > > Date: 2004-01-03 18:14 > > > Well... I'm looking at a machine specific piece for copy protection. The > > work station name might be specific to a network, but is created by > > the software (or user doing the install) so if the machine went down > > (as many > of > > mine have over the last few years) if the user didn't select the > > same name > > then the key wouldn't work. > -- Lexacorp Ltd http://www.lexacorp.com.pg Information Technology Consultancy, Software Development,System Support. _______________________________________________ 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 IMPORTANT - PLEASE READ ******************** This email and any files transmitted with it are confidential and may contain information protected by law from disclosure. If you have received this message in error, please notify the sender immediately and delete this email from your system. No warranty is given that this email or files, if attached to this email, are free from computer viruses or other defects. They are provided on the basis the user assumes all responsibility for loss, damage or consequence resulting directly or indirectly from their use, whether caused by the negligence of the sender or not. _______________________________________________ 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 _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From jwcolby at colbyconsulting.com Sun Jan 4 15:16:13 2004 From: jwcolby at colbyconsulting.com (John W. Colby) Date: Sun, 4 Jan 2004 16:16:13 -0500 Subject: [AccessD] Mac address In-Reply-To: Message-ID: Yep, I think it's exactly that - the protocols loaded. John W. Colby www.ColbyConsulting.com -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Jim Dettman Sent: Sunday, January 04, 2004 12:57 PM To: Access Developers discussion and problem solving Subject: RE: [AccessD] Mac address I would agree. A MAC address is usually a lot more stable then a HD serial number. I wasn't aware though that a spoof utility was out there. Looks like the code will need to dig a little deeper and get the actual hardware address. BTW I'm not sure why that code I sent you returned 0.0.0.0. did the same thing here on Win98SE. It's never failed before, but then it's been a few years since I used it. I looked it over real quick and I see it's making a NetBIOS call, which the success of might be dependant on the protocols loaded. Jim Dettman President, Online Computer Services of WNY, Inc. (315) 699-3443 jimdettman at earthlink.net -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of John W. Colby Sent: Sunday, January 04, 2004 11:53 AM To: Access Developers discussion and problem solving Subject: RE: [AccessD] Mac address And how does that make the disk sn better. That DOES change with every format (and every new HD). When was the last time YOU changed your MAC address? As form myself, I've NEVER done so. When was the last YOU formatted (or replaced) your hard disk? As for myself, at LEAST half dozen times over 4 systems just in the last 4 or 5 years. Hmmm.... Never or 1/2 dozen times... John W. Colby www.ColbyConsulting.com -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Haslett, Andrew Sent: Sunday, January 04, 2004 9:02 AM To: 'Access Developers discussion and problem solving' Subject: RE: [AccessD] Mac address Hard Disk SN is far better than using the MAC address. Jees, some BIOS these days even allow you to change your MAC address yourself. -----Original Message----- From: John W. Colby [mailto:jwcolby at colbyconsulting.com] Sent: Sunday, 4 January 2004 2:19 PM To: Access Developers discussion and problem solving Subject: RE: [AccessD] Mac address LOL. I learned a long time ago not to sweat the small stuff. If there are hackers figuring out how to hack Microsoft's $100 million copy protection, I am not going to survive a determined attempt to get around my stuff. On the other hand, I assume you lock your front door. And I assume there is glass in the door that anyone who wants in could just smash to reach in and unlock your door. So why do you bother? Because the lock keeps 99% of the people out of your house. 99% is good enough for me. I will not even bat an eyelash nor give a second thought to the other 1%. 99% of the effort COULD be spent stopping (or failing to stop) that last 1%. John W. Colby www.ColbyConsulting.com -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Stuart McLachlan Sent: Saturday, January 03, 2004 7:00 PM To: Access Developers discussion and problem solving Subject: RE: [AccessD] Mac address Take a look at http://www.klcconsulting.net/smac/ for a way to defeat this copy protection scheme. (Follow the link to "the research of Kyle Lai" for a lot of good info on MAC addresses) On 3 Jan 2004 at 13:34, John W. Colby wrote: > Yea, but you have to start somewhere. More and more NICs are embedded right > in the motherboards so this is getting less and less likely. > > John W. Colby > www.ColbyConsulting.com > > -----Original Message----- > From: accessd-bounces at databaseadvisors.com > [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Gustav Brock > Sent: Saturday, January 03, 2004 12:53 PM > To: Access Developers discussion and problem solving > Subject: Re: [AccessD] Mac address > > > Hi John > > Hmm ... so the user changes his/hers NIC and is hosed ..? > > /gustav > > > > Date: 2004-01-03 18:14 > > > Well... I'm looking at a machine specific piece for copy protection. The > > work station name might be specific to a network, but is created by > > the software (or user doing the install) so if the machine went down > > (as many > of > > mine have over the last few years) if the user didn't select the > > same name > > then the key wouldn't work. > -- Lexacorp Ltd http://www.lexacorp.com.pg Information Technology Consultancy, Software Development,System Support. _______________________________________________ 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 IMPORTANT - PLEASE READ ******************** This email and any files transmitted with it are confidential and may contain information protected by law from disclosure. If you have received this message in error, please notify the sender immediately and delete this email from your system. No warranty is given that this email or files, if attached to this email, are free from computer viruses or other defects. They are provided on the basis the user assumes all responsibility for loss, damage or consequence resulting directly or indirectly from their use, whether caused by the negligence of the sender or not. _______________________________________________ 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 _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From john at winhaven.net Sun Jan 4 17:43:09 2004 From: john at winhaven.net (John Bartow) Date: Sun, 4 Jan 2004 17:43:09 -0600 Subject: [AccessD] Mac address In-Reply-To: Message-ID: I was just wondering why the Main Circuit Board Serial Number isn't used for this. It would seem to me that this would be about the most stable unique ID number in a PC. I have no idea how you would read this number but it always shows up in my hardware asset inventories. Any comments? John B. > -----Original Message----- > From: accessd-bounces at databaseadvisors.com > [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of John W. Colby > Sent: Sunday, January 04, 2004 10:53 AM > To: Access Developers discussion and problem solving > Subject: RE: [AccessD] Mac address > > > And how does that make the disk sn better. That DOES change with every > format (and every new HD). When was the last time YOU changed your MAC > address? As form myself, I've NEVER done so. When was the last YOU > formatted (or replaced) your hard disk? As for myself, at LEAST > half dozen > times over 4 systems just in the last 4 or 5 years. > > Hmmm.... Never or 1/2 dozen times... > > John W. Colby > www.ColbyConsulting.com > > -----Original Message----- > From: accessd-bounces at databaseadvisors.com > [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Haslett, > Andrew > Sent: Sunday, January 04, 2004 9:02 AM > To: 'Access Developers discussion and problem solving' > Subject: RE: [AccessD] Mac address > > > Hard Disk SN is far better than using the MAC address. Jees, some BIOS > these days even allow you to change your MAC address yourself. > > -----Original Message----- > From: John W. Colby [mailto:jwcolby at colbyconsulting.com] > Sent: Sunday, 4 January 2004 2:19 PM > To: Access Developers discussion and problem solving > Subject: RE: [AccessD] Mac address > > LOL. I learned a long time ago not to sweat the small stuff. If > there are > hackers figuring out how to hack Microsoft's $100 million copy > protection, I > am not going to survive a determined attempt to get around my stuff. > > On the other hand, I assume you lock your front door. And I > assume there is > glass in the door that anyone who wants in could just smash to > reach in and > unlock your door. So why do you bother? Because the lock keeps > 99% of the > people out of your house. > > 99% is good enough for me. I will not even bat an eyelash nor > give a second > thought to the other 1%. > > 99% of the effort COULD be spent stopping (or failing to stop) > that last 1%. > > John W. Colby > www.ColbyConsulting.com > > -----Original Message----- > From: accessd-bounces at databaseadvisors.com > [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Stuart McLachlan > Sent: Saturday, January 03, 2004 7:00 PM > To: Access Developers discussion and problem solving > Subject: RE: [AccessD] Mac address > > > Take a look at http://www.klcconsulting.net/smac/ > for a way to defeat this copy protection scheme. > > (Follow the link to "the research of Kyle Lai" for a lot of good > info on MAC > addresses) > > > On 3 Jan 2004 at 13:34, John W. Colby wrote: > > > Yea, but you have to start somewhere. More and more NICs are embedded > right > > in the motherboards so this is getting less and less likely. > > > > John W. Colby > > www.ColbyConsulting.com > > > > -----Original Message----- > > From: accessd-bounces at databaseadvisors.com > > [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Gustav Brock > > Sent: Saturday, January 03, 2004 12:53 PM > > To: Access Developers discussion and problem solving > > Subject: Re: [AccessD] Mac address > > > > > > Hi John > > > > Hmm ... so the user changes his/hers NIC and is hosed ..? > > > > /gustav > > > > > > > Date: 2004-01-03 18:14 > > > > > Well... I'm looking at a machine specific piece for copy protection. > The > > > work station name might be specific to a network, but is created by > > > the software (or user doing the install) so if the machine went down > > > (as > many > > of > > > mine have over the last few years) if the user didn't select the > > > same > name > > > then the key wouldn't work. > > > > -- > Lexacorp Ltd > http://www.lexacorp.com.pg > Information Technology Consultancy, Software Development,System Support. > > > > _______________________________________________ > 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 > > IMPORTANT - PLEASE READ ******************** > This email and any files transmitted with it are confidential and may > contain information protected by law from disclosure. > If you have received this message in error, please notify the sender > immediately and delete this email from your system. > No warranty is given that this email or files, if attached to this > email, are free from computer viruses or other defects. They > are provided on the basis the user assumes all responsibility for > loss, damage or consequence resulting directly or indirectly from > their use, whether caused by the negligence of the sender or not. > _______________________________________________ > 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 > > From stuart at lexacorp.com.pg Sun Jan 4 18:40:11 2004 From: stuart at lexacorp.com.pg (Stuart McLachlan) Date: Mon, 05 Jan 2004 10:40:11 +1000 Subject: [AccessD] Mac address In-Reply-To: References: Message-ID: <3FF93F0B.19244.9A4103@localhost> On 4 Jan 2004 at 17:43, John Bartow wrote: > I was just wondering why the Main Circuit Board Serial Number isn't used for > this. It would seem to me that this would be about the most stable unique ID > number in a PC. I have no idea how you would read this number but it always > shows up in my hardware asset inventories. > > Any comments? Public Function MBSerialNumber() As String 'RETRIEVES SERIAL NUMBER OF MOTHERBOARD 'IF THERE IS MORE THAN ONE MOTHERBOARD, THE SERIAL 'NUMBERS WILL BE DELIMITED BY COMMAS 'YOU MUST HAVE WMI INSTALLED AND A REFERENCE TO 'Microsoft WMI Scripting Library IS REQUIRED Dim objs As Object Dim obj As Object Dim WMI As Object Dim sAns As String Set WMI = GetObject("WinMgmts:") Set objs = WMI.InstancesOf("Win32_BaseBoard") For Each obj In objs sAns = sAns & obj.SerialNumber If sAns < objs.Count Then sAns = sAns & "," Next MBSerialNumber = sAns End Function -- Lexacorp Ltd http://www.lexacorp.com.pg Information Technology Consultancy, Software Development,System Support. From actebs at actebs.com.au Sun Jan 4 23:46:30 2004 From: actebs at actebs.com.au (ACTEBS) Date: Mon, 5 Jan 2004 16:46:30 +1100 Subject: [AccessD] MDE to MDB Message-ID: <005501c3d34f$47e912c0$0c05a8c0@carlton.local> Guys, Is there any method of converting an MDE to an MDB? I have a client who employed a developer to create an application for their organisation. The developer has now disappeared and the app has started to experience problems accessing some forms - it just hangs. I obviously can't fix the problem if I can't get to the forms to have a look at what might be causing the issue. The app is a A2K MDE running under a AXP environment - I was surprised that it would even run as I thought AXP would only run an AXP MDE - learn something everyday. They have been running the app just fine for months and this has just reared it ugly head. Hope someone can point me in the right direction. I have searched the archives but no help there... Thanks Vlad From mastercafe at ctv.es Mon Jan 5 00:09:16 2004 From: mastercafe at ctv.es (MastercafeCTV) Date: Mon, 5 Jan 2004 07:09:16 +0100 Subject: [AccessD] Mac address In-Reply-To: <3FF93F0B.19244.9A4103@localhost> Message-ID: <000a01c3d352$73e592b0$69fa2250@servercafe> We check this function and can't obtain any serial from the mainboard. The AXP check ok for compiling but return only " ," (two character) Do you know why?? We use the serial HDD control to check the computer, and with this code Set fs = CreateObject("Scripting.filesystemobject") Set d = fs.getdrive(fs.getdrivename(fs.getabsolutepathname("C:"))) HDD = d.SerialNumber The lenght can be 6 or more characters Juan Menendez Mastercafe =========================================== MASTERCAFE SL - NIF B-82.617.614 www.mastercafe.com Deleg. Asturias Tel 985.88.49.44 / 627.531.764 Fax 627.500.205 info at mastercafe.com juan at mastercafe.com Deleg. Madrid Tel 627.474.285 cecilia at mastercafe.com =========================================== -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Stuart McLachlan Sent: lunes, 05 de enero de 2004 1:40 To: Access Developers discussion and problem solving Subject: RE: [AccessD] Mac address On 4 Jan 2004 at 17:43, John Bartow wrote: > I was just wondering why the Main Circuit Board Serial Number isn't > used for this. It would seem to me that this would be about the most > stable unique ID number in a PC. I have no idea how you would read > this number but it always shows up in my hardware asset inventories. > > Any comments? Public Function MBSerialNumber() As String 'RETRIEVES SERIAL NUMBER OF MOTHERBOARD 'IF THERE IS MORE THAN ONE MOTHERBOARD, THE SERIAL 'NUMBERS WILL BE DELIMITED BY COMMAS 'YOU MUST HAVE WMI INSTALLED AND A REFERENCE TO 'Microsoft WMI Scripting Library IS REQUIRED Dim objs As Object Dim obj As Object Dim WMI As Object Dim sAns As String Set WMI = GetObject("WinMgmts:") Set objs = WMI.InstancesOf("Win32_BaseBoard") For Each obj In objs sAns = sAns & obj.SerialNumber If sAns < objs.Count Then sAns = sAns & "," Next MBSerialNumber = sAns End Function -- Lexacorp Ltd http://www.lexacorp.com.pg Information Technology Consultancy, Software Development,System Support. _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From mastercafe at ctv.es Mon Jan 5 00:12:34 2004 From: mastercafe at ctv.es (MastercafeCTV) Date: Mon, 5 Jan 2004 07:12:34 +0100 Subject: [AccessD] MDE to MDB In-Reply-To: <005501c3d34f$47e912c0$0c05a8c0@carlton.local> Message-ID: <000b01c3d352$e91f56b0$69fa2250@servercafe> Sorry but we don't know and all articles over MDE to MDB conversion indicate that actually is imposible. Normally we take MDB programs with many comments of every developer who work with us, because in the future you could be many problems. Juan Menendez =========================================== MASTERCAFE SL - NIF B-82.617.614 www.mastercafe.com Deleg. Asturias Tel 985.88.49.44 / 627.531.764 Fax 627.500.205 info at mastercafe.com juan at mastercafe.com Deleg. Madrid Tel 627.474.285 cecilia at mastercafe.com =========================================== -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of ACTEBS Sent: lunes, 05 de enero de 2004 6:47 To: access group Subject: [AccessD] MDE to MDB Guys, Is there any method of converting an MDE to an MDB? I have a client who employed a developer to create an application for their organisation. The developer has now disappeared and the app has started to experience problems accessing some forms - it just hangs. I obviously can't fix the problem if I can't get to the forms to have a look at what might be causing the issue. The app is a A2K MDE running under a AXP environment - I was surprised that it would even run as I thought AXP would only run an AXP MDE - learn something everyday. They have been running the app just fine for months and this has just reared it ugly head. Hope someone can point me in the right direction. I have searched the archives but no help there... Thanks Vlad _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From mastercafe at ctv.es Mon Jan 5 00:36:46 2004 From: mastercafe at ctv.es (MastercafeCTV) Date: Mon, 5 Jan 2004 07:36:46 +0100 Subject: [AccessD] Taking Controls from another MDB In-Reply-To: <000a01c3d352$73e592b0$69fa2250@servercafe> Message-ID: <000301c3d356$4ac4b740$69fa2250@servercafe> Hi group we are trying to take all reports from another MDB, we use the next code to see our Reports/Tables/Forms, but how to change Application.CurrentProject for c:\MyApp\Sample.MDB?? Function CtlLista(TIPO As String) On Error GoTo ctlerror Dim obj As AccessObject, dbs As Object Set dbs = Application.CurrentProject Dim I As Integer Dim frm As Form Dim valores As String valores = "" Select Case TIPO Case "F" For Each obj In dbs.AllForms If valores = "" Then valores = valores & obj.Name Else valores = valores & ";" & obj.Name End If Next obj Case "R" For Each obj In dbs.AllReports If valores = "" Then valores = valores & obj.Name Else valores = valores & ";" & obj.Name End If Next obj Case "T" For Each obj In dbs.AllTables If valores = "" Then valores = valores & obj.Name Else valores = valores & ";" & obj.Name End If Next obj Etc........... Thanks Juan Menendez =========================================== MASTERCAFE SL - NIF B-82.617.614 www.mastercafe.com Deleg. Asturias Tel 985.88.49.44 / 627.531.764 Fax 627.500.205 info at mastercafe.com juan at mastercafe.com Deleg. Madrid Tel 627.474.285 cecilia at mastercafe.com =========================================== -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of MastercafeCTV Sent: lunes, 05 de enero de 2004 7:09 To: 'Access Developers discussion and problem solving' Subject: RE: [AccessD] Mac address We check this function and can't obtain any serial from the mainboard. The AXP check ok for compiling but return only " ," (two character) Do you know why?? We use the serial HDD control to check the computer, and with this code Set fs = CreateObject("Scripting.filesystemobject") Set d = fs.getdrive(fs.getdrivename(fs.getabsolutepathname("C:"))) HDD = d.SerialNumber The lenght can be 6 or more characters Juan Menendez Mastercafe =========================================== MASTERCAFE SL - NIF B-82.617.614 www.mastercafe.com Deleg. Asturias Tel 985.88.49.44 / 627.531.764 Fax 627.500.205 info at mastercafe.com juan at mastercafe.com Deleg. Madrid Tel 627.474.285 cecilia at mastercafe.com =========================================== -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Stuart McLachlan Sent: lunes, 05 de enero de 2004 1:40 To: Access Developers discussion and problem solving Subject: RE: [AccessD] Mac address On 4 Jan 2004 at 17:43, John Bartow wrote: > I was just wondering why the Main Circuit Board Serial Number isn't > used for this. It would seem to me that this would be about the most > stable unique ID number in a PC. I have no idea how you would read > this number but it always shows up in my hardware asset inventories. > > Any comments? Public Function MBSerialNumber() As String 'RETRIEVES SERIAL NUMBER OF MOTHERBOARD 'IF THERE IS MORE THAN ONE MOTHERBOARD, THE SERIAL 'NUMBERS WILL BE DELIMITED BY COMMAS 'YOU MUST HAVE WMI INSTALLED AND A REFERENCE TO 'Microsoft WMI Scripting Library IS REQUIRED Dim objs As Object Dim obj As Object Dim WMI As Object Dim sAns As String Set WMI = GetObject("WinMgmts:") Set objs = WMI.InstancesOf("Win32_BaseBoard") For Each obj In objs sAns = sAns & obj.SerialNumber If sAns < objs.Count Then sAns = sAns & "," Next MBSerialNumber = sAns End Function -- Lexacorp Ltd http://www.lexacorp.com.pg Information Technology Consultancy, Software Development,System Support. _______________________________________________ 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 From DWUTKA at marlow.com Mon Jan 5 02:31:30 2004 From: DWUTKA at marlow.com (DWUTKA at marlow.com) Date: Mon, 5 Jan 2004 02:31:30 -0600 Subject: [AccessD] Mac address Message-ID: <2F8793082E00D4119A1700B0D0216BF8022276DC@main2.marlow.com> It was just a LOT of code...didn't want to put it all in an email (Unzipped). JC, let me know if you want me to send it to you off list. Drew -----Original Message----- From: Bryan Carbonnell [mailto:carbonnb at sympatico.ca] Sent: Saturday, January 03, 2004 9:55 PM To: Access Developers discussion and problem solving Subject: RE: [AccessD] Mac address On 3 Jan 2004 at 14:46, DWUTKA at marlow.com wrote: > I am attaching a VB mod, one of the functions is fGetMACAddress. > Should do what you want. Sorry for the attachment, but it is small. Tsk, tsk tsk Drew. Attachemnts are a no-no on the list. Besides the list software strips everything but plain old text. You will need to resend your VB module to JC directly. -- Bryan Carbonnell - carbonnb at sympatico.ca On the keyboard of life, always keep one finger on the escape key. _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From subs1847 at solution-providers.ie Mon Jan 5 06:13:08 2004 From: subs1847 at solution-providers.ie (Mark L. Breen) Date: Mon, 5 Jan 2004 12:13:08 -0000 Subject: [AccessD] MDBs vs SQL Server References: <426071E0B0A6D311B3C0006008B0AB23AFE249@TAPPEEXCH01> Message-ID: <00e101c3d386$05730bd0$0101a8c0@D8TZHN0J> Hello Bret, I agree with you about the gui tools supplied, and for that reason I never use the Enterprise Manager for development any more, I always use Visual InteDev that comes with VS6.0. It is great for sproc generation also, you can insert and edit the SQL that you inject into the sprocs. Mark ----- Original Message ----- From: "Brett Barabash" To: "'Access Developers discussion and problem solving'" Sent: Monday, December 29, 2003 10:00 PM Subject: RE: [AccessD] MDBs vs SQL Server > 2 all the way for me. > > Given the choice of both DB platforms (which happens to be a luxury I enjoy > at this job), SQL Server almost always wins hands down. About the only time > I use an MDB is for quick 'n' dirty single-user apps. > > There are certainly valid reasons to continue using MDB files (ease of > deployment, price, low maintenance, price, ease of data access, price...). > But for a company that already uses SQL Server 2000 for 75% of its > applications, I can't find a compelling reason to use an MDB file instead. > > The learning curve was fairly easy for me. My biggest gripe was the lack of > good visual query design tools. In this department, Access is light years > ahead of the view designer packaged with Enterprise Manager. > > > -----Original Message----- > From: John W. Colby [mailto:jcolby at colbyconsulting.com] > Sent: Monday, December 22, 2003 7:23 PM > To: AccessD > Subject: [AccessD] MDBs vs SQL Server > > > I'd like to conduct a non-scientific poll to discover what you folks use. > Please pick one of the numbers and respond to the list. > > 1) I use SQL Server for all my data. I wouldn't touch an MDB BE with a 10 > foot pole. > 2) I use SQL Server mostly, but will touch an MDB BE with a 10 foot pole, as > long as I don't have to be responsible for the mess. > 3) I have used SQL Server in at least one actual client system but my bread > and butter is made with MDB BEs. > 4) I am fascinated with the possibilities of SQL server, have looked at it, > perhaps installed it at my office, but just don't have the call for it from > my clients. > 5) What's this here SQL Server thangie? All my database BEs are done with > MDBs. > 6) I prefer to do my data stores in Excel spreadsheets, but if I must an MDB > is at least within my grasp. SQL Server is for them big boys n they won't > talk to me. I would still be using Borland's Reflex if I could get a copy - > now THERE's a REAL MAN'S database!!! > > Just pick a number and put it in the first line of your response. > > As for me, I am a 4. I have SQL Server installed in my office, moved my > billing db to it in order to have a real live in use system using it, and > have regretted it ever since. In fact I yanked the data back out into an > MDB last week after having to rebuild my system twice and then ending up > with torn pages in my SQL Server database. > > John W. Colby > www.ColbyConsulting.com > > > -------------------------------------------------------------------------- ------------------------------------------ > This email and any files transmitted with it are confidential and > intended solely for the use of the individual or entity to whom > they are addressed. > If you have received this email in error please notify the > originator of the message. This footer also confirms that this > email message has been scanned for the presence of computer viruses. > > Any views expressed in this message are those of the individual > sender, except where the sender specifies and with authority, > states them to be the views of Tappe Construction Co. > > Scanning of this message and addition of this footer is performed > by SurfControl E-mail Filter software in conjunction with > virus detection software. > > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com > From Bryan_Carbonnell at cbc.ca Mon Jan 5 07:17:52 2004 From: Bryan_Carbonnell at cbc.ca (Bryan Carbonnell) Date: Mon, 05 Jan 2004 08:17:52 -0500 Subject: [AccessD] Mac address Message-ID: I would suspect that some MoBo's don't support reading the serial number from it. I can't get the S/N from my MoBo in my Dell desktop box either. Bryan Carbonnell bryan_carbonnell at cbc.ca >>> mastercafe at ctv.es 05-Jan-04 1:09:16 AM >>> We check this function and can't obtain any serial from the mainboard. The AXP check ok for compiling but return only " ," (two character) Do you know why?? We use the serial HDD control to check the computer, and with this code Set fs = CreateObject("Scripting.filesystemobject") Set d = fs.getdrive(fs.getdrivename(fs.getabsolutepathname("C:"))) HDD = d.SerialNumber The lenght can be 6 or more characters Juan Menendez Mastercafe =========================================== MASTERCAFE SL - NIF B-82.617.614 www.mastercafe.com Deleg. Asturias Tel 985.88.49.44 / 627.531.764 Fax 627.500.205 info at mastercafe.com juan at mastercafe.com Deleg. Madrid Tel 627.474.285 cecilia at mastercafe.com =========================================== -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Stuart McLachlan Sent: lunes, 05 de enero de 2004 1:40 To: Access Developers discussion and problem solving Subject: RE: [AccessD] Mac address On 4 Jan 2004 at 17:43, John Bartow wrote: > I was just wondering why the Main Circuit Board Serial Number isn't > used for this. It would seem to me that this would be about the most > stable unique ID number in a PC. I have no idea how you would read > this number but it always shows up in my hardware asset inventories. > > Any comments? Public Function MBSerialNumber() As String 'RETRIEVES SERIAL NUMBER OF MOTHERBOARD 'IF THERE IS MORE THAN ONE MOTHERBOARD, THE SERIAL 'NUMBERS WILL BE DELIMITED BY COMMAS 'YOU MUST HAVE WMI INSTALLED AND A REFERENCE TO 'Microsoft WMI Scripting Library IS REQUIRED Dim objs As Object Dim obj As Object Dim WMI As Object Dim sAns As String Set WMI = GetObject("WinMgmts:") Set objs = WMI.InstancesOf("Win32_BaseBoard") For Each obj In objs sAns = sAns & obj.SerialNumber If sAns < objs.Count Then sAns = sAns & "," Next MBSerialNumber = sAns End Function -- Lexacorp Ltd http://www.lexacorp.com.pg Information Technology Consultancy, Software Development,System Support. _______________________________________________ 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 From jimdettman at earthlink.net Mon Jan 5 07:52:36 2004 From: jimdettman at earthlink.net (Jim Dettman) Date: Mon, 5 Jan 2004 08:52:36 -0500 Subject: [AccessD] Mac address In-Reply-To: <46B976F2B698FF46A4FE7636509B22DF03D076@stekelbes.ithelps.local> Message-ID: Erwin, Yes, you nailed it dead on. I checked with winipcfg and I had a dialup adapter on LANA 0 and that's what the code was grabbing. The code I sent John needs to be modified to iterate through the LANA numbers. I did bump into this years ago and had forgotten all about it. Jim Dettman President, Online Computer Services of WNY, Inc. (315) 699-3443 jimdettman at earthlink.net -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Erwin Craps - IT Helps Sent: Sunday, January 04, 2004 3:45 PM To: Access Developers discussion and problem solving Subject: RE: [AccessD] Mac address This 0.0.0.0 could result from having multiple nic's in your pc. If you have a PPP connector you would receive a MAC address from that to, but when not connected this would be 0 I'm not compleetly sure of this but a PPP dial adapter is a nic to. And it could be wrongly set to the first nic in the binding. What I wanna say is that you would need to itterate trough the list of all nic's and verify which mac address you want to use. 2 or 3 nic's per pc are not uncommon. For example . 1x NIC 1x PPP modem dial 1x PPPoE ADSL modem If you wanna verify just type ipconfig /ALL in a dos window in NT/2K/XP, the result is a complete list of all adapters AND MAC address. Type winipcfg in W9X, you get a form where you can chose from the multiple nic's and see there MAC address. Erwin -----Oorspronkelijk bericht----- Van: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] Namens Jim Dettman Verzonden: zondag 4 januari 2004 18:57 Aan: Access Developers discussion and problem solving Onderwerp: RE: [AccessD] Mac address I would agree. A MAC address is usually a lot more stable then a HD serial number. I wasn't aware though that a spoof utility was out there. Looks like the code will need to dig a little deeper and get the actual hardware address. BTW I'm not sure why that code I sent you returned 0.0.0.0. did the same thing here on Win98SE. It's never failed before, but then it's been a few years since I used it. I looked it over real quick and I see it's making a NetBIOS call, which the success of might be dependant on the protocols loaded. Jim Dettman President, Online Computer Services of WNY, Inc. (315) 699-3443 jimdettman at earthlink.net -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of John W. Colby Sent: Sunday, January 04, 2004 11:53 AM To: Access Developers discussion and problem solving Subject: RE: [AccessD] Mac address And how does that make the disk sn better. That DOES change with every format (and every new HD). When was the last time YOU changed your MAC address? As form myself, I've NEVER done so. When was the last YOU formatted (or replaced) your hard disk? As for myself, at LEAST half dozen times over 4 systems just in the last 4 or 5 years. Hmmm.... Never or 1/2 dozen times... John W. Colby www.ColbyConsulting.com -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Haslett, Andrew Sent: Sunday, January 04, 2004 9:02 AM To: 'Access Developers discussion and problem solving' Subject: RE: [AccessD] Mac address Hard Disk SN is far better than using the MAC address. Jees, some BIOS these days even allow you to change your MAC address yourself. -----Original Message----- From: John W. Colby [mailto:jwcolby at colbyconsulting.com] Sent: Sunday, 4 January 2004 2:19 PM To: Access Developers discussion and problem solving Subject: RE: [AccessD] Mac address LOL. I learned a long time ago not to sweat the small stuff. If there are hackers figuring out how to hack Microsoft's $100 million copy protection, I am not going to survive a determined attempt to get around my stuff. On the other hand, I assume you lock your front door. And I assume there is glass in the door that anyone who wants in could just smash to reach in and unlock your door. So why do you bother? Because the lock keeps 99% of the people out of your house. 99% is good enough for me. I will not even bat an eyelash nor give a second thought to the other 1%. 99% of the effort COULD be spent stopping (or failing to stop) that last 1%. John W. Colby www.ColbyConsulting.com -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Stuart McLachlan Sent: Saturday, January 03, 2004 7:00 PM To: Access Developers discussion and problem solving Subject: RE: [AccessD] Mac address Take a look at http://www.klcconsulting.net/smac/ for a way to defeat this copy protection scheme. (Follow the link to "the research of Kyle Lai" for a lot of good info on MAC addresses) On 3 Jan 2004 at 13:34, John W. Colby wrote: > Yea, but you have to start somewhere. More and more NICs are embedded right > in the motherboards so this is getting less and less likely. > > John W. Colby > www.ColbyConsulting.com > > -----Original Message----- > From: accessd-bounces at databaseadvisors.com > [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Gustav Brock > Sent: Saturday, January 03, 2004 12:53 PM > To: Access Developers discussion and problem solving > Subject: Re: [AccessD] Mac address > > > Hi John > > Hmm ... so the user changes his/hers NIC and is hosed ..? > > /gustav > > > > Date: 2004-01-03 18:14 > > > Well... I'm looking at a machine specific piece for copy protection. The > > work station name might be specific to a network, but is created by > > the software (or user doing the install) so if the machine went down > > (as many > of > > mine have over the last few years) if the user didn't select the > > same name > > then the key wouldn't work. > -- Lexacorp Ltd http://www.lexacorp.com.pg Information Technology Consultancy, Software Development,System Support. _______________________________________________ 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 IMPORTANT - PLEASE READ ******************** This email and any files transmitted with it are confidential and may contain information protected by law from disclosure. If you have received this message in error, please notify the sender immediately and delete this email from your system. No warranty is given that this email or files, if attached to this email, are free from computer viruses or other defects. They are provided on the basis the user assumes all responsibility for loss, damage or consequence resulting directly or indirectly from their use, whether caused by the negligence of the sender or not. _______________________________________________ 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 _______________________________________________ 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 From jimdettman at earthlink.net Mon Jan 5 07:55:39 2004 From: jimdettman at earthlink.net (Jim Dettman) Date: Mon, 5 Jan 2004 08:55:39 -0500 Subject: [AccessD] Mac address In-Reply-To: Message-ID: John, Erwin hit the nail right on the head; it's multiple NIC's that are loaded. I had a dial-up adapter on LANA 0, which is what the code was grabbing. As soon as I deleted that, the code I sent you then correctly grabbed my MAC address. If I have a little free time later today, I'll research what it takes to iterate through all the LANA's. This question comes up Experts Exchange quite frequently and from the sounds of things, there is not a good solution out there. Jim Dettman President, Online Computer Services of WNY, Inc. (315) 699-3443 jimdettman at earthlink.net -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of John W. Colby Sent: Sunday, January 04, 2004 4:16 PM To: Access Developers discussion and problem solving Subject: RE: [AccessD] Mac address Yep, I think it's exactly that - the protocols loaded. John W. Colby www.ColbyConsulting.com -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Jim Dettman Sent: Sunday, January 04, 2004 12:57 PM To: Access Developers discussion and problem solving Subject: RE: [AccessD] Mac address I would agree. A MAC address is usually a lot more stable then a HD serial number. I wasn't aware though that a spoof utility was out there. Looks like the code will need to dig a little deeper and get the actual hardware address. BTW I'm not sure why that code I sent you returned 0.0.0.0. did the same thing here on Win98SE. It's never failed before, but then it's been a few years since I used it. I looked it over real quick and I see it's making a NetBIOS call, which the success of might be dependant on the protocols loaded. Jim Dettman President, Online Computer Services of WNY, Inc. (315) 699-3443 jimdettman at earthlink.net -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of John W. Colby Sent: Sunday, January 04, 2004 11:53 AM To: Access Developers discussion and problem solving Subject: RE: [AccessD] Mac address And how does that make the disk sn better. That DOES change with every format (and every new HD). When was the last time YOU changed your MAC address? As form myself, I've NEVER done so. When was the last YOU formatted (or replaced) your hard disk? As for myself, at LEAST half dozen times over 4 systems just in the last 4 or 5 years. Hmmm.... Never or 1/2 dozen times... John W. Colby www.ColbyConsulting.com -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Haslett, Andrew Sent: Sunday, January 04, 2004 9:02 AM To: 'Access Developers discussion and problem solving' Subject: RE: [AccessD] Mac address Hard Disk SN is far better than using the MAC address. Jees, some BIOS these days even allow you to change your MAC address yourself. -----Original Message----- From: John W. Colby [mailto:jwcolby at colbyconsulting.com] Sent: Sunday, 4 January 2004 2:19 PM To: Access Developers discussion and problem solving Subject: RE: [AccessD] Mac address LOL. I learned a long time ago not to sweat the small stuff. If there are hackers figuring out how to hack Microsoft's $100 million copy protection, I am not going to survive a determined attempt to get around my stuff. On the other hand, I assume you lock your front door. And I assume there is glass in the door that anyone who wants in could just smash to reach in and unlock your door. So why do you bother? Because the lock keeps 99% of the people out of your house. 99% is good enough for me. I will not even bat an eyelash nor give a second thought to the other 1%. 99% of the effort COULD be spent stopping (or failing to stop) that last 1%. John W. Colby www.ColbyConsulting.com -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Stuart McLachlan Sent: Saturday, January 03, 2004 7:00 PM To: Access Developers discussion and problem solving Subject: RE: [AccessD] Mac address Take a look at http://www.klcconsulting.net/smac/ for a way to defeat this copy protection scheme. (Follow the link to "the research of Kyle Lai" for a lot of good info on MAC addresses) On 3 Jan 2004 at 13:34, John W. Colby wrote: > Yea, but you have to start somewhere. More and more NICs are embedded right > in the motherboards so this is getting less and less likely. > > John W. Colby > www.ColbyConsulting.com > > -----Original Message----- > From: accessd-bounces at databaseadvisors.com > [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Gustav Brock > Sent: Saturday, January 03, 2004 12:53 PM > To: Access Developers discussion and problem solving > Subject: Re: [AccessD] Mac address > > > Hi John > > Hmm ... so the user changes his/hers NIC and is hosed ..? > > /gustav > > > > Date: 2004-01-03 18:14 > > > Well... I'm looking at a machine specific piece for copy protection. The > > work station name might be specific to a network, but is created by > > the software (or user doing the install) so if the machine went down > > (as many > of > > mine have over the last few years) if the user didn't select the > > same name > > then the key wouldn't work. > -- Lexacorp Ltd http://www.lexacorp.com.pg Information Technology Consultancy, Software Development,System Support. _______________________________________________ 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 IMPORTANT - PLEASE READ ******************** This email and any files transmitted with it are confidential and may contain information protected by law from disclosure. If you have received this message in error, please notify the sender immediately and delete this email from your system. No warranty is given that this email or files, if attached to this email, are free from computer viruses or other defects. They are provided on the basis the user assumes all responsibility for loss, damage or consequence resulting directly or indirectly from their use, whether caused by the negligence of the sender or not. _______________________________________________ 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 _______________________________________________ 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 From jimdettman at earthlink.net Mon Jan 5 07:57:59 2004 From: jimdettman at earthlink.net (Jim Dettman) Date: Mon, 5 Jan 2004 08:57:59 -0500 Subject: [AccessD] MDE to MDB In-Reply-To: <005501c3d34f$47e912c0$0c05a8c0@carlton.local> Message-ID: Vlad, Technically it is possible, but no one has bothered to take the time to write such a utility because of the amount of time it would take to do so. Lacking documentation on the p-code of VBA, it would take a considerable amount of time to figure it all out. It would be far less costly to simply rewrite the app. Besides which, you'd never get the comments back anyway. Those are impossible as they are not saved in a MDE. Jim Dettman President, Online Computer Services of WNY, Inc. (315) 699-3443 jimdettman at earthlink.net -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of ACTEBS Sent: Monday, January 05, 2004 12:47 AM To: access group Subject: [AccessD] MDE to MDB Guys, Is there any method of converting an MDE to an MDB? I have a client who employed a developer to create an application for their organisation. The developer has now disappeared and the app has started to experience problems accessing some forms - it just hangs. I obviously can't fix the problem if I can't get to the forms to have a look at what might be causing the issue. The app is a A2K MDE running under a AXP environment - I was surprised that it would even run as I thought AXP would only run an AXP MDE - learn something everyday. They have been running the app just fine for months and this has just reared it ugly head. Hope someone can point me in the right direction. I have searched the archives but no help there... Thanks Vlad _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From gustav at cactus.dk Mon Jan 5 08:19:46 2004 From: gustav at cactus.dk (Gustav Brock) Date: Mon, 5 Jan 2004 15:19:46 +0100 Subject: [AccessD] MDE to MDB In-Reply-To: <005501c3d34f$47e912c0$0c05a8c0@carlton.local> References: <005501c3d34f$47e912c0$0c05a8c0@carlton.local> Message-ID: <9422834414.20040105151946@cactus.dk> Hi Vlad There was a thread on this (prepare yourself for usergroup dialect): http://dbforums.com/arch/110/2003/3/386647 /gustav > Is there any method of converting an MDE to an MDB? .. From Bryan_Carbonnell at cbc.ca Mon Jan 5 08:46:32 2004 From: Bryan_Carbonnell at cbc.ca (Bryan Carbonnell) Date: Mon, 05 Jan 2004 09:46:32 -0500 Subject: [AccessD] MDE to MDB Message-ID: Actually, not entirely True. Shamil, who I haven't seen on the list in a bit, was able to get the design elements of an MDE out for me. He was able to get the layout of the forms and reports. Maybe even the queries, but I don't remeber. The only thing that he wasnt able to get out was the code, but for me that didn't matter, since there was virtually none in the MDE. It was a paid service, that he was starting up, IIRC. No affiliation other than he saved my butt. :-) Bryan Carbonnell bryan_carbonnell at cbc.ca >>> jimdettman at earthlink.net 05-Jan-04 8:57:59 AM >>> Vlad, Technically it is possible, but no one has bothered to take the time to write such a utility because of the amount of time it would take to do so. Lacking documentation on the p-code of VBA, it would take a considerable amount of time to figure it all out. It would be far less costly to simply rewrite the app. Besides which, you'd never get the comments back anyway. Those are impossible as they are not saved in a MDE. Jim Dettman President, Online Computer Services of WNY, Inc. (315) 699-3443 jimdettman at earthlink.net -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of ACTEBS Sent: Monday, January 05, 2004 12:47 AM To: access group Subject: [AccessD] MDE to MDB Guys, Is there any method of converting an MDE to an MDB? I have a client who employed a developer to create an application for their organisation. The developer has now disappeared and the app has started to experience problems accessing some forms - it just hangs. I obviously can't fix the problem if I can't get to the forms to have a look at what might be causing the issue. The app is a A2K MDE running under a AXP environment - I was surprised that it would even run as I thought AXP would only run an AXP MDE - learn something everyday. They have been running the app just fine for months and this has just reared it ugly head. Hope someone can point me in the right direction. I have searched the archives but no help there... Thanks Vlad _______________________________________________ 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 From jimdettman at earthlink.net Mon Jan 5 09:00:53 2004 From: jimdettman at earthlink.net (Jim Dettman) Date: Mon, 5 Jan 2004 10:00:53 -0500 Subject: [AccessD] MDE to MDB In-Reply-To: Message-ID: Bryan, <> Yes, I know what your referring to. With OLE automation, you can read the objects in a MDE file and enumerate all the properties, save that to a file, then use that to create new objects. Depending on the application, that may get you quite a leg up on getting it back. I wasn't aware though that he was planning to carry that further and write the second half. But in any case, I was speaking about the VBA code, which no one has bothered to do. Jim Dettman President, Online Computer Services of WNY, Inc. (315) 699-3443 jimdettman at earthlink.net -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Bryan Carbonnell Sent: Monday, January 05, 2004 9:47 AM To: accessd at databaseadvisors.com Subject: RE: [AccessD] MDE to MDB Actually, not entirely True. Shamil, who I haven't seen on the list in a bit, was able to get the design elements of an MDE out for me. He was able to get the layout of the forms and reports. Maybe even the queries, but I don't remeber. The only thing that he wasnt able to get out was the code, but for me that didn't matter, since there was virtually none in the MDE. It was a paid service, that he was starting up, IIRC. No affiliation other than he saved my butt. :-) Bryan Carbonnell bryan_carbonnell at cbc.ca >>> jimdettman at earthlink.net 05-Jan-04 8:57:59 AM >>> Vlad, Technically it is possible, but no one has bothered to take the time to write such a utility because of the amount of time it would take to do so. Lacking documentation on the p-code of VBA, it would take a considerable amount of time to figure it all out. It would be far less costly to simply rewrite the app. Besides which, you'd never get the comments back anyway. Those are impossible as they are not saved in a MDE. Jim Dettman President, Online Computer Services of WNY, Inc. (315) 699-3443 jimdettman at earthlink.net -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of ACTEBS Sent: Monday, January 05, 2004 12:47 AM To: access group Subject: [AccessD] MDE to MDB Guys, Is there any method of converting an MDE to an MDB? I have a client who employed a developer to create an application for their organisation. The developer has now disappeared and the app has started to experience problems accessing some forms - it just hangs. I obviously can't fix the problem if I can't get to the forms to have a look at what might be causing the issue. The app is a A2K MDE running under a AXP environment - I was surprised that it would even run as I thought AXP would only run an AXP MDE - learn something everyday. They have been running the app just fine for months and this has just reared it ugly head. Hope someone can point me in the right direction. I have searched the archives but no help there... Thanks Vlad _______________________________________________ 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 _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From Bryan_Carbonnell at cbc.ca Mon Jan 5 09:09:41 2004 From: Bryan_Carbonnell at cbc.ca (Bryan Carbonnell) Date: Mon, 05 Jan 2004 10:09:41 -0500 Subject: [AccessD] MDE to MDB Message-ID: < I wasn't aware though that he was planning to carry that further and write the second half. But in any case, I was speaking about the VBA code, which no one has bothered to do.> I don't know if he has gone the step further or not either. I was just pointing out the fact that at least SOME bits are extractable from an MDE. Bryan Carbonnell bryan_carbonnell at cbc.ca >>> jimdettman at earthlink.net 05-Jan-04 10:00:53 AM >>> Bryan, <> Yes, I know what your referring to. With OLE automation, you can read the objects in a MDE file and enumerate all the properties, save that to a file, then use that to create new objects. Depending on the application, that may get you quite a leg up on getting it back. I wasn't aware though that he was planning to carry that further and write the second half. But in any case, I was speaking about the VBA code, which no one has bothered to do. From bchacc at san.rr.com Mon Jan 5 10:48:12 2004 From: bchacc at san.rr.com (Rocky Smolin - Beach Access Software) Date: Mon, 5 Jan 2004 08:48:12 -0800 Subject: [AccessD] Mac address References: <46B976F2B698FF46A4FE7636509B22DF03D076@stekelbes.ithelps.local> Message-ID: <00d801c3d3ab$b5434960$6501a8c0@HAL9002> Erwin: I'm struggling with the copy protection thing myself on a product I'm getting ready to launch soon. I think the HD SN would be a good place to start. I'm using a date bomb now and need to add code to move the date bomb. But putting the HD SN in the loop would add an extra layer of protection. Did you say you have code to retrieve the HD SN? Would it be possible to get it from you off line at bchacc at san.rr.com? Thanks and regards, Rocky Smolin Beach Access Software ----- Original Message ----- From: "Erwin Craps - IT Helps" To: "Access Developers discussion and problem solving" Sent: Sunday, January 04, 2004 12:45 PM Subject: RE: [AccessD] Mac address > This 0.0.0.0 could result from having multiple nic's in your pc. > If you have a PPP connector you would receive a MAC address from that > to, but when not connected this would be 0 > I'm not compleetly sure of this but a PPP dial adapter is a nic to. > And it could be wrongly set to the first nic in the binding. > > What I wanna say is that you would need to itterate trough the list of > all nic's and verify which mac address you want to use. > > 2 or 3 nic's per pc are not uncommon. > For example . > 1x NIC > 1x PPP modem dial > 1x PPPoE ADSL modem > > If you wanna verify just type ipconfig /ALL in a dos window in NT/2K/XP, > the result is a complete list of all adapters AND MAC address. > Type winipcfg in W9X, you get a form where you can chose from the > multiple nic's and see there MAC address. > > Erwin > > > > > -----Oorspronkelijk bericht----- > Van: accessd-bounces at databaseadvisors.com > [mailto:accessd-bounces at databaseadvisors.com] Namens Jim Dettman > Verzonden: zondag 4 januari 2004 18:57 > Aan: Access Developers discussion and problem solving > Onderwerp: RE: [AccessD] Mac address > > I would agree. A MAC address is usually a lot more stable then a HD > serial number. I wasn't aware though that a spoof utility was out > there. > > Looks like the code will need to dig a little deeper and get the actual > hardware address. > > BTW I'm not sure why that code I sent you returned 0.0.0.0. did the > same thing here on Win98SE. It's never failed before, but then it's > been a few years since I used it. I looked it over real quick and I see > it's making a NetBIOS call, which the success of might be dependant on > the protocols loaded. > > Jim Dettman > President, > Online Computer Services of WNY, Inc. > (315) 699-3443 > jimdettman at earthlink.net > > -----Original Message----- > From: accessd-bounces at databaseadvisors.com > [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of John W. Colby > Sent: Sunday, January 04, 2004 11:53 AM > To: Access Developers discussion and problem solving > Subject: RE: [AccessD] Mac address > > > And how does that make the disk sn better. That DOES change with every > format (and every new HD). When was the last time YOU changed your MAC > address? As form myself, I've NEVER done so. When was the last YOU > formatted (or replaced) your hard disk? As for myself, at LEAST half > dozen times over 4 systems just in the last 4 or 5 years. > > Hmmm.... Never or 1/2 dozen times... > > John W. Colby > www.ColbyConsulting.com > > -----Original Message----- > From: accessd-bounces at databaseadvisors.com > [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Haslett, > Andrew > Sent: Sunday, January 04, 2004 9:02 AM > To: 'Access Developers discussion and problem solving' > Subject: RE: [AccessD] Mac address > > > Hard Disk SN is far better than using the MAC address. Jees, some BIOS > these days even allow you to change your MAC address yourself. > > -----Original Message----- > From: John W. Colby [mailto:jwcolby at colbyconsulting.com] > Sent: Sunday, 4 January 2004 2:19 PM > To: Access Developers discussion and problem solving > Subject: RE: [AccessD] Mac address > > LOL. I learned a long time ago not to sweat the small stuff. If there > are hackers figuring out how to hack Microsoft's $100 million copy > protection, I am not going to survive a determined attempt to get around > my stuff. > > On the other hand, I assume you lock your front door. And I assume > there is glass in the door that anyone who wants in could just smash to > reach in and unlock your door. So why do you bother? Because the lock > keeps 99% of the people out of your house. > > 99% is good enough for me. I will not even bat an eyelash nor give a > second thought to the other 1%. > > 99% of the effort COULD be spent stopping (or failing to stop) that last > 1%. > > John W. Colby > www.ColbyConsulting.com > > -----Original Message----- > From: accessd-bounces at databaseadvisors.com > [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Stuart > McLachlan > Sent: Saturday, January 03, 2004 7:00 PM > To: Access Developers discussion and problem solving > Subject: RE: [AccessD] Mac address > > > Take a look at http://www.klcconsulting.net/smac/ > for a way to defeat this copy protection scheme. > > (Follow the link to "the research of Kyle Lai" for a lot of good info on > MAC > addresses) > > > On 3 Jan 2004 at 13:34, John W. Colby wrote: > > > Yea, but you have to start somewhere. More and more NICs are embedded > right > > in the motherboards so this is getting less and less likely. > > > > John W. Colby > > www.ColbyConsulting.com > > > > -----Original Message----- > > From: accessd-bounces at databaseadvisors.com > > [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Gustav Brock > > Sent: Saturday, January 03, 2004 12:53 PM > > To: Access Developers discussion and problem solving > > Subject: Re: [AccessD] Mac address > > > > > > Hi John > > > > Hmm ... so the user changes his/hers NIC and is hosed ..? > > > > /gustav > > > > > > > Date: 2004-01-03 18:14 > > > > > Well... I'm looking at a machine specific piece for copy protection. > The > > > work station name might be specific to a network, but is created by > > > the software (or user doing the install) so if the machine went down > > > > (as > many > > of > > > mine have over the last few years) if the user didn't select the > > > same > name > > > then the key wouldn't work. > > > > -- > Lexacorp Ltd > http://www.lexacorp.com.pg > Information Technology Consultancy, Software Development,System Support. > > > > _______________________________________________ > 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 > > IMPORTANT - PLEASE READ ******************** This email and any files > transmitted with it are confidential and may contain information > protected by law from disclosure. > If you have received this message in error, please notify the sender > immediately and delete this email from your system. > No warranty is given that this email or files, if attached to this > email, are free from computer viruses or other defects. They are > provided on the basis the user assumes all responsibility for loss, > damage or consequence resulting directly or indirectly from their use, > whether caused by the negligence of the sender or not. > _______________________________________________ > 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 > > > _______________________________________________ > 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 > From Erwin.Craps at ithelps.be Mon Jan 5 11:06:48 2004 From: Erwin.Craps at ithelps.be (Erwin Craps - IT Helps) Date: Mon, 5 Jan 2004 18:06:48 +0100 Subject: [AccessD] Mac address Message-ID: <46B976F2B698FF46A4FE7636509B22DF03D0B8@stekelbes.ithelps.local> I got a whole module for softwarelicense checking, including activation from distance (by phone in case of troubles) with a chalenge/response key... I not sure If I compleetly finished it but but you need is certanly in there. I export the necesary stuff and mail you directly. Erwin -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Rocky Smolin - Beach Access Software Sent: Monday, January 05, 2004 5:48 PM To: Access Developers discussion and problem solving Subject: Re: [AccessD] Mac address Erwin: I'm struggling with the copy protection thing myself on a product I'm getting ready to launch soon. I think the HD SN would be a good place to start. I'm using a date bomb now and need to add code to move the date bomb. But putting the HD SN in the loop would add an extra layer of protection. Did you say you have code to retrieve the HD SN? Would it be possible to get it from you off line at bchacc at san.rr.com? Thanks and regards, Rocky Smolin Beach Access Software ----- Original Message ----- From: "Erwin Craps - IT Helps" To: "Access Developers discussion and problem solving" Sent: Sunday, January 04, 2004 12:45 PM Subject: RE: [AccessD] Mac address > This 0.0.0.0 could result from having multiple nic's in your pc. > If you have a PPP connector you would receive a MAC address from that > to, but when not connected this would be 0 > I'm not compleetly sure of this but a PPP dial adapter is a nic to. > And it could be wrongly set to the first nic in the binding. > > What I wanna say is that you would need to itterate trough the list of > all nic's and verify which mac address you want to use. > > 2 or 3 nic's per pc are not uncommon. > For example . > 1x NIC > 1x PPP modem dial > 1x PPPoE ADSL modem > > If you wanna verify just type ipconfig /ALL in a dos window in NT/2K/XP, > the result is a complete list of all adapters AND MAC address. > Type winipcfg in W9X, you get a form where you can chose from the > multiple nic's and see there MAC address. > > Erwin > > > > > -----Oorspronkelijk bericht----- > Van: accessd-bounces at databaseadvisors.com > [mailto:accessd-bounces at databaseadvisors.com] Namens Jim Dettman > Verzonden: zondag 4 januari 2004 18:57 > Aan: Access Developers discussion and problem solving > Onderwerp: RE: [AccessD] Mac address > > I would agree. A MAC address is usually a lot more stable then a HD > serial number. I wasn't aware though that a spoof utility was out > there. > > Looks like the code will need to dig a little deeper and get the actual > hardware address. > > BTW I'm not sure why that code I sent you returned 0.0.0.0. did the > same thing here on Win98SE. It's never failed before, but then it's > been a few years since I used it. I looked it over real quick and I see > it's making a NetBIOS call, which the success of might be dependant on > the protocols loaded. > > Jim Dettman > President, > Online Computer Services of WNY, Inc. > (315) 699-3443 > jimdettman at earthlink.net > > -----Original Message----- > From: accessd-bounces at databaseadvisors.com > [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of John W. Colby > Sent: Sunday, January 04, 2004 11:53 AM > To: Access Developers discussion and problem solving > Subject: RE: [AccessD] Mac address > > > And how does that make the disk sn better. That DOES change with every > format (and every new HD). When was the last time YOU changed your MAC > address? As form myself, I've NEVER done so. When was the last YOU > formatted (or replaced) your hard disk? As for myself, at LEAST half > dozen times over 4 systems just in the last 4 or 5 years. > > Hmmm.... Never or 1/2 dozen times... > > John W. Colby > www.ColbyConsulting.com > > -----Original Message----- > From: accessd-bounces at databaseadvisors.com > [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Haslett, > Andrew > Sent: Sunday, January 04, 2004 9:02 AM > To: 'Access Developers discussion and problem solving' > Subject: RE: [AccessD] Mac address > > > Hard Disk SN is far better than using the MAC address. Jees, some BIOS > these days even allow you to change your MAC address yourself. > > -----Original Message----- > From: John W. Colby [mailto:jwcolby at colbyconsulting.com] > Sent: Sunday, 4 January 2004 2:19 PM > To: Access Developers discussion and problem solving > Subject: RE: [AccessD] Mac address > > LOL. I learned a long time ago not to sweat the small stuff. If there > are hackers figuring out how to hack Microsoft's $100 million copy > protection, I am not going to survive a determined attempt to get around > my stuff. > > On the other hand, I assume you lock your front door. And I assume > there is glass in the door that anyone who wants in could just smash to > reach in and unlock your door. So why do you bother? Because the lock > keeps 99% of the people out of your house. > > 99% is good enough for me. I will not even bat an eyelash nor give a > second thought to the other 1%. > > 99% of the effort COULD be spent stopping (or failing to stop) that last > 1%. > > John W. Colby > www.ColbyConsulting.com > > -----Original Message----- > From: accessd-bounces at databaseadvisors.com > [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Stuart > McLachlan > Sent: Saturday, January 03, 2004 7:00 PM > To: Access Developers discussion and problem solving > Subject: RE: [AccessD] Mac address > > > Take a look at http://www.klcconsulting.net/smac/ > for a way to defeat this copy protection scheme. > > (Follow the link to "the research of Kyle Lai" for a lot of good info on > MAC > addresses) > > > On 3 Jan 2004 at 13:34, John W. Colby wrote: > > > Yea, but you have to start somewhere. More and more NICs are embedded > right > > in the motherboards so this is getting less and less likely. > > > > John W. Colby > > www.ColbyConsulting.com > > > > -----Original Message----- > > From: accessd-bounces at databaseadvisors.com > > [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Gustav Brock > > Sent: Saturday, January 03, 2004 12:53 PM > > To: Access Developers discussion and problem solving > > Subject: Re: [AccessD] Mac address > > > > > > Hi John > > > > Hmm ... so the user changes his/hers NIC and is hosed ..? > > > > /gustav > > > > > > > Date: 2004-01-03 18:14 > > > > > Well... I'm looking at a machine specific piece for copy protection. > The > > > work station name might be specific to a network, but is created by > > > the software (or user doing the install) so if the machine went down > > > > (as > many > > of > > > mine have over the last few years) if the user didn't select the > > > same > name > > > then the key wouldn't work. > > > > -- > Lexacorp Ltd > http://www.lexacorp.com.pg > Information Technology Consultancy, Software Development,System Support. > > > > _______________________________________________ > 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 > > IMPORTANT - PLEASE READ ******************** This email and any files > transmitted with it are confidential and may contain information > protected by law from disclosure. > If you have received this message in error, please notify the sender > immediately and delete this email from your system. > No warranty is given that this email or files, if attached to this > email, are free from computer viruses or other defects. They are > provided on the basis the user assumes all responsibility for loss, > damage or consequence resulting directly or indirectly from their use, > whether caused by the negligence of the sender or not. > _______________________________________________ > 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 > > > _______________________________________________ > 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 > _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From Mike.W.Gowey at doc.state.or.us Mon Jan 5 11:32:26 2004 From: Mike.W.Gowey at doc.state.or.us (Gowey Mike W) Date: Mon, 5 Jan 2004 10:32:26 -0700 Subject: [AccessD] Caps Lock Message-ID: <05EBB8A3BEB95B4F8216BE4EF486077801D9FEC7@srciml1.ds.doc.state.or.us> Hello Everyone, Is there a way in Access to make a field automatically be capitalized or a way to make the caps lock key come on when the database is opened? Thanks in advance for any help. Mike Gowey, MCSA, A+ Team Leader - SRCI Information Systems & Services Division From BBarabash at TappeConstruction.com Mon Jan 5 11:42:58 2004 From: BBarabash at TappeConstruction.com (Brett Barabash) Date: Mon, 5 Jan 2004 11:42:58 -0600 Subject: [AccessD] Caps Lock Message-ID: <426071E0B0A6D311B3C0006008B0AB23AFE26A@TAPPEEXCH01> Mike, You can specify this in the field's InputMask property with a > symbol (lookup input mask in help for further details). Or, in the KeyPress event, you can put the code: KeyAscii = Asc(UCase$(Chr$(KeyAscii))) While it is possible to set the Caps Lock state through an API call, this is considered a poor practice as it interferes with other apps. I'll keep my conscience clean by not posting that solution here. -----Original Message----- From: Gowey Mike W [mailto:Mike.W.Gowey at doc.state.or.us] Sent: Monday, January 05, 2004 11:32 AM To: Access Developers discussion and problem solving Subject: [AccessD] Caps Lock Hello Everyone, Is there a way in Access to make a field automatically be capitalized or a way to make the caps lock key come on when the database is opened? Thanks in advance for any help. Mike Gowey, MCSA, A+ Team Leader - SRCI Information Systems & Services Division _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -------------------------------------------------------------------------------------------------------------------- This email and any files transmitted with it are confidential and intended solely for the use of the individual or entity to whom they are addressed. If you have received this email in error please notify the originator of the message. This footer also confirms that this email message has been scanned for the presence of computer viruses. Any views expressed in this message are those of the individual sender, except where the sender specifies and with authority, states them to be the views of Tappe Construction Co. Scanning of this message and addition of this footer is performed by SurfControl E-mail Filter software in conjunction with virus detection software. From rbgajewski at adelphia.net Mon Jan 5 11:44:53 2004 From: rbgajewski at adelphia.net (Bob Gajewski) Date: Mon, 5 Jan 2004 12:44:53 -0500 Subject: [AccessD] Caps Lock In-Reply-To: <05EBB8A3BEB95B4F8216BE4EF486077801D9FEC7@srciml1.ds.doc.state.or.us> Message-ID: Mike If you only care about displaying upper case in a form or report, you can just use the Format property (" > ") of the field. If you want the data stored in upper case, you can always use CBF during input: *********************************** Private Sub YourField_AfterUpdate() YourField = UCase(YourField) End Sub *********************************** Regards, Bob Gajewski -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Gowey Mike W Sent: Monday, January 05, 2004 12:32 To: Access Developers discussion and problem solving Subject: [AccessD] Caps Lock Hello Everyone, Is there a way in Access to make a field automatically be capitalized or a way to make the caps lock key come on when the database is opened? Thanks in advance for any help. Mike Gowey, MCSA, A+ Team Leader - SRCI Information Systems & Services Division _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From Kenneth.Stoker at pnl.gov Mon Jan 5 12:14:56 2004 From: Kenneth.Stoker at pnl.gov (Stoker, Kenneth E) Date: Mon, 05 Jan 2004 10:14:56 -0800 Subject: [AccessD] MDBs vs SQL Server Message-ID: <249C1CB246997C48BB74963CCD361C1B014A0355@pnlmse28.pnl.gov> Sorry this is late, I have been on vacation and only sporadically checking e-mail, focusing only on what I had to. I would say I am between a 2 and 3, so 2.5. I support and program both. Ken Stoker Technology Commercialization Information Systems Administrator PH: (509) 375-3758 FAX: (509) 375-6731 E-mail: Kenneth.Stoker at pnl.gov -----Original Message----- From: John W. Colby [mailto:jcolby at colbyconsulting.com] Sent: Monday, December 22, 2003 5:23 PM To: AccessD Subject: [AccessD] MDBs vs SQL Server I'd like to conduct a non-scientific poll to discover what you folks use. Please pick one of the numbers and respond to the list. 1) I use SQL Server for all my data. I wouldn't touch an MDB BE with a 10 foot pole. 2) I use SQL Server mostly, but will touch an MDB BE with a 10 foot pole, as long as I don't have to be responsible for the mess. 3) I have used SQL Server in at least one actual client system but my bread and butter is made with MDB BEs. 4) I am fascinated with the possibilities of SQL server, have looked at it, perhaps installed it at my office, but just don't have the call for it from my clients. 5) What's this here SQL Server thangie? All my database BEs are done with MDBs. 6) I prefer to do my data stores in Excel spreadsheets, but if I must an MDB is at least within my grasp. SQL Server is for them big boys n they won't talk to me. I would still be using Borland's Reflex if I could get a copy - now THERE's a REAL MAN'S database!!! Just pick a number and put it in the first line of your response. As for me, I am a 4. I have SQL Server installed in my office, moved my billing db to it in order to have a real live in use system using it, and have regretted it ever since. In fact I yanked the data back out into an MDB last week after having to rebuild my system twice and then ending up with torn pages in my SQL Server database. John W. Colby www.ColbyConsulting.com _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From Mike.W.Gowey at doc.state.or.us Mon Jan 5 12:17:22 2004 From: Mike.W.Gowey at doc.state.or.us (Gowey Mike W) Date: Mon, 5 Jan 2004 11:17:22 -0700 Subject: [AccessD] Caps Lock Message-ID: <05EBB8A3BEB95B4F8216BE4EF486077801D9FEC9@srciml1.ds.doc.state.or.us> Thanks a lot Brett the KeyPress event works just great, just what I needed. Sometimes I just get a brain lock and it is great to have this list to help me get by it. Thanks again Mike Gowey, MCSA, A+ Team Leader - SRCI Information Systems & Services Division -----Original Message----- From: Brett Barabash [mailto:BBarabash at TappeConstruction.com] Sent: Monday, January 05, 2004 10:43 AM To: 'Access Developers discussion and problem solving' Subject: RE: [AccessD] Caps Lock Mike, You can specify this in the field's InputMask property with a > symbol (lookup input mask in help for further details). Or, in the KeyPress event, you can put the code: KeyAscii = Asc(UCase$(Chr$(KeyAscii))) While it is possible to set the Caps Lock state through an API call, this is considered a poor practice as it interferes with other apps. I'll keep my conscience clean by not posting that solution here. -----Original Message----- From: Gowey Mike W [mailto:Mike.W.Gowey at doc.state.or.us] Sent: Monday, January 05, 2004 11:32 AM To: Access Developers discussion and problem solving Subject: [AccessD] Caps Lock Hello Everyone, Is there a way in Access to make a field automatically be capitalized or a way to make the caps lock key come on when the database is opened? Thanks in advance for any help. Mike Gowey, MCSA, A+ Team Leader - SRCI Information Systems & Services Division _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com ------------------------------------------------------------------------ -------------------------------------------- This email and any files transmitted with it are confidential and intended solely for the use of the individual or entity to whom they are addressed. If you have received this email in error please notify the originator of the message. This footer also confirms that this email message has been scanned for the presence of computer viruses. Any views expressed in this message are those of the individual sender, except where the sender specifies and with authority, states them to be the views of Tappe Construction Co. Scanning of this message and addition of this footer is performed by SurfControl E-mail Filter software in conjunction with virus detection software. _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From sgeller at cce.umn.edu Mon Jan 5 12:28:57 2004 From: sgeller at cce.umn.edu (Susan Geller) Date: Mon, 5 Jan 2004 12:28:57 -0600 Subject: [AccessD] Access with VSS Message-ID: I am using Access 2002 adp with VSS. I am wondering how it can be that right after I create a file from VSS (Tools-SourceSafe-Create Database >From SourceSafe Project), when I click on "Get Latest Version", several items report to being updated? Wouldn't the newly created project already have all the items? It isn't possible that these items were changed because I did in 2 minutes later and there was nobody else even in the office who had access to it at the time. --Susan Susan B. Geller Office of Information Systems College of Continuing Education University of Minnesota 306 Wesbrook Hall 77 Pleasant Street SE Minneapolis, MN 55455 Phone: 612-626-4785 Fax: 612-625-2568 From martyconnelly at shaw.ca Mon Jan 5 14:06:24 2004 From: martyconnelly at shaw.ca (MartyConnelly) Date: Mon, 05 Jan 2004 12:06:24 -0800 Subject: [AccessD] Taking Controls from another MDB References: <000301c3d356$4ac4b740$69fa2250@servercafe> Message-ID: <3FF9C3C0.1000607@shaw.ca> Try using TransferDatabase or CopyObject To get all the names of reports in order to transfer; try mucking about with the following code 'OpenDatabase Method Example 'This example uses the OpenDatabase method to open one Microsoft Jet database Sub OpenDatabaseX() Dim wrkJet As Workspace Dim dbsNorthwind As Database Dim dbsPubs As Database Dim dbsPubs2 As Database Dim dbsLoop As Database Dim prpLoop As Property ' Create Microsoft Jet Workspace object. Set wrkJet = CreateWorkspace("", "admin", "", dbUseJet) ' Open Database object from saved Microsoft Jet database ' for exclusive use. MsgBox "Opening Northwind..." Set dbsNorthwind = wrkJet.OpenDatabase("C:\Program Files\Microsoft Office\Office\Samples\Northwind.mdb", _ True) ' Enumerate the Databases collection. For Each dbsLoop In wrkJet.Databases Debug.Print "Database properties for " & _ dbsLoop.Name & ":" On Error Resume Next ' Enumerate the Properties collection of each Database ' object. For Each prpLoop In dbsLoop.Properties If prpLoop.Name = "Connection" Then ' Property actually returns a Connection object. Debug.Print " Connection[.Name] = " & _ dbsLoop.Connection.Name Else Debug.Print " " & prpLoop.Name & " = " & _ prpLoop End If Next prpLoop On Error GoTo 0 Next dbsLoop 'Container Property Example 'This example displays the Container property for a variety of Document objects. ' Put report names in a array, can't have two copies of database open when 'using transferdatabase although I suppose you could use copyobject Dim dbsNorthwindA As Database Dim ctrLoop As Container Dim arrReports(30) As String Set dbsNorthwindA = OpenDatabase("C:\Program Files\Microsoft Office\Office\Samples\Northwind.mdb", , ReadOnly) ' Display the container name for the first Document ' object in each Container object's Documents collection. For Each ctrLoop In dbsNorthwindA.Containers Debug.Print "Document: " & ctrLoop.Documents(0).Name Debug.Print " Container = " & ctrLoop.Documents(0).Container Next ctrLoop Dim i As Long Dim strReportName As String Dim lNoOfReports As Long For i = 0 To dbsNorthwind.Containers("Reports").Documents.Count - 1 ' DoCmd.CopyObject "Insecure.mdb", Tmp, A_REPORT, Tmp strReportName = dbsNorthwind.Containers("Reports").Documents(i).Name arrReports(i) = strReportName Debug.Print dbsNorthwind.Containers("Reports").Documents(i).Name Next i lNoOfReports = dbsNorthwind.Containers("Reports").Documents.Count - 1 'close up database dbsNorthwind.Close dbsNorthwindA.Close wrkJet.Close Set dbsNorthwind = Nothing Set dbsNorthwindA = Nothing Set wrkJet = Nothing 'after closing import the reports For i = 0 To lNoOfReports DoCmd.TransferDatabase acImport, "Microsoft Access", _ "C:\Program Files\Microsoft Office\Office\Samples\Northwind.mdb", _ acReport, arrReports(i), arrReports(i) Next i End Sub MastercafeCTV wrote: >Hi group we are trying to take all reports from another MDB, we use the next >code to see our Reports/Tables/Forms, but how to change >Application.CurrentProject for c:\MyApp\Sample.MDB?? > >Function CtlLista(TIPO As String) >On Error GoTo ctlerror > Dim obj As AccessObject, dbs As Object > Set dbs = Application.CurrentProject > Dim I As Integer > Dim frm As Form > Dim valores As String > valores = "" > Select Case TIPO > Case "F" > For Each obj In dbs.AllForms > If valores = "" Then > valores = valores & obj.Name > Else > valores = valores & ";" & obj.Name > End If > Next obj > > Case "R" > For Each obj In dbs.AllReports > If valores = "" Then > valores = valores & obj.Name > Else > valores = valores & ";" & obj.Name > End If > Next obj > Case "T" > For Each obj In dbs.AllTables > If valores = "" Then > valores = valores & obj.Name > Else > valores = valores & ";" & obj.Name > End If > Next obj >Etc........... > > >Thanks > >Juan Menendez > > >=========================================== >MASTERCAFE SL - NIF B-82.617.614 >www.mastercafe.com >Deleg. Asturias >Tel 985.88.49.44 / 627.531.764 >Fax 627.500.205 >info at mastercafe.com >juan at mastercafe.com >Deleg. Madrid >Tel 627.474.285 >cecilia at mastercafe.com >=========================================== > > >-----Original Message----- >From: accessd-bounces at databaseadvisors.com >[mailto:accessd-bounces at databaseadvisors.com] On Behalf Of MastercafeCTV >Sent: lunes, 05 de enero de 2004 7:09 >To: 'Access Developers discussion and problem solving' >Subject: RE: [AccessD] Mac address > > >We check this function and can't obtain any serial from the mainboard. The >AXP check ok for compiling but return only " ," (two character) > >Do you know why?? > >We use the serial HDD control to check the computer, and with this code > >Set fs = CreateObject("Scripting.filesystemobject") >Set d = fs.getdrive(fs.getdrivename(fs.getabsolutepathname("C:"))) >HDD = d.SerialNumber > >The lenght can be 6 or more characters > >Juan Menendez >Mastercafe > >=========================================== >MASTERCAFE SL - NIF B-82.617.614 >www.mastercafe.com >Deleg. Asturias >Tel 985.88.49.44 / 627.531.764 >Fax 627.500.205 >info at mastercafe.com >juan at mastercafe.com >Deleg. Madrid >Tel 627.474.285 >cecilia at mastercafe.com =========================================== > > >-----Original Message----- >From: accessd-bounces at databaseadvisors.com >[mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Stuart McLachlan >Sent: lunes, 05 de enero de 2004 1:40 >To: Access Developers discussion and problem solving >Subject: RE: [AccessD] Mac address > > >On 4 Jan 2004 at 17:43, John Bartow wrote: > > > >>I was just wondering why the Main Circuit Board Serial Number isn't >>used for this. It would seem to me that this would be about the most >>stable unique ID number in a PC. I have no idea how you would read >>this number but it always shows up in my hardware asset inventories. >> >>Any comments? >> >> > >Public Function MBSerialNumber() As String > >'RETRIEVES SERIAL NUMBER OF MOTHERBOARD >'IF THERE IS MORE THAN ONE MOTHERBOARD, THE SERIAL >'NUMBERS WILL BE DELIMITED BY COMMAS > >'YOU MUST HAVE WMI INSTALLED AND A REFERENCE TO >'Microsoft WMI Scripting Library IS REQUIRED > >Dim objs As Object > >Dim obj As Object >Dim WMI As Object >Dim sAns As String > > >Set WMI = GetObject("WinMgmts:") >Set objs = WMI.InstancesOf("Win32_BaseBoard") >For Each obj In objs > sAns = sAns & obj.SerialNumber > If sAns < objs.Count Then sAns = sAns & "," >Next >MBSerialNumber = sAns >End Function > > > -- Marty Connelly Victoria, B.C. Canada From cfoust at infostatsystems.com Mon Jan 5 14:34:22 2004 From: cfoust at infostatsystems.com (Charlotte Foust) Date: Mon, 5 Jan 2004 12:34:22 -0800 Subject: [AccessD] Access with VSS Message-ID: What kind of items? Charlotte Foust -----Original Message----- From: Susan Geller [mailto:sgeller at cce.umn.edu] Sent: Monday, January 05, 2004 10:29 AM To: accessd at databaseadvisors.com Subject: [AccessD] Access with VSS I am using Access 2002 adp with VSS. I am wondering how it can be that right after I create a file from VSS (Tools-SourceSafe-Create Database >From SourceSafe Project), when I click on "Get Latest Version", several items report to being updated? Wouldn't the newly created project already have all the items? It isn't possible that these items were changed because I did in 2 minutes later and there was nobody else even in the office who had access to it at the time. --Susan Susan B. Geller Office of Information Systems College of Continuing Education University of Minnesota 306 Wesbrook Hall 77 Pleasant Street SE Minneapolis, MN 55455 Phone: 612-626-4785 Fax: 612-625-2568 _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From sgeller at cce.umn.edu Mon Jan 5 15:00:23 2004 From: sgeller at cce.umn.edu (Susan Geller) Date: Mon, 5 Jan 2004 15:00:23 -0600 Subject: [AccessD] Access with VSS Message-ID: Reports. -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Charlotte Foust Sent: Monday, January 05, 2004 2:34 PM To: Access Developers discussion and problem solving Subject: RE: [AccessD] Access with VSS What kind of items? Charlotte Foust -----Original Message----- From: Susan Geller [mailto:sgeller at cce.umn.edu] Sent: Monday, January 05, 2004 10:29 AM To: accessd at databaseadvisors.com Subject: [AccessD] Access with VSS I am using Access 2002 adp with VSS. I am wondering how it can be that right after I create a file from VSS (Tools-SourceSafe-Create Database >From SourceSafe Project), when I click on "Get Latest Version", several items report to being updated? Wouldn't the newly created project already have all the items? It isn't possible that these items were changed because I did in 2 minutes later and there was nobody else even in the office who had access to it at the time. --Susan Susan B. Geller Office of Information Systems College of Continuing Education University of Minnesota 306 Wesbrook Hall 77 Pleasant Street SE Minneapolis, MN 55455 Phone: 612-626-4785 Fax: 612-625-2568 _______________________________________________ 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 From bchacc at san.rr.com Mon Jan 5 17:00:16 2004 From: bchacc at san.rr.com (Rocky Smolin - Beach Access Software) Date: Mon, 5 Jan 2004 15:00:16 -0800 Subject: [AccessD] Mac address References: <46B976F2B698FF46A4FE7636509B22DF03D0B8@stekelbes.ithelps.local> Message-ID: <01f801c3d3df$af605680$6501a8c0@HAL9002> Erwin: I am really in your debt for that. Thanks. Rocky ----- Original Message ----- From: "Erwin Craps - IT Helps" To: "Access Developers discussion and problem solving" Sent: Monday, January 05, 2004 9:06 AM Subject: RE: [AccessD] Mac address > I got a whole module for softwarelicense checking, including activation > from distance (by phone in case of troubles) with a chalenge/response > key... > > I not sure If I compleetly finished it but but you need is certanly in > there. > > I export the necesary stuff and mail you directly. > > Erwin > > > -----Original Message----- > From: accessd-bounces at databaseadvisors.com > [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Rocky Smolin > - Beach Access Software > Sent: Monday, January 05, 2004 5:48 PM > To: Access Developers discussion and problem solving > Subject: Re: [AccessD] Mac address > > Erwin: > > I'm struggling with the copy protection thing myself on a product I'm > getting ready to launch soon. I think the HD SN would be a good place > to start. I'm using a date bomb now and need to add code to move the > date bomb. > But putting the HD SN in the loop would add an extra layer of > protection. > Did you say you have code to retrieve the HD SN? Would it be possible > to get it from you off line at bchacc at san.rr.com? > > Thanks and regards, > > Rocky Smolin > Beach Access Software > > ----- Original Message ----- > From: "Erwin Craps - IT Helps" > To: "Access Developers discussion and problem solving" > > Sent: Sunday, January 04, 2004 12:45 PM > Subject: RE: [AccessD] Mac address > > > > This 0.0.0.0 could result from having multiple nic's in your pc. > > If you have a PPP connector you would receive a MAC address from that > > to, but when not connected this would be 0 > > I'm not compleetly sure of this but a PPP dial adapter is a nic to. > > And it could be wrongly set to the first nic in the binding. > > > > What I wanna say is that you would need to itterate trough the list of > > all nic's and verify which mac address you want to use. > > > > 2 or 3 nic's per pc are not uncommon. > > For example . > > 1x NIC > > 1x PPP modem dial > > 1x PPPoE ADSL modem > > > > If you wanna verify just type ipconfig /ALL in a dos window in > NT/2K/XP, > > the result is a complete list of all adapters AND MAC address. > > Type winipcfg in W9X, you get a form where you can chose from the > > multiple nic's and see there MAC address. > > > > Erwin > > > > > > > > > > -----Oorspronkelijk bericht----- > > Van: accessd-bounces at databaseadvisors.com > > [mailto:accessd-bounces at databaseadvisors.com] Namens Jim Dettman > > Verzonden: zondag 4 januari 2004 18:57 > > Aan: Access Developers discussion and problem solving > > Onderwerp: RE: [AccessD] Mac address > > > > I would agree. A MAC address is usually a lot more stable then a HD > > serial number. I wasn't aware though that a spoof utility was out > > there. > > > > Looks like the code will need to dig a little deeper and get the > actual > > hardware address. > > > > BTW I'm not sure why that code I sent you returned 0.0.0.0. did the > > same thing here on Win98SE. It's never failed before, but then it's > > been a few years since I used it. I looked it over real quick and I > see > > it's making a NetBIOS call, which the success of might be dependant on > > the protocols loaded. > > > > Jim Dettman > > President, > > Online Computer Services of WNY, Inc. > > (315) 699-3443 > > jimdettman at earthlink.net > > > > -----Original Message----- > > From: accessd-bounces at databaseadvisors.com > > [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of John W. > Colby > > Sent: Sunday, January 04, 2004 11:53 AM > > To: Access Developers discussion and problem solving > > Subject: RE: [AccessD] Mac address > > > > > > And how does that make the disk sn better. That DOES change with > every > > format (and every new HD). When was the last time YOU changed your > MAC > > address? As form myself, I've NEVER done so. When was the last YOU > > formatted (or replaced) your hard disk? As for myself, at LEAST half > > dozen times over 4 systems just in the last 4 or 5 years. > > > > Hmmm.... Never or 1/2 dozen times... > > > > John W. Colby > > www.ColbyConsulting.com > > > > -----Original Message----- > > From: accessd-bounces at databaseadvisors.com > > [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Haslett, > > Andrew > > Sent: Sunday, January 04, 2004 9:02 AM > > To: 'Access Developers discussion and problem solving' > > Subject: RE: [AccessD] Mac address > > > > > > Hard Disk SN is far better than using the MAC address. Jees, some > BIOS > > these days even allow you to change your MAC address yourself. > > > > -----Original Message----- > > From: John W. Colby [mailto:jwcolby at colbyconsulting.com] > > Sent: Sunday, 4 January 2004 2:19 PM > > To: Access Developers discussion and problem solving > > Subject: RE: [AccessD] Mac address > > > > LOL. I learned a long time ago not to sweat the small stuff. If > there > > are hackers figuring out how to hack Microsoft's $100 million copy > > protection, I am not going to survive a determined attempt to get > around > > my stuff. > > > > On the other hand, I assume you lock your front door. And I assume > > there is glass in the door that anyone who wants in could just smash > to > > reach in and unlock your door. So why do you bother? Because the > lock > > keeps 99% of the people out of your house. > > > > 99% is good enough for me. I will not even bat an eyelash nor give a > > second thought to the other 1%. > > > > 99% of the effort COULD be spent stopping (or failing to stop) that > last > > 1%. > > > > John W. Colby > > www.ColbyConsulting.com > > > > -----Original Message----- > > From: accessd-bounces at databaseadvisors.com > > [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Stuart > > McLachlan > > Sent: Saturday, January 03, 2004 7:00 PM > > To: Access Developers discussion and problem solving > > Subject: RE: [AccessD] Mac address > > > > > > Take a look at http://www.klcconsulting.net/smac/ > > for a way to defeat this copy protection scheme. > > > > (Follow the link to "the research of Kyle Lai" for a lot of good info > on > > MAC > > addresses) > > > > > > On 3 Jan 2004 at 13:34, John W. Colby wrote: > > > > > Yea, but you have to start somewhere. More and more NICs are > embedded > > right > > > in the motherboards so this is getting less and less likely. > > > > > > John W. Colby > > > www.ColbyConsulting.com > > > > > > -----Original Message----- > > > From: accessd-bounces at databaseadvisors.com > > > [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Gustav > Brock > > > Sent: Saturday, January 03, 2004 12:53 PM > > > To: Access Developers discussion and problem solving > > > Subject: Re: [AccessD] Mac address > > > > > > > > > Hi John > > > > > > Hmm ... so the user changes his/hers NIC and is hosed ..? > > > > > > /gustav > > > > > > > > > > Date: 2004-01-03 18:14 > > > > > > > Well... I'm looking at a machine specific piece for copy > protection. > > The > > > > work station name might be specific to a network, but is created > by > > > > the software (or user doing the install) so if the machine went > down > > > > > > (as > > many > > > of > > > > mine have over the last few years) if the user didn't select the > > > > same > > name > > > > then the key wouldn't work. > > > > > > > -- > > Lexacorp Ltd > > http://www.lexacorp.com.pg > > Information Technology Consultancy, Software Development,System > Support. > > > > > > > > _______________________________________________ > > 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 > > > > IMPORTANT - PLEASE READ ******************** This email and any files > > transmitted with it are confidential and may contain information > > protected by law from disclosure. > > If you have received this message in error, please notify the sender > > immediately and delete this email from your system. > > No warranty is given that this email or files, if attached to this > > email, are free from computer viruses or other defects. They are > > provided on the basis the user assumes all responsibility for loss, > > damage or consequence resulting directly or indirectly from their use, > > whether caused by the negligence of the sender or not. > > _______________________________________________ > > 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 > > > > > > _______________________________________________ > > 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 > > > > _______________________________________________ > 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 From mastercafe at ctv.es Mon Jan 5 18:49:56 2004 From: mastercafe at ctv.es (MastercafeCTV) Date: Tue, 6 Jan 2004 01:49:56 +0100 Subject: [AccessD] MDB Stability vs Perfomance In-Reply-To: Message-ID: <000001c3d3ef$01ab3db0$69fa2250@servercafe> Hi group, on the last year we are changing all our applications from Access 2k to Access XP, but at this moment we have one problem on all applications that it take more time for maintenance and repair. MDB from Access 2k are much more stable VS MDB XP (better A2k) MDB from Access 2k have similar speed vs MDB XP (better A2k) Applications on A2k are much more stable vs MDB/MDE XP (better A2k) MDB A2k corrupted not always can be repaired vs MDB XP always was be repaired (Better AXP) On the last version for application FE we obtain sometimes a reset error, I explain: close tha Access XP with application without any error message or similar, simply close and then you can open renew. Anyone knows how to solve this problems wih AXP?? Is better program with AXP on MDB format A2k?? Is the AXP less stable than A2k?? Thanks in advance Juan Men?ndez =========================================== MASTERCAFE SL - NIF B-82.617.614 www.mastercafe.com Deleg. Asturias Tel 985.88.49.44 / 627.531.764 Fax 627.500.205 info at mastercafe.com juan at mastercafe.com Deleg. Madrid Tel 627.474.285 cecilia at mastercafe.com =========================================== From cfoust at infostatsystems.com Mon Jan 5 19:08:02 2004 From: cfoust at infostatsystems.com (Charlotte Foust) Date: Mon, 5 Jan 2004 17:08:02 -0800 Subject: [AccessD] MDB Stability vs Perfomance Message-ID: I haven't found AXP SP-1 to be any less stable or have more problems than A2k. Be aware, though, that if you switch to AXP, you will only be able to create an MDE in 2002 format, not in 2000 format. Charlotte Foust -----Original Message----- From: MastercafeCTV [mailto:mastercafe at ctv.es] Sent: Monday, January 05, 2004 4:50 PM To: 'Access Developers discussion and problem solving' Subject: [AccessD] MDB Stability vs Perfomance Hi group, on the last year we are changing all our applications from Access 2k to Access XP, but at this moment we have one problem on all applications that it take more time for maintenance and repair. MDB from Access 2k are much more stable VS MDB XP (better A2k) MDB from Access 2k have similar speed vs MDB XP (better A2k) Applications on A2k are much more stable vs MDB/MDE XP (better A2k) MDB A2k corrupted not always can be repaired vs MDB XP always was be repaired (Better AXP) On the last version for application FE we obtain sometimes a reset error, I explain: close tha Access XP with application without any error message or similar, simply close and then you can open renew. Anyone knows how to solve this problems wih AXP?? Is better program with AXP on MDB format A2k?? Is the AXP less stable than A2k?? Thanks in advance Juan Men?ndez =========================================== MASTERCAFE SL - NIF B-82.617.614 www.mastercafe.com Deleg. Asturias Tel 985.88.49.44 / 627.531.764 Fax 627.500.205 info at mastercafe.com juan at mastercafe.com Deleg. Madrid Tel 627.474.285 cecilia at mastercafe.com =========================================== _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From mastercafe at ctv.es Mon Jan 5 19:15:58 2004 From: mastercafe at ctv.es (MastercafeCTV) Date: Tue, 6 Jan 2004 02:15:58 +0100 Subject: [AccessD] MDB Stability vs Perfomance In-Reply-To: Message-ID: <000901c3d3f2$b1d0e6b0$69fa2250@servercafe> The MDE problem is correct, we saw months ago. And we have installed the 3 patches for AXP (SP-1 , Patch Office XP 2, and secur. Patches) but the most significant problem is our main program STEEL TPV that uses a STEELDAT.MDB only for data, this MDB have no problem with A2k format, and the last september change to AXP format, from this we repeat Compact & Repair every month. Juan Menendez =========================================== MASTERCAFE SL - NIF B-82.617.614 www.mastercafe.com Deleg. Asturias Tel 985.88.49.44 / 627.531.764 Fax 627.500.205 info at mastercafe.com juan at mastercafe.com Deleg. Madrid Tel 627.474.285 cecilia at mastercafe.com =========================================== -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Charlotte Foust Sent: martes, 06 de enero de 2004 2:08 To: Access Developers discussion and problem solving Subject: RE: [AccessD] MDB Stability vs Perfomance I haven't found AXP SP-1 to be any less stable or have more problems than A2k. Be aware, though, that if you switch to AXP, you will only be able to create an MDE in 2002 format, not in 2000 format. Charlotte Foust -----Original Message----- From: MastercafeCTV [mailto:mastercafe at ctv.es] Sent: Monday, January 05, 2004 4:50 PM To: 'Access Developers discussion and problem solving' Subject: [AccessD] MDB Stability vs Perfomance Hi group, on the last year we are changing all our applications from Access 2k to Access XP, but at this moment we have one problem on all applications that it take more time for maintenance and repair. MDB from Access 2k are much more stable VS MDB XP (better A2k) MDB from Access 2k have similar speed vs MDB XP (better A2k) Applications on A2k are much more stable vs MDB/MDE XP (better A2k) MDB A2k corrupted not always can be repaired vs MDB XP always was be repaired (Better AXP) On the last version for application FE we obtain sometimes a reset error, I explain: close tha Access XP with application without any error message or similar, simply close and then you can open renew. Anyone knows how to solve this problems wih AXP?? Is better program with AXP on MDB format A2k?? Is the AXP less stable than A2k?? Thanks in advance Juan Men?ndez =========================================== MASTERCAFE SL - NIF B-82.617.614 www.mastercafe.com Deleg. Asturias Tel 985.88.49.44 / 627.531.764 Fax 627.500.205 info at mastercafe.com juan at mastercafe.com Deleg. Madrid Tel 627.474.285 cecilia at mastercafe.com =========================================== _______________________________________________ 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 From mastercafe at ctv.es Mon Jan 5 19:21:33 2004 From: mastercafe at ctv.es (MastercafeCTV) Date: Tue, 6 Jan 2004 02:21:33 +0100 Subject: [AccessD] FMSINC Applications In-Reply-To: Message-ID: <000a01c3d3f3$795086a0$69fa2250@servercafe> We are study to buy the FMS Inc. Utilities for AXP (Componente, Source Code, Analizer, etc... Developers pack). Any have some experience over this utlities, or can be evaluates in front of other similar?? Thanks Juan Menendez =========================================== MASTERCAFE SL - NIF B-82.617.614 www.mastercafe.com Deleg. Asturias Tel 985.88.49.44 / 627.531.764 Fax 627.500.205 info at mastercafe.com juan at mastercafe.com Deleg. Madrid Tel 627.474.285 cecilia at mastercafe.com =========================================== From wdhindman at bellsouth.net Mon Jan 5 19:31:24 2004 From: wdhindman at bellsouth.net (William Hindman) Date: Mon, 5 Jan 2004 20:31:24 -0500 Subject: [AccessD] MDB Stability vs Perfomance References: <000901c3d3f2$b1d0e6b0$69fa2250@servercafe> Message-ID: <001b01c3d3f4$cc337070$6101a8c0@dejpolsys> ...noted no problems w/XP mdbs other than the bloat bug :) William Hindman - Next Year In The Free State! ----- Original Message ----- From: "MastercafeCTV" To: "'Access Developers discussion and problem solving'" Sent: Monday, January 05, 2004 8:15 PM Subject: RE: [AccessD] MDB Stability vs Perfomance > The MDE problem is correct, we saw months ago. And we have installed the 3 > patches for AXP (SP-1 , Patch Office XP 2, and secur. Patches) but the most > significant problem is our main program STEEL TPV that uses a STEELDAT.MDB > only for data, this MDB have no problem with A2k format, and the last > september change to AXP format, from this we repeat Compact & Repair every > month. > > Juan Menendez > > > =========================================== > MASTERCAFE SL - NIF B-82.617.614 > www.mastercafe.com > Deleg. Asturias > Tel 985.88.49.44 / 627.531.764 > Fax 627.500.205 > info at mastercafe.com > juan at mastercafe.com > Deleg. Madrid > Tel 627.474.285 > cecilia at mastercafe.com > =========================================== > > > -----Original Message----- > From: accessd-bounces at databaseadvisors.com > [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Charlotte Foust > Sent: martes, 06 de enero de 2004 2:08 > To: Access Developers discussion and problem solving > Subject: RE: [AccessD] MDB Stability vs Perfomance > > > I haven't found AXP SP-1 to be any less stable or have more problems than > A2k. Be aware, though, that if you switch to AXP, you will only be able to > create an MDE in 2002 format, not in 2000 format. > > Charlotte Foust > > -----Original Message----- > From: MastercafeCTV [mailto:mastercafe at ctv.es] > Sent: Monday, January 05, 2004 4:50 PM > To: 'Access Developers discussion and problem solving' > Subject: [AccessD] MDB Stability vs Perfomance > > > Hi group, on the last year we are changing all our applications from Access > 2k to Access XP, but at this moment we have one problem on all applications > that it take more time for maintenance and repair. > > MDB from Access 2k are much more stable VS MDB XP (better A2k) > MDB from Access 2k have similar speed vs MDB XP (better A2k) > Applications on A2k are much more stable vs MDB/MDE XP (better A2k) MDB A2k > corrupted not always can be repaired vs MDB XP always was be > repaired (Better AXP) > > On the last version for application FE we obtain sometimes a reset error, I > explain: close tha Access XP with application without any error message or > similar, simply close and then you can open renew. > > Anyone knows how to solve this problems wih AXP?? Is better program with AXP > on MDB format A2k?? Is the AXP less stable than A2k?? > > Thanks in advance > > Juan Men?ndez > > > =========================================== > MASTERCAFE SL - NIF B-82.617.614 > www.mastercafe.com > Deleg. Asturias > Tel 985.88.49.44 / 627.531.764 > Fax 627.500.205 > info at mastercafe.com > juan at mastercafe.com > Deleg. Madrid > Tel 627.474.285 > cecilia at mastercafe.com =========================================== > > _______________________________________________ > 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 > > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com From papparuff at comcast.net Mon Jan 5 19:48:55 2004 From: papparuff at comcast.net (John Ruff) Date: Mon, 5 Jan 2004 17:48:55 -0800 Subject: [AccessD] FMSINC Applications In-Reply-To: <000a01c3d3f3$795086a0$69fa2250@servercafe> Message-ID: <000601c3d3f7$3efb8640$6501a8c0@papparuff> I've been using their Analyzer, CodeTools, and Sourcebooks since Access 2.0 and find them invaluable. I've got the Components for Access 2.0 and Access 97 but never really used them. I learned to try and stay away from ActiveX controls as much as possible. John V. Ruff - The Eternal Optimist :-) "Commit to the Lord whatever you do, and your plans will succeed." Proverbs 16:3 -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of MastercafeCTV Sent: Monday, January 05, 2004 5:22 PM To: 'Access Developers discussion and problem solving' Subject: [AccessD] FMSINC Applications We are study to buy the FMS Inc. Utilities for AXP (Componente, Source Code, Analizer, etc... Developers pack). Any have some experience over this utlities, or can be evaluates in front of other similar?? Thanks Juan Menendez =========================================== MASTERCAFE SL - NIF B-82.617.614 www.mastercafe.com Deleg. Asturias Tel 985.88.49.44 / 627.531.764 Fax 627.500.205 info at mastercafe.com juan at mastercafe.com Deleg. Madrid Tel 627.474.285 cecilia at mastercafe.com =========================================== _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From cfoust at infostatsystems.com Mon Jan 5 20:02:07 2004 From: cfoust at infostatsystems.com (Charlotte Foust) Date: Mon, 5 Jan 2004 18:02:07 -0800 Subject: [AccessD] MDB Stability vs Perfomance Message-ID: I'm sorry, but it isn't clear to me whether you're talking about the file format or the version of Access you're using. If you have mixed versions updating the same database, you're likely to have corruption problems. What is your main program written in? Charlotte Foust -----Original Message----- From: MastercafeCTV [mailto:mastercafe at ctv.es] Sent: Monday, January 05, 2004 5:16 PM To: 'Access Developers discussion and problem solving' Subject: RE: [AccessD] MDB Stability vs Perfomance The MDE problem is correct, we saw months ago. And we have installed the 3 patches for AXP (SP-1 , Patch Office XP 2, and secur. Patches) but the most significant problem is our main program STEEL TPV that uses a STEELDAT.MDB only for data, this MDB have no problem with A2k format, and the last september change to AXP format, from this we repeat Compact & Repair every month. Juan Menendez =========================================== MASTERCAFE SL - NIF B-82.617.614 www.mastercafe.com Deleg. Asturias Tel 985.88.49.44 / 627.531.764 Fax 627.500.205 info at mastercafe.com juan at mastercafe.com Deleg. Madrid Tel 627.474.285 cecilia at mastercafe.com =========================================== -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Charlotte Foust Sent: martes, 06 de enero de 2004 2:08 To: Access Developers discussion and problem solving Subject: RE: [AccessD] MDB Stability vs Perfomance I haven't found AXP SP-1 to be any less stable or have more problems than A2k. Be aware, though, that if you switch to AXP, you will only be able to create an MDE in 2002 format, not in 2000 format. Charlotte Foust -----Original Message----- From: MastercafeCTV [mailto:mastercafe at ctv.es] Sent: Monday, January 05, 2004 4:50 PM To: 'Access Developers discussion and problem solving' Subject: [AccessD] MDB Stability vs Perfomance Hi group, on the last year we are changing all our applications from Access 2k to Access XP, but at this moment we have one problem on all applications that it take more time for maintenance and repair. MDB from Access 2k are much more stable VS MDB XP (better A2k) MDB from Access 2k have similar speed vs MDB XP (better A2k) Applications on A2k are much more stable vs MDB/MDE XP (better A2k) MDB A2k corrupted not always can be repaired vs MDB XP always was be repaired (Better AXP) On the last version for application FE we obtain sometimes a reset error, I explain: close tha Access XP with application without any error message or similar, simply close and then you can open renew. Anyone knows how to solve this problems wih AXP?? Is better program with AXP on MDB format A2k?? Is the AXP less stable than A2k?? Thanks in advance Juan Men?ndez =========================================== MASTERCAFE SL - NIF B-82.617.614 www.mastercafe.com Deleg. Asturias Tel 985.88.49.44 / 627.531.764 Fax 627.500.205 info at mastercafe.com juan at mastercafe.com Deleg. Madrid Tel 627.474.285 cecilia at mastercafe.com =========================================== _______________________________________________ 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 _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From cfoust at infostatsystems.com Mon Jan 5 20:05:20 2004 From: cfoust at infostatsystems.com (Charlotte Foust) Date: Mon, 5 Jan 2004 18:05:20 -0800 Subject: [AccessD] FMSINC Applications Message-ID: We have them, but I don't bother with them. We avoid activeX controls, anyhow. if you have XP developer, the codelibrarian has routines for a lot of their Source Code stuff (some of which is out of date), and I just basically can't see any point in spending the money for tools I don't use. The Anaylyzer seems like overkill to me, and most of the stuff they market you could do yourself or find less expensive tools that will do what you need. Charlotte Foust -----Original Message----- From: MastercafeCTV [mailto:mastercafe at ctv.es] Sent: Monday, January 05, 2004 5:22 PM To: 'Access Developers discussion and problem solving' Subject: [AccessD] FMSINC Applications We are study to buy the FMS Inc. Utilities for AXP (Componente, Source Code, Analizer, etc... Developers pack). Any have some experience over this utlities, or can be evaluates in front of other similar?? Thanks Juan Menendez =========================================== MASTERCAFE SL - NIF B-82.617.614 www.mastercafe.com Deleg. Asturias Tel 985.88.49.44 / 627.531.764 Fax 627.500.205 info at mastercafe.com juan at mastercafe.com Deleg. Madrid Tel 627.474.285 cecilia at mastercafe.com =========================================== _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From wdhindman at bellsouth.net Mon Jan 5 22:11:20 2004 From: wdhindman at bellsouth.net (William Hindman) Date: Mon, 5 Jan 2004 23:11:20 -0500 Subject: [AccessD] FMSINC Applications References: Message-ID: <000e01c3d40b$23fc9370$6101a8c0@dejpolsys> ...I'm with Charlotte ...I had their whole shebang through '97 and made good use of their Analyzer and Detective tools ...but better code is almost always available through this list, live or archived, than what's in their Source Code ...and I also avoid ActiveX like the plague ...and now that a number of freebie or low cost tools have become available that do 95% of what Analyzer does, I just can't justify the money they want any more ...HTH :) William Hindman - Next Year In The Free State! ----- Original Message ----- From: "Charlotte Foust" To: "Access Developers discussion and problem solving" Sent: Monday, January 05, 2004 9:05 PM Subject: RE: [AccessD] FMSINC Applications > We have them, but I don't bother with them. We avoid activeX controls, > anyhow. if you have XP developer, the codelibrarian has routines for a > lot of their Source Code stuff (some of which is out of date), and I > just basically can't see any point in spending the money for tools I > don't use. The Anaylyzer seems like overkill to me, and most of the > stuff they market you could do yourself or find less expensive tools > that will do what you need. > > Charlotte Foust > > -----Original Message----- > From: MastercafeCTV [mailto:mastercafe at ctv.es] > Sent: Monday, January 05, 2004 5:22 PM > To: 'Access Developers discussion and problem solving' > Subject: [AccessD] FMSINC Applications > > > We are study to buy the FMS Inc. Utilities for AXP (Componente, Source > Code, Analizer, etc... Developers pack). > > Any have some experience over this utlities, or can be evaluates in > front of other similar?? > > Thanks > > Juan Menendez > > > =========================================== > MASTERCAFE SL - NIF B-82.617.614 > www.mastercafe.com > Deleg. Asturias > Tel 985.88.49.44 / 627.531.764 > Fax 627.500.205 > info at mastercafe.com > juan at mastercafe.com > Deleg. Madrid > Tel 627.474.285 > cecilia at mastercafe.com =========================================== > > _______________________________________________ > 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 > From mastercafe at ctv.es Mon Jan 5 22:55:35 2004 From: mastercafe at ctv.es (MastercafeCTV) Date: Tue, 6 Jan 2004 05:55:35 +0100 Subject: [AccessD] MDB Stability vs Perfomance In-Reply-To: Message-ID: <000801c3d411$52c76e40$69fa2250@servercafe> Our main programs are AXP at this moment, all in MDE format, but on A2k we have the error message to screen and on AXP some of them close the Access in the computer (same problem on Runtime version or AXP standar). The data container was A2k just august'03 and then change to AXP then beginning the problems... Too high size for some MDB that compacted have 4 mb and working more than 18 mb. At this moment all Applications and data are AXP (2002) format... But with corruption problems. Juan Menendez =========================================== MASTERCAFE SL - NIF B-82.617.614 www.mastercafe.com Deleg. Asturias Tel 985.88.49.44 / 627.531.764 Fax 627.500.205 info at mastercafe.com juan at mastercafe.com Deleg. Madrid Tel 627.474.285 cecilia at mastercafe.com =========================================== -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Charlotte Foust Sent: martes, 06 de enero de 2004 3:02 To: Access Developers discussion and problem solving Subject: RE: [AccessD] MDB Stability vs Perfomance I'm sorry, but it isn't clear to me whether you're talking about the file format or the version of Access you're using. If you have mixed versions updating the same database, you're likely to have corruption problems. What is your main program written in? Charlotte Foust -----Original Message----- From: MastercafeCTV [mailto:mastercafe at ctv.es] Sent: Monday, January 05, 2004 5:16 PM To: 'Access Developers discussion and problem solving' Subject: RE: [AccessD] MDB Stability vs Perfomance The MDE problem is correct, we saw months ago. And we have installed the 3 patches for AXP (SP-1 , Patch Office XP 2, and secur. Patches) but the most significant problem is our main program STEEL TPV that uses a STEELDAT.MDB only for data, this MDB have no problem with A2k format, and the last september change to AXP format, from this we repeat Compact & Repair every month. Juan Menendez =========================================== MASTERCAFE SL - NIF B-82.617.614 www.mastercafe.com Deleg. Asturias Tel 985.88.49.44 / 627.531.764 Fax 627.500.205 info at mastercafe.com juan at mastercafe.com Deleg. Madrid Tel 627.474.285 cecilia at mastercafe.com =========================================== -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Charlotte Foust Sent: martes, 06 de enero de 2004 2:08 To: Access Developers discussion and problem solving Subject: RE: [AccessD] MDB Stability vs Perfomance I haven't found AXP SP-1 to be any less stable or have more problems than A2k. Be aware, though, that if you switch to AXP, you will only be able to create an MDE in 2002 format, not in 2000 format. Charlotte Foust -----Original Message----- From: MastercafeCTV [mailto:mastercafe at ctv.es] Sent: Monday, January 05, 2004 4:50 PM To: 'Access Developers discussion and problem solving' Subject: [AccessD] MDB Stability vs Perfomance Hi group, on the last year we are changing all our applications from Access 2k to Access XP, but at this moment we have one problem on all applications that it take more time for maintenance and repair. MDB from Access 2k are much more stable VS MDB XP (better A2k) MDB from Access 2k have similar speed vs MDB XP (better A2k) Applications on A2k are much more stable vs MDB/MDE XP (better A2k) MDB A2k corrupted not always can be repaired vs MDB XP always was be repaired (Better AXP) On the last version for application FE we obtain sometimes a reset error, I explain: close tha Access XP with application without any error message or similar, simply close and then you can open renew. Anyone knows how to solve this problems wih AXP?? Is better program with AXP on MDB format A2k?? Is the AXP less stable than A2k?? Thanks in advance Juan Men?ndez =========================================== MASTERCAFE SL - NIF B-82.617.614 www.mastercafe.com Deleg. Asturias Tel 985.88.49.44 / 627.531.764 Fax 627.500.205 info at mastercafe.com juan at mastercafe.com Deleg. Madrid Tel 627.474.285 cecilia at mastercafe.com =========================================== _______________________________________________ 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 _______________________________________________ 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 From mastercafe at ctv.es Mon Jan 5 23:03:20 2004 From: mastercafe at ctv.es (MastercafeCTV) Date: Tue, 6 Jan 2004 06:03:20 +0100 Subject: [AccessD] Connection Strings In-Reply-To: <000a01c3d3f3$795086a0$69fa2250@servercafe> Message-ID: <000a01c3d412$67f587b0$69fa2250@servercafe> HELP DATA FOR GROUP We solved some problems with this web, you can see all Connections String possibles for Access, Sql, MySql, Pervasive, etc... For newbies (like us) on ADO connections strings and similar is a good solution. Juan Menendez =========================================== MASTERCAFE SL - NIF B-82.617.614 www.mastercafe.com Deleg. Asturias Tel 985.88.49.44 / 627.531.764 Fax 627.500.205 info at mastercafe.com juan at mastercafe.com Deleg. Madrid Tel 627.474.285 cecilia at mastercafe.com =========================================== From Alun.Garraway at otto.de Tue Jan 6 05:08:57 2004 From: Alun.Garraway at otto.de (Garraway, Alun) Date: Tue, 6 Jan 2004 12:08:57 +0100 Subject: AW: [AccessD] Form as Subform - Query Fails - Why? Message-ID: hallo tina, if you need some material on word automation from access try the databaseadvisors web site http://www.databaseadvisors.com/newsletters.htm in news letter July 2002 is an article about word automation (parts i & II) by Bryan Carbonnell, Part III is in the current news letter. hth alun -----Urspr?ngliche Nachricht----- Von: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]Im Auftrag von Tina Norris Fields Gesendet: Sonntag, 4. Januar 2004 13:36 An: Access Developers discussion and problem solving Betreff: Re: [AccessD] Form as Subform - Query Fails - Why? Hi again Gustav, I ended up keeping the button to just launch Word. I created a little macro in Word to open the acknowledgement form letter, which already looks for its data source as the tblAcknowledgePay in the TLA database. My user has only to click to merge the document, and there are her acknowledgement letters! It all looks much more spiffy and easy now than what she was doing - seriously. It used to be advisable to close Access before launching Word and loading a document to merge data from a database - (A95, A97) since Word would open an instance of Access as part of the merge process, and having two copies of Access open at one time placed heavy demands on the system resources. That no longer appears to be the case. I'm delighted. However, during my work on this little modification, from time to time Word would fail to find the data source with which it has been linked forever and functionality would disappear, i.e., the merge toolbar dimmed and no commands worked, Closing the programs and relaunching them fixed that usually. Now that I've finished fiddling with it, just running the queries and launching the merge form document, things are behaving nicely. I did study the Microsoft Automation help file, but the things it suggested weren't recognized from within Access, so I still have some learning to do there. Objects such as wordApp and wordDoc were unrecognized from within Access - worked great from within Word. So there has to be an import statement or something like that to tell Access to look to another library of objects, too. Back to the books! Thanks for your help. I will work on the syntax until the thing does work for me, I can see the situation arising again sometime. Best regards, Tina Gustav Brock wrote: >Hi Tina > >Try with > > Between > [Forms]![fInstructions]![subYourSubformControlName].Form![BeginningDate] > And > [Forms]![fInstructions]![subYourSubformControlName].Form![EndingDate] > >/gustav > > > > >>Hi John, >> >> > > > >>Thanks for the reply. I think I have not been completely clear about my >>quandary. The parameter query selects records based on the following: >> >> > > > >>Between [Forms]![fCalendar]![BeginningDate] And >>[Forms]![fCalendar]![EndingDate] >> >> > > > >>- which works fine as long as one sets the dates by opening fCalendar as >>a stand-alone form. >> >> > > > >>I made a form with a series of instructions, hoping to guide my user >>from step to step without having to remind the user to set the dates >>first in the fCalendar - >>the idea was to embed an instance of the fCalendar in the instruction >>form - set the dates right here in what is now a subform of the >>instruction form. >> >> > > > >>If one sets the dates in the embedded instance of fCalendar, the query >>does not find its parameters. Well, say I to myself, I probably need to >>tell the query where to find those date textboxes, but I do not find a >>way to identify them other than as they are already identified . Is >>there a collection other than [Forms] I need to find? When I examine my >>fCalendar through the subform control, I see all the correct textbox >>names - it certainly appears to be the same form - why does setting its >>dates not provide the necessary parameters to the query? I don't see it. >> >> > >_______________________________________________ >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 From Mark.Mitsules at ngc.com Tue Jan 6 07:19:41 2004 From: Mark.Mitsules at ngc.com (Mitsules, Mark S. (Newport News)) Date: Tue, 6 Jan 2004 08:19:41 -0500 Subject: [AccessD] FMSINC Applications Message-ID: Juan, I am in a unique situation where I deliver a "new" database to a customer on-demand based on current data. I use FMS' Total Access Detective to track what has been added, deleted, or modified since the last release. It was a real time-saver for me. Mark -----Original Message----- From: MastercafeCTV [mailto:mastercafe at ctv.es] Sent: Monday, January 05, 2004 8:22 PM To: 'Access Developers discussion and problem solving' Subject: [AccessD] FMSINC Applications We are study to buy the FMS Inc. Utilities for AXP (Componente, Source Code, Analizer, etc... Developers pack). Any have some experience over this utlities, or can be evaluates in front of other similar?? Thanks Juan Menendez =========================================== MASTERCAFE SL - NIF B-82.617.614 www.mastercafe.com Deleg. Asturias Tel 985.88.49.44 / 627.531.764 Fax 627.500.205 info at mastercafe.com juan at mastercafe.com Deleg. Madrid Tel 627.474.285 cecilia at mastercafe.com =========================================== _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From Erwin.Craps at ithelps.be Tue Jan 6 08:49:52 2004 From: Erwin.Craps at ithelps.be (Erwin Craps - IT Helps) Date: Tue, 6 Jan 2004 15:49:52 +0100 Subject: [AccessD] Excel to Access by clicking cells. Message-ID: <46B976F2B698FF46A4FE7636509B22DF03D0C7@stekelbes.ithelps.local> Hi guys Just brainstorming with myself to improve some stuff... We receive on a daily basis (7x7) a lot of excel files with data in it from several sources. We can not standarise those files for several reasons so we print these files en type the data manualy in Access. I was wondering if anyone ever has written a function so you could click the cells with the data and then right-click something and the data is passed to a recordset in Access depending on your multiselect order in Excel. Importing is not an option because these files change to much and are often to complex (more data in the file then we need). The data are boxoffice figures from cinema theatres. So the data we need as a result looks like this. Date1 MovieA Tickets Amount Date1 MovieB Tickets Amount Date1 MovieC Tickets Amount Date2 MovieA Tickets Amount Date2 MovieC Tickets Amount Date2 MovieD Tickets Amount The excel sheets can vary, it can be horizontal, vertical, double vertical double horizontal... So I believe a multi select would be a solution. I think it will be faster than printing and manual typing. I just want some code that put me on the road with this multiselecting thing and passing to Access. Erwin Erwin Craps Zaakvoerder www.ithelps.be/jonathan This E-mail is confidential, may be legally privileged, and is for the intended recipient only. Access, disclosure, copying, distribution, or reliance on any of it by anyone else is prohibited and may be a criminal offence. Please delete if obtained in error and E-mail confirmation to the sender. IT Helps - I.T. Help Center *** Box Office Belgium & Luxembourg www.ithelps.be * www.boxoffice.be * www.stadleuven.be IT Helps bvba* ** Mercatorpad 3 ** 3000 Leuven IT Helps * Phone: +32 16 296 404 * Fax: +32 16 296 405 E-mail: Info at ithelps.be Box Office ** Fax: +32 16 296 406 ** Box Office E-mail: Staff at boxoffice.be From dwaters at usinternet.com Tue Jan 6 08:54:05 2004 From: dwaters at usinternet.com (Dan Waters) Date: Tue, 6 Jan 2004 08:54:05 -0600 Subject: [AccessD] FMSINC Applications In-Reply-To: <11732638.1073395321725.JavaMail.root@localhost.localdomain> Message-ID: <000501c3d464$f1d804b0$de1811d8@DanWaters> Juan, I've used Analyzer and like it quite a bit. You will definitely get your money back in time and problems found and resolved before delivery to a client. There are many reporting options. Dan Waters -----Original Message----- From: MastercafeCTV [mailto:mastercafe at ctv.es] Sent: Monday, January 05, 2004 8:22 PM To: 'Access Developers discussion and problem solving' Subject: [AccessD] FMSINC Applications We are study to buy the FMS Inc. Utilities for AXP (Componente, Source Code, Analizer, etc... Developers pack). Any have some experience over this utlities, or can be evaluates in front of other similar?? Thanks Juan Menendez =========================================== MASTERCAFE SL - NIF B-82.617.614 www.mastercafe.com Deleg. Asturias Tel 985.88.49.44 / 627.531.764 Fax 627.500.205 info at mastercafe.com juan at mastercafe.com Deleg. Madrid Tel 627.474.285 cecilia at mastercafe.com =========================================== _______________________________________________ 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 From dwaters at usinternet.com Tue Jan 6 08:54:05 2004 From: dwaters at usinternet.com (Dan Waters) Date: Tue, 6 Jan 2004 08:54:05 -0600 Subject: [AccessD] Surgical Strike - Any Users? Message-ID: <000001c3d464$ee3402f0$de1811d8@DanWaters> Another 'survey' question! Does anyone have experience with Surgical Strike? I would certainly like to use it's capabilities. Are there any alternatives or competitors? Thanks! Dan Waters Quality Process Solutions From gustav at cactus.dk Tue Jan 6 09:07:34 2004 From: gustav at cactus.dk (Gustav Brock) Date: Tue, 6 Jan 2004 16:07:34 +0100 Subject: [AccessD] Excel to Access by clicking cells. In-Reply-To: <46B976F2B698FF46A4FE7636509B22DF03D0C7@stekelbes.ithelps.local> References: <46B976F2B698FF46A4FE7636509B22DF03D0C7@stekelbes.ithelps.local> Message-ID: <3725390810.20040106160734@cactus.dk> Hi Erwin If you can (multi)select cells in a worksheet, you can copy and paste into an appropriate open select query. Or you could apply a Named Range to that selecting, save and close, then link this Named Range as a linked table in Access. You could even record a macro for each cinema's worksheet to perform this action ... /gustav > We receive on a daily basis (7x7) a lot of excel files with data in it > from several sources. > We can not standarise those files for several reasons so we print these > files en type the data manualy in Access. > I was wondering if anyone ever has written a function so you could click > the cells with the data and then right-click something and the data is > passed to a recordset in Access depending on your multiselect order in > Excel. > Importing is not an option because these files change to much and are > often to complex (more data in the file then we need). > The data are boxoffice figures from cinema theatres. > So the data we need as a result looks like this. > Date1 MovieA Tickets Amount > Date1 MovieB Tickets Amount > Date1 MovieC Tickets Amount > Date2 MovieA Tickets Amount > Date2 MovieC Tickets Amount > Date2 MovieD Tickets Amount > The excel sheets can vary, it can be horizontal, vertical, double > vertical double horizontal... > So I believe a multi select would be a solution. I think it will be > faster than printing and manual typing. > I just want some code that put me on the road with this multiselecting > thing and passing to Access. From JHewson at karta.com Tue Jan 6 09:29:43 2004 From: JHewson at karta.com (Jim Hewson) Date: Tue, 6 Jan 2004 09:29:43 -0600 Subject: [AccessD] FMSINC Applications Message-ID: <4AE733BBEEE72647A9F950F7275F262E1126A7@nt04.karta.com> I have Analyzer 2000, Total Access Memo and Total Access Components. I have used the Memo control on several databases. All but one in-house. The client had a requirement for comments on a report to be presented to the CEO, CFO, and others on a monthly basis. It has saved my client hours. The only problem I had was that, I had used the demo version before I installed the purchased version on my development machine. It didn't work on the client's machine. I uninstalled the demo version and reinstalled the licensed version... no more problems. Client loves it. I have only used the Components on one database (same client). I needed a Red button to tell them to relink the tables after a new FE was ftp'd to there directory. I also included the Progress Meter for a couple of items that seemed to take forever! Even though, the total time was longer, it seems shorter to the client because of the visual aide. Both have worked well. I like the Analyzer, especially for those databases that I have inherited. I like the documenter and the diagrams. For example, the data flow diagram will give you the table name where it's used in queries, forms and reports. It will also tell you where the query is used (form or report). Examples of the documenter are that a form doesn't have a caption or that a query is used. Jim -----Original Message----- From: MastercafeCTV [mailto:mastercafe at ctv.es] Sent: Monday, January 05, 2004 7:22 PM To: 'Access Developers discussion and problem solving' Subject: [AccessD] FMSINC Applications We are study to buy the FMS Inc. Utilities for AXP (Componente, Source Code, Analizer, etc... Developers pack). Any have some experience over this utlities, or can be evaluates in front of other similar?? Thanks Juan Menendez =========================================== MASTERCAFE SL - NIF B-82.617.614 www.mastercafe.com Deleg. Asturias Tel 985.88.49.44 / 627.531.764 Fax 627.500.205 info at mastercafe.com juan at mastercafe.com Deleg. Madrid Tel 627.474.285 cecilia at mastercafe.com =========================================== _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From actebs at actebs.com.au Tue Jan 6 09:35:31 2004 From: actebs at actebs.com.au (ACTEBS) Date: Wed, 7 Jan 2004 02:35:31 +1100 Subject: [AccessD] MDE to MDB In-Reply-To: <9422834414.20040105151946@cactus.dk> Message-ID: <000601c3d46a$b7cd1ac0$0c05a8c0@carlton.local> Hi Gustav, Thanks for that...Hopefully I can conjure up a solution amongst that lot.... Regards Vlad -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Gustav Brock Sent: Tuesday, 6 January 2004 1:20 AM To: Access Developers discussion and problem solving Subject: Re: [AccessD] MDE to MDB Hi Vlad There was a thread on this (prepare yourself for usergroup dialect): http://dbforums.com/arch/110/2003/3/386647 /gustav > Is there any method of converting an MDE to an MDB? .. _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From john at winhaven.net Tue Jan 6 09:43:57 2004 From: john at winhaven.net (John Bartow) Date: Tue, 6 Jan 2004 09:43:57 -0600 Subject: [AccessD] Surgical Strike - Any Users? In-Reply-To: <000001c3d464$ee3402f0$de1811d8@DanWaters> Message-ID: I have. It works just fine for situations where it is applicable. I did use it with one client (that had A97 set up on all of their PCs) and it makes the end user updates very easy and worry free. Unfortunately I can't use it much as I deliver my apps as .MDEs. Surgical Strike doesn't work with MDEs. If you are in a situation where you are updating MDBs. If not, I don't recommend it. John B. > -----Original Message----- > From: accessd-bounces at databaseadvisors.com > [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Dan Waters > Sent: Tuesday, January 06, 2004 8:54 AM > To: Database Advisors > Subject: [AccessD] Surgical Strike - Any Users? > > > Another 'survey' question! > > Does anyone have experience with Surgical Strike? I would > certainly like to > use it's capabilities. > > Are there any alternatives or competitors? > > Thanks! > Dan Waters > Quality Process Solutions > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com > > From andy at minstersystems.co.uk Tue Jan 6 09:41:55 2004 From: andy at minstersystems.co.uk (Andy Lacey) Date: Tue, 6 Jan 2004 15:41:55 +0000 Subject: [AccessD] Get Folder Name via API Message-ID: <20040106154152.230D5255E94@smithers.nildram.co.uk> Must've done thsi before but can't find it. I want to ask the user for a folder name (into which I'm going to store stuff). I want to use the Windows common file dialog so that it looks neat and offers to create a new folder and so on. However I don't want to put a Common Dialog control on the form (always has version issues) so want to use the API method. But the code I have (from Dev Ashish) insists on a filename not just a folder, and the other code on his site to browse a folder list doesn't use the normal dialog. Anyone got code for this? -- Andy Lacey http://www.minstersystems.co.uk ________________________________________________ Message sent using UebiMiau 2.7.2 From andy at minstersystems.co.uk Tue Jan 6 09:54:31 2004 From: andy at minstersystems.co.uk (Andy Lacey) Date: Tue, 6 Jan 2004 15:54:31 +0000 Subject: [AccessD] Surgical Strike - Any Users? Message-ID: <20040106155428.50DD9251A3F@smithers.nildram.co.uk> Dan, I take it you want to distribute FE mods, cos if it's just BE mods then our own very BEU (BackEnd Upgrader) will do that for you for free. See http://www.databaseadvisors.com/downloads.htm -- Andy Lacey http://www.minstersystems.co.uk --------- Original Message -------- From: "Access Developers discussion and problem solving" To: "Database Advisors" Subject: [AccessD] Surgical Strike - Any Users? Date: 06/01/04 20:56 Another 'survey' question! Does anyone have experience with Surgical Strike? I would certainly like to use it's capabilities. Are there any alternatives or competitors? Thanks! Dan Waters Quality Process Solutions _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com ________________________________________________ Message sent using UebiMiau 2.7.2 From bheid at appdevgrp.com Tue Jan 6 10:00:22 2004 From: bheid at appdevgrp.com (Bobby Heid) Date: Tue, 6 Jan 2004 11:00:22 -0500 Subject: [AccessD] Get Folder Name via API In-Reply-To: <916187228923D311A6FE00A0CC3FAA3071DB87@ADGSERVER> Message-ID: <916187228923D311A6FE00A0CC3FAA305BB139@ADGSERVER> Try this. Call by passing a reference to the calling form I.e. strFolder=GetFolder(Me) Let me know if this does not work as I am cutting and pasting from a module and may have left something out. Bobby Private Declare Function SHGetPathFromIDList Lib "shell32" _ (ByVal pidList As Long, ByVal lpBuffer As String) As Long Private Declare Sub CoTaskMemFree Lib "ole32.dll" (ByVal hMem As Long) Private Declare Function lstrcat Lib "kernel32" Alias "lstrcatA" _ (ByVal lpString1 As String, ByVal lpString2 As String) As Long Private Declare Function SHBrowseForFolder Lib "shell32" (lpbi As BrowseInfo) As Long Private Type BrowseInfo hWndOwner As Long pIDLRoot As Long pszDisplayName As Long lpszTitle As Long ulFlags As Long lpfnCallback As Long lParam As Long iImage As Long End Type Private Const BIF_RETURNONLYFSDIRS = 1 Private Const BIF_NEWDIALOGSTYLE = &H40 Private Const BIF_EDITBOX = &H10 Private Const BIF_USENEWUI = BIF_NEWDIALOGSTYLE Private Const BIF_STATUSTEXT As Integer = &H4 Public Function GetFolder(ByRef frmShow As Form) As String Dim iNull As Integer Dim lpIDList As Long Dim lResult As Long Dim sPath As String Dim udtBI As BrowseInfo With udtBI 'Set the owner window .hWndOwner = frmShow.Hwnd 'lstrcat appends the two strings and returns the memory address .lpszTitle = lstrcat("Directory to scan", "") 'Return only if the user selected a directory .ulFlags = BIF_RETURNONLYFSDIRS + BIF_USENEWUI End With 'Show the 'Browse for folder' dialog lpIDList = SHBrowseForFolder(udtBI) If lpIDList Then sPath = String$(MAX_PATH, 0) 'Get the path from the IDList SHGetPathFromIDList lpIDList, sPath 'free the block of memory CoTaskMemFree lpIDList iNull = InStr(sPath, vbNullChar) If iNull Then sPath = Left$(sPath, iNull - 1) End If End If GetFolder = "" & sPath End Function -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Andy Lacey Sent: Tuesday, January 06, 2004 10:42 AM To: Access Developers discussion and problem solving Subject: [AccessD] Get Folder Name via API Must've done thsi before but can't find it. I want to ask the user for a folder name (into which I'm going to store stuff). I want to use the Windows common file dialog so that it looks neat and offers to create a new folder and so on. However I don't want to put a Common Dialog control on the form (always has version issues) so want to use the API method. But the code I have (from Dev Ashish) insists on a filename not just a folder, and the other code on his site to browse a folder list doesn't use the normal dialog. Anyone got code for this? -- Andy Lacey http://www.minstersystems.co.uk ________________________________________________ Message sent using UebiMiau 2.7.2 _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From cfoust at infostatsystems.com Tue Jan 6 10:05:28 2004 From: cfoust at infostatsystems.com (Charlotte Foust) Date: Tue, 6 Jan 2004 08:05:28 -0800 Subject: [AccessD] MDB Stability vs Perfomance Message-ID: Access 2000 can't open 2002 format files. Is that the nature of the error message, corrupted database file? Or are you talking about problems you had when using the 2000 file format for the datafile with an AXP front end? I prefer to use the 2000 format for data files to avoid the unrecoverable bloat issue in 2002 format. We haven't had any problems with them in our commercial applications. You do need to make sure that all your machines have the same service packs of Office XP and Jet installed however. Maybe if you give more specific information about the kind of error messages you're getting, someone else will have some ideas. Charlotte Foust -----Original Message----- From: MastercafeCTV [mailto:mastercafe at ctv.es] Sent: Monday, January 05, 2004 8:56 PM To: 'Access Developers discussion and problem solving' Subject: RE: [AccessD] MDB Stability vs Perfomance Our main programs are AXP at this moment, all in MDE format, but on A2k we have the error message to screen and on AXP some of them close the Access in the computer (same problem on Runtime version or AXP standar). The data container was A2k just august'03 and then change to AXP then beginning the problems... Too high size for some MDB that compacted have 4 mb and working more than 18 mb. At this moment all Applications and data are AXP (2002) format... But with corruption problems. Juan Menendez =========================================== MASTERCAFE SL - NIF B-82.617.614 www.mastercafe.com Deleg. Asturias Tel 985.88.49.44 / 627.531.764 Fax 627.500.205 info at mastercafe.com juan at mastercafe.com Deleg. Madrid Tel 627.474.285 cecilia at mastercafe.com =========================================== -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Charlotte Foust Sent: martes, 06 de enero de 2004 3:02 To: Access Developers discussion and problem solving Subject: RE: [AccessD] MDB Stability vs Perfomance I'm sorry, but it isn't clear to me whether you're talking about the file format or the version of Access you're using. If you have mixed versions updating the same database, you're likely to have corruption problems. What is your main program written in? Charlotte Foust -----Original Message----- From: MastercafeCTV [mailto:mastercafe at ctv.es] Sent: Monday, January 05, 2004 5:16 PM To: 'Access Developers discussion and problem solving' Subject: RE: [AccessD] MDB Stability vs Perfomance The MDE problem is correct, we saw months ago. And we have installed the 3 patches for AXP (SP-1 , Patch Office XP 2, and secur. Patches) but the most significant problem is our main program STEEL TPV that uses a STEELDAT.MDB only for data, this MDB have no problem with A2k format, and the last september change to AXP format, from this we repeat Compact & Repair every month. Juan Menendez =========================================== MASTERCAFE SL - NIF B-82.617.614 www.mastercafe.com Deleg. Asturias Tel 985.88.49.44 / 627.531.764 Fax 627.500.205 info at mastercafe.com juan at mastercafe.com Deleg. Madrid Tel 627.474.285 cecilia at mastercafe.com =========================================== -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Charlotte Foust Sent: martes, 06 de enero de 2004 2:08 To: Access Developers discussion and problem solving Subject: RE: [AccessD] MDB Stability vs Perfomance I haven't found AXP SP-1 to be any less stable or have more problems than A2k. Be aware, though, that if you switch to AXP, you will only be able to create an MDE in 2002 format, not in 2000 format. Charlotte Foust -----Original Message----- From: MastercafeCTV [mailto:mastercafe at ctv.es] Sent: Monday, January 05, 2004 4:50 PM To: 'Access Developers discussion and problem solving' Subject: [AccessD] MDB Stability vs Perfomance Hi group, on the last year we are changing all our applications from Access 2k to Access XP, but at this moment we have one problem on all applications that it take more time for maintenance and repair. MDB from Access 2k are much more stable VS MDB XP (better A2k) MDB from Access 2k have similar speed vs MDB XP (better A2k) Applications on A2k are much more stable vs MDB/MDE XP (better A2k) MDB A2k corrupted not always can be repaired vs MDB XP always was be repaired (Better AXP) On the last version for application FE we obtain sometimes a reset error, I explain: close tha Access XP with application without any error message or similar, simply close and then you can open renew. Anyone knows how to solve this problems wih AXP?? Is better program with AXP on MDB format A2k?? Is the AXP less stable than A2k?? Thanks in advance Juan Men?ndez =========================================== MASTERCAFE SL - NIF B-82.617.614 www.mastercafe.com Deleg. Asturias Tel 985.88.49.44 / 627.531.764 Fax 627.500.205 info at mastercafe.com juan at mastercafe.com Deleg. Madrid Tel 627.474.285 cecilia at mastercafe.com =========================================== _______________________________________________ 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 _______________________________________________ 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 _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From actebs at actebs.com.au Tue Jan 6 10:07:28 2004 From: actebs at actebs.com.au (ACTEBS) Date: Wed, 7 Jan 2004 03:07:28 +1100 Subject: [AccessD] Get Folder Name via API In-Reply-To: <20040106154152.230D5255E94@smithers.nildram.co.uk> Message-ID: <000701c3d46f$2e81e930$0c05a8c0@carlton.local> Andy, This should help you out (Not sure where I got it from originally - apologies to the author): Private Type BrowseInfo hWndOwner As Long pIDLRoot As Long pszDisplayName As Long lpszTitle As Long ulFlags As Long lpfnCallback As Long lParam As Long iImage As Long End Type Private Const BIF_RETURNONLYFSDIRS = 1 Private Const MAX_PATH = 260 Private Declare Sub CoTaskMemFree Lib "ole32.dll" (ByVal hMem As Long) Private Declare Function lstrcat Lib "kernel32" Alias "lstrcatA" _ (ByVal lpString1 As String, ByVal lpString2 As String) As Long Private Declare Function SHBrowseForFolder Lib "shell32" _ (lpbi As BrowseInfo) As Long Private Declare Function SHGetPathFromIDList Lib "shell32" _ (ByVal pidList As Long, ByVal lpBuffer As String) As Long Public Function BrowseForFolder(hWndOwner As Long, sPrompt As String) As String Dim iNull As Integer Dim lpIDList As Long Dim lResult As Long Dim sPath As String Dim udtBI As BrowseInfo With udtBI .hWndOwner = hWndOwner .lpszTitle = lstrcat(sPrompt, "") .ulFlags = BIF_RETURNONLYFSDIRS End With lpIDList = SHBrowseForFolder(udtBI) If lpIDList Then sPath = String$(MAX_PATH, 0) lResult = SHGetPathFromIDList(lpIDList, sPath) Call CoTaskMemFree(lpIDList) iNull = InStr(sPath, vbNullChar) If iNull Then sPath = Left$(sPath, iNull - 1) End If End If BrowseForFolder = sPath End Function You can use it as in the following example: Me!YourTextBox = BrowseForFolder(0, "Heading For The Browse Dialogue Box") HTH Regards Vlad -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Andy Lacey Sent: Wednesday, 7 January 2004 2:42 AM To: Access Developers discussion and problem solving Subject: [AccessD] Get Folder Name via API Must've done thsi before but can't find it. I want to ask the user for a folder name (into which I'm going to store stuff). I want to use the Windows common file dialog so that it looks neat and offers to create a new folder and so on. However I don't want to put a Common Dialog control on the form (always has version issues) so want to use the API method. But the code I have (from Dev Ashish) insists on a filename not just a folder, and the other code on his site to browse a folder list doesn't use the normal dialog. Anyone got code for this? -- Andy Lacey http://www.minstersystems.co.uk ________________________________________________ Message sent using UebiMiau 2.7.2 _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From bheid at appdevgrp.com Tue Jan 6 10:18:24 2004 From: bheid at appdevgrp.com (Bobby Heid) Date: Tue, 6 Jan 2004 11:18:24 -0500 Subject: [AccessD] Get Folder Name via API In-Reply-To: <916187228923D311A6FE00A0CC3FAA3071DB9D@ADGSERVER> Message-ID: <916187228923D311A6FE00A0CC3FAA305BB13A@ADGSERVER> LOL, Probably the same place that I did! And I can't remember either. Bobby -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of ACTEBS Sent: Tuesday, January 06, 2004 11:07 AM To: 'Access Developers discussion and problem solving' Subject: RE: [AccessD] Get Folder Name via API Andy, This should help you out (Not sure where I got it from originally - apologies to the author): Private Type BrowseInfo hWndOwner As Long pIDLRoot As Long pszDisplayName As Long lpszTitle As Long ulFlags As Long lpfnCallback As Long lParam As Long iImage As Long End Type Private Const BIF_RETURNONLYFSDIRS = 1 Private Const MAX_PATH = 260 Private Declare Sub CoTaskMemFree Lib "ole32.dll" (ByVal hMem As Long) Private Declare Function lstrcat Lib "kernel32" Alias "lstrcatA" _ (ByVal lpString1 As String, ByVal lpString2 As String) As Long Private Declare Function SHBrowseForFolder Lib "shell32" _ (lpbi As BrowseInfo) As Long Private Declare Function SHGetPathFromIDList Lib "shell32" _ (ByVal pidList As Long, ByVal lpBuffer As String) As Long Public Function BrowseForFolder(hWndOwner As Long, sPrompt As String) As String Dim iNull As Integer Dim lpIDList As Long Dim lResult As Long Dim sPath As String Dim udtBI As BrowseInfo With udtBI .hWndOwner = hWndOwner .lpszTitle = lstrcat(sPrompt, "") .ulFlags = BIF_RETURNONLYFSDIRS End With lpIDList = SHBrowseForFolder(udtBI) If lpIDList Then sPath = String$(MAX_PATH, 0) lResult = SHGetPathFromIDList(lpIDList, sPath) Call CoTaskMemFree(lpIDList) iNull = InStr(sPath, vbNullChar) If iNull Then sPath = Left$(sPath, iNull - 1) End If End If BrowseForFolder = sPath End Function You can use it as in the following example: Me!YourTextBox = BrowseForFolder(0, "Heading For The Browse Dialogue Box") HTH Regards Vlad -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Andy Lacey Sent: Wednesday, 7 January 2004 2:42 AM To: Access Developers discussion and problem solving Subject: [AccessD] Get Folder Name via API Must've done thsi before but can't find it. I want to ask the user for a folder name (into which I'm going to store stuff). I want to use the Windows common file dialog so that it looks neat and offers to create a new folder and so on. However I don't want to put a Common Dialog control on the form (always has version issues) so want to use the API method. But the code I have (from Dev Ashish) insists on a filename not just a folder, and the other code on his site to browse a folder list doesn't use the normal dialog. Anyone got code for this? -- Andy Lacey http://www.minstersystems.co.uk ________________________________________________ Message sent using UebiMiau 2.7.2 _______________________________________________ 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 From Erwin.Craps at ithelps.be Tue Jan 6 10:19:05 2004 From: Erwin.Craps at ithelps.be (Erwin Craps - IT Helps) Date: Tue, 6 Jan 2004 17:19:05 +0100 Subject: [AccessD] Excel to Access by clicking cells. Message-ID: <46B976F2B698FF46A4FE7636509B22DF03D0C8@stekelbes.ithelps.local> I don't think so Gustav, it's not that easy (:- The source layout can be compleetly turned around, or even not structured (matrix based). Name range is not posible neither cause of layout and to slow (it has to be done every day). Linking/importing is out of the question, no way Jose... The structure of the Excel files will no permit me that. I must avoid at any cost to change anything to the files because it has to be done on a 7x7 daily base and just printing and typing it in manualy would be speedier. I don't see any other why than clicking on the appropriate cells making a multiselect and somehow with the clickorder decide which cell is what... You should see the file to fully understand my problem, but the data is confidential and preparing some dummies would take me half a day... Erwin -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Gustav Brock Sent: Tuesday, January 06, 2004 4:08 PM To: Access Developers discussion and problem solving Subject: Re: [AccessD] Excel to Access by clicking cells. Hi Erwin If you can (multi)select cells in a worksheet, you can copy and paste into an appropriate open select query. Or you could apply a Named Range to that selecting, save and close, then link this Named Range as a linked table in Access. You could even record a macro for each cinema's worksheet to perform this action ... /gustav > We receive on a daily basis (7x7) a lot of excel files with data in it > from several sources. > We can not standarise those files for several reasons so we print > these files en type the data manualy in Access. > I was wondering if anyone ever has written a function so you could > click the cells with the data and then right-click something and the > data is passed to a recordset in Access depending on your multiselect > order in Excel. > Importing is not an option because these files change to much and are > often to complex (more data in the file then we need). > The data are boxoffice figures from cinema theatres. > So the data we need as a result looks like this. > Date1 MovieA Tickets Amount > Date1 MovieB Tickets Amount > Date1 MovieC Tickets Amount > Date2 MovieA Tickets Amount > Date2 MovieC Tickets Amount > Date2 MovieD Tickets Amount > The excel sheets can vary, it can be horizontal, vertical, double > vertical double horizontal... > So I believe a multi select would be a solution. I think it will be > faster than printing and manual typing. > I just want some code that put me on the road with this multiselecting > thing and passing to Access. _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From rgilimited at btconnect.com Tue Jan 6 10:24:23 2004 From: rgilimited at btconnect.com (Robin Lawrence) Date: Tue, 6 Jan 2004 16:24:23 -0000 Subject: [AccessD] Get Folder Name via API In-Reply-To: <20040106154152.230D5255E94@smithers.nildram.co.uk> Message-ID: <000401c3d471$8c3a74a0$5373a8c0@local> Andy, I use this folder browser from Carl Tribble '.====================================================================== === '.Browse Folders Module '.Copyright 1999 Tribble Software. All rights reserved. '.Phone : (616) 455-2055 '.E-mail : carltribble at earthlink.net '.====================================================================== === ' DO NOT DELETE THE COMMENTS ABOVE. All other comments in this module ' may be deleted from production code, but lines above must remain. '----------------------------------------------------------------------- --- '.Description : This module calls three functions in shell32.dll to allow '. the user to browse for a folder. '. '.Written By : Carl Tribble '.Date Created : 10/05/1999 08:06:31 PM '.Rev. History : ' Comments : The public entry point is the procedure tsGetPathFromUser, ' The selected folder name is returned in the form of a full ' path but without the trailing "\". If the User presses ' Cancel, or an error occurs, the procedure returns Null. ' This module is completely self-contained. Simply copy it ' into your database to use it. '.---------------------------------------------------------------------- --- '. ' ADDITIONAL NOTES: ' ' If you want your user to browse for file names you must use the module ' basBrowseFiles instead, or the common dialog activeX control. ' ' TO STREAMLINE this module for production programs, you should remove: ' 1) Unnecessary comments ' 2) Flag and Root Folder Constants which you do not intend to use. ' 3) The test procedure tsGetPathFromUserTest ' *DO NOT REMOVE ANYTHING ELSE. Everything else is required. ' '----------------------------------------------------------------------- --- ' ' INSTRUCTIONS: ' ' ( For a working example, open the Debug window ) ' ( and enter tsGetPathFromUserTest. ) ' ( ) ' ( frmBrowseFoldersTest, if available, provides ) ' ( additional testing features. ) ' '.All the arguments for the function are optional. You may call it with no '.arguments whatsoever and simply assign its return value to a variable of '.the Variant type. For example: '. '. varFileName = tsGetPathFromUser() '. '.The function will return: '. the full path selected by the user, or '. Null if an error occurs or if the user presses Cancel. '. '.Optional arguments may include any of the following: '. rlngFlags : one or more of the tscBF* Flag constants (declared '. below). Combine multiple constants like this: '. tscBFReturnOnlyFSDirs Or tscBFDontGoBelowDomain '. lngRootFolder : a tscRF Root Folder constant (declared below) indicating '. what folder you want to start with. These constants are '. not to be combined, just pick the one you want to use. '. strHeaderMsg : a message you want to appear at the top of the dialog '. box. Note although it is refered to internally as the '. Title it is NOT the dialog title, aka caption (the ' caption is always "Browse for Folder"). The message ' can be up to about 110 characters in length and ' up to two lines. It appears below the Title bar, but ' above the actual folder box. ' '.---------------------------------------------------------------------- --- '. Option Compare Database Option Explicit Private Declare Function SHGetPathFromIDList Lib "shell32.dll" _ Alias "SHGetPathFromIDListA" (ByVal pidl As Long, _ ByVal pszPath As String) As Long Private Declare Function SHGetSpecialFolderLocation Lib "shell32.dll" _ (ByVal hwndOwner As Long, ByVal nFolder As Long, _ pidl As ITEMIDLIST) As Long Private Declare Function SHBrowseForFolder Lib "shell32.dll" Alias _ "SHBrowseForFolderA" (lpBrowseInfo As BROWSEINFO) As Long Private Type BROWSEINFO hOwner As Long pidlRoot As Long pszDisplayName As String lpszTitle As String ulFlags As Long lpfn As Long lParam As Long iImage As Long End Type Private Type SHITEMID cb As Long abID As Byte End Type Private Type ITEMIDLIST mkid As SHITEMID End Type ' Flag Constants Public Const tscBFReturnOnlyFSDirs = &H1 Public Const tscBFDontGoBelowDomain = &H2 Public Const tscBFStatusText = &H4 Public Const tscBFReturnFSAncestors = &H8 Public Const tscBFBrowseForComputer = &H1000 Public Const tscBFBrowseForPrinter = &H2000 ' Root Folder Constants Public Const tscRFDesktop = &H0 Public Const tscRFPrograms = &H2 Public Const tscRFControls = &H3 Public Const tscRFPrinters = &H4 Public Const tscRFPersonal = &H5 Public Const tscRFFavorites = &H6 Public Const tscRFRecent = &H8 Public Const tscRFBitBucket = &HA Public Const tscRFDesktopDirectory = &H10 Public Const tscRFDrives = &H11 Public Const tscRFNetwork = &H12 Public Const tscRFNethood = &H13 Public Const tscRFTemplates = &H15 Public Function tsGetPathFromUser( _ Optional ByRef rlngflags As Long = tscBFReturnOnlyFSDirs, _ Optional ByVal lngRootFolder As Long = tscRFDrives, _ Optional ByVal strHeaderMsg As String = "") As Variant On Error GoTo tsGetPathFromUser_Err Const conBufLen = 512 Dim bi As BROWSEINFO Dim idl As ITEMIDLIST Dim lngReturn As Long Dim pidl As Long Dim strpath As String bi.hOwner = Application.hWndAccessApp lngReturn = SHGetSpecialFolderLocation( _ ByVal Application.hWndAccessApp, lngRootFolder, idl) bi.pidlRoot = idl.mkid.cb bi.lpszTitle = strHeaderMsg bi.ulFlags = rlngflags pidl = SHBrowseForFolder(bi) strpath = Space(conBufLen) lngReturn = SHGetPathFromIDList(ByVal pidl, ByVal strpath) If lngReturn <> 0 Then tsGetPathFromUser = tsTrimNull(strpath) Else tsGetPathFromUser = Null End If tsGetPathFromUser_End: On Error GoTo 0 Exit Function tsGetPathFromUser_Err: Beep MsgBox Err.Description, , "Error: " & Err.Number _ & " in function basBrowseFolders.tsGetPathFromUser" Resume tsGetPathFromUser_End End Function ' Trim Nulls from a string returned by an API call. Private Function tsTrimNull(ByVal strItem As String) As String On Error GoTo tsTrimNull_Err Dim i As Integer i = InStr(strItem, vbNullChar) If i > 0 Then tsTrimNull = Left(strItem, i - 1) Else tsTrimNull = strItem End If tsTrimNull_End: On Error GoTo 0 Exit Function tsTrimNull_Err: Beep MsgBox Err.Description, , "Error: " & Err.Number _ & " in function basBrowseFolders.tsTrimNull" Resume tsTrimNull_End End Function '----------------------------------------------------------------------- --- ' Project : tsDeveloperTools ' Description : An example of how you can call tsGetPathFromUser() ' Calls : ' Accepts : ' Returns : ' Written By : Carl Tribble ' Date Created : 05/04/1999 11:19:41 AM ' Rev. History : ' Comments : This is provided merely as an example to the programmer ' It may be safely deleted from production code. '----------------------------------------------------------------------- --- Public Sub tsGetPathFromUserTest() On Error GoTo tsGetPathFromUserTest_Err Dim lngFlags As Long Dim lngRoot As Long Dim strHeaderMsg As String Dim varPath As Variant lngFlags = tscBFReturnOnlyFSDirs Or tscBFDontGoBelowDomain lngRoot = tscRFDrives strHeaderMsg = "This is where the header message displays. " _ & vbCrLf & "Note it only holds 2 full lines (about 100 " _ & "characters altogether)." varPath = tsGetPathFromUser(lngFlags, lngRoot, strHeaderMsg) If IsNull(varPath) Then Debug.Print "User pressed 'Cancel'." Else Debug.Print varPath End If tsGetPathFromUserTest_End: On Error GoTo 0 Exit Sub tsGetPathFromUserTest_Err: Beep MsgBox Err.Description, , "Error: " & Err.Number _ & " in sub basBrowseFolders.tsGetPathFromUserTest" Resume tsGetPathFromUserTest_End End Sub -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Andy Lacey Sent: 06 January 2004 15:42 To: Access Developers discussion and problem solving Subject: [AccessD] Get Folder Name via API Must've done thsi before but can't find it. I want to ask the user for a folder name (into which I'm going to store stuff). I want to use the Windows common file dialog so that it looks neat and offers to create a new folder and so on. However I don't want to put a Common Dialog control on the form (always has version issues) so want to use the API method. But the code I have (from Dev Ashish) insists on a filename not just a folder, and the other code on his site to browse a folder list doesn't use the normal dialog. Anyone got code for this? -- Andy Lacey http://www.minstersystems.co.uk ________________________________________________ Message sent using UebiMiau 2.7.2 _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From dwaters at usinternet.com Tue Jan 6 11:34:27 2004 From: dwaters at usinternet.com (Dan Waters) Date: Tue, 6 Jan 2004 11:34:27 -0600 Subject: [AccessD] Get Folder Name via API In-Reply-To: <12102777.1073404283807.JavaMail.root@sniper.marix.com> Message-ID: <000c01c3d47b$556cde90$de1811d8@DanWaters> Andy, This is what I use - credits are included. Cut and paste into a standard module. I use a global string variable to carry the path to a folder. Dan Waters '------------------------------- Option Compare Database Option Explicit Private Type BrowseInfo hWndOwner As Long pIDLRoot As Long pszDisplayName As Long lpszTitle As Long ulFlags As Long lpfnCallback As Long lParam As Long iImage As Long End Type Const BIF_RETURNONLYFSDIRS = 1 Const MAX_PATH = 260 Private Declare Sub CoTaskMemFree Lib "ole32.dll" (ByVal hMem As Long) Private Declare Function lstrcat Lib "kernel32" Alias "lstrcatA" (ByVal lpString1 As String, ByVal lpString2 As String) As Long Private Declare Function SHBrowseForFolder Lib "shell32" (lpbi As BrowseInfo) As Long Private Declare Function SHGetPathFromIDList Lib "shell32" (ByVal pidList As Long, ByVal lpBuffer As String) As Long '--------------------------------- Public Sub GetFolderName() On Error GoTo EH 'KPD-Team 1998 'URL: http://www.allapi.net/ 'KPDTeam at Allapi.net Dim intNull As Integer Dim lngIDList As Long Dim lngResult As Long Dim stgPath As String Dim udtBI As BrowseInfo With udtBI 'Set the owner window '.hWndOwner = Me.hwnd 'lstrcat appends the two strings and returns the memory address '.lpszTitle = lstrcat("C:\", "") 'Return only if the user selected a directory .ulFlags = BIF_RETURNONLYFSDIRS End With 'Show the 'Browse for folder' dialog lngIDList = SHBrowseForFolder(udtBI) If lngIDList Then stgPath = String$(MAX_PATH, 0) 'Get the path from the IDList SHGetPathFromIDList lngIDList, stgPath 'free the block of memory CoTaskMemFree lngIDList '-- Get location of first null value intNull = InStr(stgPath, vbNullChar) If intNull > 0 Then '-- Trim nulls from name GstgFolderName = Left$(stgPath, intNull - 1) Else GstgFolderName = "" End If Else GstgFolderName = "" End If Exit Sub EH: Application.Echo True Call GlobalErrors("", Err.Number, Err.Description, CurrentObjectName, "GetFolderName") End Sub -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Andy Lacey Sent: Tuesday, January 06, 2004 9:42 AM To: Access Developers discussion and problem solving Subject: [AccessD] Get Folder Name via API Must've done thsi before but can't find it. I want to ask the user for a folder name (into which I'm going to store stuff). I want to use the Windows common file dialog so that it looks neat and offers to create a new folder and so on. However I don't want to put a Common Dialog control on the form (always has version issues) so want to use the API method. But the code I have (from Dev Ashish) insists on a filename not just a folder, and the other code on his site to browse a folder list doesn't use the normal dialog. Anyone got code for this? -- Andy Lacey http://www.minstersystems.co.uk ________________________________________________ Message sent using UebiMiau 2.7.2 _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From dwaters at usinternet.com Tue Jan 6 11:34:27 2004 From: dwaters at usinternet.com (Dan Waters) Date: Tue, 6 Jan 2004 11:34:27 -0600 Subject: [AccessD] Surgical Strike - Any Users? In-Reply-To: <4221699.1073406440465.JavaMail.root@sniper.marix.com> Message-ID: <000d01c3d47b$58d6e490$de1811d8@DanWaters> Andy, So that's what the BEU does!! I should have understood. Actually, I will want to distribute both FE and BE mods to .mdb's. I'll look at the BEU in detail. Thanks! Dan Waters -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Andy Lacey Sent: Tuesday, January 06, 2004 9:55 AM To: Access Developers discussion and problem solving Subject: Re: [AccessD] Surgical Strike - Any Users? Dan, I take it you want to distribute FE mods, cos if it's just BE mods then our own very BEU (BackEnd Upgrader) will do that for you for free. See http://www.databaseadvisors.com/downloads.htm -- Andy Lacey http://www.minstersystems.co.uk --------- Original Message -------- From: "Access Developers discussion and problem solving" To: "Database Advisors" Subject: [AccessD] Surgical Strike - Any Users? Date: 06/01/04 20:56 Another 'survey' question! Does anyone have experience with Surgical Strike? I would certainly like to use it's capabilities. Are there any alternatives or competitors? Thanks! Dan Waters Quality Process Solutions _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com ________________________________________________ Message sent using UebiMiau 2.7.2 _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From dwaters at usinternet.com Tue Jan 6 11:46:31 2004 From: dwaters at usinternet.com (Dan Waters) Date: Tue, 6 Jan 2004 11:46:31 -0600 Subject: [AccessD] Surgical Strike - Any Users? In-Reply-To: <1981611.1073406440778.JavaMail.root@sniper.marix.com> Message-ID: <000e01c3d47d$07ded370$de1811d8@DanWaters> Thanks John! I'll be using .mdb's so this is good news! Dan -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of John Bartow Sent: Tuesday, January 06, 2004 9:44 AM To: Access Developers discussion and problem solving Subject: RE: [AccessD] Surgical Strike - Any Users? I have. It works just fine for situations where it is applicable. I did use it with one client (that had A97 set up on all of their PCs) and it makes the end user updates very easy and worry free. Unfortunately I can't use it much as I deliver my apps as .MDEs. Surgical Strike doesn't work with MDEs. If you are in a situation where you are updating MDBs. If not, I don't recommend it. John B. > -----Original Message----- > From: accessd-bounces at databaseadvisors.com > [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Dan Waters > Sent: Tuesday, January 06, 2004 8:54 AM > To: Database Advisors > Subject: [AccessD] Surgical Strike - Any Users? > > > Another 'survey' question! > > Does anyone have experience with Surgical Strike? I would certainly > like to use it's capabilities. > > Are there any alternatives or competitors? > > Thanks! > Dan Waters > Quality Process Solutions > _______________________________________________ > 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 From mastercafe at ctv.es Tue Jan 6 12:07:36 2004 From: mastercafe at ctv.es (MastercafeCTV) Date: Tue, 6 Jan 2004 19:07:36 +0100 Subject: [AccessD] MDB Stability vs Perfomance In-Reply-To: Message-ID: <002101c3d47f$f7913690$69fa2250@servercafe> The front end applications are all on AXP, only the data files was in A2k and now in AXP. What is the unrecoverable bloat?? Colud be the problem for our data files? ... Are this the problem that we find and need repair ? Juan Menendez =========================================== MASTERCAFE SL - NIF B-82.617.614 www.mastercafe.com Deleg. Asturias Tel 985.88.49.44 / 627.531.764 Fax 627.500.205 info at mastercafe.com juan at mastercafe.com Deleg. Madrid Tel 627.474.285 cecilia at mastercafe.com =========================================== -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Charlotte Foust Sent: martes, 06 de enero de 2004 17:05 To: Access Developers discussion and problem solving Subject: RE: [AccessD] MDB Stability vs Perfomance Access 2000 can't open 2002 format files. Is that the nature of the error message, corrupted database file? Or are you talking about problems you had when using the 2000 file format for the datafile with an AXP front end? I prefer to use the 2000 format for data files to avoid the unrecoverable bloat issue in 2002 format. We haven't had any problems with them in our commercial applications. You do need to make sure that all your machines have the same service packs of Office XP and Jet installed however. Maybe if you give more specific information about the kind of error messages you're getting, someone else will have some ideas. Charlotte Foust -----Original Message----- From: MastercafeCTV [mailto:mastercafe at ctv.es] Sent: Monday, January 05, 2004 8:56 PM To: 'Access Developers discussion and problem solving' Subject: RE: [AccessD] MDB Stability vs Perfomance Our main programs are AXP at this moment, all in MDE format, but on A2k we have the error message to screen and on AXP some of them close the Access in the computer (same problem on Runtime version or AXP standar). The data container was A2k just august'03 and then change to AXP then beginning the problems... Too high size for some MDB that compacted have 4 mb and working more than 18 mb. At this moment all Applications and data are AXP (2002) format... But with corruption problems. Juan Menendez =========================================== MASTERCAFE SL - NIF B-82.617.614 www.mastercafe.com Deleg. Asturias Tel 985.88.49.44 / 627.531.764 Fax 627.500.205 info at mastercafe.com juan at mastercafe.com Deleg. Madrid Tel 627.474.285 cecilia at mastercafe.com =========================================== -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Charlotte Foust Sent: martes, 06 de enero de 2004 3:02 To: Access Developers discussion and problem solving Subject: RE: [AccessD] MDB Stability vs Perfomance I'm sorry, but it isn't clear to me whether you're talking about the file format or the version of Access you're using. If you have mixed versions updating the same database, you're likely to have corruption problems. What is your main program written in? Charlotte Foust -----Original Message----- From: MastercafeCTV [mailto:mastercafe at ctv.es] Sent: Monday, January 05, 2004 5:16 PM To: 'Access Developers discussion and problem solving' Subject: RE: [AccessD] MDB Stability vs Perfomance The MDE problem is correct, we saw months ago. And we have installed the 3 patches for AXP (SP-1 , Patch Office XP 2, and secur. Patches) but the most significant problem is our main program STEEL TPV that uses a STEELDAT.MDB only for data, this MDB have no problem with A2k format, and the last september change to AXP format, from this we repeat Compact & Repair every month. Juan Menendez =========================================== MASTERCAFE SL - NIF B-82.617.614 www.mastercafe.com Deleg. Asturias Tel 985.88.49.44 / 627.531.764 Fax 627.500.205 info at mastercafe.com juan at mastercafe.com Deleg. Madrid Tel 627.474.285 cecilia at mastercafe.com =========================================== -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Charlotte Foust Sent: martes, 06 de enero de 2004 2:08 To: Access Developers discussion and problem solving Subject: RE: [AccessD] MDB Stability vs Perfomance I haven't found AXP SP-1 to be any less stable or have more problems than A2k. Be aware, though, that if you switch to AXP, you will only be able to create an MDE in 2002 format, not in 2000 format. Charlotte Foust -----Original Message----- From: MastercafeCTV [mailto:mastercafe at ctv.es] Sent: Monday, January 05, 2004 4:50 PM To: 'Access Developers discussion and problem solving' Subject: [AccessD] MDB Stability vs Perfomance Hi group, on the last year we are changing all our applications from Access 2k to Access XP, but at this moment we have one problem on all applications that it take more time for maintenance and repair. MDB from Access 2k are much more stable VS MDB XP (better A2k) MDB from Access 2k have similar speed vs MDB XP (better A2k) Applications on A2k are much more stable vs MDB/MDE XP (better A2k) MDB A2k corrupted not always can be repaired vs MDB XP always was be repaired (Better AXP) On the last version for application FE we obtain sometimes a reset error, I explain: close tha Access XP with application without any error message or similar, simply close and then you can open renew. Anyone knows how to solve this problems wih AXP?? Is better program with AXP on MDB format A2k?? Is the AXP less stable than A2k?? Thanks in advance Juan Men?ndez =========================================== MASTERCAFE SL - NIF B-82.617.614 www.mastercafe.com Deleg. Asturias Tel 985.88.49.44 / 627.531.764 Fax 627.500.205 info at mastercafe.com juan at mastercafe.com Deleg. Madrid Tel 627.474.285 cecilia at mastercafe.com =========================================== _______________________________________________ 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 _______________________________________________ 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 _______________________________________________ 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 From mastercafe at ctv.es Tue Jan 6 12:19:06 2004 From: mastercafe at ctv.es (MastercafeCTV) Date: Tue, 6 Jan 2004 19:19:06 +0100 Subject: [AccessD] Excel to Access by clicking cells. In-Reply-To: <46B976F2B698FF46A4FE7636509B22DF03D0C7@stekelbes.ithelps.local> Message-ID: <002201c3d481$92b597f0$69fa2250@servercafe> We had developed a similar function that you select the Excel.Column Data and assign to File.Field Data. The process was simple. Make a Form with this fields: Excel Origin / Excel Column / Access Database / Access Recordser / Access Field (dbText, 80) is better because you can convert this to Csng/Clng and use this. Design the main import form and then execute a Sub that open Excel and check main data to transfer to end Database. I will check our code to look for this and send you a copy of this. Juan Menendez =========================================== MASTERCAFE SL - NIF B-82.617.614 www.mastercafe.com Deleg. Asturias Tel 985.88.49.44 / 627.531.764 Fax 627.500.205 info at mastercafe.com juan at mastercafe.com Deleg. Madrid Tel 627.474.285 cecilia at mastercafe.com =========================================== -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Erwin Craps - IT Helps Sent: martes, 06 de enero de 2004 15:50 To: Access Developers discussion and problem solving Subject: [AccessD] Excel to Access by clicking cells. Hi guys Just brainstorming with myself to improve some stuff... We receive on a daily basis (7x7) a lot of excel files with data in it from several sources. We can not standarise those files for several reasons so we print these files en type the data manualy in Access. I was wondering if anyone ever has written a function so you could click the cells with the data and then right-click something and the data is passed to a recordset in Access depending on your multiselect order in Excel. Importing is not an option because these files change to much and are often to complex (more data in the file then we need). The data are boxoffice figures from cinema theatres. So the data we need as a result looks like this. Date1 MovieA Tickets Amount Date1 MovieB Tickets Amount Date1 MovieC Tickets Amount Date2 MovieA Tickets Amount Date2 MovieC Tickets Amount Date2 MovieD Tickets Amount The excel sheets can vary, it can be horizontal, vertical, double vertical double horizontal... So I believe a multi select would be a solution. I think it will be faster than printing and manual typing. I just want some code that put me on the road with this multiselecting thing and passing to Access. Erwin Erwin Craps Zaakvoerder www.ithelps.be/jonathan This E-mail is confidential, may be legally privileged, and is for the intended recipient only. Access, disclosure, copying, distribution, or reliance on any of it by anyone else is prohibited and may be a criminal offence. Please delete if obtained in error and E-mail confirmation to the sender. IT Helps - I.T. Help Center *** Box Office Belgium & Luxembourg www.ithelps.be * www.boxoffice.be * www.stadleuven.be IT Helps bvba* ** Mercatorpad 3 ** 3000 Leuven IT Helps * Phone: +32 16 296 404 * Fax: +32 16 296 405 E-mail: Info at ithelps.be Box Office ** Fax: +32 16 296 406 ** Box Office E-mail: Staff at boxoffice.be _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From andy at minstersystems.co.uk Tue Jan 6 12:24:53 2004 From: andy at minstersystems.co.uk (Andy Lacey) Date: Tue, 6 Jan 2004 18:24:53 -0000 Subject: [AccessD] Get Folder Name via API In-Reply-To: <000c01c3d47b$556cde90$de1811d8@DanWaters> Message-ID: <00c001c3d482$61547db0$b274d0d5@minster33c3r25> Thanks guys. You all have code that uses the same API (SHBrowseForFolder). Works well but I had hoped to find some way of using the File Save/Save As dialog but returning just a folder name. The advantage of that is that you can create a new folder on the hoof. But if it was possible then I'm sure you'd be using it too. Thanks for all your suggestions. Andy Lacey http://www.minstersystems.co.uk > -----Original Message----- > From: accessd-bounces at databaseadvisors.com > [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Dan Waters > Sent: 06 January 2004 17:34 > To: 'Access Developers discussion and problem solving' > Subject: RE: [AccessD] Get Folder Name via API > > > Andy, > > This is what I use - credits are included. Cut and paste > into a standard module. I use a global string variable to > carry the path to a folder. > > Dan Waters > > '------------------------------- > > Option Compare Database > Option Explicit > > Private Type BrowseInfo > hWndOwner As Long > pIDLRoot As Long > pszDisplayName As Long > lpszTitle As Long > ulFlags As Long > lpfnCallback As Long > lParam As Long > iImage As Long > End Type > > Const BIF_RETURNONLYFSDIRS = 1 > Const MAX_PATH = 260 > > Private Declare Sub CoTaskMemFree Lib "ole32.dll" (ByVal hMem > As Long) Private Declare Function lstrcat Lib "kernel32" > Alias "lstrcatA" (ByVal lpString1 As String, ByVal lpString2 > As String) As Long Private Declare Function SHBrowseForFolder > Lib "shell32" (lpbi As > BrowseInfo) As Long > Private Declare Function SHGetPathFromIDList Lib "shell32" > (ByVal pidList As Long, ByVal lpBuffer As String) As Long > > '--------------------------------- > > Public Sub GetFolderName() > On Error GoTo EH > > 'KPD-Team 1998 > 'URL: http://www.allapi.net/ > 'KPDTeam at Allapi.net > > Dim intNull As Integer > Dim lngIDList As Long > Dim lngResult As Long > Dim stgPath As String > Dim udtBI As BrowseInfo > > With udtBI > 'Set the owner window > '.hWndOwner = Me.hwnd > > 'lstrcat appends the two strings and returns the > memory address > '.lpszTitle = lstrcat("C:\", "") > > 'Return only if the user selected a directory > .ulFlags = BIF_RETURNONLYFSDIRS > > End With > > 'Show the 'Browse for folder' dialog > lngIDList = SHBrowseForFolder(udtBI) > > If lngIDList Then > > stgPath = String$(MAX_PATH, 0) > > 'Get the path from the IDList > SHGetPathFromIDList lngIDList, stgPath > > 'free the block of memory > CoTaskMemFree lngIDList > > '-- Get location of first null value > intNull = InStr(stgPath, vbNullChar) > > If intNull > 0 Then > '-- Trim nulls from name > GstgFolderName = Left$(stgPath, intNull - 1) > Else > GstgFolderName = "" > End If > Else > GstgFolderName = "" > End If > > Exit Sub > > EH: > Application.Echo True > Call GlobalErrors("", Err.Number, Err.Description, > CurrentObjectName, > "GetFolderName") > > End Sub > > > -----Original Message----- > From: accessd-bounces at databaseadvisors.com > [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Andy Lacey > Sent: Tuesday, January 06, 2004 9:42 AM > To: Access Developers discussion and problem solving > Subject: [AccessD] Get Folder Name via API > > > Must've done thsi before but can't find it. I want to ask the > user for a folder name (into which I'm going to store stuff). > I want to use the Windows common file dialog so that it looks > neat and offers to create a new folder and so on. However I > don't want to put a Common Dialog control on the form (always > has version issues) so want to use the API method. But the > code I have (from Dev Ashish) insists on a filename not just > a folder, and the other code on his site to browse a folder > list doesn't use the normal dialog. Anyone got code for this? > > -- > Andy Lacey > http://www.minstersystems.co.uk > > > ________________________________________________ > Message sent using UebiMiau 2.7.2 > > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/a> ccessd > Website: > http://www.databaseadvisors.com > > > > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/a> ccessd > Website: > http://www.databaseadvisors.com > > From gustav at cactus.dk Tue Jan 6 12:46:20 2004 From: gustav at cactus.dk (Gustav Brock) Date: Tue, 6 Jan 2004 19:46:20 +0100 Subject: [AccessD] Get Folder Name via API In-Reply-To: <00c001c3d482$61547db0$b274d0d5@minster33c3r25> References: <00c001c3d482$61547db0$b274d0d5@minster33c3r25> Message-ID: <4538516824.20040106194620@cactus.dk> Hi Andy You could try letting your code save the file: d:\somefolder\yournewfolder\NUL NUL is a valid filename but doesn't exist as NUL is the reserved name for the NUL device ... /gustav > Thanks guys. You all have code that uses the same API (SHBrowseForFolder). > Works well but I had hoped to find some way of using the File Save/Save As > dialog but returning just a folder name. The advantage of that is that you > can create a new folder on the hoof. But if it was possible then I'm sure > you'd be using it too. Thanks for all your suggestions. From cfoust at infostatsystems.com Tue Jan 6 13:16:15 2004 From: cfoust at infostatsystems.com (Charlotte Foust) Date: Tue, 6 Jan 2004 11:16:15 -0800 Subject: [AccessD] MDB Stability vs Perfomance Message-ID: The 2002 file format contains a system file, MSysAccessStorage, that doesn't exist in the 2000 format. This table NEVER compacts, it just keeps growing. The only cure is to import all the non-system objects into a new database. Charlotte Foust -----Original Message----- From: MastercafeCTV [mailto:mastercafe at ctv.es] Sent: Tuesday, January 06, 2004 10:08 AM To: 'Access Developers discussion and problem solving' Subject: RE: [AccessD] MDB Stability vs Perfomance The front end applications are all on AXP, only the data files was in A2k and now in AXP. What is the unrecoverable bloat?? Colud be the problem for our data files? ... Are this the problem that we find and need repair ? Juan Menendez =========================================== MASTERCAFE SL - NIF B-82.617.614 www.mastercafe.com Deleg. Asturias Tel 985.88.49.44 / 627.531.764 Fax 627.500.205 info at mastercafe.com juan at mastercafe.com Deleg. Madrid Tel 627.474.285 cecilia at mastercafe.com =========================================== -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Charlotte Foust Sent: martes, 06 de enero de 2004 17:05 To: Access Developers discussion and problem solving Subject: RE: [AccessD] MDB Stability vs Perfomance Access 2000 can't open 2002 format files. Is that the nature of the error message, corrupted database file? Or are you talking about problems you had when using the 2000 file format for the datafile with an AXP front end? I prefer to use the 2000 format for data files to avoid the unrecoverable bloat issue in 2002 format. We haven't had any problems with them in our commercial applications. You do need to make sure that all your machines have the same service packs of Office XP and Jet installed however. Maybe if you give more specific information about the kind of error messages you're getting, someone else will have some ideas. Charlotte Foust -----Original Message----- From: MastercafeCTV [mailto:mastercafe at ctv.es] Sent: Monday, January 05, 2004 8:56 PM To: 'Access Developers discussion and problem solving' Subject: RE: [AccessD] MDB Stability vs Perfomance Our main programs are AXP at this moment, all in MDE format, but on A2k we have the error message to screen and on AXP some of them close the Access in the computer (same problem on Runtime version or AXP standar). The data container was A2k just august'03 and then change to AXP then beginning the problems... Too high size for some MDB that compacted have 4 mb and working more than 18 mb. At this moment all Applications and data are AXP (2002) format... But with corruption problems. Juan Menendez =========================================== MASTERCAFE SL - NIF B-82.617.614 www.mastercafe.com Deleg. Asturias Tel 985.88.49.44 / 627.531.764 Fax 627.500.205 info at mastercafe.com juan at mastercafe.com Deleg. Madrid Tel 627.474.285 cecilia at mastercafe.com =========================================== -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Charlotte Foust Sent: martes, 06 de enero de 2004 3:02 To: Access Developers discussion and problem solving Subject: RE: [AccessD] MDB Stability vs Perfomance I'm sorry, but it isn't clear to me whether you're talking about the file format or the version of Access you're using. If you have mixed versions updating the same database, you're likely to have corruption problems. What is your main program written in? Charlotte Foust -----Original Message----- From: MastercafeCTV [mailto:mastercafe at ctv.es] Sent: Monday, January 05, 2004 5:16 PM To: 'Access Developers discussion and problem solving' Subject: RE: [AccessD] MDB Stability vs Perfomance The MDE problem is correct, we saw months ago. And we have installed the 3 patches for AXP (SP-1 , Patch Office XP 2, and secur. Patches) but the most significant problem is our main program STEEL TPV that uses a STEELDAT.MDB only for data, this MDB have no problem with A2k format, and the last september change to AXP format, from this we repeat Compact & Repair every month. Juan Menendez =========================================== MASTERCAFE SL - NIF B-82.617.614 www.mastercafe.com Deleg. Asturias Tel 985.88.49.44 / 627.531.764 Fax 627.500.205 info at mastercafe.com juan at mastercafe.com Deleg. Madrid Tel 627.474.285 cecilia at mastercafe.com =========================================== -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Charlotte Foust Sent: martes, 06 de enero de 2004 2:08 To: Access Developers discussion and problem solving Subject: RE: [AccessD] MDB Stability vs Perfomance I haven't found AXP SP-1 to be any less stable or have more problems than A2k. Be aware, though, that if you switch to AXP, you will only be able to create an MDE in 2002 format, not in 2000 format. Charlotte Foust -----Original Message----- From: MastercafeCTV [mailto:mastercafe at ctv.es] Sent: Monday, January 05, 2004 4:50 PM To: 'Access Developers discussion and problem solving' Subject: [AccessD] MDB Stability vs Perfomance Hi group, on the last year we are changing all our applications from Access 2k to Access XP, but at this moment we have one problem on all applications that it take more time for maintenance and repair. MDB from Access 2k are much more stable VS MDB XP (better A2k) MDB from Access 2k have similar speed vs MDB XP (better A2k) Applications on A2k are much more stable vs MDB/MDE XP (better A2k) MDB A2k corrupted not always can be repaired vs MDB XP always was be repaired (Better AXP) On the last version for application FE we obtain sometimes a reset error, I explain: close tha Access XP with application without any error message or similar, simply close and then you can open renew. Anyone knows how to solve this problems wih AXP?? Is better program with AXP on MDB format A2k?? Is the AXP less stable than A2k?? Thanks in advance Juan Men?ndez =========================================== MASTERCAFE SL - NIF B-82.617.614 www.mastercafe.com Deleg. Asturias Tel 985.88.49.44 / 627.531.764 Fax 627.500.205 info at mastercafe.com juan at mastercafe.com Deleg. Madrid Tel 627.474.285 cecilia at mastercafe.com =========================================== _______________________________________________ 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 _______________________________________________ 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 _______________________________________________ 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 _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From djkr at msn.com Tue Jan 6 13:35:20 2004 From: djkr at msn.com (DJK(John) Robinson) Date: Tue, 6 Jan 2004 19:35:20 -0000 Subject: [AccessD] Mac address In-Reply-To: <3FF93F0B.19244.9A4103@localhost> Message-ID: <003f01c3d48c$387cf890$bf00a8c0@dabsight> This gives me 1234567890 for my SuperMicro m'board (under WinXP Pro, AXP, MS WMI Scripting V1.2 Library). So ... maybe not so useful. John > -----Original Message----- > From: accessd-bounces at databaseadvisors.com > [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of > Stuart McLachlan > Sent: 05 January 2004 00:40 > To: Access Developers discussion and problem solving > Subject: RE: [AccessD] Mac address > > > On 4 Jan 2004 at 17:43, John Bartow wrote: > > > I was just wondering why the Main Circuit Board Serial Number isn't > > used for this. It would seem to me that this would be about > the most > > stable unique ID number in a PC. I have no idea how you would read > > this number but it always shows up in my hardware asset inventories. > > > > Any comments? > > Public Function MBSerialNumber() As String > > 'RETRIEVES SERIAL NUMBER OF MOTHERBOARD > 'IF THERE IS MORE THAN ONE MOTHERBOARD, THE SERIAL > 'NUMBERS WILL BE DELIMITED BY COMMAS > > 'YOU MUST HAVE WMI INSTALLED AND A REFERENCE TO > 'Microsoft WMI Scripting Library IS REQUIRED > > Dim objs As Object > > Dim obj As Object > Dim WMI As Object > Dim sAns As String > > > Set WMI = GetObject("WinMgmts:") > Set objs = WMI.InstancesOf("Win32_BaseBoard") > For Each obj In objs > sAns = sAns & obj.SerialNumber > If sAns < objs.Count Then sAns = sAns & "," > Next > MBSerialNumber = sAns > End Function > > -- > Lexacorp Ltd > http://www.lexacorp.com.pg > Information Technology Consultancy, Software > Development,System Support. > > > > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/a> ccessd > Website: > http://www.databaseadvisors.com > From mastercafe at ctv.es Tue Jan 6 14:14:49 2004 From: mastercafe at ctv.es (MastercafeCTV) Date: Tue, 6 Jan 2004 21:14:49 +0100 Subject: [AccessD] MDB Stability vs Perfomance In-Reply-To: Message-ID: <002701c3d491$bd2bda20$69fa2250@servercafe> Then I think that is better mainten the Data Files on A2k format and the applications on AXP format. I suposse that the perfomance between A2k & AXP formats is not the format but yes the ADO/DAO access from the FE application. Juan Menendez =========================================== MASTERCAFE SL - NIF B-82.617.614 www.mastercafe.com Deleg. Asturias Tel 985.88.49.44 / 627.531.764 Fax 627.500.205 info at mastercafe.com juan at mastercafe.com Deleg. Madrid Tel 627.474.285 cecilia at mastercafe.com =========================================== -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Charlotte Foust Sent: martes, 06 de enero de 2004 20:16 To: Access Developers discussion and problem solving Subject: RE: [AccessD] MDB Stability vs Perfomance The 2002 file format contains a system file, MSysAccessStorage, that doesn't exist in the 2000 format. This table NEVER compacts, it just keeps growing. The only cure is to import all the non-system objects into a new database. Charlotte Foust -----Original Message----- From: MastercafeCTV [mailto:mastercafe at ctv.es] Sent: Tuesday, January 06, 2004 10:08 AM To: 'Access Developers discussion and problem solving' Subject: RE: [AccessD] MDB Stability vs Perfomance The front end applications are all on AXP, only the data files was in A2k and now in AXP. What is the unrecoverable bloat?? Colud be the problem for our data files? ... Are this the problem that we find and need repair ? Juan Menendez =========================================== MASTERCAFE SL - NIF B-82.617.614 www.mastercafe.com Deleg. Asturias Tel 985.88.49.44 / 627.531.764 Fax 627.500.205 info at mastercafe.com juan at mastercafe.com Deleg. Madrid Tel 627.474.285 cecilia at mastercafe.com =========================================== -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Charlotte Foust Sent: martes, 06 de enero de 2004 17:05 To: Access Developers discussion and problem solving Subject: RE: [AccessD] MDB Stability vs Perfomance Access 2000 can't open 2002 format files. Is that the nature of the error message, corrupted database file? Or are you talking about problems you had when using the 2000 file format for the datafile with an AXP front end? I prefer to use the 2000 format for data files to avoid the unrecoverable bloat issue in 2002 format. We haven't had any problems with them in our commercial applications. You do need to make sure that all your machines have the same service packs of Office XP and Jet installed however. Maybe if you give more specific information about the kind of error messages you're getting, someone else will have some ideas. Charlotte Foust -----Original Message----- From: MastercafeCTV [mailto:mastercafe at ctv.es] Sent: Monday, January 05, 2004 8:56 PM To: 'Access Developers discussion and problem solving' Subject: RE: [AccessD] MDB Stability vs Perfomance Our main programs are AXP at this moment, all in MDE format, but on A2k we have the error message to screen and on AXP some of them close the Access in the computer (same problem on Runtime version or AXP standar). The data container was A2k just august'03 and then change to AXP then beginning the problems... Too high size for some MDB that compacted have 4 mb and working more than 18 mb. At this moment all Applications and data are AXP (2002) format... But with corruption problems. Juan Menendez =========================================== MASTERCAFE SL - NIF B-82.617.614 www.mastercafe.com Deleg. Asturias Tel 985.88.49.44 / 627.531.764 Fax 627.500.205 info at mastercafe.com juan at mastercafe.com Deleg. Madrid Tel 627.474.285 cecilia at mastercafe.com =========================================== -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Charlotte Foust Sent: martes, 06 de enero de 2004 3:02 To: Access Developers discussion and problem solving Subject: RE: [AccessD] MDB Stability vs Perfomance I'm sorry, but it isn't clear to me whether you're talking about the file format or the version of Access you're using. If you have mixed versions updating the same database, you're likely to have corruption problems. What is your main program written in? Charlotte Foust -----Original Message----- From: MastercafeCTV [mailto:mastercafe at ctv.es] Sent: Monday, January 05, 2004 5:16 PM To: 'Access Developers discussion and problem solving' Subject: RE: [AccessD] MDB Stability vs Perfomance The MDE problem is correct, we saw months ago. And we have installed the 3 patches for AXP (SP-1 , Patch Office XP 2, and secur. Patches) but the most significant problem is our main program STEEL TPV that uses a STEELDAT.MDB only for data, this MDB have no problem with A2k format, and the last september change to AXP format, from this we repeat Compact & Repair every month. Juan Menendez =========================================== MASTERCAFE SL - NIF B-82.617.614 www.mastercafe.com Deleg. Asturias Tel 985.88.49.44 / 627.531.764 Fax 627.500.205 info at mastercafe.com juan at mastercafe.com Deleg. Madrid Tel 627.474.285 cecilia at mastercafe.com =========================================== -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Charlotte Foust Sent: martes, 06 de enero de 2004 2:08 To: Access Developers discussion and problem solving Subject: RE: [AccessD] MDB Stability vs Perfomance I haven't found AXP SP-1 to be any less stable or have more problems than A2k. Be aware, though, that if you switch to AXP, you will only be able to create an MDE in 2002 format, not in 2000 format. Charlotte Foust -----Original Message----- From: MastercafeCTV [mailto:mastercafe at ctv.es] Sent: Monday, January 05, 2004 4:50 PM To: 'Access Developers discussion and problem solving' Subject: [AccessD] MDB Stability vs Perfomance Hi group, on the last year we are changing all our applications from Access 2k to Access XP, but at this moment we have one problem on all applications that it take more time for maintenance and repair. MDB from Access 2k are much more stable VS MDB XP (better A2k) MDB from Access 2k have similar speed vs MDB XP (better A2k) Applications on A2k are much more stable vs MDB/MDE XP (better A2k) MDB A2k corrupted not always can be repaired vs MDB XP always was be repaired (Better AXP) On the last version for application FE we obtain sometimes a reset error, I explain: close tha Access XP with application without any error message or similar, simply close and then you can open renew. Anyone knows how to solve this problems wih AXP?? Is better program with AXP on MDB format A2k?? Is the AXP less stable than A2k?? Thanks in advance Juan Men?ndez =========================================== MASTERCAFE SL - NIF B-82.617.614 www.mastercafe.com Deleg. Asturias Tel 985.88.49.44 / 627.531.764 Fax 627.500.205 info at mastercafe.com juan at mastercafe.com Deleg. Madrid Tel 627.474.285 cecilia at mastercafe.com =========================================== _______________________________________________ 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 _______________________________________________ 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 _______________________________________________ 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 _______________________________________________ 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 From michael.mattys at adelphia.net Tue Jan 6 14:25:57 2004 From: michael.mattys at adelphia.net (Michael R Mattys) Date: Tue, 6 Jan 2004 15:25:57 -0500 Subject: [AccessD] Get Folder Name via API References: <00c001c3d482$61547db0$b274d0d5@minster33c3r25> <4538516824.20040106194620@cactus.dk> Message-ID: <012b01c3d493$4bace950$6401a8c0@default> Better late than never ... try this page http://www.mentalis.org/apilist/MakeSureDirectoryPathExists.shtml Michael R. Mattys Try MattysMapLib for MapPoint at www.mattysconsulting.com ----- Original Message ----- From: "Gustav Brock" To: "Access Developers discussion and problem solving" Sent: Tuesday, January 06, 2004 1:46 PM Subject: Re: [AccessD] Get Folder Name via API > Hi Andy > > You could try letting your code save the file: > > d:\somefolder\yournewfolder\NUL > > NUL is a valid filename but doesn't exist as NUL is the reserved name > for the NUL device ... > > /gustav > > > > Thanks guys. You all have code that uses the same API (SHBrowseForFolder). > > Works well but I had hoped to find some way of using the File Save/Save As > > dialog but returning just a folder name. The advantage of that is that you > > can create a new folder on the hoof. But if it was possible then I'm sure > > you'd be using it too. Thanks for all your suggestions. > > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com From cfoust at infostatsystems.com Tue Jan 6 14:54:01 2004 From: cfoust at infostatsystems.com (Charlotte Foust) Date: Tue, 6 Jan 2004 12:54:01 -0800 Subject: [AccessD] MDB Stability vs Perfomance Message-ID: There shouldn't be any performance difference using a 2000 data file instead of a 2002 data file. ADO is going to provide slower access in some cases than DAO but there's no reason you can't use DAO in AXP. Charlotte Foust -----Original Message----- From: MastercafeCTV [mailto:mastercafe at ctv.es] Sent: Tuesday, January 06, 2004 12:15 PM To: 'Access Developers discussion and problem solving' Subject: RE: [AccessD] MDB Stability vs Perfomance Then I think that is better mainten the Data Files on A2k format and the applications on AXP format. I suposse that the perfomance between A2k & AXP formats is not the format but yes the ADO/DAO access from the FE application. Juan Menendez =========================================== MASTERCAFE SL - NIF B-82.617.614 www.mastercafe.com Deleg. Asturias Tel 985.88.49.44 / 627.531.764 Fax 627.500.205 info at mastercafe.com juan at mastercafe.com Deleg. Madrid Tel 627.474.285 cecilia at mastercafe.com =========================================== -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Charlotte Foust Sent: martes, 06 de enero de 2004 20:16 To: Access Developers discussion and problem solving Subject: RE: [AccessD] MDB Stability vs Perfomance The 2002 file format contains a system file, MSysAccessStorage, that doesn't exist in the 2000 format. This table NEVER compacts, it just keeps growing. The only cure is to import all the non-system objects into a new database. Charlotte Foust -----Original Message----- From: MastercafeCTV [mailto:mastercafe at ctv.es] Sent: Tuesday, January 06, 2004 10:08 AM To: 'Access Developers discussion and problem solving' Subject: RE: [AccessD] MDB Stability vs Perfomance The front end applications are all on AXP, only the data files was in A2k and now in AXP. What is the unrecoverable bloat?? Colud be the problem for our data files? ... Are this the problem that we find and need repair ? Juan Menendez =========================================== MASTERCAFE SL - NIF B-82.617.614 www.mastercafe.com Deleg. Asturias Tel 985.88.49.44 / 627.531.764 Fax 627.500.205 info at mastercafe.com juan at mastercafe.com Deleg. Madrid Tel 627.474.285 cecilia at mastercafe.com =========================================== -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Charlotte Foust Sent: martes, 06 de enero de 2004 17:05 To: Access Developers discussion and problem solving Subject: RE: [AccessD] MDB Stability vs Perfomance Access 2000 can't open 2002 format files. Is that the nature of the error message, corrupted database file? Or are you talking about problems you had when using the 2000 file format for the datafile with an AXP front end? I prefer to use the 2000 format for data files to avoid the unrecoverable bloat issue in 2002 format. We haven't had any problems with them in our commercial applications. You do need to make sure that all your machines have the same service packs of Office XP and Jet installed however. Maybe if you give more specific information about the kind of error messages you're getting, someone else will have some ideas. Charlotte Foust -----Original Message----- From: MastercafeCTV [mailto:mastercafe at ctv.es] Sent: Monday, January 05, 2004 8:56 PM To: 'Access Developers discussion and problem solving' Subject: RE: [AccessD] MDB Stability vs Perfomance Our main programs are AXP at this moment, all in MDE format, but on A2k we have the error message to screen and on AXP some of them close the Access in the computer (same problem on Runtime version or AXP standar). The data container was A2k just august'03 and then change to AXP then beginning the problems... Too high size for some MDB that compacted have 4 mb and working more than 18 mb. At this moment all Applications and data are AXP (2002) format... But with corruption problems. Juan Menendez =========================================== MASTERCAFE SL - NIF B-82.617.614 www.mastercafe.com Deleg. Asturias Tel 985.88.49.44 / 627.531.764 Fax 627.500.205 info at mastercafe.com juan at mastercafe.com Deleg. Madrid Tel 627.474.285 cecilia at mastercafe.com =========================================== -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Charlotte Foust Sent: martes, 06 de enero de 2004 3:02 To: Access Developers discussion and problem solving Subject: RE: [AccessD] MDB Stability vs Perfomance I'm sorry, but it isn't clear to me whether you're talking about the file format or the version of Access you're using. If you have mixed versions updating the same database, you're likely to have corruption problems. What is your main program written in? Charlotte Foust -----Original Message----- From: MastercafeCTV [mailto:mastercafe at ctv.es] Sent: Monday, January 05, 2004 5:16 PM To: 'Access Developers discussion and problem solving' Subject: RE: [AccessD] MDB Stability vs Perfomance The MDE problem is correct, we saw months ago. And we have installed the 3 patches for AXP (SP-1 , Patch Office XP 2, and secur. Patches) but the most significant problem is our main program STEEL TPV that uses a STEELDAT.MDB only for data, this MDB have no problem with A2k format, and the last september change to AXP format, from this we repeat Compact & Repair every month. Juan Menendez =========================================== MASTERCAFE SL - NIF B-82.617.614 www.mastercafe.com Deleg. Asturias Tel 985.88.49.44 / 627.531.764 Fax 627.500.205 info at mastercafe.com juan at mastercafe.com Deleg. Madrid Tel 627.474.285 cecilia at mastercafe.com =========================================== -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Charlotte Foust Sent: martes, 06 de enero de 2004 2:08 To: Access Developers discussion and problem solving Subject: RE: [AccessD] MDB Stability vs Perfomance I haven't found AXP SP-1 to be any less stable or have more problems than A2k. Be aware, though, that if you switch to AXP, you will only be able to create an MDE in 2002 format, not in 2000 format. Charlotte Foust -----Original Message----- From: MastercafeCTV [mailto:mastercafe at ctv.es] Sent: Monday, January 05, 2004 4:50 PM To: 'Access Developers discussion and problem solving' Subject: [AccessD] MDB Stability vs Perfomance Hi group, on the last year we are changing all our applications from Access 2k to Access XP, but at this moment we have one problem on all applications that it take more time for maintenance and repair. MDB from Access 2k are much more stable VS MDB XP (better A2k) MDB from Access 2k have similar speed vs MDB XP (better A2k) Applications on A2k are much more stable vs MDB/MDE XP (better A2k) MDB A2k corrupted not always can be repaired vs MDB XP always was be repaired (Better AXP) On the last version for application FE we obtain sometimes a reset error, I explain: close tha Access XP with application without any error message or similar, simply close and then you can open renew. Anyone knows how to solve this problems wih AXP?? Is better program with AXP on MDB format A2k?? Is the AXP less stable than A2k?? Thanks in advance Juan Men?ndez =========================================== MASTERCAFE SL - NIF B-82.617.614 www.mastercafe.com Deleg. Asturias Tel 985.88.49.44 / 627.531.764 Fax 627.500.205 info at mastercafe.com juan at mastercafe.com Deleg. Madrid Tel 627.474.285 cecilia at mastercafe.com =========================================== _______________________________________________ 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 _______________________________________________ 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 _______________________________________________ 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 _______________________________________________ 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 _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From dwaters at usinternet.com Tue Jan 6 15:16:45 2004 From: dwaters at usinternet.com (Dan Waters) Date: Tue, 6 Jan 2004 15:16:45 -0600 Subject: [AccessD] Get Folder Name via API In-Reply-To: <28825546.1073414270824.JavaMail.root@sniper.marix.com> Message-ID: <000201c3d49a$667e9650$de1811d8@DanWaters> Andy - I guess I'm not sure what you need. This code returns the path to a folder, and you can pull the last folder name out of that string. The dialog box to find the folder is different, but it does find and select folders. You can use File Search Objects to create a new folder in code. Maybe a combination of both would work out. Also, part of my system uses the Find File dialog box, and I am able to use it to create a new folder wherever I want. I'm not using the Find File dialog box that is an activex object, but the one that is called from a Windows API. I got the API code for the Find File dialog box from Candace Tripp's web site. HTH! Dan -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Andy Lacey Sent: Tuesday, January 06, 2004 12:25 PM To: 'Access Developers discussion and problem solving' Subject: RE: [AccessD] Get Folder Name via API Thanks guys. You all have code that uses the same API (SHBrowseForFolder). Works well but I had hoped to find some way of using the File Save/Save As dialog but returning just a folder name. The advantage of that is that you can create a new folder on the hoof. But if it was possible then I'm sure you'd be using it too. Thanks for all your suggestions. Andy Lacey http://www.minstersystems.co.uk > -----Original Message----- > From: accessd-bounces at databaseadvisors.com > [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Dan Waters > Sent: 06 January 2004 17:34 > To: 'Access Developers discussion and problem solving' > Subject: RE: [AccessD] Get Folder Name via API > > > Andy, > > This is what I use - credits are included. Cut and paste > into a standard module. I use a global string variable to > carry the path to a folder. > > Dan Waters > > '------------------------------- > > Option Compare Database > Option Explicit > > Private Type BrowseInfo > hWndOwner As Long > pIDLRoot As Long > pszDisplayName As Long > lpszTitle As Long > ulFlags As Long > lpfnCallback As Long > lParam As Long > iImage As Long > End Type > > Const BIF_RETURNONLYFSDIRS = 1 > Const MAX_PATH = 260 > > Private Declare Sub CoTaskMemFree Lib "ole32.dll" (ByVal hMem > As Long) Private Declare Function lstrcat Lib "kernel32" > Alias "lstrcatA" (ByVal lpString1 As String, ByVal lpString2 > As String) As Long Private Declare Function SHBrowseForFolder > Lib "shell32" (lpbi As > BrowseInfo) As Long > Private Declare Function SHGetPathFromIDList Lib "shell32" > (ByVal pidList As Long, ByVal lpBuffer As String) As Long > > '--------------------------------- > > Public Sub GetFolderName() > On Error GoTo EH > > 'KPD-Team 1998 > 'URL: http://www.allapi.net/ > 'KPDTeam at Allapi.net > > Dim intNull As Integer > Dim lngIDList As Long > Dim lngResult As Long > Dim stgPath As String > Dim udtBI As BrowseInfo > > With udtBI > 'Set the owner window > '.hWndOwner = Me.hwnd > > 'lstrcat appends the two strings and returns the > memory address > '.lpszTitle = lstrcat("C:\", "") > > 'Return only if the user selected a directory > .ulFlags = BIF_RETURNONLYFSDIRS > > End With > > 'Show the 'Browse for folder' dialog > lngIDList = SHBrowseForFolder(udtBI) > > If lngIDList Then > > stgPath = String$(MAX_PATH, 0) > > 'Get the path from the IDList > SHGetPathFromIDList lngIDList, stgPath > > 'free the block of memory > CoTaskMemFree lngIDList > > '-- Get location of first null value > intNull = InStr(stgPath, vbNullChar) > > If intNull > 0 Then > '-- Trim nulls from name > GstgFolderName = Left$(stgPath, intNull - 1) > Else > GstgFolderName = "" > End If > Else > GstgFolderName = "" > End If > > Exit Sub > > EH: > Application.Echo True > Call GlobalErrors("", Err.Number, Err.Description, > CurrentObjectName, > "GetFolderName") > > End Sub > > > -----Original Message----- > From: accessd-bounces at databaseadvisors.com > [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Andy Lacey > Sent: Tuesday, January 06, 2004 9:42 AM > To: Access Developers discussion and problem solving > Subject: [AccessD] Get Folder Name via API > > > Must've done thsi before but can't find it. I want to ask the > user for a folder name (into which I'm going to store stuff). > I want to use the Windows common file dialog so that it looks > neat and offers to create a new folder and so on. However I > don't want to put a Common Dialog control on the form (always > has version issues) so want to use the API method. But the > code I have (from Dev Ashish) insists on a filename not just > a folder, and the other code on his site to browse a folder > list doesn't use the normal dialog. Anyone got code for this? > > -- > Andy Lacey > http://www.minstersystems.co.uk > > > ________________________________________________ > Message sent using UebiMiau 2.7.2 > > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/a> ccessd > Website: > http://www.databaseadvisors.com > > > > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/a> ccessd > Website: > http://www.databaseadvisors.com > > _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From Lambert.Heenan at AIG.com Tue Jan 6 15:17:48 2004 From: Lambert.Heenan at AIG.com (Heenan, Lambert) Date: Tue, 6 Jan 2004 16:17:48 -0500 Subject: [AccessD] Get Folder Name via API Message-ID: <8B98F8EA48F8BA47A2F24E0D0AF40CF407AD7C33@xlivmbx12.aig.com> The browse for folder dialog can be used to create new folders too. Just set up the ulFlags item of the BrowseInfo structure like this... .ulFlags = .ulFlags Or BIF_USENEWUI OR BIF_RETURNONLYFSDIRS Or .ulFlags = .ulFlags Or BIF_NEWDIALOGSTYLE OR BIF_RETURNONLYFSDIRS And add these constants to the code Const BIF_NEWDIALOGSTYLE = 64 Const BIF_USENEWUI = 80 The BIF_NEWDIALOGSTYLE allows you to resize the dialog adds a "Make New Folder" button. BIF_USENEWUI provides an edit box to type the folder name in as well as a "Make New Folder" button. This second one only works with Shell32.dll version 5 and greater (Win 2000 and above). In older version clicking the new folder button will create the folder, and the user can then select it in the folder tree and rename it. Lambert -----Original Message----- From: Andy Lacey [mailto:andy at minstersystems.co.uk] Sent: Tuesday, January 06, 2004 1:25 PM To: 'Access Developers discussion and problem solving' Subject: RE: [AccessD] Get Folder Name via API Thanks guys. You all have code that uses the same API (SHBrowseForFolder). Works well but I had hoped to find some way of using the File Save/Save As dialog but returning just a folder name. The advantage of that is that you can create a new folder on the hoof. But if it was possible then I'm sure you'd be using it too. Thanks for all your suggestions. Andy Lacey http://www.minstersystems.co.uk > -----Original Message----- > From: accessd-bounces at databaseadvisors.com > [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Dan Waters > Sent: 06 January 2004 17:34 > To: 'Access Developers discussion and problem solving' > Subject: RE: [AccessD] Get Folder Name via API > > > Andy, > > This is what I use - credits are included. Cut and paste > into a standard module. I use a global string variable to > carry the path to a folder. > > Dan Waters > > '------------------------------- > > Option Compare Database > Option Explicit > > Private Type BrowseInfo > hWndOwner As Long > pIDLRoot As Long > pszDisplayName As Long > lpszTitle As Long > ulFlags As Long > lpfnCallback As Long > lParam As Long > iImage As Long > End Type > > Const BIF_RETURNONLYFSDIRS = 1 > Const MAX_PATH = 260 > > Private Declare Sub CoTaskMemFree Lib "ole32.dll" (ByVal hMem > As Long) Private Declare Function lstrcat Lib "kernel32" > Alias "lstrcatA" (ByVal lpString1 As String, ByVal lpString2 > As String) As Long Private Declare Function SHBrowseForFolder > Lib "shell32" (lpbi As > BrowseInfo) As Long > Private Declare Function SHGetPathFromIDList Lib "shell32" > (ByVal pidList As Long, ByVal lpBuffer As String) As Long > > '--------------------------------- > > Public Sub GetFolderName() > On Error GoTo EH > > 'KPD-Team 1998 > 'URL: http://www.allapi.net/ > 'KPDTeam at Allapi.net > > Dim intNull As Integer > Dim lngIDList As Long > Dim lngResult As Long > Dim stgPath As String > Dim udtBI As BrowseInfo > > With udtBI > 'Set the owner window > '.hWndOwner = Me.hwnd > > 'lstrcat appends the two strings and returns the > memory address > '.lpszTitle = lstrcat("C:\", "") > > 'Return only if the user selected a directory > .ulFlags = BIF_RETURNONLYFSDIRS > > End With > > 'Show the 'Browse for folder' dialog > lngIDList = SHBrowseForFolder(udtBI) > > If lngIDList Then > > stgPath = String$(MAX_PATH, 0) > > 'Get the path from the IDList > SHGetPathFromIDList lngIDList, stgPath > > 'free the block of memory > CoTaskMemFree lngIDList > > '-- Get location of first null value > intNull = InStr(stgPath, vbNullChar) > > If intNull > 0 Then > '-- Trim nulls from name > GstgFolderName = Left$(stgPath, intNull - 1) > Else > GstgFolderName = "" > End If > Else > GstgFolderName = "" > End If > > Exit Sub > > EH: > Application.Echo True > Call GlobalErrors("", Err.Number, Err.Description, > CurrentObjectName, > "GetFolderName") > > End Sub > > > -----Original Message----- > From: accessd-bounces at databaseadvisors.com > [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Andy Lacey > Sent: Tuesday, January 06, 2004 9:42 AM > To: Access Developers discussion and problem solving > Subject: [AccessD] Get Folder Name via API > > > Must've done thsi before but can't find it. I want to ask the > user for a folder name (into which I'm going to store stuff). > I want to use the Windows common file dialog so that it looks > neat and offers to create a new folder and so on. However I > don't want to put a Common Dialog control on the form (always > has version issues) so want to use the API method. But the > code I have (from Dev Ashish) insists on a filename not just > a folder, and the other code on his site to browse a folder > list doesn't use the normal dialog. Anyone got code for this? > > -- > Andy Lacey > http://www.minstersystems.co.uk > > > ________________________________________________ > Message sent using UebiMiau 2.7.2 > > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/a> ccessd > Website: > http://www.databaseadvisors.com > > > > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/a> ccessd > Website: > http://www.databaseadvisors.com > > _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From dfe at nudgeeinternational.com Tue Jan 6 16:22:23 2004 From: dfe at nudgeeinternational.com (David Fenton) Date: Wed, 7 Jan 2004 08:22:23 +1000 Subject: [AccessD] DoCmd.RunSQL or CurrentDb.Execute? Message-ID: Quick question... Which is better to use? Assuming an SQL string in a variable called strSQL Then... DoCmd.RunSQL strSQL Or CurrentDb.Execute strSQL They both have the same outcome; I was just wondering whether one was maybe faster or something? Cheers David Brisbane Australia From dfe at nudgeeinternational.com Tue Jan 6 16:29:53 2004 From: dfe at nudgeeinternational.com (David Fenton) Date: Wed, 7 Jan 2004 08:29:53 +1000 Subject: [AccessD] RE: MDBs vs SQL Server Message-ID: John, I'm a 4.5 - I would love to get into it, and although I understand and use SQL, from what I have read in Alison Balters books, you lose a lot of the ease of control when you move from an MDB to SQL Server. I would like to know more about ADP to see if that will get me closer to using SQL Server with an Access Front End. Currently all my coding is in an Access MDB. Will eventually create an MDE, but application is hovering around 12MB so seems unnecessary to move to SQL Server at this stage with only 25 staff using it. Cheers David Fenton Brisbane Australia -----Original Message----- From: John W. Colby [mailto:jcolby at colbyconsulting.com] Sent: Monday, December 22, 2003 5:23 PM To: AccessD Subject: [AccessD] MDBs vs SQL Server I'd like to conduct a non-scientific poll to discover what you folks use. Please pick one of the numbers and respond to the list. 1) I use SQL Server for all my data. I wouldn't touch an MDB BE with a 10 foot pole. 2) I use SQL Server mostly, but will touch an MDB BE with a 10 foot pole, as long as I don't have to be responsible for the mess. 3) I have used SQL Server in at least one actual client system but my bread and butter is made with MDB BEs. 4) I am fascinated with the possibilities of SQL server, have looked at it, perhaps installed it at my office, but just don't have the call for it from my clients. 5) What's this here SQL Server thangie? All my database BEs are done with MDBs. 6) I prefer to do my data stores in Excel spreadsheets, but if I must an MDB is at least within my grasp. SQL Server is for them big boys n they won't talk to me. I would still be using Borland's Reflex if I could get a copy - now THERE's a REAL MAN'S database!!! Just pick a number and put it in the first line of your response. As for me, I am a 4. I have SQL Server installed in my office, moved my billing db to it in order to have a real live in use system using it, and have regretted it ever since. In fact I yanked the data back out into an MDB last week after having to rebuild my system twice and then ending up with torn pages in my SQL Server database. John W. Colby www.ColbyConsulting.com From Developer at UltraDNT.com Tue Jan 6 16:42:40 2004 From: Developer at UltraDNT.com (Developer) Date: Tue, 6 Jan 2004 17:42:40 -0500 Subject: [AccessD] DoCmd.RunSQL or CurrentDb.Execute? In-Reply-To: Message-ID: <004601c3d4a6$643bdbd0$7001a8c0@COA3> Currentdb.execute will bypass the warnings if they are on, Docmd will still have the warnings. Currentdb has been faster for me, but I havent benchmarked anything specific. Hth Steve -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of David Fenton Sent: Tuesday, January 06, 2004 5:22 PM To: accessd at databaseadvisors.com Subject: [AccessD] DoCmd.RunSQL or CurrentDb.Execute? Quick question... Which is better to use? Assuming an SQL string in a variable called strSQL Then... DoCmd.RunSQL strSQL Or CurrentDb.Execute strSQL They both have the same outcome; I was just wondering whether one was maybe faster or something? Cheers David Brisbane Australia _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From stuart at lexacorp.com.pg Tue Jan 6 16:40:19 2004 From: stuart at lexacorp.com.pg (Stuart McLachlan) Date: Wed, 07 Jan 2004 08:40:19 +1000 Subject: [AccessD] DoCmd.RunSQL or CurrentDb.Execute? In-Reply-To: Message-ID: <3FFBC5F3.22232.16B2F9@localhost> On 7 Jan 2004 at 8:22, David Fenton wrote: > > Quick question... > Which is better to use? > Assuming an SQL string in a variable called strSQL > Then... > > DoCmd.RunSQL strSQL > Or > CurrentDb.Execute strSQL > > They both have the same outcome; I was just wondering whether one was > maybe faster or something? > WIth DoCmd.RunSQL, you get the standard messagebox 'You are about to...." If you want the update to happen without any user action, use CurrentDB.Execute. If you want the warning and the user to have the opportunity to cancel the action, user DoCmd.RunSQL Note that "DoCmd.SetWarnings False DoCmd.RunSQL strSQL DoCmdSetWarnings True" suppresses the update notice, but also has the effect of suppressing any error messages generated by a problem in strSQL. -- Lexacorp Ltd http://www.lexacorp.com.pg Information Technology Consultancy, Software Development,System Support. From Subscriptions at servicexp.com Tue Jan 6 20:26:35 2004 From: Subscriptions at servicexp.com (Robert Gracie) Date: Tue, 6 Jan 2004 21:26:35 -0500 Subject: [AccessD] Encryption In-Reply-To: <3FFBC5F3.22232.16B2F9@localhost> Message-ID: Hello All, Instead of re-inventing the wheel here, does anyone have some code that will allow me to pull the body of an e-mail (or a very large string even) and encrypt it with out first writing it to a text file? I've tried three different cipher routines, but they all want to break up the String. So I'm left with only the first section in the string.... Thanks Robert Gracie From stuart at lexacorp.com.pg Tue Jan 6 22:12:04 2004 From: stuart at lexacorp.com.pg (Stuart McLachlan) Date: Wed, 07 Jan 2004 14:12:04 +1000 Subject: [AccessD] Encryption In-Reply-To: References: <3FFBC5F3.22232.16B2F9@localhost> Message-ID: <3FFC13B4.19204.1466957@localhost> On 6 Jan 2004 at 21:26, Robert Gracie wrote: > Hello All, > Instead of re-inventing the wheel here, does anyone have some code that > will allow me to pull the body of an e-mail (or a very large string even) > and encrypt it with out first writing it to a text file? I've tried three > different cipher routines, but they all want to break up the String. So I'm > left with only the first section in the string.... > How large is large? Here are some routines that use PC1 (see http://membres.lycos.fr/pc1/) Theorectically, it will handle any length of string up to 1/2 the maximum allowable string length for your development environment. (The encryted string is always exactly twice as large as the original.) This VBA versions works fairly well up to about 30 - 40K on my PC (1 -2 secs to encode, virtually instantaneous decode), but as the original string gets bigger, it takes *a lot* longer to encrypt. (70K = 12 secs, 80K = 22 secs, 90K = 38 secs etc but decrypt is still only about 3 secs at 90K). If you want to use larger strings, I can let you have a DLL version of this which I built in PowerBasic. It is *much* faster Option Compare Database Option Explicit '----------------------------------------------------------------------------------------------------- '(A little) More info on this algo can be found at [URL=http://www.multimania.com/cuisinons/pc1/index.html]http://www.multimania.com/cuisinons/pc1/index.html[/URL] 'Ported from VB to PB by Wayne Diamond. The PC1 cipher uses a 128-bit key. 'It's a stream cipher with a retroaction function. 'Ported from PB to Access VBA by Stuart McLachlan '----------------------------------------------------------------------------------------------------- Global x1aZero() As Long, cle() As Long '---------------------------------------------------------------------------------- Function code(x1aTwo As Long, EDsi As Long, EDi As Long) As Long Dim EDax As Long, EDbx As Long, EDcx As Long, EDdx As Long, EDtemp As Long On Error Resume Next EDdx = (x1aTwo + EDi) Mod 65536 EDax = x1aZero(EDi) EDcx = &H15A EDbx = &H4E35 EDtemp = EDax EDax = EDsi EDsi = EDtemp EDtemp = EDax EDax = EDdx EDdx = EDtemp If (EDax <> 0) Then EDax = (EDax * EDbx) Mod 65536 End If EDtemp = EDax EDax = EDcx EDcx = EDtemp If (EDax <> 0) Then EDax = (EDax * EDsi) Mod 65536 EDcx = (EDax + EDcx) Mod 65536 End If EDtemp = EDax EDax = EDsi EDsi = EDtemp EDax = (EDax * EDbx) Mod 65536 EDdx = (EDcx + EDdx) Mod 65536 EDax = EDax + 1 x1aTwo = EDdx x1aZero(EDi) = EDax code = EDax Xor EDdx EDi = EDi + 1 End Function '---------------------------------------------------------------------------------- Function Assemble(x1aTwo As Long, EDsi As Long, EDi As Long) As Long On Error Resume Next Dim inter As Long x1aZero(0) = ((cle(1) * 256) + cle(2)) Mod 65536 inter = code(x1aTwo, EDsi, EDi) x1aZero(1) = x1aZero(0) Xor ((cle(3) * 256) + cle(4)) inter = inter Xor code(x1aTwo, EDsi, EDi) x1aZero(2) = x1aZero(1) Xor ((cle(5) * 256) + cle(6)) inter = inter Xor code(x1aTwo, EDsi, EDi) x1aZero(3) = x1aZero(2) Xor ((cle(7) * 256) + cle(8)) inter = inter Xor code(x1aTwo, EDsi, EDi) x1aZero(4) = x1aZero(3) Xor ((cle(9) * 256) + cle(10)) inter = inter Xor code(x1aTwo, EDsi, EDi) x1aZero(5) = x1aZero(4) Xor ((cle(11) * 256) + cle(12)) inter = inter Xor code(x1aTwo, EDsi, EDi) x1aZero(6) = x1aZero(5) Xor ((cle(13) * 256) + cle(14)) inter = inter Xor code(x1aTwo, EDsi, EDi) x1aZero(7) = x1aZero(6) Xor ((cle(15) * 256) + cle(16)) Assemble = inter Xor code(x1aTwo, EDsi, EDi) EDi = 0 End Function '---------------------------------------------------------------------------------- Function PC1ENC(encPassword As String, encStringOut As String) As String On Error Resume Next Dim encStringIn As String, ChmpStr As String Dim j As Long, cfc As Long, cfd As Long, c As Long, D As Long, E As Long Dim Chmp As Long, compte As Long Dim x1aTwo As Long, EDsi As Long, EDi As Long, inter As Long ReDim x1aZero(9) As Long, cle(17) As Long encStringIn = "" EDsi = 0 x1aTwo = 0 EDi = 0 For j = 1 To 16 cle(j) = 0 Next j ChmpStr = encPassword Chmp = Len(ChmpStr) For j = 1 To Chmp cle(j) = Asc(Mid$(ChmpStr, j, 1)) Next j ChmpStr = encStringOut Chmp = Len(ChmpStr) For j = 1 To Chmp c = Asc(Mid$(ChmpStr, j, 1)) inter = Assemble(x1aTwo, EDsi, EDi) cfc = (((inter / 256) * 256) - (inter Mod 256)) / 256 cfd = inter Mod 256 For compte = 1 To 16 cle(compte) = cle(compte) Xor c Next compte c = c Xor (cfc Xor cfd) D = (((c / 16) * 16) - (c Mod 16)) / 16 E = c Mod 16 encStringIn = encStringIn + Chr$(&H61 + D) ' d+&h61 give one letter range from a to p for the 4 high bits of c encStringIn = encStringIn + Chr$(&H61 + E) ' e+&h61 give one letter range from a to p for the 4 low bits of c Next j PC1ENC = encStringIn End Function '---------------------------------------------------------------------------------- Function PC1DEC(encPassword As String, encStringIn As String) As String On Error Resume Next Dim encStringOut As String, ChmpStr As String Dim j As Long, cfc As Long, cfd As Long, c As Long, D As Long, E As Long Dim Chmp As Long, compte As Long Dim x1aTwo As Long, EDsi As Long, EDi As Long, inter As Long ReDim x1aZero(9) As Long, cle(17) As Long encStringOut = "" EDsi = 0 x1aTwo = 0 EDi = 0 For j = 1 To 16 cle(j) = 0 Next j ChmpStr = encPassword Chmp = Len(ChmpStr) For j = 1 To Chmp cle(j) = Asc(Mid$(ChmpStr, j, 1)) Next j ChmpStr = encStringIn Chmp = Len(ChmpStr) For j = 1 To Chmp D = Asc(Mid$(ChmpStr, j, 1)) If (D - &H61) >= 0 Then D = D - &H61 ' to transform the letter to the 4 high bits of c If (D >= 0) And (D <= 15) Then D = D * 16 End If End If If (j <> Chmp) Then j = j + 1 End If E = Asc(Mid$(ChmpStr, j, 1)) If (E - &H61) >= 0 Then E = E - &H61 ' to transform the letter to the 4 low bits of c If (E >= 0) And (E <= 15) Then c = D + E End If End If inter = Assemble(x1aTwo, EDsi, EDi) cfc = (((inter / 256) * 256) - (inter Mod 256)) / 256 cfd = inter Mod 256 c = c Xor (cfc Xor cfd) For compte = 1 To 16 cle(compte) = cle(compte) Xor c Next compte encStringOut = encStringOut + Chr$(c) Next j PC1DEC = encStringOut End Function '---------------------------------------------------------------------------------- Function test() As Long Dim strPassword As String Dim strOriginal As String Dim strEncode As String Dim strDecode As String strPassword = "12345678901" ' Max 11 Numbers it seems or ... strPassword = "abcdefghijklmno" ' around 16 letters is maximum strOriginal = String$(32000, "A") starttime = Timer strEncode = PC1ENC(strPassword, strOriginal) Debug.Print "Encoded in " & CInt(Timer - starttime) & " secs" Open "c:\test1.txt" For Output As #1 Print #1, strEncode Close #1 starttime = Timer strDecode = PC1DEC(strPassword, strEncode) Debug.Print "Decoded in " & CInt(Timer - starttime) & " secs" Open "c:\test2.txt" For Output As #1 Print #1, strDecode Close #1 End Function '---------------------------------------------------------------------------------- -- Lexacorp Ltd http://www.lexacorp.com.pg Information Technology Consultancy, Software Development,System Support. From selina at easydatabases.com.au Tue Jan 6 22:38:36 2004 From: selina at easydatabases.com.au (Selina Iddon) Date: Wed, 7 Jan 2004 14:38:36 +1000 Subject: [AccessD] Queries with a mind of their own References: <3FFBC5F3.22232.16B2F9@localhost> <3FFC13B4.19204.1466957@localhost> Message-ID: <007701c3d4d8$1db7e000$6465000a@venus> Hi Everyone I've been away for quite a while, hope everyone had a Happy New Year. In the past day a couple of my databases have started going haywire. I create a query, add the field I want but if I try and group then it gives me the message you can group on "*" fields ... true, but I didn't add any and there are none showing in the design pane. So I run the results pane without grouping and sure enough, the field I did add is there in front, then every other field of every table is there too. I go into SQL view and sure enough there is an *, but I didn't do it, if I manually take this out it's then fine, but how did it get there in the first place. This is happening with all new queries I'm making it would seem ... and when editing some old ones. Any ideas? Thanks Selina From stuart at lexacorp.com.pg Tue Jan 6 23:53:59 2004 From: stuart at lexacorp.com.pg (Stuart McLachlan) Date: Wed, 07 Jan 2004 15:53:59 +1000 Subject: [AccessD] Queries with a mind of their own In-Reply-To: <007701c3d4d8$1db7e000$6465000a@venus> Message-ID: <3FFC2B97.3187.1A3BA03@localhost> On 7 Jan 2004 at 14:38, Selina Iddon wrote: > In the past day a couple of my databases have started going haywire. I > create a query, add the field I want but if I try and group then it gives me > the message you can group on "*" fields ... true, but I didn't add any and > there are none showing in the design pane. So I run the results pane > without grouping and sure enough, the field I did add is there in front, > then every other field of every table is there too. I go into SQL view and > sure enough there is an *, but I didn't do it, if I manually take this out > it's then fine, but how did it get there in the first place. This is > happening with all new queries I'm making it would seem ... and when editing > some old ones. Any ideas? > Go into Options | Tables/Queries. I'd guess that someone has ticked the box "Query Design: Output all fields". For existing queries that are doing this, open the query in Design View, select "View Properties" and set the property "Output All Fields" to "No" -- Lexacorp Ltd http://www.lexacorp.com.pg Information Technology Consultancy, Software Development,System Support. From gustav at cactus.dk Wed Jan 7 01:45:23 2004 From: gustav at cactus.dk (Gustav Brock) Date: Wed, 7 Jan 2004 08:45:23 +0100 Subject: [AccessD] Encryption In-Reply-To: <3FFC13B4.19204.1466957@localhost> References: <3FFBC5F3.22232.16B2F9@localhost> <3FFC13B4.19204.1466957@localhost> Message-ID: <982764405.20040107084523@cactus.dk> Hi Robert and Stuart Lookup my message: Re: [AccessD] Encryption/decryption (was: Registration Techniques) from 2002-09-18 for a complete high-speed PC1 Access 97 module. Should work for A2000/2003 as well. That said, a PowerBasic dll would probably run way faster ... /gustav >> Instead of re-inventing the wheel here, does anyone have some code that >> will allow me to pull the body of an e-mail (or a very large string even) >> and encrypt it with out first writing it to a text file? I've tried three >> different cipher routines, but they all want to break up the String. So I'm >> left with only the first section in the string.... >> > How large is large? > Here are some routines that use PC1 (see > http://membres.lycos.fr/pc1/) > Theorectically, it will handle any length of string up to 1/2 the > maximum allowable string length for your development environment. > (The encryted string is always exactly twice as large as the > original.) > This VBA versions works fairly well up to about 30 - 40K on my PC > (1 -2 secs to encode, virtually instantaneous decode), but as the > original string gets bigger, it takes *a lot* longer to encrypt. > (70K = 12 secs, 80K = 22 secs, 90K = 38 secs etc but decrypt is still > only about 3 secs at 90K). > If you want to use larger strings, I can let you have a DLL version > of this which I built in PowerBasic. It is *much* faster From AJAllen at mail.wvu.edu Wed Jan 7 08:13:51 2004 From: AJAllen at mail.wvu.edu (Amanda Allen) Date: Wed, 07 Jan 2004 09:13:51 -0500 Subject: [AccessD] Field - Can Grow - on a Form Message-ID: I'm using Access 2002 and I can't seem to get the fields on a form to grow to fit the size needed for the data in the table. For instance, most of the data is about 50 characters but there are some that are about 150 characters. Instead of wasting space on the form for the larger data, I would like the field to grow on the form. I selected Can Grow in the properties of the field, but it still does not allow the field to grow on the form. * Amanda From jwcolby at colbyconsulting.com Wed Jan 7 08:23:45 2004 From: jwcolby at colbyconsulting.com (John W. Colby) Date: Wed, 7 Jan 2004 09:23:45 -0500 Subject: [AccessD] Field - Can Grow - on a Form In-Reply-To: Message-ID: This only works on reports. John W. Colby www.ColbyConsulting.com -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Amanda Allen Sent: Wednesday, January 07, 2004 9:14 AM To: accessd at databaseadvisors.com Subject: [AccessD] Field - Can Grow - on a Form I'm using Access 2002 and I can't seem to get the fields on a form to grow to fit the size needed for the data in the table. For instance, most of the data is about 50 characters but there are some that are about 150 characters. Instead of wasting space on the form for the larger data, I would like the field to grow on the form. I selected Can Grow in the properties of the field, but it still does not allow the field to grow on the form. * Amanda _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From wdhindman at bellsouth.net Wed Jan 7 08:34:34 2004 From: wdhindman at bellsouth.net (William Hindman) Date: Wed, 7 Jan 2004 09:34:34 -0500 Subject: [AccessD] Field - Can Grow - on a Form References: Message-ID: <000901c3d52b$5f0c7db0$6101a8c0@dejpolsys> ...sorry ...that functionality is not native to forms in Access, only reports :( ...but Lebans has a demo mdb using the API to give forms the same grow/shrink functionality as reports ...HTH :) http://www.lebans.com/cangrow.htm William Hindman - Next Year In The Free State! ----- Original Message ----- From: "Amanda Allen" To: Sent: Wednesday, January 07, 2004 9:13 AM Subject: [AccessD] Field - Can Grow - on a Form > I'm using Access 2002 and I can't seem to get the fields on a form to > grow to fit the size needed for the data in the table. For instance, > most of the data is about 50 characters but there are some that are > about 150 characters. Instead of wasting space on the form for the > larger data, I would like the field to grow on the form. I selected > Can Grow in the properties of the field, but it still does not allow > the field to grow on the form. > > * Amanda > > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com > From gustav at cactus.dk Wed Jan 7 08:34:52 2004 From: gustav at cactus.dk (Gustav Brock) Date: Wed, 7 Jan 2004 15:34:52 +0100 Subject: [AccessD] Field - Can Grow - on a Form In-Reply-To: References: Message-ID: <9427333513.20040107153452@cactus.dk> Hi Amanda Pay a visit to Stephen Lebans's site: http://www.lebans.com/Form.htm Look for AutoSizeTextBox and TextHeightWidth. /gustav > I'm using Access 2002 and I can't seem to get the fields on a form to > grow to fit the size needed for the data in the table. For instance, > most of the data is about 50 characters but there are some that are > about 150 characters. Instead of wasting space on the form for the > larger data, I would like the field to grow on the form. I selected > Can Grow in the properties of the field, but it still does not allow > the field to grow on the form. > * Amanda From mwhittinghill at symphonyinfo.com Wed Jan 7 09:07:50 2004 From: mwhittinghill at symphonyinfo.com (Mark Whittinghill) Date: Wed, 7 Jan 2004 09:07:50 -0600 Subject: [AccessD] DoCmd.RunSQL or CurrentDb.Execute? References: <004601c3d4a6$643bdbd0$7001a8c0@COA3> Message-ID: <003301c3d530$0537df00$2501a8c0@PASCAL> One more thing on this, if you want to be able to rollback your changes in a workspace transaction, you need to run CurrentDb.Execute Mark Whittinghill Symphony Information Services 763-391-7400 mwhittinghill at symphonyinfo.com ----- Original Message ----- From: "Developer" To: "'Access Developers discussion and problem solving'" Sent: Tuesday, January 06, 2004 4:42 PM Subject: RE: [AccessD] DoCmd.RunSQL or CurrentDb.Execute? > Currentdb.execute will bypass the warnings if they are on, > Docmd will still have the warnings. > Currentdb has been faster for me, but I havent benchmarked anything > specific. > > Hth > Steve > > > -----Original Message----- > From: accessd-bounces at databaseadvisors.com > [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of David Fenton > Sent: Tuesday, January 06, 2004 5:22 PM > To: accessd at databaseadvisors.com > Subject: [AccessD] DoCmd.RunSQL or CurrentDb.Execute? > > > > Quick question... > Which is better to use? > Assuming an SQL string in a variable called strSQL > Then... > > DoCmd.RunSQL strSQL > Or > CurrentDb.Execute strSQL > > They both have the same outcome; I was just wondering whether one was > maybe faster or something? > > Cheers > David > Brisbane > Australia > > > _______________________________________________ > 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 > > From garykjos at hotmail.com Wed Jan 7 09:12:21 2004 From: garykjos at hotmail.com (Gary Kjos) Date: Wed, 07 Jan 2004 09:12:21 -0600 Subject: [AccessD] Queries with a mind of their own Message-ID: There is an option under Tools/Options/Tables Queries to "Output All Fields" I wonder if this has been mistakenly checked? Gary Kjos garykjos at hotmail.com >From: "Selina Iddon" >Reply-To: Access Developers discussion and problem >solving >To: "Access Developers discussion and problem >solving" >Subject: [AccessD] Queries with a mind of their own >Date: Wed, 7 Jan 2004 14:38:36 +1000 > >Hi Everyone > >I've been away for quite a while, hope everyone had a Happy New Year. >In the past day a couple of my databases have started going haywire. I >create a query, add the field I want but if I try and group then it gives >me >the message you can group on "*" fields ... true, but I didn't add any and >there are none showing in the design pane. So I run the results pane >without grouping and sure enough, the field I did add is there in front, >then every other field of every table is there too. I go into SQL view and >sure enough there is an *, but I didn't do it, if I manually take this out >it's then fine, but how did it get there in the first place. This is >happening with all new queries I'm making it would seem ... and when >editing >some old ones. Any ideas? > >Thanks > >Selina > > >_______________________________________________ >AccessD mailing list >AccessD at databaseadvisors.com >http://databaseadvisors.com/mailman/listinfo/accessd >Website: http://www.databaseadvisors.com _________________________________________________________________ Get reliable dial-up Internet access now with our limited-time introductory offer. http://join.msn.com/?page=dept/dialup From ssharkins at bellsouth.net Wed Jan 7 09:20:16 2004 From: ssharkins at bellsouth.net (Susan Harkins) Date: Wed, 7 Jan 2004 10:20:16 -0500 Subject: [AccessD] lines and Can Grow conflict Message-ID: <00fc01c3d531$c19950b0$210110ac@SUSANONE> I've got a small report that generates work orders. There's a line down the left side of the Detail section, which of course, keeps any controls with a Yes Can Grow setting from actually expanding, even if they need to. I know how to drop in lines and stuff programmatically for controls, so I can probably figure this one out, but if anyone already has code that drops in a line in the Detail section _after_ the controls expand, you could save me a little time if you're willing to share it. Thanks! :) Susan H. From DElam at jenkens.com Wed Jan 7 09:42:26 2004 From: DElam at jenkens.com (Elam, Debbie) Date: Wed, 7 Jan 2004 09:42:26 -0600 Subject: [AccessD] lines and Can Grow conflict Message-ID: <7B1961ED924D1A459E378C9B1BB22B4C0106B918@natexch.jenkens.com> Put this in the detail section on format Dim X As Single Me.ScaleMode = 5 Me.DrawWidth = 3 X = 0 Me.Line (X, 0)-(X, 22) X = 0.9604 Me.Line (X, 0)-(X, 22) X = 1.9083 Me.Line (X, 0)-(X, 22) X = 2.7604 Me.Line (X, 0)-(X, 22) X = 3.6271 Me.Line (X, 0)-(X, 22) X = 4.3354 Me.Line (X, 0)-(X, 22) X = 5.2111 Me.Line (X, 0)-(X, 22) X = 5.95 The value of X is the number of inches from the left you want the line to be. Debbie -----Original Message----- From: Susan Harkins [mailto:ssharkins at bellsouth.net] Sent: Wednesday, January 07, 2004 9:20 AM To: AccessD at databaseadvisors.com Subject: [AccessD] lines and Can Grow conflict I've got a small report that generates work orders. There's a line down the left side of the Detail section, which of course, keeps any controls with a Yes Can Grow setting from actually expanding, even if they need to. I know how to drop in lines and stuff programmatically for controls, so I can probably figure this one out, but if anyone already has code that drops in a line in the Detail section _after_ the controls expand, you could save me a little time if you're willing to share it. Thanks! :) Susan H. _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com - JENKENS & GILCHRIST E-MAIL NOTICE - This transmission may be: (1) subject to the Attorney-Client Privilege, (2) an attorney work product, or (3) strictly confidential. If you are not the intended recipient of this message, you may not disclose, print, copy or disseminate this information. If you have received this in error, please reply and notify the sender (only) and delete the message. Unauthorized interception of this e-mail is a violation of federal criminal law. This communication does not reflect an intention by the sender or the sender's client or principal to conduct a transaction or make any agreement by electronic means. Nothing contained in this message or in any attachment shall satisfy the requirements for a writing, and nothing contained herein shall constitute a contract or electronic signature under the Electronic Signatures in Global and National Commerce Act, any version of the Uniform Electronic Transactions Act or any other statute governing electronic transactions. From ssharkins at bellsouth.net Wed Jan 7 09:48:59 2004 From: ssharkins at bellsouth.net (Susan Harkins) Date: Wed, 7 Jan 2004 10:48:59 -0500 Subject: [AccessD] lines and Can Grow conflict References: <7B1961ED924D1A459E378C9B1BB22B4C0106B918@natexch.jenkens.com> Message-ID: <000701c3d536$8ad3ea40$210110ac@SUSANONE> Cool -- that was fast Debbie -- thank you. :) Susan H. > Put this in the detail section on format > > Dim X As Single > Me.ScaleMode = 5 > Me.DrawWidth = 3 > X = 0 > Me.Line (X, 0)-(X, 22) > X = 0.9604 > Me.Line (X, 0)-(X, 22) > X = 1.9083 > Me.Line (X, 0)-(X, 22) > X = 2.7604 > Me.Line (X, 0)-(X, 22) > X = 3.6271 > Me.Line (X, 0)-(X, 22) > X = 4.3354 > Me.Line (X, 0)-(X, 22) > X = 5.2111 > Me.Line (X, 0)-(X, 22) > X = 5.95 > > The value of X is the number of inches from the left you want the line to > be. > > Debbie > > -----Original Message----- > From: Susan Harkins [mailto:ssharkins at bellsouth.net] > Sent: Wednesday, January 07, 2004 9:20 AM > To: AccessD at databaseadvisors.com > Subject: [AccessD] lines and Can Grow conflict > > > I've got a small report that generates work orders. There's a line down the > left side of the Detail section, which of course, keeps any controls with a > Yes Can Grow setting from actually expanding, even if they need to. I know > how to drop in lines and stuff programmatically for controls, so I can > probably figure this one out, but if anyone already has code that drops in a > line in the Detail section _after_ the controls expand, you could save me a > little time if you're willing to share it. Thanks! :) > > Susan H. > > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com > - JENKENS & GILCHRIST E-MAIL NOTICE - This transmission may be: (1) subject > to the Attorney-Client Privilege, (2) an attorney work product, or (3) > strictly confidential. If you are not the intended recipient of this > message, you may not disclose, print, copy or disseminate this information. > If you have received this in error, please reply and notify the sender > (only) and delete the message. Unauthorized interception of this e-mail is a > violation of federal criminal law. > This communication does not reflect an intention by the sender or the > sender's client or principal to conduct a transaction or make any agreement > by electronic means. Nothing contained in this message or in any attachment > shall satisfy the requirements for a writing, and nothing contained herein > shall constitute a contract or electronic signature under the Electronic > Signatures in Global and National Commerce Act, any version of the Uniform > Electronic Transactions Act or any other statute governing electronic > transactions. > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com > From caa at highway.com.br Wed Jan 7 12:31:58 2004 From: caa at highway.com.br (Carlos Alberto Alves) Date: Wed, 07 Jan 2004 16:31:58 -0200 Subject: [AccessD] OT - Test Message-ID: Just a test... -- ************************************** * Carlos Alberto Alves * * Child Neurologist * * Systems Analyst/Programmer * * Rio de Janeiro, Brazil * * mailto:caa at highway.com.br * ************************************** From Oleg_123 at xuppa.com Wed Jan 7 15:21:51 2004 From: Oleg_123 at xuppa.com (Oleg_123 at xuppa.com) Date: Wed, 7 Jan 2004 16:21:51 -0500 (EST) Subject: [AccessD] make table query with empy fields In-Reply-To: References: <40590.12.3.132.98.1066926288.squirrel@heck.bay9.com> Message-ID: <42620.12.3.132.98.1073510511.squirrel@heck.bay9.com> How do I create empty fields in make table query ? I tried doing it this way -- [Expr1] AS [Insider Flag], [Expr1] AS [Sex Code], [Expr1] AS [Race Code], but this prompts me for what Expr1 is, also can I do it so it'l numeric field instead of text ? ----------------------------------------- Get Breaking News from CNN, ABC, NBC, CBS Now. http://www.xuppa.com/news/?link=webmail From ssharkins at bellsouth.net Wed Jan 7 15:26:50 2004 From: ssharkins at bellsouth.net (Susan Harkins) Date: Wed, 7 Jan 2004 16:26:50 -0500 Subject: [AccessD] make table query with empy fields References: <40590.12.3.132.98.1066926288.squirrel@heck.bay9.com> <42620.12.3.132.98.1073510511.squirrel@heck.bay9.com> Message-ID: <000f01c3d564$f7c7acd0$210110ac@SUSANONE> You want to add a new empty field or you want an existing field to not copy the existing data? Is it just the one field or are you trying to copy the table structure without data? Susan H. > How do I create empty fields in make table query ? > I tried doing it this way -- [Expr1] AS [Insider Flag], [Expr1] AS [Sex > Code], [Expr1] AS [Race Code], but this prompts me for what Expr1 is, also > can I do it so it'l numeric field instead of text ? > > > ----------------------------------------- > Get Breaking News from CNN, ABC, NBC, CBS Now. > http://www.xuppa.com/news/?link=webmail > > > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com > From mikedorism at adelphia.net Wed Jan 7 15:31:58 2004 From: mikedorism at adelphia.net (Mike & Doris Manning) Date: Wed, 7 Jan 2004 16:31:58 -0500 Subject: [AccessD] make table query with empy fields In-Reply-To: <42620.12.3.132.98.1073510511.squirrel@heck.bay9.com> Message-ID: <000001c3d565$ae8ee780$8b194244@hargrove.internal> Try it this way -- 0 AS [Insider Flag], 0 AS [Sex Code], 0 AS [Race Code] And replace the 0 with whatever default number you want... Doris Manning Database Administrator Hargrove Inc. www.hargroveinc.com -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Oleg_123 at xuppa.com Sent: Wednesday, January 07, 2004 4:22 PM To: accessd at databaseadvisors.com Subject: [AccessD] make table query with empy fields How do I create empty fields in make table query ? I tried doing it this way -- [Expr1] AS [Insider Flag], [Expr1] AS [Sex Code], [Expr1] AS [Race Code], but this prompts me for what Expr1 is, also can I do it so it'l numeric field instead of text ? ----------------------------------------- Get Breaking News from CNN, ABC, NBC, CBS Now. http://www.xuppa.com/news/?link=webmail _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From Oleg_123 at xuppa.com Wed Jan 7 15:47:33 2004 From: Oleg_123 at xuppa.com (Oleg_123 at xuppa.com) Date: Wed, 7 Jan 2004 16:47:33 -0500 (EST) Subject: [AccessD] make table query with empy fields In-Reply-To: <000001c3d565$ae8ee780$8b194244@hargrove.internal> References: <42620.12.3.132.98.1073510511.squirrel@heck.bay9.com> <000001c3d565$ae8ee780$8b194244@hargrove.internal> Message-ID: <42634.12.3.132.98.1073512053.squirrel@heck.bay9.com> thanks a lot Doris, thats exactly what i needed > Try it this way -- 0 AS [Insider Flag], 0 AS [Sex Code], 0 AS [Race > Code] > > And replace the 0 with whatever default number you want... > > Doris Manning > Database Administrator > Hargrove Inc. > www.hargroveinc.com > > > -----Original Message----- > From: accessd-bounces at databaseadvisors.com > [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of > Oleg_123 at xuppa.com > Sent: Wednesday, January 07, 2004 4:22 PM > To: accessd at databaseadvisors.com > Subject: [AccessD] make table query with empy fields > > > How do I create empty fields in make table query ? > I tried doing it this way -- [Expr1] AS [Insider Flag], [Expr1] AS [Sex > Code], [Expr1] AS [Race Code], but this prompts me for what Expr1 is, > also can I do it so it'l numeric field instead of text ? > > > ----------------------------------------- > Get Breaking News from CNN, ABC, NBC, CBS Now. > http://www.xuppa.com/news/?link=webmail > > > _______________________________________________ > 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 ----------------------------------------- Get Breaking News from CNN, ABC, NBC, CBS Now. http://www.xuppa.com/news/?link=webmail From selina at easydatabases.com.au Wed Jan 7 19:18:59 2004 From: selina at easydatabases.com.au (Selina Iddon) Date: Thu, 8 Jan 2004 11:18:59 +1000 Subject: [AccessD] Field - Can Grow - on a Form References: Message-ID: <003801c3d585$65de9b00$6465000a@venus> Hi Amanda The 'can grow' for forms only works (expands) when you go to print, not in normal view. Cheers Selina ----- Original Message ----- From: "Amanda Allen" To: Sent: Thursday, January 08, 2004 12:13 AM Subject: [AccessD] Field - Can Grow - on a Form > I'm using Access 2002 and I can't seem to get the fields on a form to > grow to fit the size needed for the data in the table. For instance, > most of the data is about 50 characters but there are some that are > about 150 characters. Instead of wasting space on the form for the > larger data, I would like the field to grow on the form. I selected > Can Grow in the properties of the field, but it still does not allow > the field to grow on the form. > > * Amanda > > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com > > From Subscriptions at servicexp.com Wed Jan 7 20:31:36 2004 From: Subscriptions at servicexp.com (Robert Gracie) Date: Wed, 7 Jan 2004 21:31:36 -0500 Subject: [AccessD] Encryption In-Reply-To: <982764405.20040107084523@cactus.dk> Message-ID: Thanks Guys, I'll check it out!! Robert Gracie -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Gustav Brock Sent: Wednesday, January 07, 2004 2:45 AM To: Access Developers discussion and problem solving Subject: Re: [AccessD] Encryption Hi Robert and Stuart Lookup my message: Re: [AccessD] Encryption/decryption (was: Registration Techniques) from 2002-09-18 for a complete high-speed PC1 Access 97 module. Should work for A2000/2003 as well. That said, a PowerBasic dll would probably run way faster ... /gustav >> Instead of re-inventing the wheel here, does anyone have some code that >> will allow me to pull the body of an e-mail (or a very large string even) >> and encrypt it with out first writing it to a text file? I've tried three >> different cipher routines, but they all want to break up the String. So I'm >> left with only the first section in the string.... >> > How large is large? > Here are some routines that use PC1 (see > http://membres.lycos.fr/pc1/) > Theorectically, it will handle any length of string up to 1/2 the > maximum allowable string length for your development environment. > (The encryted string is always exactly twice as large as the > original.) > This VBA versions works fairly well up to about 30 - 40K on my PC > (1 -2 secs to encode, virtually instantaneous decode), but as the > original string gets bigger, it takes *a lot* longer to encrypt. > (70K = 12 secs, 80K = 22 secs, 90K = 38 secs etc but decrypt is still > only about 3 secs at 90K). > If you want to use larger strings, I can let you have a DLL version > of this which I built in PowerBasic. It is *much* faster _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From dfe at nudgeeinternational.com Wed Jan 7 22:33:34 2004 From: dfe at nudgeeinternational.com (David Fenton) Date: Thu, 8 Jan 2004 14:33:34 +1000 Subject: [AccessD] RE: DoCmd.RunSQL or CurrentDb.Execute (Solved) Message-ID: Hi Folks, Thank you to Stuart and Steve for your help on this one. It kind of confirmed what I already knew and I think I like the CurrentDb.Execute. I have been switching off errors, using the DoCmd and switching errors back on. I leave errors on for testing purposes to eliminate as many SQL errors as I can, but if it is error free then I think the CurrentDb method will suit me better. Thanks again for your advice. Cheers David Fenton Brisbane Australia ............................................. Message: 14 Date: Tue, 6 Jan 2004 17:42:40 -0500 From: "Developer" Subject: RE: [AccessD] DoCmd.RunSQL or CurrentDb.Execute? To: "'Access Developers discussion and problem solving'" Message-ID: <004601c3d4a6$643bdbd0$7001a8c0 at COA3> Content-Type: text/plain; charset="us-ascii" Currentdb.execute will bypass the warnings if they are on, Docmd will still have the warnings. Currentdb has been faster for me, but I havent benchmarked anything specific. Hth Steve Message: 15 Date: Wed, 07 Jan 2004 08:40:19 +1000 From: "Stuart McLachlan" Subject: Re: [AccessD] DoCmd.RunSQL or CurrentDb.Execute? To: Access Developers discussion and problem solving Message-ID: <3FFBC5F3.22232.16B2F9 at localhost> Content-Type: text/plain; charset=US-ASCII On 7 Jan 2004 at 8:22, David Fenton wrote: With DoCmd.RunSQL, you get the standard messagebox 'You are about to...." If you want the update to happen without any user action, use CurrentDB.Execute. If you want the warning and the user to have the opportunity to cancel the action, user DoCmd.RunSQL Note that "DoCmd.SetWarnings False DoCmd.RunSQL strSQL DoCmdSetWarnings True" suppresses the update notice, but also has the effect of suppressing any error messages generated by a problem in strSQL. -- Lexacorp Ltd http://www.lexacorp.com.pg Information Technology Consultancy, Software Development,System Support. ****************************** From kost36 at otenet.gr Wed Jan 7 23:27:11 2004 From: kost36 at otenet.gr (Kostas Konstantinidis) Date: Thu, 8 Jan 2004 07:27:11 +0200 Subject: [AccessD] e-mailing to all the people at the same time References: <2F8793082E00D4119A1700B0D0216BF8022276DA@main2.marlow.com> Message-ID: <007a01c3d5a8$123d86f0$0100a8c0@kost36> Hi all, Is it possible to send a common e-mail message at the same time, to all the e-mail addresses which incloude into a field? The field design is "hyperling" and there I am keeping only e-mail addresses Thank's a lot Kostas Konstantinidis From martyconnelly at shaw.ca Thu Jan 8 00:23:25 2004 From: martyconnelly at shaw.ca (MartyConnelly) Date: Wed, 07 Jan 2004 22:23:25 -0800 Subject: [AccessD] e-mailing to all the people at the same time References: <2F8793082E00D4119A1700B0D0216BF8022276DA@main2.marlow.com> <007a01c3d5a8$123d86f0$0100a8c0@kost36> Message-ID: <3FFCF75D.1060200@shaw.ca> Well here is a starter email code using outlook, if you are using outlook see methods of accessing an outlook contact list at http://www.slipstick.com If you are using different mail method or server, you will have to tell us. Sub SendMessageTo(sEmailAddress As String, sMessageHdr As String, sMessage As String) Dim objOutlook As Outlook.Application Dim objOutlookMsg As Outlook.MailItem Dim objOutlookRecip As Outlook.Recipient ' Create the Outlook session. Set objOutlook = CreateObject("Outlook.Application") ' Create the message. Set objOutlookMsg = objOutlook.CreateItem(olMailItem) With objOutlookMsg ' Add the To recipient(s) to the message. Set objOutlookRecip = .Recipients.Add(sEmailAddress) ' Set objOutlookRecip = .Recipients.Add(sEmailAddress1) ' Set objOutlookRecip = .Recipients.Add(sEmailAddress2) objOutlookRecip.Type = olTo ' Set the Subject, Body, and Importance of the message. .Subject = sMessageHdr .Body = sMessage .Importance = olImportanceHigh 'High importance ' Resolve each Recipient's name. For Each objOutlookRecip In .Recipients objOutlookRecip.Resolve Next .Send End With Set objOutlook = Nothing End Sub Kostas Konstantinidis wrote: >Hi all, >Is it possible to send a common e-mail message at the same time, to all the >e-mail addresses which incloude into a field? >The field design is "hyperling" and there I am keeping only e-mail addresses > >Thank's a lot >Kostas Konstantinidis > > >_______________________________________________ >AccessD mailing list >AccessD at databaseadvisors.com >http://databaseadvisors.com/mailman/listinfo/accessd >Website: http://www.databaseadvisors.com > > > -- Marty Connelly Victoria, B.C. Canada From Erwin.Craps at ithelps.be Thu Jan 8 01:49:24 2004 From: Erwin.Craps at ithelps.be (Erwin Craps - IT Helps) Date: Thu, 8 Jan 2004 08:49:24 +0100 Subject: [AccessD] e-mailing to all the people at the same time Message-ID: <46B976F2B698FF46A4FE7636509B22DF03D0D3@stekelbes.ithelps.local> Please note that for security reasons it's better to put the recipients (in case of mass mailing) in he BCC and not in the regular TO. I'm using slightly another method than the code suggested by Marty, but I supose you only need to change the objOutlookRecip.Type = olTo line in smething like objOutlookRecip.Type = olBcc It's advisable to put your (an) own e-mail address in the to field. Erwin -----Oorspronkelijk bericht----- Van: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] Namens MartyConnelly Verzonden: donderdag 8 januari 2004 7:23 Aan: Access Developers discussion and problem solving Onderwerp: Re: [AccessD] e-mailing to all the people at the same time Well here is a starter email code using outlook, if you are using outlook see methods of accessing an outlook contact list at http://www.slipstick.com If you are using different mail method or server, you will have to tell us. Sub SendMessageTo(sEmailAddress As String, sMessageHdr As String, sMessage As String) Dim objOutlook As Outlook.Application Dim objOutlookMsg As Outlook.MailItem Dim objOutlookRecip As Outlook.Recipient ' Create the Outlook session. Set objOutlook = CreateObject("Outlook.Application") ' Create the message. Set objOutlookMsg = objOutlook.CreateItem(olMailItem) With objOutlookMsg ' Add the To recipient(s) to the message. Set objOutlookRecip = .Recipients.Add(sEmailAddress) ' Set objOutlookRecip = .Recipients.Add(sEmailAddress1) ' Set objOutlookRecip = .Recipients.Add(sEmailAddress2) objOutlookRecip.Type = olTo ' Set the Subject, Body, and Importance of the message. .Subject = sMessageHdr .Body = sMessage .Importance = olImportanceHigh 'High importance ' Resolve each Recipient's name. For Each objOutlookRecip In .Recipients objOutlookRecip.Resolve Next .Send End With Set objOutlook = Nothing End Sub Kostas Konstantinidis wrote: >Hi all, >Is it possible to send a common e-mail message at the same time, to all the >e-mail addresses which incloude into a field? >The field design is "hyperling" and there I am keeping only e-mail addresses > >Thank's a lot >Kostas Konstantinidis > > >_______________________________________________ >AccessD mailing list >AccessD at databaseadvisors.com >http://databaseadvisors.com/mailman/listinfo/accessd >Website: http://www.databaseadvisors.com > > > -- Marty Connelly Victoria, B.C. Canada _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From ebarro at afsweb.com Thu Jan 8 02:04:54 2004 From: ebarro at afsweb.com (Eric Barro) Date: Thu, 8 Jan 2004 00:04:54 -0800 Subject: [AccessD] list all fields in a table In-Reply-To: <46B976F2B698FF46A4FE7636509B22DF03D0D3@stekelbes.ithelps.local> Message-ID: Does anyone have any VB code handy that enumerates all fields in a table? ex: Field1 Field2 Field3 etc... I just need a text list that I can copy and paste into an ASP page. --- Eric Barro Senior Systems Analyst Advanced Field Services (208) 772-7060 http://www.afsweb.com --- Outgoing mail is certified Virus Free. Checked by AVG anti-virus system (http://www.grisoft.com). Version: 6.0.555 / Virus Database: 347 - Release Date: 12/23/2003 From gustav at cactus.dk Thu Jan 8 02:21:20 2004 From: gustav at cactus.dk (Gustav Brock) Date: Thu, 8 Jan 2004 09:21:20 +0100 Subject: [AccessD] list all fields in a table In-Reply-To: References: Message-ID: <1123663477.20040108092120@cactus.dk> Hi Eric Look up "ListFields function" from Charlotte 2003-12-30. /gustav > Does anyone have any VB code handy that enumerates all fields in a table? > ex: > Field1 > Field2 > Field3 > etc... > I just need a text list that I can copy and paste into an ASP page. > --- > Eric Barro > Senior Systems Analyst > Advanced Field Services > (208) 772-7060 > http://www.afsweb.com From stephen at bondsoftware.co.nz Thu Jan 8 02:21:16 2004 From: stephen at bondsoftware.co.nz (Stephen Bond) Date: Thu, 08 Jan 2004 21:21:16 +1300 Subject: [AccessD] Access 2003 issue Message-ID: <70F3D727890C784291D8433E9C418F298F4C@server.bondsoftware.co.nz> Thanks Joshua - I got to the bottom of it ... eventually. I have queries which reference fields on a Form as criteria (criteria:Forms!Form1!field1). Many of these fields are on sub-forms, in fact worse than that, subforms of a form which is the Page in a Tab Control. Access 2003 queries seem to be extremely fussy how you reference these fields. You must have the precise syntax. So, where this worked previously (Forms!MainForm!SubForm!Field), now I must have (Forms!MainForm!SubForm.Form!Field) in order for the queries to ReQuery correctly in 2003. The new syntax also works in A2000. Stephen Bond > -----Original Message----- > From: Joshua B [mailto:lists at jbsolutions.com.au] > Sent: Wednesday, 31 December 2003 9:49 a.m. > To: Access Developers discussion and problem solving > Subject: Re: [AccessD] Access 2003 issue > > > Hello Stephen Bond, > > I wrote in a week ago with a similar problem (the thread was > titled "Calculated Field Error A2003" if you want to have a > look). One workaround (which I'm still not really happy > about, but seems to alleviate the Me.Requery problem) was to > use the syntax Me.Recordsource = Me.Recordsource, this seems > to work the same as a requery, minus the errors. Another > thing to look at is unchecking all the references, > compacting, and then rechecking them again. I havent had a > chance to try this one as yet, because my client is on > holidays, and I dont have A2003. The way it's looking at the > moment, I think I'll be doing my best to steer clear of 2003 > for a while. If you try the reference refreshing option, > could you let me know how you go? Thanks. > > ======= At 2003-12-31, 05:48:00 you wrote: ======= > > >I have an app that is Access 2000 MDB and it runs fine under > both A2000 and A2002, in A2000 format. > > > >Today I loaded it to run under Access 2003 and there is a > problem. It appears that the syntax 'Me.Requery' does not > work. The Me.Requery is in the After_Update event of a combo > that serves to filter the records appearing on the continuous > form. The form's RecordSource is a query with the combo > boxes referenced like this: > > > >Field:IIF(IsNull(Forms!etc!cboFilter),True,underlyingField=Fo > rms!etc!cboFilter) > >Criteria:True > > > >I can't see anything in KB. Because the combo is on a > subform of a form that's part of a Tab control, I'm going to > mess around with the way the combo is declared in the Query, > but this is shootin' in the dark stuff. > > > >BTW, I tried converting the app to Access 2003 format, but > nothing changed, the problem still exists. > > > >Any ideas? TIA > > > > > >Stephen Bond > >Otatara, South Island, New Zealand > >_______________________________________________ > >AccessD mailing list > >AccessD at databaseadvisors.com > >http://databaseadvisors.com/mailman/listinfo/accessd > >Website: http://www.databaseadvisors.com > > = = = = = = = = = = = = = = = = = = = = > > > Best regards. > Joshua B > lists at jbsolutions.com.au > www.jbsolutions.com.au > 2003-12-31 > > > > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com > From gustav at cactus.dk Thu Jan 8 02:40:35 2004 From: gustav at cactus.dk (Gustav Brock) Date: Thu, 8 Jan 2004 09:40:35 +0100 Subject: [AccessD] Access 2003 issue In-Reply-To: <70F3D727890C784291D8433E9C418F298F4C@server.bondsoftware.co.nz> References: <70F3D727890C784291D8433E9C418F298F4C@server.bondsoftware.co.nz> Message-ID: <634817847.20040108094035@cactus.dk> Hi Stephen > Thanks Joshua - I got to the bottom of it ... eventually. I have queries which reference fields on a Form as criteria (criteria:Forms!Form1!field1). Many of these fields are on sub-forms, in fact > worse than that, subforms of a form which is the Page in a Tab Control. > Access 2003 queries seem to be extremely fussy how you reference these fields. You must have the precise syntax. So, where this worked previously > (Forms!MainForm!SubForm!Field), now I must have > (Forms!MainForm!SubForm.Form!Field) > in order for the queries to ReQuery correctly in 2003. > The new syntax also works in A2000. "New"? This syntax has been in use since Access 1.0. It has caused many grey hairs - perhaps that's why MS allowed the simpler syntax but later regretted for some reason. /gustav From markamatte at hotmail.com Thu Jan 8 08:55:07 2004 From: markamatte at hotmail.com (Mark A Matte) Date: Thu, 08 Jan 2004 14:55:07 +0000 Subject: [AccessD] Using Charts Message-ID: Hello All, I'm building a db in A97 (or in 2k if there is a difference in charts)...the values I am displaying are currency...and the ranges for each data set are different...is there away to have the charts MAX and MIN set to the MAX and MIN of the dataset...without having to edit the chart everytime? Thanks, Mark _________________________________________________________________ Check your PC for viruses with the FREE McAfee online computer scan. http://clinic.mcafee.com/clinic/ibuy/campaign.asp?cid=3963 From askolits at ot.com Thu Jan 8 10:04:09 2004 From: askolits at ot.com (John Skolits) Date: Thu, 8 Jan 2004 11:04:09 -0500 Subject: [AccessD] Using Charts In-Reply-To: Message-ID: This is not an exact answer to your question, but may help. If you place a chart on a form and give the chart object thge following name: "oleChart1" You can change various items in the chart through code as follows: (Values are for example only) Me.oleChart1.Object.Application.Chart.Axes(1).MinorUnit = 5.5 Me.oleChart1.Object.Application.Chart.Axes(1).MajorUnit = 10 Me.oleChart1.Object.Application.Chart.Axes(1).BaseUnit = 2 Me.oleChart1.chartTitle.Text = "This is my chart's title" Me.oleChart1.Object.Application.Chart.Axes(2).MaximumScaleIsAuto = True Me.oleChart1.Object.Application.Chart.Axes(2).maximumscale = 1 --- 'To get a count of different collections in the graph me.oleChart1.seriesCollection.Count --- Search for the Graph9 help file (GRAPH9.CHM) on your PC. I think this is for Access 2000 but is pretty much the same for A97. It has examples of the other properties and method. -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Mark A Matte Sent: Thursday, January 08, 2004 9:55 AM To: accessd at databaseadvisors.com Subject: [AccessD] Using Charts Hello All, I'm building a db in A97 (or in 2k if there is a difference in charts)...the values I am displaying are currency...and the ranges for each data set are different...is there away to have the charts MAX and MIN set to the MAX and MIN of the dataset...without having to edit the chart everytime? Thanks, Mark _________________________________________________________________ Check your PC for viruses with the FREE McAfee online computer scan. http://clinic.mcafee.com/clinic/ibuy/campaign.asp?cid=3963 _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From CSPELL at jhuccp.org Thu Jan 8 10:21:12 2004 From: CSPELL at jhuccp.org (CYNTHIA SPELL) Date: Thu, 08 Jan 2004 11:21:12 -0500 Subject: [AccessD] Formatting time - minutes to hour:minutes Message-ID: I have an application that tracks the amount of time spent on projects. I used DateDiff on the entry form in order to get the number of minutes between the start and end times. The number is held in a field called "Time." In a report, I sum "Time" in order to get the total number of minutes. I need to show the total minutes in hh:mm format on the report. I tried to simply format the field in the report, but that didn't work. I tried dividing the minutes by 60, which gave me the number of hours and a remainder. I then multiplied the remainder by 60 and then divided by 100 to get the number of seconds. This is getting ugly.... Am I making this harder than it is?? Cindy From gustav at cactus.dk Thu Jan 8 10:41:45 2004 From: gustav at cactus.dk (Gustav Brock) Date: Thu, 8 Jan 2004 17:41:45 +0100 Subject: [AccessD] Formatting time - minutes to hour:minutes In-Reply-To: References: Message-ID: <5033688681.20040108174145@cactus.dk> Hi Cynthia If you wish to use the features of formatting a date/time-value you need to convert the amount of minutes to a timevalue - like here where the amount of time is in hours: Function TimeHour(ByVal curHMS As Currency) As Date ' Rounds and converts curHMS (number of hours as decimalnumber). ' Returns a time value, hh:nn:ss. ' Gustav Brock, Cactus Data ApS. ' 1999-08-12. Dim lngH As Long Dim lngM As Long Dim lngS As Long Dim curR As Currency ' No error handling needed. On Error Resume Next ' Round to two decimals, and skip number of days if curHMS > 24. ' If day count is needed, omit modulus like this: ' curHMS = (CLng(curHMS * 10000) / 100 * 36) ' Mod 86400 curHMS = (CLng(curHMS * 10000) / 100 * 36) Mod 86400 ' Calculate hours, minutes, and seconds. lngH = Int(curHMS / 3600) curR = curHMS - (lngH * 3600) lngM = Int(curR / 60) curR = curR - (lngM * 60) lngS = CInt(curR) ' Create time value. TimeHour = TimeSerial(lngH, lngM, lngS) End Function Or you could try to simply feed your amount of minutes directly: datTime = TimeSerial(0, lngMinutes, 0) That may work - haven't tested it though. /gustav > I have an application that tracks the amount of time spent on projects. I used DateDiff on the entry form in order to get the number of minutes between the start and end times. The number is held > in a field called "Time." In a report, I sum "Time" in order to get the total number of minutes. I need to show the total minutes in hh:mm format on the report. I tried to simply format the > field in the report, but that didn't work. > I tried dividing the minutes by 60, which gave me the number of hours and a remainder. I then multiplied the remainder by 60 and then divided by 100 to get the number of seconds. This is getting > ugly.... Am I making this harder than it is?? From Lambert.Heenan at AIG.com Thu Jan 8 11:06:52 2004 From: Lambert.Heenan at AIG.com (Heenan, Lambert) Date: Thu, 8 Jan 2004 12:06:52 -0500 Subject: [AccessD] Formatting time - minutes to hour:minutes Message-ID: <8B98F8EA48F8BA47A2F24E0D0AF40CF407AD7C49@xlivmbx12.aig.com> If there's more that 24 * 60 minutes then TimeSerial will spit out a date/time like this... ? TimeSerial(26,1,1) 12/31/1899 2:01:01 AM The problem that Cynthia is having is simply that she is interested in Time DURATION, but all the Time formatting and TimeSerial, DateDiff stuff is concerned with POINTS in time (a date and a time of day). "Ugly" or not, when dealing with durations (which have nothing to do with dates) you always have to do the math yourself to get hour minutes and seconds displayed. All you need is a simple function that given a number of minutes (or seconds) will do the math and formatting and return the appropriate STRING value for display of reports and forms. Lambert > -----Original Message----- > From: Gustav Brock [SMTP:gustav at cactus.dk] > Sent: Thursday, January 08, 2004 11:42 AM > To: Access Developers discussion and problem solving > Subject: Re: [AccessD] Formatting time - minutes to hour:minutes > > Hi Cynthia > > If you wish to use the features of formatting a date/time-value you > need to convert the amount of minutes to a timevalue - like here where > the amount of time is in hours: > > > > Function TimeHour(ByVal curHMS As Currency) As Date > > ' Rounds and converts curHMS (number of hours as decimalnumber). > ' Returns a time value, hh:nn:ss. > ' Gustav Brock, Cactus Data ApS. > ' 1999-08-12. > > Dim lngH As Long > Dim lngM As Long > Dim lngS As Long > Dim curR As Currency > > ' No error handling needed. > On Error Resume Next > > ' Round to two decimals, and skip number of days if curHMS > 24. > ' If day count is needed, omit modulus like this: > ' curHMS = (CLng(curHMS * 10000) / 100 * 36) ' Mod 86400 > curHMS = (CLng(curHMS * 10000) / 100 * 36) Mod 86400 > > ' Calculate hours, minutes, and seconds. > lngH = Int(curHMS / 3600) > curR = curHMS - (lngH * 3600) > lngM = Int(curR / 60) > curR = curR - (lngM * 60) > lngS = CInt(curR) > > ' Create time value. > TimeHour = TimeSerial(lngH, lngM, lngS) > > End Function > > > > Or you could try to simply feed your amount of minutes directly: > > datTime = TimeSerial(0, lngMinutes, 0) > > That may work - haven't tested it though. > > /gustav > > > > I have an application that tracks the amount of time spent on projects. > I used DateDiff on the entry form in order to get the number of minutes > between the start and end times. The number is held > > in a field called "Time." In a report, I sum "Time" in order to get the > total number of minutes. I need to show the total minutes in hh:mm > format on the report. I tried to simply format the > > field in the report, but that didn't work. > > > I tried dividing the minutes by 60, which gave me the number of hours > and a remainder. I then multiplied the remainder by 60 and then divided > by 100 to get the number of seconds. This is getting > > ugly.... Am I making this harder than it is?? > > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com From andy at minstersystems.co.uk Thu Jan 8 12:08:42 2004 From: andy at minstersystems.co.uk (Andy Lacey) Date: Thu, 8 Jan 2004 18:08:42 -0000 Subject: [AccessD] Using Charts In-Reply-To: Message-ID: <013601c3d612$735cc1c0$b274d0d5@minster33c3r25> Yes, get the min and max values of the dataset and then With objGraph .Axes(2).MinimumScale = dblMin .Axes(2).MaximumScale = dblMax End With Andy Lacey http://www.minstersystems.co.uk > -----Original Message----- > From: accessd-bounces at databaseadvisors.com > [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of > Mark A Matte > Sent: 08 January 2004 14:55 > To: accessd at databaseadvisors.com > Subject: [AccessD] Using Charts > > > Hello All, > > I'm building a db in A97 (or in 2k if there is a difference > in charts)...the > values I am displaying are currency...and the ranges for each > data set are > different...is there away to have the charts MAX and MIN set > to the MAX and > MIN of the dataset...without having to edit the chart everytime? > > Thanks, > > Mark > > _________________________________________________________________ > Check your PC for viruses with the FREE McAfee online computer scan. > http://clinic.mcafee.com/clinic/ibuy/campaign.asp?cid=3963 > > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/a> ccessd > Website: > http://www.databaseadvisors.com > > From gustav at cactus.dk Thu Jan 8 12:15:52 2004 From: gustav at cactus.dk (Gustav Brock) Date: Thu, 8 Jan 2004 19:15:52 +0100 Subject: [AccessD] Formatting time - minutes to hour:minutes In-Reply-To: <8B98F8EA48F8BA47A2F24E0D0AF40CF407AD7C49@xlivmbx12.aig.com> References: <8B98F8EA48F8BA47A2F24E0D0AF40CF407AD7C49@xlivmbx12.aig.com> Message-ID: <1639335571.20040108191552@cactus.dk> Hi Lambert > If there's more that 24 * 60 minutes then TimeSerial will spit out a > date/time like this... > ? TimeSerial(26,1,1) > 12/31/1899 2:01:01 AM Of course, that's why I included the TimeHour() function. If you wish to count more than 24 hours, here's a quick solution for seconds. One line (no line break): = Format(622081 \ 3600, "00:") & Format((622081 Mod 3600) \ 60, "00:") & Format(622081 Mod 60, "00") The backslash rounds down, thus this will return a string: 172:48:01 > The problem that Cynthia is having is simply that she is interested in Time > DURATION, but all the Time formatting and TimeSerial, DateDiff stuff is > concerned with POINTS in time (a date and a time of day). > "Ugly" or not, when dealing with durations (which have nothing to do with > dates) you always have to do the math yourself to get hour minutes and > seconds displayed. All you need is a simple function that given a number of > minutes (or seconds) will do the math and formatting and return the > appropriate STRING value for display of reports and forms. For the "time duration" that is right. However, if you create a pseudo timevalue (a time from Access' time "zero"), you have the Format() function and all other formatting capabilities of Access ready at hand - thus you eliminate the need to create even a simple function. For "always do the math yourself" I see no reason to struggle with that; DateDiff() works fine except for a minor bug in the week count for some leap years. /gustav >> If you wish to use the features of formatting a date/time-value you >> need to convert the amount of minutes to a timevalue - like here where >> the amount of time is in hours: >> >> >> >> Function TimeHour(ByVal curHMS As Currency) As Date >> >> ' Rounds and converts curHMS (number of hours as decimalnumber). >> ' Returns a time value, hh:nn:ss. >> ' Gustav Brock, Cactus Data ApS. >> ' 1999-08-12. >> >> Dim lngH As Long >> Dim lngM As Long >> Dim lngS As Long >> Dim curR As Currency >> >> ' No error handling needed. >> On Error Resume Next >> >> ' Round to two decimals, and skip number of days if curHMS > 24. >> ' If day count is needed, omit modulus like this: >> ' curHMS = (CLng(curHMS * 10000) / 100 * 36) ' Mod 86400 >> curHMS = (CLng(curHMS * 10000) / 100 * 36) Mod 86400 >> >> ' Calculate hours, minutes, and seconds. >> lngH = Int(curHMS / 3600) >> curR = curHMS - (lngH * 3600) >> lngM = Int(curR / 60) >> curR = curR - (lngM * 60) >> lngS = CInt(curR) >> >> ' Create time value. >> TimeHour = TimeSerial(lngH, lngM, lngS) >> >> End Function >> >> >> >> Or you could try to simply feed your amount of minutes directly: >> >> datTime = TimeSerial(0, lngMinutes, 0) >> >> That may work - haven't tested it though. >> >> /gustav >> >> >> > I have an application that tracks the amount of time spent on projects. >> I used DateDiff on the entry form in order to get the number of minutes >> between the start and end times. The number is held >> > in a field called "Time." In a report, I sum "Time" in order to get the >> total number of minutes. I need to show the total minutes in hh:mm >> format on the report. I tried to simply format the >> > field in the report, but that didn't work. >> >> > I tried dividing the minutes by 60, which gave me the number of hours >> and a remainder. I then multiplied the remainder by 60 and then divided >> by 100 to get the number of seconds. This is getting >> > ugly.... Am I making this harder than it is?? From Lambert.Heenan at AIG.com Thu Jan 8 12:36:43 2004 From: Lambert.Heenan at AIG.com (Heenan, Lambert) Date: Thu, 8 Jan 2004 13:36:43 -0500 Subject: [AccessD] Formatting time - minutes to hour:minutes Message-ID: <8B98F8EA48F8BA47A2F24E0D0AF40CF407AD7C4C@xlivmbx12.aig.com> But your TimeHour function returns a Date data type, and it uses TimeSerial to generate the return value, so once again, if your input value is more the 24 * 60 minutes then you will get back a nonsense date and time value. I repeat, if you are interesting in time durations then you need to work with numerical values, not Date/Time values. The Access Date/Time data type is inherently tied to the concept of a date - a point on the time line, which has nothing to do with the idea of a duration. This is why DateDiff returns a Long value, not some kind of date value. "If you wish to count more than 24 hours, here's a quick solution for seconds. One line (no line break): = Format(622081 \ 3600, "00:") & Format((622081 Mod 3600) \ 60, "00:") & Format(622081 Mod 60, "00") " Exactly, this is just the type of code you would put in a custom function to format durations so they display as hr:min:sec. Why type all that code each time you want to format a duration (like 62,2081 seconds) when you can just call a function - FormatAsTime(622081) ???? Lambert > -----Original Message----- > From: Gustav Brock [SMTP:gustav at cactus.dk] > Sent: Thursday, January 08, 2004 1:16 PM > To: Access Developers discussion and problem solving > Subject: Re: [AccessD] Formatting time - minutes to hour:minutes > > Hi Lambert > > > If there's more that 24 * 60 minutes then TimeSerial will spit out a > > date/time like this... > > > ? TimeSerial(26,1,1) > > 12/31/1899 2:01:01 AM > > Of course, that's why I included the TimeHour() function. > If you wish to count more than 24 hours, here's a quick solution for > seconds. One line (no line break): > > = Format(622081 \ 3600, "00:") & > Format((622081 Mod 3600) \ 60, "00:") & > Format(622081 Mod 60, "00") > > The backslash rounds down, thus this will return a string: > 172:48:01 > > > The problem that Cynthia is having is simply that she is interested in > Time > > DURATION, but all the Time formatting and TimeSerial, DateDiff stuff is > > concerned with POINTS in time (a date and a time of day). > > > "Ugly" or not, when dealing with durations (which have nothing to do > with > > dates) you always have to do the math yourself to get hour minutes and > > seconds displayed. All you need is a simple function that given a number > of > > minutes (or seconds) will do the math and formatting and return the > > appropriate STRING value for display of reports and forms. > > For the "time duration" that is right. However, if you create a pseudo > timevalue (a time from Access' time "zero"), you have the Format() > function and all other formatting capabilities of Access ready at hand > - thus you eliminate the need to create even a simple function. > > For "always do the math yourself" I see no reason to struggle with > that; DateDiff() works fine except for a minor bug in the week count > for some leap years. > > /gustav > > > >> If you wish to use the features of formatting a date/time-value you > >> need to convert the amount of minutes to a timevalue - like here where > >> the amount of time is in hours: > >> > >> > >> > >> Function TimeHour(ByVal curHMS As Currency) As Date > >> > >> ' Rounds and converts curHMS (number of hours as decimalnumber). > >> ' Returns a time value, hh:nn:ss. > >> ' Gustav Brock, Cactus Data ApS. > >> ' 1999-08-12. > >> > >> Dim lngH As Long > >> Dim lngM As Long > >> Dim lngS As Long > >> Dim curR As Currency > >> > >> ' No error handling needed. > >> On Error Resume Next > >> > >> ' Round to two decimals, and skip number of days if curHMS > 24. > >> ' If day count is needed, omit modulus like this: > >> ' curHMS = (CLng(curHMS * 10000) / 100 * 36) ' Mod 86400 > >> curHMS = (CLng(curHMS * 10000) / 100 * 36) Mod 86400 > >> > >> ' Calculate hours, minutes, and seconds. > >> lngH = Int(curHMS / 3600) > >> curR = curHMS - (lngH * 3600) > >> lngM = Int(curR / 60) > >> curR = curR - (lngM * 60) > >> lngS = CInt(curR) > >> > >> ' Create time value. > >> TimeHour = TimeSerial(lngH, lngM, lngS) > >> > >> End Function > >> > >> > >> > >> Or you could try to simply feed your amount of minutes directly: > >> > >> datTime = TimeSerial(0, lngMinutes, 0) > >> > >> That may work - haven't tested it though. > >> > >> /gustav > >> > >> > >> > I have an application that tracks the amount of time spent on > projects. > >> I used DateDiff on the entry form in order to get the number of minutes > >> between the start and end times. The number is held > >> > in a field called "Time." In a report, I sum "Time" in order to get > the > >> total number of minutes. I need to show the total minutes in hh:mm > >> format on the report. I tried to simply format the > >> > field in the report, but that didn't work. > >> > >> > I tried dividing the minutes by 60, which gave me the number of hours > >> and a remainder. I then multiplied the remainder by 60 and then > divided > >> by 100 to get the number of seconds. This is getting > >> > ugly.... Am I making this harder than it is?? > > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com From markamatte at hotmail.com Thu Jan 8 12:44:49 2004 From: markamatte at hotmail.com (Mark A Matte) Date: Thu, 08 Jan 2004 18:44:49 +0000 Subject: [AccessD] Formatting time - minutes to hour:minutes Message-ID: Cindy, I wrote the following to calculate Minutes and Seconds...with a few changes...you could use it to calculate Hours and Minutes. I first calculate the SECONDS...then use a loop that increments a count by 1...multiply the counter by 60 and check againts SECONDS...when the Counter*60 is greater than SECONDS...Counter-1 = MINUTES and SECONDS-((counter-1)*60)=LeftOverSECONDS Hope it helps... Mark A. Matte Private Sub cmdStop_Click() Me!EndDTTM = Now() Dim Seconds Dim RMmin Dim RMsec Seconds = DateDiff("s", Me!StartDTTM, Me!EndDTTM) Dim Check, Counter Check = True: Counter = 0 Do Counter = Counter + 1 If Counter * 60 > Seconds Then RMmin = Counter - 1 RMsec = Seconds - ((Counter - 1) * 60) Check = False Exit Do End If Loop Until Check = False Forms!frmRecords!RMCallLengthM.Value = RMmin Forms!frmRecords!RMCallLengthS.Value = RMsec DoCmd.close End Sub >From: Gustav Brock >Reply-To: Access Developers discussion and problem >solving >To: Access Developers discussion and problem >solving >Subject: Re: [AccessD] Formatting time - minutes to hour:minutes >Date: Thu, 8 Jan 2004 19:15:52 +0100 > >Hi Lambert > > > If there's more that 24 * 60 minutes then TimeSerial will spit out a > > date/time like this... > > > ? TimeSerial(26,1,1) > > 12/31/1899 2:01:01 AM > >Of course, that's why I included the TimeHour() function. >If you wish to count more than 24 hours, here's a quick solution for >seconds. One line (no line break): > > = Format(622081 \ 3600, "00:") & > Format((622081 Mod 3600) \ 60, "00:") & > Format(622081 Mod 60, "00") > >The backslash rounds down, thus this will return a string: > 172:48:01 > > > The problem that Cynthia is having is simply that she is interested in >Time > > DURATION, but all the Time formatting and TimeSerial, DateDiff stuff is > > concerned with POINTS in time (a date and a time of day). > > > "Ugly" or not, when dealing with durations (which have nothing to do >with > > dates) you always have to do the math yourself to get hour minutes and > > seconds displayed. All you need is a simple function that given a number >of > > minutes (or seconds) will do the math and formatting and return the > > appropriate STRING value for display of reports and forms. > >For the "time duration" that is right. However, if you create a pseudo >timevalue (a time from Access' time "zero"), you have the Format() >function and all other formatting capabilities of Access ready at hand >- thus you eliminate the need to create even a simple function. > >For "always do the math yourself" I see no reason to struggle with >that; DateDiff() works fine except for a minor bug in the week count >for some leap years. > >/gustav > > > >> If you wish to use the features of formatting a date/time-value you > >> need to convert the amount of minutes to a timevalue - like here where > >> the amount of time is in hours: > >> > >> > >> > >> Function TimeHour(ByVal curHMS As Currency) As Date > >> > >> ' Rounds and converts curHMS (number of hours as decimalnumber). > >> ' Returns a time value, hh:nn:ss. > >> ' Gustav Brock, Cactus Data ApS. > >> ' 1999-08-12. > >> > >> Dim lngH As Long > >> Dim lngM As Long > >> Dim lngS As Long > >> Dim curR As Currency > >> > >> ' No error handling needed. > >> On Error Resume Next > >> > >> ' Round to two decimals, and skip number of days if curHMS > 24. > >> ' If day count is needed, omit modulus like this: > >> ' curHMS = (CLng(curHMS * 10000) / 100 * 36) ' Mod 86400 > >> curHMS = (CLng(curHMS * 10000) / 100 * 36) Mod 86400 > >> > >> ' Calculate hours, minutes, and seconds. > >> lngH = Int(curHMS / 3600) > >> curR = curHMS - (lngH * 3600) > >> lngM = Int(curR / 60) > >> curR = curR - (lngM * 60) > >> lngS = CInt(curR) > >> > >> ' Create time value. > >> TimeHour = TimeSerial(lngH, lngM, lngS) > >> > >> End Function > >> > >> > >> > >> Or you could try to simply feed your amount of minutes directly: > >> > >> datTime = TimeSerial(0, lngMinutes, 0) > >> > >> That may work - haven't tested it though. > >> > >> /gustav > >> > >> > >> > I have an application that tracks the amount of time spent on >projects. > >> I used DateDiff on the entry form in order to get the number of minutes > >> between the start and end times. The number is held > >> > in a field called "Time." In a report, I sum "Time" in order to get >the > >> total number of minutes. I need to show the total minutes in hh:mm > >> format on the report. I tried to simply format the > >> > field in the report, but that didn't work. > >> > >> > I tried dividing the minutes by 60, which gave me the number of hours > >> and a remainder. I then multiplied the remainder by 60 and then >divided > >> by 100 to get the number of seconds. This is getting > >> > ugly.... Am I making this harder than it is?? > >_______________________________________________ >AccessD mailing list >AccessD at databaseadvisors.com >http://databaseadvisors.com/mailman/listinfo/accessd >Website: http://www.databaseadvisors.com _________________________________________________________________ Check your PC for viruses with the FREE McAfee online computer scan. http://clinic.mcafee.com/clinic/ibuy/campaign.asp?cid=3963 From rl_stewart at highstream.net Thu Jan 8 13:08:07 2004 From: rl_stewart at highstream.net (Robert L. Stewart) Date: Thu, 08 Jan 2004 13:08:07 -0600 Subject: [AccessD] Re: Formatting time - minutes to hour:minutes In-Reply-To: <200401081800.i08I0lE10433@databaseadvisors.com> Message-ID: <5.1.0.14.2.20040108125804.02963678@pop3.highstream.net> Try this Function HoursMinutes(ByVal intMinutes As Integer) As String ' This function will take a number of minutes and ' convert it into the format HH:MM Dim intHrs As Integer Dim strReturn As String Dim intMinuteRemainder As Integer intHrs = Int(intMinutes / 60) strReturn = CStr(intHrs) & ":" intMinuteRemainder = intMinutes Mod 60 strReturn = strReturn & IIf(Len(CStr(intMinuteRemainder)) < 2, "0" & CStr(intMinuteRemainder), CStr(intMinuteRemainder)) HoursMinutes = strReturn End Function Watch out for line wrapping. Robert At 12:00 PM 1/8/2004 -0600, you wrote: >Date: Thu, 08 Jan 2004 11:21:12 -0500 >From: CYNTHIA SPELL >Subject: [AccessD] Formatting time - minutes to hour:minutes >To: accessd at databaseadvisors.com >Message-ID: >Content-Type: text/plain; charset=US-ASCII > >I have an application that tracks the amount of time spent on projects. I >used DateDiff on the entry form in order to get the number of minutes >between the start and end times. The number is held in a field called >"Time." In a report, I sum "Time" in order to get the total number of >minutes. I need to show the total minutes in hh:mm format on the >report. I tried to simply format the field in the report, but that didn't >work. > >I tried dividing the minutes by 60, which gave me the number of hours and >a remainder. I then multiplied the remainder by 60 and then divided by >100 to get the number of seconds. This is getting ugly.... Am I making >this harder than it is?? From jwcolby at colbyconsulting.com Thu Jan 8 13:35:52 2004 From: jwcolby at colbyconsulting.com (John W. Colby) Date: Thu, 8 Jan 2004 14:35:52 -0500 Subject: [AccessD] closing instances of the same form Message-ID: I need to open a given form multiple times, but I need to be able to close a specific instance of the form. Does anyone know how to do this. Normally you do a docmd.close acform, formname - however if you open the same form twice then the second form isn't called formname anymore. What is it called? John W. Colby www.ColbyConsulting.com From jwcolby at colbyconsulting.com Thu Jan 8 13:45:39 2004 From: jwcolby at colbyconsulting.com (John W. Colby) Date: Thu, 8 Jan 2004 14:45:39 -0500 Subject: [AccessD] closing instances of the same form In-Reply-To: Message-ID: Never mind. Apparently you have to reference these things in order to keep them in existence. Set that reference to nothing and they close. Sorry for the ring. John W. Colby www.ColbyConsulting.com -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of John W. Colby Sent: Thursday, January 08, 2004 2:36 PM To: AccessD Subject: [AccessD] closing instances of the same form I need to open a given form multiple times, but I need to be able to close a specific instance of the form. Does anyone know how to do this. Normally you do a docmd.close acform, formname - however if you open the same form twice then the second form isn't called formname anymore. What is it called? John W. Colby www.ColbyConsulting.com _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From DWUTKA at marlow.com Thu Jan 8 13:49:30 2004 From: DWUTKA at marlow.com (DWUTKA at marlow.com) Date: Thu, 8 Jan 2004 13:49:30 -0600 Subject: [AccessD] closing instances of the same form Message-ID: <2F8793082E00D4119A1700B0D0216BF8022276F9@main2.marlow.com> >From within the same form? Or from outside? >From within, I think you can just put DoCmd.Close Me I may be confusing that with Unload Me from VB though. Drew -----Original Message----- From: John W. Colby [mailto:jwcolby at colbyconsulting.com] Sent: Thursday, January 08, 2004 1:36 PM To: AccessD Subject: [AccessD] closing instances of the same form I need to open a given form multiple times, but I need to be able to close a specific instance of the form. Does anyone know how to do this. Normally you do a docmd.close acform, formname - however if you open the same form twice then the second form isn't called formname anymore. What is it called? John W. Colby www.ColbyConsulting.com _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From DWUTKA at marlow.com Thu Jan 8 13:59:04 2004 From: DWUTKA at marlow.com (DWUTKA at marlow.com) Date: Thu, 8 Jan 2004 13:59:04 -0600 Subject: [AccessD] OT: ASP Oddity Message-ID: <2F8793082E00D4119A1700B0D0216BF8022276FA@main2.marlow.com> Sorry for the OT post, but I ran into this last month, and was just flabbergasted that this worked this way. I was doing an ASP sub-contract for my sister, for a jewelry company (http://edlevinjewelry.com) . In the HTML of some of the pages, I found stuff like this: <% If so.type="merchant" then %> This is a test <% End if%> It wasn't coded (or worded, obviously) like that, but that is the gist of it. There was an If Then clause, with regular old HTML in the middle. Sure enough, if the criteria isn't met, the HTML isn't displayed. I never realized (until I saw that), that you could do that. Up until now, I have always done something like this: <% If This=True Then response.write "Test" End if %> In that case, the ASP is writing out the HTML. In some cases, it doesn't make much of a difference. However, I write most of my HTML by hand, using the Microsoft Script Editor, which does a lot of autocompletion, and makes writing raw HTML a breeze. But when I had to put out conditional HTML, I lost all of the advantages of the editor, because I was putting the HTML into a string. What's odd, is I have never run across this in ASP documentation. Once again, sorry for the OT post, but I know there are several listers out there that are either starting out in ASP, or have been using it for a while, and hopefully, this will be helpful to ya'all. Just out of curiousity, did anyone else know this? Drew From Erwin.Craps at ithelps.be Thu Jan 8 15:47:48 2004 From: Erwin.Craps at ithelps.be (Erwin Craps - IT Helps) Date: Thu, 8 Jan 2004 22:47:48 +0100 Subject: [AccessD] closing instances of the same form Message-ID: <46B976F2B698FF46A4FE7636509B22DF03D0DB@stekelbes.ithelps.local> Hi John Something like this. I'm not sure for the new keyword, it's with or without it. Dim frmYourForm1 as FORM_YourForm Dim frmYourForm1 as FORM_YourForm Set frmYourForm1 = new form_yourform frmYourForm1.visible = true frmYourForm1.control = "blabla" Set frmYourForm2 = new form_yourform frmYourForm2.visible = true frmYourForm2.control = "blabla" Set frmYourForm1 = nothing Set frmYourForm2 = nothing Erwin -----Oorspronkelijk bericht----- Van: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] Namens John W. Colby Verzonden: donderdag 8 januari 2004 20:36 Aan: AccessD Onderwerp: [AccessD] closing instances of the same form I need to open a given form multiple times, but I need to be able to close a specific instance of the form. Does anyone know how to do this. Normally you do a docmd.close acform, formname - however if you open the same form twice then the second form isn't called formname anymore. What is it called? John W. Colby www.ColbyConsulting.com _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From caa at highway.com.br Fri Jan 9 03:43:59 2004 From: caa at highway.com.br (Carlos Alberto Alves) Date: Fri, 09 Jan 2004 07:43:59 -0200 Subject: [AccessD] OT - Test Message-ID: Test -- ************************************** * Carlos Alberto Alves * * Child Neurologist * * Systems Analyst/Programmer * * Rio de Janeiro, Brazil * * mailto:caa at highway.com.br * ************************************** From paul.hartland at fsmail.net Fri Jan 9 04:24:13 2004 From: paul.hartland at fsmail.net (paul.hartland at fsmail.net) Date: Fri, 9 Jan 2004 11:24:13 +0100 (CET) Subject: [AccessD] Multiple-step operation generated errors - check each status value Message-ID: <21241280.1073643853716.JavaMail.www@wwinf3002> To all, I have a Visual Basic 6 FE which is connecting to a SQL Server 7.0 BE. One of my fields is called EthnicOrigin which is a TinyInt data type, which also allows Null. The control on the form is a DataCombo, with the list field being Ethnicity and the BoundColumn being EthnicityID. When a user selects an Ethnicity all is well no problem with updating etc as the EthnicityID is entered into the Field and the DataCombo display the Ethnicity. If the user deletes the entry from EthnicOrigin then when the record tries to update I get the error Multiple-step operation generated errors - check each status value Below is the code for updating: With rsPersonnel If (frmOrrPersonnel.PVEthnic <> "") Then .Fields("EthnicOrigin") = frmOrrPersonnel.PVEthnic.BoundText Else .Fields("EthnicOrigin") = 0 End If .Update End With Can anyone tell me what I am doing wrong ? Thanks in advance for any help as this is really starting to frustrate me. Paul Hartland Freeserve AnyTime - HALF PRICE for the first 3 months - Save ?7.50 a month www.freeserve.com/anytime From paul.hartland at fsmail.net Fri Jan 9 04:24:13 2004 From: paul.hartland at fsmail.net (paul.hartland at fsmail.net) Date: Fri, 9 Jan 2004 11:24:13 +0100 (CET) Subject: [AccessD] [dba-VB] Multiple-step operation generated errors - check each status value Message-ID: <21241280.1073643853716.JavaMail.www@wwinf3002> To all, I have a Visual Basic 6 FE which is connecting to a SQL Server 7.0 BE. One of my fields is called EthnicOrigin which is a TinyInt data type, which also allows Null. The control on the form is a DataCombo, with the list field being Ethnicity and the BoundColumn being EthnicityID. When a user selects an Ethnicity all is well no problem with updating etc as the EthnicityID is entered into the Field and the DataCombo display the Ethnicity. If the user deletes the entry from EthnicOrigin then when the record tries to update I get the error Multiple-step operation generated errors - check each status value Below is the code for updating: With rsPersonnel If (frmOrrPersonnel.PVEthnic <> "") Then .Fields("EthnicOrigin") = frmOrrPersonnel.PVEthnic.BoundText Else .Fields("EthnicOrigin") = 0 End If .Update End With Can anyone tell me what I am doing wrong ? Thanks in advance for any help as this is really starting to frustrate me. Paul Hartland Freeserve AnyTime - HALF PRICE for the first 3 months - Save ?7.50 a month www.freeserve.com/anytime _______________________________________________ dba-VB mailing list dba-VB at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/dba-vb http://www.databaseadvisors.com From gustav at cactus.dk Fri Jan 9 04:11:25 2004 From: gustav at cactus.dk (Gustav Brock) Date: Fri, 9 Jan 2004 11:11:25 +0100 Subject: [AccessD] Formatting time - minutes to hour:minutes In-Reply-To: References: Message-ID: <1497854063.20040109111125@cactus.dk> Hi Mark Are you aware that you can replace your creative counting loop with a boring division ..? /gustav > I wrote the following to calculate Minutes and Seconds...with a few > changes...you could use it to calculate Hours and Minutes. I first > calculate the SECONDS...then use a loop that increments a count by > 1...multiply the counter by 60 and check againts SECONDS...when the > Counter*60 is greater than SECONDS...Counter-1 = MINUTES and > SECONDS-((counter-1)*60)=LeftOverSECONDS > Hope it helps... > Mark A. Matte > Private Sub cmdStop_Click() > Me!EndDTTM = Now() > Dim Seconds > Dim RMmin > Dim RMsec > Seconds = DateDiff("s", Me!StartDTTM, Me!EndDTTM) > Dim Check, Counter > Check = True: Counter = 0 > Do > Counter = Counter + 1 > If Counter * 60 > Seconds Then > RMmin = Counter - 1 > RMsec = Seconds - ((Counter - 1) * 60) > Check = False > Exit Do > End If > Loop Until Check = False > Forms!frmRecords!RMCallLengthM.Value = RMmin > Forms!frmRecords!RMCallLengthS.Value = RMsec > DoCmd.close > End Sub From gustav at cactus.dk Fri Jan 9 04:47:07 2004 From: gustav at cactus.dk (Gustav Brock) Date: Fri, 9 Jan 2004 11:47:07 +0100 Subject: [AccessD] Formatting time - minutes to hour:minutes In-Reply-To: <8B98F8EA48F8BA47A2F24E0D0AF40CF407AD7C4C@xlivmbx12.aig.com> References: <8B98F8EA48F8BA47A2F24E0D0AF40CF407AD7C4C@xlivmbx12.aig.com> Message-ID: <1319995432.20040109114707@cactus.dk> Hi Lambert > But your TimeHour function returns a Date data type, and it uses TimeSerial > to generate the return value, so once again, if your input value is more the > 24 * 60 minutes then you will get back a nonsense date and time value. How do you figure this out? It will not - unless you specifically wish to by modifying a code line as explained in the in-line comment. Have in mind, please, that the TimeHour() function is not meant to represent some kind of "universal" function. It was made for summing time intervals which would never add to one day. There a many cases for this in real life, starting/stopping engines, billable hours etc. where you always group by date. Cynthia's need could very well be similar. > I repeat, if you are interesting in time durations then you need to work > with numerical values, not Date/Time values. The Access Date/Time data type > is inherently tied to the concept of a date - a point on the time line, > which has nothing to do with the idea of a duration. This is why DateDiff > returns a Long value, not some kind of date value. I do understand you and if you look up the archives you will find several messages from me stating the same; in fact, I prefer this method if for nothing else that you get rounded values by, say, the second and prevents the mess you can experience when doing algebra with Doubles and Singles. However, if you shift a time interval calculated from two absolute time values (start and stop) so that the start time value is at zero (which is what DateSerial() and TimeSerial() do) then the time interval can be expressed by the time value of the stop time. This doesn't trun the time interval into a "time" but it allows you to use the date/time datatype which again will allow you to use the standard date/time formatting capabilities of Access; this may or may not be advantageous - that depends on many factors including your own preferences. /gustav > "If you wish to count more than 24 hours, here's a quick solution for > seconds. One line (no line break): > = Format(622081 \ 3600, "00:") & > Format((622081 Mod 3600) \ 60, "00:") & > Format(622081 Mod 60, "00") > " > Exactly, this is just the type of code you would put in a custom function to > format durations so they display as hr:min:sec. Why type all that code each > time you want to format a duration (like 62,2081 seconds) when you can just > call a function - FormatAsTime(622081) ???? > Lambert >> -----Original Message----- >> From: Gustav Brock [SMTP:gustav at cactus.dk] >> Sent: Thursday, January 08, 2004 1:16 PM >> To: Access Developers discussion and problem solving >> Subject: Re: [AccessD] Formatting time - minutes to hour:minutes >> >> Hi Lambert >> >> > If there's more that 24 * 60 minutes then TimeSerial will spit out a >> > date/time like this... >> >> > ? TimeSerial(26,1,1) >> > 12/31/1899 2:01:01 AM >> >> Of course, that's why I included the TimeHour() function. >> If you wish to count more than 24 hours, here's a quick solution for >> seconds. One line (no line break): >> >> = Format(622081 \ 3600, "00:") & >> Format((622081 Mod 3600) \ 60, "00:") & >> Format(622081 Mod 60, "00") >> >> The backslash rounds down, thus this will return a string: >> 172:48:01 >> >> > The problem that Cynthia is having is simply that she is interested in >> > Time >> > DURATION, but all the Time formatting and TimeSerial, DateDiff stuff is >> > concerned with POINTS in time (a date and a time of day). >> >> > "Ugly" or not, when dealing with durations (which have nothing to do >> > with >> > dates) you always have to do the math yourself to get hour minutes and >> > seconds displayed. All you need is a simple function that given a number >> > of >> > minutes (or seconds) will do the math and formatting and return the >> > appropriate STRING value for display of reports and forms. >> >> For the "time duration" that is right. However, if you create a pseudo >> timevalue (a time from Access' time "zero"), you have the Format() >> function and all other formatting capabilities of Access ready at hand >> - thus you eliminate the need to create even a simple function. >> >> For "always do the math yourself" I see no reason to struggle with >> that; DateDiff() works fine except for a minor bug in the week count >> for some leap years. >> >> /gustav >> >> >> >> If you wish to use the features of formatting a date/time-value you >> >> need to convert the amount of minutes to a timevalue - like here where >> >> the amount of time is in hours: >> >> >> >> >> >> >> >> Function TimeHour(ByVal curHMS As Currency) As Date >> >> >> >> ' Rounds and converts curHMS (number of hours as decimalnumber). >> >> ' Returns a time value, hh:nn:ss. >> >> ' Gustav Brock, Cactus Data ApS. >> >> ' 1999-08-12. >> >> >> >> Dim lngH As Long >> >> Dim lngM As Long >> >> Dim lngS As Long >> >> Dim curR As Currency >> >> >> >> ' No error handling needed. >> >> On Error Resume Next >> >> >> >> ' Round to two decimals, and skip number of days if curHMS > 24. >> >> ' If day count is needed, omit modulus like this: >> >> ' curHMS = (CLng(curHMS * 10000) / 100 * 36) ' Mod 86400 >> >> curHMS = (CLng(curHMS * 10000) / 100 * 36) Mod 86400 >> >> >> >> ' Calculate hours, minutes, and seconds. >> >> lngH = Int(curHMS / 3600) >> >> curR = curHMS - (lngH * 3600) >> >> lngM = Int(curR / 60) >> >> curR = curR - (lngM * 60) >> >> lngS = CInt(curR) >> >> >> >> ' Create time value. >> >> TimeHour = TimeSerial(lngH, lngM, lngS) >> >> >> >> End Function >> >> >> >> >> >> >> >> Or you could try to simply feed your amount of minutes directly: >> >> >> >> datTime = TimeSerial(0, lngMinutes, 0) >> >> >> >> That may work - haven't tested it though. >> >> >> >> /gustav >> >> >> >> >> >> > I have an application that tracks the amount of time spent on >> >> > projects. >> >> > I used DateDiff on the entry form in order to get the number of minutes >> >> > between the start and end times. The number is held >> >> > in a field called "Time." In a report, I sum "Time" in order to get >> >> > the >> >> > total number of minutes. I need to show the total minutes in hh:mm >> >> > format on the report. I tried to simply format the >> >> > field in the report, but that didn't work. >> >> >> >> > I tried dividing the minutes by 60, which gave me the number of hours >> >> > and a remainder. I then multiplied the remainder by 60 and then >> >> > divided by 100 to get the number of seconds. This is getting >> >> > ugly.... Am I making this harder than it is?? From andy at minstersystems.co.uk Fri Jan 9 04:53:18 2004 From: andy at minstersystems.co.uk (Andy Lacey) Date: Fri, 9 Jan 2004 10:53:18 +0000 Subject: [AccessD] Best API references Message-ID: <20040109105316.5324B2566A4@smithers.nildram.co.uk> What web site(s) do any of you use as a reference for API calls, and how to use them from VBA? Lambert recently sent me some useful tips on the use of SHBrowseFolder and others among you have given detailed info on other API calls. But how do you know this stuff? Where can I go to find out for myself? Sites like Dev's 'The Access Web' have some great stuff, but not a comprehensive list. -- Andy Lacey http://www.minstersystems.co.uk ________________________________________________ Message sent using UebiMiau 2.7.2 From viner at eunet.yu Fri Jan 9 05:29:27 2004 From: viner at eunet.yu (Ervin Brindza) Date: Fri, 9 Jan 2004 12:29:27 +0100 Subject: [AccessD] Best API references References: <20040109105316.5324B2566A4@smithers.nildram.co.uk> Message-ID: <003401c3d6a4$2e504920$0100a8c0@razvoj> Take a look at API GUIDE on http://www.mentalis.org E. ----- Original Message ----- From: "Andy Lacey" To: "Access Developers discussion and problem solving" Sent: 09 January, 2004 11:53 AM Subject: [AccessD] Best API references > What web site(s) do any of you use as a reference for API calls, and how to > use them from VBA? Lambert recently sent me some useful tips on the use of > SHBrowseFolder and others among you have given detailed info on other API > calls. But how do you know this stuff? Where can I go to find out for > myself? Sites like Dev's 'The Access Web' have some great stuff, but not a > comprehensive list. > -- > Andy Lacey > http://www.minstersystems.co.uk > > > ________________________________________________ > Message sent using UebiMiau 2.7.2 > > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com From askolits at ot.com Fri Jan 9 05:37:46 2004 From: askolits at ot.com (John Skolits) Date: Fri, 9 Jan 2004 06:37:46 -0500 Subject: [AccessD] Best API references In-Reply-To: <20040109105316.5324B2566A4@smithers.nildram.co.uk> Message-ID: Is use http://vbnet.mvps.org Their search engine is pretty good. The examples are for mostly VB application, not VBA but many times it's easy to implement them into Access apps. The code is essentially the same. John Skolits -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Andy Lacey Sent: Friday, January 09, 2004 5:53 AM To: Access Developers discussion and problem solving Subject: [AccessD] Best API references What web site(s) do any of you use as a reference for API calls, and how to use them from VBA? Lambert recently sent me some useful tips on the use of SHBrowseFolder and others among you have given detailed info on other API calls. But how do you know this stuff? Where can I go to find out for myself? Sites like Dev's 'The Access Web' have some great stuff, but not a comprehensive list. -- Andy Lacey http://www.minstersystems.co.uk ________________________________________________ Message sent using UebiMiau 2.7.2 _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From andrew.haslett at ilc.gov.au Fri Jan 9 05:37:26 2004 From: andrew.haslett at ilc.gov.au (Haslett, Andrew) Date: Fri, 9 Jan 2004 22:07:26 +1030 Subject: [AccessD] OT: ASP Oddity (Context Switching) Message-ID: Yeah there was a big argument regarding 'context-switching' in the asp community, especially with ASP2.0. The performance difference in ASP3.0 is negligible so it really boils down to your preference, what is easier to read/debug etc. I think the infamous MS article "Top 25 techniques for ASP" or the like included a statement about context switching, although a couple of the issues raised in that article were debateable. Cheers, Andrew -----Original Message----- From: DWUTKA at marlow.com [mailto:DWUTKA at marlow.com] Sent: Friday, 9 January 2004 6:29 AM To: AccessD at databaseadvisors.com Subject: [AccessD] OT: ASP Oddity Sorry for the OT post, but I ran into this last month, and was just flabbergasted that this worked this way. I was doing an ASP sub-contract for my sister, for a jewelry company (http://edlevinjewelry.com) . In the HTML of some of the pages, I found stuff like this: <% If so.type="merchant" then %> This is a test <% End if%> It wasn't coded (or worded, obviously) like that, but that is the gist of it. There was an If Then clause, with regular old HTML in the middle. Sure enough, if the criteria isn't met, the HTML isn't displayed. I never realized (until I saw that), that you could do that. Up until now, I have always done something like this: <% If This=True Then response.write "Test" End if %> In that case, the ASP is writing out the HTML. In some cases, it doesn't make much of a difference. However, I write most of my HTML by hand, using the Microsoft Script Editor, which does a lot of autocompletion, and makes writing raw HTML a breeze. But when I had to put out conditional HTML, I lost all of the advantages of the editor, because I was putting the HTML into a string. What's odd, is I have never run across this in ASP documentation. Once again, sorry for the OT post, but I know there are several listers out there that are either starting out in ASP, or have been using it for a while, and hopefully, this will be helpful to ya'all. Just out of curiousity, did anyone else know this? Drew _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com IMPORTANT - PLEASE READ ******************** This email and any files transmitted with it are confidential and may contain information protected by law from disclosure. If you have received this message in error, please notify the sender immediately and delete this email from your system. No warranty is given that this email or files, if attached to this email, are free from computer viruses or other defects. They are provided on the basis the user assumes all responsibility for loss, damage or consequence resulting directly or indirectly from their use, whether caused by the negligence of the sender or not. From CSPELL at jhuccp.org Fri Jan 9 06:34:00 2004 From: CSPELL at jhuccp.org (CYNTHIA SPELL) Date: Fri, 09 Jan 2004 07:34:00 -0500 Subject: [AccessD] Formatting time - minutes to hour:minutes Message-ID: My application is working correctly now - thanks to your suggestions. Once again, I've learned a lot from the discussion. cindy >>> gustav at cactus.dk 01/09/04 05:47AM >>> Hi Lambert > But your TimeHour function returns a Date data type, and it uses TimeSerial > to generate the return value, so once again, if your input value is more the > 24 * 60 minutes then you will get back a nonsense date and time value. How do you figure this out? It will not - unless you specifically wish to by modifying a code line as explained in the in-line comment. Have in mind, please, that the TimeHour() function is not meant to represent some kind of "universal" function. It was made for summing time intervals which would never add to one day. There a many cases for this in real life, starting/stopping engines, billable hours etc. where you always group by date. Cynthia's need could very well be similar. > I repeat, if you are interesting in time durations then you need to work > with numerical values, not Date/Time values. The Access Date/Time data type > is inherently tied to the concept of a date - a point on the time line, > which has nothing to do with the idea of a duration. This is why DateDiff > returns a Long value, not some kind of date value. I do understand you and if you look up the archives you will find several messages from me stating the same; in fact, I prefer this method if for nothing else that you get rounded values by, say, the second and prevents the mess you can experience when doing algebra with Doubles and Singles. However, if you shift a time interval calculated from two absolute time values (start and stop) so that the start time value is at zero (which is what DateSerial() and TimeSerial() do) then the time interval can be expressed by the time value of the stop time. This doesn't trun the time interval into a "time" but it allows you to use the date/time datatype which again will allow you to use the standard date/time formatting capabilities of Access; this may or may not be advantageous - that depends on many factors including your own preferences. /gustav > "If you wish to count more than 24 hours, here's a quick solution for > seconds. One line (no line break): > = Format(622081 \ 3600, "00:") & > Format((622081 Mod 3600) \ 60, "00:") & > Format(622081 Mod 60, "00") > " > Exactly, this is just the type of code you would put in a custom function to > format durations so they display as hr:min:sec. Why type all that code each > time you want to format a duration (like 62,2081 seconds) when you can just > call a function - FormatAsTime(622081) ???? > Lambert >> -----Original Message----- >> From: Gustav Brock [SMTP:gustav at cactus.dk] >> Sent: Thursday, January 08, 2004 1:16 PM >> To: Access Developers discussion and problem solving >> Subject: Re: [AccessD] Formatting time - minutes to hour:minutes >> >> Hi Lambert >> >> > If there's more that 24 * 60 minutes then TimeSerial will spit out a >> > date/time like this... >> >> > ? TimeSerial(26,1,1) >> > 12/31/1899 2:01:01 AM >> >> Of course, that's why I included the TimeHour() function. >> If you wish to count more than 24 hours, here's a quick solution for >> seconds. One line (no line break): >> >> = Format(622081 \ 3600, "00:") & >> Format((622081 Mod 3600) \ 60, "00:") & >> Format(622081 Mod 60, "00") >> >> The backslash rounds down, thus this will return a string: >> 172:48:01 >> >> > The problem that Cynthia is having is simply that she is interested in >> > Time >> > DURATION, but all the Time formatting and TimeSerial, DateDiff stuff is >> > concerned with POINTS in time (a date and a time of day). >> >> > "Ugly" or not, when dealing with durations (which have nothing to do >> > with >> > dates) you always have to do the math yourself to get hour minutes and >> > seconds displayed. All you need is a simple function that given a number >> > of >> > minutes (or seconds) will do the math and formatting and return the >> > appropriate STRING value for display of reports and forms. >> >> For the "time duration" that is right. However, if you create a pseudo >> timevalue (a time from Access' time "zero"), you have the Format() >> function and all other formatting capabilities of Access ready at hand >> - thus you eliminate the need to create even a simple function. >> >> For "always do the math yourself" I see no reason to struggle with >> that; DateDiff() works fine except for a minor bug in the week count >> for some leap years. >> >> /gustav >> >> >> >> If you wish to use the features of formatting a date/time-value you >> >> need to convert the amount of minutes to a timevalue - like here where >> >> the amount of time is in hours: >> >> >> >> >> >> >> >> Function TimeHour(ByVal curHMS As Currency) As Date >> >> >> >> ' Rounds and converts curHMS (number of hours as decimalnumber). >> >> ' Returns a time value, hh:nn:ss. >> >> ' Gustav Brock, Cactus Data ApS. >> >> ' 1999-08-12. >> >> >> >> Dim lngH As Long >> >> Dim lngM As Long >> >> Dim lngS As Long >> >> Dim curR As Currency >> >> >> >> ' No error handling needed. >> >> On Error Resume Next >> >> >> >> ' Round to two decimals, and skip number of days if curHMS > 24. >> >> ' If day count is needed, omit modulus like this: >> >> ' curHMS = (CLng(curHMS * 10000) / 100 * 36) ' Mod 86400 >> >> curHMS = (CLng(curHMS * 10000) / 100 * 36) Mod 86400 >> >> >> >> ' Calculate hours, minutes, and seconds. >> >> lngH = Int(curHMS / 3600) >> >> curR = curHMS - (lngH * 3600) >> >> lngM = Int(curR / 60) >> >> curR = curR - (lngM * 60) >> >> lngS = CInt(curR) >> >> >> >> ' Create time value. >> >> TimeHour = TimeSerial(lngH, lngM, lngS) >> >> >> >> End Function >> >> >> >> >> >> >> >> Or you could try to simply feed your amount of minutes directly: >> >> >> >> datTime = TimeSerial(0, lngMinutes, 0) >> >> >> >> That may work - haven't tested it though. >> >> >> >> /gustav >> >> >> >> >> >> > I have an application that tracks the amount of time spent on >> >> > projects. >> >> > I used DateDiff on the entry form in order to get the number of minutes >> >> > between the start and end times. The number is held >> >> > in a field called "Time." In a report, I sum "Time" in order to get >> >> > the >> >> > total number of minutes. I need to show the total minutes in hh:mm >> >> > format on the report. I tried to simply format the >> >> > field in the report, but that didn't work. >> >> >> >> > I tried dividing the minutes by 60, which gave me the number of hours >> >> > and a remainder. I then multiplied the remainder by 60 and then >> >> > divided by 100 to get the number of seconds. This is getting >> >> > ugly.... Am I making this harder than it is?? _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From bheid at appdevgrp.com Fri Jan 9 06:37:54 2004 From: bheid at appdevgrp.com (Bobby Heid) Date: Fri, 9 Jan 2004 07:37:54 -0500 Subject: [AccessD] Best API references In-Reply-To: <916187228923D311A6FE00A0CC3FAA30729BCC@ADGSERVER> Message-ID: <916187228923D311A6FE00A0CC3FAA305BB159@ADGSERVER> I use All-API at http://www.mentalis.org/index2.shtml. Although I do not think that they are actively updating their site. Bobby -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Andy Lacey Sent: Friday, January 09, 2004 5:53 AM To: Access Developers discussion and problem solving Subject: [AccessD] Best API references What web site(s) do any of you use as a reference for API calls, and how to use them from VBA? Lambert recently sent me some useful tips on the use of SHBrowseFolder and others among you have given detailed info on other API calls. But how do you know this stuff? Where can I go to find out for myself? Sites like Dev's 'The Access Web' have some great stuff, but not a comprehensive list. -- Andy Lacey http://www.minstersystems.co.uk ________________________________________________ Message sent using UebiMiau 2.7.2 _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From Bryan_Carbonnell at cbc.ca Fri Jan 9 06:51:09 2004 From: Bryan_Carbonnell at cbc.ca (Bryan Carbonnell) Date: Fri, 09 Jan 2004 07:51:09 -0500 Subject: [AccessD] Best API references Message-ID: An even easier URL to remeber is: http://www.allapi.net And you are correct Bobby. The site isn't being actively being updated. If you are looking for a book then Dan Appleman Visual Basic Programmer's Guide to the Win32 API is a great reference. It's pretty deep reading, but a good reference. (http://www.amazon.co.uk/exec/obidos/ASIN/0672315904/qid=1073652549/sr=1-1/ref=sr_1_10_1/202-3516410-8804667) Bryan Carbonnell bryan_carbonnell at cbc.ca >>> bheid at appdevgrp.com 09-Jan-04 7:37:54 AM >>> I use All-API at http://www.mentalis.org/index2.shtml. Although I do not think that they are actively updating their site. Bobby -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Andy Lacey Sent: Friday, January 09, 2004 5:53 AM To: Access Developers discussion and problem solving Subject: [AccessD] Best API references What web site(s) do any of you use as a reference for API calls, and how to use them from VBA? Lambert recently sent me some useful tips on the use of SHBrowseFolder and others among you have given detailed info on other API calls. But how do you know this stuff? Where can I go to find out for myself? Sites like Dev's 'The Access Web' have some great stuff, but not a comprehensive list. From ssharkins at bellsouth.net Fri Jan 9 06:54:15 2004 From: ssharkins at bellsouth.net (Susan Harkins) Date: Fri, 9 Jan 2004 07:54:15 -0500 Subject: [AccessD] Best API references References: Message-ID: <006901c3d6af$b16baab0$210110ac@SUSANONE> > > If you are looking for a book then Dan Appleman Visual Basic > Programmer's Guide to the Win32 API is a great reference. It's pretty > deep reading, but a good reference. > (http://www.amazon.co.uk/exec/obidos/ASIN/0672315904/qid=1073652549/sr=1-1/r ef=sr_1_10_1/202-3516410-8804667) ====FWIW, I can recommend this book as well -- has a good section on actually using them as well, which is often missing in other references. Some good practical information. Susan H. From mikedorism at adelphia.net Fri Jan 9 07:01:33 2004 From: mikedorism at adelphia.net (Mike & Doris Manning) Date: Fri, 9 Jan 2004 08:01:33 -0500 Subject: [AccessD] [dba-VB] Multiple-step operation generated errors - check each status value In-Reply-To: <21241280.1073643853716.JavaMail.www@wwinf3002> Message-ID: <000001c3d6b0$b5668990$8b194244@hargrove.internal> A combo box bound to an Integer field will have a 0 after the user deletes the entry. Doris Manning Database Administrator Hargrove Inc. www.hargroveinc.com -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of paul.hartland at fsmail.net Sent: Friday, January 09, 2004 5:24 AM To: dba-vb Cc: accessd Subject: [AccessD] [dba-VB] Multiple-step operation generated errors - check each status value To all, I have a Visual Basic 6 FE which is connecting to a SQL Server 7.0 BE. One of my fields is called EthnicOrigin which is a TinyInt data type, which also allows Null. The control on the form is a DataCombo, with the list field being Ethnicity and the BoundColumn being EthnicityID. When a user selects an Ethnicity all is well no problem with updating etc as the EthnicityID is entered into the Field and the DataCombo display the Ethnicity. If the user deletes the entry from EthnicOrigin then when the record tries to update I get the error Multiple-step operation generated errors - check each status value Below is the code for updating: With rsPersonnel If (frmOrrPersonnel.PVEthnic <> "") Then .Fields("EthnicOrigin") = frmOrrPersonnel.PVEthnic.BoundText Else .Fields("EthnicOrigin") = 0 End If .Update End With Can anyone tell me what I am doing wrong ? Thanks in advance for any help as this is really starting to frustrate me. Paul Hartland Freeserve AnyTime - HALF PRICE for the first 3 months - Save ?7.50 a month www.freeserve.com/anytime _______________________________________________ dba-VB mailing list dba-VB at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/dba-vb http://www.databaseadvisors.com _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From paul.hartland at fsmail.net Fri Jan 9 07:15:44 2004 From: paul.hartland at fsmail.net (paul.hartland at fsmail.net) Date: Fri, 9 Jan 2004 14:15:44 +0100 (CET) Subject: [AccessD] [dba-VB] Multiple-step operation generated errors - check each status value Message-ID: <8308534.1073654144304.JavaMail.www@wwinf3006> I know, but surely the tinyint data type accepts zero's or am I still missing something ? Message date : Jan 09 2004, 01:04 PM >From : Mike & Doris Manning To : 'Access Developers discussion and problem solving' Copy to : Subject : RE: [AccessD] [dba-VB] Multiple-step operation generated errors - check each status value A combo box bound to an Integer field will have a 0 after the user deletes the entry. Doris Manning Database Administrator Hargrove Inc. www.hargroveinc.com -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of paul.hartland at fsmail.net Sent: Friday, January 09, 2004 5:24 AM To: dba-vb Cc: accessd Subject: [AccessD] [dba-VB] Multiple-step operation generated errors - check each status value To all, I have a Visual Basic 6 FE which is connecting to a SQL Server 7.0 BE. One of my fields is called EthnicOrigin which is a TinyInt data type, which also allows Null. The control on the form is a DataCombo, with the list field being Ethnicity and the BoundColumn being EthnicityID. When a user selects an Ethnicity all is well no problem with updating etc as the EthnicityID is entered into the Field and the DataCombo display the Ethnicity. If the user deletes the entry from EthnicOrigin then when the record tries to update I get the error Multiple-step operation generated errors - check each status value Below is the code for updating: With rsPersonnel If (frmOrrPersonnel.PVEthnic <> "") Then .Fields("EthnicOrigin") = frmOrrPersonnel.PVEthnic.BoundText Else .Fields("EthnicOrigin") = 0 End If .Update End With Can anyone tell me what I am doing wrong ? Thanks in advance for any help as this is really starting to frustrate me. Paul Hartland Freeserve AnyTime - HALF PRICE for the first 3 months - Save ?7.50 a month www.freeserve.com/anytime _______________________________________________ dba-VB mailing list dba-VB at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/dba-vb http://www.databaseadvisors.com _______________________________________________ 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 Freeserve AnyTime - HALF PRICE for the first 3 months - Save ?7.50 a month www.freeserve.com/anytime From gustav at cactus.dk Fri Jan 9 08:07:59 2004 From: gustav at cactus.dk (Gustav Brock) Date: Fri, 9 Jan 2004 15:07:59 +0100 Subject: [AccessD] A2K: Drag and Drop with Access In-Reply-To: <007401c32b7a$59eb6770$6401a8c0@papparuff> References: <007401c32b7a$59eb6770$6401a8c0@papparuff> Message-ID: <7622047232.20040109150759@cactus.dk> Hi John, Dick Here's another article on that subject. This, however, deals with the content of a control. The link terminates ultimo January: What a Drag it is: Drag and Drop in Access This month, Doug Steele shows you how to add drag-and-drop to your Access application using combinations of multi-value and single-value controls. http://www.pinpub.com/html/main.isx?sub=62&story=2604 This implementation though "screams" to be wrapped into WithEvents ... /gustav > Go to Peter DeBaets website and check out his Drag-N-Dropper program. > It works very well > http://www.peterssoftware.com > -----Original Message----- > From: accessd-bounces at databaseadvisors.com > [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Darren DICK > Sent: Wednesday, June 04, 2003 9:59 PM > To: AccessD List > Subject: [AccessD] A2K: Drag and Drop with Access > Anyone have any success with dragging and dropping of controls onto > Access forms? Eg I have an Image control displaying an image and say > it's in the top left corner of the form. I want to 'click' onto the > image control and 'drag' it to say... the bottom left corner of the > form. > I have found heaps of samples for VB but they use VB only events etc, > that I can't replicate or fudge in Access. From mikedorism at adelphia.net Fri Jan 9 08:18:53 2004 From: mikedorism at adelphia.net (Mike & Doris Manning) Date: Fri, 9 Jan 2004 09:18:53 -0500 Subject: [AccessD] [dba-VB] Multiple-step operation generated errors - check each status value In-Reply-To: <8308534.1073654144304.JavaMail.www@wwinf3006> Message-ID: <000001c3d6bb$82df5a50$8b194244@hargrove.internal> Look at your comparison, you are comparing to vbnullstring ("") and not 0. Also you are trying to store a string into an int -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of paul.hartland at fsmail.net Sent: Friday, January 09, 2004 8:16 AM To: Access Developers discussion and problem solving Subject: Re: RE: [AccessD] [dba-VB] Multiple-step operation generated errors - check each status value I know, but surely the tinyint data type accepts zero's or am I still missing something ? Message date : Jan 09 2004, 01:04 PM >From : Mike & Doris Manning To : 'Access Developers discussion and problem solving' Copy to : Subject : RE: [AccessD] [dba-VB] Multiple-step operation generated errors - check each status value A combo box bound to an Integer field will have a 0 after the user deletes the entry. Doris Manning Database Administrator Hargrove Inc. www.hargroveinc.com -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of paul.hartland at fsmail.net Sent: Friday, January 09, 2004 5:24 AM To: dba-vb Cc: accessd Subject: [AccessD] [dba-VB] Multiple-step operation generated errors - check each status value To all, I have a Visual Basic 6 FE which is connecting to a SQL Server 7.0 BE. One of my fields is called EthnicOrigin which is a TinyInt data type, which also allows Null. The control on the form is a DataCombo, with the list field being Ethnicity and the BoundColumn being EthnicityID. When a user selects an Ethnicity all is well no problem with updating etc as the EthnicityID is entered into the Field and the DataCombo display the Ethnicity. If the user deletes the entry from EthnicOrigin then when the record tries to update I get the error Multiple-step operation generated errors - check each status value Below is the code for updating: With rsPersonnel If (frmOrrPersonnel.PVEthnic <> "") Then .Fields("EthnicOrigin") = frmOrrPersonnel.PVEthnic.BoundText Else .Fields("EthnicOrigin") = 0 End If .Update End With Can anyone tell me what I am doing wrong ? Thanks in advance for any help as this is really starting to frustrate me. Paul Hartland Freeserve AnyTime - HALF PRICE for the first 3 months - Save ?7.50 a month www.freeserve.com/anytime _______________________________________________ dba-VB mailing list dba-VB at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/dba-vb http://www.databaseadvisors.com _______________________________________________ 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 Freeserve AnyTime - HALF PRICE for the first 3 months - Save ?7.50 a month www.freeserve.com/anytime _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From markamatte at hotmail.com Fri Jan 9 08:40:59 2004 From: markamatte at hotmail.com (Mark A Matte) Date: Fri, 09 Jan 2004 14:40:59 +0000 Subject: [AccessD] Best API references Message-ID: I used http://www.vbapi.com/index.html...but it was going away...and they offered a download of the list...its not often I have to outside of that list. Thanks, Mark A. Matte >From: "Bobby Heid" >Reply-To: Access Developers discussion and problem >solving >To: "'Access Developers discussion and problem >solving'" >Subject: RE: [AccessD] Best API references >Date: Fri, 9 Jan 2004 07:37:54 -0500 > >I use All-API at http://www.mentalis.org/index2.shtml. Although I do not >think that they are actively updating their site. > >Bobby > >-----Original Message----- >From: accessd-bounces at databaseadvisors.com >[mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Andy Lacey >Sent: Friday, January 09, 2004 5:53 AM >To: Access Developers discussion and problem solving >Subject: [AccessD] Best API references > > >What web site(s) do any of you use as a reference for API calls, and how to >use them from VBA? Lambert recently sent me some useful tips on the use of >SHBrowseFolder and others among you have given detailed info on other API >calls. But how do you know this stuff? Where can I go to find out for >myself? Sites like Dev's 'The Access Web' have some great stuff, but not a >comprehensive list. >-- >Andy Lacey >http://www.minstersystems.co.uk > > >________________________________________________ >Message sent using UebiMiau 2.7.2 > >_______________________________________________ >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 _________________________________________________________________ Take advantage of our limited-time introductory offer for dial-up Internet access. http://join.msn.com/?page=dept/dialup From markamatte at hotmail.com Fri Jan 9 08:52:40 2004 From: markamatte at hotmail.com (Mark A Matte) Date: Fri, 09 Jan 2004 14:52:40 +0000 Subject: [AccessD] Formatting time - minutes to hour:minutes Message-ID: Gustav, I could answer 1 of 2 ways... 1. I never really was good at division. or 2. I didn't know about the MOD operator. Either way...thanks for the insight. Thanks, Mark >From: Gustav Brock >Reply-To: Access Developers discussion and problem >solving >To: Access Developers discussion and problem >solving >Subject: Re: [AccessD] Formatting time - minutes to hour:minutes >Date: Fri, 9 Jan 2004 11:11:25 +0100 > >Hi Mark > >Are you aware that you can replace your creative counting loop with a >boring division ..? > >/gustav > > > > I wrote the following to calculate Minutes and Seconds...with a few > > changes...you could use it to calculate Hours and Minutes. I first > > calculate the SECONDS...then use a loop that increments a count by > > 1...multiply the counter by 60 and check againts SECONDS...when the > > Counter*60 is greater than SECONDS...Counter-1 = MINUTES and > > SECONDS-((counter-1)*60)=LeftOverSECONDS > > > Hope it helps... > > > Mark A. Matte > > > Private Sub cmdStop_Click() > > Me!EndDTTM = Now() > > Dim Seconds > > Dim RMmin > > Dim RMsec > > Seconds = DateDiff("s", Me!StartDTTM, Me!EndDTTM) > > Dim Check, Counter > > Check = True: Counter = 0 > > > Do > > Counter = Counter + 1 > > If Counter * 60 > Seconds Then > > RMmin = Counter - 1 > > RMsec = Seconds - ((Counter - 1) * 60) > > Check = False > > Exit Do > > End If > > Loop Until Check = False > > Forms!frmRecords!RMCallLengthM.Value = RMmin > > Forms!frmRecords!RMCallLengthS.Value = RMsec > > DoCmd.close > > End Sub > >_______________________________________________ >AccessD mailing list >AccessD at databaseadvisors.com >http://databaseadvisors.com/mailman/listinfo/accessd >Website: http://www.databaseadvisors.com _________________________________________________________________ Get reliable dial-up Internet access now with our limited-time introductory offer. http://join.msn.com/?page=dept/dialup From DWUTKA at marlow.com Fri Jan 9 10:39:06 2004 From: DWUTKA at marlow.com (DWUTKA at marlow.com) Date: Fri, 9 Jan 2004 10:39:06 -0600 Subject: [AccessD] OT: ASP Oddity (Context Switching) Message-ID: <2F8793082E00D4119A1700B0D0216BF802227708@main2.marlow.com> Never saw that article. Drew -----Original Message----- From: Haslett, Andrew [mailto:andrew.haslett at ilc.gov.au] Sent: Friday, January 09, 2004 5:37 AM To: 'Access Developers discussion and problem solving' Subject: RE: [AccessD] OT: ASP Oddity (Context Switching) Yeah there was a big argument regarding 'context-switching' in the asp community, especially with ASP2.0. The performance difference in ASP3.0 is negligible so it really boils down to your preference, what is easier to read/debug etc. I think the infamous MS article "Top 25 techniques for ASP" or the like included a statement about context switching, although a couple of the issues raised in that article were debateable. Cheers, Andrew -----Original Message----- From: DWUTKA at marlow.com [mailto:DWUTKA at marlow.com] Sent: Friday, 9 January 2004 6:29 AM To: AccessD at databaseadvisors.com Subject: [AccessD] OT: ASP Oddity Sorry for the OT post, but I ran into this last month, and was just flabbergasted that this worked this way. I was doing an ASP sub-contract for my sister, for a jewelry company (http://edlevinjewelry.com) . In the HTML of some of the pages, I found stuff like this: <% If so.type="merchant" then %> This is a test <% End if%> It wasn't coded (or worded, obviously) like that, but that is the gist of it. There was an If Then clause, with regular old HTML in the middle. Sure enough, if the criteria isn't met, the HTML isn't displayed. I never realized (until I saw that), that you could do that. Up until now, I have always done something like this: <% If This=True Then response.write "Test" End if %> In that case, the ASP is writing out the HTML. In some cases, it doesn't make much of a difference. However, I write most of my HTML by hand, using the Microsoft Script Editor, which does a lot of autocompletion, and makes writing raw HTML a breeze. But when I had to put out conditional HTML, I lost all of the advantages of the editor, because I was putting the HTML into a string. What's odd, is I have never run across this in ASP documentation. Once again, sorry for the OT post, but I know there are several listers out there that are either starting out in ASP, or have been using it for a while, and hopefully, this will be helpful to ya'all. Just out of curiousity, did anyone else know this? Drew _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com IMPORTANT - PLEASE READ ******************** This email and any files transmitted with it are confidential and may contain information protected by law from disclosure. If you have received this message in error, please notify the sender immediately and delete this email from your system. No warranty is given that this email or files, if attached to this email, are free from computer viruses or other defects. They are provided on the basis the user assumes all responsibility for loss, damage or consequence resulting directly or indirectly from their use, whether caused by the negligence of the sender or not. _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From Erwin.Craps at ithelps.be Fri Jan 9 10:46:31 2004 From: Erwin.Craps at ithelps.be (Erwin Craps - IT Helps) Date: Fri, 9 Jan 2004 17:46:31 +0100 Subject: [AccessD] Best API references Message-ID: <46B976F2B698FF46A4FE7636509B22DF03D0E5@stekelbes.ithelps.local> Ha funny.... I just downloaded the API-Guide. I noticed a European Download link here in Leuven my hometown. When opening the application, the credits of the applications goes to some company a few streets away from where I am... They say it's "postcard software" and you should send a card from the city where you are if you wanna use the app. I don't know if they gonna be happy to get a postcard from 500 meter away ?! Erwin -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Bryan Carbonnell Sent: Friday, January 09, 2004 1:51 PM To: accessd at databaseadvisors.com Subject: RE: [AccessD] Best API references An even easier URL to remeber is: http://www.allapi.net And you are correct Bobby. The site isn't being actively being updated. If you are looking for a book then Dan Appleman Visual Basic Programmer's Guide to the Win32 API is a great reference. It's pretty deep reading, but a good reference. (http://www.amazon.co.uk/exec/obidos/ASIN/0672315904/qid=1073652549/sr=1 -1/ref=sr_1_10_1/202-3516410-8804667) Bryan Carbonnell bryan_carbonnell at cbc.ca >>> bheid at appdevgrp.com 09-Jan-04 7:37:54 AM >>> I use All-API at http://www.mentalis.org/index2.shtml. Although I do not think that they are actively updating their site. Bobby -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Andy Lacey Sent: Friday, January 09, 2004 5:53 AM To: Access Developers discussion and problem solving Subject: [AccessD] Best API references What web site(s) do any of you use as a reference for API calls, and how to use them from VBA? Lambert recently sent me some useful tips on the use of SHBrowseFolder and others among you have given detailed info on other API calls. But how do you know this stuff? Where can I go to find out for myself? Sites like Dev's 'The Access Web' have some great stuff, but not a comprehensive list. _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From Mark.Mitsules at ngc.com Fri Jan 9 10:49:56 2004 From: Mark.Mitsules at ngc.com (Mitsules, Mark S. (Newport News)) Date: Fri, 9 Jan 2004 11:49:56 -0500 Subject: [AccessD] OT: ASP Oddity (Context Switching) Message-ID: I tried a very quick search yesterday on that quoted title...didn't come across it. Don't spend any time on it, but if someone does find the article for their own purposes, I'd appreciate a link. Mark -----Original Message----- From: DWUTKA at marlow.com [mailto:DWUTKA at marlow.com] Sent: Friday, January 09, 2004 11:39 AM To: accessd at databaseadvisors.com Subject: RE: [AccessD] OT: ASP Oddity (Context Switching) Never saw that article. Drew -----Original Message----- From: Haslett, Andrew [mailto:andrew.haslett at ilc.gov.au] Sent: Friday, January 09, 2004 5:37 AM To: 'Access Developers discussion and problem solving' Subject: RE: [AccessD] OT: ASP Oddity (Context Switching) Yeah there was a big argument regarding 'context-switching' in the asp community, especially with ASP2.0. The performance difference in ASP3.0 is negligible so it really boils down to your preference, what is easier to read/debug etc. I think the infamous MS article "Top 25 techniques for ASP" or the like included a statement about context switching, although a couple of the issues raised in that article were debateable. Cheers, Andrew -----Original Message----- From: DWUTKA at marlow.com [mailto:DWUTKA at marlow.com] Sent: Friday, 9 January 2004 6:29 AM To: AccessD at databaseadvisors.com Subject: [AccessD] OT: ASP Oddity Sorry for the OT post, but I ran into this last month, and was just flabbergasted that this worked this way. I was doing an ASP sub-contract for my sister, for a jewelry company (http://edlevinjewelry.com) . In the HTML of some of the pages, I found stuff like this: <% If so.type="merchant" then %> This is a test <% End if%> It wasn't coded (or worded, obviously) like that, but that is the gist of it. There was an If Then clause, with regular old HTML in the middle. Sure enough, if the criteria isn't met, the HTML isn't displayed. I never realized (until I saw that), that you could do that. Up until now, I have always done something like this: <% If This=True Then response.write "Test" End if %> In that case, the ASP is writing out the HTML. In some cases, it doesn't make much of a difference. However, I write most of my HTML by hand, using the Microsoft Script Editor, which does a lot of autocompletion, and makes writing raw HTML a breeze. But when I had to put out conditional HTML, I lost all of the advantages of the editor, because I was putting the HTML into a string. What's odd, is I have never run across this in ASP documentation. Once again, sorry for the OT post, but I know there are several listers out there that are either starting out in ASP, or have been using it for a while, and hopefully, this will be helpful to ya'all. Just out of curiousity, did anyone else know this? Drew _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com IMPORTANT - PLEASE READ ******************** This email and any files transmitted with it are confidential and may contain information protected by law from disclosure. If you have received this message in error, please notify the sender immediately and delete this email from your system. No warranty is given that this email or files, if attached to this email, are free from computer viruses or other defects. They are provided on the basis the user assumes all responsibility for loss, damage or consequence resulting directly or indirectly from their use, whether caused by the negligence of the sender or not. _______________________________________________ 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 From dw-murphy at cox.net Fri Jan 9 11:51:12 2004 From: dw-murphy at cox.net (Doug Murphy) Date: Fri, 9 Jan 2004 09:51:12 -0800 Subject: [AccessD] OT: ASP Oddity In-Reply-To: <2F8793082E00D4119A1700B0D0216BF8022276FA@main2.marlow.com> Message-ID: <001601c3d6d9$2ea999a0$8500a8c0@CX615377a> Hi Drew, Yes I use this approach when writing pages that are the ASP version of a continuous form, e.g., many records listed in form controls. The if/else/then structure allows for testing for conditions and then writing the correct html. I think I first saw this in one of the ASP books I use, or it may have been some code I got off the web. I'll take it from wherever I find it. Doug -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of DWUTKA at marlow.com Sent: Thursday, January 08, 2004 11:59 AM To: AccessD at databaseadvisors.com Subject: [AccessD] OT: ASP Oddity Sorry for the OT post, but I ran into this last month, and was just flabbergasted that this worked this way. I was doing an ASP sub-contract for my sister, for a jewelry company (http://edlevinjewelry.com) . In the HTML of some of the pages, I found stuff like this: <% If so.type="merchant" then %> This is a test <% End if%> It wasn't coded (or worded, obviously) like that, but that is the gist of it. There was an If Then clause, with regular old HTML in the middle. Sure enough, if the criteria isn't met, the HTML isn't displayed. I never realized (until I saw that), that you could do that. Up until now, I have always done something like this: <% If This=True Then response.write "Test" End if %> In that case, the ASP is writing out the HTML. In some cases, it doesn't make much of a difference. However, I write most of my HTML by hand, using the Microsoft Script Editor, which does a lot of autocompletion, and makes writing raw HTML a breeze. But when I had to put out conditional HTML, I lost all of the advantages of the editor, because I was putting the HTML into a string. What's odd, is I have never run across this in ASP documentation. Once again, sorry for the OT post, but I know there are several listers out there that are either starting out in ASP, or have been using it for a while, and hopefully, this will be helpful to ya'all. Just out of curiousity, did anyone else know this? Drew _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From artful at rogers.com Fri Jan 9 14:22:52 2004 From: artful at rogers.com (Arthur Fuller) Date: Fri, 9 Jan 2004 15:22:52 -0500 Subject: [AccessD] OT: ASP Oddity In-Reply-To: <2F8793082E00D4119A1700B0D0216BF8022276FA@main2.marlow.com> Message-ID: I think so. This is mixed-language logic. A little weird first time you encounter it but quite logical IMO. Arthur -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of DWUTKA at marlow.com Sent: Thursday, January 08, 2004 2:59 PM To: AccessD at databaseadvisors.com Subject: [AccessD] OT: ASP Oddity Sorry for the OT post, but I ran into this last month, and was just flabbergasted that this worked this way. I was doing an ASP sub-contract for my sister, for a jewelry company (http://edlevinjewelry.com) . In the HTML of some of the pages, I found stuff like this: <% If so.type="merchant" then %> This is a test <% End if%> It wasn't coded (or worded, obviously) like that, but that is the gist of it. There was an If Then clause, with regular old HTML in the middle. Sure enough, if the criteria isn't met, the HTML isn't displayed. I never realized (until I saw that), that you could do that. Up until now, I have always done something like this: <% If This=True Then response.write "Test" End if %> In that case, the ASP is writing out the HTML. In some cases, it doesn't make much of a difference. However, I write most of my HTML by hand, using the Microsoft Script Editor, which does a lot of autocompletion, and makes writing raw HTML a breeze. But when I had to put out conditional HTML, I lost all of the advantages of the editor, because I was putting the HTML into a string. What's odd, is I have never run across this in ASP documentation. Once again, sorry for the OT post, but I know there are several listers out there that are either starting out in ASP, or have been using it for a while, and hopefully, this will be helpful to ya'all. Just out of curiousity, did anyone else know this? Drew _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com --- Incoming mail is certified Virus Free. Checked by AVG anti-virus system (http://www.grisoft.com). Version: 6.0.558 / Virus Database: 350 - Release Date: 1/2/2004 --- Outgoing mail is certified Virus Free. Checked by AVG anti-virus system (http://www.grisoft.com). Version: 6.0.558 / Virus Database: 350 - Release Date: 1/2/2004 From Mark.Mitsules at ngc.com Fri Jan 9 14:40:03 2004 From: Mark.Mitsules at ngc.com (Mitsules, Mark S. (Newport News)) Date: Fri, 9 Jan 2004 15:40:03 -0500 Subject: [AccessD] Access Security - Web Based ASP Message-ID: I have an existing .mdb "protected" only by an API call to GetUserName...very limited access. It contains time charging data for the entire department ("company confidential...need to know" type stuff). In the simplest of terms, what is the minimum necessary to achieve the following scenario? I would like a user to be able to access ONLY THEIR time charging data through a web page interface. Are there alternatives? Mark From DWUTKA at marlow.com Fri Jan 9 15:06:27 2004 From: DWUTKA at marlow.com (DWUTKA at marlow.com) Date: Fri, 9 Jan 2004 15:06:27 -0600 Subject: [AccessD] Access Security - Web Based ASP Message-ID: <2F8793082E00D4119A1700B0D0216BF80222770E@main2.marlow.com> With ASP, you can get the users logged in account, either with Integrated Windows Authentication, or plain text password. No need to have security on the db itself, if you don't put it into a directory 'visible' from the web. Drew -----Original Message----- From: Mitsules, Mark S. (Newport News) [mailto:Mark.Mitsules at ngc.com] Sent: Friday, January 09, 2004 2:40 PM To: '[AccessD]' Subject: [AccessD] Access Security - Web Based ASP I have an existing .mdb "protected" only by an API call to GetUserName...very limited access. It contains time charging data for the entire department ("company confidential...need to know" type stuff). In the simplest of terms, what is the minimum necessary to achieve the following scenario? I would like a user to be able to access ONLY THEIR time charging data through a web page interface. Are there alternatives? Mark _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From Mark.Mitsules at ngc.com Fri Jan 9 15:32:39 2004 From: Mark.Mitsules at ngc.com (Mitsules, Mark S. (Newport News)) Date: Fri, 9 Jan 2004 16:32:39 -0500 Subject: [AccessD] Access Security - Web Based ASP Message-ID: Thanks. I will research Integrated Windows Authentication as an option. Mark -----Original Message----- From: DWUTKA at marlow.com [mailto:DWUTKA at marlow.com] Sent: Friday, January 09, 2004 4:06 PM To: accessd at databaseadvisors.com Subject: RE: [AccessD] Access Security - Web Based ASP With ASP, you can get the users logged in account, either with Integrated Windows Authentication, or plain text password. No need to have security on the db itself, if you don't put it into a directory 'visible' from the web. Drew -----Original Message----- From: Mitsules, Mark S. (Newport News) [mailto:Mark.Mitsules at ngc.com] Sent: Friday, January 09, 2004 2:40 PM To: '[AccessD]' Subject: [AccessD] Access Security - Web Based ASP I have an existing .mdb "protected" only by an API call to GetUserName...very limited access. It contains time charging data for the entire department ("company confidential...need to know" type stuff). In the simplest of terms, what is the minimum necessary to achieve the following scenario? I would like a user to be able to access ONLY THEIR time charging data through a web page interface. Are there alternatives? Mark _______________________________________________ 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 From Erwin.Craps at ithelps.be Fri Jan 9 15:45:22 2004 From: Erwin.Craps at ithelps.be (Erwin Craps - IT Helps) Date: Fri, 9 Jan 2004 22:45:22 +0100 Subject: [AccessD] Access Security - Web Based ASP Message-ID: <46B976F2B698FF46A4FE7636509B22DF03D0E7@stekelbes.ithelps.local> I have a small little trick I used for same reasons. I'm using a seperate MDB file which has linked tables to the backend database. Only the tables I really need are in the WEB database. If it ain't there you can get in.... But I supose that you the data of the people are all in the same table. You need a password system to login via the web, these user/password are stored in a table in your db. When a correct match you store the ID of the person into the session. If you build SQL string than you always use the persons ID stored in the session. So don't use any parameters with the URL string for person identification. You should be reasonably safe with that, but not 100%, you never are 100% safe.... Erwin -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Mitsules, Mark S. (Newport News) Sent: Friday, January 09, 2004 10:33 PM To: 'Access Developers discussion and problem solving' Subject: RE: [AccessD] Access Security - Web Based ASP Thanks. I will research Integrated Windows Authentication as an option. Mark -----Original Message----- From: DWUTKA at marlow.com [mailto:DWUTKA at marlow.com] Sent: Friday, January 09, 2004 4:06 PM To: accessd at databaseadvisors.com Subject: RE: [AccessD] Access Security - Web Based ASP With ASP, you can get the users logged in account, either with Integrated Windows Authentication, or plain text password. No need to have security on the db itself, if you don't put it into a directory 'visible' from the web. Drew -----Original Message----- From: Mitsules, Mark S. (Newport News) [mailto:Mark.Mitsules at ngc.com] Sent: Friday, January 09, 2004 2:40 PM To: '[AccessD]' Subject: [AccessD] Access Security - Web Based ASP I have an existing .mdb "protected" only by an API call to GetUserName...very limited access. It contains time charging data for the entire department ("company confidential...need to know" type stuff). In the simplest of terms, what is the minimum necessary to achieve the following scenario? I would like a user to be able to access ONLY THEIR time charging data through a web page interface. Are there alternatives? Mark _______________________________________________ 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 _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From artful at rogers.com Fri Jan 9 17:07:25 2004 From: artful at rogers.com (Arthur Fuller) Date: Fri, 9 Jan 2004 18:07:25 -0500 Subject: [AccessD] Outlook.pst Hosed In-Reply-To: Message-ID: I sent a message on this subject a few days ago, but maybe I missed its posting. At any rate, a sudden power outage hosed my PST file and now I can read some of it but cannot send or receive. Further, when I try to extract the contents using Access I can get only a few of the (numerous) folders. Ideas? TIA, Arthur --- Outgoing mail is certified Virus Free. Checked by AVG anti-virus system (http://www.grisoft.com). Version: 6.0.558 / Virus Database: 350 - Release Date: 1/2/2004 From martyconnelly at shaw.ca Fri Jan 9 17:46:49 2004 From: martyconnelly at shaw.ca (MartyConnelly) Date: Fri, 09 Jan 2004 15:46:49 -0800 Subject: [AccessD] Outlook.pst Hosed References: Message-ID: <3FFF3D69.7090702@shaw.ca> This shows you how to use Scanpst.exe to repair it if possible http://www.slipstick.com/problems/scanpst.htm If your PST goes above 2 gig this will muck it up too. Arthur Fuller wrote: >I sent a message on this subject a few days ago, but maybe I missed its >posting. At any rate, a sudden power outage hosed my PST file and now I can >read some of it but cannot send or receive. Further, when I try to extract >the contents using Access I can get only a few of the (numerous) folders. > >Ideas? > >TIA, >Arthur > >--- >Outgoing mail is certified Virus Free. >Checked by AVG anti-virus system (http://www.grisoft.com). >Version: 6.0.558 / Virus Database: 350 - Release Date: 1/2/2004 > > >_______________________________________________ >AccessD mailing list >AccessD at databaseadvisors.com >http://databaseadvisors.com/mailman/listinfo/accessd >Website: http://www.databaseadvisors.com > > > -- Marty Connelly Victoria, B.C. Canada From drboz at pacbell.net Fri Jan 9 18:03:29 2004 From: drboz at pacbell.net (Don Bozarth) Date: Fri, 9 Jan 2004 16:03:29 -0800 Subject: [AccessD] Outlook.pst Hosed References: Message-ID: <004101c3d70d$2da83190$6501a8c0@don> Arthur, Try the .pst repair tool (scanpst.exe) normally located in \program files\common files\system\mapi\1033\NT. This puppy scans the .pst and will fix most (but not all) errors. Don B. ----- Original Message ----- From: "Arthur Fuller" To: "Access Developers discussion and problem solving" Sent: Friday, January 09, 2004 3:07 PM Subject: [AccessD] Outlook.pst Hosed > I sent a message on this subject a few days ago, but maybe I missed its > posting. At any rate, a sudden power outage hosed my PST file and now I can > read some of it but cannot send or receive. Further, when I try to extract > the contents using Access I can get only a few of the (numerous) folders. > > Ideas? > > TIA, > Arthur > > --- > Outgoing mail is certified Virus Free. > Checked by AVG anti-virus system (http://www.grisoft.com). > Version: 6.0.558 / Virus Database: 350 - Release Date: 1/2/2004 > > > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com > From stuart at lexacorp.com.pg Fri Jan 9 20:51:10 2004 From: stuart at lexacorp.com.pg (Stuart McLachlan) Date: Sat, 10 Jan 2004 12:51:10 +1000 Subject: [AccessD] Best API references In-Reply-To: <20040109105316.5324B2566A4@smithers.nildram.co.uk> Message-ID: <3FFFF53E.9392.936045@localhost> On 9 Jan 2004 at 10:53, Andy Lacey wrote: > What web site(s) do any of you use as a reference for API calls, and how to > use them from VBA? Lambert recently sent me some useful tips on the use of > SHBrowseFolder and others among you have given detailed info on other API > calls. But how do you know this stuff? Where can I go to find out for > myself? Sites like Dev's 'The Access Web' have some great stuff, but not a > comprehensive list. > -- To get the VB/VBA declarations grab APIViewer from http://www.mentalis.org/agnet/apiviewer.shtml For a comprehensive set of references download: ftp://ftp.borland.com/pub/bcppbuilder/techpubs/bcb5/b5ms.zip It's a 17MB download which contains: Microsoft Programmer's Guide to Windows 95 95GUIDE.HLP Microsoft Knowledge Base KBASE.HLP Microsoft Win32 Message (MAPI) Reference MAPI.HLP MIDL Programmer's Reference MIDL.HLP ISAPI Programmer's Reference MISAPI.HLP Multimedia Programmer's Reference MMEDIA.HLP OLE 2.0 Programmer's Reference OLE.HLP OpenGL Programmer's Reference OPENGL.HLP MS Windows Performance Data Helper Reference PDH.HLP MS Windows Pen API Programmer's Reference PENAPI.HLP Win32 Programming Techniques PROGTECH.HLP Remote Procedure Calls Reference RPC.HLP MS Windows Setup API Programmer's Reference SETUPAPI.HLP MS Windows Sockets 2 Reference SOCK2.HLP MS Windows Telephony API Programmer's Reference TAPI.HLP Win32 Programmer's Reference WIN32.HLP Win32s Programmer's Reference WIN32S.HLP Multimedia API Reference MM.HLP Microsoft Windows Developer's Guide GUIDE.HLP Microsoft Tools Reference MSTOOLS.HLP Resource Compiler User's Guide RC.HLP -- Lexacorp Ltd http://www.lexacorp.com.pg Information Technology Consultancy, Software Development,System Support. From kost36 at otenet.gr Sat Jan 10 01:12:24 2004 From: kost36 at otenet.gr (Kostas Konstantinidis) Date: Sat, 10 Jan 2004 09:12:24 +0200 Subject: [AccessD] e-mailing to all the people at the same time References: <2F8793082E00D4119A1700B0D0216BF8022276DA@main2.marlow.com> <007a01c3d5a8$123d86f0$0100a8c0@kost36> Message-ID: <005c01c3d749$1b59cbc0$0100a8c0@kost36> Marty and Erwin, thank's for your help Kostas Konstantinidis From andrew.haslett at ilc.gov.au Sat Jan 10 04:00:07 2004 From: andrew.haslett at ilc.gov.au (Haslett, Andrew) Date: Sat, 10 Jan 2004 20:30:07 +1030 Subject: [AccessD] OT: ASP Oddity (Context Switching) Message-ID: http://msdn.microsoft.com/library/default.asp?URL=/library/en-us/dnasp/html/ ASPtips.asp -----Original Message----- From: Mitsules, Mark S. (Newport News) [mailto:Mark.Mitsules at ngc.com] Sent: Saturday, 10 January 2004 3:20 AM To: 'Access Developers discussion and problem solving' Subject: RE: [AccessD] OT: ASP Oddity (Context Switching) I tried a very quick search yesterday on that quoted title...didn't come across it. Don't spend any time on it, but if someone does find the article for their own purposes, I'd appreciate a link. Mark -----Original Message----- From: DWUTKA at marlow.com [mailto:DWUTKA at marlow.com] Sent: Friday, January 09, 2004 11:39 AM To: accessd at databaseadvisors.com Subject: RE: [AccessD] OT: ASP Oddity (Context Switching) Never saw that article. Drew -----Original Message----- From: Haslett, Andrew [mailto:andrew.haslett at ilc.gov.au] Sent: Friday, January 09, 2004 5:37 AM To: 'Access Developers discussion and problem solving' Subject: RE: [AccessD] OT: ASP Oddity (Context Switching) Yeah there was a big argument regarding 'context-switching' in the asp community, especially with ASP2.0. The performance difference in ASP3.0 is negligible so it really boils down to your preference, what is easier to read/debug etc. I think the infamous MS article "Top 25 techniques for ASP" or the like included a statement about context switching, although a couple of the issues raised in that article were debateable. Cheers, Andrew -----Original Message----- From: DWUTKA at marlow.com [mailto:DWUTKA at marlow.com] Sent: Friday, 9 January 2004 6:29 AM To: AccessD at databaseadvisors.com Subject: [AccessD] OT: ASP Oddity Sorry for the OT post, but I ran into this last month, and was just flabbergasted that this worked this way. I was doing an ASP sub-contract for my sister, for a jewelry company (http://edlevinjewelry.com) . In the HTML of some of the pages, I found stuff like this: <% If so.type="merchant" then %> This is a test <% End if%> It wasn't coded (or worded, obviously) like that, but that is the gist of it. There was an If Then clause, with regular old HTML in the middle. Sure enough, if the criteria isn't met, the HTML isn't displayed. I never realized (until I saw that), that you could do that. Up until now, I have always done something like this: <% If This=True Then response.write "Test" End if %> In that case, the ASP is writing out the HTML. In some cases, it doesn't make much of a difference. However, I write most of my HTML by hand, using the Microsoft Script Editor, which does a lot of autocompletion, and makes writing raw HTML a breeze. But when I had to put out conditional HTML, I lost all of the advantages of the editor, because I was putting the HTML into a string. What's odd, is I have never run across this in ASP documentation. Once again, sorry for the OT post, but I know there are several listers out there that are either starting out in ASP, or have been using it for a while, and hopefully, this will be helpful to ya'all. Just out of curiousity, did anyone else know this? Drew _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com IMPORTANT - PLEASE READ ******************** This email and any files transmitted with it are confidential and may contain information protected by law from disclosure. If you have received this message in error, please notify the sender immediately and delete this email from your system. No warranty is given that this email or files, if attached to this email, are free from computer viruses or other defects. They are provided on the basis the user assumes all responsibility for loss, damage or consequence resulting directly or indirectly from their use, whether caused by the negligence of the sender or not. _______________________________________________ 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 _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com IMPORTANT - PLEASE READ ******************** This email and any files transmitted with it are confidential and may contain information protected by law from disclosure. If you have received this message in error, please notify the sender immediately and delete this email from your system. No warranty is given that this email or files, if attached to this email, are free from computer viruses or other defects. They are provided on the basis the user assumes all responsibility for loss, damage or consequence resulting directly or indirectly from their use, whether caused by the negligence of the sender or not. From andy at minstersystems.co.uk Sat Jan 10 10:13:31 2004 From: andy at minstersystems.co.uk (Andy Lacey) Date: Sat, 10 Jan 2004 16:13:31 -0000 Subject: [AccessD] Best API references In-Reply-To: <3FFFF53E.9392.936045@localhost> Message-ID: <018001c3d794$b0c44410$b274d0d5@minster33c3r25> Thanks to everyone for ideas on API info. I'll be looking at all your suggestions. Andy Lacey http://www.minstersystems.co.uk > -----Original Message----- > From: accessd-bounces at databaseadvisors.com > [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of > Stuart McLachlan > Sent: 10 January 2004 02:51 > To: Access Developers discussion and problem solving > Subject: Re: [AccessD] Best API references > > > On 9 Jan 2004 at 10:53, Andy Lacey wrote: > > > What web site(s) do any of you use as a reference for API > calls, and > > how to use them from VBA? Lambert recently sent me some > useful tips on > > the use of SHBrowseFolder and others among you have given detailed > > info on other API calls. But how do you know this stuff? > Where can I > > go to find out for myself? Sites like Dev's 'The Access > Web' have some > > great stuff, but not a comprehensive list. > > -- > > To get the VB/VBA declarations grab APIViewer from > http://www.mentalis.org/agnet/apiviewer.shtml > > For a comprehensive set of references download: > ftp://ftp.borland.com/pub/bcppbuilder/techpubs/bcb5/b5ms.zip > > It's a 17MB download which contains: > Microsoft Programmer's Guide to Windows 95 95GUIDE.HLP > Microsoft Knowledge Base KBASE.HLP > Microsoft Win32 Message (MAPI) Reference MAPI.HLP > MIDL Programmer's Reference MIDL.HLP > ISAPI Programmer's Reference MISAPI.HLP > Multimedia Programmer's Reference MMEDIA.HLP > OLE 2.0 Programmer's Reference OLE.HLP > OpenGL Programmer's Reference OPENGL.HLP > MS Windows Performance Data Helper Reference PDH.HLP > MS Windows Pen API Programmer's Reference PENAPI.HLP > Win32 Programming Techniques PROGTECH.HLP > Remote Procedure Calls Reference RPC.HLP > MS Windows Setup API Programmer's Reference SETUPAPI.HLP > MS Windows Sockets 2 Reference SOCK2.HLP > MS Windows Telephony API Programmer's Reference TAPI.HLP > Win32 Programmer's Reference WIN32.HLP > Win32s Programmer's Reference WIN32S.HLP > Multimedia API Reference MM.HLP > Microsoft Windows Developer's Guide GUIDE.HLP > Microsoft Tools Reference MSTOOLS.HLP > Resource Compiler User's Guide RC.HLP > > > -- > Lexacorp Ltd > http://www.lexacorp.com.pg > Information Technology Consultancy, Software Development,System > Support. > > > > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/a> ccessd > Website: > http://www.databaseadvisors.com > > From rbgajewski at adelphia.net Sat Jan 10 17:06:01 2004 From: rbgajewski at adelphia.net (Bob Gajewski) Date: Sat, 10 Jan 2004 18:06:01 -0500 Subject: [AccessD] Populate a form with a list of streets In-Reply-To: <001601c3c1c4$7fbefe40$6101a8c0@dejpolsys> Message-ID: Dear List: I have an A2K database that has two tables: tblCardex PK CardexID Autonumber CardexHouseNumber Long FK CardexStreetID Long tblStreets PK StreetID Autonumber StreetName Text The Cardex is a list of addresses, using an index of STREETNAME, HOUSENUMBER as the default sort. I want to allow users to automatically advance to the first record (lowest house number) for any desired street (name). Right now, I have a command button that they can click to popup a modal form listing all of the streets (in alphabetical order) with the record number of the first (lowest) house number; after closing the form, they navigate using the F5 function to input the record number. Not only is this cheap and sloppy, addresses get added quite often and the record numbers keep changing. Should I be using a combobox of the streets to perform this navigation? If so, a push in right CBF direction would be greatly appreciated! TIA, Bob Gajewski --------------------------------------------------------------------- Eliminate annoying spam! My mailbox is protected by iHateSpam, the #1-rated spam buster. http://www.ihatespam.net From martyconnelly at shaw.ca Sat Jan 10 20:03:36 2004 From: martyconnelly at shaw.ca (MartyConnelly) Date: Sat, 10 Jan 2004 18:03:36 -0800 Subject: [AccessD] Populate a form with a list of streets References: Message-ID: <4000AEF8.6010005@shaw.ca> I don't know if this will suit you but how about cascading comboboxes see http://www.rogersaccesslibrary.com/TableOfContents2k.asp for a couple of samples. Bob Gajewski wrote: >Dear List: > >I have an A2K database that has two tables: > > tblCardex > PK CardexID Autonumber > CardexHouseNumber Long > FK CardexStreetID Long > > tblStreets > PK StreetID Autonumber > StreetName Text > >The Cardex is a list of addresses, using an index of STREETNAME, HOUSENUMBER >as the default sort. > >I want to allow users to automatically advance to the first record (lowest >house number) for any desired street (name). Right now, I have a command >button that they can click to popup a modal form listing all of the streets >(in alphabetical order) with the record number of the first (lowest) house >number; after closing the form, they navigate using the F5 function to input >the record number. Not only is this cheap and sloppy, addresses get added >quite often and the record numbers keep changing. Should I be using a >combobox of the streets to perform this navigation? If so, a push in right >CBF direction would be greatly appreciated! > >TIA, > >Bob Gajewski > > > >--------------------------------------------------------------------- >Eliminate annoying spam! > >My mailbox is protected by iHateSpam, the #1-rated spam buster. >http://www.ihatespam.net > > > >_______________________________________________ >AccessD mailing list >AccessD at databaseadvisors.com >http://databaseadvisors.com/mailman/listinfo/accessd >Website: http://www.databaseadvisors.com > > > -- Marty Connelly Victoria, B.C. Canada From starkey at wanadoo.nl Sun Jan 11 10:35:58 2004 From: starkey at wanadoo.nl (StaRKeY) Date: Sun, 11 Jan 2004 17:35:58 +0100 Subject: [AccessD] Database growth Message-ID: Hi all, One question: - Do linked tables also make the host mdb file grow? I figure it's only the tables (linked or not) that are being filled with data which make a mdb file grow but maybe there are other reasons? Regards, Eric Starkenburg --- avast! Antivirus: Outbound message clean. Virus Database (VPS): 8-1-2004 Tested on: 11-1-2004 17:35:58 avast! is copyright (c) 2000-2003 ALWIL Software. http://www.avast.com From wdhindman at bellsouth.net Sun Jan 11 12:22:05 2004 From: wdhindman at bellsouth.net (William Hindman) Date: Sun, 11 Jan 2004 13:22:05 -0500 Subject: [AccessD] Database growth References: Message-ID: <003201c3d86f$d0fb5e90$6101a8c0@dejpolsys> ...are you on XP? William Hindman - Next Year In The Free State! ----- Original Message ----- From: "StaRKeY" To: "AccessD at databaseadvisors. com" Sent: Sunday, January 11, 2004 11:35 AM Subject: [AccessD] Database growth > Hi all, > > One question: > - Do linked tables also make the host mdb file grow? > > I figure it's only the tables (linked or not) that are being filled with > data which make a mdb file grow but maybe there are other reasons? > > > Regards, > Eric Starkenburg > > > > --- > avast! Antivirus: Outbound message clean. > Virus Database (VPS): 8-1-2004 > Tested on: 11-1-2004 17:35:58 > avast! is copyright (c) 2000-2003 ALWIL Software. > http://www.avast.com > > > > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com > From starkey at wanadoo.nl Sun Jan 11 13:48:27 2004 From: starkey at wanadoo.nl (StaRKeY) Date: Sun, 11 Jan 2004 20:48:27 +0100 Subject: [AccessD] Database growth In-Reply-To: <003201c3d86f$d0fb5e90$6101a8c0@dejpolsys> Message-ID: Hi William, no on 2K. -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of William Hindman Sent: zondag 11 januari 2004 19:22 To: Access Developers discussion and problem solving Subject: Re: [AccessD] Database growth ...are you on XP? William Hindman - Next Year In The Free State! ----- Original Message ----- From: "StaRKeY" To: "AccessD at databaseadvisors. com" Sent: Sunday, January 11, 2004 11:35 AM Subject: [AccessD] Database growth > Hi all, > > One question: > - Do linked tables also make the host mdb file grow? > > I figure it's only the tables (linked or not) that are being filled with > data which make a mdb file grow but maybe there are other reasons? > > > Regards, > Eric Starkenburg > > > > --- > avast! Antivirus: Outbound message clean. > Virus Database (VPS): 8-1-2004 > Tested on: 11-1-2004 17:35:58 > avast! is copyright (c) 2000-2003 ALWIL Software. > http://www.avast.com > > > > _______________________________________________ > 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 --- avast! Antivirus: Outbound message clean. Virus Database (VPS): 8-1-2004 Tested on: 11-1-2004 20:48:27 avast! is copyright (c) 2000-2003 ALWIL Software. http://www.avast.com From ssharkins at bellsouth.net Sun Jan 11 20:25:07 2004 From: ssharkins at bellsouth.net (Susan Harkins) Date: Sun, 11 Jan 2004 21:25:07 -0500 Subject: [AccessD] error questions Message-ID: <006f01c3d8b3$b90edb10$210110ac@SUSANONE> Any of you work with a generic error-handler for an entire module or perhaps even a public function instead of repeating possibilities in individual functions? Repeating error solutions and it seems inefficient. Susan H. From jwcolby at colbyconsulting.com Sun Jan 11 21:57:06 2004 From: jwcolby at colbyconsulting.com (John W. Colby) Date: Sun, 11 Jan 2004 22:57:06 -0500 Subject: [AccessD] error questions In-Reply-To: <006f01c3d8b3$b90edb10$210110ac@SUSANONE> Message-ID: Susan, The problem with that perspective is that the function that handles the error knows the context of the error, i.e. specifically what the program was doing at the time it happened. Sure, a "disk full" is a disk full regardless, but even then it may be on a zip where you want to prompt the user to change disks or something. OTOH, a "can't save the record because a field doesn't meet the criteria" is very specific to the table / field / form etc. I have a generic error handler but it is only to handle things like jet errors that occur during a query when other error handlers fail to trap the error. Things like that. John W. Colby www.ColbyConsulting.com -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Susan Harkins Sent: Sunday, January 11, 2004 9:25 PM To: AccessD at databaseadvisors.com Subject: [AccessD] error questions Any of you work with a generic error-handler for an entire module or perhaps even a public function instead of repeating possibilities in individual functions? Repeating error solutions and it seems inefficient. Susan H. _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From paul.hartland at fsmail.net Mon Jan 12 03:09:33 2004 From: paul.hartland at fsmail.net (paul.hartland at fsmail.net) Date: Mon, 12 Jan 2004 10:09:33 +0100 (CET) Subject: [AccessD] [dba-VB] Multiple-step operation generated errors - check each status value Message-ID: <16471030.1073898573219.JavaMail.www@wwinf3004> I'm a little puzzled now, I have just tried removing those lines of code from my program and I still get the Multiple step operation error ????, and it looks like it's the Ethnicity field. Anyone have a possible solution to this. Thanks in advance. Paul Hartland Message date : Jan 09 2004, 02:20 PM >From : Mike & Doris Manning To : 'Access Developers discussion and problem solving' Copy to : Subject : RE: RE: [AccessD] [dba-VB] Multiple-step operation generated errors - check each status value Look at your comparison, you are comparing to vbnullstring ("") and not 0. Also you are trying to store a string into an int -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of paul.hartland at fsmail.net Sent: Friday, January 09, 2004 8:16 AM To: Access Developers discussion and problem solving Subject: Re: RE: [AccessD] [dba-VB] Multiple-step operation generated errors - check each status value I know, but surely the tinyint data type accepts zero's or am I still missing something ? Message date : Jan 09 2004, 01:04 PM >From : Mike & Doris Manning To : 'Access Developers discussion and problem solving' Copy to : Subject : RE: [AccessD] [dba-VB] Multiple-step operation generated errors - check each status value A combo box bound to an Integer field will have a 0 after the user deletes the entry. Doris Manning Database Administrator Hargrove Inc. www.hargroveinc.com -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of paul.hartland at fsmail.net Sent: Friday, January 09, 2004 5:24 AM To: dba-vb Cc: accessd Subject: [AccessD] [dba-VB] Multiple-step operation generated errors - check each status value To all, I have a Visual Basic 6 FE which is connecting to a SQL Server 7.0 BE. One of my fields is called EthnicOrigin which is a TinyInt data type, which also allows Null. The control on the form is a DataCombo, with the list field being Ethnicity and the BoundColumn being EthnicityID. When a user selects an Ethnicity all is well no problem with updating etc as the EthnicityID is entered into the Field and the DataCombo display the Ethnicity. If the user deletes the entry from EthnicOrigin then when the record tries to update I get the error Multiple-step operation generated errors - check each status value Below is the code for updating: With rsPersonnel If (frmOrrPersonnel.PVEthnic <> "") Then .Fields("EthnicOrigin") = frmOrrPersonnel.PVEthnic.BoundText Else .Fields("EthnicOrigin") = 0 End If .Update End With Can anyone tell me what I am doing wrong ? Thanks in advance for any help as this is really starting to frustrate me. Paul Hartland Freeserve AnyTime - HALF PRICE for the first 3 months - Save ?7.50 a month www.freeserve.com/anytime _______________________________________________ dba-VB mailing list dba-VB at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/dba-vb http://www.databaseadvisors.com _______________________________________________ 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 Freeserve AnyTime - HALF PRICE for the first 3 months - Save ?7.50 a month www.freeserve.com/anytime _______________________________________________ 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 Freeserve AnyTime - HALF PRICE for the first 3 months - Save ?7.50 a month www.freeserve.com/anytime From LChristian at MassMutual.com Mon Jan 12 05:51:52 2004 From: LChristian at MassMutual.com (Christian, Lorraine) Date: Mon, 12 Jan 2004 06:51:52 -0500 Subject: [AccessD] Outlook SP3 Message-ID: <5B898D9F0627974EB82D0645E52B1E7D035CBA6B@EXMBPR03.na.mmfg.net> Hi - I have a 2000 Access database that fires off an automatic email. Everything was working fine until I upgraded Outlook to SP3. The code that creates the email message returns this error. "A program is trying to access e-mail addresses you have stored in Outlook. Do you want to allow this? If this is unexpected, it may be a virus and you should choose "No"." There is also a check box on the message that says Allow access for and then you choose the amount of time. Below is the code I am using: Private Sub cmdPositiveEmail_Click() If txtEmailDate.Value <> " " Then MsgBox "Email was already sent on " & Format(txtEmailDate.Value, "mm/dd/yyyy"), vbOKOnly Else Call SendPositiveMessage(False) txtEmailDate.Value = Now() txtTypeOfEmail.Value = "Without Errors" End If End Sub Private Sub SendPositiveMessage(DisplayMsg As Boolean) Dim objOutlook As Object Dim objOutlookMsg As Object Dim i As Integer Dim strTo As String Dim strSubject As String Dim strBody As String On Error GoTo errorhandler 'On Error Resume Next ' Create the Outlook session. Set objOutlook = CreateObject("Outlook.Application") ' Create the message. Set objOutlookMsg = objOutlook.CreateItem(olMailItem) ' Retrieves the value from the txtCAName on the form and is assigned ' to the variable myTo to be used in an Outlook message. strTo = Me.txtCAName.Value ' Retrieves the value from the txtCIPolNo on the form and is assigned ' to the variable mySubject to be used in an Outlook message. strSubject = "Quality Assurance Results: Policy #: " & txtCIPolNo.Value ' Assigns' variable myBody to be used in an Outlook message. strBody = "This case was processed correctly and met all expectations and guidelines." & vbNewLine & vbNewLine & _ "Great job!. " With objOutlookMsg .To = strTo .Recipients.ResolveAll .Subject = strSubject .Body = strBody .Importance = olImportanceHigh .PrintOut .Send End With Set objOutlook = Nothing Set objOutlookMsg = Nothing MsgBox "Message sent successfully...", vbOKOnly, "Email Notification" cmdMainDetail.SetFocus Exit Sub errorhandler: MsgBox "Outlook could not find sender's name.", vbOKOnly + vbCritical, "Outlook Message" With objOutlookMsg .Display End With Set objOutlook = Nothing Set objOutlookMsg = Nothing MsgBox "Message sent successfully...", vbOKOnly, "Email Notification" cmdMainDetail.SetFocus cmdEmail.Visible = True cmdSend.Visible = False cmdPositiveEmail.ForeColor = vbBlack Exit Sub End Sub I believe the message is a precaution set up through Microsoft that comes with SP3. My problem is that I have to click this message several times until my code continues to run. I believe that it is trying to access address book on .resolveall and .send. Not sure how I can fix this problem. I can live with clicking "Yes" once, but would like if the message does not appear at all. Does any one know how to get around this? Thanks in advance. Lorraine Christian MassMutual Financial Group New Business Operations 413.744.5335 lchristian at massmutual.com --------------------------------------------------------- This e-mail transmission may contain information that is proprietary, privileged and/or confidential and is intended exclusively for the person(s) to whom it is addressed. Any use, copying, retention or disclosure by any person other than the intended recipient or the intended recipient's designees is strictly prohibited. If you are not the intended recipient or their designee, please notify the sender immediately by return e-mail and delete all copies. --------------------------------------------------------- From bheid at appdevgrp.com Mon Jan 12 06:22:25 2004 From: bheid at appdevgrp.com (Bobby Heid) Date: Mon, 12 Jan 2004 07:22:25 -0500 Subject: [AccessD] Outlook SP3 In-Reply-To: <916187228923D311A6FE00A0CC3FAA3072A163@ADGSERVER> Message-ID: <916187228923D311A6FE00A0CC3FAA305BB16C@ADGSERVER> Ahhh, the great MS Outlook security gotcha. I believe that if you are on an Exchange system, that your Exchange administrator can set it up so that your account (or the one the application is using) can bypass the security stuff. Look at www.slipstick.com for much more information on this. Also look at http://www.dimastr.com/redemption/ for the Redemption package that lets you bypass the security stuff. BTW, you get to work too early. LOL. HTH, Bobby -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Christian, Lorraine Sent: Monday, January 12, 2004 6:52 AM To: Access Developers discussion and problem solving Subject: [AccessD] Outlook SP3 Hi - I have a 2000 Access database that fires off an automatic email. Everything was working fine until I upgraded Outlook to SP3. The code that creates the email message returns this error. "A program is trying to access e-mail addresses you have stored in Outlook. Do you want to allow this? If this is unexpected, it may be a virus and you should choose "No"." There is also a check box on the message that says Allow access for and then you choose the amount of time. Below is the code I am using: Private Sub cmdPositiveEmail_Click() If txtEmailDate.Value <> " " Then MsgBox "Email was already sent on " & Format(txtEmailDate.Value, "mm/dd/yyyy"), vbOKOnly Else Call SendPositiveMessage(False) txtEmailDate.Value = Now() txtTypeOfEmail.Value = "Without Errors" End If End Sub Private Sub SendPositiveMessage(DisplayMsg As Boolean) Dim objOutlook As Object Dim objOutlookMsg As Object Dim i As Integer Dim strTo As String Dim strSubject As String Dim strBody As String On Error GoTo errorhandler 'On Error Resume Next ' Create the Outlook session. Set objOutlook = CreateObject("Outlook.Application") ' Create the message. Set objOutlookMsg = objOutlook.CreateItem(olMailItem) ' Retrieves the value from the txtCAName on the form and is assigned ' to the variable myTo to be used in an Outlook message. strTo = Me.txtCAName.Value ' Retrieves the value from the txtCIPolNo on the form and is assigned ' to the variable mySubject to be used in an Outlook message. strSubject = "Quality Assurance Results: Policy #: " & txtCIPolNo.Value ' Assigns' variable myBody to be used in an Outlook message. strBody = "This case was processed correctly and met all expectations and guidelines." & vbNewLine & vbNewLine & _ "Great job!. " With objOutlookMsg .To = strTo .Recipients.ResolveAll .Subject = strSubject .Body = strBody .Importance = olImportanceHigh .PrintOut .Send End With Set objOutlook = Nothing Set objOutlookMsg = Nothing MsgBox "Message sent successfully...", vbOKOnly, "Email Notification" cmdMainDetail.SetFocus Exit Sub errorhandler: MsgBox "Outlook could not find sender's name.", vbOKOnly + vbCritical, "Outlook Message" With objOutlookMsg .Display End With Set objOutlook = Nothing Set objOutlookMsg = Nothing MsgBox "Message sent successfully...", vbOKOnly, "Email Notification" cmdMainDetail.SetFocus cmdEmail.Visible = True cmdSend.Visible = False cmdPositiveEmail.ForeColor = vbBlack Exit Sub End Sub I believe the message is a precaution set up through Microsoft that comes with SP3. My problem is that I have to click this message several times until my code continues to run. I believe that it is trying to access address book on .resolveall and .send. Not sure how I can fix this problem. I can live with clicking "Yes" once, but would like if the message does not appear at all. Does any one know how to get around this? Thanks in advance. Lorraine Christian MassMutual Financial Group New Business Operations 413.744.5335 lchristian at massmutual.com --------------------------------------------------------- This e-mail transmission may contain information that is proprietary, privileged and/or confidential and is intended exclusively for the person(s) to whom it is addressed. Any use, copying, retention or disclosure by any person other than the intended recipient or the intended recipient's designees is strictly prohibited. If you are not the intended recipient or their designee, please notify the sender immediately by return e-mail and delete all copies. --------------------------------------------------------- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From mikedorism at adelphia.net Mon Jan 12 06:25:33 2004 From: mikedorism at adelphia.net (Mike & Doris Manning) Date: Mon, 12 Jan 2004 07:25:33 -0500 Subject: [AccessD] error questions In-Reply-To: <006f01c3d8b3$b90edb10$210110ac@SUSANONE> Message-ID: <000001c3d907$2cef8900$8b194244@hargrove.internal> John is right that you wouldn't always want to do this because sometimes it is better to handle the issue within the calling procedure or function. However, I do handle some of the more common errors (such as lost SQL connection or printer problems) within my generic error handling function because that made more sense to me. Doris Manning Database Administrator Hargrove Inc. www.hargroveinc.com -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Susan Harkins Sent: Sunday, January 11, 2004 9:25 PM To: AccessD at databaseadvisors.com Subject: [AccessD] error questions Any of you work with a generic error-handler for an entire module or perhaps even a public function instead of repeating possibilities in individual functions? Repeating error solutions and it seems inefficient. Susan H. _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From bheid at appdevgrp.com Mon Jan 12 06:26:12 2004 From: bheid at appdevgrp.com (Bobby Heid) Date: Mon, 12 Jan 2004 07:26:12 -0500 Subject: [AccessD] Outlook.pst Hosed In-Reply-To: <916187228923D311A6FE00A0CC3FAA30729D84@ADGSERVER> Message-ID: <916187228923D311A6FE00A0CC3FAA305BB16D@ADGSERVER> I just recently had an archive PST file that was at about 450MB and about 60,000 e-mails all of a sudden saying it had about 2000 e-mails. After backing it up, I ran scanpst and it said that there were no problems. After compacting the PST, I only had 8MB. I had to restore back to a 12/10/03 backup, which thoroughly sucked. Bobby -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Don Bozarth Sent: Friday, January 09, 2004 7:03 PM To: Access Developers discussion and problem solving Subject: Re: [AccessD] Outlook.pst Hosed Arthur, Try the .pst repair tool (scanpst.exe) normally located in \program files\common files\system\mapi\1033\NT. This puppy scans the .pst and will fix most (but not all) errors. Don B. ----- Original Message ----- From: "Arthur Fuller" To: "Access Developers discussion and problem solving" Sent: Friday, January 09, 2004 3:07 PM Subject: [AccessD] Outlook.pst Hosed > I sent a message on this subject a few days ago, but maybe I missed > its posting. At any rate, a sudden power outage hosed my PST file and > now I can > read some of it but cannot send or receive. Further, when I try to > extract the contents using Access I can get only a few of the > (numerous) folders. > > Ideas? > > TIA, > Arthur > > --- > Outgoing mail is certified Virus Free. > Checked by AVG anti-virus system (http://www.grisoft.com). > Version: 6.0.558 / Virus Database: 350 - Release Date: 1/2/2004 > > > _______________________________________________ > 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 From Mark.Mitsules at ngc.com Mon Jan 12 06:52:09 2004 From: Mark.Mitsules at ngc.com (Mitsules, Mark S. (Newport News)) Date: Mon, 12 Jan 2004 07:52:09 -0500 Subject: [AccessD] OT: ASP Oddity (Context Switching) Message-ID: Thank you Andrew. Mark -----Original Message----- From: Haslett, Andrew [mailto:andrew.haslett at ilc.gov.au] Sent: Saturday, January 10, 2004 5:00 AM To: 'Access Developers discussion and problem solving' Subject: RE: [AccessD] OT: ASP Oddity (Context Switching) http://msdn.microsoft.com/library/default.asp?URL=/library/en-us/dnasp/html/ ASPtips.asp -----Original Message----- From: Mitsules, Mark S. (Newport News) [mailto:Mark.Mitsules at ngc.com] Sent: Saturday, 10 January 2004 3:20 AM To: 'Access Developers discussion and problem solving' Subject: RE: [AccessD] OT: ASP Oddity (Context Switching) I tried a very quick search yesterday on that quoted title...didn't come across it. Don't spend any time on it, but if someone does find the article for their own purposes, I'd appreciate a link. Mark -----Original Message----- From: DWUTKA at marlow.com [mailto:DWUTKA at marlow.com] Sent: Friday, January 09, 2004 11:39 AM To: accessd at databaseadvisors.com Subject: RE: [AccessD] OT: ASP Oddity (Context Switching) Never saw that article. Drew -----Original Message----- From: Haslett, Andrew [mailto:andrew.haslett at ilc.gov.au] Sent: Friday, January 09, 2004 5:37 AM To: 'Access Developers discussion and problem solving' Subject: RE: [AccessD] OT: ASP Oddity (Context Switching) Yeah there was a big argument regarding 'context-switching' in the asp community, especially with ASP2.0. The performance difference in ASP3.0 is negligible so it really boils down to your preference, what is easier to read/debug etc. I think the infamous MS article "Top 25 techniques for ASP" or the like included a statement about context switching, although a couple of the issues raised in that article were debateable. Cheers, Andrew -----Original Message----- From: DWUTKA at marlow.com [mailto:DWUTKA at marlow.com] Sent: Friday, 9 January 2004 6:29 AM To: AccessD at databaseadvisors.com Subject: [AccessD] OT: ASP Oddity Sorry for the OT post, but I ran into this last month, and was just flabbergasted that this worked this way. I was doing an ASP sub-contract for my sister, for a jewelry company (http://edlevinjewelry.com) . In the HTML of some of the pages, I found stuff like this: <% If so.type="merchant" then %> This is a test <% End if%> It wasn't coded (or worded, obviously) like that, but that is the gist of it. There was an If Then clause, with regular old HTML in the middle. Sure enough, if the criteria isn't met, the HTML isn't displayed. I never realized (until I saw that), that you could do that. Up until now, I have always done something like this: <% If This=True Then response.write "Test" End if %> In that case, the ASP is writing out the HTML. In some cases, it doesn't make much of a difference. However, I write most of my HTML by hand, using the Microsoft Script Editor, which does a lot of autocompletion, and makes writing raw HTML a breeze. But when I had to put out conditional HTML, I lost all of the advantages of the editor, because I was putting the HTML into a string. What's odd, is I have never run across this in ASP documentation. Once again, sorry for the OT post, but I know there are several listers out there that are either starting out in ASP, or have been using it for a while, and hopefully, this will be helpful to ya'all. Just out of curiousity, did anyone else know this? Drew _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com IMPORTANT - PLEASE READ ******************** This email and any files transmitted with it are confidential and may contain information protected by law from disclosure. If you have received this message in error, please notify the sender immediately and delete this email from your system. No warranty is given that this email or files, if attached to this email, are free from computer viruses or other defects. They are provided on the basis the user assumes all responsibility for loss, damage or consequence resulting directly or indirectly from their use, whether caused by the negligence of the sender or not. _______________________________________________ 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 _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com IMPORTANT - PLEASE READ ******************** This email and any files transmitted with it are confidential and may contain information protected by law from disclosure. If you have received this message in error, please notify the sender immediately and delete this email from your system. No warranty is given that this email or files, if attached to this email, are free from computer viruses or other defects. They are provided on the basis the user assumes all responsibility for loss, damage or consequence resulting directly or indirectly from their use, whether caused by the negligence of the sender or not. _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From jwcolby at colbyconsulting.com Mon Jan 12 07:36:12 2004 From: jwcolby at colbyconsulting.com (John W. Colby) Date: Mon, 12 Jan 2004 08:36:12 -0500 Subject: [AccessD] A2K: Drag and Drop with Access In-Reply-To: <7622047232.20040109150759@cactus.dk> Message-ID: Gustav, Thanks for that link. I think (from a quick scan) that I am at least capable of understanding what he is up to. It will be a natural to drop into my framework which uses a class for each control and withevents for all control events. John W. Colby www.ColbyConsulting.com -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Gustav Brock Sent: Friday, January 09, 2004 9:08 AM To: accessd at databaseadvisors.com Subject: Re: [AccessD] A2K: Drag and Drop with Access Hi John, Dick Here's another article on that subject. This, however, deals with the content of a control. The link terminates ultimo January: What a Drag it is: Drag and Drop in Access This month, Doug Steele shows you how to add drag-and-drop to your Access application using combinations of multi-value and single-value controls. http://www.pinpub.com/html/main.isx?sub=62&story=2604 This implementation though "screams" to be wrapped into WithEvents ... /gustav > Go to Peter DeBaets website and check out his Drag-N-Dropper program. > It works very well > http://www.peterssoftware.com > -----Original Message----- > From: accessd-bounces at databaseadvisors.com > [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Darren DICK > Sent: Wednesday, June 04, 2003 9:59 PM > To: AccessD List > Subject: [AccessD] A2K: Drag and Drop with Access > Anyone have any success with dragging and dropping of controls onto > Access forms? Eg I have an Image control displaying an image and say > it's in the top left corner of the form. I want to 'click' onto the > image control and 'drag' it to say... the bottom left corner of the > form. > I have found heaps of samples for VB but they use VB only events etc, > that I can't replicate or fudge in Access. _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From LChristian at MassMutual.com Mon Jan 12 08:46:47 2004 From: LChristian at MassMutual.com (Christian, Lorraine) Date: Mon, 12 Jan 2004 09:46:47 -0500 Subject: [AccessD] Outlook SP3 Message-ID: <5B898D9F0627974EB82D0645E52B1E7D035CBA6F@EXMBPR03.na.mmfg.net> Thanks Bobby.... Ahhhh, you know what they say...the early bird gets the worm :) Lorraine -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Bobby Heid Sent: Monday, January 12, 2004 7:22 AM To: 'Access Developers discussion and problem solving' Subject: RE: [AccessD] Outlook SP3 Ahhh, the great MS Outlook security gotcha. I believe that if you are on an Exchange system, that your Exchange administrator can set it up so that your account (or the one the application is using) can bypass the security stuff. Look at www.slipstick.com for much more information on this. Also look at http://www.dimastr.com/redemption/ for the Redemption package that lets you bypass the security stuff. BTW, you get to work too early. LOL. HTH, Bobby -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Christian, Lorraine Sent: Monday, January 12, 2004 6:52 AM To: Access Developers discussion and problem solving Subject: [AccessD] Outlook SP3 Hi - I have a 2000 Access database that fires off an automatic email. Everything was working fine until I upgraded Outlook to SP3. The code that creates the email message returns this error. "A program is trying to access e-mail addresses you have stored in Outlook. Do you want to allow this? If this is unexpected, it may be a virus and you should choose "No"." There is also a check box on the message that says Allow access for and then you choose the amount of time. Below is the code I am using: Private Sub cmdPositiveEmail_Click() If txtEmailDate.Value <> " " Then MsgBox "Email was already sent on " & Format(txtEmailDate.Value, "mm/dd/yyyy"), vbOKOnly Else Call SendPositiveMessage(False) txtEmailDate.Value = Now() txtTypeOfEmail.Value = "Without Errors" End If End Sub Private Sub SendPositiveMessage(DisplayMsg As Boolean) Dim objOutlook As Object Dim objOutlookMsg As Object Dim i As Integer Dim strTo As String Dim strSubject As String Dim strBody As String On Error GoTo errorhandler 'On Error Resume Next ' Create the Outlook session. Set objOutlook = CreateObject("Outlook.Application") ' Create the message. Set objOutlookMsg = objOutlook.CreateItem(olMailItem) ' Retrieves the value from the txtCAName on the form and is assigned ' to the variable myTo to be used in an Outlook message. strTo = Me.txtCAName.Value ' Retrieves the value from the txtCIPolNo on the form and is assigned ' to the variable mySubject to be used in an Outlook message. strSubject = "Quality Assurance Results: Policy #: " & txtCIPolNo.Value ' Assigns' variable myBody to be used in an Outlook message. strBody = "This case was processed correctly and met all expectations and guidelines." & vbNewLine & vbNewLine & _ "Great job!. " With objOutlookMsg .To = strTo .Recipients.ResolveAll .Subject = strSubject .Body = strBody .Importance = olImportanceHigh .PrintOut .Send End With Set objOutlook = Nothing Set objOutlookMsg = Nothing MsgBox "Message sent successfully...", vbOKOnly, "Email Notification" cmdMainDetail.SetFocus Exit Sub errorhandler: MsgBox "Outlook could not find sender's name.", vbOKOnly + vbCritical, "Outlook Message" With objOutlookMsg .Display End With Set objOutlook = Nothing Set objOutlookMsg = Nothing MsgBox "Message sent successfully...", vbOKOnly, "Email Notification" cmdMainDetail.SetFocus cmdEmail.Visible = True cmdSend.Visible = False cmdPositiveEmail.ForeColor = vbBlack Exit Sub End Sub I believe the message is a precaution set up through Microsoft that comes with SP3. My problem is that I have to click this message several times until my code continues to run. I believe that it is trying to access address book on .resolveall and .send. Not sure how I can fix this problem. I can live with clicking "Yes" once, but would like if the message does not appear at all. Does any one know how to get around this? Thanks in advance. Lorraine Christian MassMutual Financial Group New Business Operations 413.744.5335 lchristian at massmutual.com --------------------------------------------------------- This e-mail transmission may contain information that is proprietary, privileged and/or confidential and is intended exclusively for the person(s) to whom it is addressed. Any use, copying, retention or disclosure by any person other than the intended recipient or the intended recipient's designees is strictly prohibited. If you are not the intended recipient or their designee, please notify the sender immediately by return e-mail and delete all copies. --------------------------------------------------------- _______________________________________________ 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 From mwhittinghill at symphonyinfo.com Mon Jan 12 09:09:33 2004 From: mwhittinghill at symphonyinfo.com (Mark Whittinghill) Date: Mon, 12 Jan 2004 09:09:33 -0600 Subject: [AccessD] Using Access 2000 apps on Access 2003 Message-ID: <001201c3d91e$16721f50$2501a8c0@PASCAL> Are there any problems in using an application built in A2K on a computer with Access 2003? Mark Whittinghill Symphony Information Services 763-391-7400 mwhittinghill at symphonyinfo.com From ssharkins at bellsouth.net Mon Jan 12 09:07:49 2004 From: ssharkins at bellsouth.net (Susan Harkins) Date: Mon, 12 Jan 2004 10:07:49 -0500 Subject: [AccessD] error questions References: <000001c3d907$2cef8900$8b194244@hargrove.internal> Message-ID: <003d01c3d91d$e3c51990$210110ac@SUSANONE> Doris -- I'd like to see that sometime. I do agree with you both that it wouldn't always be appropriate, but geez Louise ... give me a break! Please!!!!!!!!!! ;) Somewhere I've got a whole book on error handling, I really ought to read it. Susan H. > John is right that you wouldn't always want to do this because sometimes it > is better to handle the issue within the calling procedure or function. > However, I do handle some of the more common errors (such as lost SQL > connection or printer problems) within my generic error handling function > because that made more sense to me. From dbcfour at triad.rr.com Mon Jan 12 10:21:27 2004 From: dbcfour at triad.rr.com (dbcfour at triad.rr.com) Date: Mon, 12 Jan 2004 11:21:27 -0500 Subject: [AccessD] Smolin Memorial Contribution Message-ID: <3cfb2b3cd09f.3cd09f3cfb2b@southeast.rr.com> On Sunday January 11, 2004 Bernard Smolin, father of our long time and much respected fellow member Rocky Smolin, passed away. After a number of members expressed a desire to share an expression of sympathy, arrangements have been made for Keith Williamson to collect Memorial Contribution(s), and present a check to the National Jewish Medical & Research Center (http://www.njc.org/fr/joymem.html) on our behalf. Those wishing to express their sincere and heartfelt sympathy to the Family in this manner can contribute via the website at http://www.databaseadvisors.com/donations.htm It is important, however, that you clearly indicate in the notes section of the Paypal form, the nature of the contribution. For those that prefer to mail a check, please do so by mailing a check to: Database Advisors Inc. c/o Keith Williamson 450 Franklin Street Apt B Havre de Grace, MD 21078 All contributions should be made no later than Friday January 16th, and be clearly marked as Smolin Memorial Fund. A special Thank You to Keith for his willingness to assist us in this effort. Donna Cook From Mark.Mitsules at ngc.com Mon Jan 12 10:21:52 2004 From: Mark.Mitsules at ngc.com (Mitsules, Mark S. (Newport News)) Date: Mon, 12 Jan 2004 11:21:52 -0500 Subject: [AccessD] Access Security - Web Based ASP Message-ID: Drew, Susan, ;) Surprising what a little research on "Integrated Windows Authentication" turns up... http://techrepublic.com.com/5102-6329-5069829.html Mark -----Original Message----- From: DWUTKA at marlow.com [mailto:DWUTKA at marlow.com] Sent: Friday, January 09, 2004 4:06 PM To: accessd at databaseadvisors.com Subject: RE: [AccessD] Access Security - Web Based ASP With ASP, you can get the users logged in account, either with Integrated Windows Authentication, or plain text password. No need to have security on the db itself, if you don't put it into a directory 'visible' from the web. Drew -----Original Message----- From: Mitsules, Mark S. (Newport News) [mailto:Mark.Mitsules at ngc.com] Sent: Friday, January 09, 2004 2:40 PM To: '[AccessD]' Subject: [AccessD] Access Security - Web Based ASP I have an existing .mdb "protected" only by an API call to GetUserName...very limited access. It contains time charging data for the entire department ("company confidential...need to know" type stuff). In the simplest of terms, what is the minimum necessary to achieve the following scenario? I would like a user to be able to access ONLY THEIR time charging data through a web page interface. Are there alternatives? Mark _______________________________________________ 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 From joconnell at indy.rr.com Mon Jan 12 10:23:29 2004 From: joconnell at indy.rr.com (Joseph O'Connell) Date: Mon, 12 Jan 2004 11:23:29 -0500 Subject: [AccessD] Change printer Message-ID: <000e01c3d928$6bab1800$6701a8c0@joe> Cross posted to Access-L and AccessD I thought this was discussed recently, but I cannot find the solution in the archives. Win 2000 Access 2000 Is there an easy way to change the output device for a report? An application has several reports that are normally sent to a specific printer. Now the client wants the ability to selectively create a PDF using Adobe Distiller and have the PDF sent as an attachment to an email message. Because this procedure must be totally automated, having the print dialog box popup is not a viable solution. I know that this could be accomplished by having a second set of reports that are already set to output to Distiller, but this would create a maintenance problem to ensure that any changes made to a printed report are also made to the Distiller report. What I am looking for is code that can change the destination to Distiller and then change it back to the original destination after the PDF is created. Does anyone have the code to to this? Or can someone point me to the API that can read and set the printer for a specific report? Thanks. Joe O'Connell From wdhindman at bellsouth.net Mon Jan 12 10:29:56 2004 From: wdhindman at bellsouth.net (William Hindman) Date: Mon, 12 Jan 2004 11:29:56 -0500 Subject: [AccessD] OT - Smolin Memorial Fund References: <000001c3d907$2cef8900$8b194244@hargrove.internal> <003d01c3d91d$e3c51990$210110ac@SUSANONE> Message-ID: <004201c3d929$50a2d100$6101a8c0@dejpolsys> List ...bringing this over from the OT list because Rocky Smolin has been such a long time contributor here and many of you think of him as I do, a good friend that I've never laid eyes on but know and value more than many I have. ...Rocky lost his father yesterday ...many of the regulars on OT are contributing to a memorial donation made in his father's name ...I though some of the AccessD listers may be interested as well ...the details are quoted below. "Keith has offered/agreed to collect the Memorial Contribution(s) , and present a check to the National Jewish Medical & Research Center (http://www.njc.org/fr/joymem.html) on behalf of OT Those wishing to express their sincere and heartfelt sympathy to the Family in this manner can contribute via the website at http://www.databaseadvisors.com/donations.htm It is important, however, that you clearly indicate in the notes section of the Paypal form, the nature of the contribution. For those that prefer to mail a check: Database Advisors Inc. c/o Keith Williamson 450 Franklin Street Apt B Havre de Grace, MD 21078 All contributions should be made no later than Friday January 16th, and be clearly marked as Smolin Memorial Fund. A special Thank You to Keith for his willingness to assist us in this effort. Donna" William Hindman From martyconnelly at shaw.ca Mon Jan 12 12:34:31 2004 From: martyconnelly at shaw.ca (MartyConnelly) Date: Mon, 12 Jan 2004 10:34:31 -0800 Subject: [AccessD] Outlook SP3 References: <5B898D9F0627974EB82D0645E52B1E7D035CBA6F@EXMBPR03.na.mmfg.net> Message-ID: <4002E8B7.7080207@shaw.ca> Or conversely ... the early worm is for the birds. This is another quick and dirty method. Express ClickYes is a tiny program that sits in the taskbar and clicks the Yes button on behalf of you. It is free but I am not sure if it works with Outlook 2000 SP3 it says it works with SP2 and 2002 and 2003 http://www.express-soft.com/mailmate/clickyes.html Christian, Lorraine wrote: >Thanks Bobby.... > >Ahhhh, you know what they say...the early bird gets the worm :) > >Lorraine > >-----Original Message----- >From: accessd-bounces at databaseadvisors.com >[mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Bobby Heid >Sent: Monday, January 12, 2004 7:22 AM >To: 'Access Developers discussion and problem solving' >Subject: RE: [AccessD] Outlook SP3 > > >Ahhh, the great MS Outlook security gotcha. > >I believe that if you are on an Exchange system, that your Exchange >administrator can set it up so that your account (or the one the application >is using) can bypass the security stuff. > >Look at www.slipstick.com for much more information on this. Also look at >http://www.dimastr.com/redemption/ for the Redemption package that lets you >bypass the security stuff. > >BTW, you get to work too early. LOL. > >HTH, >Bobby > >-----Original Message----- >From: accessd-bounces at databaseadvisors.com >[mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Christian, >Lorraine >Sent: Monday, January 12, 2004 6:52 AM >To: Access Developers discussion and problem solving >Subject: [AccessD] Outlook SP3 > > >Hi - >I have a 2000 Access database that fires off an automatic email. Everything >was working fine until I upgraded Outlook to SP3. The code that creates the >email message returns this error. > >"A program is trying to access e-mail addresses you have stored in Outlook. >Do you want to allow this? > >If this is unexpected, it may be a virus and you should choose "No"." > >There is also a check box on the message that says Allow access for and then >you choose the amount of time. > >Below is the code I am using: > >Private Sub cmdPositiveEmail_Click() > If txtEmailDate.Value <> " " Then > MsgBox "Email was already sent on " & Format(txtEmailDate.Value, >"mm/dd/yyyy"), vbOKOnly > Else > Call SendPositiveMessage(False) > txtEmailDate.Value = Now() > txtTypeOfEmail.Value = "Without Errors" > End If >End Sub > >Private Sub SendPositiveMessage(DisplayMsg As Boolean) >Dim objOutlook As Object >Dim objOutlookMsg As Object >Dim i As Integer >Dim strTo As String >Dim strSubject As String >Dim strBody As String > >On Error GoTo errorhandler >'On Error Resume Next >' Create the Outlook session. >Set objOutlook = CreateObject("Outlook.Application") > >' Create the message. >Set objOutlookMsg = objOutlook.CreateItem(olMailItem) > >' Retrieves the value from the txtCAName on the form and is assigned >' to the variable myTo to be used in an Outlook message. >strTo = Me.txtCAName.Value > >' Retrieves the value from the txtCIPolNo on the form and is assigned >' to the variable mySubject to be used in an Outlook message. >strSubject = "Quality Assurance Results: Policy #: " & txtCIPolNo.Value > >' Assigns' variable myBody to be used in an Outlook message. >strBody = "This case was processed correctly and met all expectations and >guidelines." & vbNewLine & vbNewLine & _ >"Great job!. " > >With objOutlookMsg > .To = strTo > .Recipients.ResolveAll > .Subject = strSubject > .Body = strBody > .Importance = olImportanceHigh > .PrintOut > .Send >End With > > Set objOutlook = Nothing > Set objOutlookMsg = Nothing > MsgBox "Message sent successfully...", vbOKOnly, "Email Notification" > cmdMainDetail.SetFocus > Exit Sub > >errorhandler: > MsgBox "Outlook could not find sender's name.", vbOKOnly + vbCritical, >"Outlook Message" > With objOutlookMsg > .Display > End With > Set objOutlook = Nothing > Set objOutlookMsg = Nothing > MsgBox "Message sent successfully...", vbOKOnly, "Email Notification" > cmdMainDetail.SetFocus > cmdEmail.Visible = True > cmdSend.Visible = False > cmdPositiveEmail.ForeColor = vbBlack > Exit Sub >End Sub > >I believe the message is a precaution set up through Microsoft that comes >with SP3. My problem is >that I have to click this message several times until my code continues to >run. I believe that it is trying to access address book on .resolveall and >.send. Not sure how I can fix this problem. I can live with clicking "Yes" >once, but would like if the message does not appear at all. Does any one >know how to get around this? > >Thanks in advance. > >Lorraine Christian >MassMutual Financial Group >New Business Operations >413.744.5335 >lchristian at massmutual.com > >--------------------------------------------------------- >This e-mail transmission may contain information that is proprietary, >privileged and/or confidential and is intended exclusively for the person(s) >to whom it is addressed. Any use, copying, retention or disclosure by any >person other than the intended recipient or the intended recipient's >designees is strictly prohibited. If you are not the intended recipient or >their designee, please notify the sender immediately by return e-mail and >delete all copies. > >--------------------------------------------------------- > >_______________________________________________ >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 > > >_______________________________________________ >AccessD mailing list >AccessD at databaseadvisors.com >http://databaseadvisors.com/mailman/listinfo/accessd >Website: http://www.databaseadvisors.com > > > -- Marty Connelly Victoria, B.C. Canada From Mark.Mitsules at ngc.com Mon Jan 12 13:44:36 2004 From: Mark.Mitsules at ngc.com (Mitsules, Mark S. (Newport News)) Date: Mon, 12 Jan 2004 14:44:36 -0500 Subject: [AccessD] Access Security - Web Based ASP Message-ID: Erwin, Drew, et. al. or et. aliae., Since my application will reside on our company intranet, I've been looking into using Integrated Windows Authentication. I've yet to submit the request to have this implemented...I need to clarify a few things. If I'm reading this correctly, when an ASP page is requested, the "actual" LAN username and password are not sent...merely a hash. I can understand about the password, but the reason I'm going through this in the first place is to determine the actual user. I was hoping that this method would provide me with their LAN login name so that I can filter the available records and return only the user's records. Since I can not test this out, I was hoping someone can verify...with Integrated Windows Authentication in place, can I retrieve the LAN login name through an ASP page and use that as a parameter for a stored procedure? In other words, once they are on the LAN they can access my data, but I want to make sure they access only THEIR data. Is this possible? Mark -----Original Message----- From: Erwin Craps - IT Helps [mailto:Erwin.Craps at ithelps.be] Sent: Friday, January 09, 2004 4:45 PM To: Access Developers discussion and problem solving Subject: RE: [AccessD] Access Security - Web Based ASP I have a small little trick I used for same reasons. I'm using a seperate MDB file which has linked tables to the backend database. Only the tables I really need are in the WEB database. If it ain't there you can get in.... But I supose that you the data of the people are all in the same table. You need a password system to login via the web, these user/password are stored in a table in your db. When a correct match you store the ID of the person into the session. If you build SQL string than you always use the persons ID stored in the session. So don't use any parameters with the URL string for person identification. You should be reasonably safe with that, but not 100%, you never are 100% safe.... Erwin -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Mitsules, Mark S. (Newport News) Sent: Friday, January 09, 2004 10:33 PM To: 'Access Developers discussion and problem solving' Subject: RE: [AccessD] Access Security - Web Based ASP Thanks. I will research Integrated Windows Authentication as an option. Mark -----Original Message----- From: DWUTKA at marlow.com [mailto:DWUTKA at marlow.com] Sent: Friday, January 09, 2004 4:06 PM To: accessd at databaseadvisors.com Subject: RE: [AccessD] Access Security - Web Based ASP With ASP, you can get the users logged in account, either with Integrated Windows Authentication, or plain text password. No need to have security on the db itself, if you don't put it into a directory 'visible' from the web. Drew -----Original Message----- From: Mitsules, Mark S. (Newport News) [mailto:Mark.Mitsules at ngc.com] Sent: Friday, January 09, 2004 2:40 PM To: '[AccessD]' Subject: [AccessD] Access Security - Web Based ASP I have an existing .mdb "protected" only by an API call to GetUserName...very limited access. It contains time charging data for the entire department ("company confidential...need to know" type stuff). In the simplest of terms, what is the minimum necessary to achieve the following scenario? I would like a user to be able to access ONLY THEIR time charging data through a web page interface. Are there alternatives? Mark _______________________________________________ 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 _______________________________________________ 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 From LChristian at MassMutual.com Mon Jan 12 13:45:30 2004 From: LChristian at MassMutual.com (Christian, Lorraine) Date: Mon, 12 Jan 2004 14:45:30 -0500 Subject: [AccessD] Outlook SP3 Message-ID: <5B898D9F0627974EB82D0645E52B1E7D035CBA92@EXMBPR03.na.mmfg.net> <<<>>> Cute :) Thanks for your help. I will take a look at this also. I appreciate it Marty and thanks again Bobby! Have a sparkling afternoon :) Lorraine -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of MartyConnelly Sent: Monday, January 12, 2004 1:35 PM To: Access Developers discussion and problem solving Subject: Re: [AccessD] Outlook SP3 Or conversely ... the early worm is for the birds. This is another quick and dirty method. Express ClickYes is a tiny program that sits in the taskbar and clicks the Yes button on behalf of you. It is free but I am not sure if it works with Outlook 2000 SP3 it says it works with SP2 and 2002 and 2003 http://www.express-soft.com/mailmate/clickyes.html Christian, Lorraine wrote: >Thanks Bobby.... > >Ahhhh, you know what they say...the early bird gets the worm :) > >Lorraine > >-----Original Message----- >From: accessd-bounces at databaseadvisors.com >[mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Bobby Heid >Sent: Monday, January 12, 2004 7:22 AM >To: 'Access Developers discussion and problem solving' >Subject: RE: [AccessD] Outlook SP3 > > >Ahhh, the great MS Outlook security gotcha. > >I believe that if you are on an Exchange system, that your Exchange >administrator can set it up so that your account (or the one the application >is using) can bypass the security stuff. > >Look at www.slipstick.com for much more information on this. Also look at >http://www.dimastr.com/redemption/ for the Redemption package that lets you >bypass the security stuff. > >BTW, you get to work too early. LOL. > >HTH, >Bobby > >-----Original Message----- >From: accessd-bounces at databaseadvisors.com >[mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Christian, >Lorraine >Sent: Monday, January 12, 2004 6:52 AM >To: Access Developers discussion and problem solving >Subject: [AccessD] Outlook SP3 > > >Hi - >I have a 2000 Access database that fires off an automatic email. Everything >was working fine until I upgraded Outlook to SP3. The code that creates the >email message returns this error. > >"A program is trying to access e-mail addresses you have stored in Outlook. >Do you want to allow this? > >If this is unexpected, it may be a virus and you should choose "No"." > >There is also a check box on the message that says Allow access for and then >you choose the amount of time. > >Below is the code I am using: > >Private Sub cmdPositiveEmail_Click() > If txtEmailDate.Value <> " " Then > MsgBox "Email was already sent on " & Format(txtEmailDate.Value, >"mm/dd/yyyy"), vbOKOnly > Else > Call SendPositiveMessage(False) > txtEmailDate.Value = Now() > txtTypeOfEmail.Value = "Without Errors" > End If >End Sub > >Private Sub SendPositiveMessage(DisplayMsg As Boolean) >Dim objOutlook As Object >Dim objOutlookMsg As Object >Dim i As Integer >Dim strTo As String >Dim strSubject As String >Dim strBody As String > >On Error GoTo errorhandler >'On Error Resume Next >' Create the Outlook session. >Set objOutlook = CreateObject("Outlook.Application") > >' Create the message. >Set objOutlookMsg = objOutlook.CreateItem(olMailItem) > >' Retrieves the value from the txtCAName on the form and is assigned >' to the variable myTo to be used in an Outlook message. >strTo = Me.txtCAName.Value > >' Retrieves the value from the txtCIPolNo on the form and is assigned >' to the variable mySubject to be used in an Outlook message. >strSubject = "Quality Assurance Results: Policy #: " & txtCIPolNo.Value > >' Assigns' variable myBody to be used in an Outlook message. >strBody = "This case was processed correctly and met all expectations and >guidelines." & vbNewLine & vbNewLine & _ >"Great job!. " > >With objOutlookMsg > .To = strTo > .Recipients.ResolveAll > .Subject = strSubject > .Body = strBody > .Importance = olImportanceHigh > .PrintOut > .Send >End With > > Set objOutlook = Nothing > Set objOutlookMsg = Nothing > MsgBox "Message sent successfully...", vbOKOnly, "Email Notification" > cmdMainDetail.SetFocus > Exit Sub > >errorhandler: > MsgBox "Outlook could not find sender's name.", vbOKOnly + vbCritical, >"Outlook Message" > With objOutlookMsg > .Display > End With > Set objOutlook = Nothing > Set objOutlookMsg = Nothing > MsgBox "Message sent successfully...", vbOKOnly, "Email Notification" > cmdMainDetail.SetFocus > cmdEmail.Visible = True > cmdSend.Visible = False > cmdPositiveEmail.ForeColor = vbBlack > Exit Sub >End Sub > >I believe the message is a precaution set up through Microsoft that comes >with SP3. My problem is >that I have to click this message several times until my code continues to >run. I believe that it is trying to access address book on .resolveall and >.send. Not sure how I can fix this problem. I can live with clicking "Yes" >once, but would like if the message does not appear at all. Does any one >know how to get around this? > >Thanks in advance. > >Lorraine Christian >MassMutual Financial Group >New Business Operations >413.744.5335 >lchristian at massmutual.com > >--------------------------------------------------------- >This e-mail transmission may contain information that is proprietary, >privileged and/or confidential and is intended exclusively for the person(s) >to whom it is addressed. Any use, copying, retention or disclosure by any >person other than the intended recipient or the intended recipient's >designees is strictly prohibited. If you are not the intended recipient or >their designee, please notify the sender immediately by return e-mail and >delete all copies. > >--------------------------------------------------------- > >_______________________________________________ >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 > > >_______________________________________________ >AccessD mailing list >AccessD at databaseadvisors.com >http://databaseadvisors.com/mailman/listinfo/accessd >Website: http://www.databaseadvisors.com > > > -- Marty Connelly Victoria, B.C. Canada _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From stephen at bondsoftware.co.nz Mon Jan 12 13:48:08 2004 From: stephen at bondsoftware.co.nz (Stephen Bond) Date: Tue, 13 Jan 2004 08:48:08 +1300 Subject: [AccessD] Using Access 2000 apps on Access 2003 Message-ID: <70F3D727890C784291D8433E9C418F2908858E@server.bondsoftware.co.nz> I found one - A2003 requires precise syntax for referencing forms in a query - A2000 let you away with being less precise. > -----Original Message----- > From: Mark Whittinghill [mailto:mwhittinghill at symphonyinfo.com] > Sent: Tuesday, 13 January 2004 4:10 a.m. > To: accessd at databaseadvisors.com > Subject: [AccessD] Using Access 2000 apps on Access 2003 > > > Are there any problems in using an application built in A2K > on a computer > with Access 2003? > > Mark Whittinghill > Symphony Information Services > 763-391-7400 > mwhittinghill at symphonyinfo.com > > > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com > From Mark.Mitsules at ngc.com Mon Jan 12 13:50:29 2004 From: Mark.Mitsules at ngc.com (Mitsules, Mark S. (Newport News)) Date: Mon, 12 Jan 2004 14:50:29 -0500 Subject: [AccessD] Access Security - Web Based ASP Message-ID: Oops...forgot to ask...If I can retrieve the LAN login name, which server variable would it be? Mark -----Original Message----- From: Mitsules, Mark S. (Newport News) [mailto:Mark.Mitsules at ngc.com] Sent: Monday, January 12, 2004 2:45 PM To: 'Access Developers discussion and problem solving' Subject: RE: [AccessD] Access Security - Web Based ASP Erwin, Drew, et. al. or et. aliae., Since my application will reside on our company intranet, I've been looking into using Integrated Windows Authentication. I've yet to submit the request to have this implemented...I need to clarify a few things. If I'm reading this correctly, when an ASP page is requested, the "actual" LAN username and password are not sent...merely a hash. I can understand about the password, but the reason I'm going through this in the first place is to determine the actual user. I was hoping that this method would provide me with their LAN login name so that I can filter the available records and return only the user's records. Since I can not test this out, I was hoping someone can verify...with Integrated Windows Authentication in place, can I retrieve the LAN login name through an ASP page and use that as a parameter for a stored procedure? In other words, once they are on the LAN they can access my data, but I want to make sure they access only THEIR data. Is this possible? Mark -----Original Message----- From: Erwin Craps - IT Helps [mailto:Erwin.Craps at ithelps.be] Sent: Friday, January 09, 2004 4:45 PM To: Access Developers discussion and problem solving Subject: RE: [AccessD] Access Security - Web Based ASP I have a small little trick I used for same reasons. I'm using a seperate MDB file which has linked tables to the backend database. Only the tables I really need are in the WEB database. If it ain't there you can get in.... But I supose that you the data of the people are all in the same table. You need a password system to login via the web, these user/password are stored in a table in your db. When a correct match you store the ID of the person into the session. If you build SQL string than you always use the persons ID stored in the session. So don't use any parameters with the URL string for person identification. You should be reasonably safe with that, but not 100%, you never are 100% safe.... Erwin -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Mitsules, Mark S. (Newport News) Sent: Friday, January 09, 2004 10:33 PM To: 'Access Developers discussion and problem solving' Subject: RE: [AccessD] Access Security - Web Based ASP Thanks. I will research Integrated Windows Authentication as an option. Mark -----Original Message----- From: DWUTKA at marlow.com [mailto:DWUTKA at marlow.com] Sent: Friday, January 09, 2004 4:06 PM To: accessd at databaseadvisors.com Subject: RE: [AccessD] Access Security - Web Based ASP With ASP, you can get the users logged in account, either with Integrated Windows Authentication, or plain text password. No need to have security on the db itself, if you don't put it into a directory 'visible' from the web. Drew -----Original Message----- From: Mitsules, Mark S. (Newport News) [mailto:Mark.Mitsules at ngc.com] Sent: Friday, January 09, 2004 2:40 PM To: '[AccessD]' Subject: [AccessD] Access Security - Web Based ASP I have an existing .mdb "protected" only by an API call to GetUserName...very limited access. It contains time charging data for the entire department ("company confidential...need to know" type stuff). In the simplest of terms, what is the minimum necessary to achieve the following scenario? I would like a user to be able to access ONLY THEIR time charging data through a web page interface. Are there alternatives? Mark _______________________________________________ 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 _______________________________________________ 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 _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From DWUTKA at marlow.com Mon Jan 12 14:19:37 2004 From: DWUTKA at marlow.com (DWUTKA at marlow.com) Date: Mon, 12 Jan 2004 14:19:37 -0600 Subject: [AccessD] Access Security - Web Based ASP Message-ID: <2F8793082E00D4119A1700B0D0216BF802227717@main2.marlow.com> Yes, with integrated windows security, you can get their login name, with one of the server variables in ASP. You CANNOT get their password that way. If you use plain text, both login name and password are available. One word of caution, Integrated Windows Security will not pass the authentication over to other network resources, so if you database is not directly on the webserver, users will not be able to reach it, thus your application will not work. Drew -----Original Message----- From: Mitsules, Mark S. (Newport News) [mailto:Mark.Mitsules at ngc.com] Sent: Monday, January 12, 2004 1:45 PM To: 'Access Developers discussion and problem solving' Subject: RE: [AccessD] Access Security - Web Based ASP Erwin, Drew, et. al. or et. aliae., Since my application will reside on our company intranet, I've been looking into using Integrated Windows Authentication. I've yet to submit the request to have this implemented...I need to clarify a few things. If I'm reading this correctly, when an ASP page is requested, the "actual" LAN username and password are not sent...merely a hash. I can understand about the password, but the reason I'm going through this in the first place is to determine the actual user. I was hoping that this method would provide me with their LAN login name so that I can filter the available records and return only the user's records. Since I can not test this out, I was hoping someone can verify...with Integrated Windows Authentication in place, can I retrieve the LAN login name through an ASP page and use that as a parameter for a stored procedure? In other words, once they are on the LAN they can access my data, but I want to make sure they access only THEIR data. Is this possible? Mark -----Original Message----- From: Erwin Craps - IT Helps [mailto:Erwin.Craps at ithelps.be] Sent: Friday, January 09, 2004 4:45 PM To: Access Developers discussion and problem solving Subject: RE: [AccessD] Access Security - Web Based ASP I have a small little trick I used for same reasons. I'm using a seperate MDB file which has linked tables to the backend database. Only the tables I really need are in the WEB database. If it ain't there you can get in.... But I supose that you the data of the people are all in the same table. You need a password system to login via the web, these user/password are stored in a table in your db. When a correct match you store the ID of the person into the session. If you build SQL string than you always use the persons ID stored in the session. So don't use any parameters with the URL string for person identification. You should be reasonably safe with that, but not 100%, you never are 100% safe.... Erwin -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Mitsules, Mark S. (Newport News) Sent: Friday, January 09, 2004 10:33 PM To: 'Access Developers discussion and problem solving' Subject: RE: [AccessD] Access Security - Web Based ASP Thanks. I will research Integrated Windows Authentication as an option. Mark -----Original Message----- From: DWUTKA at marlow.com [mailto:DWUTKA at marlow.com] Sent: Friday, January 09, 2004 4:06 PM To: accessd at databaseadvisors.com Subject: RE: [AccessD] Access Security - Web Based ASP With ASP, you can get the users logged in account, either with Integrated Windows Authentication, or plain text password. No need to have security on the db itself, if you don't put it into a directory 'visible' from the web. Drew -----Original Message----- From: Mitsules, Mark S. (Newport News) [mailto:Mark.Mitsules at ngc.com] Sent: Friday, January 09, 2004 2:40 PM To: '[AccessD]' Subject: [AccessD] Access Security - Web Based ASP I have an existing .mdb "protected" only by an API call to GetUserName...very limited access. It contains time charging data for the entire department ("company confidential...need to know" type stuff). In the simplest of terms, what is the minimum necessary to achieve the following scenario? I would like a user to be able to access ONLY THEIR time charging data through a web page interface. Are there alternatives? Mark _______________________________________________ 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 _______________________________________________ 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 _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From DWUTKA at marlow.com Mon Jan 12 14:22:36 2004 From: DWUTKA at marlow.com (DWUTKA at marlow.com) Date: Mon, 12 Jan 2004 14:22:36 -0600 Subject: [AccessD] Access Security - Web Based ASP Message-ID: <2F8793082E00D4119A1700B0D0216BF802227718@main2.marlow.com> AUTH_USER -----Original Message----- From: Mitsules, Mark S. (Newport News) [mailto:Mark.Mitsules at ngc.com] Sent: Monday, January 12, 2004 1:50 PM To: 'Access Developers discussion and problem solving' Subject: RE: [AccessD] Access Security - Web Based ASP Oops...forgot to ask...If I can retrieve the LAN login name, which server variable would it be? Mark -----Original Message----- From: Mitsules, Mark S. (Newport News) [mailto:Mark.Mitsules at ngc.com] Sent: Monday, January 12, 2004 2:45 PM To: 'Access Developers discussion and problem solving' Subject: RE: [AccessD] Access Security - Web Based ASP Erwin, Drew, et. al. or et. aliae., Since my application will reside on our company intranet, I've been looking into using Integrated Windows Authentication. I've yet to submit the request to have this implemented...I need to clarify a few things. If I'm reading this correctly, when an ASP page is requested, the "actual" LAN username and password are not sent...merely a hash. I can understand about the password, but the reason I'm going through this in the first place is to determine the actual user. I was hoping that this method would provide me with their LAN login name so that I can filter the available records and return only the user's records. Since I can not test this out, I was hoping someone can verify...with Integrated Windows Authentication in place, can I retrieve the LAN login name through an ASP page and use that as a parameter for a stored procedure? In other words, once they are on the LAN they can access my data, but I want to make sure they access only THEIR data. Is this possible? Mark -----Original Message----- From: Erwin Craps - IT Helps [mailto:Erwin.Craps at ithelps.be] Sent: Friday, January 09, 2004 4:45 PM To: Access Developers discussion and problem solving Subject: RE: [AccessD] Access Security - Web Based ASP I have a small little trick I used for same reasons. I'm using a seperate MDB file which has linked tables to the backend database. Only the tables I really need are in the WEB database. If it ain't there you can get in.... But I supose that you the data of the people are all in the same table. You need a password system to login via the web, these user/password are stored in a table in your db. When a correct match you store the ID of the person into the session. If you build SQL string than you always use the persons ID stored in the session. So don't use any parameters with the URL string for person identification. You should be reasonably safe with that, but not 100%, you never are 100% safe.... Erwin -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Mitsules, Mark S. (Newport News) Sent: Friday, January 09, 2004 10:33 PM To: 'Access Developers discussion and problem solving' Subject: RE: [AccessD] Access Security - Web Based ASP Thanks. I will research Integrated Windows Authentication as an option. Mark -----Original Message----- From: DWUTKA at marlow.com [mailto:DWUTKA at marlow.com] Sent: Friday, January 09, 2004 4:06 PM To: accessd at databaseadvisors.com Subject: RE: [AccessD] Access Security - Web Based ASP With ASP, you can get the users logged in account, either with Integrated Windows Authentication, or plain text password. No need to have security on the db itself, if you don't put it into a directory 'visible' from the web. Drew -----Original Message----- From: Mitsules, Mark S. (Newport News) [mailto:Mark.Mitsules at ngc.com] Sent: Friday, January 09, 2004 2:40 PM To: '[AccessD]' Subject: [AccessD] Access Security - Web Based ASP I have an existing .mdb "protected" only by an API call to GetUserName...very limited access. It contains time charging data for the entire department ("company confidential...need to know" type stuff). In the simplest of terms, what is the minimum necessary to achieve the following scenario? I would like a user to be able to access ONLY THEIR time charging data through a web page interface. Are there alternatives? Mark _______________________________________________ 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 _______________________________________________ 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 _______________________________________________ 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 From Oleg_123 at xuppa.com Mon Jan 12 14:49:43 2004 From: Oleg_123 at xuppa.com (Oleg_123 at xuppa.com) Date: Mon, 12 Jan 2004 15:49:43 -0500 (EST) Subject: [AccessD] mail merge In-Reply-To: <2F8793082E00D4119A1700B0D0216BF802227718@main2.marlow.com> References: <2F8793082E00D4119A1700B0D0216BF802227718@main2.marlow.com> Message-ID: <53376.12.3.132.98.1073940583.squirrel@heck.bay9.com> Guys, when I run it I get an error , "Word was unable to open data source" everitihng is in its place, what should I do ? sCon = "DSN=ChoicePoint" If Len(sSQL) > 2 Then objWord.Application.ActiveDocument.MailMerge.OpenDataSource Name:="\\lsfp3\HRShare\recruiting\choicepoint\choicepnt.mdb", _ LinkToSource:=True, Connection:=sCon, SQLStatement:=sSQL objWord.ActiveDocument.MailMerge.Execute End If ----------------------------------------- Get Breaking News from CNN, ABC, NBC, CBS Now. http://www.xuppa.com/news/?link=webmail From cfoust at infostatsystems.com Mon Jan 12 14:52:58 2004 From: cfoust at infostatsystems.com (Charlotte Foust) Date: Mon, 12 Jan 2004 12:52:58 -0800 Subject: [AccessD] Change printer Message-ID: The GetPrinter API call will allow you to retrieve infromation on printers and the SetPrinter API call allows you to change the settings on a printer. They require the use of a custom type to handle the DevMode values, and you can find code for this at www.allapi.net and other places. However, you have to open the report itself in design view in code and change the printer, since this is saved as part of the design. Then when you print the report, it will go to the right printer. We do this in our applications using the PDF printer as the selected printer when we want to create PDF files. That means, you have to capture the choice before you create the PDF file, which means, you need to decide in advance what you're going to call that file and where you want to put it. Charlotte Foust -----Original Message----- From: Joseph O'Connell [mailto:joconnell at indy.rr.com] Sent: Monday, January 12, 2004 8:23 AM To: ACCESS-L at PEACH.EASE.LSOFT.COM; AccessD at databaseadvisors.com Subject: [AccessD] Change printer Cross posted to Access-L and AccessD I thought this was discussed recently, but I cannot find the solution in the archives. Win 2000 Access 2000 Is there an easy way to change the output device for a report? An application has several reports that are normally sent to a specific printer. Now the client wants the ability to selectively create a PDF using Adobe Distiller and have the PDF sent as an attachment to an email message. Because this procedure must be totally automated, having the print dialog box popup is not a viable solution. I know that this could be accomplished by having a second set of reports that are already set to output to Distiller, but this would create a maintenance problem to ensure that any changes made to a printed report are also made to the Distiller report. What I am looking for is code that can change the destination to Distiller and then change it back to the original destination after the PDF is created. Does anyone have the code to to this? Or can someone point me to the API that can read and set the printer for a specific report? Thanks. Joe O'Connell _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From Mark.Mitsules at ngc.com Mon Jan 12 14:53:10 2004 From: Mark.Mitsules at ngc.com (Mitsules, Mark S. (Newport News)) Date: Mon, 12 Jan 2004 15:53:10 -0500 Subject: [AccessD] Access Security - Web Based ASP Message-ID: Thank you Drew, that sounds feasible. I've been looking over http://www.w3schools.com/asp/default.asp most of the day...any other suggestions for examples or tutorials? Mark -----Original Message----- From: DWUTKA at marlow.com [mailto:DWUTKA at marlow.com] Sent: Monday, January 12, 2004 3:20 PM To: accessd at databaseadvisors.com Subject: RE: [AccessD] Access Security - Web Based ASP Yes, with integrated windows security, you can get their login name, with one of the server variables in ASP. You CANNOT get their password that way. If you use plain text, both login name and password are available. One word of caution, Integrated Windows Security will not pass the authentication over to other network resources, so if you database is not directly on the webserver, users will not be able to reach it, thus your application will not work. Drew -----Original Message----- From: Mitsules, Mark S. (Newport News) [mailto:Mark.Mitsules at ngc.com] Sent: Monday, January 12, 2004 1:45 PM To: 'Access Developers discussion and problem solving' Subject: RE: [AccessD] Access Security - Web Based ASP Erwin, Drew, et. al. or et. aliae., Since my application will reside on our company intranet, I've been looking into using Integrated Windows Authentication. I've yet to submit the request to have this implemented...I need to clarify a few things. If I'm reading this correctly, when an ASP page is requested, the "actual" LAN username and password are not sent...merely a hash. I can understand about the password, but the reason I'm going through this in the first place is to determine the actual user. I was hoping that this method would provide me with their LAN login name so that I can filter the available records and return only the user's records. Since I can not test this out, I was hoping someone can verify...with Integrated Windows Authentication in place, can I retrieve the LAN login name through an ASP page and use that as a parameter for a stored procedure? In other words, once they are on the LAN they can access my data, but I want to make sure they access only THEIR data. Is this possible? Mark -----Original Message----- From: Erwin Craps - IT Helps [mailto:Erwin.Craps at ithelps.be] Sent: Friday, January 09, 2004 4:45 PM To: Access Developers discussion and problem solving Subject: RE: [AccessD] Access Security - Web Based ASP I have a small little trick I used for same reasons. I'm using a seperate MDB file which has linked tables to the backend database. Only the tables I really need are in the WEB database. If it ain't there you can get in.... But I supose that you the data of the people are all in the same table. You need a password system to login via the web, these user/password are stored in a table in your db. When a correct match you store the ID of the person into the session. If you build SQL string than you always use the persons ID stored in the session. So don't use any parameters with the URL string for person identification. You should be reasonably safe with that, but not 100%, you never are 100% safe.... Erwin -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Mitsules, Mark S. (Newport News) Sent: Friday, January 09, 2004 10:33 PM To: 'Access Developers discussion and problem solving' Subject: RE: [AccessD] Access Security - Web Based ASP Thanks. I will research Integrated Windows Authentication as an option. Mark -----Original Message----- From: DWUTKA at marlow.com [mailto:DWUTKA at marlow.com] Sent: Friday, January 09, 2004 4:06 PM To: accessd at databaseadvisors.com Subject: RE: [AccessD] Access Security - Web Based ASP With ASP, you can get the users logged in account, either with Integrated Windows Authentication, or plain text password. No need to have security on the db itself, if you don't put it into a directory 'visible' from the web. Drew -----Original Message----- From: Mitsules, Mark S. (Newport News) [mailto:Mark.Mitsules at ngc.com] Sent: Friday, January 09, 2004 2:40 PM To: '[AccessD]' Subject: [AccessD] Access Security - Web Based ASP I have an existing .mdb "protected" only by an API call to GetUserName...very limited access. It contains time charging data for the entire department ("company confidential...need to know" type stuff). In the simplest of terms, what is the minimum necessary to achieve the following scenario? I would like a user to be able to access ONLY THEIR time charging data through a web page interface. Are there alternatives? Mark _______________________________________________ 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 _______________________________________________ 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 _______________________________________________ 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 From cfoust at infostatsystems.com Mon Jan 12 14:56:41 2004 From: cfoust at infostatsystems.com (Charlotte Foust) Date: Mon, 12 Jan 2004 12:56:41 -0800 Subject: [AccessD] Database growth Message-ID: If you haven't turned off subdatasheets, that will make the front end grow, but it will also grow if you make design changes and if you do a lot of action queries. Charlotte Foust -----Original Message----- From: StaRKeY [mailto:starkey at wanadoo.nl] Sent: Sunday, January 11, 2004 8:36 AM To: AccessD at databaseadvisors. com Subject: [AccessD] Database growth Hi all, One question: - Do linked tables also make the host mdb file grow? I figure it's only the tables (linked or not) that are being filled with data which make a mdb file grow but maybe there are other reasons? Regards, Eric Starkenburg --- avast! Antivirus: Outbound message clean. Virus Database (VPS): 8-1-2004 Tested on: 11-1-2004 17:35:58 avast! is copyright (c) 2000-2003 ALWIL Software. http://www.avast.com _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From DWUTKA at marlow.com Mon Jan 12 15:21:19 2004 From: DWUTKA at marlow.com (DWUTKA at marlow.com) Date: Mon, 12 Jan 2004 15:21:19 -0600 Subject: [AccessD] Access Security - Web Based ASP Message-ID: <2F8793082E00D4119A1700B0D0216BF802227719@main2.marlow.com> Took their quiz, and got 16 out of 20. The four I missed were odd (to me). I don't use javascript, so I got the question on how to set that as the ASP scripting language wrong, it asked how to identify the user, and I think it wanted to know 'cookie', but that's not true either.... the other two were BS (like AdRotator.....) Anyhow, I started ASP with a little tutorial I found on Planet Source code. It wasn't bad. Gave me the basics. The rest I learned simply by trial and error, and the MSDN. Drew -----Original Message----- From: Mitsules, Mark S. (Newport News) [mailto:Mark.Mitsules at ngc.com] Sent: Monday, January 12, 2004 2:53 PM To: 'Access Developers discussion and problem solving' Subject: RE: [AccessD] Access Security - Web Based ASP Thank you Drew, that sounds feasible. I've been looking over http://www.w3schools.com/asp/default.asp most of the day...any other suggestions for examples or tutorials? Mark -----Original Message----- From: DWUTKA at marlow.com [mailto:DWUTKA at marlow.com] Sent: Monday, January 12, 2004 3:20 PM To: accessd at databaseadvisors.com Subject: RE: [AccessD] Access Security - Web Based ASP Yes, with integrated windows security, you can get their login name, with one of the server variables in ASP. You CANNOT get their password that way. If you use plain text, both login name and password are available. One word of caution, Integrated Windows Security will not pass the authentication over to other network resources, so if you database is not directly on the webserver, users will not be able to reach it, thus your application will not work. Drew -----Original Message----- From: Mitsules, Mark S. (Newport News) [mailto:Mark.Mitsules at ngc.com] Sent: Monday, January 12, 2004 1:45 PM To: 'Access Developers discussion and problem solving' Subject: RE: [AccessD] Access Security - Web Based ASP Erwin, Drew, et. al. or et. aliae., Since my application will reside on our company intranet, I've been looking into using Integrated Windows Authentication. I've yet to submit the request to have this implemented...I need to clarify a few things. If I'm reading this correctly, when an ASP page is requested, the "actual" LAN username and password are not sent...merely a hash. I can understand about the password, but the reason I'm going through this in the first place is to determine the actual user. I was hoping that this method would provide me with their LAN login name so that I can filter the available records and return only the user's records. Since I can not test this out, I was hoping someone can verify...with Integrated Windows Authentication in place, can I retrieve the LAN login name through an ASP page and use that as a parameter for a stored procedure? In other words, once they are on the LAN they can access my data, but I want to make sure they access only THEIR data. Is this possible? Mark -----Original Message----- From: Erwin Craps - IT Helps [mailto:Erwin.Craps at ithelps.be] Sent: Friday, January 09, 2004 4:45 PM To: Access Developers discussion and problem solving Subject: RE: [AccessD] Access Security - Web Based ASP I have a small little trick I used for same reasons. I'm using a seperate MDB file which has linked tables to the backend database. Only the tables I really need are in the WEB database. If it ain't there you can get in.... But I supose that you the data of the people are all in the same table. You need a password system to login via the web, these user/password are stored in a table in your db. When a correct match you store the ID of the person into the session. If you build SQL string than you always use the persons ID stored in the session. So don't use any parameters with the URL string for person identification. You should be reasonably safe with that, but not 100%, you never are 100% safe.... Erwin -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Mitsules, Mark S. (Newport News) Sent: Friday, January 09, 2004 10:33 PM To: 'Access Developers discussion and problem solving' Subject: RE: [AccessD] Access Security - Web Based ASP Thanks. I will research Integrated Windows Authentication as an option. Mark -----Original Message----- From: DWUTKA at marlow.com [mailto:DWUTKA at marlow.com] Sent: Friday, January 09, 2004 4:06 PM To: accessd at databaseadvisors.com Subject: RE: [AccessD] Access Security - Web Based ASP With ASP, you can get the users logged in account, either with Integrated Windows Authentication, or plain text password. No need to have security on the db itself, if you don't put it into a directory 'visible' from the web. Drew -----Original Message----- From: Mitsules, Mark S. (Newport News) [mailto:Mark.Mitsules at ngc.com] Sent: Friday, January 09, 2004 2:40 PM To: '[AccessD]' Subject: [AccessD] Access Security - Web Based ASP I have an existing .mdb "protected" only by an API call to GetUserName...very limited access. It contains time charging data for the entire department ("company confidential...need to know" type stuff). In the simplest of terms, what is the minimum necessary to achieve the following scenario? I would like a user to be able to access ONLY THEIR time charging data through a web page interface. Are there alternatives? Mark _______________________________________________ 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 _______________________________________________ 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 _______________________________________________ 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 _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From DWUTKA at marlow.com Mon Jan 12 15:33:26 2004 From: DWUTKA at marlow.com (DWUTKA at marlow.com) Date: Mon, 12 Jan 2004 15:33:26 -0600 Subject: [AccessD] Presenting our archives tomorrow night. (Tuesday) Message-ID: <2F8793082E00D4119A1700B0D0216BF80222771D@main2.marlow.com> For those of you in the Dallas/Fort Worth Metroplex, I will be giving a presentation for MAD (Metroplex Access Developers) this Tuesday night. Meetings start at 6, I think my presentation is at 6:45. My presentation is on indexing memo fields, which is what I did for the AccessD archives that I host at home. Only place I ever used that too, so it's going to be my only live example. MAD's website is http://www.madtx.org which has meeting times/location. They meet the second tuesday of every month. Drew From andy at minstersystems.co.uk Mon Jan 12 17:11:50 2004 From: andy at minstersystems.co.uk (Andy Lacey) Date: Mon, 12 Jan 2004 23:11:50 -0000 Subject: [AccessD] Change printer In-Reply-To: <000e01c3d928$6bab1800$6701a8c0@joe> Message-ID: <008a01c3d961$75fa2a10$b274d0d5@minster33c3r25> Hi Joe This crops up regularly on the list. If you search the archives on PDF you'll find a bunch of hits with lots of advice. And I'd suggest you rename this thread to put PDF in it somewhere because there are solutions to creating a PDF which don't involve changing printers, basically by using 3rd-party products to do so, and other listers who know about those products may not spot the thread otherwise. Andy Lacey http://www.minstersystems.co.uk > -----Original Message----- > From: accessd-bounces at databaseadvisors.com > [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of > Joseph O'Connell > Sent: 12 January 2004 16:23 > To: ACCESS-L at PEACH.EASE.LSOFT.COM; AccessD at databaseadvisors.com > Subject: [AccessD] Change printer > > > Cross posted to Access-L and AccessD > > I thought this was discussed recently, but I cannot find the > solution in the archives. > > Win 2000 > Access 2000 > > Is there an easy way to change the output device for a > report? An application has several reports that are normally > sent to a specific printer. Now the client wants the ability > to selectively create a PDF using Adobe Distiller and have > the PDF sent as an attachment to an email message. Because > this procedure must be totally automated, having the print > dialog box popup is not a viable solution. > > I know that this could be accomplished by having a second set > of reports that are already set to output to Distiller, but > this would create a maintenance problem to ensure that any > changes made to a printed report are also made to the > Distiller report. What I am looking for is code that can > change the destination to Distiller and then change it back > to the original destination after the PDF is created. > > Does anyone have the code to to this? Or can someone point > me to the API that can read and set the printer for a specific report? > > Thanks. > > Joe O'Connell > > > > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/a> ccessd > Website: > http://www.databaseadvisors.com > > From lists at jbsolutions.com.au Mon Jan 12 18:06:54 2004 From: lists at jbsolutions.com.au (Joshua B) Date: Tue, 13 Jan 2004 10:06:54 +1000 Subject: [AccessD] Change printer Message-ID: <200401130007.i0D07wm31666@databaseadvisors.com> Hello Joseph O'Connell, Have a look here... http://www.mvps.org/access/reports/rpt0009.htm HTH ======= At 2004-01-12, 11:23:00 you wrote: ======= >Cross posted to Access-L and AccessD > >I thought this was discussed recently, but I cannot find the solution in the >archives. > >Win 2000 >Access 2000 > >Is there an easy way to change the output device for a report? An >application has several reports that are normally sent to a specific >printer. Now the client wants the ability to selectively create a PDF using >Adobe Distiller and have the PDF sent as an attachment to an email message. >Because this procedure must be totally automated, having the print dialog >box popup is not a viable solution. > >I know that this could be accomplished by having a second set of reports >that are already set to output to Distiller, but this would create a >maintenance problem to ensure that any changes made to a printed report are >also made to the Distiller report. What I am looking for is code that can >change the destination to Distiller and then change it back to the original >destination after the PDF is created. > >Does anyone have the code to to this? Or can someone point me to the API >that can read and set the printer for a specific report? > >Thanks. > >Joe O'Connell = = = = = = = = = = = = = = = = = = = = Best regards. Joshua B lists at jbsolutions.com.au www.jbsolutions.com.au 2004-01-13 From accessd at shaw.ca Mon Jan 12 19:38:37 2004 From: accessd at shaw.ca (Jim Lawrence (AccessD)) Date: Mon, 12 Jan 2004 17:38:37 -0800 Subject: [AccessD] error questions In-Reply-To: <006f01c3d8b3$b90edb10$210110ac@SUSANONE> Message-ID: Hi Susan: I always have a universal error handler but the 'module' name and any other specific/local errors are sent from the caller function/subroutine to the error handler where there is an exact error message display and even an error logging routine. Jim -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Susan Harkins Sent: Sunday, January 11, 2004 6:25 PM To: AccessD at databaseadvisors.com Subject: [AccessD] error questions Any of you work with a generic error-handler for an entire module or perhaps even a public function instead of repeating possibilities in individual functions? Repeating error solutions and it seems inefficient. Susan H. _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From andrew.haslett at ilc.gov.au Mon Jan 12 21:04:53 2004 From: andrew.haslett at ilc.gov.au (Haslett, Andrew) Date: Tue, 13 Jan 2004 13:34:53 +1030 Subject: [AccessD] Access Security - Web Based ASP Message-ID: >> Integrated Windows Security will not pass the authentication over to other network resources, Another feature I love about ASP.Net. Impersonation.. -----Original Message----- From: DWUTKA at marlow.com [mailto:DWUTKA at marlow.com] Sent: Tuesday, 13 January 2004 6:50 AM To: accessd at databaseadvisors.com Subject: RE: [AccessD] Access Security - Web Based ASP Yes, with integrated windows security, you can get their login name, with one of the server variables in ASP. You CANNOT get their password that way. If you use plain text, both login name and password are available. One word of caution, Integrated Windows Security will not pass the authentication over to other network resources, so if you database is not directly on the webserver, users will not be able to reach it, thus your application will not work. Drew -----Original Message----- From: Mitsules, Mark S. (Newport News) [mailto:Mark.Mitsules at ngc.com] Sent: Monday, January 12, 2004 1:45 PM To: 'Access Developers discussion and problem solving' Subject: RE: [AccessD] Access Security - Web Based ASP Erwin, Drew, et. al. or et. aliae., Since my application will reside on our company intranet, I've been looking into using Integrated Windows Authentication. I've yet to submit the request to have this implemented...I need to clarify a few things. If I'm reading this correctly, when an ASP page is requested, the "actual" LAN username and password are not sent...merely a hash. I can understand about the password, but the reason I'm going through this in the first place is to determine the actual user. I was hoping that this method would provide me with their LAN login name so that I can filter the available records and return only the user's records. Since I can not test this out, I was hoping someone can verify...with Integrated Windows Authentication in place, can I retrieve the LAN login name through an ASP page and use that as a parameter for a stored procedure? In other words, once they are on the LAN they can access my data, but I want to make sure they access only THEIR data. Is this possible? Mark -----Original Message----- From: Erwin Craps - IT Helps [mailto:Erwin.Craps at ithelps.be] Sent: Friday, January 09, 2004 4:45 PM To: Access Developers discussion and problem solving Subject: RE: [AccessD] Access Security - Web Based ASP I have a small little trick I used for same reasons. I'm using a seperate MDB file which has linked tables to the backend database. Only the tables I really need are in the WEB database. If it ain't there you can get in.... But I supose that you the data of the people are all in the same table. You need a password system to login via the web, these user/password are stored in a table in your db. When a correct match you store the ID of the person into the session. If you build SQL string than you always use the persons ID stored in the session. So don't use any parameters with the URL string for person identification. You should be reasonably safe with that, but not 100%, you never are 100% safe.... Erwin -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Mitsules, Mark S. (Newport News) Sent: Friday, January 09, 2004 10:33 PM To: 'Access Developers discussion and problem solving' Subject: RE: [AccessD] Access Security - Web Based ASP Thanks. I will research Integrated Windows Authentication as an option. Mark -----Original Message----- From: DWUTKA at marlow.com [mailto:DWUTKA at marlow.com] Sent: Friday, January 09, 2004 4:06 PM To: accessd at databaseadvisors.com Subject: RE: [AccessD] Access Security - Web Based ASP With ASP, you can get the users logged in account, either with Integrated Windows Authentication, or plain text password. No need to have security on the db itself, if you don't put it into a directory 'visible' from the web. Drew -----Original Message----- From: Mitsules, Mark S. (Newport News) [mailto:Mark.Mitsules at ngc.com] Sent: Friday, January 09, 2004 2:40 PM To: '[AccessD]' Subject: [AccessD] Access Security - Web Based ASP I have an existing .mdb "protected" only by an API call to GetUserName...very limited access. It contains time charging data for the entire department ("company confidential...need to know" type stuff). In the simplest of terms, what is the minimum necessary to achieve the following scenario? I would like a user to be able to access ONLY THEIR time charging data through a web page interface. Are there alternatives? Mark _______________________________________________ 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 _______________________________________________ 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 _______________________________________________ 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 IMPORTANT - PLEASE READ ******************** This email and any files transmitted with it are confidential and may contain information protected by law from disclosure. If you have received this message in error, please notify the sender immediately and delete this email from your system. No warranty is given that this email or files, if attached to this email, are free from computer viruses or other defects. They are provided on the basis the user assumes all responsibility for loss, damage or consequence resulting directly or indirectly from their use, whether caused by the negligence of the sender or not. From DWUTKA at marlow.com Mon Jan 12 21:13:54 2004 From: DWUTKA at marlow.com (DWUTKA at marlow.com) Date: Mon, 12 Jan 2004 21:13:54 -0600 Subject: [AccessD] Access Security - Web Based ASP Message-ID: <2F8793082E00D4119A1700B0D0216BF80222772A@main2.marlow.com> Does it really apply in this case? I thought it was a function of the IIS server, the thread the IIS server is running under. If it does, you can do the same thing with a VB .dll, since you can impersonate accounts in VB. Drew -----Original Message----- From: Haslett, Andrew [mailto:andrew.haslett at ilc.gov.au] Sent: Monday, January 12, 2004 9:05 PM To: 'Access Developers discussion and problem solving' Subject: RE: [AccessD] Access Security - Web Based ASP >> Integrated Windows Security will not pass the authentication over to other network resources, Another feature I love about ASP.Net. Impersonation.. -----Original Message----- From: DWUTKA at marlow.com [mailto:DWUTKA at marlow.com] Sent: Tuesday, 13 January 2004 6:50 AM To: accessd at databaseadvisors.com Subject: RE: [AccessD] Access Security - Web Based ASP Yes, with integrated windows security, you can get their login name, with one of the server variables in ASP. You CANNOT get their password that way. If you use plain text, both login name and password are available. One word of caution, Integrated Windows Security will not pass the authentication over to other network resources, so if you database is not directly on the webserver, users will not be able to reach it, thus your application will not work. Drew -----Original Message----- From: Mitsules, Mark S. (Newport News) [mailto:Mark.Mitsules at ngc.com] Sent: Monday, January 12, 2004 1:45 PM To: 'Access Developers discussion and problem solving' Subject: RE: [AccessD] Access Security - Web Based ASP Erwin, Drew, et. al. or et. aliae., Since my application will reside on our company intranet, I've been looking into using Integrated Windows Authentication. I've yet to submit the request to have this implemented...I need to clarify a few things. If I'm reading this correctly, when an ASP page is requested, the "actual" LAN username and password are not sent...merely a hash. I can understand about the password, but the reason I'm going through this in the first place is to determine the actual user. I was hoping that this method would provide me with their LAN login name so that I can filter the available records and return only the user's records. Since I can not test this out, I was hoping someone can verify...with Integrated Windows Authentication in place, can I retrieve the LAN login name through an ASP page and use that as a parameter for a stored procedure? In other words, once they are on the LAN they can access my data, but I want to make sure they access only THEIR data. Is this possible? Mark -----Original Message----- From: Erwin Craps - IT Helps [mailto:Erwin.Craps at ithelps.be] Sent: Friday, January 09, 2004 4:45 PM To: Access Developers discussion and problem solving Subject: RE: [AccessD] Access Security - Web Based ASP I have a small little trick I used for same reasons. I'm using a seperate MDB file which has linked tables to the backend database. Only the tables I really need are in the WEB database. If it ain't there you can get in.... But I supose that you the data of the people are all in the same table. You need a password system to login via the web, these user/password are stored in a table in your db. When a correct match you store the ID of the person into the session. If you build SQL string than you always use the persons ID stored in the session. So don't use any parameters with the URL string for person identification. You should be reasonably safe with that, but not 100%, you never are 100% safe.... Erwin -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Mitsules, Mark S. (Newport News) Sent: Friday, January 09, 2004 10:33 PM To: 'Access Developers discussion and problem solving' Subject: RE: [AccessD] Access Security - Web Based ASP Thanks. I will research Integrated Windows Authentication as an option. Mark -----Original Message----- From: DWUTKA at marlow.com [mailto:DWUTKA at marlow.com] Sent: Friday, January 09, 2004 4:06 PM To: accessd at databaseadvisors.com Subject: RE: [AccessD] Access Security - Web Based ASP With ASP, you can get the users logged in account, either with Integrated Windows Authentication, or plain text password. No need to have security on the db itself, if you don't put it into a directory 'visible' from the web. Drew -----Original Message----- From: Mitsules, Mark S. (Newport News) [mailto:Mark.Mitsules at ngc.com] Sent: Friday, January 09, 2004 2:40 PM To: '[AccessD]' Subject: [AccessD] Access Security - Web Based ASP I have an existing .mdb "protected" only by an API call to GetUserName...very limited access. It contains time charging data for the entire department ("company confidential...need to know" type stuff). In the simplest of terms, what is the minimum necessary to achieve the following scenario? I would like a user to be able to access ONLY THEIR time charging data through a web page interface. Are there alternatives? Mark _______________________________________________ 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 _______________________________________________ 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 _______________________________________________ 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 IMPORTANT - PLEASE READ ******************** This email and any files transmitted with it are confidential and may contain information protected by law from disclosure. If you have received this message in error, please notify the sender immediately and delete this email from your system. No warranty is given that this email or files, if attached to this email, are free from computer viruses or other defects. They are provided on the basis the user assumes all responsibility for loss, damage or consequence resulting directly or indirectly from their use, whether caused by the negligence of the sender or not. _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From joconnell at indy.rr.com Mon Jan 12 23:31:47 2004 From: joconnell at indy.rr.com (Joseph O'Connell) Date: Tue, 13 Jan 2004 00:31:47 -0500 Subject: [AccessD] Change printer Message-ID: <00cd01c3d996$8c164f60$6701a8c0@joe> Andy, Unfortunately I am locked into Distiller for creating the PDF. Joe -----Original Message----- From: Andy Lacey To: 'Access Developers discussion and problem solving' Date: Monday, January 12, 2004 6:17 PM Subject: RE: [AccessD] Change printer |Hi Joe |This crops up regularly on the list. If you search the archives on PDF |you'll find a bunch of hits with lots of advice. And I'd suggest you rename |this thread to put PDF in it somewhere because there are solutions to |creating a PDF which don't involve changing printers, basically by using |3rd-party products to do so, and other listers who know about those products |may not spot the thread otherwise. | |Andy Lacey |http://www.minstersystems.co.uk | |> -----Original Message----- |> From: accessd-bounces at databaseadvisors.com |> [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of |> Joseph O'Connell |> Sent: 12 January 2004 16:23 |> To: ACCESS-L at PEACH.EASE.LSOFT.COM; AccessD at databaseadvisors.com |> Subject: [AccessD] Change printer |> |> |> Cross posted to Access-L and AccessD |> |> I thought this was discussed recently, but I cannot find the |> solution in the archives. |> |> Win 2000 |> Access 2000 |> |> Is there an easy way to change the output device for a |> report? An application has several reports that are normally |> sent to a specific printer. Now the client wants the ability |> to selectively create a PDF using Adobe Distiller and have |> the PDF sent as an attachment to an email message. Because |> this procedure must be totally automated, having the print |> dialog box popup is not a viable solution. |> |> I know that this could be accomplished by having a second set |> of reports that are already set to output to Distiller, but |> this would create a maintenance problem to ensure that any |> changes made to a printed report are also made to the |> Distiller report. What I am looking for is code that can |> change the destination to Distiller and then change it back |> to the original destination after the PDF is created. |> |> Does anyone have the code to to this? Or can someone point |> me to the API that can read and set the printer for a specific report? |> |> Thanks. |> |> Joe O'Connell |> |> |> |> _______________________________________________ |> AccessD mailing list |> AccessD at databaseadvisors.com |> http://databaseadvisors.com/mailman/listinfo/a> ccessd |> Website: |> http://www.databaseadvisors.com |> |> | |_______________________________________________ |AccessD mailing list |AccessD at databaseadvisors.com |http://databaseadvisors.com/mailman/listinfo/accessd |Website: http://www.databaseadvisors.com From joconnell at indy.rr.com Mon Jan 12 23:33:09 2004 From: joconnell at indy.rr.com (Joseph O'Connell) Date: Tue, 13 Jan 2004 00:33:09 -0500 Subject: [AccessD] Change printer Message-ID: <00da01c3d996$d53a5ec0$6701a8c0@joe> Joshua, Thank you. This site has a lot of good information. Joe -----Original Message----- From: Joshua B To: Access Developers discussion and Date: Monday, January 12, 2004 7:20 PM Subject: Re: [AccessD] Change printer |Hello Joseph O'Connell, | |Have a look here... http://www.mvps.org/access/reports/rpt0009.htm | |HTH | |======= At 2004-01-12, 11:23:00 you wrote: ======= | |>Cross posted to Access-L and AccessD |> |>I thought this was discussed recently, but I cannot find the solution in the |>archives. |> |>Win 2000 |>Access 2000 |> |>Is there an easy way to change the output device for a report? An |>application has several reports that are normally sent to a specific |>printer. Now the client wants the ability to selectively create a PDF using |>Adobe Distiller and have the PDF sent as an attachment to an email message. |>Because this procedure must be totally automated, having the print dialog |>box popup is not a viable solution. |> |>I know that this could be accomplished by having a second set of reports |>that are already set to output to Distiller, but this would create a |>maintenance problem to ensure that any changes made to a printed report are |>also made to the Distiller report. What I am looking for is code that can |>change the destination to Distiller and then change it back to the original |>destination after the PDF is created. |> |>Does anyone have the code to to this? Or can someone point me to the API |>that can read and set the printer for a specific report? |> |>Thanks. |> |>Joe O'Connell |= = = = = = = = = = = = = = = = = = = = | | |Best regards. |Joshua B |lists at jbsolutions.com.au |www.jbsolutions.com.au |2004-01-13 | | |_______________________________________________ |AccessD mailing list |AccessD at databaseadvisors.com |http://databaseadvisors.com/mailman/listinfo/accessd |Website: http://www.databaseadvisors.com From andrew.haslett at ilc.gov.au Tue Jan 13 03:11:01 2004 From: andrew.haslett at ilc.gov.au (Haslett, Andrew) Date: Tue, 13 Jan 2004 19:41:01 +1030 Subject: [AccessD] Access Security - Web Based ASP Message-ID: ASP.Net can impersonate under the context of a specified account or the account passed to it by IIS. Therefore you can pass authentication credentials automatically to a db connection (although you'd rarely want to do this as a different conn string will negate connection pooling), or any other resources. Cheers, A -----Original Message----- From: DWUTKA at marlow.com [mailto:DWUTKA at marlow.com] Sent: Tuesday, 13 January 2004 1:44 PM To: accessd at databaseadvisors.com Subject: RE: [AccessD] Access Security - Web Based ASP Does it really apply in this case? I thought it was a function of the IIS server, the thread the IIS server is running under. If it does, you can do the same thing with a VB .dll, since you can impersonate accounts in VB. Drew -----Original Message----- From: Haslett, Andrew [mailto:andrew.haslett at ilc.gov.au] Sent: Monday, January 12, 2004 9:05 PM To: 'Access Developers discussion and problem solving' Subject: RE: [AccessD] Access Security - Web Based ASP >> Integrated Windows Security will not pass the authentication over to other network resources, Another feature I love about ASP.Net. Impersonation.. -----Original Message----- From: DWUTKA at marlow.com [mailto:DWUTKA at marlow.com] Sent: Tuesday, 13 January 2004 6:50 AM To: accessd at databaseadvisors.com Subject: RE: [AccessD] Access Security - Web Based ASP Yes, with integrated windows security, you can get their login name, with one of the server variables in ASP. You CANNOT get their password that way. If you use plain text, both login name and password are available. One word of caution, Integrated Windows Security will not pass the authentication over to other network resources, so if you database is not directly on the webserver, users will not be able to reach it, thus your application will not work. Drew -----Original Message----- From: Mitsules, Mark S. (Newport News) [mailto:Mark.Mitsules at ngc.com] Sent: Monday, January 12, 2004 1:45 PM To: 'Access Developers discussion and problem solving' Subject: RE: [AccessD] Access Security - Web Based ASP Erwin, Drew, et. al. or et. aliae., Since my application will reside on our company intranet, I've been looking into using Integrated Windows Authentication. I've yet to submit the request to have this implemented...I need to clarify a few things. If I'm reading this correctly, when an ASP page is requested, the "actual" LAN username and password are not sent...merely a hash. I can understand about the password, but the reason I'm going through this in the first place is to determine the actual user. I was hoping that this method would provide me with their LAN login name so that I can filter the available records and return only the user's records. Since I can not test this out, I was hoping someone can verify...with Integrated Windows Authentication in place, can I retrieve the LAN login name through an ASP page and use that as a parameter for a stored procedure? In other words, once they are on the LAN they can access my data, but I want to make sure they access only THEIR data. Is this possible? Mark -----Original Message----- From: Erwin Craps - IT Helps [mailto:Erwin.Craps at ithelps.be] Sent: Friday, January 09, 2004 4:45 PM To: Access Developers discussion and problem solving Subject: RE: [AccessD] Access Security - Web Based ASP I have a small little trick I used for same reasons. I'm using a seperate MDB file which has linked tables to the backend database. Only the tables I really need are in the WEB database. If it ain't there you can get in.... But I supose that you the data of the people are all in the same table. You need a password system to login via the web, these user/password are stored in a table in your db. When a correct match you store the ID of the person into the session. If you build SQL string than you always use the persons ID stored in the session. So don't use any parameters with the URL string for person identification. You should be reasonably safe with that, but not 100%, you never are 100% safe.... Erwin -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Mitsules, Mark S. (Newport News) Sent: Friday, January 09, 2004 10:33 PM To: 'Access Developers discussion and problem solving' Subject: RE: [AccessD] Access Security - Web Based ASP Thanks. I will research Integrated Windows Authentication as an option. Mark -----Original Message----- From: DWUTKA at marlow.com [mailto:DWUTKA at marlow.com] Sent: Friday, January 09, 2004 4:06 PM To: accessd at databaseadvisors.com Subject: RE: [AccessD] Access Security - Web Based ASP With ASP, you can get the users logged in account, either with Integrated Windows Authentication, or plain text password. No need to have security on the db itself, if you don't put it into a directory 'visible' from the web. Drew -----Original Message----- From: Mitsules, Mark S. (Newport News) [mailto:Mark.Mitsules at ngc.com] Sent: Friday, January 09, 2004 2:40 PM To: '[AccessD]' Subject: [AccessD] Access Security - Web Based ASP I have an existing .mdb "protected" only by an API call to GetUserName...very limited access. It contains time charging data for the entire department ("company confidential...need to know" type stuff). In the simplest of terms, what is the minimum necessary to achieve the following scenario? I would like a user to be able to access ONLY THEIR time charging data through a web page interface. Are there alternatives? Mark _______________________________________________ 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 _______________________________________________ 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 _______________________________________________ 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 IMPORTANT - PLEASE READ ******************** This email and any files transmitted with it are confidential and may contain information protected by law from disclosure. If you have received this message in error, please notify the sender immediately and delete this email from your system. No warranty is given that this email or files, if attached to this email, are free from computer viruses or other defects. They are provided on the basis the user assumes all responsibility for loss, damage or consequence resulting directly or indirectly from their use, whether caused by the negligence of the sender or not. _______________________________________________ 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 IMPORTANT - PLEASE READ ******************** This email and any files transmitted with it are confidential and may contain information protected by law from disclosure. If you have received this message in error, please notify the sender immediately and delete this email from your system. No warranty is given that this email or files, if attached to this email, are free from computer viruses or other defects. They are provided on the basis the user assumes all responsibility for loss, damage or consequence resulting directly or indirectly from their use, whether caused by the negligence of the sender or not. From chris at thecube.net Tue Jan 13 04:24:13 2004 From: chris at thecube.net (chris at thecube.net) Date: Tue, 13 Jan 2004 05:24:13 -0500 Subject: [AccessD] =function() in .onclick Message-ID: <3C80C40F0C7A466483B5961EA3EE00F5.MAI@freeparking.co.uk> Hi All, Instead of writing 54 event procedures, i simply iterate through a collection of checkboxes and set their AfterUpdate property to a function like so: for index = 1 to 54 me("chkTemplate" & index).Afterupdate = "=toggleTemplate(" & index & ")" next now, on some Access 2000 installs this works fine, yet on others it baulks at trying to put a function straight into the event like above. Am I doing anything wrong? Cheers Chris From jwcolby at colbyconsulting.com Tue Jan 13 04:39:56 2004 From: jwcolby at colbyconsulting.com (John W. Colby) Date: Tue, 13 Jan 2004 05:39:56 -0500 Subject: [AccessD] =function() in .onclick In-Reply-To: <3C80C40F0C7A466483B5961EA3EE00F5.MAI@freeparking.co.uk> Message-ID: I can't help you as to why it sometimes works and others it doesn't. However I'd like to say I HATE it when developers do this (and I have to maintain it). I routinely use the find dialog to find instances of code. Doing it like that means that I have to use a find and replace utility instead which is much more intrusive to my development effort. Another thing is that if you ever intend to use Withevents, they don't fire unless the words [Event Procedure] are in the property. If you have an event stub, you can use withevents (sink the event in a class) and the event handler in the form at the same time - the event handler in the class simply gets control first. Doing it with the function call in the property prevents sinking that control's events anywhere else. Now... If you ever handed that application off to someone like myself (who uses withevents), I build a class that directly pokes the words [Event Procedure] into the control's event property (to make sure the event fires) and now MY class works but your functionality abruptly ceases to work. Just thought I'd throw that out there. If I were you I'd probably write a class that handles those checkboxes, either individually or en mass. John W. Colby www.ColbyConsulting.com -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of chris at thecube.net Sent: Tuesday, January 13, 2004 5:24 AM To: accessd at databaseadvisors.com Subject: [AccessD] =function() in .onclick Hi All, Instead of writing 54 event procedures, i simply iterate through a collection of checkboxes and set their AfterUpdate property to a function like so: for index = 1 to 54 me("chkTemplate" & index).Afterupdate = "=toggleTemplate(" & index & ")" next now, on some Access 2000 installs this works fine, yet on others it baulks at trying to put a function straight into the event like above. Am I doing anything wrong? Cheers Chris From chris at thecube.net Tue Jan 13 05:08:06 2004 From: chris at thecube.net (chris at thecube.net) Date: Tue, 13 Jan 2004 06:08:06 -0500 Subject: [AccessD] =function() in .onclick Message-ID: <621FDD9DA76A46FA837FEB7CF6EB31E8.MAI@freeparking.co.uk> John, Thanks for the 'warm' response . I think i will get on and write the checkbox class to handle all of the checkboxes, on the subject of WithEvents/DEEP, do you have a lot of variants for say textboxes or do you prefer to add parameters at runtime to sink different events / control behaiviour? Cheers John Chris ----- Original Message ----- From: John W. Colby To: "Access Developers discussion and problem solving" Sent: Tue, 13 Jan 2004 05:39:56 -0500 Subject: RE: [AccessD] =function() in .onclick I can't help you as to why it sometimes works and others it doesn't. However I'd like to say I HATE it when developers do this (and I have to maintain it). I routinely use the find dialog to find instances of code. Doing it like that means that I have to use a find and replace utility instead which is much more intrusive to my development effort. Another thing is that if you ever intend to use Withevents, they don't fire unless the words [Event Procedure] are in the property. If you have an event stub, you can use withevents (sink the event in a class) and the event handler in the form at the same time - the event handler in the class simply gets control first. Doing it with the function call in the property prevents sinking that control's events anywhere else. Now... If you ever handed that application off to someone like myself (who uses withevents), I build a class that directly pokes the words [Event Procedure] into the control's event property (to make sure the event fires) and now MY class works but your functionality abruptly ceases to work. Just thought I'd throw that out there. If I were you I'd probably write a class that handles those checkboxes, either individually or en mass. John W. Colby www.ColbyConsulting.com -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of chris at thecube.net Sent: Tuesday, January 13, 2004 5:24 AM To: accessd at databaseadvisors.com Subject: [AccessD] =function() in .onclick Hi All, Instead of writing 54 event procedures, i simply iterate through a collection of checkboxes and set their AfterUpdate property to a function like so: for index = 1 to 54 me("chkTemplate" & index).Afterupdate = "=toggleTemplate(" & index & ")" next now, on some Access 2000 installs this works fine, yet on others it baulks at trying to put a function straight into the event like above. Am I doing anything wrong? Cheers Chris _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From jwcolby at colbyconsulting.com Tue Jan 13 05:32:48 2004 From: jwcolby at colbyconsulting.com (John W. Colby) Date: Tue, 13 Jan 2004 06:32:48 -0500 Subject: [AccessD] =function() in .onclick In-Reply-To: <621FDD9DA76A46FA837FEB7CF6EB31E8.MAI@freeparking.co.uk> Message-ID: Chris, >do you have a lot of variants for say textboxes or do you prefer to add parameters at runtime to sink different events / control behavior? I actually have an entire framework that does all of this stuff. I have a form class that sinks all of the form's events. That class has a collection which holds a class instance for each control found on the form. I then have classes for each control type which implement standard behaviors which I find useful - dblclick for a combo can open a list form for entering or correcting data contained in the combo, NotInList can add data to the table behind the combo and requery the combo when done etc. The form class has a scanner that cycles through all the controls in its form's control collection, instantiating a class for each control found (that I have a class for anyway). IOW, as the form loads, it scans for all controls, loads a class for each control found and saves a pointer to that control in the control class collection in the form's header. I then use what I call SysVars or System Variables to enable / disable specific form / control functionality. It turns out I have to "set up" things like the double click and NotInList for a combo anyway, i.e. I have to tell the combo the name of the form or the name of the table and the field in the table to place data in NotInList. My form open ends up looking something like: Option Compare Database Option Explicit Public WithEvents fclsFrm As dclsFrm Private Sub Form_Open(Cancel As Integer) On Error GoTo Err_Form_Open Set fclsFrm = New dclsFrm fclsFrm.Init Nothing, Me, Cancel If Cancel Then Exit Sub 'init the combo dbl-click and NotInList On Error Resume Next With fclsFrm.Children .Item("cboCountry").NotInListData "", "", "lfrmCountry" .Item("cboState").NotInListData "", "", "lfrmState" End With 'look for the lfrm used by these combos. 'fclsFrm.Children("cboCountry").LFrm = "lfrmCountry" 'fclsFrm.Children("cboState").LFrm = "lfrmState" Exit_Form_Open: Exit Sub Err_Form_Open: Select Case Err Case 0 '.insert Errors you wish to ignore here Resume Next Case Else '.All other errors will trap Beep MsgBox Err.Description, , "Error in Sub tfrmClients.Form_Open" Resume Exit_Form_Open End Select Resume 0 '.FOR TROUBLESHOOTING End Sub As you can see, I dim a class for the form (fclsFrm), then in OnOpen I instantiate it. By the time the form class init returns all the control classes have been loaded and are sitting in the children collection keyed on control name. I then "set up" things like NotInList by calling a function in the combo's class passing in the name of the form (and also table / field for single field list tables). Sometimes I want the NotInList to open a form (it is complex data with many fields), sometimes I want it to just enter the data into a specific field in the table (it is a simple list like titles or colors). So, the answer to your question is, I have the generic functionality I need for the controls already in the class for that control type. I can use it or not depending on whether I tell the class to do so. Very form / application specific behaviors I will generally program out in a separate class. John W. Colby www.ColbyConsulting.com -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of chris at thecube.net Sent: Tuesday, January 13, 2004 6:08 AM To: accessd at databaseadvisors.com Subject: RE: [AccessD] =function() in .onclick John, Thanks for the 'warm' response . I think i will get on and write the checkbox class to handle all of the checkboxes, on the subject of WithEvents/DEEP, do you have a lot of variants for say textboxes or do you prefer to add parameters at runtime to sink different events / control behaiviour? Cheers John Chris ----- Original Message ----- From: John W. Colby To: "Access Developers discussion and problem solving" Sent: Tue, 13 Jan 2004 05:39:56 -0500 Subject: RE: [AccessD] =function() in .onclick I can't help you as to why it sometimes works and others it doesn't. However I'd like to say I HATE it when developers do this (and I have to maintain it). I routinely use the find dialog to find instances of code. Doing it like that means that I have to use a find and replace utility instead which is much more intrusive to my development effort. Another thing is that if you ever intend to use Withevents, they don't fire unless the words [Event Procedure] are in the property. If you have an event stub, you can use withevents (sink the event in a class) and the event handler in the form at the same time - the event handler in the class simply gets control first. Doing it with the function call in the property prevents sinking that control's events anywhere else. Now... If you ever handed that application off to someone like myself (who uses withevents), I build a class that directly pokes the words [Event Procedure] into the control's event property (to make sure the event fires) and now MY class works but your functionality abruptly ceases to work. Just thought I'd throw that out there. If I were you I'd probably write a class that handles those checkboxes, either individually or en mass. John W. Colby www.ColbyConsulting.com -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of chris at thecube.net Sent: Tuesday, January 13, 2004 5:24 AM To: accessd at databaseadvisors.com Subject: [AccessD] =function() in .onclick Hi All, Instead of writing 54 event procedures, i simply iterate through a collection of checkboxes and set their AfterUpdate property to a function like so: for index = 1 to 54 me("chkTemplate" & index).Afterupdate = "=toggleTemplate(" & index & ")" next now, on some Access 2000 installs this works fine, yet on others it baulks at trying to put a function straight into the event like above. Am I doing anything wrong? Cheers Chris _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From chris at thecube.net Tue Jan 13 07:00:30 2004 From: chris at thecube.net (chris at thecube.net) Date: Tue, 13 Jan 2004 08:00:30 -0500 Subject: [AccessD] =function() in .onclick Message-ID: John, Very similar to my method, but with a few slight differences, i may have missed out on new methods of using withevents, but i instantiate a class for the form, and instantiate classes for each of the controls (unless i exclude them) i control the behaviour of the controls using a list of parameters in the tag property so an entire data form could look like this behind the scenes. Dim DEEP As New clsFormControls Private Sub Form_Load() DEEP.Init Me End Sub Private Sub Form_Close() DEEP.Terminate End Sub and then i have a range of parameters for each of the controls: Text Boxes: DateControl=True applies a common input mask and formatting, as well as adding double-click functionality that pops up a calendar FilterForm=True;FilterField= Dynamically filters the Form Data QuickSearch=True;SearchCtl=ControlName for doing a quick search (suprisingly) I have made various of other additions but i must mention that my code is largely based on Shamil Salakhetdinov's external events programming but i feel quite pleased with my modifications ----- Original Message ----- From: John W. Colby To: "Access Developers discussion and problem solving" Sent: Tue, 13 Jan 2004 06:32:48 -0500 Subject: RE: [AccessD] =function() in .onclick Chris, >do you have a lot of variants for say textboxes or do you prefer to add parameters at runtime to sink different events / control behavior? I actually have an entire framework that does all of this stuff. I have a form class that sinks all of the form's events. That class has a collection which holds a class instance for each control found on the form. I then have classes for each control type which implement standard behaviors which I find useful - dblclick for a combo can open a list form for entering or correcting data contained in the combo, NotInList can add data to the table behind the combo and requery the combo when done etc. The form class has a scanner that cycles through all the controls in its form's control collection, instantiating a class for each control found (that I have a class for anyway). IOW, as the form loads, it scans for all controls, loads a class for each control found and saves a pointer to that control in the control class collection in the form's header. I then use what I call SysVars or System Variables to enable / disable specific form / control functionality. It turns out I have to "set up" things like the double click and NotInList for a combo anyway, i.e. I have to tell the combo the name of the form or the name of the table and the field in the table to place data in NotInList. My form open ends up looking something like: Option Compare Database Option Explicit Public WithEvents fclsFrm As dclsFrm Private Sub Form_Open(Cancel As Integer) On Error GoTo Err_Form_Open Set fclsFrm = New dclsFrm fclsFrm.Init Nothing, Me, Cancel If Cancel Then Exit Sub 'init the combo dbl-click and NotInList On Error Resume Next With fclsFrm.Children .Item("cboCountry").NotInListData "", "", "lfrmCountry" .Item("cboState").NotInListData "", "", "lfrmState" End With 'look for the lfrm used by these combos. 'fclsFrm.Children("cboCountry").LFrm = "lfrmCountry" 'fclsFrm.Children("cboState").LFrm = "lfrmState" Exit_Form_Open: Exit Sub Err_Form_Open: Select Case Err Case 0 '.insert Errors you wish to ignore here Resume Next Case Else '.All other errors will trap Beep MsgBox Err.Description, , "Error in Sub tfrmClients.Form_Open" Resume Exit_Form_Open End Select Resume 0 '.FOR TROUBLESHOOTING End Sub As you can see, I dim a class for the form (fclsFrm), then in OnOpen I instantiate it. By the time the form class init returns all the control classes have been loaded and are sitting in the children collection keyed on control name. I then "set up" things like NotInList by calling a function in the combo's class passing in the name of the form (and also table / field for single field list tables). Sometimes I want the NotInList to open a form (it is complex data with many fields), sometimes I want it to just enter the data into a specific field in the table (it is a simple list like titles or colors). So, the answer to your question is, I have the generic functionality I need for the controls already in the class for that control type. I can use it or not depending on whether I tell the class to do so. Very form / application specific behaviors I will generally program out in a separate class. John W. Colby www.ColbyConsulting.com -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of chris at thecube.net Sent: Tuesday, January 13, 2004 6:08 AM To: accessd at databaseadvisors.com Subject: RE: [AccessD] =function() in .onclick John, Thanks for the 'warm' response . I think i will get on and write the checkbox class to handle all of the checkboxes, on the subject of WithEvents/DEEP, do you have a lot of variants for say textboxes or do you prefer to add parameters at runtime to sink different events / control behaiviour? Cheers John Chris ----- Original Message ----- From: John W. Colby To: "Access Developers discussion and problem solving" Sent: Tue, 13 Jan 2004 05:39:56 -0500 Subject: RE: [AccessD] =function() in .onclick I can't help you as to why it sometimes works and others it doesn't. However I'd like to say I HATE it when developers do this (and I have to maintain it). I routinely use the find dialog to find instances of code. Doing it like that means that I have to use a find and replace utility instead which is much more intrusive to my development effort. Another thing is that if you ever intend to use Withevents, they don't fire unless the words [Event Procedure] are in the property. If you have an event stub, you can use withevents (sink the event in a class) and the event handler in the form at the same time - the event handler in the class simply gets control first. Doing it with the function call in the property prevents sinking that control's events anywhere else. Now... If you ever handed that application off to someone like myself (who uses withevents), I build a class that directly pokes the words [Event Procedure] into the control's event property (to make sure the event fires) and now MY class works but your functionality abruptly ceases to work. Just thought I'd throw that out there. If I were you I'd probably write a class that handles those checkboxes, either individually or en mass. John W. Colby www.ColbyConsulting.com -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of chris at thecube.net Sent: Tuesday, January 13, 2004 5:24 AM To: accessd at databaseadvisors.com Subject: [AccessD] =function() in .onclick Hi All, Instead of writing 54 event procedures, i simply iterate through a collection of checkboxes and set their AfterUpdate property to a function like so: for index = 1 to 54 me("chkTemplate" & index).Afterupdate = "=toggleTemplate(" & index & ")" next now, on some Access 2000 installs this works fine, yet on others it baulks at trying to put a function straight into the event like above. Am I doing anything wrong? Cheers Chris From jwcolby at colbyconsulting.com Tue Jan 13 08:23:10 2004 From: jwcolby at colbyconsulting.com (John W. Colby) Date: Tue, 13 Jan 2004 09:23:10 -0500 Subject: [AccessD] Enumerated constants Message-ID: Can enumerated constant VALUES be strings? public enum numbers one = "one" end enum Etc? I can't seem to get this to work. John W. Colby www.ColbyConsulting.com From jwcolby at colbyconsulting.com Tue Jan 13 08:43:42 2004 From: jwcolby at colbyconsulting.com (John W. Colby) Date: Tue, 13 Jan 2004 09:43:42 -0500 Subject: [AccessD] =function() in .onclick In-Reply-To: Message-ID: Chris, I credit Shamil with teaching me everything I know about Withevents. I would never have discovered them, and would not be where I am today in Access without his examples and his prodding to look at WithEvents. If you looked at Shamil's stuff you will see where he places the [Event Procedure] in the control's event procedure using code inside the Init event of the class itself as the class instantiates. That is where I learned to do this and one reason I so dislike developers putting function calls in those properties. I used to use the tag property a lot using ADH code to set and read them. Once I started using classes I moved away from that to either setting properties directly in the class init or (in the case of my scanner, where it's more generic) using class properties to set these values later. There are pluses and minuses to using the tag - the control carries it's initialization properties with it, but if any other developer uses the tag yours can get trashed. I finally just stopped using it although there is still ONE place I do, and that is in my Just In Time form loading, where I place the form name in the tag. If it's there it will do JIT, otherwise it just loads normally. I would like to thank you though for the hint about input masks. My users have been pushing me to "standardize" the date inputmasks and using my framework I can do just that quite easily. John W. Colby www.ColbyConsulting.com -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of chris at thecube.net Sent: Tuesday, January 13, 2004 8:00 AM To: accessd at databaseadvisors.com Subject: RE: [AccessD] =function() in .onclick John, Very similar to my method, but with a few slight differences, i may have missed out on new methods of using withevents, but i instantiate a class for the form, and instantiate classes for each of the controls (unless i exclude them) i control the behaviour of the controls using a list of parameters in the tag property so an entire data form could look like this behind the scenes. Dim DEEP As New clsFormControls Private Sub Form_Load() DEEP.Init Me End Sub Private Sub Form_Close() DEEP.Terminate End Sub and then i have a range of parameters for each of the controls: Text Boxes: DateControl=True applies a common input mask and formatting, as well as adding double-click functionality that pops up a calendar FilterForm=True;FilterField= Dynamically filters the Form Data QuickSearch=True;SearchCtl=ControlName for doing a quick search (suprisingly) I have made various of other additions but i must mention that my code is largely based on Shamil Salakhetdinov's external events programming but i feel quite pleased with my modifications ----- Original Message ----- From: John W. Colby To: "Access Developers discussion and problem solving" Sent: Tue, 13 Jan 2004 06:32:48 -0500 Subject: RE: [AccessD] =function() in .onclick Chris, >do you have a lot of variants for say textboxes or do you prefer to add parameters at runtime to sink different events / control behavior? I actually have an entire framework that does all of this stuff. I have a form class that sinks all of the form's events. That class has a collection which holds a class instance for each control found on the form. I then have classes for each control type which implement standard behaviors which I find useful - dblclick for a combo can open a list form for entering or correcting data contained in the combo, NotInList can add data to the table behind the combo and requery the combo when done etc. The form class has a scanner that cycles through all the controls in its form's control collection, instantiating a class for each control found (that I have a class for anyway). IOW, as the form loads, it scans for all controls, loads a class for each control found and saves a pointer to that control in the control class collection in the form's header. I then use what I call SysVars or System Variables to enable / disable specific form / control functionality. It turns out I have to "set up" things like the double click and NotInList for a combo anyway, i.e. I have to tell the combo the name of the form or the name of the table and the field in the table to place data in NotInList. My form open ends up looking something like: Option Compare Database Option Explicit Public WithEvents fclsFrm As dclsFrm Private Sub Form_Open(Cancel As Integer) On Error GoTo Err_Form_Open Set fclsFrm = New dclsFrm fclsFrm.Init Nothing, Me, Cancel If Cancel Then Exit Sub 'init the combo dbl-click and NotInList On Error Resume Next With fclsFrm.Children .Item("cboCountry").NotInListData "", "", "lfrmCountry" .Item("cboState").NotInListData "", "", "lfrmState" End With 'look for the lfrm used by these combos. 'fclsFrm.Children("cboCountry").LFrm = "lfrmCountry" 'fclsFrm.Children("cboState").LFrm = "lfrmState" Exit_Form_Open: Exit Sub Err_Form_Open: Select Case Err Case 0 '.insert Errors you wish to ignore here Resume Next Case Else '.All other errors will trap Beep MsgBox Err.Description, , "Error in Sub tfrmClients.Form_Open" Resume Exit_Form_Open End Select Resume 0 '.FOR TROUBLESHOOTING End Sub As you can see, I dim a class for the form (fclsFrm), then in OnOpen I instantiate it. By the time the form class init returns all the control classes have been loaded and are sitting in the children collection keyed on control name. I then "set up" things like NotInList by calling a function in the combo's class passing in the name of the form (and also table / field for single field list tables). Sometimes I want the NotInList to open a form (it is complex data with many fields), sometimes I want it to just enter the data into a specific field in the table (it is a simple list like titles or colors). So, the answer to your question is, I have the generic functionality I need for the controls already in the class for that control type. I can use it or not depending on whether I tell the class to do so. Very form / application specific behaviors I will generally program out in a separate class. John W. Colby www.ColbyConsulting.com -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of chris at thecube.net Sent: Tuesday, January 13, 2004 6:08 AM To: accessd at databaseadvisors.com Subject: RE: [AccessD] =function() in .onclick John, Thanks for the 'warm' response . I think i will get on and write the checkbox class to handle all of the checkboxes, on the subject of WithEvents/DEEP, do you have a lot of variants for say textboxes or do you prefer to add parameters at runtime to sink different events / control behaiviour? Cheers John Chris ----- Original Message ----- From: John W. Colby To: "Access Developers discussion and problem solving" Sent: Tue, 13 Jan 2004 05:39:56 -0500 Subject: RE: [AccessD] =function() in .onclick I can't help you as to why it sometimes works and others it doesn't. However I'd like to say I HATE it when developers do this (and I have to maintain it). I routinely use the find dialog to find instances of code. Doing it like that means that I have to use a find and replace utility instead which is much more intrusive to my development effort. Another thing is that if you ever intend to use Withevents, they don't fire unless the words [Event Procedure] are in the property. If you have an event stub, you can use withevents (sink the event in a class) and the event handler in the form at the same time - the event handler in the class simply gets control first. Doing it with the function call in the property prevents sinking that control's events anywhere else. Now... If you ever handed that application off to someone like myself (who uses withevents), I build a class that directly pokes the words [Event Procedure] into the control's event property (to make sure the event fires) and now MY class works but your functionality abruptly ceases to work. Just thought I'd throw that out there. If I were you I'd probably write a class that handles those checkboxes, either individually or en mass. John W. Colby www.ColbyConsulting.com -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of chris at thecube.net Sent: Tuesday, January 13, 2004 5:24 AM To: accessd at databaseadvisors.com Subject: [AccessD] =function() in .onclick Hi All, Instead of writing 54 event procedures, i simply iterate through a collection of checkboxes and set their AfterUpdate property to a function like so: for index = 1 to 54 me("chkTemplate" & index).Afterupdate = "=toggleTemplate(" & index & ")" next now, on some Access 2000 installs this works fine, yet on others it baulks at trying to put a function straight into the event like above. Am I doing anything wrong? Cheers Chris From James at fcidms.com Tue Jan 13 08:43:15 2004 From: James at fcidms.com (James Barash) Date: Tue, 13 Jan 2004 09:43:15 -0500 Subject: [AccessD] Enumerated constants In-Reply-To: Message-ID: No, enums can only be Longs. James Barash -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of John W. Colby Sent: Tuesday, January 13, 2004 9:23 AM To: AccessD Subject: [AccessD] Enumerated constants Can enumerated constant VALUES be strings? public enum numbers one = "one" end enum Etc? I can't seem to get this to work. John W. Colby www.ColbyConsulting.com _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From jwcolby at colbyconsulting.com Tue Jan 13 08:58:21 2004 From: jwcolby at colbyconsulting.com (John W. Colby) Date: Tue, 13 Jan 2004 09:58:21 -0500 Subject: [AccessD] Enumerated constants In-Reply-To: Message-ID: I was afraid of that. Thanks, John W. Colby www.ColbyConsulting.com -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of James Barash Sent: Tuesday, January 13, 2004 9:43 AM To: 'Access Developers discussion and problem solving' Subject: RE: [AccessD] Enumerated constants No, enums can only be Longs. James Barash -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of John W. Colby Sent: Tuesday, January 13, 2004 9:23 AM To: AccessD Subject: [AccessD] Enumerated constants Can enumerated constant VALUES be strings? public enum numbers one = "one" end enum Etc? I can't seem to get this to work. John W. Colby www.ColbyConsulting.com _______________________________________________ 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 From wdhindman at bellsouth.net Tue Jan 13 09:14:33 2004 From: wdhindman at bellsouth.net (William Hindman) Date: Tue, 13 Jan 2004 10:14:33 -0500 Subject: [AccessD] =function() in .onclick References: Message-ID: <001001c3d9e7$f3453e20$6101a8c0@dejpolsys> ...great thread ...every once in a while I still manage to learn something from you :) William Hindman ----- Original Message ----- From: "John W. Colby" To: "Access Developers discussion and problem solving" Sent: Tuesday, January 13, 2004 9:43 AM Subject: RE: [AccessD] =function() in .onclick > Chris, > > I credit Shamil with teaching me everything I know about Withevents. I > would never have discovered them, and would not be where I am today in > Access without his examples and his prodding to look at WithEvents. > > If you looked at Shamil's stuff you will see where he places the [Event > Procedure] in the control's event procedure using code inside the Init event > of the class itself as the class instantiates. That is where I learned to > do this and one reason I so dislike developers putting function calls in > those properties. > > I used to use the tag property a lot using ADH code to set and read them. > Once I started using classes I moved away from that to either setting > properties directly in the class init or (in the case of my scanner, where > it's more generic) using class properties to set these values later. There > are pluses and minuses to using the tag - the control carries it's > initialization properties with it, but if any other developer uses the tag > yours can get trashed. I finally just stopped using it although there is > still ONE place I do, and that is in my Just In Time form loading, where I > place the form name in the tag. If it's there it will do JIT, otherwise it > just loads normally. > > I would like to thank you though for the hint about input masks. My users > have been pushing me to "standardize" the date inputmasks and using my > framework I can do just that quite easily. > > John W. Colby > www.ColbyConsulting.com > > -----Original Message----- > From: accessd-bounces at databaseadvisors.com > [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of > chris at thecube.net > Sent: Tuesday, January 13, 2004 8:00 AM > To: accessd at databaseadvisors.com > Subject: RE: [AccessD] =function() in .onclick > > > John, > > Very similar to my method, but with a few slight differences, i may have > missed out on new methods > of using withevents, but i instantiate a class for the form, and instantiate > classes for each of > the controls (unless i exclude them) i control the behaviour of the controls > using a list of > parameters in the tag property so an entire data form could look like this > behind the scenes. > > Dim DEEP As New clsFormControls > > Private Sub Form_Load() > DEEP.Init Me > End Sub > > Private Sub Form_Close() > DEEP.Terminate > End Sub > > and then i have a range of parameters for each of the controls: > > Text Boxes: > > DateControl=True applies a common input mask and formatting, as well as > adding double-click > functionality that pops up a calendar > > FilterForm=True;FilterField= Dynamically filters the Form Data > > QuickSearch=True;SearchCtl=ControlName for doing a quick search > (suprisingly) > > I have made various of other additions but i must mention that my code is > largely based on Shamil > Salakhetdinov's external events programming but i feel quite pleased with my > modifications > > ----- Original Message ----- > From: John W. Colby > To: "Access Developers discussion and problem > solving" > Sent: Tue, 13 Jan 2004 06:32:48 -0500 > Subject: RE: [AccessD] =function() in .onclick > > Chris, > > >do you have a lot of variants for say textboxes or do you prefer to add > parameters at runtime to sink different events / control behavior? > > I actually have an entire framework that does all of this stuff. I have a > form class that sinks all of the form's events. That class has a collection > which holds a class instance for each control found on the form. I then > have classes for each control type which implement standard behaviors which > I find useful - dblclick for a combo can open a list form for entering or > correcting data contained in the combo, NotInList can add data to the table > behind the combo and requery the combo when done etc. The form class has a > scanner that cycles through all the controls in its form's control > collection, instantiating a class for each control found (that I have a > class for anyway). > > IOW, as the form loads, it scans for all controls, loads a class for each > control found and saves a pointer to that control in the control class > collection in the form's header. > > I then use what I call SysVars or System Variables to enable / disable > specific form / control functionality. It turns out I have to "set up" > things like the double click and NotInList for a combo anyway, i.e. I have > to tell the combo the name of the form or the name of the table and the > field in the table to place data in NotInList. My form open ends up looking > something like: > > Option Compare Database > Option Explicit > Public WithEvents fclsFrm As dclsFrm > > Private Sub Form_Open(Cancel As Integer) > On Error GoTo Err_Form_Open > Set fclsFrm = New dclsFrm > fclsFrm.Init Nothing, Me, Cancel > If Cancel Then Exit Sub > 'init the combo dbl-click and NotInList > On Error Resume Next > With fclsFrm.Children > .Item("cboCountry").NotInListData "", "", "lfrmCountry" > .Item("cboState").NotInListData "", "", "lfrmState" > End With > 'look for the lfrm used by these combos. > 'fclsFrm.Children("cboCountry").LFrm = "lfrmCountry" > 'fclsFrm.Children("cboState").LFrm = "lfrmState" > Exit_Form_Open: > Exit Sub > Err_Form_Open: > Select Case Err > Case 0 '.insert Errors you wish to ignore here > Resume Next > Case Else '.All other errors will trap > Beep > MsgBox Err.Description, , "Error in Sub tfrmClients.Form_Open" > Resume Exit_Form_Open > End Select > Resume 0 '.FOR TROUBLESHOOTING > End Sub > > As you can see, I dim a class for the form (fclsFrm), then in OnOpen I > instantiate it. By the time the form class init returns all the control > classes have been loaded and are sitting in the children collection keyed on > control name. I then "set up" things like NotInList by calling a function > in the combo's class passing in the name of the form (and also table / field > for single field list tables). Sometimes I want the NotInList to open a > form (it is complex data with many fields), sometimes I want it to just > enter the data into a specific field in the table (it is a simple list like > titles or colors). > > So, the answer to your question is, I have the generic functionality I need > for the controls already in the class for that control type. I can use it > or not depending on whether I tell the class to do so. Very form / > application specific behaviors I will generally program out in a separate > class. > > John W. Colby > www.ColbyConsulting.com > > -----Original Message----- > From: accessd-bounces at databaseadvisors.com > [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of > chris at thecube.net > Sent: Tuesday, January 13, 2004 6:08 AM > To: accessd at databaseadvisors.com > Subject: RE: [AccessD] =function() in .onclick > > > John, > > Thanks for the 'warm' response . > > I think i will get on and write the checkbox class to handle all of the > checkboxes, on the subject > of WithEvents/DEEP, do you have a lot of variants for say textboxes or do > you prefer to add > parameters at runtime to sink different events / control behaiviour? > > Cheers John > > Chris > ----- Original Message ----- > From: John W. Colby > To: "Access Developers discussion and problem > solving" > Sent: Tue, 13 Jan 2004 05:39:56 -0500 > Subject: RE: [AccessD] =function() in .onclick > > I can't help you as to why it sometimes works and others it doesn't. > However I'd like to say I HATE it when developers do this (and I have to > maintain it). I routinely use the find dialog to find instances of code. > Doing it like that means that I have to use a find and replace utility > instead which is much more intrusive to my development effort. > > Another thing is that if you ever intend to use Withevents, they don't fire > unless the words [Event Procedure] are in the property. If you have an > event stub, you can use withevents (sink the event in a class) and the event > handler in the form at the same time - the event handler in the class simply > gets control first. Doing it with the function call in the property > prevents sinking that control's events anywhere else. > > Now... > > If you ever handed that application off to someone like myself (who uses > withevents), I build a class that directly pokes the words [Event Procedure] > into the control's event property (to make sure the event fires) and now MY > class works but your functionality abruptly ceases to work. > > Just thought I'd throw that out there. > > If I were you I'd probably write a class that handles those checkboxes, > either individually or en mass. > > John W. Colby > www.ColbyConsulting.com > > -----Original Message----- > From: accessd-bounces at databaseadvisors.com > [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of > chris at thecube.net > Sent: Tuesday, January 13, 2004 5:24 AM > To: accessd at databaseadvisors.com > Subject: [AccessD] =function() in .onclick > > > Hi All, > > Instead of writing 54 event procedures, i simply iterate through a > collection of checkboxes and set > their AfterUpdate property to a function like so: > > for index = 1 to 54 > me("chkTemplate" & index).Afterupdate = "=toggleTemplate(" & index & ")" > next > > now, on some Access 2000 installs this works fine, yet on others it baulks > at trying to put a > function straight into the event like above. > > Am I doing anything wrong? > > Cheers > > Chris > > > > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com From jwcolby at colbyconsulting.com Tue Jan 13 09:17:42 2004 From: jwcolby at colbyconsulting.com (John W. Colby) Date: Tue, 13 Jan 2004 10:17:42 -0500 Subject: [AccessD] datatype underlying bound control Message-ID: Is there any way to (easily) determine the datatype of the field that a control is bound to? John W. Colby www.ColbyConsulting.com From bheid at appdevgrp.com Tue Jan 13 09:26:29 2004 From: bheid at appdevgrp.com (Bobby Heid) Date: Tue, 13 Jan 2004 10:26:29 -0500 Subject: [AccessD] Archive results display problem. In-Reply-To: <916187228923D311A6FE00A0CC3FAA3072A465@ADGSERVER> Message-ID: <916187228923D311A6FE00A0CC3FAA305BB182@ADGSERVER> Hey all, I went to search the archives and the results were over many pages. The problem is that there are no scroll bars to allow me to see past the first 4 or 5 returned results. I was not sure who to report this to. Thanks, Bobby From jwcolby at colbyconsulting.com Tue Jan 13 09:36:51 2004 From: jwcolby at colbyconsulting.com (John W. Colby) Date: Tue, 13 Jan 2004 10:36:51 -0500 Subject: [AccessD] =function() in .onclick In-Reply-To: <001001c3d9e7$f3453e20$6101a8c0@dejpolsys> Message-ID: LOL. That's especially amusing William because it is you who kept telling me "stop it with the tag stuff and just give me a function to load these things". See, I do listen occasionally. John W. Colby www.ColbyConsulting.com -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of William Hindman Sent: Tuesday, January 13, 2004 10:15 AM To: Access Developers discussion and problem solving Subject: Re: [AccessD] =function() in .onclick ...great thread ...every once in a while I still manage to learn something from you :) William Hindman ----- Original Message ----- From: "John W. Colby" To: "Access Developers discussion and problem solving" Sent: Tuesday, January 13, 2004 9:43 AM Subject: RE: [AccessD] =function() in .onclick > Chris, > > I credit Shamil with teaching me everything I know about Withevents. I > would never have discovered them, and would not be where I am today in > Access without his examples and his prodding to look at WithEvents. > > If you looked at Shamil's stuff you will see where he places the [Event > Procedure] in the control's event procedure using code inside the Init event > of the class itself as the class instantiates. That is where I learned to > do this and one reason I so dislike developers putting function calls in > those properties. > > I used to use the tag property a lot using ADH code to set and read them. > Once I started using classes I moved away from that to either setting > properties directly in the class init or (in the case of my scanner, where > it's more generic) using class properties to set these values later. There > are pluses and minuses to using the tag - the control carries it's > initialization properties with it, but if any other developer uses the tag > yours can get trashed. I finally just stopped using it although there is > still ONE place I do, and that is in my Just In Time form loading, where I > place the form name in the tag. If it's there it will do JIT, otherwise it > just loads normally. > > I would like to thank you though for the hint about input masks. My users > have been pushing me to "standardize" the date inputmasks and using my > framework I can do just that quite easily. > > John W. Colby > www.ColbyConsulting.com From bheid at appdevgrp.com Tue Jan 13 09:38:09 2004 From: bheid at appdevgrp.com (Bobby Heid) Date: Tue, 13 Jan 2004 10:38:09 -0500 Subject: [AccessD] Archive results display problem. ADDENDUM In-Reply-To: <916187228923D311A6FE00A0CC3FAA3072A46E@ADGSERVER> Message-ID: <916187228923D311A6FE00A0CC3FAA305BB184@ADGSERVER> The 4 or 5 results is per page. I could get to each of the pages. Bobby -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Bobby Heid Sent: Tuesday, January 13, 2004 10:26 AM To: 'Access Developers discussion and problem solving' Subject: [AccessD] Archive results display problem. Hey all, I went to search the archives and the results were over many pages. The problem is that there are no scroll bars to allow me to see past the first 4 or 5 returned results. I was not sure who to report this to. Thanks, Bobby _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From EdTesiny at oasas.state.ny.us Tue Jan 13 09:38:09 2004 From: EdTesiny at oasas.state.ny.us (Tesiny, Ed) Date: Tue, 13 Jan 2004 10:38:09 -0500 Subject: [AccessD] Archive results display problem. Message-ID: I was just in the archives about a half hour ago and had no problems, scroll bars there and working. I'm using IE 6.0 SP1. Ed Tesiny EdTesiny at oasas.state.ny.us -----Original Message----- From: Bobby Heid [mailto:bheid at appdevgrp.com] Sent: Tuesday, January 13, 2004 10:26 AM To: 'Access Developers discussion and problem solving' Subject: [AccessD] Archive results display problem. Hey all, I went to search the archives and the results were over many pages. The problem is that there are no scroll bars to allow me to see past the first 4 or 5 returned results. I was not sure who to report this to. Thanks, Bobby _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From bheid at appdevgrp.com Tue Jan 13 09:42:32 2004 From: bheid at appdevgrp.com (Bobby Heid) Date: Tue, 13 Jan 2004 10:42:32 -0500 Subject: [AccessD] Archive results display problem. In-Reply-To: <916187228923D311A6FE00A0CC3FAA3072A47C@ADGSERVER> Message-ID: <916187228923D311A6FE00A0CC3FAA305BB185@ADGSERVER> Same version of IE here also. I will try again. Bobby -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Tesiny, Ed Sent: Tuesday, January 13, 2004 10:38 AM To: Access Developers discussion and problem solving Subject: RE: [AccessD] Archive results display problem. I was just in the archives about a half hour ago and had no problems, scroll bars there and working. I'm using IE 6.0 SP1. Ed Tesiny EdTesiny at oasas.state.ny.us -----Original Message----- From: Bobby Heid [mailto:bheid at appdevgrp.com] Sent: Tuesday, January 13, 2004 10:26 AM To: 'Access Developers discussion and problem solving' Subject: [AccessD] Archive results display problem. Hey all, I went to search the archives and the results were over many pages. The problem is that there are no scroll bars to allow me to see past the first 4 or 5 returned results. I was not sure who to report this to. Thanks, Bobby _______________________________________________ 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 From bheid at appdevgrp.com Tue Jan 13 09:44:28 2004 From: bheid at appdevgrp.com (Bobby Heid) Date: Tue, 13 Jan 2004 10:44:28 -0500 Subject: [AccessD] Archive results display problem. In-Reply-To: <916187228923D311A6FE00A0CC3FAA3072A47C@ADGSERVER> Message-ID: <916187228923D311A6FE00A0CC3FAA305BB186@ADGSERVER> Ok. I went back to the archives and performed the same search and all worked fine this time. Must have been some sort of glitch. Sorry for the interruption. Thanks, Bobby -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Tesiny, Ed Sent: Tuesday, January 13, 2004 10:38 AM To: Access Developers discussion and problem solving Subject: RE: [AccessD] Archive results display problem. I was just in the archives about a half hour ago and had no problems, scroll bars there and working. I'm using IE 6.0 SP1. Ed Tesiny EdTesiny at oasas.state.ny.us -----Original Message----- From: Bobby Heid [mailto:bheid at appdevgrp.com] Sent: Tuesday, January 13, 2004 10:26 AM To: 'Access Developers discussion and problem solving' Subject: [AccessD] Archive results display problem. Hey all, I went to search the archives and the results were over many pages. The problem is that there are no scroll bars to allow me to see past the first 4 or 5 returned results. I was not sure who to report this to. Thanks, Bobby _______________________________________________ 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 From markamatte at hotmail.com Tue Jan 13 09:50:02 2004 From: markamatte at hotmail.com (Mark A Matte) Date: Tue, 13 Jan 2004 15:50:02 +0000 Subject: [AccessD] DESPERATE problem with indexes Message-ID: Hello All, In A97 I have a db giving the error " isn't an index in this table. Look in the Indexes collection of the TableDef object to determine the valid index names. (Error 3015)"...I get the error when trying to link to ,import from ,compact or repair this db...I desperately need to get the data out of the db...any ideas? Thanks, Mark A. Matte _________________________________________________________________ Learn how to choose, serve, and enjoy wine at Wine @ MSN. http://wine.msn.com/ From wdhindman at bellsouth.net Tue Jan 13 10:01:02 2004 From: wdhindman at bellsouth.net (William Hindman) Date: Tue, 13 Jan 2004 11:01:02 -0500 Subject: [AccessD] =function() in .onclick References: Message-ID: <006401c3d9ee$7319cb60$6101a8c0@dejpolsys> ...I learned the hard way to loathe tag use ...nothing like writing reams of cbf using tags only to have some #$%#$'s library write right over them ...it was a sobering exercise and wearing on my expletives vocabulary :)))) William Hindman - Next Year In The Free State! ----- Original Message ----- From: "John W. Colby" To: "Access Developers discussion and problem solving" Sent: Tuesday, January 13, 2004 10:36 AM Subject: RE: [AccessD] =function() in .onclick > LOL. That's especially amusing William because it is you who kept telling > me "stop it with the tag stuff and just give me a function to load these > things". > > See, I do listen occasionally. > > John W. Colby > www.ColbyConsulting.com > > -----Original Message----- > From: accessd-bounces at databaseadvisors.com > [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of William > Hindman > Sent: Tuesday, January 13, 2004 10:15 AM > To: Access Developers discussion and problem solving > Subject: Re: [AccessD] =function() in .onclick > > > ...great thread ...every once in a while I still manage to learn something > from you :) > > William Hindman > > > ----- Original Message ----- > From: "John W. Colby" > To: "Access Developers discussion and problem solving" > > Sent: Tuesday, January 13, 2004 9:43 AM > Subject: RE: [AccessD] =function() in .onclick > > > > Chris, > > > > I credit Shamil with teaching me everything I know about Withevents. I > > would never have discovered them, and would not be where I am today in > > Access without his examples and his prodding to look at WithEvents. > > > > If you looked at Shamil's stuff you will see where he places the [Event > > Procedure] in the control's event procedure using code inside the Init > event > > of the class itself as the class instantiates. That is where I learned to > > do this and one reason I so dislike developers putting function calls in > > those properties. > > > > I used to use the tag property a lot using ADH code to set and read them. > > Once I started using classes I moved away from that to either setting > > properties directly in the class init or (in the case of my scanner, where > > it's more generic) using class properties to set these values later. > There > > are pluses and minuses to using the tag - the control carries it's > > initialization properties with it, but if any other developer uses the tag > > yours can get trashed. I finally just stopped using it although there is > > still ONE place I do, and that is in my Just In Time form loading, where I > > place the form name in the tag. If it's there it will do JIT, otherwise > it > > just loads normally. > > > > I would like to thank you though for the hint about input masks. My users > > have been pushing me to "standardize" the date inputmasks and using my > > framework I can do just that quite easily. > > > > John W. Colby > > www.ColbyConsulting.com > > > > > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com > From andy at minstersystems.co.uk Tue Jan 13 10:05:09 2004 From: andy at minstersystems.co.uk (Andy Lacey) Date: Tue, 13 Jan 2004 16:05:09 +0000 Subject: [AccessD] DESPERATE problem with indexes Message-ID: <20040113160506.A374924CEDC@smithers.nildram.co.uk> Not much consolation Mark but see http://dbforums.com/arch/106/2002/11/563477 Sounds like MDB's knackered and you'll need specialist help. Although more optimistic view at http://www.mvps.org/access/bugs/bugs0006.htm , but that does relate to A95. You may want to look at other refs that Google found on a search for "isn't an index in this table". -- Andy Lacey http://www.minstersystems.co.uk --------- Original Message -------- From: Access Developers discussion and problem solving To: accessd at databaseadvisors.com Subject: [AccessD] DESPERATE problem with indexes Date: 13/01/04 15:52 > > Hello All, > > In A97 I have a db giving the error "<Index name> isn't an index in this > table. Look in the Indexes collection of the TableDef object to determine > the valid index names. (Error 3015)"...I get the error when trying to link > to ,import from ,compact or repair this db...I desperately need to get the > data out of the db...any ideas? > > Thanks, > > Mark A. Matte > > _________________________________________________________________ > Learn how to choose, serve, and enjoy wine at Wine @ MSN. > http://wine.msn.com/ > > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com > > > > > ________________________________________________ Message sent using UebiMiau 2.7.2 From bheygood at abestsystems.com Tue Jan 13 10:07:59 2004 From: bheygood at abestsystems.com (Bob Heygood) Date: Tue, 13 Jan 2004 08:07:59 -0800 Subject: [AccessD] Access n Front Page In-Reply-To: <000001c3d6bb$82df5a50$8b194244@hargrove.internal> Message-ID: Hey to the group, Hopefully this is not too far off. But so much here now has to do with the web. I am looking for some info on editing a record in an Access db from a web browser using Front Page. I have found enough on displaying records, but not on editing existing data. I suspect asp or some such will be involved. best, bob From Lambert.Heenan at AIG.com Tue Jan 13 10:13:15 2004 From: Lambert.Heenan at AIG.com (Heenan, Lambert) Date: Tue, 13 Jan 2004 11:13:15 -0500 Subject: [AccessD] DESPERATE problem with indexes Message-ID: <8B98F8EA48F8BA47A2F24E0D0AF40CF407AD7CA5@xlivmbx12.aig.com> Have you tried opening the table in question and removing the Index setting from the offending field. Then save the table design. Next reinstate the index and save the table design again. With a bit of luck Access will simply rebuild the index and all will be well. Lambert -----Original Message----- From: Mark A Matte [mailto:markamatte at hotmail.com] Sent: Tuesday, January 13, 2004 10:50 AM To: accessd at databaseadvisors.com Subject: [AccessD] DESPERATE problem with indexes Hello All, In A97 I have a db giving the error " isn't an index in this table. Look in the Indexes collection of the TableDef object to determine the valid index names. (Error 3015)"...I get the error when trying to link to ,import from ,compact or repair this db...I desperately need to get the data out of the db...any ideas? Thanks, Mark A. Matte _________________________________________________________________ Learn how to choose, serve, and enjoy wine at Wine @ MSN. http://wine.msn.com/ _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From wdhindman at bellsouth.net Tue Jan 13 10:34:08 2004 From: wdhindman at bellsouth.net (William Hindman) Date: Tue, 13 Jan 2004 11:34:08 -0500 Subject: [AccessD] Access n Front Page References: Message-ID: <008501c3d9f3$116248c0$6101a8c0@dejpolsys> Bob ...try http://www.outfront.net/spooky/index.htm ...and http://spiderwebwoman.com/resources/dbrwtipsandtricks.asp ...you might also want to join the FPlist-subscribe at yahoogroups.com which is very similar to AccessD and has a huge, searchable archive. William Hindman - Next Year In The Free State! ----- Original Message ----- From: "Bob Heygood" To: "Access Developers discussion and problem solving" Sent: Tuesday, January 13, 2004 11:07 AM Subject: [AccessD] Access n Front Page > Hey to the group, > > Hopefully this is not too far off. But so much here now has to do with the > web. > > I am looking for some info on editing a record in an Access db from a web > browser using Front Page. I have found enough on displaying records, but not > on editing existing data. I suspect asp or some such will be involved. > > best, > > bob > > > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com > From jimdettman at earthlink.net Tue Jan 13 10:59:48 2004 From: jimdettman at earthlink.net (Jim Dettman) Date: Tue, 13 Jan 2004 11:59:48 -0500 Subject: [AccessD] DESPERATE problem with indexes In-Reply-To: Message-ID: Mark, As Andy said, the database is hosed. You can try JETCOMP.EXE on it and that might straighten it out, but it also might not. I'd simply go to a backup. Jim Dettman President, Online Computer Services of WNY, Inc. (315) 699-3443 jimdettman at earthlink.net -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Mark A Matte Sent: Tuesday, January 13, 2004 10:50 AM To: accessd at databaseadvisors.com Subject: [AccessD] DESPERATE problem with indexes Hello All, In A97 I have a db giving the error " isn't an index in this table. Look in the Indexes collection of the TableDef object to determine the valid index names. (Error 3015)"...I get the error when trying to link to ,import from ,compact or repair this db...I desperately need to get the data out of the db...any ideas? Thanks, Mark A. Matte _________________________________________________________________ Learn how to choose, serve, and enjoy wine at Wine @ MSN. http://wine.msn.com/ _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From DWUTKA at marlow.com Tue Jan 13 12:03:31 2004 From: DWUTKA at marlow.com (DWUTKA at marlow.com) Date: Tue, 13 Jan 2004 12:03:31 -0600 Subject: [AccessD] Enumerated constants Message-ID: <2F8793082E00D4119A1700B0D0216BF80222772E@main2.marlow.com> No, direct from the MSDN... constantexpression Optional. Value of the element (evaluates to a Long). If no constantexpression is specified, the value assigned is either zero (if it is the first membername), or 1 greater than the value of the immediately preceding membername. Drew -----Original Message----- From: John W. Colby [mailto:jwcolby at colbyconsulting.com] Sent: Tuesday, January 13, 2004 8:23 AM To: AccessD Subject: [AccessD] Enumerated constants Can enumerated constant VALUES be strings? public enum numbers one = "one" end enum Etc? I can't seem to get this to work. John W. Colby www.ColbyConsulting.com _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From DWUTKA at marlow.com Tue Jan 13 12:05:04 2004 From: DWUTKA at marlow.com (DWUTKA at marlow.com) Date: Tue, 13 Jan 2004 12:05:04 -0600 Subject: [AccessD] datatype underlying bound control Message-ID: <2F8793082E00D4119A1700B0D0216BF80222772F@main2.marlow.com> Yep, you can determine the field, and you can determine the source (that the form is bound too), so using those two pieces of information, you can open the source with ADO (or DAO) and determine it's data type. Let me know if you need help with the code. Drew -----Original Message----- From: John W. Colby [mailto:jwcolby at colbyconsulting.com] Sent: Tuesday, January 13, 2004 9:18 AM To: AccessD Subject: [AccessD] datatype underlying bound control Is there any way to (easily) determine the datatype of the field that a control is bound to? John W. Colby www.ColbyConsulting.com _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From DWUTKA at marlow.com Tue Jan 13 12:06:00 2004 From: DWUTKA at marlow.com (DWUTKA at marlow.com) Date: Tue, 13 Jan 2004 12:06:00 -0600 Subject: [AccessD] Archive results display problem. Message-ID: <2F8793082E00D4119A1700B0D0216BF802227730@main2.marlow.com> Which archives? The ones on my site? http://www.wolfwares.com/AccessD? Drew -----Original Message----- From: Bobby Heid [mailto:bheid at appdevgrp.com] Sent: Tuesday, January 13, 2004 9:26 AM To: 'Access Developers discussion and problem solving' Subject: [AccessD] Archive results display problem. Hey all, I went to search the archives and the results were over many pages. The problem is that there are no scroll bars to allow me to see past the first 4 or 5 returned results. I was not sure who to report this to. Thanks, Bobby _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From DWUTKA at marlow.com Tue Jan 13 12:09:09 2004 From: DWUTKA at marlow.com (DWUTKA at marlow.com) Date: Tue, 13 Jan 2004 12:09:09 -0600 Subject: [AccessD] Access n Front Page Message-ID: <2F8793082E00D4119A1700B0D0216BF802227731@main2.marlow.com> This is down and dirty, but the following is a relatively simple .asp page, which displays an .mdb table in HTML format. You can then edit the values, and submit it, and it will change the values in the table. It requires that you have an ID field (the code is currently set to use field 0 as the ID). <% dim cnn dim rs dim i dim strSQL dim intCount if request.Form("Submit")="Submit" then set cnn=server.CreateObject("ADODB.Connection") set rs=server.CreateObject("ADODB.Recordset") cnn.Provider="Microsoft.Jet.OLEDB.4.0" cnn.Open "C:\Inetpub\domains\airs\Air2000_be.mdb" rs.Open "tblWebFields",cnn,1,3,512 intCount=rs.Fields.Count-1 rs.MoveFirst do until rs.EOF=True for i=1 to intCount rs.Fields(i).value=request.Form(rs.Fields(0).value & "-" & rs.Fields(i).Name) next rs.Update rs.MoveNext loop rs.Close set rs=nothing cnn.Close set cnn=nothing end if %> Dyncorp Field Settings
<% set cnn=server.CreateObject("ADODB.Connection") set rs=server.CreateObject("ADODB.Recordset") cnn.Provider="Microsoft.Jet.OLEDB.4.0" cnn.Open "C:\Inetpub\domains\airs\Air2000_be.mdb" rs.Open "tblWebFields",cnn,1,1,512 response.Write "" & vbcrlf intCount=rs.Fields.Count-1 for i=1 to intCount response.Write "" & vbcrlf next response.Write "" & vbcrlf rs.MoveFirst do until rs.EOF=True response.Write "" & vbcrlf for i=1 to intCount response.Write "" & vbcrlf next response.Write "" & vbcrlf rs.MoveNext loop rs.Close set rs=nothing cnn.Close set cnn=nothing %>
" & rs.Fields(i).Name & "
" & vbcrlf response.Write "
-----Original Message----- From: Bob Heygood [mailto:bheygood at abestsystems.com] Sent: Tuesday, January 13, 2004 10:08 AM To: Access Developers discussion and problem solving Subject: [AccessD] Access n Front Page Hey to the group, Hopefully this is not too far off. But so much here now has to do with the web. I am looking for some info on editing a record in an Access db from a web browser using Front Page. I have found enough on displaying records, but not on editing existing data. I suspect asp or some such will be involved. best, bob _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From prosoft6 at hotmail.com Tue Jan 13 12:26:06 2004 From: prosoft6 at hotmail.com (Julie Reardon-Taylor) Date: Tue, 13 Jan 2004 13:26:06 -0500 Subject: [AccessD] UnDelete Message-ID: Can someone point me to a quick utility to "undelete" some records that were accidentally deleted in a table? The database table is still open and the database has not been compacted yet. Help! Julie Reardon-Taylor PRO-SOFT OF NY, INC. www.pro-soft.net _________________________________________________________________ Rethink your business approach for the new year with the helpful tips here. http://special.msn.com/bcentral/prep04.armx From bheid at appdevgrp.com Tue Jan 13 12:33:38 2004 From: bheid at appdevgrp.com (Bobby Heid) Date: Tue, 13 Jan 2004 13:33:38 -0500 Subject: [AccessD] Archive results display problem. In-Reply-To: <916187228923D311A6FE00A0CC3FAA3072A4FD@ADGSERVER> Message-ID: <916187228923D311A6FE00A0CC3FAA305BB18C@ADGSERVER> Yes. Sorry, I did not know that there was more than one. All seems to be doing well now though. Bobby -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of DWUTKA at marlow.com Sent: Tuesday, January 13, 2004 1:06 PM To: accessd at databaseadvisors.com Subject: RE: [AccessD] Archive results display problem. Which archives? The ones on my site? http://www.wolfwares.com/AccessD? Drew -----Original Message----- From: Bobby Heid [mailto:bheid at appdevgrp.com] Sent: Tuesday, January 13, 2004 9:26 AM To: 'Access Developers discussion and problem solving' Subject: [AccessD] Archive results display problem. Hey all, I went to search the archives and the results were over many pages. The problem is that there are no scroll bars to allow me to see past the first 4 or 5 returned results. I was not sure who to report this to. Thanks, Bobby _______________________________________________ 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 From jwcolby at colbyconsulting.com Tue Jan 13 12:34:28 2004 From: jwcolby at colbyconsulting.com (John W. Colby) Date: Tue, 13 Jan 2004 13:34:28 -0500 Subject: [AccessD] datatype underlying bound control In-Reply-To: <2F8793082E00D4119A1700B0D0216BF80222772F@main2.marlow.com> Message-ID: Drew, If the source is a complex query of 2 or 3 joined tables, how (other than parsing SQL text) do I determine the source table of the field? John W. Colby www.ColbyConsulting.com -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of DWUTKA at marlow.com Sent: Tuesday, January 13, 2004 1:05 PM To: accessd at databaseadvisors.com Subject: RE: [AccessD] datatype underlying bound control Yep, you can determine the field, and you can determine the source (that the form is bound too), so using those two pieces of information, you can open the source with ADO (or DAO) and determine it's data type. Let me know if you need help with the code. Drew -----Original Message----- From: John W. Colby [mailto:jwcolby at colbyconsulting.com] Sent: Tuesday, January 13, 2004 9:18 AM To: AccessD Subject: [AccessD] datatype underlying bound control Is there any way to (easily) determine the datatype of the field that a control is bound to? John W. Colby www.ColbyConsulting.com _______________________________________________ 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 From mikedorism at adelphia.net Tue Jan 13 12:43:03 2004 From: mikedorism at adelphia.net (Mike & Doris Manning) Date: Tue, 13 Jan 2004 13:43:03 -0500 Subject: [AccessD] error questions In-Reply-To: <003d01c3d91d$e3c51990$210110ac@SUSANONE> Message-ID: <000001c3da05$13c7aad0$8b194244@hargrove.internal> Susan, Here is the function I use. The calling procedure passes in the error, procedure name, and calling form/rept. Several standard SQL Server errors are handled. At the end, a form is popped up to let the user know what happened and allow them to add comments, and then an email gets sent to a specified user for corrective action. Doris Manning Database Administrator Hargrove Inc. www.hargroveinc.com ------------------------------- Public Function HandleErrors(lngError As Long, ObjName As String, _ ObjFrom As String) On Error Resume Next bolHandle = False OSUserName = fcnOSUserName() Err.Raise lngError Select Case Err Case Is = -2147467259 strMsgTxt = "Connection to SQL Server has been lost. " strMsgTxt = strMsgTxt & "Try restarting Production Manager. " strMsgTxt = strMsgTxt & "If the problem continues then " strMsgTxt = strMsgTxt & "reboot your computer." MsgBox strMsgTxt, vbOKOnly, "Lost Connection" DoCmd.Quit Case Is = 2202, 2205, 2214 'Printer problems strMsgTxt = "There is a problem with your printer connection. " strMsgTxt = strMsgTxt & "Please reboot your computer. " strMsgTxt = strMsgTxt & "If the problem persists, email the " strMsgTxt = strMsgTxt & "Help Desk for assistance." MsgBox strMsgTxt, vbOKOnly, "Printer Connection Problem" bolHandle = True Case Is = 2212 'Printer not available strMsgTxt = "The printer you have chosen is currently " strMsgTxt = strMsgTxt & "offline. Please select another " strMsgTxt = strMsgTxt & "printer for your report." MsgBox strMsgTxt, vbOKOnly, "Printer Offline" bolHandle = True Case Is = 2950 'Network connection lost strMsgTxt = "There is a problem with your connection to " strMsgTxt = strMsgTxt & "the network. Please reboot your " strMsgTxt = strMsgTxt & "computer." MsgBox strMsgTxt, vbOKOnly, "Lost Network Connection" bolHandle = True End Select strSendSubj = " 0 Then strLeadin = strLeadin & vbCrLf & vbCrLf strLeadin = strLeadin & "ADO/DAO Buffer contains " strLeadin = strLeadin & CurrentProject.Connection.Errors.Count If CurrentProject.Connection.Errors.Count < 2 Then strLeadin = strLeadin & " error" & vbCrLf Else strLeadin = strLeadin & " errors" & vbCrLf End If End If ElseIf Err.Description = vbNullString Then strLeadin = strLeadin & "Unknown Error " & Err & " with no " strLeadin = strLeadin & " description on file." Else strLeadin = strLeadin & "Unhandled Error " & Err & ": " & Err.Description End If strMsgTxt = strLeadin & strError If bolHandle = True Then Call SendSafeEmail(strSendTo, strSendSubj, strMsgTxt, False) Else DoCmd.OpenForm "frmErrorInfo" End If End Function Public Function SendErrorMessage() Dim strErrorInfo As String If IsNull(Forms!frmErrorInfo!msgDoing) Then strErrorInfo = "" Else strErrorInfo = Forms!frmErrorInfo!msgDoing End If If Forms!frmErrorInfo!chkShowError = True Then MsgBox strMsgTxt, vbOKOnly, "Display Error" strMsgTxt = strMsgTxt & vbCrLf & vbCrLf & "User description of problem:" & vbCrLf & strErrorInfo Call SendSafeEmail(strSendTo, strSendSubj, strMsgTxt, False) DoCmd.Close acForm, "frmErrorInfo" DoCmd.Echo True End Function -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Susan Harkins Sent: Monday, January 12, 2004 10:08 AM To: Access Developers discussion and problem solving Subject: Re: [AccessD] error questions Doris -- I'd like to see that sometime. I do agree with you both that it wouldn't always be appropriate, but geez Louise ... give me a break! Please!!!!!!!!!! ;) Somewhere I've got a whole book on error handling, I really ought to read it. Susan H. > John is right that you wouldn't always want to do this because > sometimes it > is better to handle the issue within the calling procedure or > function. However, I do handle some of the more common errors (such as > lost SQL connection or printer problems) within my generic error > handling function because that made more sense to me. _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From my.lists at verizon.net Tue Jan 13 12:42:55 2004 From: my.lists at verizon.net (Francisco H Tapia) Date: Tue, 13 Jan 2004 10:42:55 -0800 Subject: [AccessD] UnDelete In-Reply-To: References: Message-ID: <40043C2F.8000708@verizon.net> WinZip to restore your backup? :D Julie Reardon-Taylor wrote: > Can someone point me to a quick utility to "undelete" some records > that were accidentally deleted in a table? The database table is > still open and the database has not been compacted yet. > > Help! > > > > Julie Reardon-Taylor > > -- -Francisco From DWUTKA at marlow.com Tue Jan 13 12:45:54 2004 From: DWUTKA at marlow.com (DWUTKA at marlow.com) Date: Tue, 13 Jan 2004 12:45:54 -0600 Subject: [AccessD] Archive results display problem. Message-ID: <2F8793082E00D4119A1700B0D0216BF802227736@main2.marlow.com> Yep, there is an archive on the DBA site, but it only goes back to when the new server went up. I rebooted my home server about 30 minutes ago, because it looks like my memory was running close to full (my firewall does that after a while, cause it doesn't flush things right....have to look into that). That may have been a possible cause. Drew -----Original Message----- From: Bobby Heid [mailto:bheid at appdevgrp.com] Sent: Tuesday, January 13, 2004 12:34 PM To: 'Access Developers discussion and problem solving' Subject: RE: [AccessD] Archive results display problem. Yes. Sorry, I did not know that there was more than one. All seems to be doing well now though. Bobby -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of DWUTKA at marlow.com Sent: Tuesday, January 13, 2004 1:06 PM To: accessd at databaseadvisors.com Subject: RE: [AccessD] Archive results display problem. Which archives? The ones on my site? http://www.wolfwares.com/AccessD? Drew -----Original Message----- From: Bobby Heid [mailto:bheid at appdevgrp.com] Sent: Tuesday, January 13, 2004 9:26 AM To: 'Access Developers discussion and problem solving' Subject: [AccessD] Archive results display problem. Hey all, I went to search the archives and the results were over many pages. The problem is that there are no scroll bars to allow me to see past the first 4 or 5 returned results. I was not sure who to report this to. Thanks, Bobby _______________________________________________ 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 _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From DWUTKA at marlow.com Tue Jan 13 12:47:00 2004 From: DWUTKA at marlow.com (DWUTKA at marlow.com) Date: Tue, 13 Jan 2004 12:47:00 -0600 Subject: [AccessD] datatype underlying bound control Message-ID: <2F8793082E00D4119A1700B0D0216BF802227737@main2.marlow.com> Who cares what the source is. If it shows in the form as SQL, then just open a recordset with that SQL. If it shows as a saved query, just open the saved query, etc. Drew -----Original Message----- From: John W. Colby [mailto:jwcolby at colbyconsulting.com] Sent: Tuesday, January 13, 2004 12:34 PM To: Access Developers discussion and problem solving Subject: RE: [AccessD] datatype underlying bound control Drew, If the source is a complex query of 2 or 3 joined tables, how (other than parsing SQL text) do I determine the source table of the field? John W. Colby www.ColbyConsulting.com -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of DWUTKA at marlow.com Sent: Tuesday, January 13, 2004 1:05 PM To: accessd at databaseadvisors.com Subject: RE: [AccessD] datatype underlying bound control Yep, you can determine the field, and you can determine the source (that the form is bound too), so using those two pieces of information, you can open the source with ADO (or DAO) and determine it's data type. Let me know if you need help with the code. Drew -----Original Message----- From: John W. Colby [mailto:jwcolby at colbyconsulting.com] Sent: Tuesday, January 13, 2004 9:18 AM To: AccessD Subject: [AccessD] datatype underlying bound control Is there any way to (easily) determine the datatype of the field that a control is bound to? John W. Colby www.ColbyConsulting.com _______________________________________________ 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 _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From bheid at appdevgrp.com Tue Jan 13 12:52:10 2004 From: bheid at appdevgrp.com (Bobby Heid) Date: Tue, 13 Jan 2004 13:52:10 -0500 Subject: [AccessD] Archive results display problem. In-Reply-To: <916187228923D311A6FE00A0CC3FAA3072A516@ADGSERVER> Message-ID: <916187228923D311A6FE00A0CC3FAA305BB18D@ADGSERVER> Thanks! -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of DWUTKA at marlow.com Sent: Tuesday, January 13, 2004 1:46 PM To: accessd at databaseadvisors.com Subject: RE: [AccessD] Archive results display problem. Yep, there is an archive on the DBA site, but it only goes back to when the new server went up. I rebooted my home server about 30 minutes ago, because it looks like my memory was running close to full (my firewall does that after a while, cause it doesn't flush things right....have to look into that). That may have been a possible cause. Drew -----Original Message----- From: Bobby Heid [mailto:bheid at appdevgrp.com] Sent: Tuesday, January 13, 2004 12:34 PM To: 'Access Developers discussion and problem solving' Subject: RE: [AccessD] Archive results display problem. Yes. Sorry, I did not know that there was more than one. All seems to be doing well now though. Bobby -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of DWUTKA at marlow.com Sent: Tuesday, January 13, 2004 1:06 PM To: accessd at databaseadvisors.com Subject: RE: [AccessD] Archive results display problem. Which archives? The ones on my site? http://www.wolfwares.com/AccessD? Drew -----Original Message----- From: Bobby Heid [mailto:bheid at appdevgrp.com] Sent: Tuesday, January 13, 2004 9:26 AM To: 'Access Developers discussion and problem solving' Subject: [AccessD] Archive results display problem. Hey all, I went to search the archives and the results were over many pages. The problem is that there are no scroll bars to allow me to see past the first 4 or 5 returned results. I was not sure who to report this to. Thanks, Bobby _______________________________________________ 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 _______________________________________________ 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 From gustav at cactus.dk Tue Jan 13 12:58:12 2004 From: gustav at cactus.dk (Gustav Brock) Date: Tue, 13 Jan 2004 19:58:12 +0100 Subject: [AccessD] datatype underlying bound control In-Reply-To: References: Message-ID: <5240458135.20040113195812@cactus.dk> Hi John Returning to your original question, you can use VarType(): intVarType = VarType(Forms("frmSomeForm")!txtTextBox.Value) This requires, of course, that the form is open. Your second question is another matter ... What are you trying to do? /gustav > If the source is a complex query of 2 or 3 joined tables, how (other than > parsing SQL text) do I determine the source table of the field? > Yep, you can determine the field, and you can determine the source (that the > form is bound too), so using those two pieces of information, you can open > the source with ADO (or DAO) and determine it's data type. > Let me know if you need help with the code. > Is there any way to (easily) determine the datatype of the field that a > control is bound to? From jmwayne at moordri.com Tue Jan 13 13:25:01 2004 From: jmwayne at moordri.com (JM Wayne) Date: Tue, 13 Jan 2004 14:25:01 -0500 Subject: [AccessD] A curious problem... Message-ID: <000401c3da0a$f197ee60$87c9040a@direcway.com> I have an A2K database that has been in use for over 2 years. All of a sudden the forms are resizing themselves. In one case the user enters data on one form and by clicking a button opens another form for data input. In another form the user double clicks an item in a list box and opens a form to enter data. In both cases when they close the second form the initial form is no longer maximized. I entered DoCmd.Maximize in the second form's On Close event but it is kind of clumsy. There has been no change in the code that should cause this to happen. I should mention that the forms that are having this problem have a great number of controls on them. Any advice or explanation would be appreciated. Judy Judith M Wayne Shefford-Meade, Inc. From Lambert.Heenan at AIG.com Tue Jan 13 13:50:34 2004 From: Lambert.Heenan at AIG.com (Heenan, Lambert) Date: Tue, 13 Jan 2004 14:50:34 -0500 Subject: [AccessD] A curious problem... Message-ID: <8B98F8EA48F8BA47A2F24E0D0AF40CF407AD7CAC@xlivmbx12.aig.com> First make a backup copy of the MDB file. Then try repairing. No joy? Try decompiling. Still no luck? Try importing all the objects in the database to a new mdb file. Lambert -----Original Message----- From: JM Wayne [mailto:jmwayne at moordri.com] Sent: Tuesday, January 13, 2004 2:25 PM To: AccessD (E-mail) Subject: [AccessD] A curious problem... I have an A2K database that has been in use for over 2 years. All of a sudden the forms are resizing themselves. In one case the user enters data on one form and by clicking a button opens another form for data input. In another form the user double clicks an item in a list box and opens a form to enter data. In both cases when they close the second form the initial form is no longer maximized. I entered DoCmd.Maximize in the second form's On Close event but it is kind of clumsy. There has been no change in the code that should cause this to happen. I should mention that the forms that are having this problem have a great number of controls on them. Any advice or explanation would be appreciated. Judy Judith M Wayne Shefford-Meade, Inc. _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From markamatte at hotmail.com Tue Jan 13 14:11:20 2004 From: markamatte at hotmail.com (Mark A Matte) Date: Tue, 13 Jan 2004 20:11:20 +0000 Subject: [AccessD] DESPERATE problem with indexes Message-ID: Hello All, I wanted to share what just happen...and maybe get some feedback as to why it worked. >In A97 I have a db giving the error " isn't an index in this >table. Look in the Indexes collection of the TableDef object to determine >the valid index names. (Error 3015)"...I get the error when trying to open, >link >to ,import from ,compact or repair this db... In doing some research, I saw it mentioned several times...that the reason the REPAIR would not work...was that it tried to open the db before repairing...the same with importing, linking, and TRANSFERDATABASE. I tried to create links and importing the data with just VBA...unsuccessfully. Next I tried to edit the DATABASE field in the MSysObjects table...(desperate)...thinking I could force the link...(unsuccessful) At this point I had the corrupt BE on my local machine...and could not open, create a link or anything to it...then I got a copy of the FE...which already had the links defined for an old location...but same tables...used the "Linked Table Manager"...and the links refreshed successfully...I was able to use these links to import 100% of the data. Is my assumption correct...the reason the table manager worked is because it did not try to open the db before refreshing the links? Also...is this a good idea...or just wishful thinking: Before sending out a self contained db...or even a FE/BE db...create a db with copies of the empty tables and links to tables in the actual db(location doesn't matter as long as you refresh the links and NOT recreate them)...this would make for an easy recovery of a corrupt db. Any insight would be greatly appreciated. Thanks for all the suggestions, Mark A. Matte >From: "Jim Dettman" >Reply-To: Access Developers discussion and problem >solving >To: "Access Developers discussion and problem >solving" >Subject: RE: [AccessD] DESPERATE problem with indexes >Date: Tue, 13 Jan 2004 11:59:48 -0500 > >Mark, > > As Andy said, the database is hosed. You can try JETCOMP.EXE on it and >that might straighten it out, but it also might not. > >I'd simply go to a backup. > >Jim Dettman >President, >Online Computer Services of WNY, Inc. >(315) 699-3443 >jimdettman at earthlink.net > >-----Original Message----- >From: accessd-bounces at databaseadvisors.com >[mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Mark A Matte >Sent: Tuesday, January 13, 2004 10:50 AM >To: accessd at databaseadvisors.com >Subject: [AccessD] DESPERATE problem with indexes > > >Hello All, > >In A97 I have a db giving the error " isn't an index in this >table. Look in the Indexes collection of the TableDef object to determine >the valid index names. (Error 3015)"...I get the error when trying to link >to ,import from ,compact or repair this db...I desperately need to get the >data out of the db...any ideas? > >Thanks, > >Mark A. Matte > >_________________________________________________________________ >Learn how to choose, serve, and enjoy wine at Wine @ MSN. >http://wine.msn.com/ > >_______________________________________________ >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 _________________________________________________________________ Learn how to choose, serve, and enjoy wine at Wine @ MSN. http://wine.msn.com/ From prosoft6 at hotmail.com Tue Jan 13 14:45:11 2004 From: prosoft6 at hotmail.com (Julie Reardon-Taylor) Date: Tue, 13 Jan 2004 15:45:11 -0500 Subject: [AccessD] UnDelete Message-ID: Aren't Access records marked for deletion, and not actually deleted until the database is compacted? Shouldn't these records still be in the table? Can't I unmark these records for deletion? Julie Reardon-Taylor PRO-SOFT OF NY, INC. www.pro-soft.net _________________________________________________________________ Get a FREE online virus check for your PC here, from McAfee. http://clinic.mcafee.com/clinic/ibuy/campaign.asp?cid=3963 From subs1847 at solution-providers.ie Tue Jan 13 14:54:32 2004 From: subs1847 at solution-providers.ie (Mark L. Breen) Date: Tue, 13 Jan 2004 20:54:32 -0000 Subject: [AccessD] Looking for any data you can give me References: <008501c3d9f3$116248c0$6101a8c0@dejpolsys> Message-ID: <000d01c3da17$750ac950$0101a8c0@D8TZHN0J> Hello All, Firstly, I have posted it to AccessD and OT because it is nearly not database related, so if your filter gives you two copies of the email, apologies in advance. I am looking for some data with which to do some analysis in relation to the 80/20 rule. What I would like to have is hundreds, but preferably thousands, and any qty greater than that of real world data. For example, a list of Orders, including product codes and preferably prices, dates, sales person / Id, Call outs for a service company including duration, reason for call out, region, engineer assigned List of incident records in an insurance company including causes, cost of claim, age of claimant, geographical location of claimant / accident Results of voting for election results, broken down by area and any other categories available. I am fully aware that usually when someone has such data it is confidential, I do not need to know the source, I do not need to know what the actual products are, I am only interested in them from an analytical perspective. The reason I am asking for the small amount of backup data is so that I can make some detailed analysis of what I am looking at. Eg, not just order size, but revenue versus order qty versus product regularity etc. If you have such data and wanted to just change the look tables to Product 1, product 2, etc it would also be fine for me. Needless to say, I will not show the data to anyone else at all, but I know that certain data is private and thats that. However, if you have anything that you would not mind giving out, I would be grateful. Alternatively, if you know of anywhere I can get a file of records like I am referring to, it would be great also. Thanks in advance for you time, Mark Breen Solution Providers Ireland From cfoust at infostatsystems.com Tue Jan 13 14:55:27 2004 From: cfoust at infostatsystems.com (Charlotte Foust) Date: Tue, 13 Jan 2004 12:55:27 -0800 Subject: [AccessD] UnDelete Message-ID: *Objects* are marked for deletion and removed with the database is compacted. Records are deleted as you go. Charlotte Foust -----Original Message----- From: Julie Reardon-Taylor [mailto:prosoft6 at hotmail.com] Sent: Tuesday, January 13, 2004 12:45 PM To: accessd at databaseadvisors.com Subject: Re: [AccessD] UnDelete Aren't Access records marked for deletion, and not actually deleted until the database is compacted? Shouldn't these records still be in the table? Can't I unmark these records for deletion? Julie Reardon-Taylor PRO-SOFT OF NY, INC. www.pro-soft.net _________________________________________________________________ Get a FREE online virus check for your PC here, from McAfee. http://clinic.mcafee.com/clinic/ibuy/campaign.asp?cid=3963 _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From jimdettman at earthlink.net Tue Jan 13 15:11:18 2004 From: jimdettman at earthlink.net (Jim Dettman) Date: Tue, 13 Jan 2004 16:11:18 -0500 Subject: [AccessD] UnDelete In-Reply-To: Message-ID: Julie, yes they are there, but there is no functionality in Access/JET to undelete them. Part of the reason is the LV (Long Value Pages) are recycled (depending on a registry setting), so it may not always be possible to bring a record back if records have been saved. Because of that, an undelete has never been built into Access. Jim Dettman President, Online Computer Services of WNY, Inc. (315) 699-3443 jimdettman at earthlink.net -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Julie Reardon-Taylor Sent: Tuesday, January 13, 2004 3:45 PM To: accessd at databaseadvisors.com Subject: Re: [AccessD] UnDelete Aren't Access records marked for deletion, and not actually deleted until the database is compacted? Shouldn't these records still be in the table? Can't I unmark these records for deletion? Julie Reardon-Taylor PRO-SOFT OF NY, INC. www.pro-soft.net _________________________________________________________________ Get a FREE online virus check for your PC here, from McAfee. http://clinic.mcafee.com/clinic/ibuy/campaign.asp?cid=3963 _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From Paul.Millard at freight.fedex.com Tue Jan 13 15:38:41 2004 From: Paul.Millard at freight.fedex.com (Millard, Paul --- Sr. Developer Analyst ---WGO) Date: Tue, 13 Jan 2004 13:38:41 -0800 Subject: [AccessD] SQL Query Grouping Message-ID: <67B2D43A2067B248A36B007650A2312C14530F@PSJOE2K1.fxfwest.freight.fedex.com> Folks, I need help with an SQL querying using SQL Server. The query below works fine...it's a simple grouping query that displays count of records, sum of revenue etc. However, what I'm trying to accomplish is to force each grouping such as 1, 2, and 3 (see below) even when records do not exist. Normally, a group query only shows the groupings where records exist. How can I accomplish this? My initial thoughts are to create the groupings in separate table and try to link them. Not sure how that can be done in SQL. Thanks in advance. Paul Millard San Jose, CA sSQL = "SELECT " & _ "Case " & _ "When StdDays = 1 Then 1 " & _ "When StdDays = 2 Then 2 " & _ "When StdDays >= 3 Then 3 " & _ "Else 0 End As StdDays, " & _ "Count(Pro) As Bills, " & _ "Sum(Rev) As Rev, " & _ "Sum(Wt) As Wt " & _ "FROM tblOpus " & _ "WHERE Rpt = 'R' " & _ "GROUP BY " & _ "Case " & _ "When StdDays = 1 Then 1 " & _ "When StdDays = 2 Then 2 " & _ "When StdDays >= 3 Then 3 " & _ "Else 0 End " & _ "ORDER BY StdDays" ********************************************************** This message contains information that is confidential and proprietary to FedEx Freight or its affiliates. It is intended only for the recipient named and for the express purpose(s) described therein. Any other use is prohibited. **************************************************************** From Subscriptions at servicexp.com Tue Jan 13 15:45:00 2004 From: Subscriptions at servicexp.com (Robert Gracie) Date: Tue, 13 Jan 2004 16:45:00 -0500 Subject: [AccessD] =function() in .onclick In-Reply-To: Message-ID: Hello All, Since I'm just learning this type of programming technique I thought I would ask a question... Why not use Implements instead of WithEvents? My limited understand of WithEvents is that they will not return functionality unit they (the event) has completed processing... Since I'm just at the "door" so to speak with learning how to use and incorporate these new (to me) programming techniques into my work, I really want to start out using the "best" technique... Robert Gracie www.servicexp.com -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of John W. Colby Sent: Tuesday, January 13, 2004 9:44 AM To: Access Developers discussion and problem solving Subject: RE: [AccessD] =function() in .onclick Chris, I credit Shamil with teaching me everything I know about Withevents. I would never have discovered them, and would not be where I am today in Access without his examples and his prodding to look at WithEvents. If you looked at Shamil's stuff you will see where he places the [Event Procedure] in the control's event procedure using code inside the Init event of the class itself as the class instantiates. That is where I learned to do this and one reason I so dislike developers putting function calls in those properties. I used to use the tag property a lot using ADH code to set and read them. Once I started using classes I moved away from that to either setting properties directly in the class init or (in the case of my scanner, where it's more generic) using class properties to set these values later. There are pluses and minuses to using the tag - the control carries it's initialization properties with it, but if any other developer uses the tag yours can get trashed. I finally just stopped using it although there is still ONE place I do, and that is in my Just In Time form loading, where I place the form name in the tag. If it's there it will do JIT, otherwise it just loads normally. I would like to thank you though for the hint about input masks. My users have been pushing me to "standardize" the date inputmasks and using my framework I can do just that quite easily. John W. Colby www.ColbyConsulting.com From cfoust at infostatsystems.com Tue Jan 13 15:56:03 2004 From: cfoust at infostatsystems.com (Charlotte Foust) Date: Tue, 13 Jan 2004 13:56:03 -0800 Subject: [AccessD] =function() in .onclick Message-ID: They have somewhat different purposes. Implements allows you to subclass an existing object/class and give it additional or different functionality, so you can have a class Dog and a subclass Spaniel that has a property Retriever. WithEvents allows you to monitor the events of an object/class. You can intercept and respond to specific events when they happen in the object. Did the Bark event trigger? WithEvents lets you find out and respond from another class/object. Charlotte Foust -----Original Message----- From: Robert Gracie [mailto:Subscriptions at servicexp.com] Sent: Tuesday, January 13, 2004 1:45 PM To: Access Developers discussion and problem solving Subject: RE: [AccessD] =function() in .onclick Hello All, Since I'm just learning this type of programming technique I thought I would ask a question... Why not use Implements instead of WithEvents? My limited understand of WithEvents is that they will not return functionality unit they (the event) has completed processing... Since I'm just at the "door" so to speak with learning how to use and incorporate these new (to me) programming techniques into my work, I really want to start out using the "best" technique... Robert Gracie www.servicexp.com -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of John W. Colby Sent: Tuesday, January 13, 2004 9:44 AM To: Access Developers discussion and problem solving Subject: RE: [AccessD] =function() in .onclick Chris, I credit Shamil with teaching me everything I know about Withevents. I would never have discovered them, and would not be where I am today in Access without his examples and his prodding to look at WithEvents. If you looked at Shamil's stuff you will see where he places the [Event Procedure] in the control's event procedure using code inside the Init event of the class itself as the class instantiates. That is where I learned to do this and one reason I so dislike developers putting function calls in those properties. I used to use the tag property a lot using ADH code to set and read them. Once I started using classes I moved away from that to either setting properties directly in the class init or (in the case of my scanner, where it's more generic) using class properties to set these values later. There are pluses and minuses to using the tag - the control carries it's initialization properties with it, but if any other developer uses the tag yours can get trashed. I finally just stopped using it although there is still ONE place I do, and that is in my Just In Time form loading, where I place the form name in the tag. If it's there it will do JIT, otherwise it just loads normally. I would like to thank you though for the hint about input masks. My users have been pushing me to "standardize" the date inputmasks and using my framework I can do just that quite easily. John W. Colby www.ColbyConsulting.com _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From jmwayne at moordri.com Tue Jan 13 16:04:58 2004 From: jmwayne at moordri.com (JM Wayne) Date: Tue, 13 Jan 2004 17:04:58 -0500 Subject: [AccessD] A curious problem... In-Reply-To: <8B98F8EA48F8BA47A2F24E0D0AF40CF407AD7CAC@xlivmbx12.aig.com> Message-ID: <000001c3da21$4a8df8a0$87c9040a@direcway.com> Lambert, I'm losin' it. I repaired, decompiled and imported and still no luck. Any more ideas short of jumping off a bridge ? Thanks. Judy -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Heenan, Lambert Sent: Tuesday, January 13, 2004 2:51 PM To: 'Access Developers discussion and problem solving' Subject: RE: [AccessD] A curious problem... First make a backup copy of the MDB file. Then try repairing. No joy? Try decompiling. Still no luck? Try importing all the objects in the database to a new mdb file. Lambert -----Original Message----- From: JM Wayne [mailto:jmwayne at moordri.com] Sent: Tuesday, January 13, 2004 2:25 PM To: AccessD (E-mail) Subject: [AccessD] A curious problem... I have an A2K database that has been in use for over 2 years. All of a sudden the forms are resizing themselves. In one case the user enters data on one form and by clicking a button opens another form for data input. In another form the user double clicks an item in a list box and opens a form to enter data. In both cases when they close the second form the initial form is no longer maximized. I entered DoCmd.Maximize in the second form's On Close event but it is kind of clumsy. There has been no change in the code that should cause this to happen. I should mention that the forms that are having this problem have a great number of controls on them. Any advice or explanation would be appreciated. Judy Judith M Wayne Shefford-Meade, Inc. _______________________________________________ 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 From martyconnelly at shaw.ca Tue Jan 13 16:27:07 2004 From: martyconnelly at shaw.ca (MartyConnelly) Date: Tue, 13 Jan 2004 14:27:07 -0800 Subject: [AccessD] UnDelete References: Message-ID: <400470BB.9020403@shaw.ca> Here is Peter Millers explantion from pksolutions.com In general, its not possible to recover more than a very small percentage of deleted records when the records are deleted but the table is not. This has been true for all recent versions of Access. The reason for this is that Access/Jet copy the first deleted record over the remaining deleted records on a data page, so even though the file does not decrease in size, most of the data (usually >95% of it) is still completely overwritten. If there is doubt about this, I encourage anyone with questions to make a copy of a database they use frequently, open the copy, delete all the data from a key table (noting some of the record values), then close the copy and open it in a hex editor. Most of the file contents will appear garbled, but scroll through until you find data from the table you deleted records from. You will see numerous copies of a few of the deleted records. Can these records be recovered? Yes, but when you see, say 20 copies of the same deleted record, while all twenty copies can be recovered, there should have been twenty distinct records and not twenty copies of the same record. In other words, 19 of the deleted records have been overwriten. I would strongly advise Ronley and anyone else reading this thread to not trust someone like Marcus who lies about this. If there is any doubt, and you don't mind sending your file in to someone like Marcus, and you'll soon find out that he can't in fact do what he claims. Only a small number of distinct deleted records can be recovered. Its not a question of skill - its a question of whether or not all the deleted records exist to be recovered in any state at all, and unfortunately, they do not. This is not an issue if the entire table was deleted (ie, not the records alone, but the table definition itself). Any and all deleted tables can always be recovered, but deleted records from within a table that is itself not deleted are not recoverable in any meaningful sense. Peter Miller PK Solutions _____________________________________________________ Jim Dettman wrote: >Julie, > > yes they are there, but there is no functionality in Access/JET to >undelete them. Part of the reason is the LV (Long Value Pages) are recycled >(depending on a registry setting), so it may not always be possible to bring >a record back if records have been saved. > > Because of that, an undelete has never been built into Access. > >Jim Dettman >President, >Online Computer Services of WNY, Inc. >(315) 699-3443 >jimdettman at earthlink.net > >-----Original Message----- >From: accessd-bounces at databaseadvisors.com >[mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Julie >Reardon-Taylor >Sent: Tuesday, January 13, 2004 3:45 PM >To: accessd at databaseadvisors.com >Subject: Re: [AccessD] UnDelete > > >Aren't Access records marked for deletion, and not actually deleted until >the database is compacted? Shouldn't these records still be in the table? >Can't I unmark these records for deletion? > > > >Julie Reardon-Taylor >PRO-SOFT OF NY, INC. >www.pro-soft.net > >_________________________________________________________________ >Get a FREE online virus check for your PC here, from McAfee. >http://clinic.mcafee.com/clinic/ibuy/campaign.asp?cid=3963 > >_______________________________________________ >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 > > > -- Marty Connelly Victoria, B.C. Canada From prosoft6 at hotmail.com Tue Jan 13 17:51:43 2004 From: prosoft6 at hotmail.com (Julie Reardon-Taylor) Date: Tue, 13 Jan 2004 18:51:43 -0500 Subject: [AccessD] UnDelete Message-ID: Thank you Francisco, Charlotte, Marty, and Jim for answering my question. Guess my junior associate is SOL. Lost five days worth of work! I'll be sure to rub it in just a little bit! Wish there was some way around it, but I guess he'll just have to re-do the work. I really appreciate all of the answers that I recieve on this list. Thank you so much for being there ;) Julie Reardon-Taylor PRO-SOFT OF NY, INC. www.pro-soft.net _________________________________________________________________ Scope out the new MSN Plus Internet Software ? optimizes dial-up to the max! http://join.msn.com/?pgmarket=en-us&page=byoa/plus&ST=1 From mike.tope at dsl.pipex.com Tue Jan 13 17:52:05 2004 From: mike.tope at dsl.pipex.com (Mike Tope) Date: Tue, 13 Jan 2004 23:52:05 -0000 Subject: [AccessD] Access v2 on XP Find First Message-ID: <00e901c3da30$dfc634a0$0207a8c0@TopEnergy> Dear All I believe there are people on this list who persevere with Access 2 - I've hit a little snagette and wonder if anyone else has ? In Windows XP with Office XP installed, the user is running Access 2 from a file server. The find box (the binoculars button) is failing when you use Find First. This is on a primary key field. Occasionally it gives a syntax error (no details); more usually it reports "Search succeeded" but continues to display the record you started on. Using Find Next is a much more effective option that usually achieves the required effect (maybe always, if the record truly exists). I've tried this same database from the same shortcut in NT and 2000 with Office 2000 installed, and both have no problem with Find First. And it has worked on Win 95/Office 97 machines for many years. I've repaired and compacted. I've fiddled with fields and primary keys to remove the index and rebuild it. It remains the case that the XP machines can't operate Access 2's Find First in any reliable fashion. Any ideas ? Would service packs be relevant ? TIA Mike Tope PS late night (GMT) user only due to child on Nexus ... From BBarabash at TappeConstruction.com Tue Jan 13 18:12:59 2004 From: BBarabash at TappeConstruction.com (Brett Barabash) Date: Tue, 13 Jan 2004 18:12:59 -0600 Subject: [AccessD] Access v2 on XP Find First Message-ID: <426071E0B0A6D311B3C0006008B0AB23AFE2A9@TAPPEEXCH01> We are running A2 applications here on Win2k machines, and have the same problem. I just told the users to use the Find Next button (which is hilighted by default anyways). AFAIK, there is nothing you can change that will fix this. Nothing is wrong with your db or app per se, just a quirk of the 16-bit VM that runs MSACCESS.EXE (or MSARN200.EXE), I guess. -----Original Message----- From: Mike Tope [mailto:mike.tope at dsl.pipex.com] Sent: Tuesday, January 13, 2004 5:52 PM To: accessd Subject: [AccessD] Access v2 on XP Find First Dear All I believe there are people on this list who persevere with Access 2 - I've hit a little snagette and wonder if anyone else has ? In Windows XP with Office XP installed, the user is running Access 2 from a file server. The find box (the binoculars button) is failing when you use Find First. This is on a primary key field. Occasionally it gives a syntax error (no details); more usually it reports "Search succeeded" but continues to display the record you started on. Using Find Next is a much more effective option that usually achieves the required effect (maybe always, if the record truly exists). I've tried this same database from the same shortcut in NT and 2000 with Office 2000 installed, and both have no problem with Find First. And it has worked on Win 95/Office 97 machines for many years. I've repaired and compacted. I've fiddled with fields and primary keys to remove the index and rebuild it. It remains the case that the XP machines can't operate Access 2's Find First in any reliable fashion. Any ideas ? Would service packs be relevant ? TIA Mike Tope PS late night (GMT) user only due to child on Nexus ... _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -------------------------------------------------------------------------------------------------------------------- This email and any files transmitted with it are confidential and intended solely for the use of the individual or entity to whom they are addressed. If you have received this email in error please notify the originator of the message. This footer also confirms that this email message has been scanned for the presence of computer viruses. Any views expressed in this message are those of the individual sender, except where the sender specifies and with authority, states them to be the views of Tappe Construction Co. Scanning of this message and addition of this footer is performed by SurfControl E-mail Filter software in conjunction with virus detection software. From jwcolby at colbyconsulting.com Tue Jan 13 18:54:12 2004 From: jwcolby at colbyconsulting.com (John W. Colby) Date: Tue, 13 Jan 2004 19:54:12 -0500 Subject: [AccessD] Implements vs WithEvents In-Reply-To: Message-ID: Charlotte, >They have somewhat different purposes. No, they have completely different purposes. >Implements allows you to subclass an existing object/class and give it additional or different functionality, so you can have a class Dog and a subclass Spaniel that has a property Retriever. Well... true but not exactly. My issue with that statement is the term subclass as you use it. Yes you are subclassing the original but ONLY the interface. IMHO that is almost useless Implements is an interface ONLY inheritance, i.e. it allows (forces) you to start with the same public data and method DEFINITION but does not actually inherit the behaviors (methods) themselves. I.e. the code that runs in the class that is being subclassed is NOT inherited into the subclass. Access' inheritance (interface) is not very useful except as a template kind of thing. I find it useless enough that I personally don't bother. On the other hand Shamil is a proponent so it must have its uses. When you move to VB.NET (or any of the other .net languages I believe) TRUE inheritance is available. I.e. if you have a method with a thousand lines of code, when you subclass that object the new object inherits that code as well as the data. In our Implements subclassing, you would have to cut and paste that thousand lines of code into the subclass. Can you say maintenance nightmare? >You can intercept and respond to specific events when they happen in the object. Did the Bark event trigger? WithEvents lets you find out and respond from another class/object. Exactly correct. One of the MAJOR shortcomings of Access / VBA (in fact VB prior to VB.Net) is that Inheritance is virtually non-existent, and even worse, objects other than forms don't have a built in class that you can get at to add functionality directly to. What WithEvents really does is allow you to build class wrappers for objects so that you can encapsulate behaviors (functionality) in your class. In essence you still have two objects, the control (or even another class or OCX) and your class, but now you can put all of the common functionality in your class along with the event stubs of the control/class/ocx that generates the event. This does not get you any further down the road towards inheritance, sadly it simply doesn't appear to be possible in Access / VBA. But it does provide a huge step up in encapsulation. John W. Colby www.ColbyConsulting.com -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Charlotte Foust Sent: Tuesday, January 13, 2004 4:56 PM To: Access Developers discussion and problem solving Subject: RE: [AccessD] =function() in .onclick They have somewhat different purposes. Implements allows you to subclass an existing object/class and give it additional or different functionality, so you can have a class Dog and a subclass Spaniel that has a property Retriever. WithEvents allows you to monitor the events of an object/class. You can intercept and respond to specific events when they happen in the object. Did the Bark event trigger? WithEvents lets you find out and respond from another class/object. Charlotte Foust -----Original Message----- From: Robert Gracie [mailto:Subscriptions at servicexp.com] Sent: Tuesday, January 13, 2004 1:45 PM To: Access Developers discussion and problem solving Subject: RE: [AccessD] =function() in .onclick Hello All, Since I'm just learning this type of programming technique I thought I would ask a question... Why not use Implements instead of WithEvents? My limited understand of WithEvents is that they will not return functionality unit they (the event) has completed processing... Since I'm just at the "door" so to speak with learning how to use and incorporate these new (to me) programming techniques into my work, I really want to start out using the "best" technique... Robert Gracie www.servicexp.com From mike.tope at dsl.pipex.com Tue Jan 13 19:14:22 2004 From: mike.tope at dsl.pipex.com (Mike Tope) Date: Wed, 14 Jan 2004 01:14:22 -0000 Subject: [AccessD] Access v2 on XP Find First References: <426071E0B0A6D311B3C0006008B0AB23AFE2A9@TAPPEEXCH01> Message-ID: <01d701c3da3b$c0625020$0207a8c0@TopEnergy> Thanks Brett, I thought as much. This is a database of archives, so it looks like it'll have to migrate to a later format rather than trying to persuade various coming and going users to get used to (not) pressing a particular button. No rush, though. Mike Tope ----- Original Message ----- From: "Brett Barabash" To: "'Access Developers discussion and problem solving'" Sent: 14 January 2004 00:12 Subject: RE: [AccessD] Access v2 on XP Find First > We are running A2 applications here on Win2k machines, and have the same > problem. > I just told the users to use the Find Next button (which is hilighted by > default anyways). > AFAIK, there is nothing you can change that will fix this. Nothing is wrong > with your db or app per se, just a quirk of the 16-bit VM that runs > MSACCESS.EXE (or MSARN200.EXE), I guess. > > > -----Original Message----- > From: Mike Tope [mailto:mike.tope at dsl.pipex.com] > Sent: Tuesday, January 13, 2004 5:52 PM > To: accessd > Subject: [AccessD] Access v2 on XP Find First > > > Dear All > > I believe there are people on this list who persevere with Access 2 - I've > hit a little snagette and wonder if anyone else has ? > > In Windows XP with Office XP installed, the user is running Access 2 from a > file server. The find box (the binoculars button) is failing when you use > Find First. This is on a primary key field. > > Occasionally it gives a syntax error (no details); more usually it reports > "Search succeeded" but continues to display the record you started on. > > Using Find Next is a much more effective option that usually achieves the > required effect (maybe always, if the record truly exists). > > I've tried this same database from the same shortcut in NT and 2000 with > Office 2000 installed, and both have no problem with Find First. And it has > worked on Win 95/Office 97 machines for many years. > > I've repaired and compacted. I've fiddled with fields and primary keys to > remove the index and rebuild it. It remains the case that the XP machines > can't operate Access 2's Find First in any reliable fashion. > > Any ideas ? Would service packs be relevant ? > > TIA > Mike Tope > PS late night (GMT) user only due to child on Nexus ... > > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com > > -------------------------------------------------------------------------- ------------------------------------------ > This email and any files transmitted with it are confidential and > intended solely for the use of the individual or entity to whom > they are addressed. > If you have received this email in error please notify the > originator of the message. This footer also confirms that this > email message has been scanned for the presence of computer viruses. > > Any views expressed in this message are those of the individual > sender, except where the sender specifies and with authority, > states them to be the views of Tappe Construction Co. > > Scanning of this message and addition of this footer is performed > by SurfControl E-mail Filter software in conjunction with > virus detection software. > > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com > From cfoust at infostatsystems.com Tue Jan 13 19:16:56 2004 From: cfoust at infostatsystems.com (Charlotte Foust) Date: Tue, 13 Jan 2004 17:16:56 -0800 Subject: [AccessD] Implements vs WithEvents Message-ID: John, Would you have understood your response when *you* were first getting your feet wet in this kind of programming? I wasn't trying to provide the definitive answer, just a frame of reference. VB/VBA isn't fully object-oriented, so it can't really support Implements in all its glory. Charlotte Foust -----Original Message----- From: John W. Colby [mailto:jwcolby at colbyconsulting.com] Sent: Tuesday, January 13, 2004 4:54 PM To: Access Developers discussion and problem solving Subject: [AccessD] Implements vs WithEvents Charlotte, >They have somewhat different purposes. No, they have completely different purposes. >Implements allows you to subclass an existing object/class and give it additional or different functionality, so you can have a class Dog and a subclass Spaniel that has a property Retriever. Well... true but not exactly. My issue with that statement is the term subclass as you use it. Yes you are subclassing the original but ONLY the interface. IMHO that is almost useless Implements is an interface ONLY inheritance, i.e. it allows (forces) you to start with the same public data and method DEFINITION but does not actually inherit the behaviors (methods) themselves. I.e. the code that runs in the class that is being subclassed is NOT inherited into the subclass. Access' inheritance (interface) is not very useful except as a template kind of thing. I find it useless enough that I personally don't bother. On the other hand Shamil is a proponent so it must have its uses. When you move to VB.NET (or any of the other .net languages I believe) TRUE inheritance is available. I.e. if you have a method with a thousand lines of code, when you subclass that object the new object inherits that code as well as the data. In our Implements subclassing, you would have to cut and paste that thousand lines of code into the subclass. Can you say maintenance nightmare? >You can intercept and respond to specific events when they happen in >the object. Did the Bark event trigger? WithEvents lets you find out and respond from another class/object. Exactly correct. One of the MAJOR shortcomings of Access / VBA (in fact VB prior to VB.Net) is that Inheritance is virtually non-existent, and even worse, objects other than forms don't have a built in class that you can get at to add functionality directly to. What WithEvents really does is allow you to build class wrappers for objects so that you can encapsulate behaviors (functionality) in your class. In essence you still have two objects, the control (or even another class or OCX) and your class, but now you can put all of the common functionality in your class along with the event stubs of the control/class/ocx that generates the event. This does not get you any further down the road towards inheritance, sadly it simply doesn't appear to be possible in Access / VBA. But it does provide a huge step up in encapsulation. John W. Colby www.ColbyConsulting.com -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Charlotte Foust Sent: Tuesday, January 13, 2004 4:56 PM To: Access Developers discussion and problem solving Subject: RE: [AccessD] =function() in .onclick They have somewhat different purposes. Implements allows you to subclass an existing object/class and give it additional or different functionality, so you can have a class Dog and a subclass Spaniel that has a property Retriever. WithEvents allows you to monitor the events of an object/class. You can intercept and respond to specific events when they happen in the object. Did the Bark event trigger? WithEvents lets you find out and respond from another class/object. Charlotte Foust -----Original Message----- From: Robert Gracie [mailto:Subscriptions at servicexp.com] Sent: Tuesday, January 13, 2004 1:45 PM To: Access Developers discussion and problem solving Subject: RE: [AccessD] =function() in .onclick Hello All, Since I'm just learning this type of programming technique I thought I would ask a question... Why not use Implements instead of WithEvents? My limited understand of WithEvents is that they will not return functionality unit they (the event) has completed processing... Since I'm just at the "door" so to speak with learning how to use and incorporate these new (to me) programming techniques into my work, I really want to start out using the "best" technique... Robert Gracie www.servicexp.com _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From Subscriptions at servicexp.com Tue Jan 13 19:47:24 2004 From: Subscriptions at servicexp.com (Robert Gracie) Date: Tue, 13 Jan 2004 20:47:24 -0500 Subject: [AccessD] Implements vs WithEvents In-Reply-To: Message-ID: "Hmmmmmmm, As confusion sets in, he takes and stabs himself in the chest with his keyboard...:-)" I'm trying to understand why the VBA DHB is teaching that using INTERFACE inheritance classes (by way of the Implements Keyword and such) is much better then simply using Event, RaiseEvent, and WithEvents... The problem, for me at least, is getting my mind around the larger concept, and knowing which structure to use and why. With my very limited understanding, the way they have presented, it seems reasonable to go this route if only to help keep control over code execution... I guess I just need to keep pounding away at these concepts....... Robert Gracie www.servicexp.com -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of John W. Colby Sent: Tuesday, January 13, 2004 7:54 PM To: Access Developers discussion and problem solving Subject: [AccessD] Implements vs WithEvents Charlotte, >They have somewhat different purposes. No, they have completely different purposes. >Implements allows you to subclass an existing object/class and give it additional or different functionality, so you can have a class Dog and a subclass Spaniel that has a property Retriever. Well... true but not exactly. My issue with that statement is the term subclass as you use it. Yes you are subclassing the original but ONLY the interface. IMHO that is almost useless Implements is an interface ONLY inheritance, i.e. it allows (forces) you to start with the same public data and method DEFINITION but does not actually inherit the behaviors (methods) themselves. I.e. the code that runs in the class that is being subclassed is NOT inherited into the subclass. Access' inheritance (interface) is not very useful except as a template kind of thing. I find it useless enough that I personally don't bother. On the other hand Shamil is a proponent so it must have its uses. When you move to VB.NET (or any of the other .net languages I believe) TRUE inheritance is available. I.e. if you have a method with a thousand lines of code, when you subclass that object the new object inherits that code as well as the data. In our Implements subclassing, you would have to cut and paste that thousand lines of code into the subclass. Can you say maintenance nightmare? >You can intercept and respond to specific events when they happen in the object. Did the Bark event trigger? WithEvents lets you find out and respond from another class/object. Exactly correct. One of the MAJOR shortcomings of Access / VBA (in fact VB prior to VB.Net) is that Inheritance is virtually non-existent, and even worse, objects other than forms don't have a built in class that you can get at to add functionality directly to. What WithEvents really does is allow you to build class wrappers for objects so that you can encapsulate behaviors (functionality) in your class. In essence you still have two objects, the control (or even another class or OCX) and your class, but now you can put all of the common functionality in your class along with the event stubs of the control/class/ocx that generates the event. This does not get you any further down the road towards inheritance, sadly it simply doesn't appear to be possible in Access / VBA. But it does provide a huge step up in encapsulation. John W. Colby www.ColbyConsulting.com -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Charlotte Foust Sent: Tuesday, January 13, 2004 4:56 PM To: Access Developers discussion and problem solving Subject: RE: [AccessD] =function() in .onclick They have somewhat different purposes. Implements allows you to subclass an existing object/class and give it additional or different functionality, so you can have a class Dog and a subclass Spaniel that has a property Retriever. WithEvents allows you to monitor the events of an object/class. You can intercept and respond to specific events when they happen in the object. Did the Bark event trigger? WithEvents lets you find out and respond from another class/object. Charlotte Foust -----Original Message----- From: Robert Gracie [mailto:Subscriptions at servicexp.com] Sent: Tuesday, January 13, 2004 1:45 PM To: Access Developers discussion and problem solving Subject: RE: [AccessD] =function() in .onclick Hello All, Since I'm just learning this type of programming technique I thought I would ask a question... Why not use Implements instead of WithEvents? My limited understand of WithEvents is that they will not return functionality unit they (the event) has completed processing... Since I'm just at the "door" so to speak with learning how to use and incorporate these new (to me) programming techniques into my work, I really want to start out using the "best" technique... Robert Gracie www.servicexp.com _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From jwcolby at colbyconsulting.com Tue Jan 13 19:54:25 2004 From: jwcolby at colbyconsulting.com (John W. Colby) Date: Tue, 13 Jan 2004 20:54:25 -0500 Subject: [AccessD] Implements vs WithEvents In-Reply-To: Message-ID: Hmm... well I hope so as I am also responding directly, in detail. ;-) John W. Colby www.ColbyConsulting.com -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Charlotte Foust Sent: Tuesday, January 13, 2004 8:17 PM To: Access Developers discussion and problem solving Subject: RE: [AccessD] Implements vs WithEvents John, Would you have understood your response when *you* were first getting your feet wet in this kind of programming? I wasn't trying to provide the definitive answer, just a frame of reference. VB/VBA isn't fully object-oriented, so it can't really support Implements in all its glory. Charlotte Foust -----Original Message----- From: John W. Colby [mailto:jwcolby at colbyconsulting.com] Sent: Tuesday, January 13, 2004 4:54 PM To: Access Developers discussion and problem solving Subject: [AccessD] Implements vs WithEvents Charlotte, >They have somewhat different purposes. No, they have completely different purposes. >Implements allows you to subclass an existing object/class and give it additional or different functionality, so you can have a class Dog and a subclass Spaniel that has a property Retriever. Well... true but not exactly. My issue with that statement is the term subclass as you use it. Yes you are subclassing the original but ONLY the interface. IMHO that is almost useless Implements is an interface ONLY inheritance, i.e. it allows (forces) you to start with the same public data and method DEFINITION but does not actually inherit the behaviors (methods) themselves. I.e. the code that runs in the class that is being subclassed is NOT inherited into the subclass. Access' inheritance (interface) is not very useful except as a template kind of thing. I find it useless enough that I personally don't bother. On the other hand Shamil is a proponent so it must have its uses. When you move to VB.NET (or any of the other .net languages I believe) TRUE inheritance is available. I.e. if you have a method with a thousand lines of code, when you subclass that object the new object inherits that code as well as the data. In our Implements subclassing, you would have to cut and paste that thousand lines of code into the subclass. Can you say maintenance nightmare? >You can intercept and respond to specific events when they happen in >the object. Did the Bark event trigger? WithEvents lets you find out and respond from another class/object. Exactly correct. One of the MAJOR shortcomings of Access / VBA (in fact VB prior to VB.Net) is that Inheritance is virtually non-existent, and even worse, objects other than forms don't have a built in class that you can get at to add functionality directly to. What WithEvents really does is allow you to build class wrappers for objects so that you can encapsulate behaviors (functionality) in your class. In essence you still have two objects, the control (or even another class or OCX) and your class, but now you can put all of the common functionality in your class along with the event stubs of the control/class/ocx that generates the event. This does not get you any further down the road towards inheritance, sadly it simply doesn't appear to be possible in Access / VBA. But it does provide a huge step up in encapsulation. John W. Colby www.ColbyConsulting.com -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Charlotte Foust Sent: Tuesday, January 13, 2004 4:56 PM To: Access Developers discussion and problem solving Subject: RE: [AccessD] =function() in .onclick They have somewhat different purposes. Implements allows you to subclass an existing object/class and give it additional or different functionality, so you can have a class Dog and a subclass Spaniel that has a property Retriever. WithEvents allows you to monitor the events of an object/class. You can intercept and respond to specific events when they happen in the object. Did the Bark event trigger? WithEvents lets you find out and respond from another class/object. Charlotte Foust -----Original Message----- From: Robert Gracie [mailto:Subscriptions at servicexp.com] Sent: Tuesday, January 13, 2004 1:45 PM To: Access Developers discussion and problem solving Subject: RE: [AccessD] =function() in .onclick Hello All, Since I'm just learning this type of programming technique I thought I would ask a question... Why not use Implements instead of WithEvents? My limited understand of WithEvents is that they will not return functionality unit they (the event) has completed processing... Since I'm just at the "door" so to speak with learning how to use and incorporate these new (to me) programming techniques into my work, I really want to start out using the "best" technique... Robert Gracie www.servicexp.com _______________________________________________ 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 From jwcolby at colbyconsulting.com Tue Jan 13 20:04:37 2004 From: jwcolby at colbyconsulting.com (John W. Colby) Date: Tue, 13 Jan 2004 21:04:37 -0500 Subject: [AccessD] Withevents vs Implements In-Reply-To: Message-ID: Robert, >Why not use Implements instead of WithEvents? They are not the same thing at all. Implements is interface inheritance, i.e. subclassing the exposed global data and method DEFINITIONS of an object. In some circles it is also called a Contract - "I agree to provide similar functionality and data as the object that I am implementing - plus something additional that I want to add". Unfortunately, unlike real inheritance where you also get the actual code of the parent object (if you don't override it), in Implements you don't. If you want that code you have to cut and paste it into you own subclassed object (if the source is even available to you). Yuk. Withevents is nothing more than the ability to sink events from one OR MORE objects in your own class. I am wrapping an entire object (or at least some of it's events) inside my class. One of the objectives of object oriented programming (of which inheritance is a technique), is encapsulation of all of the data and code required to implement an "object". Encapsulation simply means placing everything in one place, but it also means hiding implementation details from view. When a combo box double click event occurs (in my framework) my class for the combo control MAY open a form to allow the user to add new items to the table that contains the data for the combo. Likewise that same form can be used to EDIT (or delete) the data in that table. Either way, the form is opened modal (you can't do anything outside the form) and when that form closes, the combo is requeried so that the latest contents of the table are contained in the combo. How is all that done? Who cares? All that the developer needs to know is how to cause the combo class to use that functionality. In the case of my framework, it is caused by passing a form name to the combo class through one of it's methods. Doing that sets up the combo to "know" that if a double click occurs it should open that form. So my class has a variable to hold the name of the form to open and has a method to pass in the name of the form. Equally importantly, my combo class sinks the double click itself and runs code that opens that form IF the variable contains a string of length > 0. If it DOESN'T have a form name to open, it puts up a message box telling the user they don't have permission to edit the data behind the combo. It happens that I use autonumber PKs throughout my databases. As a result the column(0) of the bound combo contains the PK of the record currently selected in the combo. When (if) the form opens, the combo class passes that PK of the record that is currently selected in the combo to the form (as an openarg, in the same format that ADH used for tags) , and the form's class "moves" the recordset of the form being opened to display that record and sets the focus into that record. This allows the user to not only open the form using a DblClick, but be right there at the data they need to edit (if for example the data is wrong - a misspelled name for example). As you can see, having a class to wrap a combo up in can be a pretty useful thing. All this functionality is just there, available to me at all times. I write this kind of code once, then all combos throughout my application have this functionality. How it happens is hidden from the developer (me in this case), I don't have to remember how to do all this stuff, the class knows how. I don't have to remember to call a function in an event stub in a form somewhere, if a class is instantiated for that combo it has that functionality. Withevents is the key that allows me to sink that DblClick right inside my class so that I am not having to remember to call functions to get this stuff to happen. Believe me, I used to do pretty much the same thing without classes, just calling functions from event stubs in the form itself. In fact I wrote an event stub insertion wizard to build these function calls specifically for my framework (C2DbFrameWiz) and insert them into the form. Believe me again when I say that method of programming isn't even in the same league as classes and Withevents. LEARN THIS STUFF, you won't regret it. BTW, Withevents is available in VBA (Excel, Word etc.), VB as well as VB.NET so it's not something you will learn just for Access. Again my sincere thanks to Shamil who prodded me to figure this stuff out and provided sample code to get me started. I repeat, I would not be where I am today as an Access programmer without Withevents and Classes. BTW, I wrote a chapter for this stuff (Withevents) for Beginning Access 2002 VBA, Wrox publishers, ISBN 1-86100-821-X. The entire chapter was published in Advisor (published on my birthday in fact). http://accessvbsqladvisor.com/Articles.nsf/dp/A6CBCC9F0ED68B2E88256DD4007C2F DD Watch for line wrap. Of course you could just buy the book. John W. Colby www.ColbyConsulting.com -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Robert Gracie Sent: Tuesday, January 13, 2004 4:45 PM To: Access Developers discussion and problem solving Subject: RE: [AccessD] =function() in .onclick Hello All, Since I'm just learning this type of programming technique I thought I would ask a question... Why not use Implements instead of WithEvents? My limited understand of WithEvents is that they will not return functionality unit they (the event) has completed processing... Since I'm just at the "door" so to speak with learning how to use and incorporate these new (to me) programming techniques into my work, I really want to start out using the "best" technique... Robert Gracie www.servicexp.com From Subscriptions at servicexp.com Tue Jan 13 20:39:18 2004 From: Subscriptions at servicexp.com (Robert Gracie) Date: Tue, 13 Jan 2004 21:39:18 -0500 Subject: [AccessD] Withevents vs Implements In-Reply-To: Message-ID: John, Thank you for your help, it's very much appreciated. I'm not quite there yet but I am starting to "Get" the concepts at least. Is the example db they used in that article available outside of purchasing the book...? Or do you have any examples of what you where specifically explaining? Thanks Again Robert Gracie www.servicexp.com -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of John W. Colby Sent: Tuesday, January 13, 2004 9:05 PM To: Access Developers discussion and problem solving Subject: [AccessD] Withevents vs Implements Robert, >Why not use Implements instead of WithEvents? They are not the same thing at all. Implements is interface inheritance, i.e. subclassing the exposed global data and method DEFINITIONS of an object. In some circles it is also called a Contract - "I agree to provide similar functionality and data as the object that I am implementing - plus something additional that I want to add". Unfortunately, unlike real inheritance where you also get the actual code of the parent object (if you don't override it), in Implements you don't. If you want that code you have to cut and paste it into you own subclassed object (if the source is even available to you). Yuk. Withevents is nothing more than the ability to sink events from one OR MORE objects in your own class. I am wrapping an entire object (or at least some of it's events) inside my class. One of the objectives of object oriented programming (of which inheritance is a technique), is encapsulation of all of the data and code required to implement an "object". Encapsulation simply means placing everything in one place, but it also means hiding implementation details from view. When a combo box double click event occurs (in my framework) my class for the combo control MAY open a form to allow the user to add new items to the table that contains the data for the combo. Likewise that same form can be used to EDIT (or delete) the data in that table. Either way, the form is opened modal (you can't do anything outside the form) and when that form closes, the combo is requeried so that the latest contents of the table are contained in the combo. How is all that done? Who cares? All that the developer needs to know is how to cause the combo class to use that functionality. In the case of my framework, it is caused by passing a form name to the combo class through one of it's methods. Doing that sets up the combo to "know" that if a double click occurs it should open that form. So my class has a variable to hold the name of the form to open and has a method to pass in the name of the form. Equally importantly, my combo class sinks the double click itself and runs code that opens that form IF the variable contains a string of length > 0. If it DOESN'T have a form name to open, it puts up a message box telling the user they don't have permission to edit the data behind the combo. It happens that I use autonumber PKs throughout my databases. As a result the column(0) of the bound combo contains the PK of the record currently selected in the combo. When (if) the form opens, the combo class passes that PK of the record that is currently selected in the combo to the form (as an openarg, in the same format that ADH used for tags) , and the form's class "moves" the recordset of the form being opened to display that record and sets the focus into that record. This allows the user to not only open the form using a DblClick, but be right there at the data they need to edit (if for example the data is wrong - a misspelled name for example). As you can see, having a class to wrap a combo up in can be a pretty useful thing. All this functionality is just there, available to me at all times. I write this kind of code once, then all combos throughout my application have this functionality. How it happens is hidden from the developer (me in this case), I don't have to remember how to do all this stuff, the class knows how. I don't have to remember to call a function in an event stub in a form somewhere, if a class is instantiated for that combo it has that functionality. Withevents is the key that allows me to sink that DblClick right inside my class so that I am not having to remember to call functions to get this stuff to happen. Believe me, I used to do pretty much the same thing without classes, just calling functions from event stubs in the form itself. In fact I wrote an event stub insertion wizard to build these function calls specifically for my framework (C2DbFrameWiz) and insert them into the form. Believe me again when I say that method of programming isn't even in the same league as classes and Withevents. LEARN THIS STUFF, you won't regret it. BTW, Withevents is available in VBA (Excel, Word etc.), VB as well as VB.NET so it's not something you will learn just for Access. Again my sincere thanks to Shamil who prodded me to figure this stuff out and provided sample code to get me started. I repeat, I would not be where I am today as an Access programmer without Withevents and Classes. BTW, I wrote a chapter for this stuff (Withevents) for Beginning Access 2002 VBA, Wrox publishers, ISBN 1-86100-821-X. The entire chapter was published in Advisor (published on my birthday in fact). http://accessvbsqladvisor.com/Articles.nsf/dp/A6CBCC9F0ED68B2E88256DD4007C2F DD Watch for line wrap. Of course you could just buy the book. John W. Colby www.ColbyConsulting.com -SNIP From jwcolby at colbyconsulting.com Tue Jan 13 21:02:46 2004 From: jwcolby at colbyconsulting.com (John W. Colby) Date: Tue, 13 Jan 2004 22:02:46 -0500 Subject: [AccessD] Implements vs WithEvents In-Reply-To: Message-ID: Robert, Risking sounding ignorant, I don't know what the VBA DHB is so I can't help you there. However AFAIK you can't use Implements for something like a control or form. These objects have code inside them that cause things to happen, properties to modify their behavior etc. ALL THAT STUFF can actually be inherited in VB.NET. That is, you can actually start with a combo box, subclass that combo box, GET ALL OF IT'S FUNCTIONALITY, all of it's code, all of its properties and methods, plus add your own!!! Or even override things to change the way the combo box functions. THAT is true inheritance. Not so in Access / VBA. An object like a combo box is a self contained unit that you simply cannot get inside of or modify in any meaningful way. It appears to us Access programmers almost like an ocx, i.e. a black box that does things. IMPORTANT... one of the things these objects do is raise Events! IOW, they tell you when a user clicks the mouse, double clicks the mouse etc. "inside" their boundaries on the screen. Knowing this, every Access programmer ALREADY USES WITHEVENTS. How? By creating an event stub in a form's class, and inserting code in that event stub to do something that the programmer wants to do when that event happens. The confusing thing is that a form's class DOES NOT REQUIRE a withevents dimension statement for any controls contained in the form (or for itself - the form - for that matter). However there is an IMPLICIT dim statement in the class, invisible, but there none the less. So every Access programmer already knows all about handling events for combos, command buttons etc. They (most of us anyway) use the built-in wizards in the form's builder interface to insert event handler stubs into the form's class and insert code there. THAT IS WITHEVENT PROGRAMMING, with all the details taken care of for you. Well guess what, ANY CLASS can have those same event handlers in them!!! The only differenc is that if the class is not a form class, there must be an EXPLICIT dim Withevents statement for any control (any object actually) that you wish to sink events for. 'inside my own combo class header... 'Dim a combo withevents Private WithEvents mcbo As ComboBox Having the dim statement does nothing more than tell my combo class that a control of a specific type MAY be transferring control of one or more of it's events to the class directly. It does NOT say WHICH control. To do that you have to pass in a control to the class and inside the class, SET the dimmed control = the passed in control. 'inside my own combo class... 'Pass in a control and SET the internal control variable function Init(lcbo as ComboBox) set mcbo = lcbo end init THAT tells the class which combo to sink events for (the one being passed in of course). Once you do that, the class can sink ANY of the control's events. But you still haven't told the class WHICH events to sink. IOW, Even having done this, nothing will happen in your class unless you create an event stub for the control event you wish to process inside the class. 'inside my own combo class... 'create an event stub to which control will be passed when a specific event fires. Private Sub mcbo_AfterUpdate() 'Do Something really cool Msgbox "Something really cool" End Sub THAT tells the combo class WHICH event(s) to sink. Now you must of course instantiate your own combo class in your form and pass in a specific control to it. 'inside my FORM'S class header... 'dimension my own combo class dim fclsMyCombo as clsMyCombo 'inside my FORM'S class Private Sub Form_Open(Cancel As Integer) 'CREATE AN INSTANCE OF MY COOL COMBO CLASS Set fclsMyCombo = new clsMyCombo 'PASS A REFERENCE TO A SPECIFIC COMBO ON MY FORM fclsMyCombo.Init cboStates 'a combo displaying all the states in the union End Sub THAT tells Access to dimension a class, create a class instance and WHICH combo to pass off to the class instance. NOW, with ALL THESE THINGS IN PLACE, if that combo AfterUpdate fires, control will EVENTUALLY get to your class and your message box will display it's message. Notice that your form doesn't need any event stub in it for the control. Even though the ONLY sub in your form's class is the Form_Open, the event stub in your class will sink the event and the message box will display its message. I know full well that all this sounds like a LOT of work just to get control into a class but after you've done it a few times it will be 2nd nature. And of course you can then have a combo class that (see my other post) handles the double click, opens a form, allows your user to edit the data, and when the form closes, requeries the combo, all neatly encapsulated in a class. Plus all the other neato keenarino stuff you can imagine your combo doing. Hang in there. It took me three tries, each six months apart to finally "get" Shamil's stuff and understand Withevents. Looking back I can't understand why, but life is like that sometimes. And no, the demos for the book are copyrighted by Wrox and I can't legally distribute them, however there are many demos (by me of course) on DatabaseAdvisors' web site. I also have a bunch on my own site. This stuff is important, keep trying. John W. Colby www.ColbyConsulting.com -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Robert Gracie Sent: Tuesday, January 13, 2004 8:47 PM To: Access Developers discussion and problem solving Subject: RE: [AccessD] Implements vs WithEvents "Hmmmmmmm, As confusion sets in, he takes and stabs himself in the chest with his keyboard...:-)" I'm trying to understand why the VBA DHB is teaching that using INTERFACE inheritance classes (by way of the Implements Keyword and such) is much better then simply using Event, RaiseEvent, and WithEvents... The problem, for me at least, is getting my mind around the larger concept, and knowing which structure to use and why. With my very limited understanding, the way they have presented, it seems reasonable to go this route if only to help keep control over code execution... I guess I just need to keep pounding away at these concepts....... Robert Gracie www.servicexp.com -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of John W. Colby Sent: Tuesday, January 13, 2004 7:54 PM To: Access Developers discussion and problem solving Subject: [AccessD] Implements vs WithEvents Charlotte, >They have somewhat different purposes. No, they have completely different purposes. >Implements allows you to subclass an existing object/class and give it additional or different functionality, so you can have a class Dog and a subclass Spaniel that has a property Retriever. Well... true but not exactly. My issue with that statement is the term subclass as you use it. Yes you are subclassing the original but ONLY the interface. IMHO that is almost useless Implements is an interface ONLY inheritance, i.e. it allows (forces) you to start with the same public data and method DEFINITION but does not actually inherit the behaviors (methods) themselves. I.e. the code that runs in the class that is being subclassed is NOT inherited into the subclass. Access' inheritance (interface) is not very useful except as a template kind of thing. I find it useless enough that I personally don't bother. On the other hand Shamil is a proponent so it must have its uses. When you move to VB.NET (or any of the other .net languages I believe) TRUE inheritance is available. I.e. if you have a method with a thousand lines of code, when you subclass that object the new object inherits that code as well as the data. In our Implements subclassing, you would have to cut and paste that thousand lines of code into the subclass. Can you say maintenance nightmare? >You can intercept and respond to specific events when they happen in the object. Did the Bark event trigger? WithEvents lets you find out and respond from another class/object. Exactly correct. One of the MAJOR shortcomings of Access / VBA (in fact VB prior to VB.Net) is that Inheritance is virtually non-existent, and even worse, objects other than forms don't have a built in class that you can get at to add functionality directly to. What WithEvents really does is allow you to build class wrappers for objects so that you can encapsulate behaviors (functionality) in your class. In essence you still have two objects, the control (or even another class or OCX) and your class, but now you can put all of the common functionality in your class along with the event stubs of the control/class/ocx that generates the event. This does not get you any further down the road towards inheritance, sadly it simply doesn't appear to be possible in Access / VBA. But it does provide a huge step up in encapsulation. John W. Colby www.ColbyConsulting.com -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Charlotte Foust Sent: Tuesday, January 13, 2004 4:56 PM To: Access Developers discussion and problem solving Subject: RE: [AccessD] =function() in .onclick They have somewhat different purposes. Implements allows you to subclass an existing object/class and give it additional or different functionality, so you can have a class Dog and a subclass Spaniel that has a property Retriever. WithEvents allows you to monitor the events of an object/class. You can intercept and respond to specific events when they happen in the object. Did the Bark event trigger? WithEvents lets you find out and respond from another class/object. Charlotte Foust -----Original Message----- From: Robert Gracie [mailto:Subscriptions at servicexp.com] Sent: Tuesday, January 13, 2004 1:45 PM To: Access Developers discussion and problem solving Subject: RE: [AccessD] =function() in .onclick Hello All, Since I'm just learning this type of programming technique I thought I would ask a question... Why not use Implements instead of WithEvents? My limited understand of WithEvents is that they will not return functionality unit they (the event) has completed processing... Since I'm just at the "door" so to speak with learning how to use and incorporate these new (to me) programming techniques into my work, I really want to start out using the "best" technique... Robert Gracie www.servicexp.com _______________________________________________ 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 From gustav at cactus.dk Wed Jan 14 03:07:49 2004 From: gustav at cactus.dk (Gustav Brock) Date: Wed, 14 Jan 2004 10:07:49 +0100 Subject: [AccessD] Access v2 on XP Find First In-Reply-To: <426071E0B0A6D311B3C0006008B0AB23AFE2A9@TAPPEEXCH01> References: <426071E0B0A6D311B3C0006008B0AB23AFE2A9@TAPPEEXCH01> Message-ID: <1614194240.20040114100749@cactus.dk> Hi Mike and Brett We are experiencing this scenario as well. /gustav > We are running A2 applications here on Win2k machines, and have the same > problem. > I just told the users to use the Find Next button (which is hilighted by > default anyways). > AFAIK, there is nothing you can change that will fix this. Nothing is wrong > with your db or app per se, just a quirk of the 16-bit VM that runs > MSACCESS.EXE (or MSARN200.EXE), I guess. > -----Original Message----- > From: Mike Tope [mailto:mike.tope at dsl.pipex.com] > Sent: Tuesday, January 13, 2004 5:52 PM > To: accessd > Subject: [AccessD] Access v2 on XP Find First > Dear All > I believe there are people on this list who persevere with Access 2 - I've > hit a little snagette and wonder if anyone else has ? > In Windows XP with Office XP installed, the user is running Access 2 from a > file server. The find box (the binoculars button) is failing when you use > Find First. This is on a primary key field. > Occasionally it gives a syntax error (no details); more usually it reports > "Search succeeded" but continues to display the record you started on. > Using Find Next is a much more effective option that usually achieves the > required effect (maybe always, if the record truly exists). > I've tried this same database from the same shortcut in NT and 2000 with > Office 2000 installed, and both have no problem with Find First. And it has > worked on Win 95/Office 97 machines for many years. > I've repaired and compacted. I've fiddled with fields and primary keys to > remove the index and rebuild it. It remains the case that the XP machines > can't operate Access 2's Find First in any reliable fashion. > Any ideas ? Would service packs be relevant ? > TIA > Mike Tope From paul.hartland at fsmail.net Wed Jan 14 05:10:19 2004 From: paul.hartland at fsmail.net (paul.hartland at fsmail.net) Date: Wed, 14 Jan 2004 12:10:19 +0100 (CET) Subject: [AccessD] OT - Starting On My Own Message-ID: <20111798.1074078619262.JavaMail.www@wwinf3002> To all, I?m in the process of thinking about starting up on my own (part-time at first to see how it goes) as possibly a freelance Database Developer, I know some of you on this list are self-employed and just wondered if you would have any advice etc especially with regards to costing a project etc. Thanks in advance for any help you can give. Paul Hartland P.S. feel free to contact me off-list Freeserve AnyTime - HALF PRICE for the first 3 months - Save ?7.50 a month www.freeserve.com/anytime From jwcolby at colbyconsulting.com Wed Jan 14 05:22:36 2004 From: jwcolby at colbyconsulting.com (John W. Colby) Date: Wed, 14 Jan 2004 06:22:36 -0500 Subject: [AccessD] OT: Compaq vs. Dell Message-ID: A client is looking to buy a server and has always favored Compaq servers, but is asking me and others their opinions of Dell vs. Compaq. I am not knowledgeable where servers are concerned, and I know that you folks are an opinionated bunch so I'd like to get your opinion on whether Dell is as good as / better than / worse than Compaq when it comes to servers. Thanks, John W. Colby www.ColbyConsulting.com From mwp.reid at qub.ac.uk Wed Jan 14 05:33:53 2004 From: mwp.reid at qub.ac.uk (Martin Reid) Date: Wed, 14 Jan 2004 11:33:53 -0000 Subject: [AccessD] OT: Compaq vs. Dell References: Message-ID: <009801c3da92$49eac970$9111758f@aine> We have several of each. Will ask our Ops Room guy which he prefers Martin ----- Original Message ----- From: "John W. Colby" To: "DBA - Tech" ; "AccessD" Sent: Wednesday, January 14, 2004 11:22 AM Subject: [AccessD] OT: Compaq vs. Dell > A client is looking to buy a server and has always favored Compaq servers, > but is asking me and others their opinions of Dell vs. Compaq. I am not > knowledgeable where servers are concerned, and I know that you folks are an > opinionated bunch so I'd like to get your opinion on whether Dell is > as good as / better than / worse than Compaq when it comes to servers. > > Thanks, > > John W. Colby > www.ColbyConsulting.com > > > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com > From mwp.reid at qub.ac.uk Wed Jan 14 05:38:54 2004 From: mwp.reid at qub.ac.uk (Martin Reid) Date: Wed, 14 Jan 2004 11:38:54 -0000 Subject: [AccessD] OT: Compaq vs. Dell References: Message-ID: <00a601c3da92$fd2b4e60$9111758f@aine> John I Quote Compaq now HP and are very good. Dell also very good and server support is good - at least here. He says there is little in it and it really comes down to price and support required. Dell patches and software upgrades have been 100% with some problems with Compaq Dell works out slightly cheaper in the long term as you are not working with a reseller. His judgement based on the support we get is to go with Dell. Martin ----- Original Message ----- From: "John W. Colby" To: "DBA - Tech" ; "AccessD" Sent: Wednesday, January 14, 2004 11:22 AM Subject: [AccessD] OT: Compaq vs. Dell > A client is looking to buy a server and has always favored Compaq servers, > but is asking me and others their opinions of Dell vs. Compaq. I am not > knowledgeable where servers are concerned, and I know that you folks are an > opinionated bunch so I'd like to get your opinion on whether Dell is > as good as / better than / worse than Compaq when it comes to servers. > > Thanks, > > John W. Colby > www.ColbyConsulting.com > > > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com > From Erwin.Craps at ithelps.be Wed Jan 14 05:52:58 2004 From: Erwin.Craps at ithelps.be (Erwin Craps - IT Helps) Date: Wed, 14 Jan 2004 12:52:58 +0100 Subject: [AccessD] A curious problem... Message-ID: <46B976F2B698FF46A4FE7636509B22DF03D110@stekelbes.ithelps.local> Very strange. If I where you I would virusscan your file with a up-to-date scanner. I never encountered a virus in an access database, but is is posible and I supose they exist. It's a long shot, but this would be definitly the first thing I would do after a decompile. Erwin -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of JM Wayne Sent: Tuesday, January 13, 2004 11:05 PM To: 'Access Developers discussion and problem solving' Subject: RE: [AccessD] A curious problem... Lambert, I'm losin' it. I repaired, decompiled and imported and still no luck. Any more ideas short of jumping off a bridge ? Thanks. Judy -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Heenan, Lambert Sent: Tuesday, January 13, 2004 2:51 PM To: 'Access Developers discussion and problem solving' Subject: RE: [AccessD] A curious problem... First make a backup copy of the MDB file. Then try repairing. No joy? Try decompiling. Still no luck? Try importing all the objects in the database to a new mdb file. Lambert -----Original Message----- From: JM Wayne [mailto:jmwayne at moordri.com] Sent: Tuesday, January 13, 2004 2:25 PM To: AccessD (E-mail) Subject: [AccessD] A curious problem... I have an A2K database that has been in use for over 2 years. All of a sudden the forms are resizing themselves. In one case the user enters data on one form and by clicking a button opens another form for data input. In another form the user double clicks an item in a list box and opens a form to enter data. In both cases when they close the second form the initial form is no longer maximized. I entered DoCmd.Maximize in the second form's On Close event but it is kind of clumsy. There has been no change in the code that should cause this to happen. I should mention that the forms that are having this problem have a great number of controls on them. Any advice or explanation would be appreciated. Judy Judith M Wayne Shefford-Meade, Inc. _______________________________________________ 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 _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From tinanfields at torchlake.com Wed Jan 14 09:46:32 2004 From: tinanfields at torchlake.com (Tina Fields) Date: Wed, 14 Jan 2004 07:46:32 -0800 Subject: [AccessD] Smolin Memorial Contribution References: <3cfb2b3cd09f.3cd09f3cfb2b@southeast.rr.com> Message-ID: <40056458.1010603@torchlake.com> I went to the databaseadvisors.com website and tried to make my contribution directly from the donations.htm page. I have a PayPal account and expected this transaction to be easy. The input form kept insisting on an auction ID and I had no clue what to put in there. So, I went directly to my PayPal account and used the Send Money feature, using the email address of the treasurer at databaseadvisors.com. As of this morning, that transaction is unclaimed according to my PayPal account records. It's a small gift, but I do want it included in the gift from this wonderful group, honoring the father of a man who has been friend and help to all of us. Please, somebody take a quick look into the PayPal receipts of yesterday for my little gift. Thanks dbcfour at triad.rr.com wrote: >On Sunday January 11, 2004 Bernard Smolin, father of our long time and much respected fellow member Rocky Smolin, passed away. > >After a number of members expressed a desire to share an expression of sympathy, arrangements have been made for Keith Williamson to collect Memorial Contribution(s), and present a check to the National Jewish Medical & Research Center >(http://www.njc.org/fr/joymem.html) on our behalf. > >Those wishing to express their sincere and heartfelt sympathy to the Family >in this manner can contribute via the website at >http://www.databaseadvisors.com/donations.htm It is important, however, that you clearly indicate in the notes section of the Paypal form, the nature of the contribution. > >For those that prefer to mail a check, please do so by mailing a check to: > >Database Advisors Inc. >c/o Keith Williamson >450 Franklin Street Apt B >Havre de Grace, MD 21078 > >All contributions should be made no later than Friday January 16th, and be >clearly marked as Smolin Memorial Fund. > >A special Thank You to Keith for his willingness to assist us in this effort. > >Donna Cook > > > >_______________________________________________ >AccessD mailing list >AccessD at databaseadvisors.com >http://databaseadvisors.com/mailman/listinfo/accessd >Website: http://www.databaseadvisors.com > > From djkr at msn.com Wed Jan 14 06:50:24 2004 From: djkr at msn.com (DJK(John) Robinson) Date: Wed, 14 Jan 2004 12:50:24 -0000 Subject: [AccessD] OT - Starting On My Own In-Reply-To: <20111798.1074078619262.JavaMail.www@wwinf3002> Message-ID: <004501c3da9c$fa734ec0$bf00a8c0@dabsight> Whereabouts, Paul? You seem to be somewhere between the UK and Central Europe... John > -----Original Message----- > From: accessd-bounces at databaseadvisors.com > [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of > paul.hartland at fsmail.net > Sent: 14 January 2004 11:10 > To: accessd > Subject: [AccessD] OT - Starting On My Own > > > To all, > > I?m in the process of thinking about starting up on my own > (part-time at first to see how it goes) as possibly a > freelance Database Developer, I know some of you on this list > are self-employed and just wondered if you would have any > advice etc especially with regards to costing a project etc. > > Thanks in advance for any help you can give. > > Paul Hartland > > P.S. feel free to contact me off-list > Freeserve AnyTime - HALF PRICE for the first 3 months - Save > ?7.50 a month > www.freeserve.com/anytime > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/a> ccessd > Website: > http://www.databaseadvisors.com > From paul.hartland at fsmail.net Wed Jan 14 07:03:21 2004 From: paul.hartland at fsmail.net (paul.hartland at fsmail.net) Date: Wed, 14 Jan 2004 14:03:21 +0100 (CET) Subject: [AccessD] OT - Starting On My Own Message-ID: <20572664.1074085401043.JavaMail.www@wwinf3004> I live in Birmingham, England Message date : Jan 14 2004, 12:54 PM >From : DJK(John) Robinson To : 'Access Developers discussion and problem solving' Copy to : Subject : RE: [AccessD] OT - Starting On My Own Whereabouts, Paul? You seem to be somewhere between the UK and Central Europe... John > -----Original Message----- > From: accessd-bounces at databaseadvisors.com > [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of > paul.hartland at fsmail.net > Sent: 14 January 2004 11:10 > To: accessd > Subject: [AccessD] OT - Starting On My Own > > > To all, > > I?m in the process of thinking about starting up on my own > (part-time at first to see how it goes) as possibly a > freelance Database Developer, I know some of you on this list > are self-employed and just wondered if you would have any > advice etc especially with regards to costing a project etc. > > Thanks in advance for any help you can give. > > Paul Hartland > > P.S. feel free to contact me off-list > Freeserve AnyTime - HALF PRICE for the first 3 months - Save > ?7.50 a month > www.freeserve.com/anytime > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/a> ccessd > Website: > http://www.databaseadvisors.com > _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com Freeserve AnyTime - HALF PRICE for the first 3 months - Save ?7.50 a month www.freeserve.com/anytime From stuart at lexacorp.com.pg Wed Jan 14 07:06:28 2004 From: stuart at lexacorp.com.pg (Stuart McLachlan) Date: Wed, 14 Jan 2004 23:06:28 +1000 Subject: [AccessD] OT: Compaq vs. Dell In-Reply-To: Message-ID: <4005CB74.31262.337FBD1@localhost> On 14 Jan 2004 at 6:22, John W. Colby wrote: > A client is looking to buy a server and has always favored Compaq servers, > but is asking me and others their opinions of Dell vs. Compaq. I am not > knowledgeable where servers are concerned, and I know that you folks are an > opinionated bunch so I'd like to get your opinion on whether Dell is > as good as / better than / worse than Compaq when it comes to servers. > I've worked with quite a few Dell, Compaq ( and now HP servers). They've all proved very reliable. My Backup/service experience is irrelevant because my situation is totally different to you I much prefer to work with Dell servers because Compaq/HP tend to stick a lot of their own proprietary management software all over the place (all the way from their hidden system management partitions through to add-ons to the OS.) At times it can be a real PITA. I currently recommend Dell to my clients for servers. -- Lexacorp Ltd http://www.lexacorp.com.pg Information Technology Consultancy, Software Development,System Support. From kwilliam at ashlandnet.com Wed Jan 14 07:14:18 2004 From: kwilliam at ashlandnet.com (Keith Williamson) Date: Wed, 14 Jan 2004 08:14:18 -0500 Subject: [AccessD] OT: Compaq vs. Dell In-Reply-To: <00a601c3da92$fd2b4e60$9111758f@aine> Message-ID: <000401c3daa0$51783200$64aba8c0@ashlandnet.com> In my opinion, over the years, Dell is definitely the way to go. Just recently, Dell had a problem with one of the chips in some of their servers (nearly all of them in a couple of their lines).....they sent a technician out to each and every location that had an affected problem (unless the in-house IT guys thought they could handle it) and replaced/fixed each one. THAT is service. I have had Compaq PC's at home, since my first one (four in all), and almost exclusively Dell at work (over the past 8 years.) I have never had a problem with a Dell.....and every one of my home PC's has given me problems. I have sworn off Compaq, now......only Dell, from now on. Keith E. Williamson Ashland Equipment, Inc phone # (410) 273-1856 fax # (410) 273-1859 -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Martin Reid Sent: Wednesday, January 14, 2004 6:39 AM To: Access Developers discussion and problem solving Subject: Re: [AccessD] OT: Compaq vs. Dell John I Quote Compaq now HP and are very good. Dell also very good and server support is good - at least here. He says there is little in it and it really comes down to price and support required. Dell patches and software upgrades have been 100% with some problems with Compaq Dell works out slightly cheaper in the long term as you are not working with a reseller. His judgement based on the support we get is to go with Dell. Martin ----- Original Message ----- From: "John W. Colby" To: "DBA - Tech" ; "AccessD" Sent: Wednesday, January 14, 2004 11:22 AM Subject: [AccessD] OT: Compaq vs. Dell > A client is looking to buy a server and has always favored Compaq servers, > but is asking me and others their opinions of Dell vs. Compaq. I am not > knowledgeable where servers are concerned, and I know that you folks are an > opinionated bunch so I'd like to get your opinion on whether Dell is > as good as / better than / worse than Compaq when it comes to servers. > > Thanks, > > John W. Colby > www.ColbyConsulting.com > > > _______________________________________________ > 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 From wdhindman at bellsouth.net Wed Jan 14 07:23:52 2004 From: wdhindman at bellsouth.net (William Hindman) Date: Wed, 14 Jan 2004 08:23:52 -0500 Subject: [AccessD] OT: Compaq vs. Dell References: Message-ID: <001401c3daa1$a7737f60$6101a8c0@dejpolsys> ...I've worked with Dell, HP, and Compaq (now HP) in the past and now use nothing but Dell ...my biggest problem with Compaq and HP is their use of custom parts which creates support problems down the road ...Dell uses OTS components but has been extremely reliable in my experience ...out of eleven servers, I've had one CD fail on a Dell in the three years since switching to them ...but be sure you buy their extended warranty and software support or buy the OS from MS ...I prefer not buying the OS pre-installed since I've had to reformat the drive and do a complete reinstall anyway on each ...HTH :) William Hindman - Next Year In The Free State! ----- Original Message ----- From: "John W. Colby" To: "DBA - Tech" ; "AccessD" Sent: Wednesday, January 14, 2004 6:22 AM Subject: [AccessD] OT: Compaq vs. Dell > A client is looking to buy a server and has always favored Compaq servers, > but is asking me and others their opinions of Dell vs. Compaq. I am not > knowledgeable where servers are concerned, and I know that you folks are an > opinionated bunch so I'd like to get your opinion on whether Dell is > as good as / better than / worse than Compaq when it comes to servers. > > Thanks, > > John W. Colby > www.ColbyConsulting.com > > > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com > From stuart at lexacorp.com.pg Wed Jan 14 07:21:50 2004 From: stuart at lexacorp.com.pg (Stuart McLachlan) Date: Wed, 14 Jan 2004 23:21:50 +1000 Subject: [AccessD] OT - Starting On My Own In-Reply-To: <20111798.1074078619262.JavaMail.www@wwinf3002> Message-ID: <4005CF0E.12482.3460D61@localhost> On 14 Jan 2004 at 12:10, paul.hartland at fsmail.net wrote: > To all, I?m in the process of thinking about starting up on my own > (part-time at first to see how it goes) as possibly a freelance > Database Developer, I know some of you on this list are self-employed > and just wondered if you would have any advice etc especially with > regards to costing a project etc. Thanks in advance for any help you > can give. Hard to give any relevant advice on how to operate in a different place, but costing is pretty much the same wherever you are. We've had a few discussions about it in the past. Whether you are working on a fixed price project or on a time/materials basis, you need to work out your hourly rate first. If you are looking at trying a fixed price project, you need to estimate the time involved, build in a large "fudge factor" and then make sure that you have the scope *really* well tied down with agreement as to how variations will be costed. As far as hourly rate is concerned, one rule of thumb is to work out your *total* annual requirement including an annual salary, all overheads, superannuation contributions, holiday requirements etc. Then add a percentage on top of that of say 10% profit (after all, you are not in business just to pay yourself wages are you?). Then divide that figure by 1000 to arrive at your hourly rate. At first glance, that may looks a bit much - it's only working 20 hours a week for 50 weeks a year. But when you get down to it, you will realise just how much non-billable time is involved over a year when you are self employed. Just compare the figure that you come up with to the charge out rate which the big boys use for their consultants (not what they are paying them ). Odds are you will still come in considerably lower than they are - which gives you a bargaining point when trying to sell your services. -- Lexacorp Ltd http://www.lexacorp.com.pg Information Technology Consultancy, Software Development,System Support. From kwilliam at ashlandnet.com Wed Jan 14 07:25:19 2004 From: kwilliam at ashlandnet.com (Keith Williamson) Date: Wed, 14 Jan 2004 08:25:19 -0500 Subject: [AccessD] Smolin Memorial Contribution In-Reply-To: <40056458.1010603@torchlake.com> Message-ID: <000701c3daa1$dbb507d0$64aba8c0@ashlandnet.com> Tina, I did receive an email from PayPal that you sent this. I'm not sure what the problem was through the web site. I'm sorry you had problems. However, the email you sent the payment to was not set up in our PayPal. So, I just added it, and your payment has been credited. Sorry, it just took me a little while to figure out how to get it, without having to setup a new account. Keith E. Williamson Ashland Equipment, Inc phone # (410) 273-1856 fax # (410) 273-1859 -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Tina Fields Sent: Wednesday, January 14, 2004 10:47 AM To: Access Developers discussion and problem solving Subject: Re: [AccessD] Smolin Memorial Contribution I went to the databaseadvisors.com website and tried to make my contribution directly from the donations.htm page. I have a PayPal account and expected this transaction to be easy. The input form kept insisting on an auction ID and I had no clue what to put in there. So, I went directly to my PayPal account and used the Send Money feature, using the email address of the treasurer at databaseadvisors.com. As of this morning, that transaction is unclaimed according to my PayPal account records. It's a small gift, but I do want it included in the gift from this wonderful group, honoring the father of a man who has been friend and help to all of us. Please, somebody take a quick look into the PayPal receipts of yesterday for my little gift. Thanks dbcfour at triad.rr.com wrote: >On Sunday January 11, 2004 Bernard Smolin, father of our long time and much respected fellow member Rocky Smolin, passed away. > >After a number of members expressed a desire to share an expression of sympathy, arrangements have been made for Keith Williamson to collect Memorial Contribution(s), and present a check to the National Jewish Medical & Research Center >(http://www.njc.org/fr/joymem.html) on our behalf. > >Those wishing to express their sincere and heartfelt sympathy to the Family >in this manner can contribute via the website at >http://www.databaseadvisors.com/donations.htm It is important, however, that you clearly indicate in the notes section of the Paypal form, the nature of the contribution. > >For those that prefer to mail a check, please do so by mailing a check to: > >Database Advisors Inc. >c/o Keith Williamson >450 Franklin Street Apt B >Havre de Grace, MD 21078 > >All contributions should be made no later than Friday January 16th, and be >clearly marked as Smolin Memorial Fund. > >A special Thank You to Keith for his willingness to assist us in this effort. > >Donna Cook > > > >_______________________________________________ >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 From andy at minstersystems.co.uk Wed Jan 14 07:43:53 2004 From: andy at minstersystems.co.uk (Andy Lacey) Date: Wed, 14 Jan 2004 13:43:53 -0000 Subject: [AccessD] OT - Starting On My Own In-Reply-To: <20572664.1074085401043.JavaMail.www@wwinf3004> Message-ID: <000701c3daa4$7351ac90$b274d0d5@minster33c3r25> Another brummie! Or are you an interloper? Me. I escaped long ago before the city was gentrified. Hope you're a Villa fan. Anyway I digress. Firstly good luck if you do it Paul. I took the plunge many, many years ago. Never regretted it but that's not to say there won't be bad days ahead - Just that for me the advantages outweigh the diadvantages. I would say, however, that you shouldn't go it alone if you're of a nervous disposition. Not knowing when you'll next earn a bean can be pretty stressful. You have to trust to lady luck and believe that the next contract is round the corner. And definitely don't do it, as I overheard someone once say, in order to "get more time on the golf-course". Ha, ha, ha is all I can say to that one. As to advice on costing, I'm afraid I still find it difficult. I would though refer you to an article William wrote in the first Many2Many newsletter (see dba site) in July 2001 called 'Consultant's Corner'. Some good stuff there. Like William my experience is that it's damned difficult, if not impossible, to raise your rate much once you're in at a customer. If you quote low for one project and they have a second one they will not accept you quoting high for that one. Once you're perceived as cheap you're stuck with that perception. So always (I know it's obvious) pitch your quotes as high as you possibly can. If circumstances (no money to pay mortgage, kids on the streets begging, etc) dictate that you have to go low to get a contract then you must fully understand the implications of doing so. Try to make it clear it's a special deal - it's probably a waste of breath but still worth saying - and, as William says, keep the rate high and reduce the time you're quoting. You may know full well it's going to take much longer, and you certainly want to make it clear it did so, but better that than letting the customer think your rate is laughable. The problem comes when you knowingly quote a short time and they jump on that and want it delivered next day/week/whatever. Then you think on your feet and talk quick (other calls on your time, several family funerals in the next few days etc). As to calculating just how long you actually think it will take.....well I've always found a blindfold and a pin useful. Seriously though, only time and experience will tell you. HTH a little bit. Andy Lacey http://www.minstersystems.co.uk > -----Original Message----- > From: accessd-bounces at databaseadvisors.com > [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of > paul.hartland at fsmail.net > Sent: 14 January 2004 13:03 > To: Access Developers discussion and problem solving > Subject: Re: RE: [AccessD] OT - Starting On My Own > > > I live in Birmingham, England > > > > > > Message date : Jan 14 2004, 12:54 PM > >From : DJK(John) Robinson > To : 'Access Developers discussion and problem solving' > Copy to : > Subject : RE: [AccessD] OT - Starting On My Own > Whereabouts, Paul? You seem to be somewhere between the UK > and Central Europe... > > John > > > > -----Original Message----- > > From: accessd-bounces at databaseadvisors.com > > [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of > > paul.hartland at fsmail.net > > Sent: 14 January 2004 11:10 > > To: accessd > > Subject: [AccessD] OT - Starting On My Own > > > > > > To all, > > > > I?m in the process of thinking about starting up on my own > > (part-time at first to see how it goes) as possibly a > > freelance Database Developer, I know some of you on this list > > are self-employed and just wondered if you would have any > > advice etc especially with regards to costing a project etc. > > > > Thanks in advance for any help you can give. > > > > Paul Hartland > > > > P.S. feel free to contact me off-list > > Freeserve AnyTime - HALF PRICE for the first 3 months - Save > > ?7.50 a month > > www.freeserve.com/anytime > > _______________________________________________ > > AccessD mailing list > > AccessD at databaseadvisors.com > > http://databaseadvisors.com/mailman/listinfo/a> ccessd > > Website: > > http://www.databaseadvisors.com > > > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/a> ccessd > Website: > http://www.databaseadvisors.com > Freeserve > AnyTime - HALF PRICE for the first 3 months - Save ?7.50 a month > www.freeserve.com/anytime > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/a> ccessd > Website: > http://www.databaseadvisors.com > > > From wdhindman at bellsouth.net Wed Jan 14 07:44:52 2004 From: wdhindman at bellsouth.net (William Hindman) Date: Wed, 14 Jan 2004 08:44:52 -0500 Subject: [AccessD] OT - Starting On My Own References: <20111798.1074078619262.JavaMail.www@wwinf3002> Message-ID: <004f01c3daa4$96384e30$6101a8c0@dejpolsys> Paul ...lots of solid discussion on this in our archives and the dba newsletter ...a search of both will turn up reams of information and advice ...HTH :) William Hindman - Next Year In The Free State! ----- Original Message ----- From: To: "accessd" Sent: Wednesday, January 14, 2004 6:10 AM Subject: [AccessD] OT - Starting On My Own To all, I'm in the process of thinking about starting up on my own (part-time at first to see how it goes) as possibly a freelance Database Developer, I know some of you on this list are self-employed and just wondered if you would have any advice etc especially with regards to costing a project etc. Thanks in advance for any help you can give. Paul Hartland P.S. feel free to contact me off-list Freeserve AnyTime - HALF PRICE for the first 3 months - Save ?7.50 a month www.freeserve.com/anytime _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From pedro at plex.nl Wed Jan 14 15:08:38 2004 From: pedro at plex.nl (pedro at plex.nl) Date: Wed, 14 Jan 2004 15:08:38 (MET) Subject: [AccessD] error after converting (mailmerge) Message-ID: <200401141408.i0EE8cNA020272@mailhostC.plex.net> Hello Group, i converted a A97 secured database to A2K. After making the changes in Wrkgadmin.exe and the ODBC Data Sources, i changed the names in the module. After running the mailmerge i get an error: Run-time error '5922' Word was unable to open the data source. The debug selects the .OpenDataSource from the code below. I figure out why this error occurs. TIA Pedro Janssen Sub CreateMergeDoc(UseDDE As Boolean, PrintDoc As Boolean) Dim WordDoc As Word.Document Dim strLetter As String Dim strConnect As String Dim WordApp As Word.Application Set WordApp = CreateObject("Word.Application") Set WordDoc = WordApp.Documents.Add With WordDoc.MailMerge If UseDDE Then strConnect = "QUERY Uitvoer" Else strConnect = "DSN=MS Access 2000 " _ & "Database;DBQ=E:\Cytologie\positieven\" _ & "BeveiligdPOSITIEVEN(A2K).mdb;" _ & "FIL=MS Access;" End If .OpenDataSource _ Name:="E:\Cytologie\positieven\BeveiligdPOSITIEVEN(A2K).mdb", _ ReadOnly:=True, LinkToSource:=True, _ Connection:=strConnect, _ SQLStatement:="SELECT * FROM [Uitvoer], [Aanvrager] WHERE Uitvoer.AanvragerID = Aanvrager.AanvragerID AND Uitvoer.ControleID = " & Forms![Brief]![veld] & ";" With Fields ............... End With With WordApp.Selection ............... End With With WordDoc.MailMerge .DataSource.FirstRecord = 1 .Destination = wdSendToNewDocument .Execute If PrintDoc Then .Application.Options.PrintBackground = False .Application.ActiveDocument.PrintOut End If End With WordApp.Visible = True End With End Sub From wdhindman at bellsouth.net Wed Jan 14 08:14:03 2004 From: wdhindman at bellsouth.net (William Hindman) Date: Wed, 14 Jan 2004 09:14:03 -0500 Subject: [AccessD] OT - Starting On My Own References: <20111798.1074078619262.JavaMail.www@wwinf3002> <004f01c3daa4$96384e30$6101a8c0@dejpolsys> Message-ID: <001001c3daa8$a9c6e110$6101a8c0@dejpolsys> ...one more thing Paul ...the below list is oriented toward SBS Consultants and always has lots of good, practical business advice immediately available from your peers on the ground actually making a living at it ...its a pretty good place to bounce business questions and ideas off of. http://groups.yahoo.com/group/smallbizIT/ ...also ...the best book available imnsho is Harry Brelsford's "SMB Consulting Best Practices" ...its recent, down to earth advice from one of the best in the business ...well worth what it costs you ...HTH :) William Hindman From tinanfields at torchlake.com Wed Jan 14 13:05:43 2004 From: tinanfields at torchlake.com (Tina Fields) Date: Wed, 14 Jan 2004 11:05:43 -0800 Subject: [AccessD] Smolin Memorial Contribution References: <000701c3daa1$dbb507d0$64aba8c0@ashlandnet.com> Message-ID: <40059307.3000502@torchlake.com> Thanks Keith :) T Keith Williamson wrote: >Tina, > >I did receive an email from PayPal that you sent this. I'm not sure what >the problem was through the web site. I'm sorry you had problems. However, >the email you sent the payment to was not set up in our PayPal. So, I just >added it, and your payment has been credited. > >Sorry, it just took me a little while to figure out how to get it, without >having to setup a new account. > >Keith E. Williamson >Ashland Equipment, Inc >phone # (410) 273-1856 >fax # (410) 273-1859 > >-----Original Message----- >From: accessd-bounces at databaseadvisors.com >[mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Tina Fields >Sent: Wednesday, January 14, 2004 10:47 AM >To: Access Developers discussion and problem solving >Subject: Re: [AccessD] Smolin Memorial Contribution > >I went to the databaseadvisors.com website and tried to make my >contribution directly from the donations.htm page. I have a PayPal >account and expected this transaction to be easy. The input form kept >insisting on an auction ID and I had no clue what to put in there. So, >I went directly to my PayPal account and used the Send Money feature, >using the email address of the treasurer at databaseadvisors.com. As of >this morning, that transaction is unclaimed according to my PayPal >account records. It's a small gift, but I do want it included in the >gift from this wonderful group, honoring the father of a man who has >been friend and help to all of us. Please, somebody take a quick look >into the PayPal receipts of yesterday for my little gift. Thanks > >dbcfour at triad.rr.com wrote: > > > >>On Sunday January 11, 2004 Bernard Smolin, father of our long time and much >> >> >respected fellow member Rocky Smolin, passed away. > > >>After a number of members expressed a desire to share an expression of >> >> >sympathy, arrangements have been made for Keith Williamson to collect >Memorial Contribution(s), and present a check to the National Jewish Medical >& Research Center > > >>(http://www.njc.org/fr/joymem.html) on our behalf. >> >>Those wishing to express their sincere and heartfelt sympathy to the Family >> >> > > > >>in this manner can contribute via the website at >>http://www.databaseadvisors.com/donations.htm It is important, however, >> >> >that you clearly indicate in the notes section of the Paypal form, the >nature of the contribution. > > >>For those that prefer to mail a check, please do so by mailing a check to: >> >>Database Advisors Inc. >>c/o Keith Williamson >>450 Franklin Street Apt B >>Havre de Grace, MD 21078 >> >>All contributions should be made no later than Friday January 16th, and be >>clearly marked as Smolin Memorial Fund. >> >>A special Thank You to Keith for his willingness to assist us in this >> >> >effort. > > >>Donna Cook >> >> >> >>_______________________________________________ >>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 > >_______________________________________________ >AccessD mailing list >AccessD at databaseadvisors.com >http://databaseadvisors.com/mailman/listinfo/accessd >Website: http://www.databaseadvisors.com > > > From ebarro at afsweb.com Wed Jan 14 10:02:20 2004 From: ebarro at afsweb.com (Eric Barro) Date: Wed, 14 Jan 2004 08:02:20 -0800 Subject: [AccessD] OT: Compaq vs. Dell In-Reply-To: Message-ID: I am biased in favor of COMPAQ servers. I hated COMPAQ desktops in the past because of the custom stuff they did with either the components or the OS. The servers however are another story. I have worked with the ML350s, ML530s, DL320s and DL380s. Each one was better than its predecessor. The COMPAQ servers look really heavy duty whilst the DELL servers look really lightweight. I have popped the hood on COMPAQ servers (out of curiosity at what the "engine" looks like inside the machine) but have not done so with the DELL servers. In my limited experience of using tech support I have found COMPAQ support to be easier to reach. DELL support put us on hold and gave us the run around quite a number of times. --- Eric Barro Senior Systems Analyst Advanced Field Services (208) 772-7060 http://www.afsweb.com -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of John W. Colby Sent: Wednesday, January 14, 2004 3:23 AM To: DBA - Tech; AccessD Subject: [AccessD] OT: Compaq vs. Dell A client is looking to buy a server and has always favored Compaq servers, but is asking me and others their opinions of Dell vs. Compaq. I am not knowledgeable where servers are concerned, and I know that you folks are an opinionated bunch so I'd like to get your opinion on whether Dell is as good as / better than / worse than Compaq when it comes to servers. Thanks, John W. Colby www.ColbyConsulting.com --- Outgoing mail is certified Virus Free. Checked by AVG anti-virus system (http://www.grisoft.com). Version: 6.0.560 / Virus Database: 352 - Release Date: 1/8/2004 From markamatte at hotmail.com Wed Jan 14 11:19:58 2004 From: markamatte at hotmail.com (Mark A Matte) Date: Wed, 14 Jan 2004 17:19:58 +0000 Subject: [AccessD] OT: Looking for info on DB Message-ID: Hello All, Sorry for the OT...Does anyone have any knowledge or a company smartFOCUS, Ltd and their product "Viper" (aka "smartANALYZER)...this thing will supposedly query/index/return millions or records in a matter of seconds. It creates its own files from the data for this process(.XMF , .VIX , .IDX , .CDX). The main reason I am asking this group is because they offer a "VBA Developers Kit". Supposedly this thing was built with/on MS technology. What exactly is a VBA developers kit...or is this probably just a name they gave to one of their tools? Any insight, ideas, or anything will be greatly appreciated. Thanks, Mark _________________________________________________________________ Scope out the new MSN Plus Internet Software ? optimizes dial-up to the max! http://join.msn.com/?pgmarket=en-us&page=byoa/plus&ST=1 From jmwayne at moordri.com Wed Jan 14 11:31:58 2004 From: jmwayne at moordri.com (JM Wayne) Date: Wed, 14 Jan 2004 12:31:58 -0500 Subject: [AccessD] A curious problem... In-Reply-To: <46B976F2B698FF46A4FE7636509B22DF03D110@stekelbes.ithelps.local> Message-ID: <000801c3dac4$532b55e0$87c9040a@direcway.com> Very strange, indeed. I tried a virus scan. I also tried copying the code to a txt file , changing 'has module' to no and repairing the database then putting the code back in. No luck. -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Erwin Craps - IT Helps Sent: Wednesday, January 14, 2004 6:53 AM To: Access Developers discussion and problem solving Subject: RE: [AccessD] A curious problem... Very strange. If I where you I would virusscan your file with a up-to-date scanner. I never encountered a virus in an access database, but is is posible and I supose they exist. It's a long shot, but this would be definitly the first thing I would do after a decompile. Erwin -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of JM Wayne Sent: Tuesday, January 13, 2004 11:05 PM To: 'Access Developers discussion and problem solving' Subject: RE: [AccessD] A curious problem... Lambert, I'm losin' it. I repaired, decompiled and imported and still no luck. Any more ideas short of jumping off a bridge ? Thanks. Judy -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Heenan, Lambert Sent: Tuesday, January 13, 2004 2:51 PM To: 'Access Developers discussion and problem solving' Subject: RE: [AccessD] A curious problem... First make a backup copy of the MDB file. Then try repairing. No joy? Try decompiling. Still no luck? Try importing all the objects in the database to a new mdb file. Lambert -----Original Message----- From: JM Wayne [mailto:jmwayne at moordri.com] Sent: Tuesday, January 13, 2004 2:25 PM To: AccessD (E-mail) Subject: [AccessD] A curious problem... I have an A2K database that has been in use for over 2 years. All of a sudden the forms are resizing themselves. In one case the user enters data on one form and by clicking a button opens another form for data input. In another form the user double clicks an item in a list box and opens a form to enter data. In both cases when they close the second form the initial form is no longer maximized. I entered DoCmd.Maximize in the second form's On Close event but it is kind of clumsy. There has been no change in the code that should cause this to happen. I should mention that the forms that are having this problem have a great number of controls on them. Any advice or explanation would be appreciated. Judy Judith M Wayne Shefford-Meade, Inc. _______________________________________________ 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 _______________________________________________ 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 From john at winhaven.net Wed Jan 14 12:01:10 2004 From: john at winhaven.net (John Bartow) Date: Wed, 14 Jan 2004 12:01:10 -0600 Subject: [AccessD] A curious problem... In-Reply-To: <000801c3dac4$532b55e0$87c9040a@direcway.com> Message-ID: FYI: FMS has a free Access db virus checker on their web site. Personally don't know much about it. > -----Original Message----- > From: accessd-bounces at databaseadvisors.com > [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of JM Wayne > Sent: Wednesday, January 14, 2004 11:32 AM > To: 'Access Developers discussion and problem solving' > Subject: RE: [AccessD] A curious problem... > > > Very strange, indeed. I tried a virus scan. I also tried copying the code > to a txt file , changing 'has module' to no and repairing the > database then > putting the code back in. No luck. > > -----Original Message----- > From: accessd-bounces at databaseadvisors.com > [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Erwin Craps - > IT Helps > Sent: Wednesday, January 14, 2004 6:53 AM > To: Access Developers discussion and problem solving > Subject: RE: [AccessD] A curious problem... > > > Very strange. > > If I where you I would virusscan your file with a up-to-date scanner. > I never encountered a virus in an access database, but is is posible and > I supose they exist. > > It's a long shot, but this would be definitly the first thing I would do > after a decompile. > > Erwin > > -----Original Message----- > From: accessd-bounces at databaseadvisors.com > [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of JM Wayne > Sent: Tuesday, January 13, 2004 11:05 PM > To: 'Access Developers discussion and problem solving' > Subject: RE: [AccessD] A curious problem... > > Lambert, > I'm losin' it. I repaired, decompiled and imported and still no > luck. > Any more ideas short of jumping off a bridge ? > > Thanks. > Judy > > > -----Original Message----- > From: accessd-bounces at databaseadvisors.com > [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Heenan, > Lambert > Sent: Tuesday, January 13, 2004 2:51 PM > To: 'Access Developers discussion and problem solving' > Subject: RE: [AccessD] A curious problem... > > > First make a backup copy of the MDB file. > > Then try repairing. > > No joy? Try decompiling. > > Still no luck? Try importing all the objects in the database to a new > mdb file. > > Lambert > > -----Original Message----- > From: JM Wayne [mailto:jmwayne at moordri.com] > Sent: Tuesday, January 13, 2004 2:25 PM > To: AccessD (E-mail) > Subject: [AccessD] A curious problem... > > > I have an A2K database that has been in use for over 2 years. All > of a sudden the forms are resizing themselves. In one case the user > enters data on one form and by clicking a button opens another form for > data input. In another form the user double clicks an item in a list box > and opens a form to enter data. In both cases when they close the > second form the initial form is no longer maximized. I entered > DoCmd.Maximize in the second form's On Close event but it is kind of > clumsy. > There has been no change in the code that should cause this to happen. > I should mention that the forms that are having this problem have a > great number of controls on them. > Any advice or explanation would be appreciated. > > Judy > > > Judith M Wayne > Shefford-Meade, Inc. > > _______________________________________________ > 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 > > _______________________________________________ > 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 > From my.lists at verizon.net Wed Jan 14 12:13:29 2004 From: my.lists at verizon.net (Francisco H Tapia) Date: Wed, 14 Jan 2004 10:13:29 -0800 Subject: [AccessD] Form Life... Message-ID: <400586C9.7040302@verizon.net> A while back there was a link that was posted that explained how many "edits" or "changes" can occur over the life of a form, after which you can no longer make any additional changes. Is there any way to check this life cycle? or has anyone tried? -- -Francisco From cfoust at infostatsystems.com Wed Jan 14 12:35:49 2004 From: cfoust at infostatsystems.com (Charlotte Foust) Date: Wed, 14 Jan 2004 10:35:49 -0800 Subject: [AccessD] Form Life... Message-ID: Do you mean the limits on the number of controls that can be added to a form or report over its life? As far as I know there is no limit on "edits", only on the number of controls. I don't recall the exact number, although I've hit it in the past, but it's somewhere around 750. Charlotte Foust -----Original Message----- From: Francisco H Tapia [mailto:my.lists at verizon.net] Sent: Wednesday, January 14, 2004 10:13 AM To: AccessD Subject: [AccessD] Form Life... A while back there was a link that was posted that explained how many "edits" or "changes" can occur over the life of a form, after which you can no longer make any additional changes. Is there any way to check this life cycle? or has anyone tried? -- -Francisco _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From Mark.Mitsules at ngc.com Wed Jan 14 12:36:08 2004 From: Mark.Mitsules at ngc.com (Mitsules, Mark S. (Newport News)) Date: Wed, 14 Jan 2004 13:36:08 -0500 Subject: [AccessD] Form Life... Message-ID: I believe the discussion was about the total number of controls that had ever been added to a form that was the problem...see quotes below. Mark "...it's not necessarily the number of controls currently on your form ...Access has a built in limitation of 754 controls that can be added over the lifetime of a form ...so even if your form currently has only 20 controls on it, if you've added and deleted controls frequently over its lifetime, you'll most likely have to recreate the form ...HTH :) http://office.microsoft.com/assistance/offhelp/offxp/access/acmain10/html/ac decLookUpMicrosoftAccessSpecificationsS.htm ...watch for the wrap :)" -William Hindman -----Original Message----- From: Francisco H Tapia [mailto:my.lists at verizon.net] Sent: Wednesday, January 14, 2004 1:13 PM To: AccessD Subject: [AccessD] Form Life... A while back there was a link that was posted that explained how many "edits" or "changes" can occur over the life of a form, after which you can no longer make any additional changes. Is there any way to check this life cycle? or has anyone tried? -- -Francisco _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From martyconnelly at shaw.ca Wed Jan 14 13:18:10 2004 From: martyconnelly at shaw.ca (MartyConnelly) Date: Wed, 14 Jan 2004 11:18:10 -0800 Subject: [AccessD] OT - Starting On My Own References: <20111798.1074078619262.JavaMail.www@wwinf3002> <004f01c3daa4$96384e30$6101a8c0@dejpolsys> Message-ID: <400595F2.4040805@shaw.ca> Make sure you have all your ducks in a row before you start out with regards to incorporation or sole proprietorship (see accountant especially with regards to taxes), get a corporate bank account after establishing incorporation, get your corporate VAT number. If I remember right Inland Revenue takes some odd views on whether you are self employed or not (check this out). All these little things may take up to two months to sort out. http://www.ukonline.gov.uk/QuickFind/BusinessIndustryTopic/fs/en PS don't be reticent to walk away from a project you are unsure of, especially when starting out. William Hindman wrote: >Paul > >...lots of solid discussion on this in our archives and the dba newsletter >...a search of both will turn up reams of information and advice ...HTH :) > >William Hindman > - Next Year In The Free State! > > >----- Original Message ----- >From: >To: "accessd" >Sent: Wednesday, January 14, 2004 6:10 AM >Subject: [AccessD] OT - Starting On My Own > > >To all, > >I'm in the process of thinking about starting up on my own (part-time at >first to see how it goes) as possibly a freelance Database Developer, I know >some of you on this list are self-employed and just wondered if you would >have any advice etc especially with regards to costing a project etc. > >Thanks in advance for any help you can give. > >Paul Hartland > >P.S. feel free to contact me off-list >Freeserve AnyTime - HALF PRICE for the first 3 months - Save ?7.50 a month >www.freeserve.com/anytime >_______________________________________________ >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 > > > -- Marty Connelly Victoria, B.C. Canada From my.lists at verizon.net Wed Jan 14 13:27:31 2004 From: my.lists at verizon.net (Francisco H Tapia) Date: Wed, 14 Jan 2004 11:27:31 -0800 Subject: [AccessD] Form Life... In-Reply-To: References: Message-ID: <40059823.4010504@verizon.net> That was it, I'm wondering if there is a method to programatically find this information out? If I get a chance I'll start tinkering w/ it. I was wondering if anyone has already beat me to that wheel is all ;o) Thanks, -- -Francisco Mitsules, Mark S. (Newport News) wrote: >I believe the discussion was about the total number of controls that had >ever been added to a form that was the problem...see quotes below. > >Mark > > >"...it's not necessarily the number of controls currently on your form >...Access has a built in limitation of 754 controls that can be added over >the lifetime of a form ...so even if your form currently has only 20 >controls on it, if you've added and deleted controls frequently over its >lifetime, you'll most likely have to recreate the form ...HTH :) > >http://office.microsoft.com/assistance/offhelp/offxp/access/acmain10/html/ac >decLookUpMicrosoftAccessSpecificationsS.htm ...watch for the wrap :)" >-William Hindman > > > > >-----Original Message----- >From: Francisco H Tapia [mailto:my.lists at verizon.net] >Sent: Wednesday, January 14, 2004 1:13 PM >To: AccessD >Subject: [AccessD] Form Life... > > >A while back there was a link that was posted that explained how many >"edits" or "changes" can occur over the life of a form, after which you >can no longer make any additional changes. Is there any way to check >this life cycle? or has anyone tried? > > > From jmwayne at moordri.com Wed Jan 14 13:23:29 2004 From: jmwayne at moordri.com (JM Wayne) Date: Wed, 14 Jan 2004 14:23:29 -0500 Subject: [AccessD] A curious problem... In-Reply-To: Message-ID: <000f01c3dad5$11586200$87c9040a@direcway.com> John, Do you have the web address for FMS? Thanks -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of John Bartow Sent: Wednesday, January 14, 2004 1:01 PM To: Access Developers discussion and problem solving Subject: RE: [AccessD] A curious problem... FYI: FMS has a free Access db virus checker on their web site. Personally don't know much about it. > -----Original Message----- > From: accessd-bounces at databaseadvisors.com > [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of JM Wayne > Sent: Wednesday, January 14, 2004 11:32 AM > To: 'Access Developers discussion and problem solving' > Subject: RE: [AccessD] A curious problem... > > > Very strange, indeed. I tried a virus scan. I also tried copying the code > to a txt file , changing 'has module' to no and repairing the > database then > putting the code back in. No luck. > > -----Original Message----- > From: accessd-bounces at databaseadvisors.com > [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Erwin Craps - > IT Helps > Sent: Wednesday, January 14, 2004 6:53 AM > To: Access Developers discussion and problem solving > Subject: RE: [AccessD] A curious problem... > > > Very strange. > > If I where you I would virusscan your file with a up-to-date scanner. > I never encountered a virus in an access database, but is is posible and > I supose they exist. > > It's a long shot, but this would be definitly the first thing I would do > after a decompile. > > Erwin > > -----Original Message----- > From: accessd-bounces at databaseadvisors.com > [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of JM Wayne > Sent: Tuesday, January 13, 2004 11:05 PM > To: 'Access Developers discussion and problem solving' > Subject: RE: [AccessD] A curious problem... > > Lambert, > I'm losin' it. I repaired, decompiled and imported and still no > luck. > Any more ideas short of jumping off a bridge ? > > Thanks. > Judy > > > -----Original Message----- > From: accessd-bounces at databaseadvisors.com > [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Heenan, > Lambert > Sent: Tuesday, January 13, 2004 2:51 PM > To: 'Access Developers discussion and problem solving' > Subject: RE: [AccessD] A curious problem... > > > First make a backup copy of the MDB file. > > Then try repairing. > > No joy? Try decompiling. > > Still no luck? Try importing all the objects in the database to a new > mdb file. > > Lambert > > -----Original Message----- > From: JM Wayne [mailto:jmwayne at moordri.com] > Sent: Tuesday, January 13, 2004 2:25 PM > To: AccessD (E-mail) > Subject: [AccessD] A curious problem... > > > I have an A2K database that has been in use for over 2 years. All > of a sudden the forms are resizing themselves. In one case the user > enters data on one form and by clicking a button opens another form for > data input. In another form the user double clicks an item in a list box > and opens a form to enter data. In both cases when they close the > second form the initial form is no longer maximized. I entered > DoCmd.Maximize in the second form's On Close event but it is kind of > clumsy. > There has been no change in the code that should cause this to happen. > I should mention that the forms that are having this problem have a > great number of controls on them. > Any advice or explanation would be appreciated. > > Judy > > > Judith M Wayne > Shefford-Meade, Inc. > > _______________________________________________ > 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 > > _______________________________________________ > 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 > _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From JHewson at karta.com Wed Jan 14 13:55:00 2004 From: JHewson at karta.com (Jim Hewson) Date: Wed, 14 Jan 2004 13:55:00 -0600 Subject: [AccessD] A curious problem... Message-ID: <4AE733BBEEE72647A9F950F7275F262E1126E6@nt04.karta.com> Web address for FMS is: www.fmsinc.com The virus scanner is for Access 97, can be located at: http://www.fmsinc.com/free/utilities/fmsavs10.htm HTH Jim -----Original Message----- From: JM Wayne [mailto:jmwayne at moordri.com] Sent: Wednesday, January 14, 2004 1:23 PM To: 'Access Developers discussion and problem solving' Subject: RE: [AccessD] A curious problem... John, Do you have the web address for FMS? Thanks -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of John Bartow Sent: Wednesday, January 14, 2004 1:01 PM To: Access Developers discussion and problem solving Subject: RE: [AccessD] A curious problem... FYI: FMS has a free Access db virus checker on their web site. Personally don't know much about it. > -----Original Message----- > From: accessd-bounces at databaseadvisors.com > [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of JM Wayne > Sent: Wednesday, January 14, 2004 11:32 AM > To: 'Access Developers discussion and problem solving' > Subject: RE: [AccessD] A curious problem... > > > Very strange, indeed. I tried a virus scan. I also tried copying the code > to a txt file , changing 'has module' to no and repairing the > database then > putting the code back in. No luck. > > -----Original Message----- > From: accessd-bounces at databaseadvisors.com > [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Erwin Craps - > IT Helps > Sent: Wednesday, January 14, 2004 6:53 AM > To: Access Developers discussion and problem solving > Subject: RE: [AccessD] A curious problem... > > > Very strange. > > If I where you I would virusscan your file with a up-to-date scanner. > I never encountered a virus in an access database, but is is posible and > I supose they exist. > > It's a long shot, but this would be definitly the first thing I would do > after a decompile. > > Erwin > > -----Original Message----- > From: accessd-bounces at databaseadvisors.com > [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of JM Wayne > Sent: Tuesday, January 13, 2004 11:05 PM > To: 'Access Developers discussion and problem solving' > Subject: RE: [AccessD] A curious problem... > > Lambert, > I'm losin' it. I repaired, decompiled and imported and still no > luck. > Any more ideas short of jumping off a bridge ? > > Thanks. > Judy > > > -----Original Message----- > From: accessd-bounces at databaseadvisors.com > [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Heenan, > Lambert > Sent: Tuesday, January 13, 2004 2:51 PM > To: 'Access Developers discussion and problem solving' > Subject: RE: [AccessD] A curious problem... > > > First make a backup copy of the MDB file. > > Then try repairing. > > No joy? Try decompiling. > > Still no luck? Try importing all the objects in the database to a new > mdb file. > > Lambert > > -----Original Message----- > From: JM Wayne [mailto:jmwayne at moordri.com] > Sent: Tuesday, January 13, 2004 2:25 PM > To: AccessD (E-mail) > Subject: [AccessD] A curious problem... > > > I have an A2K database that has been in use for over 2 years. All > of a sudden the forms are resizing themselves. In one case the user > enters data on one form and by clicking a button opens another form for > data input. In another form the user double clicks an item in a list box > and opens a form to enter data. In both cases when they close the > second form the initial form is no longer maximized. I entered > DoCmd.Maximize in the second form's On Close event but it is kind of > clumsy. > There has been no change in the code that should cause this to happen. > I should mention that the forms that are having this problem have a > great number of controls on them. > Any advice or explanation would be appreciated. > > Judy > > > Judith M Wayne > Shefford-Meade, Inc. > > _______________________________________________ > 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 > > _______________________________________________ > 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 > _______________________________________________ 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 From wdhindman at bellsouth.net Wed Jan 14 14:23:27 2004 From: wdhindman at bellsouth.net (William Hindman) Date: Wed, 14 Jan 2004 15:23:27 -0500 Subject: [AccessD] OT - Starting On My Own References: <20111798.1074078619262.JavaMail.www@wwinf3002> <004f01c3daa4$96384e30$6101a8c0@dejpolsys> <400595F2.4040805@shaw.ca> Message-ID: <000901c3dadc$44c86570$6101a8c0@dejpolsys> "don't be reticent to walk away from a project you are unsure of, especially when starting out" Marty ...solid advice ...knowing what NOT to do may be more important than what to do when starting off ...competition is fierce and you can't survive competing on price alone ...someone hungrier will always come along ...but in order to compete successfully with them while charging more, you have to build a reputation that says you're worth more ...and that HAS to come from your very first client ...you must be willing to swallow sand to make that first client VERY happy with your work ...and that takes it back to Marty's advice ...if you have any doubts, walk away ...which can be damn hard to do sometimes but will pay enormous dividends later ...if you can build your clientele through word of mouth you've got 80% of your work done ...the rest is writing code which is the easy part ...there are a LOT of very good programmers out there who are not working because they think small business database consulting is about writing code ...it is, but its only a small part of a successful consultant's repertoire ...marketing, managing, budgeting, and a long list of other things that you'd not believe at the moment are at least as if not more important than your individual coding skills. William Hindman From jimdettman at earthlink.net Wed Jan 14 14:37:39 2004 From: jimdettman at earthlink.net (Jim Dettman) Date: Wed, 14 Jan 2004 15:37:39 -0500 Subject: [AccessD] OT: Looking for info on DB In-Reply-To: Message-ID: Mark, <> A VBA developers kit is what one uses when you want to make a VBA interface for your product. It's the same concept as you writing a OLE DB provider for some database you wrote. <> Never heard of them, but from the extensions, they've probably built something using the DB engine from FoxPro. Lot's of small database companies like this floating around. Most work in the area of embedded products. Jim Dettman President, Online Computer Services of WNY, Inc. (315) 699-3443 jimdettman at earthlink.net -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Mark A Matte Sent: Wednesday, January 14, 2004 12:20 PM To: accessd at databaseadvisors.com Subject: [AccessD] OT: Looking for info on DB Hello All, Sorry for the OT...Does anyone have any knowledge or a company smartFOCUS, Ltd and their product "Viper" (aka "smartANALYZER)...this thing will supposedly query/index/return millions or records in a matter of seconds. It creates its own files from the data for this process(.XMF , .VIX , .IDX , .CDX). The main reason I am asking this group is because they offer a "VBA Developers Kit". Supposedly this thing was built with/on MS technology. What exactly is a VBA developers kit...or is this probably just a name they gave to one of their tools? Any insight, ideas, or anything will be greatly appreciated. Thanks, Mark _________________________________________________________________ Scope out the new MSN Plus Internet Software ? optimizes dial-up to the max! http://join.msn.com/?pgmarket=en-us&page=byoa/plus&ST=1 _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From Subscriptions at servicexp.com Wed Jan 14 15:07:42 2004 From: Subscriptions at servicexp.com (Robert Gracie) Date: Wed, 14 Jan 2004 16:07:42 -0500 Subject: [AccessD] Implements vs WithEvents In-Reply-To: Message-ID: John, Thanks A Million, You have helped allot!! VBA DHB = VBA Developers Handbook 2nd Edition by Ken Getz and Mike Gilbert Thanks Again!! Robert Gracie www.servicexp.com -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of John W. Colby Sent: Tuesday, January 13, 2004 10:03 PM To: Access Developers discussion and problem solving Subject: RE: [AccessD] Implements vs WithEvents Robert, Risking sounding ignorant, I don't know what the VBA DHB is so I can't help you there. However AFAIK you can't use Implements for something like a control or form. These objects have code inside them that cause things to happen, properties to modify their behavior etc. ALL THAT STUFF can actually be inherited in VB.NET. That is, you can actually start with a combo box, subclass that combo box, GET ALL OF IT'S FUNCTIONALITY, all of it's code, all of its properties and methods, plus add your own!!! Or even override things to change the way the combo box functions. THAT is true inheritance. Not so in Access / VBA. An object like a combo box is a self contained unit that you simply cannot get inside of or modify in any meaningful way. It appears to us Access programmers almost like an ocx, i.e. a black box that does things. IMPORTANT... one of the things these objects do is raise Events! IOW, they tell you when a user clicks the mouse, double clicks the mouse etc. "inside" their boundaries on the screen. Knowing this, every Access programmer ALREADY USES WITHEVENTS. How? By creating an event stub in a form's class, and inserting code in that event stub to do something that the programmer wants to do when that event happens. The confusing thing is that a form's class DOES NOT REQUIRE a withevents dimension statement for any controls contained in the form (or for itself - the form - for that matter). However there is an IMPLICIT dim statement in the class, invisible, but there none the less. So every Access programmer already knows all about handling events for combos, command buttons etc. They (most of us anyway) use the built-in wizards in the form's builder interface to insert event handler stubs into the form's class and insert code there. THAT IS WITHEVENT PROGRAMMING, with all the details taken care of for you. Well guess what, ANY CLASS can have those same event handlers in them!!! The only differenc is that if the class is not a form class, there must be an EXPLICIT dim Withevents statement for any control (any object actually) that you wish to sink events for. 'inside my own combo class header... 'Dim a combo withevents Private WithEvents mcbo As ComboBox Having the dim statement does nothing more than tell my combo class that a control of a specific type MAY be transferring control of one or more of it's events to the class directly. It does NOT say WHICH control. To do that you have to pass in a control to the class and inside the class, SET the dimmed control = the passed in control. 'inside my own combo class... 'Pass in a control and SET the internal control variable function Init(lcbo as ComboBox) set mcbo = lcbo end init THAT tells the class which combo to sink events for (the one being passed in of course). Once you do that, the class can sink ANY of the control's events. But you still haven't told the class WHICH events to sink. IOW, Even having done this, nothing will happen in your class unless you create an event stub for the control event you wish to process inside the class. 'inside my own combo class... 'create an event stub to which control will be passed when a specific event fires. Private Sub mcbo_AfterUpdate() 'Do Something really cool Msgbox "Something really cool" End Sub THAT tells the combo class WHICH event(s) to sink. Now you must of course instantiate your own combo class in your form and pass in a specific control to it. 'inside my FORM'S class header... 'dimension my own combo class dim fclsMyCombo as clsMyCombo 'inside my FORM'S class Private Sub Form_Open(Cancel As Integer) 'CREATE AN INSTANCE OF MY COOL COMBO CLASS Set fclsMyCombo = new clsMyCombo 'PASS A REFERENCE TO A SPECIFIC COMBO ON MY FORM fclsMyCombo.Init cboStates 'a combo displaying all the states in the union End Sub THAT tells Access to dimension a class, create a class instance and WHICH combo to pass off to the class instance. NOW, with ALL THESE THINGS IN PLACE, if that combo AfterUpdate fires, control will EVENTUALLY get to your class and your message box will display it's message. Notice that your form doesn't need any event stub in it for the control. Even though the ONLY sub in your form's class is the Form_Open, the event stub in your class will sink the event and the message box will display its message. I know full well that all this sounds like a LOT of work just to get control into a class but after you've done it a few times it will be 2nd nature. And of course you can then have a combo class that (see my other post) handles the double click, opens a form, allows your user to edit the data, and when the form closes, requeries the combo, all neatly encapsulated in a class. Plus all the other neato keenarino stuff you can imagine your combo doing. Hang in there. It took me three tries, each six months apart to finally "get" Shamil's stuff and understand Withevents. Looking back I can't understand why, but life is like that sometimes. And no, the demos for the book are copyrighted by Wrox and I can't legally distribute them, however there are many demos (by me of course) on DatabaseAdvisors' web site. I also have a bunch on my own site. This stuff is important, keep trying. John W. Colby www.ColbyConsulting.com -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Robert Gracie Sent: Tuesday, January 13, 2004 8:47 PM To: Access Developers discussion and problem solving Subject: RE: [AccessD] Implements vs WithEvents "Hmmmmmmm, As confusion sets in, he takes and stabs himself in the chest with his keyboard...:-)" I'm trying to understand why the VBA DHB is teaching that using INTERFACE inheritance classes (by way of the Implements Keyword and such) is much better then simply using Event, RaiseEvent, and WithEvents... The problem, for me at least, is getting my mind around the larger concept, and knowing which structure to use and why. With my very limited understanding, the way they have presented, it seems reasonable to go this route if only to help keep control over code execution... I guess I just need to keep pounding away at these concepts....... Robert Gracie www.servicexp.com -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of John W. Colby Sent: Tuesday, January 13, 2004 7:54 PM To: Access Developers discussion and problem solving Subject: [AccessD] Implements vs WithEvents Charlotte, >They have somewhat different purposes. No, they have completely different purposes. >Implements allows you to subclass an existing object/class and give it additional or different functionality, so you can have a class Dog and a subclass Spaniel that has a property Retriever. Well... true but not exactly. My issue with that statement is the term subclass as you use it. Yes you are subclassing the original but ONLY the interface. IMHO that is almost useless Implements is an interface ONLY inheritance, i.e. it allows (forces) you to start with the same public data and method DEFINITION but does not actually inherit the behaviors (methods) themselves. I.e. the code that runs in the class that is being subclassed is NOT inherited into the subclass. Access' inheritance (interface) is not very useful except as a template kind of thing. I find it useless enough that I personally don't bother. On the other hand Shamil is a proponent so it must have its uses. When you move to VB.NET (or any of the other .net languages I believe) TRUE inheritance is available. I.e. if you have a method with a thousand lines of code, when you subclass that object the new object inherits that code as well as the data. In our Implements subclassing, you would have to cut and paste that thousand lines of code into the subclass. Can you say maintenance nightmare? >You can intercept and respond to specific events when they happen in the object. Did the Bark event trigger? WithEvents lets you find out and respond from another class/object. Exactly correct. One of the MAJOR shortcomings of Access / VBA (in fact VB prior to VB.Net) is that Inheritance is virtually non-existent, and even worse, objects other than forms don't have a built in class that you can get at to add functionality directly to. What WithEvents really does is allow you to build class wrappers for objects so that you can encapsulate behaviors (functionality) in your class. In essence you still have two objects, the control (or even another class or OCX) and your class, but now you can put all of the common functionality in your class along with the event stubs of the control/class/ocx that generates the event. This does not get you any further down the road towards inheritance, sadly it simply doesn't appear to be possible in Access / VBA. But it does provide a huge step up in encapsulation. John W. Colby www.ColbyConsulting.com -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Charlotte Foust Sent: Tuesday, January 13, 2004 4:56 PM To: Access Developers discussion and problem solving Subject: RE: [AccessD] =function() in .onclick They have somewhat different purposes. Implements allows you to subclass an existing object/class and give it additional or different functionality, so you can have a class Dog and a subclass Spaniel that has a property Retriever. WithEvents allows you to monitor the events of an object/class. You can intercept and respond to specific events when they happen in the object. Did the Bark event trigger? WithEvents lets you find out and respond from another class/object. Charlotte Foust -----Original Message----- From: Robert Gracie [mailto:Subscriptions at servicexp.com] Sent: Tuesday, January 13, 2004 1:45 PM To: Access Developers discussion and problem solving Subject: RE: [AccessD] =function() in .onclick Hello All, Since I'm just learning this type of programming technique I thought I would ask a question... Why not use Implements instead of WithEvents? My limited understand of WithEvents is that they will not return functionality unit they (the event) has completed processing... Since I'm just at the "door" so to speak with learning how to use and incorporate these new (to me) programming techniques into my work, I really want to start out using the "best" technique... Robert Gracie www.servicexp.com _______________________________________________ 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 _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From BBarabash at TappeConstruction.com Wed Jan 14 16:04:56 2004 From: BBarabash at TappeConstruction.com (Brett Barabash) Date: Wed, 14 Jan 2004 16:04:56 -0600 Subject: [AccessD] A2K: ADP subreport field linking Message-ID: <426071E0B0A6D311B3C0006008B0AB23AFE2AD@TAPPEEXCH01> I am in the process of upsizing a bunch of our older reports to an A2K data project. So far, everything has worked smoothly but I have run into a small problem. I have a report based on a stored procedure, with a subreport based on a different stored procedure. For some reason, the Link Master Fields and Link Child Fields settings have no effect on the subreport. It displays the entire subreport contents no matter what I do. I tried binding the link fields to textboxes on the form, making them visible, etc. No joy. I have Googled the web and newsgroups, and can't seem to find any helpful info on this. Couldn't find any Microsoft KB pages either. BTW, I can get around the problem by passing additional arguments to the subreport's stored procedure and referencing the main report controls in the Input Parameters property of the subreport. Just seems like I'm missing something here. Brett Barabash, MCP Tappe Construction, Co. Eagan, MN bbarabash at tappeconstruction.com (651) 256-6831 "One thing a computer can do that most humans can't is be sealed up in a cardboard box and sit in a warehouse." -Jack Handey -------------------------------------------------------------------------------------------------------------------- This email and any files transmitted with it are confidential and intended solely for the use of the individual or entity to whom they are addressed. If you have received this email in error please notify the originator of the message. This footer also confirms that this email message has been scanned for the presence of computer viruses. Any views expressed in this message are those of the individual sender, except where the sender specifies and with authority, states them to be the views of Tappe Construction Co. Scanning of this message and addition of this footer is performed by SurfControl E-mail Filter software in conjunction with virus detection software. From martyconnelly at shaw.ca Wed Jan 14 17:03:00 2004 From: martyconnelly at shaw.ca (MartyConnelly) Date: Wed, 14 Jan 2004 15:03:00 -0800 Subject: [AccessD] OT: Looking for info on DB References: Message-ID: <4005CAA4.1010403@shaw.ca> Licensees of Visual Basic for Applications embed the VBA IDE, the VBA language engine, Microsoft Forms, IntelliSense technology productivity features and development tools (including a debugger, an object browser and a code editor). In addition, ISVs can take advantage of the new multithreading capabilities of VBA 6.0, as well as support for digital signatures. I don't know the license price but you are starting around $10,000 +. I have an old VBA CD but is circa 1997. Given the IDX CDX files, they are probably using a C-ISAM database engine, these databases can go memory resident so they are blazingly fast They might be using something like CodeBase from Sequiter Software, I have used this engine more than 10 years ago via C code. http://www.sequiter.com/products/ For VBA info see below or I believe it comes with MSDN http://www.microsoft.com/europe/vba/ Mark A Matte wrote: > Hello All, > > Sorry for the OT...Does anyone have any knowledge or a company > smartFOCUS, Ltd and their product "Viper" (aka "smartANALYZER)...this > thing will supposedly query/index/return millions or records in a > matter of seconds. It creates its own files from the data for this > process(.XMF , .VIX , .IDX , .CDX). > > The main reason I am asking this group is because they offer a "VBA > Developers Kit". Supposedly this thing was built with/on MS technology. > > What exactly is a VBA developers kit...or is this probably just a name > they gave to one of their tools? > > Any insight, ideas, or anything will be greatly appreciated. > > Thanks, > > Mark > > _________________________________________________________________ > Scope out the new MSN Plus Internet Software  optimizes dial-up to > the max! http://join.msn.com/?pgmarket=en-us&page=byoa/plus&ST=1 > > -- Marty Connelly Victoria, B.C. Canada From martyconnelly at shaw.ca Wed Jan 14 17:13:25 2004 From: martyconnelly at shaw.ca (MartyConnelly) Date: Wed, 14 Jan 2004 15:13:25 -0800 Subject: [AccessD] error after converting (mailmerge) References: <200401141408.i0EE8cNA020272@mailhostC.plex.net> Message-ID: <4005CD15.60401@shaw.ca> How about trying strConnect = "Provider=Microsoft.Jet.OLEDB.4.0;" & _ "Data Source=c:\somepath\mydb.mdb;" & _ "Jet OLEDB:System Database=MySystem.mdw", _ "myUsername", "myPassword" Note, remember to convert both the MDB and the MDW to the 4.0 database format when using the 4.0 OLE DB Provider. Make a new copy of 97 mdw to handle 2000. pedro at plex.nl wrote: >Hello Group, > >i converted a A97 secured database to A2K. >After making the changes in Wrkgadmin.exe and the ODBC Data Sources, i changed the names in the module. After running the mailmerge i get an error: Run-time error '5922' Word was unable to open the data source. The debug selects the .OpenDataSource from the code below. > >I figure out why this error occurs. > >TIA > >Pedro Janssen > > > > >Sub CreateMergeDoc(UseDDE As Boolean, PrintDoc As Boolean) > > Dim WordDoc As Word.Document > Dim strLetter As String > Dim strConnect As String > Dim WordApp As Word.Application > > Set WordApp = CreateObject("Word.Application") > > Set WordDoc = WordApp.Documents.Add > With WordDoc.MailMerge > If UseDDE Then > strConnect = "QUERY Uitvoer" > Else > strConnect = "DSN=MS Access 2000 " _ > & "Database;DBQ=E:\Cytologie\positieven\" _ > & "BeveiligdPOSITIEVEN(A2K).mdb;" _ > & "FIL=MS Access;" > End If > .OpenDataSource _ > Name:="E:\Cytologie\positieven\BeveiligdPOSITIEVEN(A2K).mdb", _ > ReadOnly:=True, LinkToSource:=True, _ > Connection:=strConnect, _ > SQLStatement:="SELECT * FROM [Uitvoer], [Aanvrager] WHERE Uitvoer.AanvragerID = Aanvrager.AanvragerID AND Uitvoer.ControleID = " & Forms![Brief]![veld] & ";" > > With Fields > ............... > End With > > With WordApp.Selection > ............... > End With > > > With WordDoc.MailMerge > .DataSource.FirstRecord = 1 > > .Destination = wdSendToNewDocument > > .Execute > > If PrintDoc Then > .Application.Options.PrintBackground = False > .Application.ActiveDocument.PrintOut > End If > End With > > WordApp.Visible = True > End With >End Sub > > > > -- Marty Connelly Victoria, B.C. Canada From DWUTKA at marlow.com Wed Jan 14 18:22:43 2004 From: DWUTKA at marlow.com (DWUTKA at marlow.com) Date: Wed, 14 Jan 2004 18:22:43 -0600 Subject: [AccessD] Testing... Message-ID: <2F8793082E00D4119A1700B0D0216BF802227743@main2.marlow.com> Just testing my outlook rules.....may have goofed them up.... Drew From Subscriptions at servicexp.com Wed Jan 14 22:25:41 2004 From: Subscriptions at servicexp.com (Robert Gracie) Date: Wed, 14 Jan 2004 23:25:41 -0500 Subject: [AccessD] Reporting Question In-Reply-To: <2F8793082E00D4119A1700B0D0216BF802227743@main2.marlow.com> Message-ID: Hello All, Is there a way to make use of a report that is located in a an external mdb and provide that report with a recordset, or an array. Bottom line is I would like to have a "report library" that is not tied to any data structure and reference that mdb in other projects. I can do everything with the exception of providing the recordset for the report from an un-linked data structure.. Preferably in A2K but open to AXP Any ideas...? Thanks! Robert Gracie www.servicexp.com From bheygood at abestsystems.com Wed Jan 14 22:32:23 2004 From: bheygood at abestsystems.com (Bob Heygood) Date: Wed, 14 Jan 2004 20:32:23 -0800 Subject: [AccessD] Access n Front Page In-Reply-To: <008501c3d9f3$116248c0$6101a8c0@dejpolsys> Message-ID: Thanks William I will checkout these links. -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of William Hindman Sent: Tuesday, January 13, 2004 8:34 AM To: Access Developers discussion and problem solving Subject: Re: [AccessD] Access n Front Page Bob ...try http://www.outfront.net/spooky/index.htm ...and http://spiderwebwoman.com/resources/dbrwtipsandtricks.asp ...you might also want to join the FPlist-subscribe at yahoogroups.com which is very similar to AccessD and has a huge, searchable archive. William Hindman - Next Year In The Free State! ----- Original Message ----- From: "Bob Heygood" To: "Access Developers discussion and problem solving" Sent: Tuesday, January 13, 2004 11:07 AM Subject: [AccessD] Access n Front Page > Hey to the group, > > Hopefully this is not too far off. But so much here now has to do with the > web. > > I am looking for some info on editing a record in an Access db from a web > browser using Front Page. I have found enough on displaying records, but not > on editing existing data. I suspect asp or some such will be involved. > > best, > > bob > > > _______________________________________________ > 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 From bheygood at abestsystems.com Wed Jan 14 22:34:07 2004 From: bheygood at abestsystems.com (Bob Heygood) Date: Wed, 14 Jan 2004 20:34:07 -0800 Subject: [AccessD] Access n Front Page In-Reply-To: <2F8793082E00D4119A1700B0D0216BF802227731@main2.marlow.com> Message-ID: Thanks Drew More and more I think that whatever I can do without Front Page's help is best. -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of DWUTKA at marlow.com Sent: Tuesday, January 13, 2004 10:09 AM To: accessd at databaseadvisors.com Subject: RE: [AccessD] Access n Front Page This is down and dirty, but the following is a relatively simple .asp page, which displays an .mdb table in HTML format. You can then edit the values, and submit it, and it will change the values in the table. It requires that you have an ID field (the code is currently set to use field 0 as the ID). <% dim cnn dim rs dim i dim strSQL dim intCount if request.Form("Submit")="Submit" then set cnn=server.CreateObject("ADODB.Connection") set rs=server.CreateObject("ADODB.Recordset") cnn.Provider="Microsoft.Jet.OLEDB.4.0" cnn.Open "C:\Inetpub\domains\airs\Air2000_be.mdb" rs.Open "tblWebFields",cnn,1,3,512 intCount=rs.Fields.Count-1 rs.MoveFirst do until rs.EOF=True for i=1 to intCount rs.Fields(i).value=request.Form(rs.Fields(0).value & "-" & rs.Fields(i).Name) next rs.Update rs.MoveNext loop rs.Close set rs=nothing cnn.Close set cnn=nothing end if %> Dyncorp Field Settings
<% set cnn=server.CreateObject("ADODB.Connection") set rs=server.CreateObject("ADODB.Recordset") cnn.Provider="Microsoft.Jet.OLEDB.4.0" cnn.Open "C:\Inetpub\domains\airs\Air2000_be.mdb" rs.Open "tblWebFields",cnn,1,1,512 response.Write "" & vbcrlf intCount=rs.Fields.Count-1 for i=1 to intCount response.Write "" & vbcrlf next response.Write "" & vbcrlf rs.MoveFirst do until rs.EOF=True response.Write "" & vbcrlf for i=1 to intCount response.Write "" & vbcrlf next response.Write "" & vbcrlf rs.MoveNext loop rs.Close set rs=nothing cnn.Close set cnn=nothing %>
" & rs.Fields(i).Name & "
" & vbcrlf response.Write "
-----Original Message----- From: Bob Heygood [mailto:bheygood at abestsystems.com] Sent: Tuesday, January 13, 2004 10:08 AM To: Access Developers discussion and problem solving Subject: [AccessD] Access n Front Page Hey to the group, Hopefully this is not too far off. But so much here now has to do with the web. I am looking for some info on editing a record in an Access db from a web browser using Front Page. I have found enough on displaying records, but not on editing existing data. I suspect asp or some such will be involved. best, bob _______________________________________________ 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 From wdhindman at bellsouth.net Thu Jan 15 00:17:11 2004 From: wdhindman at bellsouth.net (William Hindman) Date: Thu, 15 Jan 2004 01:17:11 -0500 Subject: [AccessD] Access n Front Page References: Message-ID: <000801c3db2f$3673a400$6101a8c0@dejpolsys> ...actually Bob, FP2003 is quite capable of writing most of the asp for you if that's the way you choose to go ...its a big step up from previous versions and the code it writes, html or asp, is no longer the bloated excrement FP'98 used to produce. William Hindman - Next Year In The Free State! ----- Original Message ----- From: "Bob Heygood" To: "Access Developers discussion and problem solving" Sent: Wednesday, January 14, 2004 11:34 PM Subject: RE: [AccessD] Access n Front Page > Thanks Drew > More and more I think that whatever I can do without Front Page's help is > best. > > > > -----Original Message----- > From: accessd-bounces at databaseadvisors.com > [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of > DWUTKA at marlow.com > Sent: Tuesday, January 13, 2004 10:09 AM > To: accessd at databaseadvisors.com > Subject: RE: [AccessD] Access n Front Page > > > This is down and dirty, but the following is a relatively simple .asp page, > which displays an .mdb table in HTML format. You can then edit the values, > and submit it, and it will change the values in the table. It requires that > you have an ID field (the code is currently set to use field 0 as the ID). > > > <% > dim cnn > dim rs > dim i > dim strSQL > dim intCount > if request.Form("Submit")="Submit" then > set cnn=server.CreateObject("ADODB.Connection") > set rs=server.CreateObject("ADODB.Recordset") > cnn.Provider="Microsoft.Jet.OLEDB.4.0" > cnn.Open "C:\Inetpub\domains\airs\Air2000_be.mdb" > rs.Open "tblWebFields",cnn,1,3,512 > intCount=rs.Fields.Count-1 > rs.MoveFirst > do until rs.EOF=True > for i=1 to intCount > rs.Fields(i).value=request.Form(rs.Fields(0).value & > "-" & rs.Fields(i).Name) > next > rs.Update > rs.MoveNext > loop > rs.Close > set rs=nothing > cnn.Close > set cnn=nothing > end if > %> > > Dyncorp Field Settings > > >
> > > <% > set cnn=server.CreateObject("ADODB.Connection") > set rs=server.CreateObject("ADODB.Recordset") > cnn.Provider="Microsoft.Jet.OLEDB.4.0" > cnn.Open "C:\Inetpub\domains\airs\Air2000_be.mdb" > rs.Open "tblWebFields",cnn,1,1,512 > response.Write "" & vbcrlf > intCount=rs.Fields.Count-1 > for i=1 to intCount > response.Write "" & vbcrlf > next > response.Write "" & vbcrlf > rs.MoveFirst > do until rs.EOF=True > response.Write "" & vbcrlf > for i=1 to intCount > response.Write "" & vbcrlf > next > response.Write "" & vbcrlf > rs.MoveNext > loop > rs.Close > set rs=nothing > cnn.Close > set cnn=nothing > %> >
" & > rs.Fields(i).Name & "
" & > vbcrlf > response.Write " rs.Fields(0).Value & "-" & rs.Fields(i).Name & """ value=""" & > rs.Fields(i).Value & """>
> >
> > > -----Original Message----- > From: Bob Heygood [mailto:bheygood at abestsystems.com] > Sent: Tuesday, January 13, 2004 10:08 AM > To: Access Developers discussion and problem solving > Subject: [AccessD] Access n Front Page > > > Hey to the group, > > Hopefully this is not too far off. But so much here now has to do with the > web. > > I am looking for some info on editing a record in an Access db from a web > browser using Front Page. I have found enough on displaying records, but not > on editing existing data. I suspect asp or some such will be involved. > > best, > > bob > > > _______________________________________________ > 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 > > > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com > From gustav at cactus.dk Thu Jan 15 03:32:11 2004 From: gustav at cactus.dk (Gustav Brock) Date: Thu, 15 Jan 2004 10:32:11 +0100 Subject: [AccessD] Implements vs WithEvents In-Reply-To: References: Message-ID: <1426347957.20040115103211@cactus.dk> Hi Robert Yes, it's right to credit John for leaving obtuse mode and, again, taking the time to explain this important topic. I'm certainly not mastering DEEP myself but like John I received expert advice - even a demobase - from Shamil which helped me combining the big picture and the hand work (nuts and bolts) which add up to this great but well hidden feature of Access. /gustav > John, Thanks A Million, You have helped allot!! From JOHNWARDBELL at aol.com Thu Jan 15 05:19:39 2004 From: JOHNWARDBELL at aol.com (JOHNWARDBELL at aol.com) Date: Thu, 15 Jan 2004 06:19:39 EST Subject: [AccessD] Pivot Tables Book Message-ID: <119.2de061da.2d37d14b@aol.com> I am looking for a book on programming Pivot tables using vba. Has anyone got a recommendation? using A2k or later. TIA johnb From Kenneth.Stoker at pnl.gov Thu Jan 15 11:29:20 2004 From: Kenneth.Stoker at pnl.gov (Stoker, Kenneth E) Date: Thu, 15 Jan 2004 09:29:20 -0800 Subject: [AccessD] Message-ID: <249C1CB246997C48BB74963CCD361C1B07C944@pnlmse28.pnl.gov> I have a coworker who is getting the following error message when trying to output 17K+ records from a query to Excel. There are too many rows to output, based on the limitation specified by the output format or by Microsoft Access. Is there a setting that can be changed to increase the amount output? Is she hitting a limitation? Can anyone help here. Thanks. Ken Stoker Technology Commercialization Information Systems Administrator PH: (509) 375-3758 FAX: (509) 375-6731 E-mail: Kenneth.Stoker at pnl.gov From John.Clark at niagaracounty.com Thu Jan 15 11:46:51 2004 From: John.Clark at niagaracounty.com (John Clark) Date: Thu, 15 Jan 2004 12:46:51 -0500 Subject: [AccessD] MDW file Message-ID: This group has helped me so much over the past two years. My confidence has increased 1000%, which I attribute directly to my involvement with this list. Just yesterday, my boss made some crack about an external programmer that they have used...basically saying that if I get as good as him I could do what he does (he is currently taking a year off and traveling the country in an RV)...and for the first time, I stood up and said, "I am just as good, if not better, than [that guy]." Anyhow, now that I have explained how 'good' I have become, I was thrown a twist. Because this guy is out of town, he cannot respond to a call that they have regarding a program he wrote. It needs to be placed on the desktops, of another department. "No problem," I said, "I can handle it." But I notice in the shortcut that exists, in the original department, it uses an .MDW file in the target line (ms.mdw" "c:\program files\cms\cmssecure.mdb"). I just called to verify this line, because I thought that at least a "c was missing from the front...I don't get the one quote mark. I have never used workgroup features of Access, and I really don't plan to. What do I need to do to set this up? Thanks! John W Clark John W. Clark Computer Programmer / Asst. Network Administrator Niagara County Central Data Processing From jwcolby at colbyconsulting.com Thu Jan 15 11:49:57 2004 From: jwcolby at colbyconsulting.com (John W. Colby) Date: Thu, 15 Jan 2004 12:49:57 -0500 Subject: [AccessD] In-Reply-To: <249C1CB246997C48BB74963CCD361C1B07C944@pnlmse28.pnl.gov> Message-ID: Back it off to 16K and try again. It may be a limitation in Excel. John W. Colby www.ColbyConsulting.com -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Stoker, Kenneth E Sent: Thursday, January 15, 2004 12:29 PM To: AccessD at databaseadvisors.com Subject: [AccessD] I have a coworker who is getting the following error message when trying to output 17K+ records from a query to Excel. There are too many rows to output, based on the limitation specified by the output format or by Microsoft Access. Is there a setting that can be changed to increase the amount output? Is she hitting a limitation? Can anyone help here. Thanks. Ken Stoker Technology Commercialization Information Systems Administrator PH: (509) 375-3758 FAX: (509) 375-6731 E-mail: Kenneth.Stoker at pnl.gov _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From Lambert.Heenan at AIG.com Thu Jan 15 11:50:28 2004 From: Lambert.Heenan at AIG.com (Heenan, Lambert) Date: Thu, 15 Jan 2004 12:50:28 -0500 Subject: [AccessD] Message-ID: <8B98F8EA48F8BA47A2F24E0D0AF40CF407AD7CCF@xlivmbx12.aig.com> I assume that s/he is using TransferSpreadsheet to export to Excel as in... docmd.TransferSpreadsheet acExport ,etc. etc. The second parameter (the one after acExport) defaults to acSpreadsheetTypeExcel3 which cannot handle the 17k rows. If you choose acSpreadsheetTypeExcel97 or higher for this parameter it should work fine. Lambert > -----Original Message----- > From: Stoker, Kenneth E [SMTP:Kenneth.Stoker at pnl.gov] > Sent: Thursday, January 15, 2004 12:29 PM > To: AccessD at databaseadvisors.com > Subject: [AccessD] > > I have a coworker who is getting the following error message when trying > to output 17K+ records from a query to Excel. > > There are too many rows to output, based on the limitation > specified by the output format or by Microsoft Access. > > Is there a setting that can be changed to increase the amount output? > Is she hitting a limitation? Can anyone help here. > > Thanks. > > Ken Stoker > Technology Commercialization > Information Systems Administrator > PH: (509) 375-3758 > FAX: (509) 375-6731 > E-mail: Kenneth.Stoker at pnl.gov > > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com From jwcolby at colbyconsulting.com Thu Jan 15 12:06:12 2004 From: jwcolby at colbyconsulting.com (John W. Colby) Date: Thu, 15 Jan 2004 13:06:12 -0500 Subject: [AccessD] MDW file In-Reply-To: Message-ID: Do you find an ms.mdw anywhere? How about a CMS.mdw? AFAIK the name isn't critical, i.e. it can be anything. I can't explain the missing quote, other than maybe the parser doesn't need it and so it happens to work. John W. Colby www.ColbyConsulting.com -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of John Clark Sent: Thursday, January 15, 2004 12:47 PM To: accessd at databaseadvisors.com Subject: [AccessD] MDW file This group has helped me so much over the past two years. My confidence has increased 1000%, which I attribute directly to my involvement with this list. Just yesterday, my boss made some crack about an external programmer that they have used...basically saying that if I get as good as him I could do what he does (he is currently taking a year off and traveling the country in an RV)...and for the first time, I stood up and said, "I am just as good, if not better, than [that guy]." Anyhow, now that I have explained how 'good' I have become, I was thrown a twist. Because this guy is out of town, he cannot respond to a call that they have regarding a program he wrote. It needs to be placed on the desktops, of another department. "No problem," I said, "I can handle it." But I notice in the shortcut that exists, in the original department, it uses an .MDW file in the target line (ms.mdw" "c:\program files\cms\cmssecure.mdb"). I just called to verify this line, because I thought that at least a "c was missing from the front...I don't get the one quote mark. I have never used workgroup features of Access, and I really don't plan to. What do I need to do to set this up? Thanks! John W Clark John W. Clark Computer Programmer / Asst. Network Administrator Niagara County Central Data Processing _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From jwcolby at colbyconsulting.com Thu Jan 15 12:07:54 2004 From: jwcolby at colbyconsulting.com (John W. Colby) Date: Thu, 15 Jan 2004 13:07:54 -0500 Subject: [AccessD] Implements vs WithEvents In-Reply-To: <1426347957.20040115103211@cactus.dk> Message-ID: Gustav, Obtuse? Me? You must be talking about some other John? ;-) John W. Colby www.ColbyConsulting.com -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Gustav Brock Sent: Thursday, January 15, 2004 4:32 AM To: Access Developers discussion and problem solving Subject: Re: [AccessD] Implements vs WithEvents Hi Robert Yes, it's right to credit John for leaving obtuse mode and, again, taking the time to explain this important topic. I'm certainly not mastering DEEP myself but like John I received expert advice - even a demobase - from Shamil which helped me combining the big picture and the hand work (nuts and bolts) which add up to this great but well hidden feature of Access. /gustav > John, Thanks A Million, You have helped allot!! _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From KIsmert at TexasSystems.com Thu Jan 15 12:13:00 2004 From: KIsmert at TexasSystems.com (Ken Ismert) Date: Thu, 15 Jan 2004 12:13:00 -0600 Subject: [AccessD] Implements vs WithEvents In-Reply-To: Message-ID: <002c01c3db93$36704a30$2a3ca8c0@TEXASSYSTEMS.COM> Well, I couldn't resist putting in my own (tardy) views on Implements in VBA: An interface is a communication protocol - a set of signatures denoting the public properties and methods of a class. Every class has its default interface, which is just its own properties and methods. In A2K and later, you can have a class support any published interface available to it. For example, IDTExtensibility2 is a published interface that allows you to write Office COM Add-ins. Part of writing an Add-in is implementing this interface. You can also design and implement your own custom interfaces. An interface is simply a class module with the desired properties and methods defined - but no code or variables. I prefix interfaces with an I, like ITreeClient, and use C for standard classes, like CTree. Implementing an interface COM-enables your class. While that doesn't make much practical difference in VBA, interfaces are the foundation of COM programming. Interfaces differ from contracts in that a contract guarantees a certain result for a given set of inputs. The interface simply guarantees that a certain set of properties and methods are present - but says nothing about results. While Implements has little to do with inheritance, it has lots to do with polymorphism. The most common use of Implements in VBA is to define a custom interface that is shared across many objects. So, every Dog class can implement IObedience, and thus accept the commands Sit, Rollover and Fetch. Note that the interface doesn't guarantee that the individual classes will do anything useful or correct with the commands (much like real dogs). No functionality is inherited. For that, as has been pointed out, you will have to go to VB.Net. It is also worth noting that most of what you can do with interfaces you can also do with late binding. For instance, the Dog classes could each have the methods Sit, Rollover and Fetch defined in their default interfaces. You would use them like this: Dim rDog as Object Set rDog = New CPoodle ' or CHusky, etc rDog.Fetch ' late bound With a custom interface, the same code would be: Dim rDog as IObedience Set rDog = New CPoodle rDog.Fetch There are at least three advantages to the interface approach: 1. Early binding - can be significantly more efficient 2. Compile-time checking - protects against incomplete/incorrect interface implementations 3. Early trapping of runtime errors - if an object doesn't implement IObedience, say CSiamese, you will know immediately on the Set command - you'll get a Type Mismatch error. You can also query an object to see if it supports a particular interface: If TypeOf rObj Is IObedience Then Set rDog = rObj ' do dog things As for interfaces and events, the advantages of each are a little more subtle. Events are broadcast, so every object subscribing to an event using WithEvents will get the message. A problem can arise when you are managing a group of objects, and want to send a message to only one of them. Using events, every object in the group would have to ask 'Is this for me?' when they received the event. This can get cumbersome, especially if there is a lot of communication going on. Interfaces allow you to define your own custom callback scheme. You can then select an object out of a group, and send a message only to it. This is more efficient and reliable than the broadcast method. I use this, among other things, to control interactions between forms. Form class modules support Implements beautifully. So, when defining your object communication scheme, interfaces give you more options. If everybody needs the message, an event would be a good choice. If only a few members out of the group need it, perhaps an interface-based callback would be better. Another limitation to be aware of: you can't define useable shared events in a VB custom interface. I have found interfaces to be quite handy in situations where I want many objects to behave the same way, or when I want to control specific objects in a group, rather than talk to all of them. While they are not ideal, interfaces are still a useful and powerful concept in their present form. Thinking in terms of interfaces helps me introduce rigor into my object structures. In closing, I'd like to credit the authors of Effective Visual Basic, by DevelopMentor, for their excellent introduction to interfaces. -Ken From donald.a.Mcgillivray at mail.sprint.com Thu Jan 15 12:15:24 2004 From: donald.a.Mcgillivray at mail.sprint.com (Mcgillivray, Donald [ITS]) Date: Thu, 15 Jan 2004 12:15:24 -0600 Subject: [AccessD] MDW file Message-ID: <6FC1C7A6E7BD5540AB0A8436713C43BF065C5FCA@PKDWB01C.ad.sprint.com> John, Is it possible that you're seeing only part (the last part) of the command line in the shortcut? The syntax for passing the workgroup on the command line is: Path to msaccess.exe, followed by path and filename of target mdb, followed by the workgroup switch (/wrkgrp), followed by the path and filename of target mdw. For example: "c:\program files\msoffice\office\msaccess.exe" "c:\MyDatabases\target.mdb" /wrkgrp "c:\MyDatabases\target.mdw" Note that quotes around the segments are only critical if there are spaces in the strings (doesn't hurt to include them, though), and that the positions of the path to the mdb and the workgroup segment are interchangeable. Thus, if the other programmer had put the workgroup segment before the mdb segment, you might be seeing just the tail end of the one followed by the entirety of the other. Hope this helps. Don McGillivray -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of John Clark Sent: Thursday, January 15, 2004 9:47 AM To: accessd at databaseadvisors.com Subject: [AccessD] MDW file This group has helped me so much over the past two years. My confidence has increased 1000%, which I attribute directly to my involvement with this list. Just yesterday, my boss made some crack about an external programmer that they have used...basically saying that if I get as good as him I could do what he does (he is currently taking a year off and traveling the country in an RV)...and for the first time, I stood up and said, "I am just as good, if not better, than [that guy]." Anyhow, now that I have explained how 'good' I have become, I was thrown a twist. Because this guy is out of town, he cannot respond to a call that they have regarding a program he wrote. It needs to be placed on the desktops, of another department. "No problem," I said, "I can handle it." But I notice in the shortcut that exists, in the original department, it uses an .MDW file in the target line (ms.mdw" "c:\program files\cms\cmssecure.mdb"). I just called to verify this line, because I thought that at least a "c was missing from the front...I don't get the one quote mark. I have never used workgroup features of Access, and I really don't plan to. What do I need to do to set this up? Thanks! John W Clark John W. Clark Computer Programmer / Asst. Network Administrator Niagara County Central Data Processing _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From jwcolby at colbyconsulting.com Thu Jan 15 12:53:39 2004 From: jwcolby at colbyconsulting.com (John W. Colby) Date: Thu, 15 Jan 2004 13:53:39 -0500 Subject: [AccessD] Implements vs WithEvents In-Reply-To: <002c01c3db93$36704a30$2a3ca8c0@TEXASSYSTEMS.COM> Message-ID: Ken, Thanks for that. As I said, I don't use Implements, never having found a use for them. I therefore don't really understand the ins and outs as I do withevents. Indeed, having been focusing so long on Access which does not have inheritance I have pretty much lost my ability to speak intelligently about the subject although I am getting back into it with VB.NET. I guess back when I used this stuff (early 90s with Object Pascal and C from Borland), interfaces weren't really used much? I studied, used and became comfortable with inheritance and miss it sorely in Access / VBA. Coming from a background where you do indeed inherit EVERYTHING from the parent class I guess I failed to see enough use for Implements to take a close look. One thing you say intrigues me though. You mention Implements allowing a custom callback scheme and sending messages. How does this work? How does the callback communicate between class instances? I wrote a messaging class using Withevents and RaiseEvents. Set up one or more global instance(s) of the class and off you go. The class has a method that accepts a message and raises an event passing the message on to any listeners. Thus I can instantiate the class for a specific purpose, only the classes that care to listen do so, although of course if there are 1000 instances of that class then they all listen and must, as you say, decide whether the message is for them. In the case of forms however, I can set up a private message channel between any two or more forms. The message class also can broadcast a "from/to/subject/message" so that any listeners can just check the to:. In fact that is exactly how I use it between forms, I just include the form name that is the intended recipient and all forms check the to: for their own name and accept the message if they need to. How is this stuff done with Implements? And BTW, a little less OBTUSE if you would. ;-) John W. Colby www.ColbyConsulting.com -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Ken Ismert Sent: Thursday, January 15, 2004 1:13 PM To: 'Access Developers discussion and problem solving' Subject: RE: [AccessD] Implements vs WithEvents Well, I couldn't resist putting in my own (tardy) views on Implements in VBA: An interface is a communication protocol - a set of signatures denoting the public properties and methods of a class. Every class has its default interface, which is just its own properties and methods. In A2K and later, you can have a class support any published interface available to it. For example, IDTExtensibility2 is a published interface that allows you to write Office COM Add-ins. Part of writing an Add-in is implementing this interface. You can also design and implement your own custom interfaces. An interface is simply a class module with the desired properties and methods defined - but no code or variables. I prefix interfaces with an I, like ITreeClient, and use C for standard classes, like CTree. Implementing an interface COM-enables your class. While that doesn't make much practical difference in VBA, interfaces are the foundation of COM programming. Interfaces differ from contracts in that a contract guarantees a certain result for a given set of inputs. The interface simply guarantees that a certain set of properties and methods are present - but says nothing about results. While Implements has little to do with inheritance, it has lots to do with polymorphism. The most common use of Implements in VBA is to define a custom interface that is shared across many objects. So, every Dog class can implement IObedience, and thus accept the commands Sit, Rollover and Fetch. Note that the interface doesn't guarantee that the individual classes will do anything useful or correct with the commands (much like real dogs). No functionality is inherited. For that, as has been pointed out, you will have to go to VB.Net. It is also worth noting that most of what you can do with interfaces you can also do with late binding. For instance, the Dog classes could each have the methods Sit, Rollover and Fetch defined in their default interfaces. You would use them like this: Dim rDog as Object Set rDog = New CPoodle ' or CHusky, etc rDog.Fetch ' late bound With a custom interface, the same code would be: Dim rDog as IObedience Set rDog = New CPoodle rDog.Fetch There are at least three advantages to the interface approach: 1. Early binding - can be significantly more efficient 2. Compile-time checking - protects against incomplete/incorrect interface implementations 3. Early trapping of runtime errors - if an object doesn't implement IObedience, say CSiamese, you will know immediately on the Set command - you'll get a Type Mismatch error. You can also query an object to see if it supports a particular interface: If TypeOf rObj Is IObedience Then Set rDog = rObj ' do dog things As for interfaces and events, the advantages of each are a little more subtle. Events are broadcast, so every object subscribing to an event using WithEvents will get the message. A problem can arise when you are managing a group of objects, and want to send a message to only one of them. Using events, every object in the group would have to ask 'Is this for me?' when they received the event. This can get cumbersome, especially if there is a lot of communication going on. Interfaces allow you to define your own custom callback scheme. You can then select an object out of a group, and send a message only to it. This is more efficient and reliable than the broadcast method. I use this, among other things, to control interactions between forms. Form class modules support Implements beautifully. So, when defining your object communication scheme, interfaces give you more options. If everybody needs the message, an event would be a good choice. If only a few members out of the group need it, perhaps an interface-based callback would be better. Another limitation to be aware of: you can't define useable shared events in a VB custom interface. I have found interfaces to be quite handy in situations where I want many objects to behave the same way, or when I want to control specific objects in a group, rather than talk to all of them. While they are not ideal, interfaces are still a useful and powerful concept in their present form. Thinking in terms of interfaces helps me introduce rigor into my object structures. In closing, I'd like to credit the authors of Effective Visual Basic, by DevelopMentor, for their excellent introduction to interfaces. -Ken _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From jwcolby at colbyconsulting.com Thu Jan 15 12:59:44 2004 From: jwcolby at colbyconsulting.com (John W. Colby) Date: Thu, 15 Jan 2004 13:59:44 -0500 Subject: [AccessD] Access shuts down Message-ID: Folks, A client is having an Access app just shut down, no GPF, no "by your leave", just gone. I am wondering if it is because I am doing work on it here at my house where I have Office 2K and Office XP both on the same machine. I installed the "widget" (update) that MS designed to supposedly allow the two to co-exist but I still have my doubts. Has anyone seen this? John W. Colby www.ColbyConsulting.com From John.Clark at niagaracounty.com Thu Jan 15 13:21:04 2004 From: John.Clark at niagaracounty.com (John Clark) Date: Thu, 15 Jan 2004 14:21:04 -0500 Subject: [AccessD] MDW file Message-ID: Yes, I do find a CMS.mdw, in the data directory (i.e. where those program files are). I opened it at one time and seen a couple of tables with some user info, but now I cannot get into those again either. Its bad enough that they had someone in doing my job, but the dude could at least work with me and conform to 'our' system. Thanks John W Clark >>> jwcolby at colbyconsulting.com 01/15/04 01:06PM >>> Do you find an ms.mdw anywhere? How about a CMS.mdw? AFAIK the name isn't critical, i.e. it can be anything. I can't explain the missing quote, other than maybe the parser doesn't need it and so it happens to work. John W. Colby www.ColbyConsulting.com -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of John Clark Sent: Thursday, January 15, 2004 12:47 PM To: accessd at databaseadvisors.com Subject: [AccessD] MDW file This group has helped me so much over the past two years. My confidence has increased 1000%, which I attribute directly to my involvement with this list. Just yesterday, my boss made some crack about an external programmer that they have used...basically saying that if I get as good as him I could do what he does (he is currently taking a year off and traveling the country in an RV)...and for the first time, I stood up and said, "I am just as good, if not better, than [that guy]." Anyhow, now that I have explained how 'good' I have become, I was thrown a twist. Because this guy is out of town, he cannot respond to a call that they have regarding a program he wrote. It needs to be placed on the desktops, of another department. "No problem," I said, "I can handle it." But I notice in the shortcut that exists, in the original department, it uses an .MDW file in the target line (ms.mdw" "c:\program files\cms\cmssecure.mdb"). I just called to verify this line, because I thought that at least a "c was missing from the front...I don't get the one quote mark. I have never used workgroup features of Access, and I really don't plan to. What do I need to do to set this up? Thanks! John W Clark John W. Clark Computer Programmer / Asst. Network Administrator Niagara County Central Data Processing _______________________________________________ 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 From Erwin.Craps at ithelps.be Thu Jan 15 13:31:23 2004 From: Erwin.Craps at ithelps.be (Erwin Craps - IT Helps) Date: Thu, 15 Jan 2004 20:31:23 +0100 Subject: [AccessD] Access shuts down Message-ID: <46B976F2B698FF46A4FE7636509B22DF03D11B@stekelbes.ithelps.local> It is posible with the Access Runtime maybe alsowith the MDE in full access (but I'm not sure about the MDE in full access). What concerns the Access runtime I'm sure that if you have an error in a function/module with no error trapping, the runtime just terminates the program without any message. Erwin -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of John W. Colby Sent: Thursday, January 15, 2004 8:00 PM To: AccessD Subject: [AccessD] Access shuts down Folks, A client is having an Access app just shut down, no GPF, no "by your leave", just gone. I am wondering if it is because I am doing work on it here at my house where I have Office 2K and Office XP both on the same machine. I installed the "widget" (update) that MS designed to supposedly allow the two to co-exist but I still have my doubts. Has anyone seen this? John W. Colby www.ColbyConsulting.com _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From DWUTKA at marlow.com Thu Jan 15 13:37:31 2004 From: DWUTKA at marlow.com (DWUTKA at marlow.com) Date: Thu, 15 Jan 2004 13:37:31 -0600 Subject: [AccessD] Access n Front Page Message-ID: <2F8793082E00D4119A1700B0D0216BF802227744@main2.marlow.com> FP is a good tool. I used it to become familiar with HTML. I let it write the HTML, then I would take a look at what it did. From time to time I still use FP to make quick formatting changes. However, FP XP comes with Microsoft Scripting Editor 9. (I know FP 2000 had an older version, which was nice, but 9 is WAY cool). That MSE will auto complete, and auto tag stuff as you are righting raw HTML. It is extremely handy to create web pages with it. Plus, it acts almost exactly like VB, when it comes to writing code (VBScript or ASP). Drew -----Original Message----- From: Bob Heygood [mailto:bheygood at abestsystems.com] Sent: Wednesday, January 14, 2004 10:34 PM To: Access Developers discussion and problem solving Subject: RE: [AccessD] Access n Front Page Thanks Drew More and more I think that whatever I can do without Front Page's help is best. -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of DWUTKA at marlow.com Sent: Tuesday, January 13, 2004 10:09 AM To: accessd at databaseadvisors.com Subject: RE: [AccessD] Access n Front Page This is down and dirty, but the following is a relatively simple .asp page, which displays an .mdb table in HTML format. You can then edit the values, and submit it, and it will change the values in the table. It requires that you have an ID field (the code is currently set to use field 0 as the ID). <% dim cnn dim rs dim i dim strSQL dim intCount if request.Form("Submit")="Submit" then set cnn=server.CreateObject("ADODB.Connection") set rs=server.CreateObject("ADODB.Recordset") cnn.Provider="Microsoft.Jet.OLEDB.4.0" cnn.Open "C:\Inetpub\domains\airs\Air2000_be.mdb" rs.Open "tblWebFields",cnn,1,3,512 intCount=rs.Fields.Count-1 rs.MoveFirst do until rs.EOF=True for i=1 to intCount rs.Fields(i).value=request.Form(rs.Fields(0).value & "-" & rs.Fields(i).Name) next rs.Update rs.MoveNext loop rs.Close set rs=nothing cnn.Close set cnn=nothing end if %> Dyncorp Field Settings
<% set cnn=server.CreateObject("ADODB.Connection") set rs=server.CreateObject("ADODB.Recordset") cnn.Provider="Microsoft.Jet.OLEDB.4.0" cnn.Open "C:\Inetpub\domains\airs\Air2000_be.mdb" rs.Open "tblWebFields",cnn,1,1,512 response.Write "" & vbcrlf intCount=rs.Fields.Count-1 for i=1 to intCount response.Write "" & vbcrlf next response.Write "" & vbcrlf rs.MoveFirst do until rs.EOF=True response.Write "" & vbcrlf for i=1 to intCount response.Write "" & vbcrlf next response.Write "" & vbcrlf rs.MoveNext loop rs.Close set rs=nothing cnn.Close set cnn=nothing %>
" & rs.Fields(i).Name & "
" & vbcrlf response.Write "
-----Original Message----- From: Bob Heygood [mailto:bheygood at abestsystems.com] Sent: Tuesday, January 13, 2004 10:08 AM To: Access Developers discussion and problem solving Subject: [AccessD] Access n Front Page Hey to the group, Hopefully this is not too far off. But so much here now has to do with the web. I am looking for some info on editing a record in an Access db from a web browser using Front Page. I have found enough on displaying records, but not on editing existing data. I suspect asp or some such will be involved. best, bob _______________________________________________ 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 _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From DWUTKA at marlow.com Thu Jan 15 13:38:49 2004 From: DWUTKA at marlow.com (DWUTKA at marlow.com) Date: Thu, 15 Jan 2004 13:38:49 -0600 Subject: [AccessD] Message-ID: <2F8793082E00D4119A1700B0D0216BF802227745@main2.marlow.com> That is a limitation of excel. It can only handle 16k 'records'. Drew -----Original Message----- From: Stoker, Kenneth E [mailto:Kenneth.Stoker at pnl.gov] Sent: Thursday, January 15, 2004 11:29 AM To: AccessD at databaseadvisors.com Subject: [AccessD] I have a coworker who is getting the following error message when trying to output 17K+ records from a query to Excel. There are too many rows to output, based on the limitation specified by the output format or by Microsoft Access. Is there a setting that can be changed to increase the amount output? Is she hitting a limitation? Can anyone help here. Thanks. Ken Stoker Technology Commercialization Information Systems Administrator PH: (509) 375-3758 FAX: (509) 375-6731 E-mail: Kenneth.Stoker at pnl.gov _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From Jim.Hale at FleetPride.com Thu Jan 15 13:33:00 2004 From: Jim.Hale at FleetPride.com (Hale, Jim) Date: Thu, 15 Jan 2004 13:33:00 -0600 Subject: [AccessD] Message-ID: <6A6AA9DF57E4F046BDA1E273BDDB677201A9FC@corp-es01.fleetpride.com> Using the Excel export icon on the toolbar limits the output to approx 16k records, a limitation that goes back (as best as I can remember) to Excel 5. Use file export and select Excel 2000 to export up to the max of 63k records. HTH Jim Hale -----Original Message----- From: Stoker, Kenneth E [mailto:Kenneth.Stoker at pnl.gov] Sent: Thursday, January 15, 2004 11:29 AM To: AccessD at databaseadvisors.com Subject: [AccessD] I have a coworker who is getting the following error message when trying to output 17K+ records from a query to Excel. There are too many rows to output, based on the limitation specified by the output format or by Microsoft Access. Is there a setting that can be changed to increase the amount output? Is she hitting a limitation? Can anyone help here. Thanks. Ken Stoker Technology Commercialization Information Systems Administrator PH: (509) 375-3758 FAX: (509) 375-6731 E-mail: Kenneth.Stoker at pnl.gov _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From Kenneth.Stoker at pnl.gov Thu Jan 15 13:38:45 2004 From: Kenneth.Stoker at pnl.gov (Stoker, Kenneth E) Date: Thu, 15 Jan 2004 11:38:45 -0800 Subject: [AccessD] Problem Exporting Query Data to Excel. Message-ID: <249C1CB246997C48BB74963CCD361C1B07C946@pnlmse28.pnl.gov> Actually, no, she is not a programmer, just trying to create her own queries and then export them to Excel using Tools --> Office Links --> Analyze in Microsoft Excel. Using this option worked at 16K records (showed her how to use the TOP keyword for this), but failed on 17K+ records. That wasn't acceptable, so we tried to just copy the results from the query into the clipboard and then paste the clipboard contents into the Excel spreadsheet. Surprise, we got almost 31K records into the spreadsheet with this approach, which is what her query returned when all the criteria was removed. She said that she will try to remember if it is over 16K records, to follow the last option above. Ken Stoker Technology Commercialization Information Systems Administrator PH: (509) 375-3758 FAX: (509) 375-6731 E-mail: Kenneth.Stoker at pnl.gov -----Original Message----- From: Heenan, Lambert [mailto:Lambert.Heenan at AIG.com] Sent: Thursday, January 15, 2004 9:50 AM To: 'Access Developers discussion and problem solving' Subject: RE: [AccessD] I assume that s/he is using TransferSpreadsheet to export to Excel as in... docmd.TransferSpreadsheet acExport ,etc. etc. The second parameter (the one after acExport) defaults to acSpreadsheetTypeExcel3 which cannot handle the 17k rows. If you choose acSpreadsheetTypeExcel97 or higher for this parameter it should work fine. Lambert > -----Original Message----- > From: Stoker, Kenneth E [SMTP:Kenneth.Stoker at pnl.gov] > Sent: Thursday, January 15, 2004 12:29 PM > To: AccessD at databaseadvisors.com > Subject: [AccessD] > > I have a coworker who is getting the following error message when > trying to output 17K+ records from a query to Excel. > > There are too many rows to output, based on the limitation specified > by the output format or by Microsoft Access. > > Is there a setting that can be changed to increase the amount output? > Is she hitting a limitation? Can anyone help here. > > Thanks. > > Ken Stoker > Technology Commercialization > Information Systems Administrator > PH: (509) 375-3758 > FAX: (509) 375-6731 > E-mail: Kenneth.Stoker at pnl.gov > > _______________________________________________ > 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 From Oleg_123 at xuppa.com Thu Jan 15 13:44:57 2004 From: Oleg_123 at xuppa.com (Oleg_123 at xuppa.com) Date: Thu, 15 Jan 2004 14:44:57 -0500 (EST) Subject: [AccessD] Saving as *.rpt In-Reply-To: <000f01c3dad5$11586200$87c9040a@direcway.com> References: <000f01c3dad5$11586200$87c9040a@direcway.com> Message-ID: <59767.12.3.132.98.1074195897.squirrel@heck.bay9.com> Good afternoon group, How do I save a file as *.rpt ? should I reference CR somehow ? I am in 97 (can reference CR export, and viewr control) I have no problem saving as *.xls using the same code Oleg Function file_rename() Dim objE As excel.Application Dim sDate As String Dim sEmail As String Dim sTMail As String Set fs = New FileSystemObject If WeekDay(Now()) = vbMonday Then sDate = Format(Now() - 2, "mmddyyyy") Else sDate = Format(Now(), "mmddyyyy") End If Set objE = CreateObject("Excel.Application") With objE .Visible = False .Application.Workbooks.Open empfileloc & org_filename .Application.ActiveWorkbook.SaveAs filename:=empfileloc & new_filename & sDate & ".rpt", _ ReadOnlyRecommended:=False, AccessMode:=xlNoChange .Application.ActiveWorkbook.Close End With objE.Quit End Function ----------------------------------------- Get Breaking News from CNN, ABC, NBC, CBS Now. http://www.xuppa.com/news/?link=webmail From Mike.W.Gowey at doc.state.or.us Thu Jan 15 13:53:24 2004 From: Mike.W.Gowey at doc.state.or.us (Gowey Mike W) Date: Thu, 15 Jan 2004 12:53:24 -0700 Subject: [AccessD] Access Support in 2006 Message-ID: <05EBB8A3BEB95B4F8216BE4EF486077801D9FF01@srciml1.ds.doc.state.or.us> Just a fast question to everyone. I have been told that there is a rumor that Microsoft is not going to support Access anymore come 2006. Has anyone else heard anything else about this and if true what they plan on replacing it with????? I hope this don't cause too much of a string, I was just surprised and caught off guard. Thanks, Mike Gowey, MCSA, A+ Team Leader - SRCI Information Systems & Services Division From mwp.reid at qub.ac.uk Thu Jan 15 14:01:12 2004 From: mwp.reid at qub.ac.uk (Martin Reid) Date: Thu, 15 Jan 2004 20:01:12 -0000 Subject: [AccessD] Access Support in 2006 References: <05EBB8A3BEB95B4F8216BE4EF486077801D9FF01@srciml1.ds.doc.state.or.us> Message-ID: <000b01c3dba2$552d1a70$740c6351@martin1> Far as I know they are currently working on Version 12 Martin ----- Original Message ----- From: "Gowey Mike W" To: "Access Developers discussion and problem solving" Sent: Thursday, January 15, 2004 7:53 PM Subject: [AccessD] Access Support in 2006 > > > Just a fast question to everyone. I have been told that there is a > rumor that Microsoft is not going to support Access anymore come 2006. > > Has anyone else heard anything else about this and if true what they > plan on replacing it with????? > > I hope this don't cause too much of a string, I was just surprised and > caught off guard. > > > Thanks, > > Mike Gowey, MCSA, A+ > Team Leader - SRCI > Information Systems & Services Division > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com > From Erwin.Craps at ithelps.be Thu Jan 15 14:03:14 2004 From: Erwin.Craps at ithelps.be (Erwin Craps - IT Helps) Date: Thu, 15 Jan 2004 21:03:14 +0100 Subject: [AccessD] Access Support in 2006 Message-ID: <46B976F2B698FF46A4FE7636509B22DF03D11D@stekelbes.ithelps.local> Not at my knownledge... But I'm pretty sure (based on personal experiance and signs) they gonna drop the JET Engine one of these years. 2006 would be a logical time... They have been and stil are pushing SQL server and MDSE so much this is very clear to me. But Access will always be there, maybe in another format.... Erwin -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Gowey Mike W Sent: Thursday, January 15, 2004 8:53 PM To: Access Developers discussion and problem solving Subject: [AccessD] Access Support in 2006 Just a fast question to everyone. I have been told that there is a rumor that Microsoft is not going to support Access anymore come 2006. Has anyone else heard anything else about this and if true what they plan on replacing it with????? I hope this don't cause too much of a string, I was just surprised and caught off guard. Thanks, Mike Gowey, MCSA, A+ Team Leader - SRCI Information Systems & Services Division _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From michael.mattys at adelphia.net Thu Jan 15 14:03:48 2004 From: michael.mattys at adelphia.net (Michael R Mattys) Date: Thu, 15 Jan 2004 15:03:48 -0500 Subject: [AccessD] Access Support in 2006 References: <05EBB8A3BEB95B4F8216BE4EF486077801D9FF01@srciml1.ds.doc.state.or.us> Message-ID: <02c401c3dba2$b135e4f0$6401a8c0@default> I've never asked Microsoft for support anyway :) Michael R. Mattys Try MattysMapLib for MapPoint at www.mattysconsulting.com ----- Original Message ----- From: "Gowey Mike W" To: "Access Developers discussion and problem solving" Sent: Thursday, January 15, 2004 2:53 PM Subject: [AccessD] Access Support in 2006 > > > Just a fast question to everyone. I have been told that there is a > rumor that Microsoft is not going to support Access anymore come 2006. > > Has anyone else heard anything else about this and if true what they > plan on replacing it with????? > > I hope this don't cause too much of a string, I was just surprised and > caught off guard. > > > Thanks, > > Mike Gowey, MCSA, A+ > Team Leader - SRCI > Information Systems & Services Division > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com From Oleg_123 at xuppa.com Thu Jan 15 14:08:30 2004 From: Oleg_123 at xuppa.com (Oleg_123 at xuppa.com) Date: Thu, 15 Jan 2004 15:08:30 -0500 (EST) Subject: [AccessD] Access Support in 2006 In-Reply-To: <02c401c3dba2$b135e4f0$6401a8c0@default> References: <05EBB8A3BEB95B4F8216BE4EF486077801D9FF01@srciml1.ds.doc.state.or.us> <02c401c3dba2$b135e4f0$6401a8c0@default> Message-ID: <10011.12.3.132.98.1074197310.squirrel@heck.bay9.com> lol, same here > I've never asked Microsoft for support anyway :) > > Michael R. Mattys > Try MattysMapLib for MapPoint at > www.mattysconsulting.com > > > > ----- Original Message ----- > From: "Gowey Mike W" > To: "Access Developers discussion and problem solving" > > Sent: Thursday, January 15, 2004 2:53 PM > Subject: [AccessD] Access Support in 2006 > > >> >> >> Just a fast question to everyone. I have been told that there is a >> rumor that Microsoft is not going to support Access anymore come 2006. >> >> Has anyone else heard anything else about this and if true what they >> plan on replacing it with????? >> >> I hope this don't cause too much of a string, I was just surprised and >> caught off guard. >> >> >> Thanks, >> >> Mike Gowey, MCSA, A+ >> Team Leader - SRCI >> Information Systems & Services Division >> _______________________________________________ >> 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 ----------------------------------------- Get Breaking News from CNN, ABC, NBC, CBS Now. http://www.xuppa.com/news/?link=webmail From cfoust at infostatsystems.com Thu Jan 15 14:10:41 2004 From: cfoust at infostatsystems.com (Charlotte Foust) Date: Thu, 15 Jan 2004 12:10:41 -0800 Subject: [AccessD] Access shuts down Message-ID: I've seen in in both 2000 and XP. I've always been able to track it down to either corruption or some code that Access objected to. Charlotte Foust -----Original Message----- From: John W. Colby [mailto:jwcolby at colbyconsulting.com] Sent: Thursday, January 15, 2004 11:00 AM To: AccessD Subject: [AccessD] Access shuts down Folks, A client is having an Access app just shut down, no GPF, no "by your leave", just gone. I am wondering if it is because I am doing work on it here at my house where I have Office 2K and Office XP both on the same machine. I installed the "widget" (update) that MS designed to supposedly allow the two to co-exist but I still have my doubts. Has anyone seen this? John W. Colby www.ColbyConsulting.com _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From cfoust at infostatsystems.com Thu Jan 15 14:13:09 2004 From: cfoust at infostatsystems.com (Charlotte Foust) Date: Thu, 15 Jan 2004 12:13:09 -0800 Subject: [AccessD] Access Support in 2006 Message-ID: LOL. At least not without your credit card at hand! Charlotte Foust -----Original Message----- From: Michael R Mattys [mailto:michael.mattys at adelphia.net] Sent: Thursday, January 15, 2004 12:04 PM To: Access Developers discussion and problem solving Subject: Re: [AccessD] Access Support in 2006 I've never asked Microsoft for support anyway :) Michael R. Mattys Try MattysMapLib for MapPoint at www.mattysconsulting.com ----- Original Message ----- From: "Gowey Mike W" To: "Access Developers discussion and problem solving" Sent: Thursday, January 15, 2004 2:53 PM Subject: [AccessD] Access Support in 2006 > > > Just a fast question to everyone. I have been told that there is a > rumor that Microsoft is not going to support Access anymore come 2006. > > Has anyone else heard anything else about this and if true what they > plan on replacing it with????? > > I hope this don't cause too much of a string, I was just surprised and > caught off guard. > > > Thanks, > > Mike Gowey, MCSA, A+ > Team Leader - SRCI > Information Systems & Services Division > _______________________________________________ > 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 From Oleg_123 at xuppa.com Thu Jan 15 14:15:10 2004 From: Oleg_123 at xuppa.com (Oleg_123 at xuppa.com) Date: Thu, 15 Jan 2004 15:15:10 -0500 (EST) Subject: [AccessD] (OT) saving as *cvs with " " In-Reply-To: <46B976F2B698FF46A4FE7636509B22DF03D11D@stekelbes.ithelps.local> References: <46B976F2B698FF46A4FE7636509B22DF03D11D@stekelbes.ithelps.local> Message-ID: <59925.12.3.132.98.1074197710.squirrel@heck.bay9.com> Hey Group i have to save this data (right now I have it in a spreadsheet) 01003, 011-11-1123, Doe, Jane, A as .txt file so it would like 01003, 011-11-1123, "Doe", "Jane", A and they specifically want quotes around first and last name, and ONLY there. when I create *.csv file from Excel I got no quotations (I tried specifically making those 2 fields as "text" and the others as "general" and even "numbers", but no result) When I do it through though Acess I get all in quotations, and over there I can't play with data types. I tried adding colums with " at the beginning and end of mane fields, but ehen I converted that to *.csv I got tripe quotes on names, and no quotes elsewhere... Any suggestions ? ----------------------------------------- Get Breaking News from CNN, ABC, NBC, CBS Now. http://www.xuppa.com/news/?link=webmail From John.Clark at niagaracounty.com Thu Jan 15 14:18:37 2004 From: John.Clark at niagaracounty.com (John Clark) Date: Thu, 15 Jan 2004 15:18:37 -0500 Subject: [AccessD] MDW file Message-ID: When I comes to my users, I will not claim that anything is 'impossible.' However, I did call out to the department where it is installed and walked a user through the process of getting to the properties window and had her tell me exactly what it said. I even questioned that there was the single quote mark. This was actually one of my better users too. I should have gone to their office, but it is across town...not really that far, but it is bitter cold her today and there is quite a bit of snow too (I know...wahhhhhh!) I just recreated the shortcut and it finally presented me with a login window. I called to get a login name and apparently the programmer left no way for them to add users...or delete users...real secure when you cannot remove a user from the system after they are fired...duh! Anyhow, the whole reason I am doing this is because I need to add a bunch of new users, and delete another bunch. I work for a county government and the republicans just took over power from the democrats, and this means all patronage positions are taken away from the departing party and given to the new ones (who cares if their good at their jobs or not, as long as they're part of the majority party). This means all new attorneys in the county attorney's office, and now I don't seem to be able to add them. Ideas?! Thanks for the help so far though! John W Clark >>> donald.a.Mcgillivray at mail.sprint.com 01/15/04 01:15PM >>> John, Is it possible that you're seeing only part (the last part) of the command line in the shortcut? The syntax for passing the workgroup on the command line is: Path to msaccess.exe, followed by path and filename of target mdb, followed by the workgroup switch (/wrkgrp), followed by the path and filename of target mdw. For example: "c:\program files\msoffice\office\msaccess.exe" "c:\MyDatabases\target.mdb" /wrkgrp "c:\MyDatabases\target.mdw" Note that quotes around the segments are only critical if there are spaces in the strings (doesn't hurt to include them, though), and that the positions of the path to the mdb and the workgroup segment are interchangeable. Thus, if the other programmer had put the workgroup segment before the mdb segment, you might be seeing just the tail end of the one followed by the entirety of the other. Hope this helps. Don McGillivray -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of John Clark Sent: Thursday, January 15, 2004 9:47 AM To: accessd at databaseadvisors.com Subject: [AccessD] MDW file This group has helped me so much over the past two years. My confidence has increased 1000%, which I attribute directly to my involvement with this list. Just yesterday, my boss made some crack about an external programmer that they have used...basically saying that if I get as good as him I could do what he does (he is currently taking a year off and traveling the country in an RV)...and for the first time, I stood up and said, "I am just as good, if not better, than [that guy]." Anyhow, now that I have explained how 'good' I have become, I was thrown a twist. Because this guy is out of town, he cannot respond to a call that they have regarding a program he wrote. It needs to be placed on the desktops, of another department. "No problem," I said, "I can handle it." But I notice in the shortcut that exists, in the original department, it uses an .MDW file in the target line (ms.mdw" "c:\program files\cms\cmssecure.mdb"). I just called to verify this line, because I thought that at least a "c was missing from the front...I don't get the one quote mark. I have never used workgroup features of Access, and I really don't plan to. What do I need to do to set this up? Thanks! John W Clark John W. Clark Computer Programmer / Asst. Network Administrator Niagara County Central Data Processing _______________________________________________ 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 From askolits at ot.com Thu Jan 15 14:25:32 2004 From: askolits at ot.com (John Skolits) Date: Thu, 15 Jan 2004 15:25:32 -0500 Subject: [AccessD] Access Support in 2006 In-Reply-To: <02c401c3dba2$b135e4f0$6401a8c0@default> Message-ID: Just found this on the net. It's dated 1998. It's interesting how many people were thinking Access was dead so many years ago. Yet, you never know with MS. http://www.fmsinc.com/fmsnews/Editorial/FutureOfAccess.htm John From ssharkins at bellsouth.net Thu Jan 15 14:49:36 2004 From: ssharkins at bellsouth.net (Susan Harkins) Date: Thu, 15 Jan 2004 15:49:36 -0500 Subject: [AccessD] Access Support in 2006 References: <05EBB8A3BEB95B4F8216BE4EF486077801D9FF01@srciml1.ds.doc.state.or.us> <000b01c3dba2$552d1a70$740c6351@martin1> Message-ID: <002101c3dba9$58a4fef0$210110ac@SUSANONE> And MS has just backed down on its earlier decision NOT to support Win 98 after this month (I think that was the timeframe). They've backtracked and now say they'll continue to support Win 98 for a while -- so, I wouldn't put too much stock in claims from anyone outside MS. At best, all they can do is speculate. Anyone outside MS that has their ear and knows inside information is NOT going to write an article and tell you about it -- they would lose their status pronto. Susan H. > Far as I know they are currently working on Version 12 > > Martin > > > ----- Original Message ----- > From: "Gowey Mike W" > To: "Access Developers discussion and problem solving" > > Sent: Thursday, January 15, 2004 7:53 PM > Subject: [AccessD] Access Support in 2006 > > > > > > > > Just a fast question to everyone. I have been told that there is a > > rumor that Microsoft is not going to support Access anymore come 2006. > > > > Has anyone else heard anything else about this and if true what they > > plan on replacing it with????? > > > > I hope this don't cause too much of a string, I was just surprised and > > caught off guard. > > > > > > Thanks, > > > > Mike Gowey, MCSA, A+ > > Team Leader - SRCI > > Information Systems & Services Division > > _______________________________________________ > > 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 > From Jim.Hale at FleetPride.com Thu Jan 15 14:48:20 2004 From: Jim.Hale at FleetPride.com (Hale, Jim) Date: Thu, 15 Jan 2004 14:48:20 -0600 Subject: [AccessD] Implements vs WithEvents Message-ID: <6A6AA9DF57E4F046BDA1E273BDDB677201A9FD@corp-es01.fleetpride.com> Very nice explanation, thanks. Jim Hale -----Original Message----- From: John W. Colby [mailto:jwcolby at colbyconsulting.com] Sent: Tuesday, January 13, 2004 9:03 PM To: Access Developers discussion and problem solving Subject: RE: [AccessD] Implements vs WithEvents Robert, Risking sounding ignorant, I don't know what the VBA DHB is so I can't help you there. However AFAIK you can't use Implements for something like a control or form. These objects have code inside them that cause things to happen, properties to modify their behavior etc. ALL THAT STUFF can actually be inherited in VB.NET. That is, you can actually start with a combo box, subclass that combo box, GET ALL OF IT'S FUNCTIONALITY, all of it's code, all of its properties and methods, plus add your own!!! Or even override things to change the way the combo box functions. THAT is true inheritance. Not so in Access / VBA. An object like a combo box is a self contained unit that you simply cannot get inside of or modify in any meaningful way. It appears to us Access programmers almost like an ocx, i.e. a black box that does things. IMPORTANT... one of the things these objects do is raise Events! IOW, they tell you when a user clicks the mouse, double clicks the mouse etc. "inside" their boundaries on the screen. Knowing this, every Access programmer ALREADY USES WITHEVENTS. How? By creating an event stub in a form's class, and inserting code in that event stub to do something that the programmer wants to do when that event happens. The confusing thing is that a form's class DOES NOT REQUIRE a withevents dimension statement for any controls contained in the form (or for itself - the form - for that matter). However there is an IMPLICIT dim statement in the class, invisible, but there none the less. So every Access programmer already knows all about handling events for combos, command buttons etc. They (most of us anyway) use the built-in wizards in the form's builder interface to insert event handler stubs into the form's class and insert code there. THAT IS WITHEVENT PROGRAMMING, with all the details taken care of for you. Well guess what, ANY CLASS can have those same event handlers in them!!! The only differenc is that if the class is not a form class, there must be an EXPLICIT dim Withevents statement for any control (any object actually) that you wish to sink events for. 'inside my own combo class header... 'Dim a combo withevents Private WithEvents mcbo As ComboBox Having the dim statement does nothing more than tell my combo class that a control of a specific type MAY be transferring control of one or more of it's events to the class directly. It does NOT say WHICH control. To do that you have to pass in a control to the class and inside the class, SET the dimmed control = the passed in control. 'inside my own combo class... 'Pass in a control and SET the internal control variable function Init(lcbo as ComboBox) set mcbo = lcbo end init THAT tells the class which combo to sink events for (the one being passed in of course). Once you do that, the class can sink ANY of the control's events. But you still haven't told the class WHICH events to sink. IOW, Even having done this, nothing will happen in your class unless you create an event stub for the control event you wish to process inside the class. 'inside my own combo class... 'create an event stub to which control will be passed when a specific event fires. Private Sub mcbo_AfterUpdate() 'Do Something really cool Msgbox "Something really cool" End Sub THAT tells the combo class WHICH event(s) to sink. Now you must of course instantiate your own combo class in your form and pass in a specific control to it. 'inside my FORM'S class header... 'dimension my own combo class dim fclsMyCombo as clsMyCombo 'inside my FORM'S class Private Sub Form_Open(Cancel As Integer) 'CREATE AN INSTANCE OF MY COOL COMBO CLASS Set fclsMyCombo = new clsMyCombo 'PASS A REFERENCE TO A SPECIFIC COMBO ON MY FORM fclsMyCombo.Init cboStates 'a combo displaying all the states in the union End Sub THAT tells Access to dimension a class, create a class instance and WHICH combo to pass off to the class instance. NOW, with ALL THESE THINGS IN PLACE, if that combo AfterUpdate fires, control will EVENTUALLY get to your class and your message box will display it's message. Notice that your form doesn't need any event stub in it for the control. Even though the ONLY sub in your form's class is the Form_Open, the event stub in your class will sink the event and the message box will display its message. I know full well that all this sounds like a LOT of work just to get control into a class but after you've done it a few times it will be 2nd nature. And of course you can then have a combo class that (see my other post) handles the double click, opens a form, allows your user to edit the data, and when the form closes, requeries the combo, all neatly encapsulated in a class. Plus all the other neato keenarino stuff you can imagine your combo doing. Hang in there. It took me three tries, each six months apart to finally "get" Shamil's stuff and understand Withevents. Looking back I can't understand why, but life is like that sometimes. And no, the demos for the book are copyrighted by Wrox and I can't legally distribute them, however there are many demos (by me of course) on DatabaseAdvisors' web site. I also have a bunch on my own site. This stuff is important, keep trying. John W. Colby www.ColbyConsulting.com -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Robert Gracie Sent: Tuesday, January 13, 2004 8:47 PM To: Access Developers discussion and problem solving Subject: RE: [AccessD] Implements vs WithEvents "Hmmmmmmm, As confusion sets in, he takes and stabs himself in the chest with his keyboard...:-)" I'm trying to understand why the VBA DHB is teaching that using INTERFACE inheritance classes (by way of the Implements Keyword and such) is much better then simply using Event, RaiseEvent, and WithEvents... The problem, for me at least, is getting my mind around the larger concept, and knowing which structure to use and why. With my very limited understanding, the way they have presented, it seems reasonable to go this route if only to help keep control over code execution... I guess I just need to keep pounding away at these concepts....... Robert Gracie www.servicexp.com -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of John W. Colby Sent: Tuesday, January 13, 2004 7:54 PM To: Access Developers discussion and problem solving Subject: [AccessD] Implements vs WithEvents Charlotte, >They have somewhat different purposes. No, they have completely different purposes. >Implements allows you to subclass an existing object/class and give it additional or different functionality, so you can have a class Dog and a subclass Spaniel that has a property Retriever. Well... true but not exactly. My issue with that statement is the term subclass as you use it. Yes you are subclassing the original but ONLY the interface. IMHO that is almost useless Implements is an interface ONLY inheritance, i.e. it allows (forces) you to start with the same public data and method DEFINITION but does not actually inherit the behaviors (methods) themselves. I.e. the code that runs in the class that is being subclassed is NOT inherited into the subclass. Access' inheritance (interface) is not very useful except as a template kind of thing. I find it useless enough that I personally don't bother. On the other hand Shamil is a proponent so it must have its uses. When you move to VB.NET (or any of the other .net languages I believe) TRUE inheritance is available. I.e. if you have a method with a thousand lines of code, when you subclass that object the new object inherits that code as well as the data. In our Implements subclassing, you would have to cut and paste that thousand lines of code into the subclass. Can you say maintenance nightmare? >You can intercept and respond to specific events when they happen in the object. Did the Bark event trigger? WithEvents lets you find out and respond from another class/object. Exactly correct. One of the MAJOR shortcomings of Access / VBA (in fact VB prior to VB.Net) is that Inheritance is virtually non-existent, and even worse, objects other than forms don't have a built in class that you can get at to add functionality directly to. What WithEvents really does is allow you to build class wrappers for objects so that you can encapsulate behaviors (functionality) in your class. In essence you still have two objects, the control (or even another class or OCX) and your class, but now you can put all of the common functionality in your class along with the event stubs of the control/class/ocx that generates the event. This does not get you any further down the road towards inheritance, sadly it simply doesn't appear to be possible in Access / VBA. But it does provide a huge step up in encapsulation. John W. Colby www.ColbyConsulting.com -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Charlotte Foust Sent: Tuesday, January 13, 2004 4:56 PM To: Access Developers discussion and problem solving Subject: RE: [AccessD] =function() in .onclick They have somewhat different purposes. Implements allows you to subclass an existing object/class and give it additional or different functionality, so you can have a class Dog and a subclass Spaniel that has a property Retriever. WithEvents allows you to monitor the events of an object/class. You can intercept and respond to specific events when they happen in the object. Did the Bark event trigger? WithEvents lets you find out and respond from another class/object. Charlotte Foust -----Original Message----- From: Robert Gracie [mailto:Subscriptions at servicexp.com] Sent: Tuesday, January 13, 2004 1:45 PM To: Access Developers discussion and problem solving Subject: RE: [AccessD] =function() in .onclick Hello All, Since I'm just learning this type of programming technique I thought I would ask a question... Why not use Implements instead of WithEvents? My limited understand of WithEvents is that they will not return functionality unit they (the event) has completed processing... Since I'm just at the "door" so to speak with learning how to use and incorporate these new (to me) programming techniques into my work, I really want to start out using the "best" technique... Robert Gracie www.servicexp.com _______________________________________________ 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 _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From John.Clark at niagaracounty.com Thu Jan 15 15:01:06 2004 From: John.Clark at niagaracounty.com (John Clark) Date: Thu, 15 Jan 2004 16:01:06 -0500 Subject: [AccessD] MDW file...break in? Message-ID: OK, This programmer seems to have never told anyone the Admin password, and now he is somewhere cross-country in an RV. How the bejeepers can I get into the damn thing?! I got in using one of the users accounts, and I explored the security area...I somewhat remember brushing over this about 2-3 years ago...but I cannot do anything with her account..and nobody else seems to have rights either. What if this shmuck dies on this trip? We are never able to add or remove or modify users ever again? I should be loving this. Serves 'em right for going behind my back and having this guy do my job! But at the moment it is just a PITA!!! Ya know when the "I'm thinking of going on my own" type threads come around? Well, I'll tell ya...If this guy is making a living at it, anybody can. His programs are ugly and he even misspells commands...first thing I noticed was a button for Attorneys spelled, "attornies." I'm leaving...it is snowing like hades again and I'm getting home before I end up sleeping here. See ya! Thanks again! John W Clark From rl_stewart at highstream.net Thu Jan 15 15:15:52 2004 From: rl_stewart at highstream.net (Robert L. Stewart) Date: Thu, 15 Jan 2004 15:15:52 -0600 Subject: [AccessD] Re: MDW file In-Reply-To: <200401151800.i0FI0Em31739@databaseadvisors.com> Message-ID: <5.1.0.14.2.20040115151234.042a0af8@pop3.highstream.net> John, Get WinRAR. It is like WinZip, but has a couple of features that you need. It will create a SPX file that is an executable that will do directory things, like create them, and then uncompress the files into a specific directory. Go to a working client machine. Do the WinRAR process on the client files to create the SPX file. Then place it on the network. Now, by opening that file, everyone can install the program locally. Robert At 12:00 PM 1/15/2004 -0600, you wrote: >From: "John Clark" >Subject: [AccessD] MDW file >To: >Message-ID: >Content-Type: text/plain; charset=US-ASCII > >This group has helped me so much over the past two years. My confidence >has increased 1000%, which I attribute directly to my involvement with >this list. Just yesterday, my boss made some crack about an external >programmer that they have used...basically saying that if I get as good >as him I could do what he does (he is currently taking a year off and >traveling the country in an RV)...and for the first time, I stood up and >said, "I am just as good, if not better, than [that guy]." > >Anyhow, now that I have explained how 'good' I have become, I was >thrown a twist. Because this guy is out of town, he cannot respond to a >call that they have regarding a program he wrote. It needs to be placed >on the desktops, of another department. "No problem," I said, "I can >handle it." But I notice in the shortcut that exists, in the original >department, it uses an .MDW file in the target line (ms.mdw" "c:\program >files\cms\cmssecure.mdb"). I just called to verify this line, because I >thought that at least a "c was missing from the front...I don't get the >one quote mark. > >I have never used workgroup features of Access, and I really don't plan >to. What do I need to do to set this up? > >Thanks! From michael.mattys at adelphia.net Thu Jan 15 15:17:27 2004 From: michael.mattys at adelphia.net (Michael R Mattys) Date: Thu, 15 Jan 2004 16:17:27 -0500 Subject: [AccessD] (OT) saving as *cvs with " " References: <46B976F2B698FF46A4FE7636509B22DF03D11D@stekelbes.ithelps.local> <59925.12.3.132.98.1074197710.squirrel@heck.bay9.com> Message-ID: <032c01c3dbac$fc886180$6401a8c0@default> See http://support.microsoft.com/?kbid=213448 Michael R. Mattys Try MattysMapLib for MapPoint at www.mattysconsulting.com ----- Original Message ----- From: To: Sent: Thursday, January 15, 2004 3:15 PM Subject: [AccessD] (OT) saving as *cvs with " " > Hey Group > i have to save this data (right now I have it in a spreadsheet) > 01003, 011-11-1123, Doe, Jane, A > > as .txt file so it would like > > 01003, 011-11-1123, "Doe", "Jane", A > > > and they specifically want quotes around first and last name, and ONLY > there. when I create *.csv file from Excel I got no quotations (I tried > specifically making those 2 fields as "text" and the others as "general" > and even "numbers", but no result) When I do it through though Acess I get > all in quotations, and over there I can't play with data types. I tried > adding colums with " at the beginning and end of mane fields, but ehen I > converted that to *.csv I got tripe quotes on names, and no quotes > elsewhere... > Any suggestions ? > > > > > ----------------------------------------- > Get Breaking News from CNN, ABC, NBC, CBS Now. > http://www.xuppa.com/news/?link=webmail > > > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com > From cfoust at infostatsystems.com Thu Jan 15 15:19:22 2004 From: cfoust at infostatsystems.com (Charlotte Foust) Date: Thu, 15 Jan 2004 13:19:22 -0800 Subject: [AccessD] MDW file...break in? Message-ID: Can't help with the breakin, but I commiserate with you on cleaning up after the errant programmer. I've seen far too many projects "developed" by someone who bought a book, built a single database, and decided they were a developer. Yikes!! Charlotte Foust -----Original Message----- From: John Clark [mailto:John.Clark at niagaracounty.com] Sent: Thursday, January 15, 2004 1:01 PM To: accessd at databaseadvisors.com Subject: [AccessD] MDW file...break in? OK, This programmer seems to have never told anyone the Admin password, and now he is somewhere cross-country in an RV. How the bejeepers can I get into the damn thing?! I got in using one of the users accounts, and I explored the security area...I somewhat remember brushing over this about 2-3 years ago...but I cannot do anything with her account..and nobody else seems to have rights either. What if this shmuck dies on this trip? We are never able to add or remove or modify users ever again? I should be loving this. Serves 'em right for going behind my back and having this guy do my job! But at the moment it is just a PITA!!! Ya know when the "I'm thinking of going on my own" type threads come around? Well, I'll tell ya...If this guy is making a living at it, anybody can. His programs are ugly and he even misspells commands...first thing I noticed was a button for Attorneys spelled, "attornies." I'm leaving...it is snowing like hades again and I'm getting home before I end up sleeping here. See ya! Thanks again! John W Clark _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From tim at irwingreenhouses.com Thu Jan 15 15:29:45 2004 From: tim at irwingreenhouses.com (Tim Thiessen) Date: Thu, 15 Jan 2004 15:29:45 -0600 Subject: [AccessD] Grouping Query Message-ID: <007901c3dbae$b2e74800$7800a8c0@timt> Hi Group, I have a query that returns the following: PaymentTerms DatePaid CountOfPaid COD 1 5 COD 2 3 COD 4 8 COD 14 4 COD 16 12 Net 10-EOM 1 3 Net 10-EOM 3 10 Net 10-EOM 5 15 Net 10-EOM 10 21 DatePaid is the day of the month in which payments are made. CountOfPaid is a count of the number of payments made on particular date. What I need to do is to be able to group this data into the following: PaymentTerms Paid1-6 Paid7-13 Paid14-20 Paid21-27 Paid28-31 COD 16 16 0 0 0 Net10-EOM 28 21 0 0 0 I know this is a cross tab query but how do I get the grouping in the first place? Tim Thiessen From conny at qad.se Thu Jan 15 15:33:58 2004 From: conny at qad.se (Conny Johansson) Date: Thu, 15 Jan 2004 22:33:58 +0100 Subject: [AccessD] MDW file...break in? In-Reply-To: Message-ID: <20040115213458.2E1DF2B0F0@boxmail1.box.se> I'm not to fond of using password-cracks but you might find a solution here. Conny Johansson -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Charlotte Foust Sent: den 15 januari 2004 22:19 To: Access Developers discussion and problem solving Subject: RE: [AccessD] MDW file...break in? Can't help with the breakin, but I commiserate with you on cleaning up after the errant programmer. I've seen far too many projects "developed" by someone who bought a book, built a single database, and decided they were a developer. Yikes!! Charlotte Foust -----Original Message----- From: John Clark [mailto:John.Clark at niagaracounty.com] Sent: Thursday, January 15, 2004 1:01 PM To: accessd at databaseadvisors.com Subject: [AccessD] MDW file...break in? OK, This programmer seems to have never told anyone the Admin password, and now he is somewhere cross-country in an RV. How the bejeepers can I get into the damn thing?! I got in using one of the users accounts, and I explored the security area...I somewhat remember brushing over this about 2-3 years ago...but I cannot do anything with her account..and nobody else seems to have rights either. What if this shmuck dies on this trip? We are never able to add or remove or modify users ever again? I should be loving this. Serves 'em right for going behind my back and having this guy do my job! But at the moment it is just a PITA!!! Ya know when the "I'm thinking of going on my own" type threads come around? Well, I'll tell ya...If this guy is making a living at it, anybody can. His programs are ugly and he even misspells commands...first thing I noticed was a button for Attorneys spelled, "attornies." I'm leaving...it is snowing like hades again and I'm getting home before I end up sleeping here. See ya! Thanks again! John W Clark _______________________________________________ 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 _____ avast! Antivirus : Outbound message clean. Virus Database (VPS): 2004-01-13 Tested on: 2004-01-15 22:33:58 avast! is copyright (c) 2000-2003 ALWIL Software. From Oleg_123 at xuppa.com Thu Jan 15 15:45:14 2004 From: Oleg_123 at xuppa.com (Oleg_123 at xuppa.com) Date: Thu, 15 Jan 2004 16:45:14 -0500 (EST) Subject: [AccessD] (OT) saving as *cvs with ' ' In-Reply-To: <032c01c3dbac$fc886180$6401a8c0@default> References: <46B976F2B698FF46A4FE7636509B22DF03D11D@stekelbes.ithelps.local> <59925.12.3.132.98.1074197710.squirrel@heck.bay9.com> <032c01c3dbac$fc886180$6401a8c0@default> Message-ID: <10122.12.3.132.98.1074203114.squirrel@heck.bay9.com> I am afraid I don't understand, does this code with "without warranty either expressed or implied, including, but not limited to, the implied warranties of merchantability" lets you select wich column I want quotes around ? The way I see it ( i may be wrong but their explanation is VERY cryptic) it only allows to convert eveything to " > See http://support.microsoft.com/?kbid=213448 > > Michael R. Mattys > Try MattysMapLib for MapPoint at > www.mattysconsulting.com > > > > ----- Original Message ----- > From: > To: > Sent: Thursday, January 15, 2004 3:15 PM > Subject: [AccessD] (OT) saving as *cvs with " " > > >> Hey Group >> i have to save this data (right now I have it in a spreadsheet) >> 01003, 011-11-1123, Doe, Jane, A >> >> as .txt file so it would like >> >> 01003, 011-11-1123, "Doe", "Jane", A >> >> >> and they specifically want quotes around first and last name, and ONLY >> there. when I create *.csv file from Excel I got no quotations (I >> tried specifically making those 2 fields as "text" and the others as >> "general" and even "numbers", but no result) When I do it through >> though Acess I get all in quotations, and over there I can't play with >> data types. I tried adding colums with " at the beginning and end of >> mane fields, but ehen I converted that to *.csv I got tripe quotes on >> names, and no quotes elsewhere... >> Any suggestions ? >> >> >> >> >> ----------------------------------------- >> Get Breaking News from CNN, ABC, NBC, CBS Now. >> http://www.xuppa.com/news/?link=webmail >> >> >> _______________________________________________ >> 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 ----------------------------------------- Get Breaking News from CNN, ABC, NBC, CBS Now. http://www.xuppa.com/news/?link=webmail From jimdettman at earthlink.net Thu Jan 15 15:46:55 2004 From: jimdettman at earthlink.net (Jim Dettman) Date: Thu, 15 Jan 2004 16:46:55 -0500 Subject: [AccessD] MDW file...break in? In-Reply-To: Message-ID: John, A. See if he did his job right. Start Access directly (not via the shortcut) so you get the default work group. See if that works. B. Commercial services: www.officerecovery.com www.crak.com C. Do a google search. There are a few Russian sites with free cracking tools. I may even have some laying around. What version is this for? Jim Dettman President, Online Computer Services of WNY, Inc. (315) 699-3443 jimdettman at earthlink.net -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of John Clark Sent: Thursday, January 15, 2004 4:01 PM To: accessd at databaseadvisors.com Subject: [AccessD] MDW file...break in? OK, This programmer seems to have never told anyone the Admin password, and now he is somewhere cross-country in an RV. How the bejeepers can I get into the damn thing?! I got in using one of the users accounts, and I explored the security area...I somewhat remember brushing over this about 2-3 years ago...but I cannot do anything with her account..and nobody else seems to have rights either. What if this shmuck dies on this trip? We are never able to add or remove or modify users ever again? I should be loving this. Serves 'em right for going behind my back and having this guy do my job! But at the moment it is just a PITA!!! Ya know when the "I'm thinking of going on my own" type threads come around? Well, I'll tell ya...If this guy is making a living at it, anybody can. His programs are ugly and he even misspells commands...first thing I noticed was a button for Attorneys spelled, "attornies." I'm leaving...it is snowing like hades again and I'm getting home before I end up sleeping here. See ya! Thanks again! John W Clark _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From cfoust at infostatsystems.com Thu Jan 15 15:47:12 2004 From: cfoust at infostatsystems.com (Charlotte Foust) Date: Thu, 15 Jan 2004 13:47:12 -0800 Subject: [AccessD] Grouping Query Message-ID: Actually, it's a join beteen *four* crosstab queries. Charlotte Foust -----Original Message----- From: Tim Thiessen [mailto:tim at irwingreenhouses.com] Sent: Thursday, January 15, 2004 1:30 PM To: accessD at databaseadvisors.com Subject: [AccessD] Grouping Query Hi Group, I have a query that returns the following: PaymentTerms DatePaid CountOfPaid COD 1 5 COD 2 3 COD 4 8 COD 14 4 COD 16 12 Net 10-EOM 1 3 Net 10-EOM 3 10 Net 10-EOM 5 15 Net 10-EOM 10 21 DatePaid is the day of the month in which payments are made. CountOfPaid is a count of the number of payments made on particular date. What I need to do is to be able to group this data into the following: PaymentTerms Paid1-6 Paid7-13 Paid14-20 Paid21-27 Paid28-31 COD 16 16 0 0 0 Net10-EOM 28 21 0 0 0 I know this is a cross tab query but how do I get the grouping in the first place? Tim Thiessen _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From martyconnelly at shaw.ca Thu Jan 15 15:53:42 2004 From: martyconnelly at shaw.ca (MartyConnelly) Date: Thu, 15 Jan 2004 13:53:42 -0800 Subject: [AccessD] MDW file...break in? References: Message-ID: <40070BE6.3080208@shaw.ca> One of these err.. tools might help http://accesstools.narod.ru/index.html John Clark wrote: >OK, This programmer seems to have never told anyone the Admin password, >and now he is somewhere cross-country in an RV. How the bejeepers can I >get into the damn thing?! I got in using one of the users accounts, and >I explored the security area...I somewhat remember brushing over this >about 2-3 years ago...but I cannot do anything with her account..and >nobody else seems to have rights either. What if this shmuck dies on >this trip? We are never able to add or remove or modify users ever >again? > >I should be loving this. Serves 'em right for going behind my back and >having this guy do my job! But at the moment it is just a PITA!!! Ya >know when the "I'm thinking of going on my own" type threads come >around? Well, I'll tell ya...If this guy is making a living at it, >anybody can. His programs are ugly and he even misspells >commands...first thing I noticed was a button for Attorneys spelled, >"attornies." > >I'm leaving...it is snowing like hades again and I'm getting home >before I end up sleeping here. > >See ya! > >Thanks again! > >John W Clark >_______________________________________________ >AccessD mailing list >AccessD at databaseadvisors.com >http://databaseadvisors.com/mailman/listinfo/accessd >Website: http://www.databaseadvisors.com > > > -- Marty Connelly Victoria, B.C. Canada From jwcolby at colbyconsulting.com Thu Jan 15 16:02:50 2004 From: jwcolby at colbyconsulting.com (John W. Colby) Date: Thu, 15 Jan 2004 17:02:50 -0500 Subject: [AccessD] Access shuts down In-Reply-To: <46B976F2B698FF46A4FE7636509B22DF03D11B@stekelbes.ithelps.local> Message-ID: Not a runtime. A2K on Windows XP. John W. Colby www.ColbyConsulting.com -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Erwin Craps - IT Helps Sent: Thursday, January 15, 2004 2:31 PM To: Access Developers discussion and problem solving Subject: RE: [AccessD] Access shuts down It is posible with the Access Runtime maybe alsowith the MDE in full access (but I'm not sure about the MDE in full access). What concerns the Access runtime I'm sure that if you have an error in a function/module with no error trapping, the runtime just terminates the program without any message. Erwin -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of John W. Colby Sent: Thursday, January 15, 2004 8:00 PM To: AccessD Subject: [AccessD] Access shuts down Folks, A client is having an Access app just shut down, no GPF, no "by your leave", just gone. I am wondering if it is because I am doing work on it here at my house where I have Office 2K and Office XP both on the same machine. I installed the "widget" (update) that MS designed to supposedly allow the two to co-exist but I still have my doubts. Has anyone seen this? John W. Colby www.ColbyConsulting.com _______________________________________________ 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 From jwcolby at colbyconsulting.com Thu Jan 15 16:04:44 2004 From: jwcolby at colbyconsulting.com (John W. Colby) Date: Thu, 15 Jan 2004 17:04:44 -0500 Subject: [AccessD] Implements vs WithEvents In-Reply-To: <6A6AA9DF57E4F046BDA1E273BDDB677201A9FD@corp-es01.fleetpride.com> Message-ID: Glad you liked it, hope it helps someone. John W. Colby www.ColbyConsulting.com -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Hale, Jim Sent: Thursday, January 15, 2004 3:48 PM To: 'Access Developers discussion and problem solving' Subject: RE: [AccessD] Implements vs WithEvents Very nice explanation, thanks. Jim Hale -----Original Message----- From: John W. Colby [mailto:jwcolby at colbyconsulting.com] Sent: Tuesday, January 13, 2004 9:03 PM To: Access Developers discussion and problem solving Subject: RE: [AccessD] Implements vs WithEvents Robert, Risking sounding ignorant, I don't know what the VBA DHB is so I can't help you there. However AFAIK you can't use Implements for something like a control or form. These objects have code inside them that cause things to happen, properties to modify their behavior etc. ALL THAT STUFF can actually be inherited in VB.NET. That is, you can actually start with a combo box, subclass that combo box, GET ALL OF IT'S FUNCTIONALITY, all of it's code, all of its properties and methods, plus add your own!!! Or even override things to change the way the combo box functions. THAT is true inheritance. Not so in Access / VBA. An object like a combo box is a self contained unit that you simply cannot get inside of or modify in any meaningful way. It appears to us Access programmers almost like an ocx, i.e. a black box that does things. IMPORTANT... one of the things these objects do is raise Events! IOW, they tell you when a user clicks the mouse, double clicks the mouse etc. "inside" their boundaries on the screen. Knowing this, every Access programmer ALREADY USES WITHEVENTS. How? By creating an event stub in a form's class, and inserting code in that event stub to do something that the programmer wants to do when that event happens. The confusing thing is that a form's class DOES NOT REQUIRE a withevents dimension statement for any controls contained in the form (or for itself - the form - for that matter). However there is an IMPLICIT dim statement in the class, invisible, but there none the less. So every Access programmer already knows all about handling events for combos, command buttons etc. They (most of us anyway) use the built-in wizards in the form's builder interface to insert event handler stubs into the form's class and insert code there. THAT IS WITHEVENT PROGRAMMING, with all the details taken care of for you. Well guess what, ANY CLASS can have those same event handlers in them!!! The only differenc is that if the class is not a form class, there must be an EXPLICIT dim Withevents statement for any control (any object actually) that you wish to sink events for. 'inside my own combo class header... 'Dim a combo withevents Private WithEvents mcbo As ComboBox Having the dim statement does nothing more than tell my combo class that a control of a specific type MAY be transferring control of one or more of it's events to the class directly. It does NOT say WHICH control. To do that you have to pass in a control to the class and inside the class, SET the dimmed control = the passed in control. 'inside my own combo class... 'Pass in a control and SET the internal control variable function Init(lcbo as ComboBox) set mcbo = lcbo end init THAT tells the class which combo to sink events for (the one being passed in of course). Once you do that, the class can sink ANY of the control's events. But you still haven't told the class WHICH events to sink. IOW, Even having done this, nothing will happen in your class unless you create an event stub for the control event you wish to process inside the class. 'inside my own combo class... 'create an event stub to which control will be passed when a specific event fires. Private Sub mcbo_AfterUpdate() 'Do Something really cool Msgbox "Something really cool" End Sub THAT tells the combo class WHICH event(s) to sink. Now you must of course instantiate your own combo class in your form and pass in a specific control to it. 'inside my FORM'S class header... 'dimension my own combo class dim fclsMyCombo as clsMyCombo 'inside my FORM'S class Private Sub Form_Open(Cancel As Integer) 'CREATE AN INSTANCE OF MY COOL COMBO CLASS Set fclsMyCombo = new clsMyCombo 'PASS A REFERENCE TO A SPECIFIC COMBO ON MY FORM fclsMyCombo.Init cboStates 'a combo displaying all the states in the union End Sub THAT tells Access to dimension a class, create a class instance and WHICH combo to pass off to the class instance. NOW, with ALL THESE THINGS IN PLACE, if that combo AfterUpdate fires, control will EVENTUALLY get to your class and your message box will display it's message. Notice that your form doesn't need any event stub in it for the control. Even though the ONLY sub in your form's class is the Form_Open, the event stub in your class will sink the event and the message box will display its message. I know full well that all this sounds like a LOT of work just to get control into a class but after you've done it a few times it will be 2nd nature. And of course you can then have a combo class that (see my other post) handles the double click, opens a form, allows your user to edit the data, and when the form closes, requeries the combo, all neatly encapsulated in a class. Plus all the other neato keenarino stuff you can imagine your combo doing. Hang in there. It took me three tries, each six months apart to finally "get" Shamil's stuff and understand Withevents. Looking back I can't understand why, but life is like that sometimes. And no, the demos for the book are copyrighted by Wrox and I can't legally distribute them, however there are many demos (by me of course) on DatabaseAdvisors' web site. I also have a bunch on my own site. This stuff is important, keep trying. John W. Colby www.ColbyConsulting.com -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Robert Gracie Sent: Tuesday, January 13, 2004 8:47 PM To: Access Developers discussion and problem solving Subject: RE: [AccessD] Implements vs WithEvents "Hmmmmmmm, As confusion sets in, he takes and stabs himself in the chest with his keyboard...:-)" I'm trying to understand why the VBA DHB is teaching that using INTERFACE inheritance classes (by way of the Implements Keyword and such) is much better then simply using Event, RaiseEvent, and WithEvents... The problem, for me at least, is getting my mind around the larger concept, and knowing which structure to use and why. With my very limited understanding, the way they have presented, it seems reasonable to go this route if only to help keep control over code execution... I guess I just need to keep pounding away at these concepts....... Robert Gracie www.servicexp.com -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of John W. Colby Sent: Tuesday, January 13, 2004 7:54 PM To: Access Developers discussion and problem solving Subject: [AccessD] Implements vs WithEvents Charlotte, >They have somewhat different purposes. No, they have completely different purposes. >Implements allows you to subclass an existing object/class and give it additional or different functionality, so you can have a class Dog and a subclass Spaniel that has a property Retriever. Well... true but not exactly. My issue with that statement is the term subclass as you use it. Yes you are subclassing the original but ONLY the interface. IMHO that is almost useless Implements is an interface ONLY inheritance, i.e. it allows (forces) you to start with the same public data and method DEFINITION but does not actually inherit the behaviors (methods) themselves. I.e. the code that runs in the class that is being subclassed is NOT inherited into the subclass. Access' inheritance (interface) is not very useful except as a template kind of thing. I find it useless enough that I personally don't bother. On the other hand Shamil is a proponent so it must have its uses. When you move to VB.NET (or any of the other .net languages I believe) TRUE inheritance is available. I.e. if you have a method with a thousand lines of code, when you subclass that object the new object inherits that code as well as the data. In our Implements subclassing, you would have to cut and paste that thousand lines of code into the subclass. Can you say maintenance nightmare? >You can intercept and respond to specific events when they happen in the object. Did the Bark event trigger? WithEvents lets you find out and respond from another class/object. Exactly correct. One of the MAJOR shortcomings of Access / VBA (in fact VB prior to VB.Net) is that Inheritance is virtually non-existent, and even worse, objects other than forms don't have a built in class that you can get at to add functionality directly to. What WithEvents really does is allow you to build class wrappers for objects so that you can encapsulate behaviors (functionality) in your class. In essence you still have two objects, the control (or even another class or OCX) and your class, but now you can put all of the common functionality in your class along with the event stubs of the control/class/ocx that generates the event. This does not get you any further down the road towards inheritance, sadly it simply doesn't appear to be possible in Access / VBA. But it does provide a huge step up in encapsulation. John W. Colby www.ColbyConsulting.com -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Charlotte Foust Sent: Tuesday, January 13, 2004 4:56 PM To: Access Developers discussion and problem solving Subject: RE: [AccessD] =function() in .onclick They have somewhat different purposes. Implements allows you to subclass an existing object/class and give it additional or different functionality, so you can have a class Dog and a subclass Spaniel that has a property Retriever. WithEvents allows you to monitor the events of an object/class. You can intercept and respond to specific events when they happen in the object. Did the Bark event trigger? WithEvents lets you find out and respond from another class/object. Charlotte Foust -----Original Message----- From: Robert Gracie [mailto:Subscriptions at servicexp.com] Sent: Tuesday, January 13, 2004 1:45 PM To: Access Developers discussion and problem solving Subject: RE: [AccessD] =function() in .onclick Hello All, Since I'm just learning this type of programming technique I thought I would ask a question... Why not use Implements instead of WithEvents? My limited understand of WithEvents is that they will not return functionality unit they (the event) has completed processing... Since I'm just at the "door" so to speak with learning how to use and incorporate these new (to me) programming techniques into my work, I really want to start out using the "best" technique... Robert Gracie www.servicexp.com _______________________________________________ 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 _______________________________________________ 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 From stuart at lexacorp.com.pg Thu Jan 15 16:03:22 2004 From: stuart at lexacorp.com.pg (Stuart McLachlan) Date: Fri, 16 Jan 2004 08:03:22 +1000 Subject: [AccessD] MDW file...break in? In-Reply-To: Message-ID: <40079ACA.25852.93B38@localhost> On 15 Jan 2004 at 16:01, John Clark wrote: > OK, This programmer seems to have never told anyone the Admin password, > and now he is somewhere cross-country in an RV. How the bejeepers can I > get into the damn thing?! I got in using one of the users accounts, and > I explored the security area...I somewhat remember brushing over this > about 2-3 years ago...but I cannot do anything with her account..and > nobody else seems to have rights either. What if this shmuck dies on > this trip? We are never able to add or remove or modify users ever > again? > > I should be loving this. Serves 'em right for going behind my back and > having this guy do my job! But at the moment it is just a PITA!!! Ya > know when the "I'm thinking of going on my own" type threads come > around? Well, I'll tell ya...If this guy is making a living at it, > anybody can. His programs are ugly and he even misspells > commands...first thing I noticed was a button for Attorneys spelled, > "attornies." > > I'm leaving...it is snowing like hades again and I'm getting home > before I end up sleeping here. > I use Access Key from http://www.lostpassword.com/access.htm I bought it when I had a similar problem a year or so ago. If you feel like spending $45, it will do it for you. Otherwise, if you send me the MDW I can run it through my copy and give you all the usernames and passwords. -- Lexacorp Ltd http://www.lexacorp.com.pg Information Technology Consultancy, Software Development,System Support. From stuart at lexacorp.com.pg Thu Jan 15 16:15:40 2004 From: stuart at lexacorp.com.pg (Stuart McLachlan) Date: Fri, 16 Jan 2004 08:15:40 +1000 Subject: [AccessD] (OT) saving as *cvs with " " In-Reply-To: <59925.12.3.132.98.1074197710.squirrel@heck.bay9.com> References: <46B976F2B698FF46A4FE7636509B22DF03D11D@stekelbes.ithelps.local> Message-ID: <40079DAC.1781.147CFE@localhost> On 15 Jan 2004 at 15:15, Oleg_123 at xuppa.com wrote: > Hey Group > i have to save this data (right now I have it in a spreadsheet) > 01003, 011-11-1123, Doe, Jane, A > > as .txt file so it would like > > 01003, 011-11-1123, "Doe", "Jane", A > > > and they specifically want quotes around first and last name, and ONLY > there. when I create *.csv file from Excel I got no quotations (I tried > specifically making those 2 fields as "text" and the others as "general" > and even "numbers", but no result) When I do it through though Acess I get > all in quotations, and over there I can't play with data types. I tried > adding colums with " at the beginning and end of mane fields, but ehen I > converted that to *.csv I got tripe quotes on names, and no quotes > elsewhere... > Any suggestions ? > Do it yourself rather than trying to use automated routines. With the data as an Access table (myData), run a function like. Function ExportData() as Long Dim strExport as String Dim rs as Recordset Set rs = Currentdb.Openrecordset("myData") Open "MyNewDataFile.csv" for Output as #1 While not rs.eof strExport = rs(0) & "," & rs(1) & ",""" & rs(2) & """,""" & rs(3) & """," & rs(4) Print #1, strExport rs.MoveNext Wend End Function -- Lexacorp Ltd http://www.lexacorp.com.pg Information Technology Consultancy, Software Development,System Support. From djkr at msn.com Thu Jan 15 16:51:11 2004 From: djkr at msn.com (DJK(John) Robinson) Date: Thu, 15 Jan 2004 22:51:11 -0000 Subject: [AccessD] Access Support in 2006 In-Reply-To: <05EBB8A3BEB95B4F8216BE4EF486077801D9FF01@srciml1.ds.doc.state.or.us> Message-ID: <009101c3dbba$1218efd0$bf00a8c0@dabsight> This rumor seems to come round every few years - with different dates in ... John > -----Original Message----- > From: accessd-bounces at databaseadvisors.com > [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of > Gowey Mike W > Sent: 15 January 2004 19:53 > To: Access Developers discussion and problem solving > Subject: [AccessD] Access Support in 2006 > > > > > Just a fast question to everyone. I have been told that > there is a rumor that Microsoft is not going to support > Access anymore come 2006. > > Has anyone else heard anything else about this and if true > what they plan on replacing it with????? > > I hope this don't cause too much of a string, I was just > surprised and caught off guard. > > > Thanks, > > Mike Gowey, MCSA, A+ > Team Leader - SRCI > Information Systems & Services Division > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/a> ccessd > Website: > http://www.databaseadvisors.com > From stephen at bondsoftware.co.nz Thu Jan 15 17:14:44 2004 From: stephen at bondsoftware.co.nz (Stephen Bond) Date: Fri, 16 Jan 2004 12:14:44 +1300 Subject: [AccessD] MDW file...break in? Message-ID: <70F3D727890C784291D8433E9C418F29088594@server.bondsoftware.co.nz> Stuart, I downloaded the demo and it only attempts to recover the database password - the site documentation says it will recover "user-level security accounts and passwords". Can you confirm the paid product does this. Cheers Stephen Bond > > > > I use Access Key from http://www.lostpassword.com/access.htm > I bought it when I had a similar problem a year or so ago. > > If you feel like spending $45, it will do it for you. Otherwise, if > you send me the MDW I can run it through my copy and give you all > the usernames and passwords. > > > From michael.mattys at adelphia.net Thu Jan 15 17:32:29 2004 From: michael.mattys at adelphia.net (Michael R Mattys) Date: Thu, 15 Jan 2004 18:32:29 -0500 Subject: [AccessD] (OT) saving as *cvs with " " References: <46B976F2B698FF46A4FE7636509B22DF03D11D@stekelbes.ithelps.local> <40079DAC.1781.147CFE@localhost> Message-ID: <035001c3dbbf$dee37170$6401a8c0@default> This does work if you'd like to attach it to a button 0123 011-11-1123 Doe John A 0124 011-11-1124 Doe Jim B 0125 011-11-1125 Doe Jack C 0126 011-11-1126 Doe Jane D 0127 011-11-1127 Doe Jorge E 0128 011-11-1128 Doe Jean F 0129 011-11-1129 Doe Jeanine G 0130 011-11-1130 Doe Jessie H 0131 011-11-1131 Doe James I 0132 011-11-1132 Doe Jill J Sub QuoteCommaExport() ' Dimension all variables. Dim DestFile As String Dim FileNum As Integer Dim ColumnCount As Integer Dim RowCount As Integer ' Prompt user for destination file name. DestFile = InputBox("Enter the destination filename" _ & Chr(10) & "(with complete path):", "Quote-Comma Exporter") ' Obtain next free file handle number. FileNum = FreeFile() ' Turn error checking off. On Error Resume Next ' Attempt to open destination file for output. Open DestFile For Output As #FileNum ' If an error occurs report it and end. If Err <> 0 Then MsgBox "Cannot open filename " & DestFile End End If ' Turn error checking on. On Error GoTo 0 ' Loop for each row in selection. For RowCount = 1 To Selection.Rows.Count ' Loop for each column in selection. For ColumnCount = 1 To Selection.Columns.Count If ColumnCount = 3 Or ColumnCount = 4 Then ' Write current cell's text to file with quotation marks. Print #FileNum, """" & Selection.Cells(RowCount, ColumnCount).Text & """"; Else Print #FileNum, Selection.Cells(RowCount, ColumnCount).Text; End If ' Check if cell is in last column. If ColumnCount = Selection.Columns.Count Then ' If so, then write a blank line. Print #FileNum, Else ' Otherwise, write a comma. Print #FileNum, ","; End If ' Start next iteration of ColumnCount loop. Next ColumnCount ' Start next iteration of RowCount loop. Next RowCount ' Close destination file. Close #FileNum End Sub Michael R. Mattys Try MattysMapLib for MapPoint at www.mattysconsulting.com ----- Original Message ----- From: "Stuart McLachlan" To: "Access Developers discussion and problem solving" Sent: Thursday, January 15, 2004 5:15 PM Subject: Re: [AccessD] (OT) saving as *cvs with " " > On 15 Jan 2004 at 15:15, Oleg_123 at xuppa.com wrote: > > > Hey Group > > i have to save this data (right now I have it in a spreadsheet) > > 01003, 011-11-1123, Doe, Jane, A > > > > as .txt file so it would like > > > > 01003, 011-11-1123, "Doe", "Jane", A > > > > > > and they specifically want quotes around first and last name, and ONLY > > there. when I create *.csv file from Excel I got no quotations (I tried > > specifically making those 2 fields as "text" and the others as "general" > > and even "numbers", but no result) When I do it through though Acess I get > > all in quotations, and over there I can't play with data types. I tried > > adding colums with " at the beginning and end of mane fields, but ehen I > > converted that to *.csv I got tripe quotes on names, and no quotes > > elsewhere... > > Any suggestions ? > > > > Do it yourself rather than trying to use automated routines. > With the data as an Access table (myData), run a function like. > > Function ExportData() as Long > Dim strExport as String > Dim rs as Recordset > Set rs = Currentdb.Openrecordset("myData") > Open "MyNewDataFile.csv" for Output as #1 > While not rs.eof > strExport = rs(0) & "," & rs(1) & ",""" & rs(2) & """,""" & rs(3) & > """," & rs(4) > Print #1, strExport > rs.MoveNext > Wend > End Function > > -- > Lexacorp Ltd > http://www.lexacorp.com.pg > Information Technology Consultancy, Software Development,System > Support. > > > > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com > From KIsmert at TexasSystems.com Thu Jan 15 17:39:40 2004 From: KIsmert at TexasSystems.com (Ken Ismert) Date: Thu, 15 Jan 2004 17:39:40 -0600 Subject: [AccessD] Implements vs WithEvents In-Reply-To: Message-ID: <004b01c3dbc0$d8eb7820$2a3ca8c0@TEXASSYSTEMS.COM> >One thing you say intrigues me though. You mention Implements allowing a >custom callback scheme and sending messages. How does this work? How does >the callback communicate between class instances? John, Interesting, the difference in perspectives: after your experience with true object languages, you find VBA limiting, while I cut my teeth on non-object languages, and find Implements a revelation. I'd love to work in a true OOP language that supports inheritance, but feel it would take some time to fully grasp its power and use it effectively. The callback scheme can be summarized as follows: 1. The callbacks are defined as methods in the ICallback interface: ' Insert this code in Class module ICallback Public Sub Message(sBody As Text) End Sub 2. Class CWannaMessage, wanting to receive messages, implements ICallback: Implements ICallback Private Sub ICallback_Message(sBody As Text) Debug.Print sBody End Sub 3. The CWannaMessage object makes a CCaller object, and passes a reference to itself: Set rCaller = New CCaller rCaller.Setup Me 4. CCaller's setup code looks like this: Private mrCallback as ICallback Public Sub Setup(CallbackObj As ICallback) Set mrCallback = CallbackObj End Sub 5. When CCaller wants to send a message: mrCallback.Message "Hello, you!" 6. Since you now have circular object references, CCaller must also provide a way to release its callback reference: Public Sub Shutdown Set mrCallback = Nothing End Sub 7. CWannaMessage must shutdown its caller when it isn't needed, or neither object will terminate: rCaller.Shutdown This example shows a one-on-one conversation, but it could easily be extended for multiple callers. CWannaMessage could maintain a collection of CCallers, and pass each CCaller its name or index on Setup, which CCaller could then pass back when it sends its Message. Or CCaller could just pass a reference to itself (Me) back to CWannaMessage. In any case, ICallback would have to be suitably extended. I calculate the obtuseness of this post at 135 degrees, a 5 degree improvement over the last. -Ken ps: I have some relatively simple form management code using interfaces. It allows a Parent form to open a Child, and be notified when it closes. I'll send you it if you're interested. From stephen at bondsoftware.co.nz Thu Jan 15 17:59:15 2004 From: stephen at bondsoftware.co.nz (Stephen Bond) Date: Fri, 16 Jan 2004 12:59:15 +1300 Subject: [AccessD] Grouping Query Message-ID: <70F3D727890C784291D8433E9C418F29088595@server.bondsoftware.co.nz> Tim, try adding a field to the query and use the Partition function. This will do the grouping for you nicely. New field looks something like this: PaidGroup: Partition([DatePaid],0,31,7) then your CrossTab query would have the 'PaidGroup' field as the column heading. HTH Stephen Bond Otatara, South Island, New Zealand > -----Original Message----- > From: Tim Thiessen [mailto:tim at irwingreenhouses.com] > Sent: Friday, 16 January 2004 10:30 a.m. > To: accessD at databaseadvisors.com > Subject: [AccessD] Grouping Query > > > Hi Group, > > I have a query that returns the following: > > PaymentTerms DatePaid CountOfPaid > COD 1 5 > COD 2 3 > COD 4 8 > COD 14 4 > COD 16 12 > Net 10-EOM 1 3 > Net 10-EOM 3 10 > Net 10-EOM 5 15 > Net 10-EOM 10 21 > > DatePaid is the day of the month in which payments are made. > CountOfPaid is > a count of the number of payments made on particular date. > What I need to > do is to be able to group this data into the following: > > PaymentTerms Paid1-6 Paid7-13 > Paid14-20 Paid21-27 Paid28-31 > COD 16 16 0 > 0 0 > Net10-EOM 28 21 0 > 0 0 > > I know this is a cross tab query but how do I get the > grouping in the first > place? > > Tim Thiessen > > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com > From jwcolby at colbyconsulting.com Thu Jan 15 18:02:06 2004 From: jwcolby at colbyconsulting.com (John W. Colby) Date: Thu, 15 Jan 2004 19:02:06 -0500 Subject: [AccessD] Implements vs WithEvents In-Reply-To: <004b01c3dbc0$d8eb7820$2a3ca8c0@TEXASSYSTEMS.COM> Message-ID: Yes, please send. And if that's a 135, then I never get above about a 20 or so. ;-) Thanks, John W. Colby www.ColbyConsulting.com -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Ken Ismert Sent: Thursday, January 15, 2004 6:40 PM To: 'Access Developers discussion and problem solving' Subject: RE: [AccessD] Implements vs WithEvents >One thing you say intrigues me though. You mention Implements allowing a >custom callback scheme and sending messages. How does this work? How does >the callback communicate between class instances? John, Interesting, the difference in perspectives: after your experience with true object languages, you find VBA limiting, while I cut my teeth on non-object languages, and find Implements a revelation. I'd love to work in a true OOP language that supports inheritance, but feel it would take some time to fully grasp its power and use it effectively. The callback scheme can be summarized as follows: 1. The callbacks are defined as methods in the ICallback interface: ' Insert this code in Class module ICallback Public Sub Message(sBody As Text) End Sub 2. Class CWannaMessage, wanting to receive messages, implements ICallback: Implements ICallback Private Sub ICallback_Message(sBody As Text) Debug.Print sBody End Sub 3. The CWannaMessage object makes a CCaller object, and passes a reference to itself: Set rCaller = New CCaller rCaller.Setup Me 4. CCaller's setup code looks like this: Private mrCallback as ICallback Public Sub Setup(CallbackObj As ICallback) Set mrCallback = CallbackObj End Sub 5. When CCaller wants to send a message: mrCallback.Message "Hello, you!" 6. Since you now have circular object references, CCaller must also provide a way to release its callback reference: Public Sub Shutdown Set mrCallback = Nothing End Sub 7. CWannaMessage must shutdown its caller when it isn't needed, or neither object will terminate: rCaller.Shutdown This example shows a one-on-one conversation, but it could easily be extended for multiple callers. CWannaMessage could maintain a collection of CCallers, and pass each CCaller its name or index on Setup, which CCaller could then pass back when it sends its Message. Or CCaller could just pass a reference to itself (Me) back to CWannaMessage. In any case, ICallback would have to be suitably extended. I calculate the obtuseness of this post at 135 degrees, a 5 degree improvement over the last. -Ken ps: I have some relatively simple form management code using interfaces. It allows a Parent form to open a Child, and be notified when it closes. I'll send you it if you're interested. _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From Subscriptions at servicexp.com Thu Jan 15 18:05:56 2004 From: Subscriptions at servicexp.com (Robert Gracie) Date: Thu, 15 Jan 2004 19:05:56 -0500 Subject: [AccessD] Implements vs WithEvents In-Reply-To: <004b01c3dbc0$d8eb7820$2a3ca8c0@TEXASSYSTEMS.COM> Message-ID: Very Nice, Thank You Ken for Taking the time.... Robert Gracie www.servicexp.com -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Ken Ismert Sent: Thursday, January 15, 2004 6:40 PM To: 'Access Developers discussion and problem solving' Subject: RE: [AccessD] Implements vs WithEvents >One thing you say intrigues me though. You mention Implements allowing a >custom callback scheme and sending messages. How does this work? How does >the callback communicate between class instances? John, Interesting, the difference in perspectives: after your experience with true object languages, you find VBA limiting, while I cut my teeth on non-object languages, and find Implements a revelation. I'd love to work in a true OOP language that supports inheritance, but feel it would take some time to fully grasp its power and use it effectively. The callback scheme can be summarized as follows: 1. The callbacks are defined as methods in the ICallback interface: ' Insert this code in Class module ICallback Public Sub Message(sBody As Text) End Sub 2. Class CWannaMessage, wanting to receive messages, implements ICallback: Implements ICallback Private Sub ICallback_Message(sBody As Text) Debug.Print sBody End Sub 3. The CWannaMessage object makes a CCaller object, and passes a reference to itself: Set rCaller = New CCaller rCaller.Setup Me 4. CCaller's setup code looks like this: Private mrCallback as ICallback Public Sub Setup(CallbackObj As ICallback) Set mrCallback = CallbackObj End Sub 5. When CCaller wants to send a message: mrCallback.Message "Hello, you!" 6. Since you now have circular object references, CCaller must also provide a way to release its callback reference: Public Sub Shutdown Set mrCallback = Nothing End Sub 7. CWannaMessage must shutdown its caller when it isn't needed, or neither object will terminate: rCaller.Shutdown This example shows a one-on-one conversation, but it could easily be extended for multiple callers. CWannaMessage could maintain a collection of CCallers, and pass each CCaller its name or index on Setup, which CCaller could then pass back when it sends its Message. Or CCaller could just pass a reference to itself (Me) back to CWannaMessage. In any case, ICallback would have to be suitably extended. I calculate the obtuseness of this post at 135 degrees, a 5 degree improvement over the last. -Ken ps: I have some relatively simple form management code using interfaces. It allows a Parent form to open a Child, and be notified when it closes. I'll send you it if you're interested. _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From Subscriptions at servicexp.com Thu Jan 15 18:08:16 2004 From: Subscriptions at servicexp.com (Robert Gracie) Date: Thu, 15 Jan 2004 19:08:16 -0500 Subject: [AccessD] Reporting Question In-Reply-To: Message-ID: So is my idea all "Wet", is it not possible, is it too difficult, is it just plain dumb.....? Robert Gracie www.servicexp.com -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Robert Gracie Sent: Wednesday, January 14, 2004 11:26 PM To: Access Developers discussion and problem solving Subject: [AccessD] Reporting Question Hello All, Is there a way to make use of a report that is located in a an external mdb and provide that report with a recordset, or an array. Bottom line is I would like to have a "report library" that is not tied to any data structure and reference that mdb in other projects. I can do everything with the exception of providing the recordset for the report from an un-linked data structure.. Preferably in A2K but open to AXP Any ideas...? Thanks! Robert Gracie www.servicexp.com _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From Subscriptions at servicexp.com Thu Jan 15 18:18:00 2004 From: Subscriptions at servicexp.com (Robert Gracie) Date: Thu, 15 Jan 2004 19:18:00 -0500 Subject: [AccessD] Access shuts down In-Reply-To: Message-ID: John, I'm dealing with the same exact thing. I have found in one case the cause was the use of "DoCmd.Close acForm, Me.Name" and specifically "Me.Name" after a complex algorithm completed. Would shut Access down in a blink of an eye, with no warning or error msg at all. After pulling my hair out, I change the Me.Name to the explicit form name, and the problem went away.. However, I still have one intermittent shutdown on one form and have yet to solve it..... Robert Gracie www.servicexp.com -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of John W. Colby Sent: Thursday, January 15, 2004 2:00 PM To: AccessD Subject: [AccessD] Access shuts down Folks, A client is having an Access app just shut down, no GPF, no "by your leave", just gone. I am wondering if it is because I am doing work on it here at my house where I have Office 2K and Office XP both on the same machine. I installed the "widget" (update) that MS designed to supposedly allow the two to co-exist but I still have my doubts. Has anyone seen this? John W. Colby www.ColbyConsulting.com _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From cfoust at infostatsystems.com Thu Jan 15 18:24:14 2004 From: cfoust at infostatsystems.com (Charlotte Foust) Date: Thu, 15 Jan 2004 16:24:14 -0800 Subject: [AccessD] Reporting Question Message-ID: I'm not sure I understand the concept. How can you build reports independent of data structure? Anyhow Access reports don't even *have* an exposed recordset property until AXP, and then there are some limitations associated with its use. Charlotte Foust -----Original Message----- From: Robert Gracie [mailto:Subscriptions at servicexp.com] Sent: Thursday, January 15, 2004 4:08 PM To: Access Developers discussion and problem solving Subject: RE: [AccessD] Reporting Question So is my idea all "Wet", is it not possible, is it too difficult, is it just plain dumb.....? Robert Gracie www.servicexp.com -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Robert Gracie Sent: Wednesday, January 14, 2004 11:26 PM To: Access Developers discussion and problem solving Subject: [AccessD] Reporting Question Hello All, Is there a way to make use of a report that is located in a an external mdb and provide that report with a recordset, or an array. Bottom line is I would like to have a "report library" that is not tied to any data structure and reference that mdb in other projects. I can do everything with the exception of providing the recordset for the report from an un-linked data structure.. Preferably in A2K but open to AXP Any ideas...? Thanks! Robert Gracie www.servicexp.com _______________________________________________ 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 From Jdemarco at hudsonhealthplan.org Thu Jan 15 13:32:47 2004 From: Jdemarco at hudsonhealthplan.org (Jim DeMarco) Date: Thu, 15 Jan 2004 14:32:47 -0500 Subject: [AccessD] Access shuts down Message-ID: <22F1CCD5171D17419CB37FEEE09D5F990173FB6C@TTNEXCHSRV1.hshhp.com> Is it just shutting down out of the blue (with no user activity at all) or are you clicking something or otherwise navigating or typing into the app? Jim DeMarco -----Original Message----- From: John W. Colby [mailto:jwcolby at colbyconsulting.com] Sent: Thursday, January 15, 2004 2:00 PM To: AccessD Subject: [AccessD] Access shuts down Folks, A client is having an Access app just shut down, no GPF, no "by your leave", just gone. I am wondering if it is because I am doing work on it here at my house where I have Office 2K and Office XP both on the same machine. I installed the "widget" (update) that MS designed to supposedly allow the two to co-exist but I still have my doubts. Has anyone seen this? John W. Colby www.ColbyConsulting.com _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From michael.mattys at adelphia.net Thu Jan 15 18:43:53 2004 From: michael.mattys at adelphia.net (Michael R Mattys) Date: Thu, 15 Jan 2004 19:43:53 -0500 Subject: [AccessD] Reporting Question References: Message-ID: <03a001c3dbc9$d3d9c680$6401a8c0@default> ----- Original Message ----- From: "Robert Gracie" To: "Access Developers discussion and problem solving" Sent: Thursday, January 15, 2004 7:08 PM Subject: RE: [AccessD] Reporting Question > > So is my idea all "Wet", is it not possible, is it too difficult, is it > just plain dumb.....? > > > Robert Gracie > www.servicexp.com Robert, Opening a report "remotely" is definately possible and if you want it, then it's not dumb. In fact, I know several people from this list who do it all the time. It's simply a matter of populating the table that the remote report is based on. Sub DisplayReport() Dim appAccess As Application Const strConPathToSamples = "C:\Program Files\Microsoft Office\Office\Samples\Northwind.mdb" Dim strDB As String ' Initialize string to database path. strDB = strConPathToSamples ' Create new instance of Microsoft Access. Set appAccess = CreateObject("Access.Application.8") ' Open database in Microsoft Access window. appAccess.OpenCurrentDatabase strDB '>Delete * From Table and populate as you see fit ' Open Report. appAccess.DoCmd.OpenReport "Alphabetical List of Products", acViewPreview appAccess.Visible = True Set appAccess = Nothing End Sub Michael R. Mattys Try MattysMapLib for MapPoint at www.mattysconsulting.com From Subscriptions at servicexp.com Thu Jan 15 19:05:47 2004 From: Subscriptions at servicexp.com (Robert Gracie) Date: Thu, 15 Jan 2004 20:05:47 -0500 Subject: [AccessD] Reporting Question In-Reply-To: Message-ID: Ok, the concept would be much like that of a split db. The BE being only used for data and the front end only for FE Objects such as forms, queries ..etc. I would like to take that one step further and break off the reports into a referenced mdb, separate from the FE and BE mainly because it is difficult to use an Unsecured "Report db" to pull the data from a secured BE. The problem is, the my market demographic that I want to capture for use of a program requires the flexibility of some key forms (that are generated from with-in the "host" mdb) to be user formatable so as to suit his or her business needs. As you know you can't do this in a mde. And I've come to realize no matter how thorough you lock down an mdb, it can be easily hacked... I guess the model would be much like that of Crystal Reports... I think...:-) Robert Gracie www.servicexp.com -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Charlotte Foust Sent: Thursday, January 15, 2004 7:24 PM To: Access Developers discussion and problem solving Subject: RE: [AccessD] Reporting Question I'm not sure I understand the concept. How can you build reports independent of data structure? Anyhow Access reports don't even *have* an exposed recordset property until AXP, and then there are some limitations associated with its use. Charlotte Foust -----Original Message----- From: Robert Gracie [mailto:Subscriptions at servicexp.com] Sent: Thursday, January 15, 2004 4:08 PM To: Access Developers discussion and problem solving Subject: RE: [AccessD] Reporting Question So is my idea all "Wet", is it not possible, is it too difficult, is it just plain dumb.....? Robert Gracie www.servicexp.com -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Robert Gracie Sent: Wednesday, January 14, 2004 11:26 PM To: Access Developers discussion and problem solving Subject: [AccessD] Reporting Question Hello All, Is there a way to make use of a report that is located in a an external mdb and provide that report with a recordset, or an array. Bottom line is I would like to have a "report library" that is not tied to any data structure and reference that mdb in other projects. I can do everything with the exception of providing the recordset for the report from an un-linked data structure.. Preferably in A2K but open to AXP Any ideas...? Thanks! Robert Gracie www.servicexp.com _______________________________________________ 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 _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From Subscriptions at servicexp.com Thu Jan 15 19:14:06 2004 From: Subscriptions at servicexp.com (Robert Gracie) Date: Thu, 15 Jan 2004 20:14:06 -0500 Subject: [AccessD] Reporting Question In-Reply-To: <03a001c3dbc9$d3d9c680$6401a8c0@default> Message-ID: Thank You Michael, However it's not quite what I need. I need to also pass the report the data, as the "reporting mdb" needs to be un-secured, yet the BE data is secured. This creates problem linking to the BE... What I have come up with so far allows me to reference the "Report.mdb" and open up the report inside of the host mdb but I can't seem to figure out how to pass the data to the report.... Any help, leads, or idea would be great!! Thanks Robert Gracie www.servicexp.com -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Michael R Mattys Sent: Thursday, January 15, 2004 7:44 PM To: Access Developers discussion and problem solving Subject: Re: [AccessD] Reporting Question ----- Original Message ----- From: "Robert Gracie" To: "Access Developers discussion and problem solving" Sent: Thursday, January 15, 2004 7:08 PM Subject: RE: [AccessD] Reporting Question > > So is my idea all "Wet", is it not possible, is it too difficult, is it > just plain dumb.....? > > > Robert Gracie > www.servicexp.com Robert, Opening a report "remotely" is definately possible and if you want it, then it's not dumb. In fact, I know several people from this list who do it all the time. It's simply a matter of populating the table that the remote report is based on. Sub DisplayReport() Dim appAccess As Application Const strConPathToSamples = "C:\Program Files\Microsoft Office\Office\Samples\Northwind.mdb" Dim strDB As String ' Initialize string to database path. strDB = strConPathToSamples ' Create new instance of Microsoft Access. Set appAccess = CreateObject("Access.Application.8") ' Open database in Microsoft Access window. appAccess.OpenCurrentDatabase strDB '>Delete * From Table and populate as you see fit ' Open Report. appAccess.DoCmd.OpenReport "Alphabetical List of Products", acViewPreview appAccess.Visible = True Set appAccess = Nothing End Sub Michael R. Mattys Try MattysMapLib for MapPoint at www.mattysconsulting.com _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From KIsmert at TexasSystems.com Thu Jan 15 20:04:11 2004 From: KIsmert at TexasSystems.com (Ken Ismert) Date: Thu, 15 Jan 2004 20:04:11 -0600 Subject: [AccessD] Implements vs WithEvents In-Reply-To: Message-ID: <006a01c3dbd5$093a2b70$2a3ca8c0@TEXASSYSTEMS.COM> You're welcome. -----Original Message----- From: Robert Gracie [mailto:Subscriptions at servicexp.com] Sent: Thursday, January 15, 2004 6:06 PM To: Access Developers discussion and problem solving Subject: RE: [AccessD] Implements vs WithEvents Very Nice, Thank You Ken for Taking the time.... Robert Gracie www.servicexp.com .... From michael.mattys at adelphia.net Thu Jan 15 20:09:04 2004 From: michael.mattys at adelphia.net (Michael R Mattys) Date: Thu, 15 Jan 2004 21:09:04 -0500 Subject: [AccessD] Reporting Question References: Message-ID: <03d701c3dbd5$b8cc9c80$6401a8c0@default> Robert, I copied the tables (Products and Suppliers) from Northwind to my database and opened the report in design view. Then I set the recordsource to Products1 in the currentdb. Sub DisplayReport() Dim appAccess As Application, rpt As Report Const strConPathToSamples = "C:\Program Files\Microsoft Office\Office\Samples\Northwind.mdb" Dim strDB As String ' Initialize string to database path. strDB = strConPathToSamples ' Create new instance of Microsoft Access. Set appAccess = CreateObject("Access.Application.8") ' Open database in Microsoft Access window. appAccess.OpenCurrentDatabase strDB ' Open Orders form. appAccess.DoCmd.OpenReport "Alphabetical List of Products", acViewDesign Set rpt = appAccess.REPORTS("Alphabetical List of Products") rpt.RecordSource = "Select * From Products1 in '" & CurrentDb.Name & "'" appAccess.DoCmd.OpenReport "Alphabetical List of Products", acViewPreview appAccess.Visible = True Set rpt = Nothing Set appAccess = Nothing End Sub Michael R. Mattys Try MattysMapLib for MapPoint at www.mattysconsulting.com From d.dick at uws.edu.au Thu Jan 15 23:18:32 2004 From: d.dick at uws.edu.au (Darren DICK) Date: Fri, 16 Jan 2004 16:18:32 +1100 Subject: [AccessD] A2K: Is it possible....? Message-ID: <005301c3dbf0$2efde110$48619a89@DDICK> Hello all I have a combo box fed by a simple SQL Me.cboMycombo.rowsource = "SELECT tblMyTable.* FROM tblMyTable;" So far so good. If there are 5 items in tblMyTable I expect to see 5 items in the combo box. Here's the tricky Bit. Say I want to add a 6th entry that is really just a line of text that is not in the table A string something like "" then have the 'real' 5 or so items from the table in addition to the 1 line of text Make sense? Many thanks in advance Darren From handyman at actcom.co.il Thu Jan 15 23:49:50 2004 From: handyman at actcom.co.il (handyman at actcom.co.il) Date: Fri, 16 Jan 2004 07:49:50 +0200 Subject: [AccessD] A2K: Is it possible....? In-Reply-To: <005301c3dbf0$2efde110$48619a89@DDICK> Message-ID: <5.1.0.14.2.20040116074327.025cc610@pop5.actcom.net.il> These links might help you do what you want. http://msdn.microsoft.com/library/default.asp?url=/library/en-us/dnofftalk/html/office03022000.asp http://members.iinet.net.au/~allenbrowne/ser-07.html gm At 04:18 PM, 1/16/2004 +1100, you wrote: >Hello all >I have a combo box fed by a simple SQL >Me.cboMycombo.rowsource = "SELECT tblMyTable.* FROM tblMyTable;" >So far so good. If there are 5 items in tblMyTable I expect to see 5 items >in the combo box. > >Here's the tricky Bit. >Say I want to add a 6th entry that is really just a line of text that is >not in the table >A string something like "" then have the >'real' 5 or so items >from the table in addition to the 1 line of text > >Make sense? > >Many thanks in advance > >Darren > >_______________________________________________ >AccessD mailing list >AccessD at databaseadvisors.com >http://databaseadvisors.com/mailman/listinfo/accessd >Website: http://www.databaseadvisors.com Gershon Markowitz mailto:Handyman at actcom.co.il http://www.yadchaimtzvi.org From wdhindman at bellsouth.net Fri Jan 16 00:18:41 2004 From: wdhindman at bellsouth.net (William Hindman) Date: Fri, 16 Jan 2004 01:18:41 -0500 Subject: [AccessD] A2K: Is it possible....? References: <005301c3dbf0$2efde110$48619a89@DDICK> Message-ID: <000401c3dbf8$9637af70$6101a8c0@dejpolsys> Darren ...off the top of my head (and thus not tested) try Me.cboMycombo.rowsource = "SELECT DISTINCTROW tblMyTable.* UNION SELECT "" ,"" FROM tblMyTable ;" William Hindman - Next Year In The Free State! ----- Original Message ----- From: "Darren DICK" To: "AccessD List" Sent: Friday, January 16, 2004 12:18 AM Subject: [AccessD] A2K: Is it possible....? > Hello all > I have a combo box fed by a simple SQL > Me.cboMycombo.rowsource = "SELECT tblMyTable.* FROM tblMyTable;" > So far so good. If there are 5 items in tblMyTable I expect to see 5 items in the combo box. > > Here's the tricky Bit. > Say I want to add a 6th entry that is really just a line of text that is not in the table > A string something like "" then have the 'real' 5 or so items > from the table in addition to the 1 line of text > > Make sense? > > Many thanks in advance > > Darren > > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com > From d.dick at uws.edu.au Fri Jan 16 01:06:58 2004 From: d.dick at uws.edu.au (Darren DICK) Date: Fri, 16 Jan 2004 18:06:58 +1100 Subject: [AccessD] A2K: Is it possible....? References: <5.1.0.14.2.20040116074327.025cc610@pop5.actcom.net.il> Message-ID: <005001c3dbff$54c584c0$48619a89@DDICK> Thanks Handy Man ----- Original Message ----- From: To: "Access Developers discussion and problem solving" Sent: Friday, January 16, 2004 4:49 PM Subject: Re: [AccessD] A2K: Is it possible....? > > These links might help you do what you want. > > http://msdn.microsoft.com/library/default.asp?url=/library/en-us/dnofftalk/html/office03022000.asp > http://members.iinet.net.au/~allenbrowne/ser-07.html > > gm > > At 04:18 PM, 1/16/2004 +1100, you wrote: > >Hello all > >I have a combo box fed by a simple SQL > >Me.cboMycombo.rowsource = "SELECT tblMyTable.* FROM tblMyTable;" > >So far so good. If there are 5 items in tblMyTable I expect to see 5 items > >in the combo box. > > > >Here's the tricky Bit. > >Say I want to add a 6th entry that is really just a line of text that is > >not in the table > >A string something like "" then have the > >'real' 5 or so items > >from the table in addition to the 1 line of text > > > >Make sense? > > > >Many thanks in advance > > > >Darren > > > >_______________________________________________ > >AccessD mailing list > >AccessD at databaseadvisors.com > >http://databaseadvisors.com/mailman/listinfo/accessd > >Website: http://www.databaseadvisors.com > > Gershon Markowitz > mailto:Handyman at actcom.co.il > http://www.yadchaimtzvi.org > > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com From d.dick at uws.edu.au Fri Jan 16 01:07:12 2004 From: d.dick at uws.edu.au (Darren DICK) Date: Fri, 16 Jan 2004 18:07:12 +1100 Subject: [AccessD] A2K: Is it possible....? References: <005301c3dbf0$2efde110$48619a89@DDICK> <000401c3dbf8$9637af70$6101a8c0@dejpolsys> Message-ID: <005601c3dbff$5d91de50$48619a89@DDICK> Oh William Sheer Genius many thanks ----- Original Message ----- From: "William Hindman" To: "Access Developers discussion and problem solving" Sent: Friday, January 16, 2004 5:18 PM Subject: Re: [AccessD] A2K: Is it possible....? > Darren > > ...off the top of my head (and thus not tested) try Me.cboMycombo.rowsource > = "SELECT DISTINCTROW tblMyTable.* UNION SELECT " List>" ,"" FROM tblMyTable ;" > > William Hindman > - Next Year In The Free State! > > > ----- Original Message ----- > From: "Darren DICK" > To: "AccessD List" > Sent: Friday, January 16, 2004 12:18 AM > Subject: [AccessD] A2K: Is it possible....? > > > > Hello all > > I have a combo box fed by a simple SQL > > Me.cboMycombo.rowsource = "SELECT tblMyTable.* FROM tblMyTable;" > > So far so good. If there are 5 items in tblMyTable I expect to see 5 items > in the combo box. > > > > Here's the tricky Bit. > > Say I want to add a 6th entry that is really just a line of text that is > not in the table > > A string something like "" then have the > 'real' 5 or so items > > from the table in addition to the 1 line of text > > > > Make sense? > > > > Many thanks in advance > > > > Darren > > > > _______________________________________________ > > 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 From Erwin.Craps at ithelps.be Fri Jan 16 01:39:09 2004 From: Erwin.Craps at ithelps.be (Erwin Craps - IT Helps) Date: Fri, 16 Jan 2004 08:39:09 +0100 Subject: [AccessD] Access Support in 2006 Message-ID: <46B976F2B698FF46A4FE7636509B22DF03D11E@stekelbes.ithelps.local> Maybe the rumor is psread by some competitor when they release a new version? :-) Filemaker Pro? (Can't think of another still existing database) -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of DJK(John) Robinson Sent: Thursday, January 15, 2004 11:51 PM To: 'Access Developers discussion and problem solving' Subject: RE: [AccessD] Access Support in 2006 This rumor seems to come round every few years - with different dates in ... John > -----Original Message----- > From: accessd-bounces at databaseadvisors.com > [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Gowey Mike > W > Sent: 15 January 2004 19:53 > To: Access Developers discussion and problem solving > Subject: [AccessD] Access Support in 2006 > > > > > Just a fast question to everyone. I have been told that there is a > rumor that Microsoft is not going to support Access anymore come 2006. > > Has anyone else heard anything else about this and if true what they > plan on replacing it with????? > > I hope this don't cause too much of a string, I was just surprised and > caught off guard. > > > Thanks, > > Mike Gowey, MCSA, A+ > Team Leader - SRCI > Information Systems & Services Division > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/a> ccessd > Website: > http://www.databaseadvisors.com > _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From clh at christopherhawkins.com Fri Jan 16 05:13:27 2004 From: clh at christopherhawkins.com (Christopher Hawkins) Date: Fri, 16 Jan 2004 04:13:27 -0700 Subject: [AccessD] Silently send email from Access? Message-ID: <184670-220041516111327172@christopherhawkins.com> I have used the DoCmd.SendObject command to send email from within an application before, but with recent versions of Outlook this has become cumbersome due to the security in place by default. Now the user is prompted that something is attempting to access their mailbox, etc. I have been asked to make an application silently send email to certain people when certain events occur in their system. They specifically said they want all eMail from the app to be silent; no security warnings. I don't have the foggiest clue how to do this without disabling their exchange server's security entirely, which is out of the question. Is it possible for my application to execute the SendObject command in an administrative context? Or something? Has anyone done this? -Christopher- From gustav at cactus.dk Fri Jan 16 05:16:58 2004 From: gustav at cactus.dk (Gustav Brock) Date: Fri, 16 Jan 2004 12:16:58 +0100 Subject: [AccessD] Grouping Query In-Reply-To: <007901c3dbae$b2e74800$7800a8c0@timt> References: <007901c3dbae$b2e74800$7800a8c0@timt> Message-ID: <6211337792.20040116121658@cactus.dk> Hi Tim You can get pretty close: TRANSFORM Sum(CountOfPaid) SELECT PaymentTerms FROM tblPayments GROUP BY PaymentTerms PIVOT "Paid" & Format(([DatePaid]\7)*7,"00") & "-" & Format((1+([DatePaid]\7))*7-1,"00"); This will return: PaymentTerms Paid00-06 Paid07-13 Paid14-20 COD 16 16 Net 10-EOM 28 21 If you need all columns, you'll have to create a select query which returns all fields, then outer join this to the crosstab above. Off the head I don't know how to turn "Paid00-06" into "Paid01-06". /gustav > I have a query that returns the following: > PaymentTerms DatePaid CountOfPaid > COD 1 5 > COD 2 3 > COD 4 8 > COD 14 4 > COD 16 12 > Net 10-EOM 1 3 > Net 10-EOM 3 10 > Net 10-EOM 5 15 > Net 10-EOM 10 21 > DatePaid is the day of the month in which payments are made. CountOfPaid is > a count of the number of payments made on particular date. What I need to > do is to be able to group this data into the following: > PaymentTerms Paid1-6 Paid7-13 Paid14-20 Paid21-27 Paid28-31 > COD 16 16 0 0 0 > Net10-EOM 28 21 0 0 0 > I know this is a cross tab query but how do I get the grouping in the first > place? > Tim Thiessen From gustav at cactus.dk Fri Jan 16 04:07:44 2004 From: gustav at cactus.dk (Gustav Brock) Date: Fri, 16 Jan 2004 11:07:44 +0100 Subject: [AccessD] Re: MDW file In-Reply-To: <5.1.0.14.2.20040115151234.042a0af8@pop3.highstream.net> References: <5.1.0.14.2.20040115151234.042a0af8@pop3.highstream.net> Message-ID: <367184330.20040116110744@cactus.dk> Hi John Or pick a real installer like Inno Setup for free: http://www.jrsoftware.org/ It has sample scripts (text files) which easily lets you create your own scripts. /gustav > John, > Get WinRAR. It is like WinZip, but has a couple > of features that you need. It will create a SPX > file that is an executable that will do directory > things, like create them, and then uncompress the > files into a specific directory. > Go to a working client machine. Do the WinRAR > process on the client files to create the SPX > file. Then place it on the network. Now, by > opening that file, everyone can install the program > locally. > Robert >>Anyhow, now that I have explained how 'good' I have become, I was >>thrown a twist. Because this guy is out of town, he cannot respond to a >>call that they have regarding a program he wrote. It needs to be placed >>on the desktops, of another department. "No problem," I said, "I can >>handle it." But I notice in the shortcut that exists, in the original >>department, it uses an .MDW file in the target line (ms.mdw" "c:\program >>files\cms\cmssecure.mdb"). I just called to verify this line, because I >>thought that at least a "c was missing from the front...I don't get the >>one quote mark. >> >>I have never used workgroup features of Access, and I really don't plan >>to. What do I need to do to set this up? From paul.hartland at fsmail.net Fri Jan 16 05:22:40 2004 From: paul.hartland at fsmail.net (paul.hartland at fsmail.net) Date: Fri, 16 Jan 2004 12:22:40 +0100 (CET) Subject: [AccessD] Silently send email from Access? Message-ID: <24879849.1074252160454.JavaMail.www@wwinf3006> Christopher, You could use vbSendMail, I can't remember the site I got it from but if you type it into a search engine I'm sure you will come up with something. Basically it's like a ocx control and it sends mail directly to the SMTP server bypassing the security warnings. Hope this helps. Paul Hartland Message date : Jan 16 2004, 11:15 AM >From : Christopher Hawkins To : accessd at databaseadvisors.com Copy to : Subject : [AccessD] Silently send email from Access? I have used the DoCmd.SendObject command to send email from within an application before, but with recent versions of Outlook this has become cumbersome due to the security in place by default. Now the user is prompted that something is attempting to access their mailbox, etc. I have been asked to make an application silently send email to certain people when certain events occur in their system. They specifically said they want all eMail from the app to be silent; no security warnings. I don't have the foggiest clue how to do this without disabling their exchange server's security entirely, which is out of the question. Is it possible for my application to execute the SendObject command in an administrative context? Or something? Has anyone done this? -Christopher- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com Freeserve AnyTime - HALF PRICE for the first 3 months - Save ?7.50 a month www.freeserve.com/anytime From mikedorism at adelphia.net Fri Jan 16 06:06:23 2004 From: mikedorism at adelphia.net (Mike & Doris Manning) Date: Fri, 16 Jan 2004 07:06:23 -0500 Subject: [AccessD] Silently send email from Access? In-Reply-To: <184670-220041516111327172@christopherhawkins.com> Message-ID: <000001c3dc29$29250e10$8b194244@hargrove.internal> Check out Redemption (http://www.dimastr.com/redemption/). We have been using it for quite some time and have had no problems with it. Doris Manning Database Administrator Hargrove Inc. www.hargroveinc.com -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Christopher Hawkins Sent: Friday, January 16, 2004 6:13 AM To: accessd at databaseadvisors.com Subject: [AccessD] Silently send email from Access? I have used the DoCmd.SendObject command to send email from within an application before, but with recent versions of Outlook this has become cumbersome due to the security in place by default. Now the user is prompted that something is attempting to access their mailbox, etc. I have been asked to make an application silently send email to certain people when certain events occur in their system. They specifically said they want all eMail from the app to be silent; no security warnings. I don't have the foggiest clue how to do this without disabling their exchange server's security entirely, which is out of the question. Is it possible for my application to execute the SendObject command in an administrative context? Or something? Has anyone done this? -Christopher- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From accessd666 at yahoo.com Fri Jan 16 06:25:36 2004 From: accessd666 at yahoo.com (Sad Der) Date: Fri, 16 Jan 2004 04:25:36 -0800 (PST) Subject: [AccessD] Error 3218 "Couldn't Update; Currently Locked" Message-ID: <20040116122536.27828.qmail@web60208.mail.yahoo.com> Hi group, We use A2K SP1 on a Novell network. occasionally the users get the following error: Error 3218 "Couldn't Update; Currently Locked" I noticed that this occurs when a user tries to load interface messages into the DB. The messages have approx. 100-150 records. Total size of 12Kb. I read on support.microsoft.com (KB302484) that this has to do with the number of record locks on the Novell server. But this KB-Article is related to A97! What's the deal with locking in A2k? We 'enherited' this system and error handling, if any, is really buggy. So every time this occurs we get a lot(!) of db-pollution!! My question: What can I do to prevent this from happening? TIA, SD __________________________________ Do you Yahoo!? Yahoo! Hotjobs: Enter the "Signing Bonus" Sweepstakes http://hotjobs.sweepstakes.yahoo.com/signingbonus From gustav at cactus.dk Fri Jan 16 06:42:32 2004 From: gustav at cactus.dk (Gustav Brock) Date: Fri, 16 Jan 2004 13:42:32 +0100 Subject: [AccessD] Error 3218 "Couldn't Update; Currently Locked" In-Reply-To: <20040116122536.27828.qmail@web60208.mail.yahoo.com> References: <20040116122536.27828.qmail@web60208.mail.yahoo.com> Message-ID: <13416471845.20040116134232@cactus.dk> Hi Sad And the article probably relates to NetWare 4.x too. Which NW are you running? What are the comments from your NW guy? Are you running an antivirus scanner on the server? /gustav > Hi group, > We use A2K SP1 on a Novell network. > occasionally the users get the following error: > Error 3218 "Couldn't Update; Currently Locked" > I noticed that this occurs when a user tries to load > interface messages into the DB. The messages have > approx. 100-150 records. Total size of 12Kb. > I read on support.microsoft.com (KB302484) that this > has to do with the number of record locks on the Novell > server. But this KB-Article is related to A97! > What's the deal with locking in A2k? > We 'enherited' this system and error handling, if any, > is really buggy. So every time this occurs we get a > lot(!) of db-pollution!! > My question: What can I do to prevent this from > happening? From accessd666 at yahoo.com Fri Jan 16 06:51:25 2004 From: accessd666 at yahoo.com (Sad Der) Date: Fri, 16 Jan 2004 04:51:25 -0800 (PST) Subject: [AccessD] Error 3218 "Couldn't Update; Currently Locked" In-Reply-To: <13416471845.20040116134232@cactus.dk> Message-ID: <20040116125125.29954.qmail@web60210.mail.yahoo.com> Hi Gustav, thnx for you're reply. Why did ask about the antivirus scanner? Could that interfere? SD --- Gustav Brock wrote: > Hi Sad > > And the article probably relates to NetWare 4.x too. > Which NW are you running? > What are the comments from your NW guy? > Are you running an antivirus scanner on the server? > > /gustav > > > > Hi group, > > > We use A2K SP1 on a Novell network. > > occasionally the users get the following error: > > Error 3218 "Couldn't Update; Currently Locked" > > > I noticed that this occurs when a user tries to > load > > interface messages into the DB. The messages have > > approx. 100-150 records. Total size of 12Kb. > > > I read on support.microsoft.com (KB302484) that > this > > has to do with the number of record locks on the > Novell > > server. But this KB-Article is related to A97! > > > What's the deal with locking in A2k? > > > We 'enherited' this system and error handling, if > any, > > is really buggy. So every time this occurs we get > a > > lot(!) of db-pollution!! > > > My question: What can I do to prevent this from > > happening? > > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com __________________________________ Do you Yahoo!? Yahoo! Hotjobs: Enter the "Signing Bonus" Sweepstakes http://hotjobs.sweepstakes.yahoo.com/signingbonus From gustav at cactus.dk Fri Jan 16 06:59:58 2004 From: gustav at cactus.dk (Gustav Brock) Date: Fri, 16 Jan 2004 13:59:58 +0100 Subject: [AccessD] Error 3218 "Couldn't Update; Currently Locked" In-Reply-To: <20040116125125.29954.qmail@web60210.mail.yahoo.com> References: <20040116125125.29954.qmail@web60210.mail.yahoo.com> Message-ID: <9217517939.20040116135958@cactus.dk> Hi Sad Yes, perhaps. Not very likely but who knows? /gustav > Why did ask about the antivirus scanner? Could that > interfere? From accessd666 at yahoo.com Fri Jan 16 07:12:42 2004 From: accessd666 at yahoo.com (Sad Der) Date: Fri, 16 Jan 2004 05:12:42 -0800 (PST) Subject: [AccessD] Error 3218 "Couldn't Update; Currently Locked" In-Reply-To: <9217517939.20040116135958@cactus.dk> Message-ID: <20040116131242.9656.qmail@web60203.mail.yahoo.com> The magical world of Novell :-) SD --- Gustav Brock wrote: > Hi Sad > > Yes, perhaps. Not very likely but who knows? > > /gustav > > > > Why did ask about the antivirus scanner? Could > that > > interfere? > > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com __________________________________ Do you Yahoo!? Yahoo! Hotjobs: Enter the "Signing Bonus" Sweepstakes http://hotjobs.sweepstakes.yahoo.com/signingbonus From LChristian at MassMutual.com Fri Jan 16 08:06:32 2004 From: LChristian at MassMutual.com (Christian, Lorraine) Date: Fri, 16 Jan 2004 09:06:32 -0500 Subject: [AccessD] Silently send email from Access? Message-ID: <5B898D9F0627974EB82D0645E52B1E7D035CBB0F@EXMBPR03.na.mmfg.net> Hi Chris, I sent a similar message out the other day. Do a search in the Archives where the subject reads...Outlook SP3. You will see the responses. HTH, Lorraine -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Christopher Hawkins Sent: Friday, January 16, 2004 6:13 AM To: accessd at databaseadvisors.com Subject: [AccessD] Silently send email from Access? I have used the DoCmd.SendObject command to send email from within an application before, but with recent versions of Outlook this has become cumbersome due to the security in place by default. Now the user is prompted that something is attempting to access their mailbox, etc. I have been asked to make an application silently send email to certain people when certain events occur in their system. They specifically said they want all eMail from the app to be silent; no security warnings. I don't have the foggiest clue how to do this without disabling their exchange server's security entirely, which is out of the question. Is it possible for my application to execute the SendObject command in an administrative context? Or something? Has anyone done this? -Christopher- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com --------------------------------------------------------- This e-mail transmission may contain information that is proprietary, privileged and/or confidential and is intended exclusively for the person(s) to whom it is addressed. Any use, copying, retention or disclosure by any person other than the intended recipient or the intended recipient's designees is strictly prohibited. If you are not the intended recipient or their designee, please notify the sender immediately by return e-mail and delete all copies. --------------------------------------------------------- From John.Clark at niagaracounty.com Fri Jan 16 08:05:40 2004 From: John.Clark at niagaracounty.com (John Clark) Date: Fri, 16 Jan 2004 09:05:40 -0500 Subject: [AccessD] MDW file...break in? Message-ID: I would like to thank everyone who responded to my MDW problem. As my kids would say, "This list Rocks!!!" It turns out my boss had an Email address that the guy is checking in on, and he provide us with the password. All seems to be well...for now...and I have some links to some sites with some new toys. Gustav...I am trying to learn that INNO, but, unless I am missing something, it doesn't seem real 'intuitive'. Not that it needs to be, it just wasn't point and click for me, that's all. I'm headed out to look at that WinRAR that Robert suggested, in just a few moments. If it is actually this simple, it will work great for this particular program. I think I'll probably need something a little more robust for future progs because I use two uncommon fonts and I need them installed also. Thanks again everyone...I really appreciate this! Take care! John W Clark From gustav at cactus.dk Fri Jan 16 08:18:20 2004 From: gustav at cactus.dk (Gustav Brock) Date: Fri, 16 Jan 2004 15:18:20 +0100 Subject: [AccessD] MDW file...break in? In-Reply-To: References: Message-ID: <17722219980.20040116151820@cactus.dk> Hi John > Gustav...I am trying to learn that INNO, but, unless I am missing > something, it doesn't seem real 'intuitive'. Not that it needs to be, it > just wasn't point and click for me, that's all. Njah, you will have to study the help file and compare with the samples - the simple ones are all you need. > I'm headed out to look at that WinRAR that Robert suggested, in just a > few moments. If it is actually this simple, it will work great for this > particular program. I think I'll probably need something a little more > robust for future progs because I use two uncommon fonts and I need them > installed also. Inno handles this - as well as shortcuts etc. /gustav From jimdettman at earthlink.net Fri Jan 16 08:22:29 2004 From: jimdettman at earthlink.net (Jim Dettman) Date: Fri, 16 Jan 2004 09:22:29 -0500 Subject: [AccessD] Error 3218 "Couldn't Update; Currently Locked" In-Reply-To: <20040116122536.27828.qmail@web60208.mail.yahoo.com> Message-ID: <> There are lots of things that will cause that message, but I think you might be barking up the wrong tree in that it's a Novell problem. From your comments abut it being "buggy", I would think more that the app was poorly written and stepping on it's own toes, resulting in the above error. One way to check that out easily is to copy the backend to a local drive, re-link the tables (I'm assuming it's a split app), then test. If you still get the error messages it has nothing to do with Novell. If the error disappears, then it's related to locking. The other test you can do is using the SetOption method of the dbEngine object, set dbMaxLocksPerFile to a number less then the allowed number of locks under Novell. This will ensure that JET never uses more locks then Novell allows. If that was the problem, the error messages will disappear. Jim Dettman President, Online Computer Services of WNY, Inc. (315) 699-3443 jimdettman at earthlink.net -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Sad Der Sent: Friday, January 16, 2004 7:26 AM To: Acces User Group Subject: [AccessD] Error 3218 "Couldn't Update; Currently Locked" Hi group, We use A2K SP1 on a Novell network. occasionally the users get the following error: Error 3218 "Couldn't Update; Currently Locked" I noticed that this occurs when a user tries to load interface messages into the DB. The messages have approx. 100-150 records. Total size of 12Kb. I read on support.microsoft.com (KB302484) that this has to do with the number of record locks on the Novell server. But this KB-Article is related to A97! What's the deal with locking in A2k? We 'enherited' this system and error handling, if any, is really buggy. So every time this occurs we get a lot(!) of db-pollution!! My question: What can I do to prevent this from happening? TIA, SD __________________________________ Do you Yahoo!? Yahoo! Hotjobs: Enter the "Signing Bonus" Sweepstakes http://hotjobs.sweepstakes.yahoo.com/signingbonus _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From accessd666 at yahoo.com Fri Jan 16 08:35:49 2004 From: accessd666 at yahoo.com (Sad Der) Date: Fri, 16 Jan 2004 06:35:49 -0800 (PST) Subject: [AccessD] Error 3218 "Couldn't Update; Currently Locked" <> In-Reply-To: Message-ID: <20040116143549.48625.qmail@web60206.mail.yahoo.com> thnx for all the relplies! These are the new settings: Max. Records Lock per Connection: 1000 Max. Files Lock per Connection: 5000 Max. Records Lock: 40000 Max. Files Lock: 400000 How can I test these? Ok, for the first one I have to lock 999, 1000, 1001 records...question is how do I do that? Is importing a file with 999, 1000, 1001 records enough? Any testing tips/links? TIA. SD --- Jim Dettman wrote: > < occasionally the users get the following error: > Error 3218 "Couldn't Update; Currently Locked">> > > There are lots of things that will cause that > message, but I think you > might be barking up the wrong tree in that it's a > Novell problem. > > From your comments abut it being "buggy", I would > think more that the app > was poorly written and stepping on it's own toes, > resulting in the above > error. > > One way to check that out easily is to copy the > backend to a local drive, > re-link the tables (I'm assuming it's a split app), > then test. If you still > get the error messages it has nothing to do with > Novell. If the error > disappears, then it's related to locking. > > The other test you can do is using the SetOption > method of the dbEngine > object, set dbMaxLocksPerFile to a number less then > the allowed number of > locks under Novell. This will ensure that JET never > uses more locks then > Novell allows. If that was the problem, the error > messages will disappear. > > Jim Dettman > President, > Online Computer Services of WNY, Inc. > (315) 699-3443 > jimdettman at earthlink.net > > -----Original Message----- > From: accessd-bounces at databaseadvisors.com > [mailto:accessd-bounces at databaseadvisors.com]On > Behalf Of Sad Der > Sent: Friday, January 16, 2004 7:26 AM > To: Acces User Group > Subject: [AccessD] Error 3218 "Couldn't Update; > Currently Locked" > > > Hi group, > > We use A2K SP1 on a Novell network. > occasionally the users get the following error: > Error 3218 "Couldn't Update; Currently Locked" > > I noticed that this occurs when a user tries to load > interface messages into the DB. The messages have > approx. > 100-150 records. Total size of 12Kb. > > I read on support.microsoft.com (KB302484) that this > has > to do with the number of record locks on the Novell > server. But this KB-Article is related to A97! > > What's the deal with locking in A2k? > > We 'enherited' this system and error handling, if > any, > is > really buggy. So every time this occurs we get a > lot(!) of > db-pollution!! > > My question: What can I do to prevent this from > happening? > > TIA, > > SD > > > __________________________________ > Do you Yahoo!? > Yahoo! Hotjobs: Enter the "Signing Bonus" > Sweepstakes > http://hotjobs.sweepstakes.yahoo.com/signingbonus > _______________________________________________ > 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 __________________________________ Do you Yahoo!? Yahoo! Hotjobs: Enter the "Signing Bonus" Sweepstakes http://hotjobs.sweepstakes.yahoo.com/signingbonus From garykjos at hotmail.com Fri Jan 16 08:51:53 2004 From: garykjos at hotmail.com (Gary Kjos) Date: Fri, 16 Jan 2004 08:51:53 -0600 Subject: [AccessD] Problem Exporting Query Data to Excel. Message-ID: And if you chose Export of the query from the File menu it will export up to 65K records. Or Right click on the query and choose Export there. Unless you pick a name for an existing Excel file that was created in a 16K record limit format - then it will only do 16K records max in these methods too. Had that happen to a co-worker a couple weeks ago. He had to go and delete the older version and then export from the file menu to get all his records. Gary Kjos garykjos at hotmail.com >From: "Stoker, Kenneth E" >Reply-To: Access Developers discussion and problem >solving >To: Access Developers discussion and problem solving > >Subject: RE: [AccessD] Problem Exporting Query Data to Excel. >Date: Thu, 15 Jan 2004 11:38:45 -0800 > >Actually, no, she is not a programmer, just trying to create her own >queries and then export them to Excel using Tools --> Office Links --> >Analyze in Microsoft Excel. Using this option worked at 16K records >(showed her how to use the TOP keyword for this), but failed on 17K+ >records. > >That wasn't acceptable, so we tried to just copy the results from the >query into the clipboard and then paste the clipboard contents into the >Excel spreadsheet. Surprise, we got almost 31K records into the >spreadsheet with this approach, which is what her query returned when >all the criteria was removed. > >She said that she will try to remember if it is over 16K records, to >follow the last option above. > >Ken Stoker >Technology Commercialization >Information Systems Administrator >PH: (509) 375-3758 >FAX: (509) 375-6731 >E-mail: Kenneth.Stoker at pnl.gov > > >-----Original Message----- >From: Heenan, Lambert [mailto:Lambert.Heenan at AIG.com] >Sent: Thursday, January 15, 2004 9:50 AM >To: 'Access Developers discussion and problem solving' >Subject: RE: [AccessD] > > >I assume that s/he is using TransferSpreadsheet to export to Excel as >in... > >docmd.TransferSpreadsheet acExport ,etc. etc. > >The second parameter (the one after acExport) defaults to >acSpreadsheetTypeExcel3 which cannot handle the 17k rows. If you choose >acSpreadsheetTypeExcel97 or higher for this parameter it should work >fine. > >Lambert > > > -----Original Message----- > > From: Stoker, Kenneth E [SMTP:Kenneth.Stoker at pnl.gov] > > Sent: Thursday, January 15, 2004 12:29 PM > > To: AccessD at databaseadvisors.com > > Subject: [AccessD] > > > > I have a coworker who is getting the following error message when > > trying to output 17K+ records from a query to Excel. > > > > There are too many rows to output, based on the limitation >specified > > by the output format or by Microsoft Access. > > > > Is there a setting that can be changed to increase the amount output? > > Is she hitting a limitation? Can anyone help here. > > > > Thanks. > > > > Ken Stoker > > Technology Commercialization > > Information Systems Administrator > > PH: (509) 375-3758 > > FAX: (509) 375-6731 > > E-mail: Kenneth.Stoker at pnl.gov > > > > _______________________________________________ > > 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 >_______________________________________________ >AccessD mailing list >AccessD at databaseadvisors.com >http://databaseadvisors.com/mailman/listinfo/accessd >Website: http://www.databaseadvisors.com _________________________________________________________________ Scope out the new MSN Plus Internet Software ? optimizes dial-up to the max! http://join.msn.com/?pgmarket=en-us&page=byoa/plus&ST=1 From gustav at cactus.dk Fri Jan 16 08:59:45 2004 From: gustav at cactus.dk (Gustav Brock) Date: Fri, 16 Jan 2004 15:59:45 +0100 Subject: [AccessD] Error 3218 "Couldn't Update; Currently Locked" <> In-Reply-To: <20040116143549.48625.qmail@web60206.mail.yahoo.com> References: <20040116143549.48625.qmail@web60206.mail.yahoo.com> Message-ID: <12624705504.20040116155945@cactus.dk> Hi Sad Those settings are probably to low. Try setting them to maximum: > These two commands may be set at the console screen, they will take > effect at once and doesn't require restart of the server. If they > prove of beneficial, include them in the autoexec.ncf file of the > server. > > SET MAXIMUM RECORD LOCKS = 200000 > SET MAXIMUM RECORD LOCKS PER CONNECTION = 100000 > > The only drawback is a slightly larger RAM allocation which is not > significant with today's multimegabyte servers but did count in the > days of servers running on 8 to 16 MB RAM and every 100K was of > importance. /gustav > These are the new settings: > Max. Records Lock per Connection: 1000 > Max. Files Lock per Connection: 5000 > Max. Records Lock: 40000 > Max. Files Lock: 400000 > How can I test these? Ok, for the first one I have to > lock 999, 1000, 1001 records...question is how do I do > that? > Is importing a file with 999, 1000, 1001 records > enough? > Any testing tips/links? > TIA. > SD > --- Jim Dettman wrote: >> <> occasionally the users get the following error: >> Error 3218 "Couldn't Update; Currently Locked">> >> >> There are lots of things that will cause that >> message, but I think you >> might be barking up the wrong tree in that it's a >> Novell problem. >> >> From your comments abut it being "buggy", I would >> think more that the app >> was poorly written and stepping on it's own toes, >> resulting in the above >> error. >> >> One way to check that out easily is to copy the >> backend to a local drive, >> re-link the tables (I'm assuming it's a split app), >> then test. If you still >> get the error messages it has nothing to do with >> Novell. If the error >> disappears, then it's related to locking. >> >> The other test you can do is using the SetOption >> method of the dbEngine >> object, set dbMaxLocksPerFile to a number less then >> the allowed number of >> locks under Novell. This will ensure that JET never >> uses more locks then >> Novell allows. If that was the problem, the error >> messages will disappear. >> >> Jim Dettman >> President, >> Online Computer Services of WNY, Inc. >> (315) 699-3443 >> jimdettman at earthlink.net >> >> -----Original Message----- >> From: accessd-bounces at databaseadvisors.com >> [mailto:accessd-bounces at databaseadvisors.com]On >> Behalf Of Sad Der >> Sent: Friday, January 16, 2004 7:26 AM >> To: Acces User Group >> Subject: [AccessD] Error 3218 "Couldn't Update; >> Currently Locked" >> >> >> Hi group, >> >> We use A2K SP1 on a Novell network. >> occasionally the users get the following error: >> Error 3218 "Couldn't Update; Currently Locked" >> >> I noticed that this occurs when a user tries to load >> interface messages into the DB. The messages have >> approx. >> 100-150 records. Total size of 12Kb. >> >> I read on support.microsoft.com (KB302484) that this >> has >> to do with the number of record locks on the Novell >> server. But this KB-Article is related to A97! >> >> What's the deal with locking in A2k? >> >> We 'enherited' this system and error handling, if >> any, >> is >> really buggy. So every time this occurs we get a >> lot(!) of >> db-pollution!! >> >> My question: What can I do to prevent this from >> happening? From cfoust at infostatsystems.com Fri Jan 16 10:22:42 2004 From: cfoust at infostatsystems.com (Charlotte Foust) Date: Fri, 16 Jan 2004 08:22:42 -0800 Subject: [AccessD] Access Support in 2006 Message-ID: I think it's spread by the VB and C whatever developers because they are baffled by the success of something they don't consider a *real* programming environment. Charlotte Foust -----Original Message----- From: Erwin Craps - IT Helps [mailto:Erwin.Craps at ithelps.be] Sent: Thursday, January 15, 2004 11:39 PM To: Access Developers discussion and problem solving Subject: RE: [AccessD] Access Support in 2006 Maybe the rumor is psread by some competitor when they release a new version? :-) Filemaker Pro? (Can't think of another still existing database) -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of DJK(John) Robinson Sent: Thursday, January 15, 2004 11:51 PM To: 'Access Developers discussion and problem solving' Subject: RE: [AccessD] Access Support in 2006 This rumor seems to come round every few years - with different dates in ... John > -----Original Message----- > From: accessd-bounces at databaseadvisors.com > [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Gowey Mike > W > Sent: 15 January 2004 19:53 > To: Access Developers discussion and problem solving > Subject: [AccessD] Access Support in 2006 > > > > > Just a fast question to everyone. I have been told that there is a > rumor that Microsoft is not going to support Access anymore come 2006. > > Has anyone else heard anything else about this and if true what they > plan on replacing it with????? > > I hope this don't cause too much of a string, I was just surprised and > caught off guard. > > > Thanks, > > Mike Gowey, MCSA, A+ > Team Leader - SRCI > Information Systems & Services Division > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/a> ccessd > Website: > http://www.databaseadvisors.com > _______________________________________________ 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 From tim at irwingreenhouses.com Fri Jan 16 10:44:29 2004 From: tim at irwingreenhouses.com (Tim Thiessen) Date: Fri, 16 Jan 2004 10:44:29 -0600 Subject: [AccessD] Grouping Query In-Reply-To: <70F3D727890C784291D8433E9C418F29088595@server.bondsoftware.co.nz> Message-ID: <008401c3dc50$05c81940$7800a8c0@timt> Thanks Stephen, I was not aware of the Partition Function. It works great. One other question. I am trying to use date parameters in the beginning query that looks at a form with date selector text boxes. The crosstab query then gives an error that it does not recognize the text boxes as a valid field name or expression. The beginning query runs just fine using this criteria. If I use the expression "Between #1/1/03# And #12/31/03#" as the criteria, the crosstab runs just fine. Any ideas? -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Stephen Bond Sent: Thursday, January 15, 2004 5:59 PM To: Access Developers discussion and problem solving Subject: RE: [AccessD] Grouping Query Tim, try adding a field to the query and use the Partition function. This will do the grouping for you nicely. New field looks something like this: PaidGroup: Partition([DatePaid],0,31,7) then your CrossTab query would have the 'PaidGroup' field as the column heading. HTH Stephen Bond Otatara, South Island, New Zealand > -----Original Message----- > From: Tim Thiessen [mailto:tim at irwingreenhouses.com] > Sent: Friday, 16 January 2004 10:30 a.m. > To: accessD at databaseadvisors.com > Subject: [AccessD] Grouping Query > > > Hi Group, > > I have a query that returns the following: > > PaymentTerms DatePaid CountOfPaid > COD 1 5 > COD 2 3 > COD 4 8 > COD 14 4 > COD 16 12 > Net 10-EOM 1 3 > Net 10-EOM 3 10 > Net 10-EOM 5 15 > Net 10-EOM 10 21 > > DatePaid is the day of the month in which payments are made. > CountOfPaid is > a count of the number of payments made on particular date. > What I need to > do is to be able to group this data into the following: > > PaymentTerms Paid1-6 Paid7-13 > Paid14-20 Paid21-27 Paid28-31 > COD 16 16 0 > 0 0 > Net10-EOM 28 21 0 > 0 0 > > I know this is a cross tab query but how do I get the > grouping in the first > place? > > Tim Thiessen > > _______________________________________________ > 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 From arielcom at indosat.net.id Fri Jan 16 11:02:28 2004 From: arielcom at indosat.net.id (Ariel Computer) Date: Sat, 17 Jan 2004 01:02:28 +0800 Subject: [AccessD] Wake up Call Program Message-ID: <018801c3dc52$869a6440$1000a8c0@default> Dear Friends, I really need some help for my problem :-( I want to create a small application that will dial a phone and play wav file to make a wake up call. I already found windows TAPI OCX to do this things. My problem just in timer event. Let say i have tblPhoneCall with this field : Date Time Extention 01/01/04 14:00 100 01/01/04 14:05 120 How can i use ontimer event or other trick so when the current time equal to tblphonecall.time the program will run phone dial function ? Please help. Thank you very much ! Hengky From John.Clark at niagaracounty.com Fri Jan 16 11:12:25 2004 From: John.Clark at niagaracounty.com (John Clark) Date: Fri, 16 Jan 2004 12:12:25 -0500 Subject: [AccessD] I need a count of checkboxes in a report Message-ID: I'm trying to whip up a report for a client who uses one of my programs. They are tracking the meal sites for the elderly and I have provided a list, by site, with their client's names, age, gender, race, etc.. There are also six boolean fields that they track...for instance, "Low Income"...and I need to count the ones that are checked for each site. I know this is easy, and I could have swore I've done it before, but I cannot figure out how at this particular moment. John W Clark From tim at irwingreenhouses.com Fri Jan 16 11:17:53 2004 From: tim at irwingreenhouses.com (Tim Thiessen) Date: Fri, 16 Jan 2004 11:17:53 -0600 Subject: [AccessD] Grouping Query In-Reply-To: <008401c3dc50$05c81940$7800a8c0@timt> Message-ID: <008c01c3dc54$adf9d1e0$7800a8c0@timt> Never mind. I figured it out. You have to set the parameters in the Query Parameter Dialong box. -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Tim Thiessen Sent: Friday, January 16, 2004 10:44 AM To: 'Access Developers discussion and problem solving' Subject: RE: [AccessD] Grouping Query Thanks Stephen, I was not aware of the Partition Function. It works great. One other question. I am trying to use date parameters in the beginning query that looks at a form with date selector text boxes. The crosstab query then gives an error that it does not recognize the text boxes as a valid field name or expression. The beginning query runs just fine using this criteria. If I use the expression "Between #1/1/03# And #12/31/03#" as the criteria, the crosstab runs just fine. Any ideas? -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Stephen Bond Sent: Thursday, January 15, 2004 5:59 PM To: Access Developers discussion and problem solving Subject: RE: [AccessD] Grouping Query Tim, try adding a field to the query and use the Partition function. This will do the grouping for you nicely. New field looks something like this: PaidGroup: Partition([DatePaid],0,31,7) then your CrossTab query would have the 'PaidGroup' field as the column heading. HTH Stephen Bond Otatara, South Island, New Zealand > -----Original Message----- > From: Tim Thiessen [mailto:tim at irwingreenhouses.com] > Sent: Friday, 16 January 2004 10:30 a.m. > To: accessD at databaseadvisors.com > Subject: [AccessD] Grouping Query > > > Hi Group, > > I have a query that returns the following: > > PaymentTerms DatePaid CountOfPaid > COD 1 5 > COD 2 3 > COD 4 8 > COD 14 4 > COD 16 12 > Net 10-EOM 1 3 > Net 10-EOM 3 10 > Net 10-EOM 5 15 > Net 10-EOM 10 21 > > DatePaid is the day of the month in which payments are made. > CountOfPaid is > a count of the number of payments made on particular date. > What I need to > do is to be able to group this data into the following: > > PaymentTerms Paid1-6 Paid7-13 > Paid14-20 Paid21-27 Paid28-31 > COD 16 16 0 > 0 0 > Net10-EOM 28 21 0 > 0 0 > > I know this is a cross tab query but how do I get the > grouping in the first > place? > > Tim Thiessen > > _______________________________________________ > 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 From cfoust at infostatsystems.com Fri Jan 16 11:29:32 2004 From: cfoust at infostatsystems.com (Charlotte Foust) Date: Fri, 16 Jan 2004 09:29:32 -0800 Subject: [AccessD] I need a count of checkboxes in a report Message-ID: Sum the values of the checkbox fields. Charlotte Foust -----Original Message----- From: John Clark [mailto:John.Clark at niagaracounty.com] Sent: Friday, January 16, 2004 9:12 AM To: accessd at databaseadvisors.com Subject: [AccessD] I need a count of checkboxes in a report I'm trying to whip up a report for a client who uses one of my programs. They are tracking the meal sites for the elderly and I have provided a list, by site, with their client's names, age, gender, race, etc.. There are also six boolean fields that they track...for instance, "Low Income"...and I need to count the ones that are checked for each site. I know this is easy, and I could have swore I've done it before, but I cannot figure out how at this particular moment. John W Clark _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From martyconnelly at shaw.ca Fri Jan 16 11:52:49 2004 From: martyconnelly at shaw.ca (MartyConnelly) Date: Fri, 16 Jan 2004 09:52:49 -0800 Subject: [AccessD] Outlook SP3 References: <5B898D9F0627974EB82D0645E52B1E7D035CBA6F@EXMBPR03.na.mmfg.net> Message-ID: <400824F1.1020608@shaw.ca> I don't know if this was talked about here but this was released from Microsoft a couple of months ago. http://www.microsoft.com/downloads/details.aspx?FamilyId=8B081F3A-B7D0-4B16-B8AF-5A6322F4FD01&displaylang=en Outlook 2003 Add-in: Personal Folders Backup The Personal Folders Backup download creates backup copies of your .PST files at regular intervals, in Outlook 2000 and later versions, making it easy to keep all of your Outlook folders safely backed up. I wonder if it could be used when upgrading to a newer OS? -- Marty Connelly Victoria, B.C. Canada From garykjos at hotmail.com Fri Jan 16 11:59:45 2004 From: garykjos at hotmail.com (Gary Kjos) Date: Fri, 16 Jan 2004 11:59:45 -0600 Subject: [AccessD] I need a count of checkboxes in a report Message-ID: In your totals query do a sum on the Yes/No field times -1 to reverse the sign. ( -1 = Yes) CancelledLineCount: Sum([CancelFlag]*-1) Gary Kjos garykjos at hotmail.com >From: "John Clark" >Reply-To: Access Developers discussion and problem >solving >To: >Subject: [AccessD] I need a count of checkboxes in a report >Date: Fri, 16 Jan 2004 12:12:25 -0500 > >I'm trying to whip up a report for a client who uses one of my programs. >They are tracking the meal sites for the elderly and I have provided a >list, by site, with their client's names, age, gender, race, etc.. There >are also six boolean fields that they track...for instance, "Low >Income"...and I need to count the ones that are checked for each site. > >I know this is easy, and I could have swore I've done it before, but I >cannot figure out how at this particular moment. > >John W Clark >_______________________________________________ >AccessD mailing list >AccessD at databaseadvisors.com >http://databaseadvisors.com/mailman/listinfo/accessd >Website: http://www.databaseadvisors.com _________________________________________________________________ Find high-speed ?net deals ? comparison-shop your local providers here. https://broadband.msn.com From garykjos at hotmail.com Fri Jan 16 12:08:11 2004 From: garykjos at hotmail.com (Gary Kjos) Date: Fri, 16 Jan 2004 12:08:11 -0600 Subject: [AccessD] Wake up Call Program Message-ID: In the ontimer event for an open form, have some code that checks the current time against your trigger time. If it's not past that time, exit the timer event. Something like this; If Now() < dtNextUpdate Then Me!txtMessage = "Next automatic update will be attempted in " & DateDiff("n", Now(), dtNextUpdate) & " minutes at " & Format(dtNextUpdate, "h:nn:ss") Me.Repaint GoTo Exit_Form_Timer End If After this If statment, put your code to make the call. And you may also want to calculate the next trigger time and store that someplace so you don't keep calling over and over. And just don't call ME with it! Gary Kjos garykjos at hotmail.com >From: Ariel Computer >Reply-To: Access Developers discussion and problem >solving >To: accessd at databaseadvisors.com >Subject: [AccessD] Wake up Call Program >Date: Sat, 17 Jan 2004 01:02:28 +0800 > >Dear Friends, > >I really need some help for my problem :-( > >I want to create a small application that will dial a phone and play wav >file to make a wake up call. I already found windows TAPI OCX to do this >things. My problem just in timer event. Let say i have tblPhoneCall with >this field : > >Date Time Extention >01/01/04 14:00 100 >01/01/04 14:05 120 > >How can i use ontimer event or other trick so when the current time equal >to >tblphonecall.time the program will run phone dial function ? Please help. > >Thank you very much ! > >Hengky > >_______________________________________________ >AccessD mailing list >AccessD at databaseadvisors.com >http://databaseadvisors.com/mailman/listinfo/accessd >Website: http://www.databaseadvisors.com _________________________________________________________________ Get a FREE online virus check for your PC here, from McAfee. http://clinic.mcafee.com/clinic/ibuy/campaign.asp?cid=3963 From cfoust at infostatsystems.com Fri Jan 16 12:16:50 2004 From: cfoust at infostatsystems.com (Charlotte Foust) Date: Fri, 16 Jan 2004 10:16:50 -0800 Subject: [AccessD] I need a count of checkboxes in a report Message-ID: You don't even need to do that. Just use an Abs() function to return a positive value. Charlotte Foust -----Original Message----- From: Gary Kjos [mailto:garykjos at hotmail.com] Sent: Friday, January 16, 2004 10:00 AM To: accessd at databaseadvisors.com Subject: RE: [AccessD] I need a count of checkboxes in a report In your totals query do a sum on the Yes/No field times -1 to reverse the sign. ( -1 = Yes) CancelledLineCount: Sum([CancelFlag]*-1) Gary Kjos garykjos at hotmail.com >From: "John Clark" >Reply-To: Access Developers discussion and problem >solving >To: >Subject: [AccessD] I need a count of checkboxes in a report >Date: Fri, 16 Jan 2004 12:12:25 -0500 > >I'm trying to whip up a report for a client who uses one of my >programs. They are tracking the meal sites for the elderly and I have >provided a list, by site, with their client's names, age, gender, race, >etc.. There are also six boolean fields that they track...for instance, >"Low Income"...and I need to count the ones that are checked for each >site. > >I know this is easy, and I could have swore I've done it before, but I >cannot figure out how at this particular moment. > >John W Clark >_______________________________________________ >AccessD mailing list >AccessD at databaseadvisors.com >http://databaseadvisors.com/mailman/listinfo/accessd >Website: http://www.databaseadvisors.com _________________________________________________________________ Find high-speed 'net deals - comparison-shop your local providers here. https://broadband.msn.com _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From jimdettman at earthlink.net Fri Jan 16 12:33:08 2004 From: jimdettman at earthlink.net (Jim Dettman) Date: Fri, 16 Jan 2004 13:33:08 -0500 Subject: [AccessD] Wake up Call Program In-Reply-To: <018801c3dc52$869a6440$1000a8c0@default> Message-ID: Hengky, I have a time clock polling application that I can send along. It should be easily adaptable to what your doing. Just drop me an e-mail. Jim Dettman President, Online Computer Services of WNY, Inc. (315) 699-3443 jimdettman at earthlink.net -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Ariel Computer Sent: Friday, January 16, 2004 12:02 PM To: accessd at databaseadvisors.com Subject: [AccessD] Wake up Call Program Dear Friends, I really need some help for my problem :-( I want to create a small application that will dial a phone and play wav file to make a wake up call. I already found windows TAPI OCX to do this things. My problem just in timer event. Let say i have tblPhoneCall with this field : Date Time Extention 01/01/04 14:00 100 01/01/04 14:05 120 How can i use ontimer event or other trick so when the current time equal to tblphonecall.time the program will run phone dial function ? Please help. Thank you very much ! Hengky _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From John.Clark at niagaracounty.com Fri Jan 16 12:39:32 2004 From: John.Clark at niagaracounty.com (John Clark) Date: Fri, 16 Jan 2004 13:39:32 -0500 Subject: [AccessD] I need a count of checkboxes in a report Message-ID: how come it doesn't it let me do something like this right in the report? If I sum it or total it, I get a "Yes" or a "No". >>> cfoust at infostatsystems.com 01/16/04 01:16PM >>> You don't even need to do that. Just use an Abs() function to return a positive value. Charlotte Foust -----Original Message----- From: Gary Kjos [mailto:garykjos at hotmail.com] Sent: Friday, January 16, 2004 10:00 AM To: accessd at databaseadvisors.com Subject: RE: [AccessD] I need a count of checkboxes in a report In your totals query do a sum on the Yes/No field times -1 to reverse the sign. ( -1 = Yes) CancelledLineCount: Sum([CancelFlag]*-1) Gary Kjos garykjos at hotmail.com >From: "John Clark" >Reply-To: Access Developers discussion and problem >solving >To: >Subject: [AccessD] I need a count of checkboxes in a report >Date: Fri, 16 Jan 2004 12:12:25 -0500 > >I'm trying to whip up a report for a client who uses one of my >programs. They are tracking the meal sites for the elderly and I have >provided a list, by site, with their client's names, age, gender, race, >etc.. There are also six boolean fields that they track...for instance, >"Low Income"...and I need to count the ones that are checked for each >site. > >I know this is easy, and I could have swore I've done it before, but I >cannot figure out how at this particular moment. > >John W Clark >_______________________________________________ >AccessD mailing list >AccessD at databaseadvisors.com >http://databaseadvisors.com/mailman/listinfo/accessd >Website: http://www.databaseadvisors.com _________________________________________________________________ Find high-speed 'net deals - comparison-shop your local providers here. https://broadband.msn.com _______________________________________________ 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 From cfoust at infostatsystems.com Fri Jan 16 12:52:54 2004 From: cfoust at infostatsystems.com (Charlotte Foust) Date: Fri, 16 Jan 2004 10:52:54 -0800 Subject: [AccessD] I need a count of checkboxes in a report Message-ID: It may be the way you have your control formatted. If the calculated control is formatted as a yes/no value, then you'll get the equivalent of 0 = No and anything but zero = yes. Change the format to a number and use something like Abs(Sum([CancelFlag])) Charlotte Foust -----Original Message----- From: John Clark [mailto:John.Clark at niagaracounty.com] Sent: Friday, January 16, 2004 10:40 AM To: accessd at databaseadvisors.com Subject: RE: [AccessD] I need a count of checkboxes in a report how come it doesn't it let me do something like this right in the report? If I sum it or total it, I get a "Yes" or a "No". >>> cfoust at infostatsystems.com 01/16/04 01:16PM >>> You don't even need to do that. Just use an Abs() function to return a positive value. Charlotte Foust -----Original Message----- From: Gary Kjos [mailto:garykjos at hotmail.com] Sent: Friday, January 16, 2004 10:00 AM To: accessd at databaseadvisors.com Subject: RE: [AccessD] I need a count of checkboxes in a report In your totals query do a sum on the Yes/No field times -1 to reverse the sign. ( -1 = Yes) CancelledLineCount: Sum([CancelFlag]*-1) Gary Kjos garykjos at hotmail.com >From: "John Clark" >Reply-To: Access Developers discussion and problem >solving >To: >Subject: [AccessD] I need a count of checkboxes in a report >Date: Fri, 16 Jan 2004 12:12:25 -0500 > >I'm trying to whip up a report for a client who uses one of my >programs. They are tracking the meal sites for the elderly and I have >provided a list, by site, with their client's names, age, gender, race, >etc.. There are also six boolean fields that they track...for instance, >"Low Income"...and I need to count the ones that are checked for each >site. > >I know this is easy, and I could have swore I've done it before, but I >cannot figure out how at this particular moment. > >John W Clark >_______________________________________________ >AccessD mailing list >AccessD at databaseadvisors.com >http://databaseadvisors.com/mailman/listinfo/accessd >Website: http://www.databaseadvisors.com _________________________________________________________________ Find high-speed 'net deals - comparison-shop your local providers here. https://broadband.msn.com _______________________________________________ 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 _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From garykjos at hotmail.com Fri Jan 16 12:53:25 2004 From: garykjos at hotmail.com (Gary Kjos) Date: Fri, 16 Jan 2004 12:53:25 -0600 Subject: [AccessD] I need a count of checkboxes in a report Message-ID: To each their own. More than one way to skin a fish. Six of one, half dozen of the other. ;-) No you don't need to reverse the sign, but if you are just printing or e-mailing the query results as I mostly do, it is a easy way to get it looking right. Gary Kjos garykjos at hotmail.com >From: "Charlotte Foust" >Reply-To: Access Developers discussion and problem >solving >To: "Access Developers discussion and problem >solving" >Subject: RE: [AccessD] I need a count of checkboxes in a report >Date: Fri, 16 Jan 2004 10:16:50 -0800 > >You don't even need to do that. Just use an Abs() function to return a >positive value. > >Charlotte Foust > >-----Original Message----- >From: Gary Kjos [mailto:garykjos at hotmail.com] >Sent: Friday, January 16, 2004 10:00 AM >To: accessd at databaseadvisors.com >Subject: RE: [AccessD] I need a count of checkboxes in a report > > >In your totals query do a sum on the Yes/No field times -1 to reverse >the >sign. ( -1 = Yes) > >CancelledLineCount: Sum([CancelFlag]*-1) > > > >Gary Kjos >garykjos at hotmail.com > > > > > > >From: "John Clark" > >Reply-To: Access Developers discussion and problem > >solving > >To: > >Subject: [AccessD] I need a count of checkboxes in a report > >Date: Fri, 16 Jan 2004 12:12:25 -0500 > > > >I'm trying to whip up a report for a client who uses one of my > >programs. They are tracking the meal sites for the elderly and I have > >provided a list, by site, with their client's names, age, gender, race, > > >etc.. There are also six boolean fields that they track...for instance, > > >"Low Income"...and I need to count the ones that are checked for each > >site. > > > >I know this is easy, and I could have swore I've done it before, but I > >cannot figure out how at this particular moment. > > > >John W Clark > >_______________________________________________ > >AccessD mailing list > >AccessD at databaseadvisors.com > >http://databaseadvisors.com/mailman/listinfo/accessd > >Website: http://www.databaseadvisors.com > >_________________________________________________________________ >Find high-speed 'net deals - comparison-shop your local providers here. >https://broadband.msn.com > >_______________________________________________ >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 _________________________________________________________________ High-speed users?be more efficient online with the new MSN Premium Internet Software. http://join.msn.com/?pgmarket=en-us&page=byoa/prem&ST=1 From garykjos at hotmail.com Fri Jan 16 13:03:40 2004 From: garykjos at hotmail.com (Gary Kjos) Date: Fri, 16 Jan 2004 13:03:40 -0600 Subject: [AccessD] I need a count of checkboxes in a report Message-ID: Hmmmm. Works for me. Is your field a Yes/No data type? Gary Kjos garykjos at hotmail.com >From: "John Clark" >Reply-To: Access Developers discussion and problem >solving >To: >Subject: RE: [AccessD] I need a count of checkboxes in a report >Date: Fri, 16 Jan 2004 13:39:32 -0500 > >how come it doesn't it let me do something like this right in the >report? If I sum it or total it, I get a "Yes" or a "No". > > >>> cfoust at infostatsystems.com 01/16/04 01:16PM >>> >You don't even need to do that. Just use an Abs() function to return >a >positive value. > >Charlotte Foust > >-----Original Message----- >From: Gary Kjos [mailto:garykjos at hotmail.com] >Sent: Friday, January 16, 2004 10:00 AM >To: accessd at databaseadvisors.com >Subject: RE: [AccessD] I need a count of checkboxes in a report > > >In your totals query do a sum on the Yes/No field times -1 to reverse >the >sign. ( -1 = Yes) > >CancelledLineCount: Sum([CancelFlag]*-1) > > > >Gary Kjos >garykjos at hotmail.com > > _________________________________________________________________ Get a FREE online virus check for your PC here, from McAfee. http://clinic.mcafee.com/clinic/ibuy/campaign.asp?cid=3963 From garykjos at hotmail.com Fri Jan 16 13:03:42 2004 From: garykjos at hotmail.com (Gary Kjos) Date: Fri, 16 Jan 2004 13:03:42 -0600 Subject: [AccessD] I need a count of checkboxes in a report Message-ID: Hmmmm. Works for me. Is your field a Yes/No data type? Gary Kjos garykjos at hotmail.com >From: "John Clark" >Reply-To: Access Developers discussion and problem >solving >To: >Subject: RE: [AccessD] I need a count of checkboxes in a report >Date: Fri, 16 Jan 2004 13:39:32 -0500 > >how come it doesn't it let me do something like this right in the >report? If I sum it or total it, I get a "Yes" or a "No". > > >>> cfoust at infostatsystems.com 01/16/04 01:16PM >>> >You don't even need to do that. Just use an Abs() function to return >a >positive value. > >Charlotte Foust > >-----Original Message----- >From: Gary Kjos [mailto:garykjos at hotmail.com] >Sent: Friday, January 16, 2004 10:00 AM >To: accessd at databaseadvisors.com >Subject: RE: [AccessD] I need a count of checkboxes in a report > > >In your totals query do a sum on the Yes/No field times -1 to reverse >the >sign. ( -1 = Yes) > >CancelledLineCount: Sum([CancelFlag]*-1) > > > >Gary Kjos >garykjos at hotmail.com > > _________________________________________________________________ Let the new MSN Premium Internet Software make the most of your high-speed experience. http://join.msn.com/?pgmarket=en-us&page=byoa/prem&ST=1 From gustav at cactus.dk Fri Jan 16 13:03:53 2004 From: gustav at cactus.dk (Gustav Brock) Date: Fri, 16 Jan 2004 20:03:53 +0100 Subject: [AccessD] I need a count of checkboxes in a report In-Reply-To: References: Message-ID: <17839353176.20040116200353@cactus.dk> Hi Gary Or: CancelledLineCount: Sum(-[CancelFlag]) CancelledLineCount: -Sum([CancelFlag]) However, in these days where you cannot be sure wether True is 1 or -1, I prefer Charlotte's method myself - prepares for portable code. /gustav > To each their own. More than one way to skin a fish. Six of one, half dozen > of the other. ;-) > No you don't need to reverse the sign, but if you are just printing or > e-mailing the query results as I mostly do, it is a easy way to get it > looking right. >>You don't even need to do that. Just use an Abs() function to return a >>positive value. >>In your totals query do a sum on the Yes/No field times -1 to reverse >>the sign. ( -1 = Yes) >> >>CancelledLineCount: Sum([CancelFlag]*-1) From John.Clark at niagaracounty.com Fri Jan 16 13:13:50 2004 From: John.Clark at niagaracounty.com (John Clark) Date: Fri, 16 Jan 2004 14:13:50 -0500 Subject: [AccessD] I need a count of checkboxes in a report Message-ID: I am going to have myself tested for some mental deficiency, after work today. Yes, as y'all guessed, my fields were formatted to 'Yes/No'. To be honest I didn't know this was an option here. I used the wizard...big mistake...I usually do it myself...because I thought it would save me time and apparently it defaulted to this format. Why anybody would want a 'Yes/No' format on a 'Sum' calculation is beyond me. Thank you again...Charlotte, Gustav, Gary, etc.!!!!! I feel like such a moron! This the day after I challange my bosses perception of me compared to his favorite free-lancer. AAAAAHHHHHH!! I am really angry with myself, at the moment. Take care all!!! John W Clark >>> garykjos at hotmail.com 01/16/04 02:03PM >>> Hmmmm. Works for me. Is your field a Yes/No data type? Gary Kjos garykjos at hotmail.com >From: "John Clark" >Reply-To: Access Developers discussion and problem >solving >To: >Subject: RE: [AccessD] I need a count of checkboxes in a report >Date: Fri, 16 Jan 2004 13:39:32 -0500 > >how come it doesn't it let me do something like this right in the >report? If I sum it or total it, I get a "Yes" or a "No". > > >>> cfoust at infostatsystems.com 01/16/04 01:16PM >>> >You don't even need to do that. Just use an Abs() function to return >a >positive value. > >Charlotte Foust > >-----Original Message----- >From: Gary Kjos [mailto:garykjos at hotmail.com] >Sent: Friday, January 16, 2004 10:00 AM >To: accessd at databaseadvisors.com >Subject: RE: [AccessD] I need a count of checkboxes in a report > > >In your totals query do a sum on the Yes/No field times -1 to reverse >the >sign. ( -1 = Yes) > >CancelledLineCount: Sum([CancelFlag]*-1) > > > >Gary Kjos >garykjos at hotmail.com > > _________________________________________________________________ Let the new MSN Premium Internet Software make the most of your high-speed experience. http://join.msn.com/?pgmarket=en-us&page=byoa/prem&ST=1 _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From DWUTKA at marlow.com Fri Jan 16 13:22:30 2004 From: DWUTKA at marlow.com (DWUTKA at marlow.com) Date: Fri, 16 Jan 2004 13:22:30 -0600 Subject: [AccessD] Wake up Call Program Message-ID: <2F8793082E00D4119A1700B0D0216BF802227760@main2.marlow.com> I would say that your best approach would be to build a Class that holds a date, time and boolean variable. Then have your timer fire, and look through a list of the classes in a collection. Have the Class determine if it has fired for that day (by comparing the date with Date() and seeing if the boolean is set or not. If it's the next day, unset the boolean. If the boolean isn't set, and the day is yesterday, then see if the time is greater then Time(). If no, do nothing, if yes change the date variable to today, and set the boolean. Drew -----Original Message----- From: Ariel Computer [mailto:arielcom at indosat.net.id] Sent: Friday, January 16, 2004 11:02 AM To: accessd at databaseadvisors.com Subject: [AccessD] Wake up Call Program Dear Friends, I really need some help for my problem :-( I want to create a small application that will dial a phone and play wav file to make a wake up call. I already found windows TAPI OCX to do this things. My problem just in timer event. Let say i have tblPhoneCall with this field : Date Time Extention 01/01/04 14:00 100 01/01/04 14:05 120 How can i use ontimer event or other trick so when the current time equal to tblphonecall.time the program will run phone dial function ? Please help. Thank you very much ! Hengky _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From garykjos at hotmail.com Fri Jan 16 14:40:47 2004 From: garykjos at hotmail.com (Gary Kjos) Date: Fri, 16 Jan 2004 14:40:47 -0600 Subject: [AccessD] I need a count of checkboxes in a report Message-ID: >>>>prepares for portable code > >/gustav<<<< Understood. Has yet to have been an issue for me. Most of my stuff is one time use. Gary Kjos garykjos at hotmail.com _________________________________________________________________ Learn how to choose, serve, and enjoy wine at Wine @ MSN. http://wine.msn.com/ From garykjos at hotmail.com Fri Jan 16 14:43:00 2004 From: garykjos at hotmail.com (Gary Kjos) Date: Fri, 16 Jan 2004 14:43:00 -0600 Subject: [AccessD] I need a count of checkboxes in a report Message-ID: Don't beat yourself up on it John. Just laugh and move on. Have a great weekend! Gary Kjos garykjos at hotmail.com _________________________________________________________________ Scope out the new MSN Plus Internet Software ? optimizes dial-up to the max! http://join.msn.com/?pgmarket=en-us&page=byoa/plus&ST=1 From mastercafe at ctv.es Fri Jan 16 19:22:55 2004 From: mastercafe at ctv.es (MastercafeCTV) Date: Sat, 17 Jan 2004 02:22:55 +0100 Subject: [AccessD] DirectX In-Reply-To: Message-ID: <000001c3dc98$6f78e700$69fa2250@servercafe> Is possible use the DirectX interface on Access 2k or XP?? Thanks Juan =========================================== MASTERCAFE SL - NIF B-82.617.614 www.mastercafe.com Deleg. Asturias Tel 985.88.49.44 / 627.531.764 Fax 627.500.205 info at mastercafe.com juan at mastercafe.com Deleg. Madrid Tel 627.474.285 cecilia at mastercafe.com =========================================== From arielcom at indosat.net.id Fri Jan 16 19:49:02 2004 From: arielcom at indosat.net.id (Hengky Lie) Date: Sat, 17 Jan 2004 09:49:02 +0800 Subject: [AccessD] Wake up Call Program References: Message-ID: <004e01c3dc9c$169813a0$1000a8c0@default> Thanks You Jim ! You can use my email : arielcom at indosat.net.id ----- Original Message ----- From: "Jim Dettman" To: "Access Developers discussion and problem solving" Sent: Saturday, January 17, 2004 2:33 AM Subject: RE: [AccessD] Wake up Call Program > Hengky, > > I have a time clock polling application that I can send along. It should > be easily adaptable to what your doing. Just drop me an e-mail. > > Jim Dettman > President, > Online Computer Services of WNY, Inc. > (315) 699-3443 > jimdettman at earthlink.net From arielcom at indosat.net.id Fri Jan 16 19:54:10 2004 From: arielcom at indosat.net.id (Hengky Lie) Date: Sat, 17 Jan 2004 09:54:10 +0800 Subject: [AccessD] Wake up Call Program References: <2F8793082E00D4119A1700B0D0216BF802227760@main2.marlow.com> Message-ID: <005801c3dc9c$d11d67c0$1000a8c0@default> How to build a class ? Sorry, my Access level still below than average :-( ----- Original Message ----- From: To: Sent: Saturday, January 17, 2004 3:22 AM Subject: RE: [AccessD] Wake up Call Program > I would say that your best approach would be to build a Class that holds a > date, time and boolean variable. > > Then have your timer fire, and look through a list of the classes in a > collection. Have the Class determine if it has fired for that day (by > comparing the date with Date() and seeing if the boolean is set or not. If > it's the next day, unset the boolean. If the boolean isn't set, and the day > is yesterday, then see if the time is greater then Time(). If no, do > nothing, if yes change the date variable to today, and set the boolean. > > Drew From DWUTKA at marlow.com Sat Jan 17 02:48:49 2004 From: DWUTKA at marlow.com (DWUTKA at marlow.com) Date: Sat, 17 Jan 2004 02:48:49 -0600 Subject: [AccessD] Wake up Call Program Message-ID: <2F8793082E00D4119A1700B0D0216BF802227764@main2.marlow.com> Yikes, that is a relatively difficult task to hit out of the blue. If you don't find any other method, give me a holler. Drew -----Original Message----- From: Hengky Lie [mailto:arielcom at indosat.net.id] Sent: Friday, January 16, 2004 7:54 PM To: Access Developers discussion and problem solving Subject: Re: [AccessD] Wake up Call Program How to build a class ? Sorry, my Access level still below than average :-( ----- Original Message ----- From: To: Sent: Saturday, January 17, 2004 3:22 AM Subject: RE: [AccessD] Wake up Call Program > I would say that your best approach would be to build a Class that holds a > date, time and boolean variable. > > Then have your timer fire, and look through a list of the classes in a > collection. Have the Class determine if it has fired for that day (by > comparing the date with Date() and seeing if the boolean is set or not. If > it's the next day, unset the boolean. If the boolean isn't set, and the day > is yesterday, then see if the time is greater then Time(). If no, do > nothing, if yes change the date variable to today, and set the boolean. > > Drew _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From jwcolby at colbyconsulting.com Sat Jan 17 09:48:46 2004 From: jwcolby at colbyconsulting.com (John W. Colby) Date: Sat, 17 Jan 2004 10:48:46 -0500 Subject: [AccessD] Wake up Call Program In-Reply-To: <005801c3dc9c$d11d67c0$1000a8c0@default> Message-ID: Hengky, I have whipped out a pair of classes to do something close to what you are asking for. The first class is used to track each thing that needs to be run (assuming once a day). In order to create a class, go to the VB Editor, click Insert / Class. Into that paste the following (you may need to get rid of the option statements), then save it as clsWakeup Option Compare Database Option Explicit ' 'This class holds information about a single wakeup ' Private mdteLastRan As Date 'The last date a wakeup was done Private mdteTimeToRun As Date 'The time to say wakeup Private mstrProcessName As String 'The process name needing woken up ' 'The class_Initialize is similar to Form_Open in that it always runs ONE time as a class opens 'Use this to initialize the LastDateRan variable ' Private Sub Class_Initialize() mdteLastRan = Date - 1 End Sub ' 'Each instance of this class will hold a time to run (wakeup) 'And a process to wakeup ' Function Init(ldteTimeToRun As Date, lstrProcessName As String) mdteTimeToRun = ldteTimeToRun mstrProcessName = lstrProcessName End Function ' 'This function checks whether the process has run in the last 24 hours 'If so it returns true and passes back the process name in a string variable 'passed in ' Function Run(lstrProcessName) As Boolean 'Hasn't run today so check if the time is > mdetTimeToRun If Time() > mdteTimeToRun Then If Date > mdteLastRan Then 'Mark mdteLastRun = Now() mdteLastRan = Date 'and return true lstrProcessName = mstrProcessName Run = True End If End If End Function *************** The class above in instantiated once for each call to be placed in your case The next class is a "supervisor" class that contains a collection of clsWakeup (the class above). It is instantiated once in a form. The supervisor class manages the collection of wakeup classes, adding them in on demand, and closing them down as the form closes. It also polls each clsWakeup in the collection once every time its method CheckWakeup is called. Again, in the editor click insert / class and paste the following in. *************** Option Compare Database Option Explicit 'A collection to hold instances of clsWakeup Private colClsWakeup As Collection 'An event to raise if a clsWakeup instance says its time to wakeup Public Event ProcessTime(lstrProcessName As String) ' 'The class_Initialize is similar to Form_Open in that it always runs ONE time as a class opens 'Use this to create the collection to hold the wakeup classes ' Private Sub Class_Initialize() Set colClsWakeup = New Collection End Sub ' 'Class_Terminate is similar to Form_Close and always runs ONCE as the class terminates 'Use it to unload all the clsWakeup instances in the collection ' Private Sub Class_Terminate() term End Sub ' 'As the supervisor class closes, it must unload all the clsWakeup instances in its collection ' Function term() On Error Resume Next While colClsWakeup.Count > 0 colClsWakeup.Remove (1) Wend End Function ' 'This function is responsible for creating one instance of clsWakeup every time it is called ' Function NewWakeup(ldteTimeToRun As Date, lstrProcessName As String) Dim lclsWakeup As clsWakeup Set lclsWakeup = New clsWakeup 'It then initializes that instance with the TimeToRun and the ProcessName lclsWakeup.Init ldteTimeToRun, lstrProcessName 'And finally, it saves a pointer to the clsWakeup instance just created in the collection colClsWakeup.Add lclsWakeup, lstrProcessName End Function ' 'CheckWakeup is called by a timer tick on a form. It cycles through all the instances of clsWakeup 'in its collection asking each instance if it's time for that instance to run. ' Function CheckWakeup() Dim lclsWakeup As clsWakeup Dim lstrProcessName As String For Each lclsWakeup In colClsWakeup 'Check each instance of clsWakeup If lclsWakeup.Run(lstrProcessName) Then 'If time to run then RaiseEvent ProcessTime(lstrProcessName) 'Raise an event telling the world End If Next lclsWakeup End Function ************** OK, so the class above must be created once in a form whose timer will call the CheckWakup method to look for wakeups to be performed. Notice that I use Raisevent to pass back to the calling form each object in the class that needs servicing. So, now we need a form to allow us to manually "program" the supervisor with times and processes to wakeup, a status to show that something is happening, and a control to display that a process was awakened. You need to build a form with 4 text boxes named txtNewTime and txtProcessName (used to enter the time and process name to wake up), txtStatus to display a status message, and txtWakingUp to display the name of the process waking up. Also a Command6 command button to close the form. Then in the text editor to display the form's module and paste the following in: ************** Option Compare Database Option Explicit ' 'Dimension a supervisor class Withevents ' Private WithEvents fclsWakeupSupervisor As clsWakeupSupervisor ' 'When the form closes we need to unload the supervisor class ' Private Sub Form_Close() Set fclsWakeupSupervisor = Nothing End Sub ' 'When the form opens we need to create an instance of the supervisor class ' Private Sub Form_Open(Cancel As Integer) Set fclsWakeupSupervisor = New clsWakeupSupervisor End Sub ' 'The close button (standard stuff) ' Private Sub Command6_Click() On Error GoTo Err_Command6_Click DoCmd.Close Exit_Command6_Click: Exit Sub Err_Command6_Click: MsgBox Err.Description Resume Exit_Command6_Click End Sub ' 'The form's timer event will be used to call the supervisor class' CheckWakeup method ' Private Sub Form_Timer() 'Erase the last value to make clear that it only was set once / 24 hours txtWakingUp.Value = "" 'And write a status to the status box to make clear that we are calling this every 10 seconds txtStatus.Value = "Checked wakeup list at: " & Now 'Then call the supervisor's CheckWakup method fclsWakeupSupervisor.CheckWakeup End Sub ' 'This is a very simple way of programming the processes that need to be wakened every day ' Private Sub txtProcessName_AfterUpdate() 'pass in the time to do the wakeup and the process name of the process to wake up '!!!!notice no error handling such as was anything entered in time!!!! fclsWakeupSupervisor.NewWakeup txtNewTime.Value, txtProcessName.Value 'if the form timer is not initialized, then set the interval to 10 seconds If Me.TimerInterval = 0 Then Me.TimerInterval = 10000 End If End Sub ' 'This is the event from the supervisor that will be raised if any process needs to be awakened. ' Private Sub fclsWakeupSupervisor_ProcessTime(lstrProcessName As String) txtWakingUp.Value = lstrProcessName End Sub ****************************************** Ok, so the idea is that the user opens the form, which loads the supervisor class. The user then enters times and process names into the two text boxes for this purpose. As soon as the first process is entered the timer starts ticking and every 10 seconds checks are made whether to wake someone up. If any process needs to be awakened, fclsWakeupSupervisor_ProcessTime(lstrProcessName As String) is called passing in the name of the process to awaken. The developer would put a function call in fclsWakeupSupervisor_ProcessTime to do whatever they want done once a day. I will eventually get this up on my web site as a Withevents demo. For now I am sending the entire database to John W. Colby www.ColbyConsulting.com -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Hengky Lie Sent: Friday, January 16, 2004 8:54 PM To: Access Developers discussion and problem solving Subject: Re: [AccessD] Wake up Call Program How to build a class ? Sorry, my Access level still below than average :-( ----- Original Message ----- From: To: Sent: Saturday, January 17, 2004 3:22 AM Subject: RE: [AccessD] Wake up Call Program > I would say that your best approach would be to build a Class that holds a > date, time and boolean variable. > > Then have your timer fire, and look through a list of the classes in a > collection. Have the Class determine if it has fired for that day (by > comparing the date with Date() and seeing if the boolean is set or not. If > it's the next day, unset the boolean. If the boolean isn't set, and the day > is yesterday, then see if the time is greater then Time(). If no, do > nothing, if yes change the date variable to today, and set the boolean. > > Drew _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From jwcolby at colbyconsulting.com Sat Jan 17 09:51:17 2004 From: jwcolby at colbyconsulting.com (John W. Colby) Date: Sat, 17 Jan 2004 10:51:17 -0500 Subject: [AccessD] Wake up Call Program In-Reply-To: <005801c3dc9c$d11d67c0$1000a8c0@default> Message-ID: Hengky, I have whipped out a pair of classes to do something close to what you are asking for. The first class is used to track each thing that needs to be run (assuming once a day). In order to create a class, go to the VB Editor, click Insert / Class. Into that paste the following (you may need to get rid of the option statements), then save it as clsWakeup Option Compare Database Option Explicit ' 'This class holds information about a single wakeup ' Private mdteLastRan As Date 'The last date a wakeup was done Private mdteTimeToRun As Date 'The time to say wakeup Private mstrProcessName As String 'The process name needing woken up ' 'The class_Initialize is similar to Form_Open in that it always runs ONE time as a class opens 'Use this to initialize the LastDateRan variable ' Private Sub Class_Initialize() mdteLastRan = Date - 1 End Sub ' 'Each instance of this class will hold a time to run (wakeup) 'And a process to wakeup ' Function Init(ldteTimeToRun As Date, lstrProcessName As String) mdteTimeToRun = ldteTimeToRun mstrProcessName = lstrProcessName End Function ' 'This function checks whether the process has run in the last 24 hours 'If so it returns true and passes back the process name in a string variable 'passed in ' Function Run(lstrProcessName) As Boolean 'Hasn't run today so check if the time is > mdetTimeToRun If Time() > mdteTimeToRun Then If Date > mdteLastRan Then 'Mark mdteLastRun = Now() mdteLastRan = Date 'and return true lstrProcessName = mstrProcessName Run = True End If End If End Function *************** The class above in instantiated once for each call to be placed in your case The next class is a "supervisor" class that contains a collection of clsWakeup (the class above). It is instantiated once in a form. The supervisor class manages the collection of wakeup classes, adding them in on demand, and closing them down as the form closes. It also polls each clsWakeup in the collection once every time its method CheckWakeup is called. Again, in the editor click insert / class and paste the following in. *************** Option Compare Database Option Explicit 'A collection to hold instances of clsWakeup Private colClsWakeup As Collection 'An event to raise if a clsWakeup instance says its time to wakeup Public Event ProcessTime(lstrProcessName As String) ' 'The class_Initialize is similar to Form_Open in that it always runs ONE time as a class opens 'Use this to create the collection to hold the wakeup classes ' Private Sub Class_Initialize() Set colClsWakeup = New Collection End Sub ' 'Class_Terminate is similar to Form_Close and always runs ONCE as the class terminates 'Use it to unload all the clsWakeup instances in the collection ' Private Sub Class_Terminate() term End Sub ' 'As the supervisor class closes, it must unload all the clsWakeup instances in its collection ' Function term() On Error Resume Next While colClsWakeup.Count > 0 colClsWakeup.Remove (1) Wend End Function ' 'This function is responsible for creating one instance of clsWakeup every time it is called ' Function NewWakeup(ldteTimeToRun As Date, lstrProcessName As String) Dim lclsWakeup As clsWakeup Set lclsWakeup = New clsWakeup 'It then initializes that instance with the TimeToRun and the ProcessName lclsWakeup.Init ldteTimeToRun, lstrProcessName 'And finally, it saves a pointer to the clsWakeup instance just created in the collection colClsWakeup.Add lclsWakeup, lstrProcessName End Function ' 'CheckWakeup is called by a timer tick on a form. It cycles through all the instances of clsWakeup 'in its collection asking each instance if it's time for that instance to run. ' Function CheckWakeup() Dim lclsWakeup As clsWakeup Dim lstrProcessName As String For Each lclsWakeup In colClsWakeup 'Check each instance of clsWakeup If lclsWakeup.Run(lstrProcessName) Then 'If time to run then RaiseEvent ProcessTime(lstrProcessName) 'Raise an event telling the world End If Next lclsWakeup End Function ************** OK, so the class above must be created once in a form whose timer will call the CheckWakup method to look for wakeups to be performed. Notice that I use Raisevent to pass back to the calling form each object in the class that needs servicing. So, now we need a form to allow us to manually "program" the supervisor with times and processes to wakeup, a status to show that something is happening, and a control to display that a process was awakened. You need to build a form with 4 text boxes named txtNewTime and txtProcessName (used to enter the time and process name to wake up), txtStatus to display a status message, and txtWakingUp to display the name of the process waking up. Also a Command6 command button to close the form. Then in the text editor to display the form's module and paste the following in: ************** Option Compare Database Option Explicit ' 'Dimension a supervisor class Withevents ' Private WithEvents fclsWakeupSupervisor As clsWakeupSupervisor ' 'When the form closes we need to unload the supervisor class ' Private Sub Form_Close() Set fclsWakeupSupervisor = Nothing End Sub ' 'When the form opens we need to create an instance of the supervisor class ' Private Sub Form_Open(Cancel As Integer) Set fclsWakeupSupervisor = New clsWakeupSupervisor End Sub ' 'The close button (standard stuff) ' Private Sub Command6_Click() On Error GoTo Err_Command6_Click DoCmd.Close Exit_Command6_Click: Exit Sub Err_Command6_Click: MsgBox Err.Description Resume Exit_Command6_Click End Sub ' 'The form's timer event will be used to call the supervisor class' CheckWakeup method ' Private Sub Form_Timer() 'Erase the last value to make clear that it only was set once / 24 hours txtWakingUp.Value = "" 'And write a status to the status box to make clear that we are calling this every 10 seconds txtStatus.Value = "Checked wakeup list at: " & Now 'Then call the supervisor's CheckWakup method fclsWakeupSupervisor.CheckWakeup End Sub ' 'This is a very simple way of programming the processes that need to be wakened every day ' Private Sub txtProcessName_AfterUpdate() 'pass in the time to do the wakeup and the process name of the process to wake up '!!!!notice no error handling such as was anything entered in time!!!! fclsWakeupSupervisor.NewWakeup txtNewTime.Value, txtProcessName.Value 'if the form timer is not initialized, then set the interval to 10 seconds If Me.TimerInterval = 0 Then Me.TimerInterval = 10000 End If End Sub ' 'This is the event from the supervisor that will be raised if any process needs to be awakened. ' Private Sub fclsWakeupSupervisor_ProcessTime(lstrProcessName As String) txtWakingUp.Value = lstrProcessName End Sub ****************************************** Ok, so the idea is that the user opens the form, which loads the supervisor class. The user then enters times and process names into the two text boxes for this purpose. As soon as the first process is entered the timer starts ticking and every 10 seconds checks are made whether to wake someone up. If any process needs to be awakened, fclsWakeupSupervisor_ProcessTime(lstrProcessName As String) is called passing in the name of the process to awaken. The developer would put a function call in fclsWakeupSupervisor_ProcessTime to do whatever they want done once a day. I will eventually get this up on my web site as a Withevents demo. For now I am sending the entire database to John W. Colby www.ColbyConsulting.com -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Hengky Lie Sent: Friday, January 16, 2004 8:54 PM To: Access Developers discussion and problem solving Subject: Re: [AccessD] Wake up Call Program How to build a class ? Sorry, my Access level still below than average :-( John W. Colby www.ColbyConsulting.com -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Hengky Lie Sent: Friday, January 16, 2004 8:54 PM To: Access Developers discussion and problem solving Subject: Re: [AccessD] Wake up Call Program How to build a class ? Sorry, my Access level still below than average :-( From greggs at msn.com Sat Jan 17 11:13:06 2004 From: greggs at msn.com (Gregg) Date: Sat, 17 Jan 2004 11:13:06 -0600 Subject: [AccessD] Database Security In-Reply-To: <200401130007.i0D07wm31666@databaseadvisors.com> Message-ID: Is there some magical way to keep an employee from burning a copy of the database to a CD? The customer does not want to restrict use of CD burning so... if not.... is there a way to encrypt the database with a password? I see the user level security will encrypt it for those users but I would rather not have the hassles of turning that on. If I could encrypt with a password that I could pass through in code, I wouldn't worry if anyone took it. if not.... is SQL a better answer? Gregg Steinbrenner From jwcolby at colbyconsulting.com Sat Jan 17 12:01:50 2004 From: jwcolby at colbyconsulting.com (John W. Colby) Date: Sat, 17 Jan 2004 13:01:50 -0500 Subject: [AccessD] C2DbWakeup Message-ID: For anyone interested, the wakeup class demo requested by Hengky Lie has been added to my web site. Click the fifth button from the bottom - Withevents demo. The bottom item on the page C2DbWakeup.zip will download the demo to your computer. John W. Colby www.ColbyConsulting.com From Subscriptions at servicexp.com Sat Jan 17 12:15:20 2004 From: Subscriptions at servicexp.com (Robert Gracie) Date: Sat, 17 Jan 2004 13:15:20 -0500 Subject: [AccessD] C2DbWakeup In-Reply-To: Message-ID: Thank You John! Robert Gracie -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of John W. Colby Sent: Saturday, January 17, 2004 1:02 PM To: AccessD Subject: [AccessD] C2DbWakeup For anyone interested, the wakeup class demo requested by Hengky Lie has been added to my web site. Click the fifth button from the bottom - Withevents demo. The bottom item on the page C2DbWakeup.zip will download the demo to your computer. John W. Colby www.ColbyConsulting.com _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From gustav at cactus.dk Sat Jan 17 13:03:23 2004 From: gustav at cactus.dk (Gustav Brock) Date: Sat, 17 Jan 2004 20:03:23 +0100 Subject: [AccessD] Database Security In-Reply-To: References: Message-ID: <12137332040.20040117200323@cactus.dk> Hi Gregg If this is Access 97 you may look up in the archives from 2002-10-01: A97 database password It's quick to set and with the speed of today's machines the users wouldn't note any difference. Of course, if the users are allowed to copy files you will need to move the data off a file which the users can locate. This can be done by using an SQL engine, moving your app to a terminal server, or I guess (haven't tried and it may perform too slowly) by opening an Access database on a remote machine which has attached tables from a third machine where users cannot log in ... /gustav > Is there some magical way to keep an employee from burning a copy of the > database to a CD? The customer does not want to restrict use of CD burning > so... > if not.... > is there a way to encrypt the database with a password? I see the user > level security will encrypt it for those users but I would rather not have > the hassles of turning that on. If I could encrypt with a password that I > could pass through in code, I wouldn't worry if anyone took it. > if not.... > is SQL a better answer? > Gregg Steinbrenner From JHewson at karta.com Sat Jan 17 13:03:49 2004 From: JHewson at karta.com (Jim Hewson) Date: Sat, 17 Jan 2004 13:03:49 -0600 Subject: [AccessD] Database Security Message-ID: <4AE733BBEEE72647A9F950F7275F262E1126F9@nt04.karta.com> Gregg, This is what I did. It's working. I have a database that shouldn't be moved from the directory where it resides. I renamed the primary table. I created a link to the primary table to itself. I renamed the link to the original table name. The database works... All the fields, queries, etc. If the database is moved to any other location an error message pops up and closes the database but leaves the Access window open. Any feedback on this method would be appreciated. Jim -----Original Message----- From: Gregg [mailto:greggs at msn.com] Sent: Saturday, January 17, 2004 11:13 AM To: Access Developers discussion and problem solving Subject: [AccessD] Database Security Is there some magical way to keep an employee from burning a copy of the database to a CD? The customer does not want to restrict use of CD burning so... if not.... is there a way to encrypt the database with a password? I see the user level security will encrypt it for those users but I would rather not have the hassles of turning that on. If I could encrypt with a password that I could pass through in code, I wouldn't worry if anyone took it. if not.... is SQL a better answer? Gregg Steinbrenner _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From michael.mattys at adelphia.net Sat Jan 17 13:23:26 2004 From: michael.mattys at adelphia.net (Michael R Mattys) Date: Sat, 17 Jan 2004 14:23:26 -0500 Subject: [AccessD] C2DbWakeup References: Message-ID: <020901c3dd2f$6587b5e0$6401a8c0@default> John, I just had a look at your demo and just wanted to offer that you could put in something like the following 'Module Public Declare Function WinExec Lib "kernel32" _ (ByVal lpCmdLine As String, ByVal nCmdShow As Long) As Long 'clsWakeUp Function Run(lstrProcessName) As Boolean 'Hasn't run today so check if the time is > mdetTimeToRun If time() > mdteTimeToRun Then If Date > mdteLastRan Then Dim lngProc As Long lngProc = WinExec(mstrProcessName, 1) 'Mark mdteLastRun = Now() mdteLastRan = Date 'and return true lstrProcessName = mstrProcessName Run = True End If End If End Function Michael R. Mattys Try MattysMapLib for MapPoint at www.mattysconsulting.com ----- Original Message ----- From: "John W. Colby" To: "AccessD" Sent: Saturday, January 17, 2004 1:01 PM Subject: [AccessD] C2DbWakeup > For anyone interested, the wakeup class demo requested by Hengky Lie has > been added to my web site. Click the fifth button from the bottom - > Withevents demo. The bottom item on the page C2DbWakeup.zip will download > the demo to your computer. > > John W. Colby > www.ColbyConsulting.com > > > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com From jwcolby at colbyconsulting.com Sat Jan 17 13:44:13 2004 From: jwcolby at colbyconsulting.com (John W. Colby) Date: Sat, 17 Jan 2004 14:44:13 -0500 Subject: [AccessD] C2DbWakeup In-Reply-To: <020901c3dd2f$6587b5e0$6401a8c0@default> Message-ID: Fascinating. This runs a program called mstrProcessName I assume? I think I would put that at the supervisor level (or event the form level) so that the supervisor (or form) could decide whether the thing needing awakened is an external program or not. Nice idea though. John W. Colby www.ColbyConsulting.com -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Michael R Mattys Sent: Saturday, January 17, 2004 2:23 PM To: Access Developers discussion and problem solving Subject: Re: [AccessD] C2DbWakeup John, I just had a look at your demo and just wanted to offer that you could put in something like the following 'Module Public Declare Function WinExec Lib "kernel32" _ (ByVal lpCmdLine As String, ByVal nCmdShow As Long) As Long 'clsWakeUp Function Run(lstrProcessName) As Boolean 'Hasn't run today so check if the time is > mdetTimeToRun If time() > mdteTimeToRun Then If Date > mdteLastRan Then Dim lngProc As Long lngProc = WinExec(mstrProcessName, 1) 'Mark mdteLastRun = Now() mdteLastRan = Date 'and return true lstrProcessName = mstrProcessName Run = True End If End If End Function Michael R. Mattys Try MattysMapLib for MapPoint at www.mattysconsulting.com ----- Original Message ----- From: "John W. Colby" To: "AccessD" Sent: Saturday, January 17, 2004 1:01 PM Subject: [AccessD] C2DbWakeup > For anyone interested, the wakeup class demo requested by Hengky Lie has > been added to my web site. Click the fifth button from the bottom - > Withevents demo. The bottom item on the page C2DbWakeup.zip will download > the demo to your computer. > > John W. Colby > www.ColbyConsulting.com > > > _______________________________________________ > 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 From dwaters at usinternet.com Sat Jan 17 17:39:38 2004 From: dwaters at usinternet.com (Dan Waters) Date: Sat, 17 Jan 2004 17:39:38 -0600 Subject: [AccessD] Menu Bar in VBA IDE Message-ID: <000001c3dd53$2f0ea9a0$de1811d8@DanWaters> Help! Somehow I closed the Menu Bar for the VBA IDE window, and I can't get it back. I've gone into the Toolbars dialog where the Menu Bar checkbox is checked. But, I can't uncheck it so I can recheck it. I've uninstalled Access (XP) and reinstalled but no joy. I've run Registry Mechanic looking for problems but none were reported. Anyone know how to fix this? Thanks, Dan Waters From Lambert.Heenan at AIG.com Wed Jan 14 12:06:45 2004 From: Lambert.Heenan at AIG.com (Heenan, Lambert) Date: Wed, 14 Jan 2004 13:06:45 -0500 Subject: [AccessD] Withevents vs Implements Message-ID: <8B98F8EA48F8BA47A2F24E0D0AF40CF407AD7CBE@xlivmbx12.aig.com> Hey John, I was reading the chapter you referred us to and I wondered who wrote the part about building the event handler stubs. It says: "The easiest way to get an event handler built is to simply place a control of the type you desire in a form, name the control exactly what you will call it in your class, open the properties box for that control, then use the code builder to build the event stub. Now cut the event stub out of the form's module and paste it into your own class." This cumbersome procedure works, but there's a much simpler way to do it. In the class that's got the WithEvents objects declared, select the object name from the left-hand combobox in the module window. The right-hand combobox will then list all the possible events for the object selected. If you then choose one of those events a stub event handler will be created in the module, complete with all the parameters it needs. I'm surprised no-one noticed that before! Something to update in the 2nd edition? :-) Lambert > -----Original Message----- > From: John W. Colby [SMTP:jwcolby at colbyconsulting.com] > Sent: Tuesday, January 13, 2004 9:05 PM > To: Access Developers discussion and problem solving > Subject: [AccessD] Withevents vs Implements > > Robert, > > >Why not use Implements instead of WithEvents? > > They are not the same thing at all. Implements is interface inheritance, > i.e. subclassing the exposed global data and method DEFINITIONS of an > object. In some circles it is also called a Contract - "I agree to > provide > similar functionality and data as the object that I am implementing - plus > something additional that I want to add". Unfortunately, unlike real > inheritance where you also get the actual code of the parent object (if > you > don't override it), in Implements you don't. If you want that code you > have > to cut and paste it into you own subclassed object (if the source is even > available to you). Yuk. > > Withevents is nothing more than the ability to sink events from one OR > MORE > objects in your own class. I am wrapping an entire object (or at least > some > of it's events) inside my class. > > One of the objectives of object oriented programming (of which inheritance > is a technique), is encapsulation of all of the data and code required to > implement an "object". Encapsulation simply means placing everything in > one > place, but it also means hiding implementation details from view. > > When a combo box double click event occurs (in my framework) my class for > the combo control MAY open a form to allow the user to add new items to > the > table that contains the data for the combo. Likewise that same form can > be > used to EDIT (or delete) the data in that table. Either way, the form is > opened modal (you can't do anything outside the form) and when that form > closes, the combo is requeried so that the latest contents of the table > are > contained in the combo. > > How is all that done? Who cares? All that the developer needs to know is > how to cause the combo class to use that functionality. In the case of my > framework, it is caused by passing a form name to the combo class through > one of it's methods. Doing that sets up the combo to "know" that if a > double click occurs it should open that form. > > So my class has a variable to hold the name of the form to open and has a > method to pass in the name of the form. Equally importantly, my combo > class > sinks the double click itself and runs code that opens that form IF the > variable contains a string of length > 0. If it DOESN'T have a form name > to > open, it puts up a message box telling the user they don't have permission > to edit the data behind the combo. > > It happens that I use autonumber PKs throughout my databases. As a result > the column(0) of the bound combo contains the PK of the record currently > selected in the combo. When (if) the form opens, the combo class passes > that PK of the record that is currently selected in the combo to the form > (as an openarg, in the same format that ADH used for tags) , and the > form's > class "moves" the recordset of the form being opened to display that > record > and sets the focus into that record. This allows the user to not only > open > the form using a DblClick, but be right there at the data they need to > edit > (if for example the data is wrong - a misspelled name for example). > > As you can see, having a class to wrap a combo up in can be a pretty > useful > thing. All this functionality is just there, available to me at all > times. > I write this kind of code once, then all combos throughout my application > have this functionality. How it happens is hidden from the developer (me > in > this case), I don't have to remember how to do all this stuff, the class > knows how. I don't have to remember to call a function in an event stub > in > a form somewhere, if a class is instantiated for that combo it has that > functionality. > > Withevents is the key that allows me to sink that DblClick right inside my > class so that I am not having to remember to call functions to get this > stuff to happen. > > Believe me, I used to do pretty much the same thing without classes, just > calling functions from event stubs in the form itself. In fact I wrote an > event stub insertion wizard to build these function calls specifically for > my framework (C2DbFrameWiz) and insert them into the form. Believe me > again > when I say that method of programming isn't even in the same league as > classes and Withevents. > > LEARN THIS STUFF, you won't regret it. BTW, Withevents is available in > VBA > (Excel, Word etc.), VB as well as VB.NET so it's not something you will > learn just for Access. > > Again my sincere thanks to Shamil who prodded me to figure this stuff out > and provided sample code to get me started. I repeat, I would not be > where > I am today as an Access programmer without Withevents and Classes. > > BTW, I wrote a chapter for this stuff (Withevents) for Beginning Access > 2002 > VBA, Wrox publishers, ISBN 1-86100-821-X. The entire chapter was > published > in Advisor (published on my birthday in fact). > > http://accessvbsqladvisor.com/Articles.nsf/dp/A6CBCC9F0ED68B2E88256DD4007C > 2FDD > > Watch for line wrap. > > Of course you could just buy the book. > > John W. Colby > www.ColbyConsulting.com > > -----Original Message----- > From: accessd-bounces at databaseadvisors.com > [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Robert Gracie > Sent: Tuesday, January 13, 2004 4:45 PM > To: Access Developers discussion and problem solving > Subject: RE: [AccessD] =function() in .onclick > > > Hello All, > Since I'm just learning this type of programming technique I thought I > would ask a question... > > Why not use Implements instead of WithEvents? My limited understand of > WithEvents is that they will not return functionality unit they (the > event) > has completed processing... Since I'm just at the "door" so to speak with > learning how to use and incorporate these new (to me) programming > techniques > into my work, I really want to start out using the "best" technique... > > > Robert Gracie > www.servicexp.com > > > > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com From jwcolby at colbyconsulting.com Sat Jan 17 19:26:10 2004 From: jwcolby at colbyconsulting.com (John W. Colby) Date: Sat, 17 Jan 2004 20:26:10 -0500 Subject: [AccessD] C2DbWakeup In-Reply-To: <020901c3dd2f$6587b5e0$6401a8c0@default> Message-ID: Per Michaels suggestion I added the ability of clsWakeup to actually execute the process name as a program. I also added a boolean to the init parameters to allow telling clsWakeup whether or not to execute this as a windows command (program). This required also adding a boolean parameter to the Supervisor function that creates the clsWakeup instance. And finally, I added a checkbox to the form to allow the user to select whether the process name being added is a windows program or not. The modified demo can be found on my site. The new code now looks like: Option Compare Database Option Explicit ' 'This class holds information about a single wakeup ' Private mdteLastRan As Date 'The last date a wakeup was done Private mdteTimeToRun As Date 'The time to say wakeup Private mstrProcessName As String 'The process name needing woken up Private mblnRunCommand As Boolean 'True means class instance will run the process as a command (windows program) Private Declare Function WinExec Lib "kernel32" _ (ByVal lpCmdLine As String, ByVal nCmdShow As Long) As Long ' 'The class_Initialize is similar to Form_Open in that it always runs ONE time as a class opens 'Use this to initialize the LastDateRan variable ' Private Sub Class_Initialize() mdteLastRan = Date - 1 End Sub ' 'Each instance of this class will hold a time to run (wakeup) 'And a process to wakeup ' Function Init(ldteTimeToRun As Date, lstrProcessName As String, _ Optional lblnRunCommand As Boolean = False) mdteTimeToRun = ldteTimeToRun mstrProcessName = lstrProcessName mblnRunCommand = lblnRunCommand End Function ' 'This function checks whether the process has run in the last 24 hours 'If so it returns true and passes back the process name in a string variable 'passed in ' Function Run(lstrProcessName) As Boolean Dim lngProc As Long 'Hasn't run today so check if the time is > mdetTimeToRun If Time() > mdteTimeToRun Then If Date > mdteLastRan Then 'Mark mdteLastRun = Now() mdteLastRan = Date ' If mblnRunCommand Then lngProc = WinExec(mstrProcessName, 1) End If 'and return true lstrProcessName = mstrProcessName Run = True End If End If End Function ********* Option Compare Database Option Explicit 'A collection to hold instances of clsWakeup Private colClsWakeup As Collection 'An event to raise if a clsWakeup instance says its time to wakeup Public Event ProcessTime(lstrProcessName As String) ' 'The class_Initialize is similar to Form_Open in that it always runs ONE time as a class opens 'Use this to create the collection to hold the wakeup classes ' Private Sub Class_Initialize() Set colClsWakeup = New Collection End Sub ' 'Class_Terminate is similar to Form_Close and always runs ONCE as the class terminates 'Use it to unload all the clsWakeup instances in the collection ' Private Sub Class_Terminate() term End Sub ' 'As the supervisor class closes, it must unload all the clsWakeup instances in its collection ' Function term() On Error Resume Next While colClsWakeup.Count > 0 colClsWakeup.Remove (1) Wend End Function ' 'This function is responsible for creating one instance of clsWakeup every time it is called ' Function NewWakeup(ldteTimeToRun As Date, lstrProcessName As String, _ Optional blnRunAsCommand As Boolean = False) Dim lclsWakeup As clsWakeup Set lclsWakeup = New clsWakeup 'It then initializes that instance with the TimeToRun and the ProcessName lclsWakeup.Init ldteTimeToRun, lstrProcessName, blnRunAsCommand 'And finally, it saves a pointer to the clsWakeup instance just created in the collection colClsWakeup.Add lclsWakeup, lstrProcessName End Function ' 'CheckWakeup is called by a timer tick on a form. It cycles through all the instances of clsWakeup 'in its collection asking each instance if it's time for that instance to run. ' Function CheckWakeup() Dim lclsWakeup As clsWakeup Dim lstrProcessName As String For Each lclsWakeup In colClsWakeup 'Check each instance of clsWakeup If lclsWakeup.Run(lstrProcessName) Then 'If time to run then RaiseEvent ProcessTime(lstrProcessName) 'Raise an event telling the world End If Next lclsWakeup End Function ****** Option Compare Database Option Explicit ' 'Dimension a supervisor class Withevents ' Private WithEvents fclsWakeupSupervisor As clsWakeupSupervisor ' 'When the form closes we need to unload the supervisor class ' Private Sub Form_Close() Set fclsWakeupSupervisor = Nothing End Sub ' 'When the form opens we need to create an instance of the supervisor class ' Private Sub Form_Open(Cancel As Integer) Set fclsWakeupSupervisor = New clsWakeupSupervisor End Sub ' 'The close button (standard stuff) ' Private Sub Command6_Click() On Error GoTo Err_Command6_Click DoCmd.Close Exit_Command6_Click: Exit Sub Err_Command6_Click: MsgBox Err.Description Resume Exit_Command6_Click End Sub ' 'The form's timer event will be used to call the supervisor class' CheckWakeup method ' Private Sub Form_Timer() 'Erase the last value to make clear that it only was set once / 24 hours txtWakingUp.Value = "" 'And write a status to the status box to make clear that we are calling this every 10 seconds txtStatus.Value = "Checked wakeup list at: " & Now 'Then call the supervisor's CheckWakup method fclsWakeupSupervisor.CheckWakeup End Sub ' 'This is a very simple way of programming the processes that need to be wakened every day ' Private Sub txtProcessName_AfterUpdate() 'pass in the time to do the wakeup and the process name of the process to wake up '!!!!notice no error handling such as was anything entered in time!!!! fclsWakeupSupervisor.NewWakeup txtNewTime.Value, txtProcessName.Value, chkRunAsCommand.Value 'if the form timer is not initialized, then set the interval to 10 seconds If Me.TimerInterval = 0 Then Me.TimerInterval = 10000 End If End Sub ' 'This is the event from the supervisor that will be raised if any process needs to be awakened. ' Private Sub fclsWakeupSupervisor_ProcessTime(lstrProcessName As String) txtWakingUp.Value = lstrProcessName End Sub John W. Colby www.ColbyConsulting.com -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Michael R Mattys Sent: Saturday, January 17, 2004 2:23 PM To: Access Developers discussion and problem solving Subject: Re: [AccessD] C2DbWakeup John, I just had a look at your demo and just wanted to offer that you could put in something like the following 'Module Public Declare Function WinExec Lib "kernel32" _ (ByVal lpCmdLine As String, ByVal nCmdShow As Long) As Long 'clsWakeUp Function Run(lstrProcessName) As Boolean 'Hasn't run today so check if the time is > mdetTimeToRun If time() > mdteTimeToRun Then If Date > mdteLastRan Then Dim lngProc As Long lngProc = WinExec(mstrProcessName, 1) 'Mark mdteLastRun = Now() mdteLastRan = Date 'and return true lstrProcessName = mstrProcessName Run = True End If End If End Function Michael R. Mattys Try MattysMapLib for MapPoint at www.mattysconsulting.com From Subscriptions at servicexp.com Sat Jan 17 20:48:40 2004 From: Subscriptions at servicexp.com (Robert Gracie) Date: Sat, 17 Jan 2004 21:48:40 -0500 Subject: [AccessD] Withevents vs Implements In-Reply-To: <8B98F8EA48F8BA47A2F24E0D0AF40CF407AD7CBE@xlivmbx12.aig.com> Message-ID: <000001c3dd6d$946c5fd0$6401a8c0@RG> Now that is weird, I just discovered that two days ago. Before that I was "cutting and pasting" Robert Gracie -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Heenan, Lambert Sent: Wednesday, January 14, 2004 1:07 PM To: 'Access Developers discussion and problem solving' Subject: RE: [AccessD] Withevents vs Implements Hey John, I was reading the chapter you referred us to and I wondered who wrote the part about building the event handler stubs. It says: "The easiest way to get an event handler built is to simply place a control of the type you desire in a form, name the control exactly what you will call it in your class, open the properties box for that control, then use the code builder to build the event stub. Now cut the event stub out of the form's module and paste it into your own class." This cumbersome procedure works, but there's a much simpler way to do it. In the class that's got the WithEvents objects declared, select the object name from the left-hand combobox in the module window. The right-hand combobox will then list all the possible events for the object selected. If you then choose one of those events a stub event handler will be created in the module, complete with all the parameters it needs. I'm surprised no-one noticed that before! Something to update in the 2nd edition? :-) Lambert > -----Original Message----- > From: John W. Colby [SMTP:jwcolby at colbyconsulting.com] > Sent: Tuesday, January 13, 2004 9:05 PM > To: Access Developers discussion and problem solving > Subject: [AccessD] Withevents vs Implements > > Robert, > > >Why not use Implements instead of WithEvents? > > They are not the same thing at all. Implements is interface > inheritance, i.e. subclassing the exposed global data and method > DEFINITIONS of an object. In some circles it is also called a > Contract - "I agree to provide similar functionality and data as the > object that I am implementing - plus something additional that I want > to add". Unfortunately, unlike real inheritance where you also get > the actual code of the parent object (if you > don't override it), in Implements you don't. If you want that code you > have > to cut and paste it into you own subclassed object (if the source is even > available to you). Yuk. > > Withevents is nothing more than the ability to sink events from one OR > MORE objects in your own class. I am wrapping an entire object (or at > least some > of it's events) inside my class. > > One of the objectives of object oriented programming (of which > inheritance is a technique), is encapsulation of all of the data and > code required to implement an "object". Encapsulation simply means > placing everything in one place, but it also means hiding > implementation details from view. > > When a combo box double click event occurs (in my framework) my class > for the combo control MAY open a form to allow the user to add new > items to the table that contains the data for the combo. Likewise > that same form can be > used to EDIT (or delete) the data in that table. Either way, the form is > opened modal (you can't do anything outside the form) and when that form > closes, the combo is requeried so that the latest contents of the table > are > contained in the combo. > > How is all that done? Who cares? All that the developer needs to > know is how to cause the combo class to use that functionality. In > the case of my framework, it is caused by passing a form name to the > combo class through one of it's methods. Doing that sets up the combo > to "know" that if a double click occurs it should open that form. > > So my class has a variable to hold the name of the form to open and > has a method to pass in the name of the form. Equally importantly, my > combo class sinks the double click itself and runs code that opens > that form IF the variable contains a string of length > 0. If it > DOESN'T have a form name to > open, it puts up a message box telling the user they don't have permission > to edit the data behind the combo. > > It happens that I use autonumber PKs throughout my databases. As a > result the column(0) of the bound combo contains the PK of the record > currently selected in the combo. When (if) the form opens, the combo > class passes that PK of the record that is currently selected in the > combo to the form (as an openarg, in the same format that ADH used for > tags) , and the form's class "moves" the recordset of the form being > opened to display that record > and sets the focus into that record. This allows the user to not only > open > the form using a DblClick, but be right there at the data they need to > edit > (if for example the data is wrong - a misspelled name for example). > > As you can see, having a class to wrap a combo up in can be a pretty > useful thing. All this functionality is just there, available to me > at all times. > I write this kind of code once, then all combos throughout my application > have this functionality. How it happens is hidden from the developer (me > in > this case), I don't have to remember how to do all this stuff, the class > knows how. I don't have to remember to call a function in an event stub > in > a form somewhere, if a class is instantiated for that combo it has that > functionality. > > Withevents is the key that allows me to sink that DblClick right > inside my class so that I am not having to remember to call functions > to get this stuff to happen. > > Believe me, I used to do pretty much the same thing without classes, > just calling functions from event stubs in the form itself. In fact I > wrote an event stub insertion wizard to build these function calls > specifically for my framework (C2DbFrameWiz) and insert them into the > form. Believe me again when I say that method of programming isn't > even in the same league as classes and Withevents. > > LEARN THIS STUFF, you won't regret it. BTW, Withevents is available > in VBA (Excel, Word etc.), VB as well as VB.NET so it's not something > you will learn just for Access. > > Again my sincere thanks to Shamil who prodded me to figure this stuff > out and provided sample code to get me started. I repeat, I would not > be where I am today as an Access programmer without Withevents and > Classes. > > BTW, I wrote a chapter for this stuff (Withevents) for Beginning > Access 2002 VBA, Wrox publishers, ISBN 1-86100-821-X. The entire > chapter was published > in Advisor (published on my birthday in fact). > > http://accessvbsqladvisor.com/Articles.nsf/dp/A6CBCC9F0ED68B2E88256DD4 > 007C > 2FDD > > Watch for line wrap. > > Of course you could just buy the book. > > John W. Colby > www.ColbyConsulting.com > > -----Original Message----- > From: accessd-bounces at databaseadvisors.com > [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Robert > Gracie > Sent: Tuesday, January 13, 2004 4:45 PM > To: Access Developers discussion and problem solving > Subject: RE: [AccessD] =function() in .onclick > > > Hello All, > Since I'm just learning this type of programming technique I thought > I would ask a question... > > Why not use Implements instead of WithEvents? My limited understand > of WithEvents is that they will not return functionality unit they > (the > event) > has completed processing... Since I'm just at the "door" so to speak with > learning how to use and incorporate these new (to me) programming > techniques > into my work, I really want to start out using the "best" technique... > > > Robert Gracie > www.servicexp.com > > > > _______________________________________________ > 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 From andy at minstersystems.co.uk Sun Jan 18 06:30:07 2004 From: andy at minstersystems.co.uk (Andy Lacey) Date: Sun, 18 Jan 2004 12:30:07 -0000 Subject: [AccessD] Menu Bar in VBA IDE In-Reply-To: <000001c3dd53$2f0ea9a0$de1811d8@DanWaters> Message-ID: <00c101c3ddbe$cee206f0$b274d0d5@minster33c3r25> Dan Can you knock up a macro and run it to show the menu bar? Andy > -----Original Message----- > From: accessd-bounces at databaseadvisors.com > [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Dan Waters > Sent: 17 January 2004 23:40 > To: 'Database Advisors' > Subject: [AccessD] Menu Bar in VBA IDE > > > Help! > > > > Somehow I closed the Menu Bar for the VBA IDE window, and I > can't get it back. > > > > I've gone into the Toolbars dialog where the Menu Bar > checkbox is checked. But, I can't uncheck it so I can recheck it. > > > > I've uninstalled Access (XP) and reinstalled but no joy. > > > > I've run Registry Mechanic looking for problems but none were > reported. > > > > > > Anyone know how to fix this? > > > > > > Thanks, > > Dan Waters > > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/a> ccessd > Website: > http://www.databaseadvisors.com > > From gustav at cactus.dk Sun Jan 18 07:43:29 2004 From: gustav at cactus.dk (Gustav Brock) Date: Sun, 18 Jan 2004 14:43:29 +0100 Subject: [AccessD] OT: Writing raw RTF document using VB/VBA/C(++)/DELPHI/... In-Reply-To: References: Message-ID: <3719000100.20040118144329@cactus.dk> Hi Bryan This link doesn't work with my Opera browser, but the LaTeX people have a nice collection of links to old (basic) as well as newer documentation: http://latex2rtf.sourceforge.net/ Here is the brief list of control words: http://latex2rtf.sourceforge.net/rtfspec_62.html /gustav > Shamil, > RTF Files are just plain old ascii text. So Low level File I/O will work to write it. > The biggest challenge would be to get the text string correct before writing them out to the file. > Here is a link to the RTF spec. > http://msdn.microsoft.com/library/?url=/library/en-us/dnrtfspec/html/rtfspec.asp?frame=true > As for PDF, here is the link to the PDF Specs. > http://partners.adobe.com/asn/acrobat/docs.jsp#filefmtspecs > Bryan Carbonnell > bryan_carbonnell at cbc.ca >>>> shamil at smsconsulting.spb.ru 23-May-03 11:37:38 AM >>> > Hi All, > Has anybody seen on the Internet any advanced code samples of writing raw > text of RTF documents with different formatting styles, headings, lists, > tables etc. using VB/VBA/C#/C(++)/ but > without usage of ActiveX controls, without MS Word Automation etc. - i.e. > just plain raw code to write raw RTF like in P.S. of this message? > And maybe .PDF too? - or this latter is too much to have for free? - maybe > then good description of .PDF format in electronic form or printed as a > book? Any useful refs on that? > TIA for any info, > Shamil From carbonnb at sympatico.ca Sun Jan 18 18:25:02 2004 From: carbonnb at sympatico.ca (Bryan Carbonnell) Date: Sun, 18 Jan 2004 19:25:02 -0500 Subject: [AccessD] OT: Writing raw RTF document using VB/VBA/C(++)/DELPHI/... In-Reply-To: <3719000100.20040118144329@cactus.dk> References: Message-ID: <400ADD8E.14238.1894D85@localhost> On 18 Jan 2004 at 14:43, Gustav Brock wrote: > Hi Bryan > > This link doesn't work with my Opera browser, but the LaTeX people Wow, you sure pulled that one out of the deep dark recesses of the archive :-) Here is one that should work in Opera. That's where I've copied it from http://msdn.microsoft.com/library/en-us/dnrtfspec/html/rtfspec.asp > have a nice collection of links to old (basic) as well as newer > documentation: > > http://latex2rtf.sourceforge.net/ > > Here is the brief list of control words: > > http://latex2rtf.sourceforge.net/rtfspec_62.html Cool! Thanks. -- Bryan Carbonnell - carbonnb at sympatico.ca Be who you are and say what you feel because those who mind don't matter and those who matter don't mind - Dr.Seuss From accessd666 at yahoo.com Mon Jan 19 00:27:22 2004 From: accessd666 at yahoo.com (Sad Der) Date: Sun, 18 Jan 2004 22:27:22 -0800 (PST) Subject: [AccessD] Error 3218 "Couldn't Update; Currently Locked" <> In-Reply-To: <12624705504.20040116155945@cactus.dk> Message-ID: <20040119062722.56995.qmail@web60208.mail.yahoo.com> Gustav, thanx again. However, I'm a 'rent-a-programmer' (what's the official anglish term?) and this organisation is completely Oracle minded => SQL-server is bad, MS sucks and Access...isn't that some sort of notepad? So, I need proof. Is there a correct way to test this? Sad --- Gustav Brock wrote: > Hi Sad > > Those settings are probably to low. > Try setting them to maximum: > > > These two commands may be set at the console > screen, they will take > > effect at once and doesn't require restart of the > server. If they > > prove of beneficial, include them in the > autoexec.ncf file of the > > server. > > > > SET MAXIMUM RECORD LOCKS = 200000 > > SET MAXIMUM RECORD LOCKS PER CONNECTION = 100000 > > > > The only drawback is a slightly larger RAM > allocation which is not > > significant with today's multimegabyte servers but > did count in the > > days of servers running on 8 to 16 MB RAM and > every 100K was of > > importance. > > /gustav > > > > These are the new settings: > > Max. Records Lock per Connection: 1000 > > Max. Files Lock per Connection: 5000 > > Max. Records Lock: 40000 > > Max. Files Lock: 400000 > > > How can I test these? Ok, for the first one I have > to > > lock 999, 1000, 1001 records...question is how do > I do > > that? > > > Is importing a file with 999, 1000, 1001 records > > enough? > > > Any testing tips/links? > > TIA. > > > SD > > > > --- Jim Dettman wrote: > >> < >> occasionally the users get the following error: > >> Error 3218 "Couldn't Update; Currently Locked">> > >> > >> There are lots of things that will cause that > >> message, but I think you > >> might be barking up the wrong tree in that it's a > >> Novell problem. > >> > >> From your comments abut it being "buggy", I > would > >> think more that the app > >> was poorly written and stepping on it's own toes, > >> resulting in the above > >> error. > >> > >> One way to check that out easily is to copy the > >> backend to a local drive, > >> re-link the tables (I'm assuming it's a split > app), > >> then test. If you still > >> get the error messages it has nothing to do with > >> Novell. If the error > >> disappears, then it's related to locking. > >> > >> The other test you can do is using the > SetOption > >> method of the dbEngine > >> object, set dbMaxLocksPerFile to a number less > then > >> the allowed number of > >> locks under Novell. This will ensure that JET > never > >> uses more locks then > >> Novell allows. If that was the problem, the > error > >> messages will disappear. > >> > >> Jim Dettman > >> President, > >> Online Computer Services of WNY, Inc. > >> (315) 699-3443 > >> jimdettman at earthlink.net > >> > >> -----Original Message----- > >> From: accessd-bounces at databaseadvisors.com > >> [mailto:accessd-bounces at databaseadvisors.com]On > >> Behalf Of Sad Der > >> Sent: Friday, January 16, 2004 7:26 AM > >> To: Acces User Group > >> Subject: [AccessD] Error 3218 "Couldn't Update; > >> Currently Locked" > >> > >> > >> Hi group, > >> > >> We use A2K SP1 on a Novell network. > >> occasionally the users get the following error: > >> Error 3218 "Couldn't Update; Currently Locked" > >> > >> I noticed that this occurs when a user tries to > load > >> interface messages into the DB. The messages have > >> approx. > >> 100-150 records. Total size of 12Kb. > >> > >> I read on support.microsoft.com (KB302484) that > this > >> has > >> to do with the number of record locks on the > Novell > >> server. But this KB-Article is related to A97! > >> > >> What's the deal with locking in A2k? > >> > >> We 'enherited' this system and error handling, if > >> any, > >> is > >> really buggy. So every time this occurs we get a > >> lot(!) of > >> db-pollution!! > >> > >> My question: What can I do to prevent this from > >> happening? > > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com __________________________________ Do you Yahoo!? Yahoo! Hotjobs: Enter the "Signing Bonus" Sweepstakes http://hotjobs.sweepstakes.yahoo.com/signingbonus From bruce_bruen at mlc.com.au Mon Jan 19 00:42:46 2004 From: bruce_bruen at mlc.com.au (bruce_bruen at mlc.com.au) Date: Mon, 19 Jan 2004 17:42:46 +1100 Subject: [AccessD] Methods, tools and the d*^$#)( UML Message-ID: Hiya folks, Happy new year! Looks like I am be back from the "hallowed halls" of method consulting yet again and having to do with the ____real___ world of development.... Anyway, having spoken out (within the client) for the last x months about development best practices, UMl and the way, the truth and the light of rapid, but not extreme, development methods I am now in the enviable position of having to implement what I said. One of the problems of speaking from the ivory tower of development methodology reseacrh is that many, many options are presented and many ideas are gleaned and ...discussed... (many name also appear, amongst which the illustrious of this list come up quite frequently! ) . Its very easy to talk of best practice - and in one's own universe - to implement it. However, I have just been granted the privilege (?) of implementing it across an entire organisation structure. An organisation with a large and diverse set of IT environments (mainframe to J2EE) and a large and diverse set of psychologies (individual and team). <> When I started in this game FTN77 was a good idea, COBOL transformed the way we had to think about systems and information, IT centres consisted of programmers in white coats (or sports coats with elbow patches) and I/O was all about card decks or, for the bleeding edge companies, text to input forms ...... Name: |__|__|__|__|__|__|__|__|__| |__|__|__|__|__|__|__|__|__| Sex: | __| (Y/N) DOB: |__|__| / |__|__| / |__|__| etc... We seem to have moved on a bit from this paradigm. <> Now, given that AccessD represents one of the largest and most widely interested development communities on the planet - (if you doubt me try following a PHP mailing list for a couple of weeks - talk about AR!) my question is this (actually these) Are you using UML to design in VBA/VB/VB.net environments? Is it "working"? Are you using Unified Process methods in VBA/VB/VB.net environmets? Again, is it working? In your general experience, are methodologies enabiling or overhead? rgrds Bruce The information contained in this e-mail communication may be confidential. You should only read, disclose, re-transmit,copy,distribute, act in reliance on or commercialise the information if you are authorised to do so. If you are not the intended recipient of this e-mail communication, please immediately notify us by e-mail to postmaster at mlc.com.au, or reply by e-mail direct to the sender and then destroy any electronic and paper copy of this message. Any views expressed in this e-mail communication are those of the individual sender, except where the sender specifically states them to be the views of a member of the National Australia Bank Group of companies. Any advice contained in this e-mail has been prepared without taking into account your objectives, financial situation or needs. Before acting on any advice in this e-mail, National Australia Bank Limited recommends that you consider whether it is appropriate for your circumstances. If this e-mail contains reference to any financial products, the National recommends you consider the Product Disclosure statement (PDS) or other disclosure document before making any decisions regarding any products. The National Australia Bank Group of companies does not represent, warrant or guarantee that the integrity of this communication has been maintained nor that the communication is free of errors, virus or interference. From gustav at cactus.dk Mon Jan 19 02:25:51 2004 From: gustav at cactus.dk (Gustav Brock) Date: Mon, 19 Jan 2004 09:25:51 +0100 Subject: [AccessD] Error 3218 "Couldn't Update; Currently Locked" <> In-Reply-To: <20040119062722.56995.qmail@web60208.mail.yahoo.com> References: <20040119062722.56995.qmail@web60208.mail.yahoo.com> Message-ID: <1082314558.20040119092551@cactus.dk> Hi Sad > thanx again. However, I'm a 'rent-a-programmer' > (what's the official anglish term?) and this > organisation is completely Oracle minded => SQL-server > is bad, MS sucks and Access...isn't that some sort of > notepad? > So, I need proof. Is there a correct way to test this? Yes, talk to the NetWare administrator. She just needs to type them on the console, no rebooting is needed. If success, append the commands to the autoexec.ncf file, if not they will vanish the next time the server is rebooted - in a couple of years. These settings are not hacks but the documented way to deal with the issue which is not related to Access only but to any (database) program requesting bunches of record locks: http://support.novell.com/cgi-bin/search/searchtid.cgi?/10019363.htm http://support.novell.com/cgi-bin/search/searchtid.cgi?/2914607.htm The reason why these settings are low as default is only to save a few KB of ram which was important in the days of x86 processors and servers running on 8 or 16 MB ram. For the newer NetWare versions - I believe from 5.1 and up - the default settings are much higher. /gustav > --- Gustav Brock wrote: >> Hi Sad >> >> Those settings are probably to low. >> Try setting them to maximum: >> >> > These two commands may be set at the console screen, they will take >> > effect at once and doesn't require restart of the server. If they >> > prove of beneficial, include them in the autoexec.ncf file of the >> > server. >> > >> > SET MAXIMUM RECORD LOCKS = 200000 >> > SET MAXIMUM RECORD LOCKS PER CONNECTION = 100000 >> > >> > The only drawback is a slightly larger RAM allocation which is not >> > significant with today's multimegabyte servers but did count in the >> > days of servers running on 8 to 16 MB RAM and every 100K was of >> > importance. >> >> /gustav >> >> >> > These are the new settings: >> > Max. Records Lock per Connection: 1000 >> > Max. Files Lock per Connection: 5000 >> > Max. Records Lock: 40000 >> > Max. Files Lock: 400000 >> >> > How can I test these? Ok, for the first one I have to >> > lock 999, 1000, 1001 records...question is how do I do >> > that? >> >> > Is importing a file with 999, 1000, 1001 records >> > enough? >> >> > Any testing tips/links? >> > TIA. >> >> > SD >> >> >> > --- Jim Dettman wrote: >> >> <> >> occasionally the users get the following error: >> >> Error 3218 "Couldn't Update; Currently Locked">> >> >> >> >> There are lots of things that will cause that >> >> message, but I think you >> >> might be barking up the wrong tree in that it's a >> >> Novell problem. >> >> >> >> From your comments abut it being "buggy", I would >> >> think more that the app >> >> was poorly written and stepping on it's own toes, >> >> resulting in the above >> >> error. >> >> >> >> One way to check that out easily is to copy the >> >> backend to a local drive, >> >> re-link the tables (I'm assuming it's a split app), >> >> then test. If you still >> >> get the error messages it has nothing to do with >> >> Novell. If the error >> >> disappears, then it's related to locking. >> >> >> >> The other test you can do is using the SetOption >> >> method of the dbEngine >> >> object, set dbMaxLocksPerFile to a number less then >> >> the allowed number of >> >> locks under Novell. This will ensure that JET never >> >> uses more locks then >> >> Novell allows. If that was the problem, the error >> >> messages will disappear. >> >> >> >> Jim Dettman >> >> President, >> >> Online Computer Services of WNY, Inc. >> >> (315) 699-3443 >> >> jimdettman at earthlink.net From artful at rogers.com Mon Jan 19 09:03:48 2004 From: artful at rogers.com (Arthur Fuller) Date: Mon, 19 Jan 2004 10:03:48 -0500 Subject: [AccessD] Methods, tools and the d*^$#)( UML In-Reply-To: Message-ID: Whew, a bundle of questions! In a previous job, I used Rational Rose about half my workday. I did all sorts of UML diagrams. The software in point consisted of hundreds of modules, written in a variety of languages including MS C++, VB, PowerBuilder, Access and Java. Everything talked to a SQL database, and lots of components in different languages had to interact. Access was used only for the most trivial components, such as setup utilities and so on. In this kind of situation, UML is an absolute necessity, IMO. There were approximately a dozen developers plus a software architect plus a data modeling expert plus a SQL DBA expert. Nobody but the DBA had the right to create a sproc or a view. No code was written without being vetted by several people in several design meetings. The interfaces were all worked out long in advance to the actual code being written. (Example: a given NT service might talk to a conveyer belt, a bar-code scanner and a weigh-scale, with the ability to recognize a bad scan then send an instruction to the belt to roll the object back so it could be rescanned and/or reweighed.) For this sort of project, woe to the team that tries to develop it without a design-tool like UML. Currently, I'm working pretty much in Access and SQL 2000, with a little here and there in .NET. So far as Access projects go, I think UML is overkill. Perhaps not the right word.... UML is designed for OOP languages, and Access is far from an OOP language, so the constructs don't make a lot of sense there. However, I am a big fan of ER design tools such as ERwin, PowerDesigner and so on. I would not consider doing a serious Access project without such a tool. What such tools let me do is concentrate on the database design without ever creating a table, and then when I'm satisfied, to click a button and generate ALL the tables, constraints, RI rules, indexes, etc.. If I want, I can Save As and create a new version of the diagram that in turn creates a new version of the database. Even when I inherit a database, the first thing I do is run it through PowerDesigner (my fave) so I can get a decent diagram and then study the big picture. Frequently I find major flaws just by looking at the diagram. One of my fave features of such a tool is called Domains. A Domain is defined as a meta-field, thoroughly specified (i.e. label, input mask, format, validation rules, etc.). Then when you're designing tables you can use these Domains instead of describing a new field each time. Let's say you have a column CustomerID which is an integer and should be presented as a combo-box consisting of SELECT CustomerID, CompanyName ORDER BY CompanyName Ascending. Describe it once, then drop it into every table where you need it. I spend a LOT of time devising my Domains before I get around to creating any actual tables. So.... UML is IMO most useful with truly O-O languages, and inappropriate for Access projects. Data-modeling tools on the other hand are essential for every serious database project (i.e. 30+ tables). My $.02... Arthur -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of bruce_bruen at mlc.com.au Sent: Monday, January 19, 2004 1:43 AM To: accessd at databaseadvisors.com Subject: [AccessD] Methods, tools and the d*^$#)( UML Hiya folks, Happy new year! Looks like I am be back from the "hallowed halls" of method consulting yet again and having to do with the ____real___ world of development.... Anyway, having spoken out (within the client) for the last x months about development best practices, UMl and the way, the truth and the light of rapid, but not extreme, development methods I am now in the enviable position of having to implement what I said. One of the problems of speaking from the ivory tower of development methodology reseacrh is that many, many options are presented and many ideas are gleaned and ...discussed... (many name also appear, amongst which the illustrious of this list come up quite frequently! ) . Its very easy to talk of best practice - and in one's own universe - to implement it. However, I have just been granted the privilege (?) of implementing it across an entire organisation structure. An organisation with a large and diverse set of IT environments (mainframe to J2EE) and a large and diverse set of psychologies (individual and team). <> When I started in this game FTN77 was a good idea, COBOL transformed the way we had to think about systems and information, IT centres consisted of programmers in white coats (or sports coats with elbow patches) and I/O was all about card decks or, for the bleeding edge companies, text to input forms ...... Name: |__|__|__|__|__|__|__|__|__| |__|__|__|__|__|__|__|__|__| Sex: | __| (Y/N) DOB: |__|__| / |__|__| / |__|__| etc... We seem to have moved on a bit from this paradigm. <> Now, given that AccessD represents one of the largest and most widely interested development communities on the planet - (if you doubt me try following a PHP mailing list for a couple of weeks - talk about AR!) my question is this (actually these) Are you using UML to design in VBA/VB/VB.net environments? Is it "working"? Are you using Unified Process methods in VBA/VB/VB.net environmets? Again, is it working? In your general experience, are methodologies enabiling or overhead? rgrds Bruce The information contained in this e-mail communication may be confidential. You should only read, disclose, re-transmit,copy,distribute, act in reliance on or commercialise the information if you are authorised to do so. If you are not the intended recipient of this e-mail communication, please immediately notify us by e-mail to postmaster at mlc.com.au, or reply by e-mail direct to the sender and then destroy any electronic and paper copy of this message. Any views expressed in this e-mail communication are those of the individual sender, except where the sender specifically states them to be the views of a member of the National Australia Bank Group of companies. Any advice contained in this e-mail has been prepared without taking into account your objectives, financial situation or needs. Before acting on any advice in this e-mail, National Australia Bank Limited recommends that you consider whether it is appropriate for your circumstances. If this e-mail contains reference to any financial products, the National recommends you consider the Product Disclosure statement (PDS) or other disclosure document before making any decisions regarding any products. The National Australia Bank Group of companies does not represent, warrant or guarantee that the integrity of this communication has been maintained nor that the communication is free of errors, virus or interference. _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com --- Incoming mail is certified Virus Free. Checked by AVG anti-virus system (http://www.grisoft.com). Version: 6.0.558 / Virus Database: 350 - Release Date: 1/2/2004 --- Outgoing mail is certified Virus Free. Checked by AVG anti-virus system (http://www.grisoft.com). Version: 6.0.558 / Virus Database: 350 - Release Date: 1/2/2004 From arielcom at indosat.net.id Mon Jan 19 17:57:01 2004 From: arielcom at indosat.net.id (Hengky Lie) Date: Tue, 20 Jan 2004 07:57:01 +0800 Subject: [AccessD] Wake up Call Program References: <2F8793082E00D4119A1700B0D0216BF802227764@main2.marlow.com> Message-ID: <001b01c3dee7$f05aa5b0$1000a8c0@default> Dear all friends, I want to say thank you to all of you that give me a lot of idea to solve my problem. God bless you all ! ----- Original Message ----- From: To: Sent: Saturday, January 17, 2004 4:48 PM Subject: RE: [AccessD] Wake up Call Program > Yikes, that is a relatively difficult task to hit out of the blue. > > If you don't find any other method, give me a holler. > > Drew From clh at christopherhawkins.com Mon Jan 19 18:09:39 2004 From: clh at christopherhawkins.com (Christopher Hawkins) Date: Mon, 19 Jan 2004 17:09:39 -0700 Subject: [AccessD] 'Duplicate values' error in Access - what number is it?!? Message-ID: <115550-220041220093986@christopherhawkins.com> I'm getting that classic error "The change you requested to the table were not successful because they would create duplicate values in the index, primary key or blah blah blah..." What is the error number of this error? And waht event triggers it?Try as I might, I cannot find a way to trap it. -C- From clh at christopherhawkins.com Mon Jan 19 18:19:53 2004 From: clh at christopherhawkins.com (Christopher Hawkins) Date: Mon, 19 Jan 2004 17:19:53 -0700 Subject: [AccessD] NEVER MIND: 'Duplicate values' error in Access - what number is it?!? Message-ID: <312720-22004122001953719@christopherhawkins.com> I'm an idiot...the very next thing I tried after sending my message got me what I wanted. FYI, here's what I did (the error was happening when a JanusGrid component was being updated): Private Sub grdMain_Error(ByVal ErrNumber As Long, ByVal DisplayMessage As Object) If ErrNumber = -2147217887 Then MsgBox "Got it!" Else MsgBox "Try again..." End If End Sub -Christopher- From lists at theopg.com Mon Jan 19 18:38:13 2004 From: lists at theopg.com (MarkH) Date: Tue, 20 Jan 2004 00:38:13 -0000 Subject: [AccessD] NEVER MIND - janus control?: 'Duplicate values' error in Access - what number isit?!? In-Reply-To: <312720-22004122001953719@christopherhawkins.com> Message-ID: <000401c3deed$b00a5b30$d00b6bd5@netboxxp> Sorry for drifting off topic, but... How do you find the grid control? I used it a couple of years ago for a one off project. I later used a free copy off a mag cd and found it crashed so I gave up, can't remember what the problem was as I was only playing. The first time I used it, it was great. Is it still buggy? Mark -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Christopher Hawkins Sent: 20 January 2004 00:20 To: accessd at databaseadvisors.com Subject: [AccessD] NEVER MIND: 'Duplicate values' error in Access - what number isit?!? I'm an idiot...the very next thing I tried after sending my message got me what I wanted. FYI, here's what I did (the error was happening when a JanusGrid component was being updated): Private Sub grdMain_Error(ByVal ErrNumber As Long, ByVal DisplayMessage As Object) If ErrNumber = -2147217887 Then MsgBox "Got it!" Else MsgBox "Try again..." End If End Sub -Christopher- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From clh at christopherhawkins.com Mon Jan 19 21:32:42 2004 From: clh at christopherhawkins.com (Christopher Hawkins) Date: Mon, 19 Jan 2004 20:32:42 -0700 Subject: [AccessD] NEVER MIND - janus control?: 'Duplicate values' errorin Access - what number isit?!? Message-ID: <410-2200412203324254@christopherhawkins.com> I haven't had any troubles with it. It's very easy to use. Go to Janusys.com and check out the latest version. -Christopher- ---- Original Message ---- From: lists at theopg.com To: accessd at databaseadvisors.com, Subject: RE: [AccessD] NEVER MIND - janus control?: 'Duplicate values' errorin Access - what number isit?!? Date: Tue, 20 Jan 2004 00:38:13 -0000 >Sorry for drifting off topic, but... > >How do you find the grid control? I used it a couple of years ago >for a >one off project. I later used a free copy off a mag cd and found it >crashed so I gave up, can't remember what the problem was as I was >only >playing. The first time I used it, it was great. Is it still buggy? > >Mark > >-----Original Message----- >From: accessd-bounces at databaseadvisors.com >[mailto:accessd-bounces at databaseadvisors.com] On Behalf Of >Christopher >Hawkins >Sent: 20 January 2004 00:20 >To: accessd at databaseadvisors.com >Subject: [AccessD] NEVER MIND: 'Duplicate values' error in Access - >what >number isit?!? > > >I'm an idiot...the very next thing I tried after sending my message >got >me what I wanted. FYI, here's what I did (the error was happening >when >a JanusGrid component was being updated): > >Private Sub grdMain_Error(ByVal ErrNumber As Long, ByVal >DisplayMessage >As Object) > > If ErrNumber = -2147217887 Then > MsgBox "Got it!" > Else > MsgBox "Try again..." > End If > >End Sub > >-Christopher- > > >_______________________________________________ >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 > > From accessd666 at yahoo.com Tue Jan 20 03:50:28 2004 From: accessd666 at yahoo.com (Sad Der) Date: Tue, 20 Jan 2004 01:50:28 -0800 (PST) Subject: [AccessD] Error 3218 "Couldn't Update; Currently Locked" <> In-Reply-To: <1082314558.20040119092551@cactus.dk> Message-ID: <20040120095028.35725.qmail@web60202.mail.yahoo.com> Thnx again Gustav. Sad --- Gustav Brock wrote: > Hi Sad > > > thanx again. However, I'm a 'rent-a-programmer' > > (what's the official anglish term?) and this > > organisation is completely Oracle minded => > SQL-server > > is bad, MS sucks and Access...isn't that some sort > of > > notepad? > > > So, I need proof. Is there a correct way to test > this? > > Yes, talk to the NetWare administrator. She just > needs to type them on > the console, no rebooting is needed. If success, > append the commands > to the autoexec.ncf file, if not they will vanish > the next time the > server is rebooted - in a couple of years. > > These settings are not hacks but the documented way > to deal with the > issue which is not related to Access only but to any > (database) > program requesting bunches of record locks: > > > http://support.novell.com/cgi-bin/search/searchtid.cgi?/10019363.htm > > http://support.novell.com/cgi-bin/search/searchtid.cgi?/2914607.htm > > The reason why these settings are low as default is > only to save a few > KB of ram which was important in the days of x86 > processors and > servers running on 8 or 16 MB ram. For the newer > NetWare versions - I > believe from 5.1 and up - the default settings are > much higher. > > /gustav > > > > --- Gustav Brock wrote: > >> Hi Sad > >> > >> Those settings are probably to low. > >> Try setting them to maximum: > >> > >> > These two commands may be set at the console > screen, they will take > >> > effect at once and doesn't require restart of > the server. If they > >> > prove of beneficial, include them in the > autoexec.ncf file of the > >> > server. > >> > > >> > SET MAXIMUM RECORD LOCKS = 200000 > >> > SET MAXIMUM RECORD LOCKS PER CONNECTION = > 100000 > >> > > >> > The only drawback is a slightly larger RAM > allocation which is not > >> > significant with today's multimegabyte servers > but did count in the > >> > days of servers running on 8 to 16 MB RAM and > every 100K was of > >> > importance. > >> > >> /gustav > >> > >> > >> > These are the new settings: > >> > Max. Records Lock per Connection: 1000 > >> > Max. Files Lock per Connection: 5000 > >> > Max. Records Lock: 40000 > >> > Max. Files Lock: 400000 > >> > >> > How can I test these? Ok, for the first one I > have to > >> > lock 999, 1000, 1001 records...question is how > do I do > >> > that? > >> > >> > Is importing a file with 999, 1000, 1001 > records > >> > enough? > >> > >> > Any testing tips/links? > >> > TIA. > >> > >> > SD > >> > >> > >> > --- Jim Dettman > wrote: > >> >> < >> >> occasionally the users get the following > error: > >> >> Error 3218 "Couldn't Update; Currently > Locked">> > >> >> > >> >> There are lots of things that will cause > that > >> >> message, but I think you > >> >> might be barking up the wrong tree in that > it's a > >> >> Novell problem. > >> >> > >> >> From your comments abut it being "buggy", I > would > >> >> think more that the app > >> >> was poorly written and stepping on it's own > toes, > >> >> resulting in the above > >> >> error. > >> >> > >> >> One way to check that out easily is to copy > the > >> >> backend to a local drive, > >> >> re-link the tables (I'm assuming it's a split > app), > >> >> then test. If you still > >> >> get the error messages it has nothing to do > with > >> >> Novell. If the error > >> >> disappears, then it's related to locking. > >> >> > >> >> The other test you can do is using the > SetOption > >> >> method of the dbEngine > >> >> object, set dbMaxLocksPerFile to a number less > then > >> >> the allowed number of > >> >> locks under Novell. This will ensure that JET > never > >> >> uses more locks then > >> >> Novell allows. If that was the problem, the > error > >> >> messages will disappear. > >> >> > >> >> Jim Dettman > >> >> President, > >> >> Online Computer Services of WNY, Inc. > >> >> (315) 699-3443 > >> >> jimdettman at earthlink.net > > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com __________________________________ Do you Yahoo!? Yahoo! Hotjobs: Enter the "Signing Bonus" Sweepstakes http://hotjobs.sweepstakes.yahoo.com/signingbonus From dwaters at usinternet.com Tue Jan 20 09:39:23 2004 From: dwaters at usinternet.com (Dan Waters) Date: Tue, 20 Jan 2004 09:39:23 -0600 Subject: [AccessD] An Easy Fix . . . Message-ID: <000001c3df6b$9465cc60$de1811d8@DanWaters> I recently installed an app at a client's site. For some reason, my switchboard form triggered an error when the startup form tried to open it on a user's PC. I had never had this error before on any other PC. For a short story the fix was as follows: On the switchboard form: comment out all code, compile, save, and exit access. Then reopen, uncomment all code, compile, and save. After that the error went away, and the front end was reduced in size. This particular switchboard form was originally created in A95, upgraded to A97, is now in AXP, and had many revisions along the way. My guess is that somehow there was 'old code' attached to the form. When the code was commented out and the database compiled, the 'old code' was eliminated. I could watch the compile 'progress bar' and it took longer than usual after the initial uncommenting. This was certainly an easy fix. Since I hadn't seen this before I thought I would pass it along to this group. Dan Waters Quality Process Solutions From KIsmert at TexasSystems.com Tue Jan 20 10:32:46 2004 From: KIsmert at TexasSystems.com (Ken Ismert) Date: Tue, 20 Jan 2004 10:32:46 -0600 Subject: [AccessD] Instantiate Forms as Objects Message-ID: <000801c3df73$092ec900$2a3ca8c0@TEXASSYSTEMS.COM> Hello Group: As you know, you can instantiate an Access form, just like any other object, by using its class name: Dim rFrm as Access.Form Set rFrm = New Form_YourForm ' form 'YourForm' This syntax allows you to create multiple open instances of a form, a necessity for my framework. However, I've run into a problem. What I need is a simple, one-line way to instantiate a form object using a string: sFormName = "YourForm" Set rFrm = MFOS("Form_" & sFormName) ' MFOS = "Magic Function or Syntax" Note: Because of the multiple instance requirement, DoCmd.OpenForm won't work. It can only make one instance of a form. I can't find a CreateObject syntax that works. In my current function, I use a big Case statement matching the form name to it's class. This has become a pain, because every time I add or remove forms, I have to edit the function. Have any of you found a way to do that? -Ken From cfoust at infostatsystems.com Tue Jan 20 10:39:03 2004 From: cfoust at infostatsystems.com (Charlotte Foust) Date: Tue, 20 Jan 2004 08:39:03 -0800 Subject: [AccessD] An Easy Fix . . . Message-ID: If this was a wizard-created switchboard, you would be better off renaming Switchboard Items, saving the code to text from the existing switchboard, and deleting the switchboard form. Then if you start the switchboard manager, it will discover you have no switchboard and create a new one. If you then delete the newly created Switchboard Items table and rename the old one back to Switchboard Items, you'll have a working switchboard with current code. At that point, you can add back any specializations you made in the old switchboard, assuming you still need them. Charlotte Foust -----Original Message----- From: Dan Waters [mailto:dwaters at usinternet.com] Sent: Tuesday, January 20, 2004 7:39 AM To: Database Advisors Subject: [AccessD] An Easy Fix . . . I recently installed an app at a client's site. For some reason, my switchboard form triggered an error when the startup form tried to open it on a user's PC. I had never had this error before on any other PC. For a short story the fix was as follows: On the switchboard form: comment out all code, compile, save, and exit access. Then reopen, uncomment all code, compile, and save. After that the error went away, and the front end was reduced in size. This particular switchboard form was originally created in A95, upgraded to A97, is now in AXP, and had many revisions along the way. My guess is that somehow there was 'old code' attached to the form. When the code was commented out and the database compiled, the 'old code' was eliminated. I could watch the compile 'progress bar' and it took longer than usual after the initial uncommenting. This was certainly an easy fix. Since I hadn't seen this before I thought I would pass it along to this group. Dan Waters Quality Process Solutions _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From cfoust at infostatsystems.com Tue Jan 20 10:42:20 2004 From: cfoust at infostatsystems.com (Charlotte Foust) Date: Tue, 20 Jan 2004 08:42:20 -0800 Subject: [AccessD] Instantiate Forms as Objects Message-ID: Maybe JC knows differently, but as far as I know, you can't do it that way, which is one of the reasons I don't use that syntax. Charlotte Foust -----Original Message----- From: Ken Ismert [mailto:KIsmert at TexasSystems.com] Sent: Tuesday, January 20, 2004 8:33 AM To: 'Access Developers discussion and problem solving' Subject: [AccessD] Instantiate Forms as Objects Hello Group: As you know, you can instantiate an Access form, just like any other object, by using its class name: Dim rFrm as Access.Form Set rFrm = New Form_YourForm ' form 'YourForm' This syntax allows you to create multiple open instances of a form, a necessity for my framework. However, I've run into a problem. What I need is a simple, one-line way to instantiate a form object using a string: sFormName = "YourForm" Set rFrm = MFOS("Form_" & sFormName) ' MFOS = "Magic Function or Syntax" Note: Because of the multiple instance requirement, DoCmd.OpenForm won't work. It can only make one instance of a form. I can't find a CreateObject syntax that works. In my current function, I use a big Case statement matching the form name to it's class. This has become a pain, because every time I add or remove forms, I have to edit the function. Have any of you found a way to do that? -Ken _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From Lambert.Heenan at AIG.com Tue Jan 20 11:00:03 2004 From: Lambert.Heenan at AIG.com (Heenan, Lambert) Date: Tue, 20 Jan 2004 12:00:03 -0500 Subject: [AccessD] An Easy Fix . . . Message-ID: <8B98F8EA48F8BA47A2F24E0D0AF40CF407AD7CFD@xlivmbx12.aig.com> Is this another example of why I find switchboards a PITA. I never use the stupid things myself. I prefer to create my own "opening form" with all the buttons on it put there by me, so I know (at least in theory) what the stupid code behind the form is doing. Lambert > -----Original Message----- > From: Charlotte Foust [SMTP:cfoust at infostatsystems.com] > Sent: Tuesday, January 20, 2004 11:39 AM > To: Access Developers discussion and problem solving > Subject: RE: [AccessD] An Easy Fix . . . > > If this was a wizard-created switchboard, you would be better off > renaming Switchboard Items, saving the code to text from the existing > switchboard, and deleting the switchboard form. Then if you start the > switchboard manager, it will discover you have no switchboard and create > a new one. If you then delete the newly created Switchboard Items table > and rename the old one back to Switchboard Items, you'll have a working > switchboard with current code. At that point, you can add back any > specializations you made in the old switchboard, assuming you still need > them. > > Charlotte Foust > > -----Original Message----- > From: Dan Waters [mailto:dwaters at usinternet.com] > Sent: Tuesday, January 20, 2004 7:39 AM > To: Database Advisors > Subject: [AccessD] An Easy Fix . . . > > > I recently installed an app at a client's site. For some reason, my > switchboard form triggered an error when the startup form tried to open > it on a user's PC. I had never had this error before on any other PC. > For a short story the fix was as follows: > > > > On the switchboard form: comment out all code, compile, save, and exit > access. Then reopen, uncomment all code, compile, and save. > > > > After that the error went away, and the front end was reduced in size. > > > > This particular switchboard form was originally created in A95, upgraded > to A97, is now in AXP, and had many revisions along the way. My guess > is that somehow there was 'old code' attached to the form. When the > code was commented out and the database compiled, the 'old code' was > eliminated. I could watch the compile 'progress bar' and it took longer > than usual after the initial uncommenting. > > > > This was certainly an easy fix. Since I hadn't seen this before I > thought I would pass it along to this group. > > > > Dan Waters > > Quality Process Solutions > > _______________________________________________ > 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 From dwaters at usinternet.com Tue Jan 20 11:01:18 2004 From: dwaters at usinternet.com (Dan Waters) Date: Tue, 20 Jan 2004 11:01:18 -0600 Subject: [AccessD] An Easy Fix . . . In-Reply-To: <24907479.1074617056972.JavaMail.root@localhost.localdomain> Message-ID: <000001c3df77$05b84310$de1811d8@DanWaters> Charlotte, The original code created by the switchboard wizard, and the switchboard table, are long gone, but the form 'container' was still original. I should have called it the 'Main' form since it no longer has any resemblance to the original switchboard. But - going through the step I described did solve the problem. Dan -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Charlotte Foust Sent: Tuesday, January 20, 2004 10:39 AM To: Access Developers discussion and problem solving Subject: RE: [AccessD] An Easy Fix . . . If this was a wizard-created switchboard, you would be better off renaming Switchboard Items, saving the code to text from the existing switchboard, and deleting the switchboard form. Then if you start the switchboard manager, it will discover you have no switchboard and create a new one. If you then delete the newly created Switchboard Items table and rename the old one back to Switchboard Items, you'll have a working switchboard with current code. At that point, you can add back any specializations you made in the old switchboard, assuming you still need them. Charlotte Foust -----Original Message----- From: Dan Waters [mailto:dwaters at usinternet.com] Sent: Tuesday, January 20, 2004 7:39 AM To: Database Advisors Subject: [AccessD] An Easy Fix . . . I recently installed an app at a client's site. For some reason, my switchboard form triggered an error when the startup form tried to open it on a user's PC. I had never had this error before on any other PC. For a short story the fix was as follows: On the switchboard form: comment out all code, compile, save, and exit access. Then reopen, uncomment all code, compile, and save. After that the error went away, and the front end was reduced in size. This particular switchboard form was originally created in A95, upgraded to A97, is now in AXP, and had many revisions along the way. My guess is that somehow there was 'old code' attached to the form. When the code was commented out and the database compiled, the 'old code' was eliminated. I could watch the compile 'progress bar' and it took longer than usual after the initial uncommenting. This was certainly an easy fix. Since I hadn't seen this before I thought I would pass it along to this group. Dan Waters Quality Process Solutions _______________________________________________ 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 From cfoust at infostatsystems.com Tue Jan 20 11:06:33 2004 From: cfoust at infostatsystems.com (Charlotte Foust) Date: Tue, 20 Jan 2004 09:06:33 -0800 Subject: [AccessD] An Easy Fix . . . Message-ID: I, on the other hand, find them handy and flexible and easier to maintain than a form with fixed buttons. However the switchboard manager is one of the few wizards that writes current code, and the changes in Access 2000 and higher resulted in quite different code from the earlier versions, which were DAO-based. Since DAO is not the default object model in Access 2000 and XP, earlier switchboard code breaks unless you take steps to make sure it doesn't. Charlotte Foust -----Original Message----- From: Heenan, Lambert [mailto:Lambert.Heenan at aig.com] Sent: Tuesday, January 20, 2004 9:00 AM To: 'Access Developers discussion and problem solving' Subject: RE: [AccessD] An Easy Fix . . . Is this another example of why I find switchboards a PITA. I never use the stupid things myself. I prefer to create my own "opening form" with all the buttons on it put there by me, so I know (at least in theory) what the stupid code behind the form is doing. Lambert > -----Original Message----- > From: Charlotte Foust [SMTP:cfoust at infostatsystems.com] > Sent: Tuesday, January 20, 2004 11:39 AM > To: Access Developers discussion and problem solving > Subject: RE: [AccessD] An Easy Fix . . . > > If this was a wizard-created switchboard, you would be better off > renaming Switchboard Items, saving the code to text from the existing > switchboard, and deleting the switchboard form. Then if you start the > switchboard manager, it will discover you have no switchboard and > create a new one. If you then delete the newly created Switchboard > Items table and rename the old one back to Switchboard Items, you'll > have a working switchboard with current code. At that point, you can > add back any specializations you made in the old switchboard, assuming > you still need them. > > Charlotte Foust > > -----Original Message----- > From: Dan Waters [mailto:dwaters at usinternet.com] > Sent: Tuesday, January 20, 2004 7:39 AM > To: Database Advisors > Subject: [AccessD] An Easy Fix . . . > > > I recently installed an app at a client's site. For some reason, my > switchboard form triggered an error when the startup form tried to > open it on a user's PC. I had never had this error before on any > other PC. For a short story the fix was as follows: > > > > On the switchboard form: comment out all code, compile, save, and exit > access. Then reopen, uncomment all code, compile, and save. > > > > After that the error went away, and the front end was reduced in size. > > > > This particular switchboard form was originally created in A95, > upgraded to A97, is now in AXP, and had many revisions along the way. > My guess is that somehow there was 'old code' attached to the form. > When the code was commented out and the database compiled, the 'old > code' was eliminated. I could watch the compile 'progress bar' and it > took longer than usual after the initial uncommenting. > > > > This was certainly an easy fix. Since I hadn't seen this before I > thought I would pass it along to this group. > > > > Dan Waters > > Quality Process Solutions > > _______________________________________________ > 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 _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From JColby at dispec.com Tue Jan 20 11:30:30 2004 From: JColby at dispec.com (Colby, John) Date: Tue, 20 Jan 2004 12:30:30 -0500 Subject: [AccessD] Test Message-ID: <05C61C52D7CAD211A7830008C7DF6F1079BCF4@DISABILITYINS01> John W. Colby The database guy From JColby at dispec.com Tue Jan 20 11:34:44 2004 From: JColby at dispec.com (Colby, John) Date: Tue, 20 Jan 2004 12:34:44 -0500 Subject: [AccessD] test Message-ID: <05C61C52D7CAD211A7830008C7DF6F1079BCF5@DISABILITYINS01> John W. Colby The database guy From gustav at cactus.dk Tue Jan 20 11:39:45 2004 From: gustav at cactus.dk (Gustav Brock) Date: Tue, 20 Jan 2004 18:39:45 +0100 Subject: [AccessD] Test In-Reply-To: <05C61C52D7CAD211A7830008C7DF6F1079BCF4@DISABILITYINS01> References: <05C61C52D7CAD211A7830008C7DF6F1079BCF4@DISABILITYINS01> Message-ID: <19835314499.20040120183945@cactus.dk> Hi John From: "Colby, John" So where did colbyconsulting go? /gustav > John W. Colby > The database guy From JColby at dispec.com Tue Jan 20 11:46:16 2004 From: JColby at dispec.com (Colby, John) Date: Tue, 20 Jan 2004 12:46:16 -0500 Subject: [AccessD] Test Message-ID: <05C61C52D7CAD211A7830008C7DF6F1079BCF6@DISABILITYINS01> I'm coming in from a client that I work at on site. John W. Colby The database guy -----Original Message----- From: Gustav Brock [mailto:gustav at cactus.dk] Sent: Tuesday, January 20, 2004 12:40 PM To: Access Developers discussion and problem solving Subject: Re: [AccessD] Test Hi John From: "Colby, John" So where did colbyconsulting go? /gustav > John W. Colby > The database guy _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From JColby at dispec.com Tue Jan 20 11:51:58 2004 From: JColby at dispec.com (Colby, John) Date: Tue, 20 Jan 2004 12:51:58 -0500 Subject: [AccessD] Word 2K email merge problems Message-ID: <05C61C52D7CAD211A7830008C7DF6F1079BCF7@DISABILITYINS01> Folks, I'm trying to do an email merge where the merge data document is named differently that the original data document. IOW, I set up the original document in a directory on the server. I set up a data document (text file) out there to test the document, get it working etc. When it comes time to merge I need the actual data document to be located on the local drive because this merge process could be preformed by several people at the same time and by doing it locally I avoid "collisions". I also rename both the merge document itself and it's data document. It seems this should be doable, but I can't find a way to programatically set the merge data (document) name at merge time. Is this possible? John W. Colby The database guy From cfoust at infostatsystems.com Tue Jan 20 11:59:22 2004 From: cfoust at infostatsystems.com (Charlotte Foust) Date: Tue, 20 Jan 2004 09:59:22 -0800 Subject: [AccessD] Word 2K email merge problems Message-ID: I never found a way, so I hope someone else has. Charlotte Foust -----Original Message----- From: Colby, John [mailto:JColby at dispec.com] Sent: Tuesday, January 20, 2004 9:52 AM To: Accessd (E-mail) Subject: [AccessD] Word 2K email merge problems Folks, I'm trying to do an email merge where the merge data document is named differently that the original data document. IOW, I set up the original document in a directory on the server. I set up a data document (text file) out there to test the document, get it working etc. When it comes time to merge I need the actual data document to be located on the local drive because this merge process could be preformed by several people at the same time and by doing it locally I avoid "collisions". I also rename both the merge document itself and it's data document. It seems this should be doable, but I can't find a way to programatically set the merge data (document) name at merge time. Is this possible? John W. Colby The database guy _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From wdhindman at bellsouth.net Tue Jan 20 12:23:14 2004 From: wdhindman at bellsouth.net (William Hindman) Date: Tue, 20 Jan 2004 13:23:14 -0500 Subject: [AccessD] Word 2K email merge problems References: <05C61C52D7CAD211A7830008C7DF6F1079BCF7@DISABILITYINS01> Message-ID: <00ab01c3df82$77f73ca0$6101a8c0@dejpolsys> JC ...try the MailMergeSendToCustom event ...iirc MS has code for directing the merge to use almost anything you tell it to ...HTH :) William Hindman - Next Year In The Free State! ----- Original Message ----- From: "Colby, John" To: "Accessd (E-mail)" Sent: Tuesday, January 20, 2004 12:51 PM Subject: [AccessD] Word 2K email merge problems > Folks, > > I'm trying to do an email merge where the merge data document is named > differently that the original data document. IOW, I set up the original > document in a directory on the server. I set up a data document (text file) > out there to test the document, get it working etc. When it comes time to > merge I need the actual data document to be located on the local drive > because this merge process could be preformed by several people at the same > time and by doing it locally I avoid "collisions". I also rename both the > merge document itself and it's data document. It seems this should be > doable, but I can't find a way to programatically set the merge data > (document) name at merge time. > > Is this possible? > > John W. Colby > The database guy > > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com > From JColby at dispec.com Tue Jan 20 12:29:12 2004 From: JColby at dispec.com (Colby, John) Date: Tue, 20 Jan 2004 13:29:12 -0500 Subject: [AccessD] Mail Merge - Verifying user is satisfied and completed the merge Message-ID: <05C61C52D7CAD211A7830008C7DF6F1079BCF8@DISABILITYINS01> I am attempting to set up a system where one group of people "order" merged documents, and another set of users then print those ordered documents, QA and mail them out. The users that order the documents will do the mail merge (on their local machine), with the document opened and visible to them after the merge. The user can then edit the document (add sentences / paragraphs etc), scan that the merged data is correct etc. If they are happy then I need to save the merged document out to a common location on the network with the doc name modified to include the initials of the person ordering the document, the date, the claim number that the doc is about etc. If the user is not happy, I need to just delete the document(s) on the local drive. My question is, how do I stop processing as I open the document so that I can then ask the user if it all worked satisfactorily after they close the document. Is it possible to "open the document MODAL (so to speak) where they are in Word, can edit and do whatever, but they have to close Word to get back to Access? How do you guys handle this stuff. John W. Colby The DIS database guy From cfoust at infostatsystems.com Tue Jan 20 12:36:45 2004 From: cfoust at infostatsystems.com (Charlotte Foust) Date: Tue, 20 Jan 2004 10:36:45 -0800 Subject: [AccessD] Mail Merge - Verifying user is satisfied and completed the merge Message-ID: Are you asking about stopping the processing in Word or Access? Charlotte Foust -----Original Message----- From: Colby, John [mailto:JColby at dispec.com] Sent: Tuesday, January 20, 2004 10:29 AM To: Accessd (E-mail) Subject: [AccessD] Mail Merge - Verifying user is satisfied and completed the merge I am attempting to set up a system where one group of people "order" merged documents, and another set of users then print those ordered documents, QA and mail them out. The users that order the documents will do the mail merge (on their local machine), with the document opened and visible to them after the merge. The user can then edit the document (add sentences / paragraphs etc), scan that the merged data is correct etc. If they are happy then I need to save the merged document out to a common location on the network with the doc name modified to include the initials of the person ordering the document, the date, the claim number that the doc is about etc. If the user is not happy, I need to just delete the document(s) on the local drive. My question is, how do I stop processing as I open the document so that I can then ask the user if it all worked satisfactorily after they close the document. Is it possible to "open the document MODAL (so to speak) where they are in Word, can edit and do whatever, but they have to close Word to get back to Access? How do you guys handle this stuff. John W. Colby The DIS database guy _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From lists at theopg.com Tue Jan 20 12:42:35 2004 From: lists at theopg.com (MarkH) Date: Tue, 20 Jan 2004 18:42:35 -0000 Subject: [AccessD] NEVER MIND - janus control?: 'Duplicate values'errorin Access - what number isit?!? In-Reply-To: <410-2200412203324254@christopherhawkins.com> Message-ID: <000001c3df85$37867930$d00b6bd5@netboxxp> Cheers Christopher mark -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Christopher Hawkins Sent: 20 January 2004 03:33 To: accessd at databaseadvisors.com Subject: RE: [AccessD] NEVER MIND - janus control?: 'Duplicate values'errorin Access - what number isit?!? I haven't had any troubles with it. It's very easy to use. Go to Janusys.com and check out the latest version. -Christopher- ---- Original Message ---- From: lists at theopg.com To: accessd at databaseadvisors.com, Subject: RE: [AccessD] NEVER MIND - janus control?: 'Duplicate values' errorin Access - what number isit?!? Date: Tue, 20 Jan 2004 00:38:13 -0000 >Sorry for drifting off topic, but... > >How do you find the grid control? I used it a couple of years ago >for a >one off project. I later used a free copy off a mag cd and found it >crashed so I gave up, can't remember what the problem was as I was >only >playing. The first time I used it, it was great. Is it still buggy? > >Mark > >-----Original Message----- >From: accessd-bounces at databaseadvisors.com >[mailto:accessd-bounces at databaseadvisors.com] On Behalf Of >Christopher >Hawkins >Sent: 20 January 2004 00:20 >To: accessd at databaseadvisors.com >Subject: [AccessD] NEVER MIND: 'Duplicate values' error in Access - >what >number isit?!? > > >I'm an idiot...the very next thing I tried after sending my message >got >me what I wanted. FYI, here's what I did (the error was happening >when >a JanusGrid component was being updated): > >Private Sub grdMain_Error(ByVal ErrNumber As Long, ByVal >DisplayMessage >As Object) > > If ErrNumber = -2147217887 Then > MsgBox "Got it!" > Else > MsgBox "Try again..." > End If > >End Sub > >-Christopher- > > >_______________________________________________ >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 > > _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From JColby at dispec.com Tue Jan 20 12:48:35 2004 From: JColby at dispec.com (Colby, John) Date: Tue, 20 Jan 2004 13:48:35 -0500 Subject: [AccessD] Mail Merge - Verifying user is satisfied and comple ted the merge Message-ID: <05C61C52D7CAD211A7830008C7DF6F1079BCF9@DISABILITYINS01> yes, in Access. Access opens the word document, merges the data and waits for the user to edit the data.. The user edits the document to their hearts content, then closes the document. Access continues processing, saving the document out to a network drive and logging the successful merge to a table. In order to do this, I need to know the user successfully merged the document and was happy with the results. John W. Colby The database guy -----Original Message----- From: Charlotte Foust [mailto:cfoust at infostatsystems.com] Sent: Tuesday, January 20, 2004 1:37 PM To: Access Developers discussion and problem solving Subject: RE: [AccessD] Mail Merge - Verifying user is satisfied and completed the merge Are you asking about stopping the processing in Word or Access? Charlotte Foust -----Original Message----- From: Colby, John [mailto:JColby at dispec.com] Sent: Tuesday, January 20, 2004 10:29 AM To: Accessd (E-mail) Subject: [AccessD] Mail Merge - Verifying user is satisfied and completed the merge I am attempting to set up a system where one group of people "order" merged documents, and another set of users then print those ordered documents, QA and mail them out. The users that order the documents will do the mail merge (on their local machine), with the document opened and visible to them after the merge. The user can then edit the document (add sentences / paragraphs etc), scan that the merged data is correct etc. If they are happy then I need to save the merged document out to a common location on the network with the doc name modified to include the initials of the person ordering the document, the date, the claim number that the doc is about etc. If the user is not happy, I need to just delete the document(s) on the local drive. My question is, how do I stop processing as I open the document so that I can then ask the user if it all worked satisfactorily after they close the document. Is it possible to "open the document MODAL (so to speak) where they are in Word, can edit and do whatever, but they have to close Word to get back to Access? How do you guys handle this stuff. John W. Colby The DIS database guy _______________________________________________ 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 From rl_stewart at highstream.net Tue Jan 20 12:48:26 2004 From: rl_stewart at highstream.net (Robert L. Stewart) Date: Tue, 20 Jan 2004 12:48:26 -0600 Subject: [AccessD] Re: An Easy Fix . . . In-Reply-To: <200401201800.i0KI0Rm08679@databaseadvisors.com> Message-ID: <5.1.0.14.2.20040120124406.02971f68@pop3.highstream.net> Personally, I hate reinventing the wheel when the one we have works perfectly well. The problem is that the new version switchboard uses ADO and the older one uses DAO. That is why renaming the menu items table and the current switchboard form allows it to be recreated with the ADO code. Then you can either delete all of the code from the old form and paste in the new or modify the new form. Deleting the table and renaming the original back allows you to keep all the previous menu options. That is why Charlotte's method of handling it works. Robert At 12:00 PM 1/20/2004 -0600, you wrote: >Message: 11 >Date: Tue, 20 Jan 2004 12:00:03 -0500 >From: "Heenan, Lambert" >Subject: RE: [AccessD] An Easy Fix . . . >To: "'Access Developers discussion and problem solving'" > >Message-ID: > <8B98F8EA48F8BA47A2F24E0D0AF40CF407AD7CFD at xlivmbx12.aig.com> >Content-Type: text/plain > >Is this another example of why I find switchboards a PITA. I never use the >stupid things myself. I prefer to create my own "opening form" with all the >buttons on it put there by me, so I know (at least in theory) what the >stupid code behind the form is doing. > >Lambert > > > -----Original Message----- > > From: Charlotte Foust [SMTP:cfoust at infostatsystems.com] > > Sent: Tuesday, January 20, 2004 11:39 AM > > To: Access Developers discussion and problem solving > > Subject: RE: [AccessD] An Easy Fix . . . > > > > If this was a wizard-created switchboard, you would be better off > > renaming Switchboard Items, saving the code to text from the existing > > switchboard, and deleting the switchboard form. Then if you start the > > switchboard manager, it will discover you have no switchboard and create > > a new one. If you then delete the newly created Switchboard Items table > > and rename the old one back to Switchboard Items, you'll have a working > > switchboard with current code. At that point, you can add back any > > specializations you made in the old switchboard, assuming you still need > > them. > > > > Charlotte Foust > > From JColby at dispec.com Tue Jan 20 12:50:47 2004 From: JColby at dispec.com (Colby, John) Date: Tue, 20 Jan 2004 13:50:47 -0500 Subject: [AccessD] Word 2K email merge problems Message-ID: <05C61C52D7CAD211A7830008C7DF6F1079BCFA@DISABILITYINS01> What is this an event of? I can't find it in Word or Access. and searching for MailMergeSendToCustom on the web turns up nothing. John W. Colby The database guy -----Original Message----- From: William Hindman [mailto:wdhindman at bellsouth.net] Sent: Tuesday, January 20, 2004 1:23 PM To: Access Developers discussion and problem solving Subject: Re: [AccessD] Word 2K email merge problems JC ...try the MailMergeSendToCustom event ...iirc MS has code for directing the merge to use almost anything you tell it to ...HTH :) William Hindman - Next Year In The Free State! ----- Original Message ----- From: "Colby, John" To: "Accessd (E-mail)" Sent: Tuesday, January 20, 2004 12:51 PM Subject: [AccessD] Word 2K email merge problems > Folks, > > I'm trying to do an email merge where the merge data document is named > differently that the original data document. IOW, I set up the original > document in a directory on the server. I set up a data document (text file) > out there to test the document, get it working etc. When it comes time to > merge I need the actual data document to be located on the local drive > because this merge process could be preformed by several people at the same > time and by doing it locally I avoid "collisions". I also rename both the > merge document itself and it's data document. It seems this should be > doable, but I can't find a way to programatically set the merge data > (document) name at merge time. > > Is this possible? > > John W. Colby > The database guy > > _______________________________________________ > 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 From cfoust at infostatsystems.com Tue Jan 20 13:11:06 2004 From: cfoust at infostatsystems.com (Charlotte Foust) Date: Tue, 20 Jan 2004 11:11:06 -0800 Subject: [AccessD] Mail Merge - Verifying user is satisfied and completed the merge Message-ID: Um ... Raise an event in Word? Charlotte Foust -----Original Message----- From: Colby, John [mailto:JColby at dispec.com] Sent: Tuesday, January 20, 2004 10:49 AM To: 'Access Developers discussion and problem solving' Subject: RE: [AccessD] Mail Merge - Verifying user is satisfied and completed the merge yes, in Access. Access opens the word document, merges the data and waits for the user to edit the data.. The user edits the document to their hearts content, then closes the document. Access continues processing, saving the document out to a network drive and logging the successful merge to a table. In order to do this, I need to know the user successfully merged the document and was happy with the results. John W. Colby The database guy -----Original Message----- From: Charlotte Foust [mailto:cfoust at infostatsystems.com] Sent: Tuesday, January 20, 2004 1:37 PM To: Access Developers discussion and problem solving Subject: RE: [AccessD] Mail Merge - Verifying user is satisfied and completed the merge Are you asking about stopping the processing in Word or Access? Charlotte Foust -----Original Message----- From: Colby, John [mailto:JColby at dispec.com] Sent: Tuesday, January 20, 2004 10:29 AM To: Accessd (E-mail) Subject: [AccessD] Mail Merge - Verifying user is satisfied and completed the merge I am attempting to set up a system where one group of people "order" merged documents, and another set of users then print those ordered documents, QA and mail them out. The users that order the documents will do the mail merge (on their local machine), with the document opened and visible to them after the merge. The user can then edit the document (add sentences / paragraphs etc), scan that the merged data is correct etc. If they are happy then I need to save the merged document out to a common location on the network with the doc name modified to include the initials of the person ordering the document, the date, the claim number that the doc is about etc. If the user is not happy, I need to just delete the document(s) on the local drive. My question is, how do I stop processing as I open the document so that I can then ask the user if it all worked satisfactorily after they close the document. Is it possible to "open the document MODAL (so to speak) where they are in Word, can edit and do whatever, but they have to close Word to get back to Access? How do you guys handle this stuff. John W. Colby The DIS database guy _______________________________________________ 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 _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From weeden1949 at hotmail.com Tue Jan 20 13:23:31 2004 From: weeden1949 at hotmail.com (Greg Smith) Date: Tue, 20 Jan 2004 13:23:31 -0600 Subject: [AccessD] Strange Table Behavior... References: Message-ID: Hi everyone! Happy Tuesday...;) I have a table in a rather large database which is having some sort of odd issue. It's 6 columns, one autonumber field, 4 text fields, one date. It currently contains about 524,000 records, and is on the MANY side of a one-to-many relationship from the main table. This is nothing extraordinary...just fairly simple for a table. One of the text fields contains indexes used for looking up data in the primary table. The data in this field is a variety of ATT, SD, CLD, CLM, CLR&A, etc. When someone looks up, let's say, a City Lot Mortgage (which would be CLM), that CLM is used in the criteria portion of the query to lookup the matching index and data from the primary table. And, because of other fields on this lookup form, this field also has to be able to search via the wildcard paramater of *, so the criteria in the query is actually "Like forms![FeeBookSearch]![Index]", without the quotes and the [Index] field then contains CLM, or * if it's to be ignored in the search. To our knowledge, this has been working just FINE for almost two years. Last week, the SD quit working. But ATT, CLD, CLM and all the others worked fine. I still keep telling myself that's not possible, but it's true. And it's now happened again today. I fixed it the last time by creating a NEW table from this data (everyone was out of the db), deleting the old one and reestablishing all the relationships. PITA to say the least. What's really piqued my interest is how in the world can SD NOT work and all the others work? There is nothing visible in the SD field other than SD. I've even exported it to other programs like Excel to see if anything else was in there, but nope...zip, zero nada. Now get this: If I create a test query on that table, and use Like [TestMe] as the criteria for this index field, when I run the query it'll obviously ask me for TestMe. If I put in SD, I get zero records (should be about 48,000), if I run it again with ATT, I get all of the Attorneys, the same with CLD and CLM, etc. Everything else works. And here's the clinker: If I use SD* or *SD, I get'em all! But SD by itself still won't work. It acts like there's something else in the field not allowing the match, but I'll be dipped if I can figure it out. I'd rather not cobble to code to fit this data quirk, but I'm rapidly running out of options and time at this point. Needless to say the Recorder has already stated her opinion in my ear once today and I'd rather not have her repeat it. Sorry about the length of this post...but I tried to explain it fully to head off questions (yea, right, like I write anything clearly the first time) anyone may have. Any ideas or tests to try would be greatly appreciated. TIA Greg Smith Weeden1949 at hotmail.com From JColby at dispec.com Tue Jan 20 13:24:22 2004 From: JColby at dispec.com (Colby, John) Date: Tue, 20 Jan 2004 14:24:22 -0500 Subject: [AccessD] Mail Merge - Verifying user is satisfied and comple ted the merge Message-ID: <05C61C52D7CAD211A7830008C7DF6F1079BCFB@DISABILITYINS01> I'm not running a class (or any other code) in Word. Access is opening an instance of word, merging the data, then turning over control to the user. John W. Colby The database guy -----Original Message----- From: Charlotte Foust [mailto:cfoust at infostatsystems.com] Sent: Tuesday, January 20, 2004 2:11 PM To: Access Developers discussion and problem solving Subject: RE: [AccessD] Mail Merge - Verifying user is satisfied and completed the merge Um ... Raise an event in Word? Charlotte Foust -----Original Message----- From: Colby, John [mailto:JColby at dispec.com] Sent: Tuesday, January 20, 2004 10:49 AM To: 'Access Developers discussion and problem solving' Subject: RE: [AccessD] Mail Merge - Verifying user is satisfied and completed the merge yes, in Access. Access opens the word document, merges the data and waits for the user to edit the data.. The user edits the document to their hearts content, then closes the document. Access continues processing, saving the document out to a network drive and logging the successful merge to a table. In order to do this, I need to know the user successfully merged the document and was happy with the results. John W. Colby The database guy -----Original Message----- From: Charlotte Foust [mailto:cfoust at infostatsystems.com] Sent: Tuesday, January 20, 2004 1:37 PM To: Access Developers discussion and problem solving Subject: RE: [AccessD] Mail Merge - Verifying user is satisfied and completed the merge Are you asking about stopping the processing in Word or Access? Charlotte Foust -----Original Message----- From: Colby, John [mailto:JColby at dispec.com] Sent: Tuesday, January 20, 2004 10:29 AM To: Accessd (E-mail) Subject: [AccessD] Mail Merge - Verifying user is satisfied and completed the merge I am attempting to set up a system where one group of people "order" merged documents, and another set of users then print those ordered documents, QA and mail them out. The users that order the documents will do the mail merge (on their local machine), with the document opened and visible to them after the merge. The user can then edit the document (add sentences / paragraphs etc), scan that the merged data is correct etc. If they are happy then I need to save the merged document out to a common location on the network with the doc name modified to include the initials of the person ordering the document, the date, the claim number that the doc is about etc. If the user is not happy, I need to just delete the document(s) on the local drive. My question is, how do I stop processing as I open the document so that I can then ask the user if it all worked satisfactorily after they close the document. Is it possible to "open the document MODAL (so to speak) where they are in Word, can edit and do whatever, but they have to close Word to get back to Access? How do you guys handle this stuff. John W. Colby The DIS database guy _______________________________________________ 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 _______________________________________________ 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 From gustav at cactus.dk Tue Jan 20 13:28:46 2004 From: gustav at cactus.dk (Gustav Brock) Date: Tue, 20 Jan 2004 20:28:46 +0100 Subject: [AccessD] Mail Merge - Verifying user is satisfied and comple ted the merge In-Reply-To: <05C61C52D7CAD211A7830008C7DF6F1079BCF9@DISABILITYINS01> References: <05C61C52D7CAD211A7830008C7DF6F1079BCF9@DISABILITYINS01> Message-ID: <6841855274.20040120202846@cactus.dk> Hi John That would probably require that you open Word - from within Access - as an OLE object of a form ... when finished editing, quit and return to Access. /gustav > yes, in Access. Access opens the word document, merges the data and waits > for the user to edit the data.. The user edits the document to their hearts > content, then closes the document. Access continues processing, saving the > document out to a network drive and logging the successful merge to a table. > In order to do this, I need to know the user successfully merged the > document and was happy with the results. From weeden1949 at hotmail.com Tue Jan 20 13:32:12 2004 From: weeden1949 at hotmail.com (Greg Smith) Date: Tue, 20 Jan 2004 13:32:12 -0600 Subject: [AccessD] Strange Table Behavior... References: Message-ID: Ahhh crud. Forgot to tell you ... Access 97. Greg ----- Original Message ----- From: "Greg Smith" To: "Access Developers discussion and problem solving" Sent: Tuesday, January 20, 2004 1:23 PM Subject: [AccessD] Strange Table Behavior... Hi everyone! Happy Tuesday...;) From JColby at dispec.com Tue Jan 20 13:34:03 2004 From: JColby at dispec.com (Colby, John) Date: Tue, 20 Jan 2004 14:34:03 -0500 Subject: [AccessD] Strange Table Behavior... Message-ID: <05C61C52D7CAD211A7830008C7DF6F1079BCFC@DISABILITYINS01> Try dropping the index on that field and re-creating it? John W. Colby The database guy -----Original Message----- From: Greg Smith [mailto:weeden1949 at hotmail.com] Sent: Tuesday, January 20, 2004 2:24 PM To: Access Developers discussion and problem solving Subject: [AccessD] Strange Table Behavior... Hi everyone! Happy Tuesday...;) I have a table in a rather large database which is having some sort of odd issue. It's 6 columns, one autonumber field, 4 text fields, one date. It currently contains about 524,000 records, and is on the MANY side of a one-to-many relationship from the main table. This is nothing extraordinary...just fairly simple for a table. One of the text fields contains indexes used for looking up data in the primary table. The data in this field is a variety of ATT, SD, CLD, CLM, CLR&A, etc. When someone looks up, let's say, a City Lot Mortgage (which would be CLM), that CLM is used in the criteria portion of the query to lookup the matching index and data from the primary table. And, because of other fields on this lookup form, this field also has to be able to search via the wildcard paramater of *, so the criteria in the query is actually "Like forms![FeeBookSearch]![Index]", without the quotes and the [Index] field then contains CLM, or * if it's to be ignored in the search. To our knowledge, this has been working just FINE for almost two years. Last week, the SD quit working. But ATT, CLD, CLM and all the others worked fine. I still keep telling myself that's not possible, but it's true. And it's now happened again today. I fixed it the last time by creating a NEW table from this data (everyone was out of the db), deleting the old one and reestablishing all the relationships. PITA to say the least. What's really piqued my interest is how in the world can SD NOT work and all the others work? There is nothing visible in the SD field other than SD. I've even exported it to other programs like Excel to see if anything else was in there, but nope...zip, zero nada. Now get this: If I create a test query on that table, and use Like [TestMe] as the criteria for this index field, when I run the query it'll obviously ask me for TestMe. If I put in SD, I get zero records (should be about 48,000), if I run it again with ATT, I get all of the Attorneys, the same with CLD and CLM, etc. Everything else works. And here's the clinker: If I use SD* or *SD, I get'em all! But SD by itself still won't work. It acts like there's something else in the field not allowing the match, but I'll be dipped if I can figure it out. I'd rather not cobble to code to fit this data quirk, but I'm rapidly running out of options and time at this point. Needless to say the Recorder has already stated her opinion in my ear once today and I'd rather not have her repeat it. Sorry about the length of this post...but I tried to explain it fully to head off questions (yea, right, like I write anything clearly the first time) anyone may have. Any ideas or tests to try would be greatly appreciated. TIA Greg Smith Weeden1949 at hotmail.com _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From ssharkins at bellsouth.net Tue Jan 20 13:34:01 2004 From: ssharkins at bellsouth.net (Susan Harkins) Date: Tue, 20 Jan 2004 14:34:01 -0500 Subject: [AccessD] Strange Table Behavior... References: Message-ID: <003201c3df8c$6493d010$210110ac@SUSANONE> This is really over simplistic, but have you tried just deleting SD in the lookup table and re-entering it? You might also run an update on your many table -- *SD* = "SD" I've seen phantom characters work their way in before. The only way to get rid of them is to just delete them and re-enter the data. You're lucky, since you know the field it's in and even if it's in the many data, an update query should take care of it. If it's a phantom character, you won't find it. On the other hand, do any of your operators/users have access to action queries? Almost sounds like someone accidentially changed the SD string in your many table. Have you tried entering a dummy SD record to see if the old method can find it? Just curious. How are you entering that "SD" string? Might check there too. Susan H. > Hi everyone! Happy Tuesday...;) > > I have a table in a rather large database which is having some sort of odd > issue. It's 6 columns, one autonumber field, 4 text fields, one date. It > currently contains about 524,000 records, and is on the MANY side of a > one-to-many relationship from the main table. This is nothing > extraordinary...just fairly simple for a table. > > One of the text fields contains indexes used for looking up data in the > primary table. The data in this field is a variety of ATT, SD, CLD, CLM, > CLR&A, etc. When someone looks up, let's say, a City Lot Mortgage (which > would be CLM), that CLM is used in the criteria portion of the query to > lookup the matching index and data from the primary table. And, because of > other fields on this lookup form, this field also has to be able to search > via the wildcard paramater of *, so the criteria in the query is actually > "Like forms![FeeBookSearch]![Index]", without the quotes and the [Index] > field then contains CLM, or * if it's to be ignored in the search. > > To our knowledge, this has been working just FINE for almost two years. > > Last week, the SD quit working. But ATT, CLD, CLM and all the others worked > fine. I still keep telling myself that's not possible, but it's true. > > And it's now happened again today. > > I fixed it the last time by creating a NEW table from this data (everyone > was out of the db), deleting the old one and reestablishing all the > relationships. PITA to say the least. > > What's really piqued my interest is how in the world can SD NOT work and all > the others work? > > There is nothing visible in the SD field other than SD. I've even exported > it to other programs like Excel to see if anything else was in there, but > nope...zip, zero nada. > > Now get this: If I create a test query on that table, and use Like [TestMe] > as the criteria for this index field, when I run the query it'll obviously > ask me for TestMe. If I put in SD, I get zero records (should be about > 48,000), if I run it again with ATT, I get all of the Attorneys, the same > with CLD and CLM, etc. Everything else works. And here's the clinker: If > I use SD* or *SD, I get'em all! But SD by itself still won't work. > > It acts like there's something else in the field not allowing the match, but > I'll be dipped if I can figure it out. > > I'd rather not cobble to code to fit this data quirk, but I'm rapidly > running out of options and time at this point. Needless to say the Recorder > has already stated her opinion in my ear once today and I'd rather not have > her repeat it. > > Sorry about the length of this post...but I tried to explain it fully to > head off questions (yea, right, like I write anything clearly the first > time) anyone may have. > > Any ideas or tests to try would be greatly appreciated. > > TIA > > Greg Smith > Weeden1949 at hotmail.com > > > > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com > From JColby at dispec.com Tue Jan 20 13:34:35 2004 From: JColby at dispec.com (Colby, John) Date: Tue, 20 Jan 2004 14:34:35 -0500 Subject: [AccessD] Mail Merge Fails Message-ID: <05C61C52D7CAD211A7830008C7DF6F1079BCFD@DISABILITYINS01> If a mail merge fails, it can leave an instance of word open and the doc that word instance was using locked, i,e, it can't be deleted because the doc is in use. Obviously I can go in to the task manager, select the word process (image name?) and "End Process". Is there any way to do that programatically? Is there any way to "name" the word instance that my program is opening so that I can go check to see if that instance is open? Am I making this too complicated? I'm not by any stretch a word mail merge guru and this seems very unwieldy. John W. Colby The database guy From KIsmert at TexasSystems.com Tue Jan 20 13:49:03 2004 From: KIsmert at TexasSystems.com (Ken Ismert) Date: Tue, 20 Jan 2004 13:49:03 -0600 Subject: [AccessD] Instantiate Forms as Objects In-Reply-To: Message-ID: <001c01c3df8e$752d9ee0$2a3ca8c0@TEXASSYSTEMS.COM> So, how do you get muliple instances of the same form open without using the "Set rFrm = New Form_YourForm" syntax? -Ken -----Original Message----- From: Charlotte Foust [mailto:cfoust at infostatsystems.com] Sent: Tuesday, January 20, 2004 10:42 AM To: Access Developers discussion and problem solving Subject: RE: [AccessD] Instantiate Forms as Objects Maybe JC knows differently, but as far as I know, you can't do it that way, which is one of the reasons I don't use that syntax. Charlotte Foust From ranthony at wrsystems.com Tue Jan 20 13:51:23 2004 From: ranthony at wrsystems.com (Randall Anthony) Date: Tue, 20 Jan 2004 14:51:23 -0500 Subject: [AccessD] Mail Merge Fails Message-ID: <5F21A4E8B8DD734992EF9E70AC9D30641289CE@mail2.wrsystems.com> John, Maybe it's too simple, but I use this line to close and also in the error routine. I also pass a parameter for the document name, but don't use it to close. WordObj.Documents.Application.Quit (wdDoNotSaveChanges) -----Original Message----- From: Colby, John [mailto:JColby at dispec.com] Sent: Tuesday, January 20, 2004 2:35 PM To: Accessd (E-mail) Subject: [AccessD] Mail Merge Fails If a mail merge fails, it can leave an instance of word open and the doc that word instance was using locked, i,e, it can't be deleted because the doc is in use. Obviously I can go in to the task manager, select the word process (image name?) and "End Process". Is there any way to do that programatically? Is there any way to "name" the word instance that my program is opening so that I can go check to see if that instance is open? Am I making this too complicated? I'm not by any stretch a word mail merge guru and this seems very unwieldy. John W. Colby The database guy _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From davide at dalyn.co.nz Tue Jan 20 13:44:10 2004 From: davide at dalyn.co.nz (David Emerson) Date: Wed, 21 Jan 2004 08:44:10 +1300 Subject: [AccessD] Report lines not printing Message-ID: <5.2.0.9.0.20040120104747.02487008@mail.dalyn.co.nz> A97 runtime. W98. Hewlett Packard LaserJet 6p I have a strange one here. When reports are printed they don't show any lines or rectangles that are created on the report. If printed from another computer on the network the lines and rectangles are printed, but they have been reduced in size by about 25% and appear in the top left hand corner. The report runs fine on another printer (different brand). It also prints fine at other locations (different computers and printer brands). A search on google didn't find anything obvious but maybe I wasn't looking in the right place. Regards David Emerson Dalyn Software Ltd 25 Cunliffe St, Churton Park Wellington, New Zealand Ph/Fax (877) 456-1205 From gustav at cactus.dk Tue Jan 20 14:00:55 2004 From: gustav at cactus.dk (Gustav Brock) Date: Tue, 20 Jan 2004 21:00:55 +0100 Subject: [AccessD] Report lines not printing In-Reply-To: <5.2.0.9.0.20040120104747.02487008@mail.dalyn.co.nz> References: <5.2.0.9.0.20040120104747.02487008@mail.dalyn.co.nz> Message-ID: <16343784478.20040120210055@cactus.dk> Hi David Sounds like printer driver problems. Try/check this: 1. Use the Postscript driver for that printer if possible. 2. Update the PCL driver as earlier versions are known to be buggy. 3. Use the HP 5p PCL printer driver which is known to be less buggy. 4. As a last resort use the HP LaserJet II printer driver ... Also check to setting for the printer resolution. If it is too low, fine line may disappear. /gustav > A97 runtime. W98. Hewlett Packard LaserJet 6p > I have a strange one here. When reports are printed they don't show any > lines or rectangles that are created on the report. > If printed from another computer on the network the lines and rectangles > are printed, but they have been reduced in size by about 25% and appear in > the top left hand corner. > The report runs fine on another printer (different brand). It also prints > fine at other locations (different computers and printer brands). From BBarabash at TappeConstruction.com Tue Jan 20 14:21:55 2004 From: BBarabash at TappeConstruction.com (Brett Barabash) Date: Tue, 20 Jan 2004 14:21:55 -0600 Subject: [AccessD] Mail Merge - Verifying user is satisfied and comple ted the merge Message-ID: <426071E0B0A6D311B3C0006008B0AB23AFE2BF@TAPPEEXCH01> John, I've never used the built-in Mail Merge in Access so I can't help you there, but here's what I was able to come up with using OLE automation. This requires a reference to your Word object library: Private Const cTemplate = "c:\temp\template.doc" Private mstrDocName As String Private WithEvents mobjWord As Word.Application Private Sub cmdMerge_Click() 'Create a new instance of Word If mobjWord Is Nothing Then Set mobjWord = New Word.Application End If 'Open the template document and merge to new document mobjWord.Documents.Open cTemplate With mobjWord.Documents(cTemplate).MailMerge .Destination = wdSendToNewDocument .Execute End With 'Keep track of the newly created document name and close the template With mobjWord mstrDocName = .ActiveDocument.Name .Documents(cTemplate).Close False .Visible = True End With End Sub Private Sub Form_Unload(Cancel As Integer) On Error Resume Next 'Cleanup the existing copy of Word mobjWord.Quit False Set mobjWord = Nothing End Sub Private Sub mobjWord_DocumentBeforeClose(ByVal Doc As Word.Document, Cancel As Boolean) 'User is closing document, check to see if it's the one we created If Doc.Name = mstrDocName Then 'Hide Word application so our Access app can gain focus mobjWord.Visible = False If MsgBox("Save changes?", vbYesNo) = vbYes Then Doc.SaveAs "c:\temp\test.doc" Else 'Close without saving Doc.Close False End If End If End Sub ===== I am attempting to set up a system where one group of people "order" merged documents, and another set of users then print those ordered documents, QA and mail them out. The users that order the documents will do the mail merge (on their local machine), with the document opened and visible to them after the merge. The user can then edit the document (add sentences / paragraphs etc), scan that the merged data is correct etc. If they are happy then I need to save the merged document out to a common location on the network with the doc name modified to include the initials of the person ordering the document, the date, the claim number that the doc is about etc. If the user is not happy, I need to just delete the document(s) on the local drive. My question is, how do I stop processing as I open the document so that I can then ask the user if it all worked satisfactorily after they close the document. Is it possible to "open the document MODAL (so to speak) where they are in Word, can edit and do whatever, but they have to close Word to get back to Access? How do you guys handle this stuff. John W. Colby The DIS database guy -------------------------------------------------------------------------------------------------------------------- This email and any files transmitted with it are confidential and intended solely for the use of the individual or entity to whom they are addressed. If you have received this email in error please notify the originator of the message. This footer also confirms that this email message has been scanned for the presence of computer viruses. Any views expressed in this message are those of the individual sender, except where the sender specifies and with authority, states them to be the views of Tappe Construction Co. Scanning of this message and addition of this footer is performed by SurfControl E-mail Filter software in conjunction with virus detection software. From Erwin.Craps at ithelps.be Tue Jan 20 14:30:21 2004 From: Erwin.Craps at ithelps.be (Erwin Craps - IT Helps) Date: Tue, 20 Jan 2004 21:30:21 +0100 Subject: [AccessD] Instantiate Forms as Objects Message-ID: <46B976F2B698FF46A4FE7636509B22DF03D135@stekelbes.ithelps.local> Not at my knowledge neither. But there is a big advantage why that is so. When renaming forms or deleting or absence of (in case of importing routines that are dependant of a form) you would get an compile error straight away. When using syntax like "form_" & strFormName you would only get an error when you run the routine. I find this a very good thing.... Erwin -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Charlotte Foust Sent: Tuesday, January 20, 2004 5:42 PM To: Access Developers discussion and problem solving Subject: RE: [AccessD] Instantiate Forms as Objects Maybe JC knows differently, but as far as I know, you can't do it that way, which is one of the reasons I don't use that syntax. Charlotte Foust -----Original Message----- From: Ken Ismert [mailto:KIsmert at TexasSystems.com] Sent: Tuesday, January 20, 2004 8:33 AM To: 'Access Developers discussion and problem solving' Subject: [AccessD] Instantiate Forms as Objects Hello Group: As you know, you can instantiate an Access form, just like any other object, by using its class name: Dim rFrm as Access.Form Set rFrm = New Form_YourForm ' form 'YourForm' This syntax allows you to create multiple open instances of a form, a necessity for my framework. However, I've run into a problem. What I need is a simple, one-line way to instantiate a form object using a string: sFormName = "YourForm" Set rFrm = MFOS("Form_" & sFormName) ' MFOS = "Magic Function or Syntax" Note: Because of the multiple instance requirement, DoCmd.OpenForm won't work. It can only make one instance of a form. I can't find a CreateObject syntax that works. In my current function, I use a big Case statement matching the form name to it's class. This has become a pain, because every time I add or remove forms, I have to edit the function. Have any of you found a way to do that? -Ken _______________________________________________ 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 From jimdettman at earthlink.net Tue Jan 20 14:30:33 2004 From: jimdettman at earthlink.net (Jim Dettman) Date: Tue, 20 Jan 2004 15:30:33 -0500 Subject: [AccessD] Report lines not printing In-Reply-To: <5.2.0.9.0.20040120104747.02487008@mail.dalyn.co.nz> Message-ID: David, Also try: 1. In report properties, set Fast Laser Printing to False 2. In report properties, set Layout for print to true. 3. In the printer driver, if you have a setting for "Print True Types Fonts as Graphics", turn it on. 4. Try changing the spool format in Windows from EMF to RAW or RAW to EMF. Jim Dettman President, Online Computer Services of WNY, Inc. (315) 699-3443 jimdettman at earthlink.net -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of David Emerson Sent: Tuesday, January 20, 2004 2:44 PM To: accessd at databaseadvisors.com Subject: [AccessD] Report lines not printing A97 runtime. W98. Hewlett Packard LaserJet 6p I have a strange one here. When reports are printed they don't show any lines or rectangles that are created on the report. If printed from another computer on the network the lines and rectangles are printed, but they have been reduced in size by about 25% and appear in the top left hand corner. The report runs fine on another printer (different brand). It also prints fine at other locations (different computers and printer brands). A search on google didn't find anything obvious but maybe I wasn't looking in the right place. Regards David Emerson Dalyn Software Ltd 25 Cunliffe St, Churton Park Wellington, New Zealand Ph/Fax (877) 456-1205 _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From JColby at dispec.com Tue Jan 20 14:33:08 2004 From: JColby at dispec.com (Colby, John) Date: Tue, 20 Jan 2004 15:33:08 -0500 Subject: [AccessD] Mail Merge - Verifying user is satisfied and comple ted the merge Message-ID: <05C61C52D7CAD211A7830008C7DF6F1079BCFE@DISABILITYINS01> Hey, that's at least a clue. Thanks, John W. Colby The database guy -----Original Message----- From: Brett Barabash [mailto:BBarabash at tappeconstruction.com] Sent: Tuesday, January 20, 2004 3:22 PM To: 'Access Developers discussion and problem solving' Subject: RE: [AccessD] Mail Merge - Verifying user is satisfied and comple ted the merge John, I've never used the built-in Mail Merge in Access so I can't help you there, but here's what I was able to come up with using OLE automation. This requires a reference to your Word object library: Private Const cTemplate = "c:\temp\template.doc" Private mstrDocName As String Private WithEvents mobjWord As Word.Application Private Sub cmdMerge_Click() 'Create a new instance of Word If mobjWord Is Nothing Then Set mobjWord = New Word.Application End If 'Open the template document and merge to new document mobjWord.Documents.Open cTemplate With mobjWord.Documents(cTemplate).MailMerge .Destination = wdSendToNewDocument .Execute End With 'Keep track of the newly created document name and close the template With mobjWord mstrDocName = .ActiveDocument.Name .Documents(cTemplate).Close False .Visible = True End With End Sub Private Sub Form_Unload(Cancel As Integer) On Error Resume Next 'Cleanup the existing copy of Word mobjWord.Quit False Set mobjWord = Nothing End Sub Private Sub mobjWord_DocumentBeforeClose(ByVal Doc As Word.Document, Cancel As Boolean) 'User is closing document, check to see if it's the one we created If Doc.Name = mstrDocName Then 'Hide Word application so our Access app can gain focus mobjWord.Visible = False If MsgBox("Save changes?", vbYesNo) = vbYes Then Doc.SaveAs "c:\temp\test.doc" Else 'Close without saving Doc.Close False End If End If End Sub ===== I am attempting to set up a system where one group of people "order" merged documents, and another set of users then print those ordered documents, QA and mail them out. The users that order the documents will do the mail merge (on their local machine), with the document opened and visible to them after the merge. The user can then edit the document (add sentences / paragraphs etc), scan that the merged data is correct etc. If they are happy then I need to save the merged document out to a common location on the network with the doc name modified to include the initials of the person ordering the document, the date, the claim number that the doc is about etc. If the user is not happy, I need to just delete the document(s) on the local drive. My question is, how do I stop processing as I open the document so that I can then ask the user if it all worked satisfactorily after they close the document. Is it possible to "open the document MODAL (so to speak) where they are in Word, can edit and do whatever, but they have to close Word to get back to Access? How do you guys handle this stuff. John W. Colby The DIS database guy ---------------------------------------------------------------------------- ---------------------------------------- This email and any files transmitted with it are confidential and intended solely for the use of the individual or entity to whom they are addressed. If you have received this email in error please notify the originator of the message. This footer also confirms that this email message has been scanned for the presence of computer viruses. Any views expressed in this message are those of the individual sender, except where the sender specifies and with authority, states them to be the views of Tappe Construction Co. Scanning of this message and addition of this footer is performed by SurfControl E-mail Filter software in conjunction with virus detection software. _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From DMcAfee at haascnc.com Tue Jan 20 14:44:13 2004 From: DMcAfee at haascnc.com (David McAfee) Date: Tue, 20 Jan 2004 12:44:13 -0800 Subject: [AccessD] Report lines not printing Message-ID: <657FB70438B7D311AF320090279C180106144020@EXCHMAIL> This is a known issue. I never saw it with 400,600 or 800 series Inkjets. I have seen it with 700, 900 & some Laserjets. Another problem is printing in draft using colors that are set in report runtimes. I sent a letter to HP and their reply was to print in "best" or "presentation" mode. I opted to stop buying HPs instead. Another workaround is to print the report as a PDF then print the PDF file. We do that at the office. HTH David -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of David Emerson Sent: Tuesday, January 20, 2004 11:44 AM To: accessd at databaseadvisors.com Subject: [AccessD] Report lines not printing A97 runtime. W98. Hewlett Packard LaserJet 6p I have a strange one here. When reports are printed they don't show any lines or rectangles that are created on the report. If printed from another computer on the network the lines and rectangles are printed, but they have been reduced in size by about 25% and appear in the top left hand corner. The report runs fine on another printer (different brand). It also prints fine at other locations (different computers and printer brands). A search on google didn't find anything obvious but maybe I wasn't looking in the right place. Regards David Emerson Dalyn Software Ltd 25 Cunliffe St, Churton Park Wellington, New Zealand Ph/Fax (877) 456-1205 _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From cfoust at infostatsystems.com Tue Jan 20 15:02:15 2004 From: cfoust at infostatsystems.com (Charlotte Foust) Date: Tue, 20 Jan 2004 13:02:15 -0800 Subject: [AccessD] Instantiate Forms as Objects Message-ID: I don't generally do it at all, so I would have to dig back into my archives to see how I did it last time. I seem to recall using a collection and a custom class, but I haven't done it in several years, so my memory is dusty. Charlotte Foust -----Original Message----- From: Ken Ismert [mailto:KIsmert at TexasSystems.com] Sent: Tuesday, January 20, 2004 11:49 AM To: 'Access Developers discussion and problem solving' Subject: RE: [AccessD] Instantiate Forms as Objects So, how do you get muliple instances of the same form open without using the "Set rFrm = New Form_YourForm" syntax? -Ken -----Original Message----- From: Charlotte Foust [mailto:cfoust at infostatsystems.com] Sent: Tuesday, January 20, 2004 10:42 AM To: Access Developers discussion and problem solving Subject: RE: [AccessD] Instantiate Forms as Objects Maybe JC knows differently, but as far as I know, you can't do it that way, which is one of the reasons I don't use that syntax. Charlotte Foust _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From davide at dalyn.co.nz Tue Jan 20 15:08:14 2004 From: davide at dalyn.co.nz (David Emerson) Date: Wed, 21 Jan 2004 10:08:14 +1300 Subject: [AccessD] Report lines not printing In-Reply-To: <657FB70438B7D311AF320090279C180106144020@EXCHMAIL> Message-ID: <5.2.0.9.0.20040121100738.00b2ab70@mail.dalyn.co.nz> Thanks everyone for your suggestions. I will pass them on to the client. David At 20/01/2004, you wrote: >This is a known issue. I never saw it with 400,600 or 800 series Inkjets. >I have seen it with 700, 900 & some Laserjets. Another problem is printing >in draft using colors that are set in report runtimes. I sent a letter to >HP and their reply was to print in "best" or "presentation" mode. I opted >to stop buying HPs instead. > >Another workaround is to print the report as a PDF then print the PDF >file. We do that at the office. > >HTH >David > >-----Original Message----- >From: accessd-bounces at databaseadvisors.com >[mailto:accessd-bounces at databaseadvisors.com]On Behalf Of David Emerson >Sent: Tuesday, January 20, 2004 11:44 AM >To: accessd at databaseadvisors.com >Subject: [AccessD] Report lines not printing > > >A97 runtime. W98. Hewlett Packard LaserJet 6p > >I have a strange one here. When reports are printed they don't show any >lines or rectangles that are created on the report. > >If printed from another computer on the network the lines and rectangles >are printed, but they have been reduced in size by about 25% and appear in >the top left hand corner. > >The report runs fine on another printer (different brand). It also prints >fine at other locations (different computers and printer brands). > >A search on google didn't find anything obvious but maybe I wasn't looking >in the right place. > >Regards > >David Emerson >Dalyn Software Ltd >25 Cunliffe St, Churton Park >Wellington, New Zealand >Ph/Fax (877) 456-1205 > >_______________________________________________ >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 From Subscriptions at servicexp.com Tue Jan 20 15:40:40 2004 From: Subscriptions at servicexp.com (Robert Gracie) Date: Tue, 20 Jan 2004 16:40:40 -0500 Subject: [AccessD] Mail Merge - Verifying user is satisfied and completed the merge In-Reply-To: <05C61C52D7CAD211A7830008C7DF6F1079BCFB@DISABILITYINS01> Message-ID: <001001c3df9e$0d3eeb80$6401a8c0@RG> What would be the end result for the user for a "Approved" scenario? A save for Approval? I think I remember reading that MS Word raises an After Save event.... Robert Gracie www.servicexp.com -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Colby, John Sent: Tuesday, January 20, 2004 2:24 PM To: 'Access Developers discussion and problem solving' Subject: RE: [AccessD] Mail Merge - Verifying user is satisfied and completed the merge I'm not running a class (or any other code) in Word. Access is opening an instance of word, merging the data, then turning over control to the user. John W. Colby The database guy -----Original Message----- From: Charlotte Foust [mailto:cfoust at infostatsystems.com] Sent: Tuesday, January 20, 2004 2:11 PM To: Access Developers discussion and problem solving Subject: RE: [AccessD] Mail Merge - Verifying user is satisfied and completed the merge Um ... Raise an event in Word? Charlotte Foust -----Original Message----- From: Colby, John [mailto:JColby at dispec.com] Sent: Tuesday, January 20, 2004 10:49 AM To: 'Access Developers discussion and problem solving' Subject: RE: [AccessD] Mail Merge - Verifying user is satisfied and completed the merge yes, in Access. Access opens the word document, merges the data and waits for the user to edit the data.. The user edits the document to their hearts content, then closes the document. Access continues processing, saving the document out to a network drive and logging the successful merge to a table. In order to do this, I need to know the user successfully merged the document and was happy with the results. John W. Colby The database guy -----Original Message----- From: Charlotte Foust [mailto:cfoust at infostatsystems.com] Sent: Tuesday, January 20, 2004 1:37 PM To: Access Developers discussion and problem solving Subject: RE: [AccessD] Mail Merge - Verifying user is satisfied and completed the merge Are you asking about stopping the processing in Word or Access? Charlotte Foust -----Original Message----- From: Colby, John [mailto:JColby at dispec.com] Sent: Tuesday, January 20, 2004 10:29 AM To: Accessd (E-mail) Subject: [AccessD] Mail Merge - Verifying user is satisfied and completed the merge I am attempting to set up a system where one group of people "order" merged documents, and another set of users then print those ordered documents, QA and mail them out. The users that order the documents will do the mail merge (on their local machine), with the document opened and visible to them after the merge. The user can then edit the document (add sentences / paragraphs etc), scan that the merged data is correct etc. If they are happy then I need to save the merged document out to a common location on the network with the doc name modified to include the initials of the person ordering the document, the date, the claim number that the doc is about etc. If the user is not happy, I need to just delete the document(s) on the local drive. My question is, how do I stop processing as I open the document so that I can then ask the user if it all worked satisfactorily after they close the document. Is it possible to "open the document MODAL (so to speak) where they are in Word, can edit and do whatever, but they have to close Word to get back to Access? How do you guys handle this stuff. John W. Colby The DIS database guy _______________________________________________ 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 _______________________________________________ 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 _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From pedro at plex.nl Tue Jan 20 14:12:24 2004 From: pedro at plex.nl (Pedro Janssen) Date: Tue, 20 Jan 2004 21:12:24 +0100 Subject: [AccessD] error after converting (mailmerge) References: <200401141408.i0EE8cNA020272@mailhostC.plex.net> <4005CD15.60401@shaw.ca> Message-ID: <001701c3df9f$a7fa51e0$f7c581d5@pedro> Thanks Marty for your response. I will try this when i am at work. I didn't convert the mdw file to A2k, but i could open the converted database with this mdw. How is this possible? Pedro Janssen ----- Original Message ----- From: "MartyConnelly" To: "Access Developers discussion and problem solving" Sent: Thursday, January 15, 2004 12:13 AM Subject: Re: [AccessD] error after converting (mailmerge) > How about trying > strConnect = "Provider=Microsoft.Jet.OLEDB.4.0;" & _ > "Data Source=c:\somepath\mydb.mdb;" & _ > "Jet OLEDB:System Database=MySystem.mdw", _ > "myUsername", "myPassword" > Note, remember to convert both the MDB and the MDW to the 4.0 > database format when using the 4.0 OLE DB Provider. Make a new copy of > 97 mdw to handle 2000. > > > pedro at plex.nl wrote: > > >Hello Group, > > > >i converted a A97 secured database to A2K. > >After making the changes in Wrkgadmin.exe and the ODBC Data Sources, i changed the names in the module. After running the mailmerge i get an error: Run-time error '5922' Word was unable to open the data source. The debug selects the .OpenDataSource from the code below. > > > >I figure out why this error occurs. > > > >TIA > > > >Pedro Janssen > > > > > > > > > >Sub CreateMergeDoc(UseDDE As Boolean, PrintDoc As Boolean) > > > > Dim WordDoc As Word.Document > > Dim strLetter As String > > Dim strConnect As String > > Dim WordApp As Word.Application > > > > Set WordApp = CreateObject("Word.Application") > > > > Set WordDoc = WordApp.Documents.Add > > With WordDoc.MailMerge > > If UseDDE Then > > strConnect = "QUERY Uitvoer" > > Else > > strConnect = "DSN=MS Access 2000 " _ > > & "Database;DBQ=E:\Cytologie\positieven\" _ > > & "BeveiligdPOSITIEVEN(A2K).mdb;" _ > > & "FIL=MS Access;" > > End If > > .OpenDataSource _ > > Name:="E:\Cytologie\positieven\BeveiligdPOSITIEVEN(A2K).mdb", _ > > ReadOnly:=True, LinkToSource:=True, _ > > Connection:=strConnect, _ > > SQLStatement:="SELECT * FROM [Uitvoer], [Aanvrager] WHERE Uitvoer.AanvragerID = Aanvrager.AanvragerID AND Uitvoer.ControleID = " & Forms![Brief]![veld] & ";" > > > > With Fields > > ............... > > End With > > > > With WordApp.Selection > > ............... > > End With > > > > > > With WordDoc.MailMerge > > .DataSource.FirstRecord = 1 > > > > .Destination = wdSendToNewDocument > > > > .Execute > > > > If PrintDoc Then > > .Application.Options.PrintBackground = False > > .Application.ActiveDocument.PrintOut > > End If > > End With > > > > WordApp.Visible = True > > End With > >End Sub > > > > > > > > > > -- > Marty Connelly > Victoria, B.C. > Canada > > > > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com > > From Developer at UltraDNT.com Tue Jan 20 16:12:30 2004 From: Developer at UltraDNT.com (Developer) Date: Tue, 20 Jan 2004 17:12:30 -0500 Subject: [AccessD] Word 2K email merge problems In-Reply-To: <05C61C52D7CAD211A7830008C7DF6F1079BCFA@DISABILITYINS01> Message-ID: <001901c3dfa2$7f5e5350$7001a8c0@COA3> I may be late to this thread , but I didn't see a resolution ... I always give the "main" doc a .DOT extension. The default action of a template is to always generate a new one of itself, leaving the original in place. By using a .dot, the result document is always something like "FormLetters1" when using the options: .MainDocumentType = 0 'wdFormLetters .Destination = 0 ' wdSendToNewDocument BTW - your users will surely ask .. How to print PART of a merged doc, since, in effect there are many page 1's in the resulting doc. The answer is by printing in sections, so in the Pages box of the Print dialog, they need to enter s10-s20 to print the 10th through 20th letters in the result. Hth Steve -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Colby, John Sent: Tuesday, January 20, 2004 1:51 PM To: 'Access Developers discussion and problem solving' Subject: RE: [AccessD] Word 2K email merge problems What is this an event of? I can't find it in Word or Access. and searching for MailMergeSendToCustom on the web turns up nothing. John W. Colby The database guy -----Original Message----- From: William Hindman [mailto:wdhindman at bellsouth.net] Sent: Tuesday, January 20, 2004 1:23 PM To: Access Developers discussion and problem solving Subject: Re: [AccessD] Word 2K email merge problems JC ...try the MailMergeSendToCustom event ...iirc MS has code for directing the merge to use almost anything you tell it to ...HTH :) William Hindman - Next Year In The Free State! ----- Original Message ----- From: "Colby, John" To: "Accessd (E-mail)" Sent: Tuesday, January 20, 2004 12:51 PM Subject: [AccessD] Word 2K email merge problems > Folks, > > I'm trying to do an email merge where the merge data document is named > differently that the original data document. IOW, I set up the > original document in a directory on the server. I set up a data > document (text file) > out there to test the document, get it working etc. When it comes > time to merge I need the actual data document to be located on the > local drive because this merge process could be preformed by several > people at the same > time and by doing it locally I avoid "collisions". I also rename both > the merge document itself and it's data document. It seems this > should be doable, but I can't find a way to programatically set the > merge data > (document) name at merge time. > > Is this possible? > > John W. Colby > The database guy > > _______________________________________________ > 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 _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From jwcolby at colbyconsulting.com Tue Jan 20 19:43:33 2004 From: jwcolby at colbyconsulting.com (John W. Colby) Date: Tue, 20 Jan 2004 20:43:33 -0500 Subject: [AccessD] MDB to sql server Message-ID: My client DIS has finally ordered a new server for their database, a shiny new Dell dual P4 2.4g with 1gb ram etc., Windows 2K Server OS and SQL Server 2K. Given that the MDB was running on an old PIII 400 mhz NT running all the email and everything else the company owned, just the new server hardware should provide a decent boost in performance. However they also want to move to SQL Server. I have a server machine here at the office running Win2K Pro and SQL Server 2K. My intention is to do the data port from MDB to SQL Server at my office in advance, figuring out how to do it and discovering all the pitfalls before hand. The database consists of approximately 90 tables, of which ~30 are lookup tables, ~30 are main tables / child tables, and a handful of many-many. This MDB is heavily normalized with relationships established, no cascade delete. I use Autonumber PKs exclusively. I tried to do the import from inside SQL Server using DTS(?) but ended up with 17 tables not imported, and the structure but not the data for several main tables. What is the best method to use for getting the database moved into SQL Server, preferable maintaining the incrementing autonumber methodology as well as the relationships, with referential integrity enforced, no cascade deletes? I went through this exercise a couple of years ago with a similar size database, and managed, in the end to get it imported and functioning. John W. Colby www.ColbyConsulting.com From wdhindman at bellsouth.net Tue Jan 20 20:04:44 2004 From: wdhindman at bellsouth.net (William Hindman) Date: Tue, 20 Jan 2004 21:04:44 -0500 Subject: [AccessD] Word 2K email merge problems References: <05C61C52D7CAD211A7830008C7DF6F1079BCFA@DISABILITYINS01> Message-ID: <000c01c3dfc2$f0666e00$6101a8c0@dejpolsys> ...the word mailmerge object ...I found the correct name in KB 285333 along with some other events that can be used and sample code ...HTH :) William Hindman - Next Year In The Free State! ----- Original Message ----- From: "Colby, John" To: "'Access Developers discussion and problem solving'" Sent: Tuesday, January 20, 2004 1:50 PM Subject: RE: [AccessD] Word 2K email merge problems > What is this an event of? I can't find it in Word or Access. and searching > for MailMergeSendToCustom on the web turns up nothing. > > John W. Colby > The database guy > > > -----Original Message----- > From: William Hindman [mailto:wdhindman at bellsouth.net] > Sent: Tuesday, January 20, 2004 1:23 PM > To: Access Developers discussion and problem solving > Subject: Re: [AccessD] Word 2K email merge problems > > > JC > > ...try the MailMergeSendToCustom event ...iirc MS has code for directing the > merge to use almost anything you tell it to ...HTH :) > > William Hindman > - Next Year In The Free State! > > > ----- Original Message ----- > From: "Colby, John" > To: "Accessd (E-mail)" > Sent: Tuesday, January 20, 2004 12:51 PM > Subject: [AccessD] Word 2K email merge problems > > > > Folks, > > > > I'm trying to do an email merge where the merge data document is named > > differently that the original data document. IOW, I set up the original > > document in a directory on the server. I set up a data document (text > file) > > out there to test the document, get it working etc. When it comes time to > > merge I need the actual data document to be located on the local drive > > because this merge process could be preformed by several people at the > same > > time and by doing it locally I avoid "collisions". I also rename both the > > merge document itself and it's data document. It seems this should be > > doable, but I can't find a way to programatically set the merge data > > (document) name at merge time. > > > > Is this possible? > > > > John W. Colby > > The database guy > > > > _______________________________________________ > > 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 > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com > From jwcolby at colbyconsulting.com Tue Jan 20 20:12:29 2004 From: jwcolby at colbyconsulting.com (John W. Colby) Date: Tue, 20 Jan 2004 21:12:29 -0500 Subject: [AccessD] Word 2K email merge problems In-Reply-To: <000c01c3dfc2$f0666e00$6101a8c0@dejpolsys> Message-ID: Thanks William. John W. Colby www.ColbyConsulting.com -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of William Hindman Sent: Tuesday, January 20, 2004 9:05 PM To: Access Developers discussion and problem solving Subject: Re: [AccessD] Word 2K email merge problems ...the word mailmerge object ...I found the correct name in KB 285333 along with some other events that can be used and sample code ...HTH :) William Hindman - Next Year In The Free State! ----- Original Message ----- From: "Colby, John" To: "'Access Developers discussion and problem solving'" Sent: Tuesday, January 20, 2004 1:50 PM Subject: RE: [AccessD] Word 2K email merge problems > What is this an event of? I can't find it in Word or Access. and searching > for MailMergeSendToCustom on the web turns up nothing. > > John W. Colby > The database guy > > > -----Original Message----- > From: William Hindman [mailto:wdhindman at bellsouth.net] > Sent: Tuesday, January 20, 2004 1:23 PM > To: Access Developers discussion and problem solving > Subject: Re: [AccessD] Word 2K email merge problems > > > JC > > ...try the MailMergeSendToCustom event ...iirc MS has code for directing the > merge to use almost anything you tell it to ...HTH :) > > William Hindman > - Next Year In The Free State! > > > ----- Original Message ----- > From: "Colby, John" > To: "Accessd (E-mail)" > Sent: Tuesday, January 20, 2004 12:51 PM > Subject: [AccessD] Word 2K email merge problems > > > > Folks, > > > > I'm trying to do an email merge where the merge data document is named > > differently that the original data document. IOW, I set up the original > > document in a directory on the server. I set up a data document (text > file) > > out there to test the document, get it working etc. When it comes time to > > merge I need the actual data document to be located on the local drive > > because this merge process could be preformed by several people at the > same > > time and by doing it locally I avoid "collisions". I also rename both the > > merge document itself and it's data document. It seems this should be > > doable, but I can't find a way to programatically set the merge data > > (document) name at merge time. > > > > Is this possible? > > > > John W. Colby > > The database guy > > > > _______________________________________________ > > 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 > _______________________________________________ > 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 From andrew.haslett at ilc.gov.au Tue Jan 20 20:41:15 2004 From: andrew.haslett at ilc.gov.au (Haslett, Andrew) Date: Wed, 21 Jan 2004 13:11:15 +1030 Subject: [AccessD] MDB to sql server Message-ID: I've found its better in this case to use the upsizing wizard from within Access 2k, as it seems to handle the native data types of Access better than importing from DTS. Make sure you have the Access patch installed first (can't remember what its called but its available at Office Update - something like a 'readiness update' or the like). Still check your primary key and identity fields in SQL afterwards as I can't recall if there were any other issues.. There may well have been a couple of options you needed to change during the export process to retain all constraints. Cheers, Andrew -----Original Message----- From: John W. Colby [mailto:jwcolby at colbyconsulting.com] Sent: Wednesday, 21 January 2004 12:14 PM To: AccessD Subject: [AccessD] MDB to sql server My client DIS has finally ordered a new server for their database, a shiny new Dell dual P4 2.4g with 1gb ram etc., Windows 2K Server OS and SQL Server 2K. Given that the MDB was running on an old PIII 400 mhz NT running all the email and everything else the company owned, just the new server hardware should provide a decent boost in performance. However they also want to move to SQL Server. I have a server machine here at the office running Win2K Pro and SQL Server 2K. My intention is to do the data port from MDB to SQL Server at my office in advance, figuring out how to do it and discovering all the pitfalls before hand. The database consists of approximately 90 tables, of which ~30 are lookup tables, ~30 are main tables / child tables, and a handful of many-many. This MDB is heavily normalized with relationships established, no cascade delete. I use Autonumber PKs exclusively. I tried to do the import from inside SQL Server using DTS(?) but ended up with 17 tables not imported, and the structure but not the data for several main tables. What is the best method to use for getting the database moved into SQL Server, preferable maintaining the incrementing autonumber methodology as well as the relationships, with referential integrity enforced, no cascade deletes? I went through this exercise a couple of years ago with a similar size database, and managed, in the end to get it imported and functioning. John W. Colby www.ColbyConsulting.com _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com IMPORTANT - PLEASE READ ******************** This email and any files transmitted with it are confidential and may contain information protected by law from disclosure. If you have received this message in error, please notify the sender immediately and delete this email from your system. No warranty is given that this email or files, if attached to this email, are free from computer viruses or other defects. They are provided on the basis the user assumes all responsibility for loss, damage or consequence resulting directly or indirectly from their use, whether caused by the negligence of the sender or not. From martyconnelly at shaw.ca Tue Jan 20 23:13:29 2004 From: martyconnelly at shaw.ca (MartyConnelly) Date: Tue, 20 Jan 2004 21:13:29 -0800 Subject: [AccessD] error after converting (mailmerge) References: <200401141408.i0EE8cNA020272@mailhostC.plex.net> <4005CD15.60401@shaw.ca> <001701c3df9f$a7fa51e0$f7c581d5@pedro> Message-ID: <400E0A79.2090002@shaw.ca> Using everything with A2K format saves doing a Unicode to Ansi conversion from 97. A couple of other things to try If it's Word 2000 or 97, try just setting the Name parameter to blank, i.e. .OpenDataSource Name:="", _ etc. Word does not like it if you specify a name and a connection string for ODBC calls. If it's Word 2002 you will also need to add Subtype:=wdMergeSubTypeWord2000 Also have a look at these examples Super Easy Word Merge. http://www.attcanada.net/~kallal.msn/msaccess/msaccess.html or this Cindy Meister's MVP site http://homepage.swissonline.ch/cindymeister/MergFram.htm Pedro Janssen wrote: >Thanks Marty for your response. I will try this when i am at work. > >I didn't convert the mdw file to A2k, but i could open the converted >database with this mdw. >How is this possible? > >Pedro Janssen > > > >----- Original Message ----- >From: "MartyConnelly" >To: "Access Developers discussion and problem solving" > >Sent: Thursday, January 15, 2004 12:13 AM >Subject: Re: [AccessD] error after converting (mailmerge) > > > > >>How about trying >>strConnect = "Provider=Microsoft.Jet.OLEDB.4.0;" & _ >> "Data Source=c:\somepath\mydb.mdb;" & _ >> "Jet OLEDB:System Database=MySystem.mdw", _ >> "myUsername", "myPassword" >>Note, remember to convert both the MDB and the MDW to the 4.0 >>database format when using the 4.0 OLE DB Provider. Make a new copy of >>97 mdw to handle 2000. >> >> >>pedro at plex.nl wrote: >> >> >> >>>Hello Group, >>> >>>i converted a A97 secured database to A2K. >>>After making the changes in Wrkgadmin.exe and the ODBC Data Sources, i >>> >>> >changed the names in the module. After running the mailmerge i get an error: >Run-time error '5922' Word was unable to open the data source. The debug >selects the .OpenDataSource from the code below. > > >>>I figure out why this error occurs. >>> >>>TIA >>> >>>Pedro Janssen >>> >>> >>> >>> >>>Sub CreateMergeDoc(UseDDE As Boolean, PrintDoc As Boolean) >>> >>> Dim WordDoc As Word.Document >>> Dim strLetter As String >>> Dim strConnect As String >>> Dim WordApp As Word.Application >>> >>> Set WordApp = CreateObject("Word.Application") >>> >>> Set WordDoc = WordApp.Documents.Add >>> With WordDoc.MailMerge >>> If UseDDE Then >>> strConnect = "QUERY Uitvoer" >>> Else >>> strConnect = "DSN=MS Access 2000 " _ >>> & "Database;DBQ=E:\Cytologie\positieven\" _ >>> & "BeveiligdPOSITIEVEN(A2K).mdb;" _ >>> & "FIL=MS Access;" >>> End If >>> .OpenDataSource _ >>> Name:="E:\Cytologie\positieven\BeveiligdPOSITIEVEN(A2K).mdb", _ >>> ReadOnly:=True, LinkToSource:=True, _ >>> Connection:=strConnect, _ >>> SQLStatement:="SELECT * FROM [Uitvoer], [Aanvrager] WHERE >>> >>> >Uitvoer.AanvragerID = Aanvrager.AanvragerID AND Uitvoer.ControleID = " & >Forms![Brief]![veld] & ";" > > >>> With Fields >>> ............... >>> End With >>> >>> With WordApp.Selection >>> ............... >>> End With >>> >>> >>> With WordDoc.MailMerge >>> .DataSource.FirstRecord = 1 >>> >>> .Destination = wdSendToNewDocument >>> >>> .Execute >>> >>> If PrintDoc Then >>> .Application.Options.PrintBackground = False >>> .Application.ActiveDocument.PrintOut >>> End If >>> End With >>> >>> WordApp.Visible = True >>> End With >>>End Sub >>> >>> >>> >>> >>> >>> >>-- >>Marty Connelly >>Victoria, B.C. >>Canada >> >> >> >>_______________________________________________ >>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 > > > -- Marty Connelly Victoria, B.C. Canada From d.dick at uws.edu.au Tue Jan 20 23:17:35 2004 From: d.dick at uws.edu.au (Darren DICK) Date: Wed, 21 Jan 2004 16:17:35 +1100 Subject: [AccessD] A2K: Error 3251 Message-ID: <000901c3dfdd$e1656170$48619a89@DDICK> Hi All This should be simple I have some code updating a table of records Dim selSQL As String Dim rs As Recordset selSQL = "SELECT tblMyTable.* FROM tblMyTable;" Set rs = db.OpenRecordset(selSQL, dbOpenSnapshot) With rs .Edit <===Code Fails Here !MyField = Me.txtMyControl .Update End With The rror I get is... Error 3251: Operation is not supported for this type of Object Any suggestions?? Many thanks DArren From stuart at lexacorp.com.pg Wed Jan 21 00:03:26 2004 From: stuart at lexacorp.com.pg (Stuart McLachlan) Date: Wed, 21 Jan 2004 16:03:26 +1000 Subject: [AccessD] A2K: Error 3251 In-Reply-To: <000901c3dfdd$e1656170$48619a89@DDICK> Message-ID: <400EA2CE.11566.1A6D76F@localhost> If you are opening dbOpenSnapshot, you are creating a temporary recordset that is a "Snapshot" of the table at a given point in time - it is not the table itself, so you can't update records in it. Open it as the default (dbDynaset) On 21 Jan 2004 at 16:17, Darren DICK wrote: > Hi All > This should be simple > > I have some code updating a table of records > > Dim selSQL As String > Dim rs As Recordset > > selSQL = "SELECT tblMyTable.* FROM tblMyTable;" > > Set rs = db.OpenRecordset(selSQL, dbOpenSnapshot) > > With rs > .Edit <===Code Fails Here > !MyField = Me.txtMyControl > .Update > End With > > The rror I get is... > Error 3251: Operation is not supported for this type of Object > > Any suggestions?? > > Many thanks > > DArren > > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com -- Lexacorp Ltd http://www.lexacorp.com.pg Information Technology Consultancy, Software Development,System Support. From Developer at UltraDNT.com Wed Jan 21 00:17:36 2004 From: Developer at UltraDNT.com (Developer) Date: Wed, 21 Jan 2004 01:17:36 -0500 Subject: [AccessD] A2K: Error 3251 In-Reply-To: <000901c3dfdd$e1656170$48619a89@DDICK> Message-ID: <000001c3dfe6$442f5290$7001a8c0@COA3> Change snapshot to dbOpenDynaset -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Darren DICK Sent: Wednesday, January 21, 2004 12:18 AM To: AccessD List Subject: [AccessD] A2K: Error 3251 Hi All This should be simple I have some code updating a table of records Dim selSQL As String Dim rs As Recordset selSQL = "SELECT tblMyTable.* FROM tblMyTable;" Set rs = db.OpenRecordset(selSQL, dbOpenSnapshot) With rs .Edit <===Code Fails Here !MyField = Me.txtMyControl .Update End With The rror I get is... Error 3251: Operation is not supported for this type of Object Any suggestions?? Many thanks DArren _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From accessd at shaw.ca Wed Jan 21 01:20:19 2004 From: accessd at shaw.ca (Jim Lawrence (AccessD)) Date: Tue, 20 Jan 2004 23:20:19 -0800 Subject: [AccessD] A2K: Error 3251 In-Reply-To: <000901c3dfdd$e1656170$48619a89@DDICK> Message-ID: Hi Darren: You have to make sure your DAO is referenced, the db object and rs recordset object is dimensioned and the right type of object is used, that has edit and update functionality. Example: Dim selSQL As String Dim rs as DAO.recordset Dim db as DAO.database set db = CurrentDb() set rs = db.OpenRecordset(selSQL, dbOpenDynaset) ... then everything should work just fine. HTH Jim -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Darren DICK Sent: Tuesday, January 20, 2004 9:18 PM To: AccessD List Subject: [AccessD] A2K: Error 3251 Hi All This should be simple I have some code updating a table of records Dim selSQL As String Dim rs As Recordset selSQL = "SELECT tblMyTable.* FROM tblMyTable;" Set rs = db.OpenRecordset(selSQL, dbOpenSnapshot) With rs .Edit <===Code Fails Here !MyField = Me.txtMyControl .Update End With The rror I get is... Error 3251: Operation is not supported for this type of Object Any suggestions?? Many thanks DArren _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From accessd666 at yahoo.com Wed Jan 21 02:40:24 2004 From: accessd666 at yahoo.com (Sad Der) Date: Wed, 21 Jan 2004 00:40:24 -0800 (PST) Subject: [AccessD] Major Performance Issue! Message-ID: <20040121084024.27016.qmail@web60210.mail.yahoo.com> Hi group, I've got a MAJOR performance issue. I need to display a lot of data. A performance test showed that it takes between 120 - 160 seconds (2 minutes - 2.40 minutes) to display the data! I have no idea how to speed things up dramaticly. I really could use some tips. Here's a description of the current environment: Access 2000 Client (size: 20 Mb) Access 2000 Back-end (size: 100 Mb) approx 4 users Novel network Functionality: I need to display 4 listbox' with data. Every listbox has the same table as source. Every listbox has a query as RowSource Every listbox has this layout: Proces Type | Date | # Records Listbox 1 displays 4 records Listbox 2 displays 2 records Listbox 3 displays 6 records Listbox 4 displays 3 records So the table (tblMultiInterface) has 15 records in total. Table tblMultiInterface Fields: Proces Type Text Date Text (!) Records Text (!) (zero records need to display N/A) I added the code as an attachment but unfortunatly this mail was blocked! If anybody would like to take a look at the code I can send it to you directly. Comments/tips/etc would be GREATLY appriciated! TIA Sad __________________________________ Do you Yahoo!? Yahoo! Hotjobs: Enter the "Signing Bonus" Sweepstakes http://hotjobs.sweepstakes.yahoo.com/signingbonus From pedro at plex.nl Wed Jan 21 09:59:35 2004 From: pedro at plex.nl (pedro at plex.nl) Date: Wed, 21 Jan 2004 09:59:35 (MET) Subject: [AccessD] error after converting (mailmerge) Message-ID: <200401210859.i0L8xZNA014596@mailhostC.plex.net> In antwoord op: > From: MartyConnelly > To: Access Developers discussion and problem solving > Date: Tue, 20 Jan 2004 21:13:29 -0800 > Subject: Re: [AccessD] error after converting (mailmerge) > > > Using everything with A2K format saves doing a Unicode to Ansi > conversion from 97. > > A couple of other things to try > If it's Word 2000 or 97, try just setting the Name parameter to blank, i.e. > > ..OpenDataSource Name:="", _ > > etc. Word does not like it if you specify a name and a connection string > for ODBC calls. > If it's Word 2002 you will also need to add > Subtype:=wdMergeSubTypeWord2000 > > Also have a look at these examples > Super Easy Word Merge. > http://www.attcanada.net/~kallal.msn/msaccess/msaccess.html > or this Cindy Meister's MVP site > http://homepage.swissonline.ch/cindymeister/MergFram.htm > > > Pedro Janssen wrote: > > >Thanks Marty for your response. I will try this when i am at work. > > > >I didn't convert the mdw file to A2k, but i could open the converted > >database with this mdw. > >How is this possible? > > > >Pedro Janssen > > > > > > > >----- Original Message ----- > >From: "MartyConnelly" > >To: "Access Developers discussion and problem solving" > > > >Sent: Thursday, January 15, 2004 12:13 AM > >Subject: Re: [AccessD] error after converting (mailmerge) > > > > > > > > > >>How about trying > >>strConnect = "Provider=Microsoft.Jet.OLEDB.4.0;" & _ > >> "Data Source=c:\somepath\mydb.mdb;" & _ > >> "Jet OLEDB:System Database=MySystem.mdw", _ > >> "myUsername", "myPassword" > >>Note, remember to convert both the MDB and the MDW to the 4.0 > >>database format when using the 4.0 OLE DB Provider. Make a new copy of > >>97 mdw to handle 2000. > >> > >> > >>pedro at plex.nl wrote: > >> > >> > >> > >>>Hello Group, > >>> > >>>i converted a A97 secured database to A2K. > >>>After making the changes in Wrkgadmin.exe and the ODBC Data Sources, i > >>> > >>> > >changed the names in the module. After running the mailmerge i get an error: > >Run-time error '5922' Word was unable to open the data source. The debug > >selects the .OpenDataSource from the code below. > > > > > >>>I figure out why this error occurs. > >>> > >>>TIA > >>> > >>>Pedro Janssen > >>> > >>> > >>> > >>> > >>>Sub CreateMergeDoc(UseDDE As Boolean, PrintDoc As Boolean) > >>> > >>> Dim WordDoc As Word.Document > >>> Dim strLetter As String > >>> Dim strConnect As String > >>> Dim WordApp As Word.Application > >>> > >>> Set WordApp = CreateObject("Word.Application") > >>> > >>> Set WordDoc = WordApp.Documents.Add > >>> With WordDoc.MailMerge > >>> If UseDDE Then > >>> strConnect = "QUERY Uitvoer" > >>> Else > >>> strConnect = "DSN=MS Access 2000 " _ > >>> & "Database;DBQ=E:\Cytologie\positieven\" _ > >>> & "BeveiligdPOSITIEVEN(A2K).mdb;" _ > >>> & "FIL=MS Access;" > >>> End If > >>> .OpenDataSource _ > >>> Name:="E:\Cytologie\positieven\BeveiligdPOSITIEVEN(A2K).mdb", _ > >>> ReadOnly:=True, LinkToSource:=True, _ > >>> Connection:=strConnect, _ > >>> SQLStatement:="SELECT * FROM [Uitvoer], [Aanvrager] WHERE > >>> > >>> > >Uitvoer.AanvragerID = Aanvrager.AanvragerID AND Uitvoer.ControleID = " & > >Forms![Brief]![veld] & ";" > > > > > >>> With Fields > >>> ............... > >>> End With > >>> > >>> With WordApp.Selection > >>> ............... > >>> End With > >>> > >>> > >>> With WordDoc.MailMerge > >>> .DataSource.FirstRecord = 1 > >>> > >>> .Destination = wdSendToNewDocument > >>> > >>> .Execute > >>> > >>> If PrintDoc Then > >>> .Application.Options.PrintBackground = False > >>> .Application.ActiveDocument.PrintOut > >>> End If > >>> End With > >>> > >>> WordApp.Visible = True > >>> End With > >>>End Sub > >>> > >>> > >>> > >>> > >>> > >>> > >>-- > >>Marty Connelly > >>Victoria, B.C. > >>Canada > >> > >> > >> > >>_______________________________________________ > >>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 > > > > > > > > -- > Marty Connelly > Victoria, B.C. > Canada > > > > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com From pedro at plex.nl Wed Jan 21 10:14:24 2004 From: pedro at plex.nl (pedro at plex.nl) Date: Wed, 21 Jan 2004 10:14:24 (MET) Subject: [AccessD] error after converting (mailmerge), please help! Message-ID: <200401210914.i0L9EONA015318@mailhostC.plex.net> Hello Marty nad others, i made a new workgroup account in A2K with the exact information that i used in A97. Also i made the same users, P-Id's and passwords. When changing the strConnect i get an error on the: MySystem.mdw", _ "myUsername"", "myPassword" the error selects the: , and says: expected. end of statement. I can't get the syntax in a way that it works with myUsername and myPassword. When i leave them, the same error occurs like before: Run-time error '5922' Word was unable to open the data source. When setting the Name parameter to blank: ..OpenDataSource Name:=" ",_ I also get an error: Run-time error '4198' Command Failed. Anybody any ideas, please help. Otherwise i have to make a whole new mail merge in another way, and thta costs a lot of time. TIA Pedro Janssen In antwoord op: > From: MartyConnelly > To: Access Developers discussion and problem solving > Date: Tue, 20 Jan 2004 21:13:29 -0800 > Subject: Re: [AccessD] error after converting (mailmerge) > > > Using everything with A2K format saves doing a Unicode to Ansi > conversion from 97. > > A couple of other things to try > If it's Word 2000 or 97, try just setting the Name parameter to blank, i.e. > > ..OpenDataSource Name:="", _ > > etc. Word does not like it if you specify a name and a connection string > for ODBC calls. > If it's Word 2002 you will also need to add > Subtype:=wdMergeSubTypeWord2000 > > Also have a look at these examples > Super Easy Word Merge. > http://www.attcanada.net/~kallal.msn/msaccess/msaccess.html > or this Cindy Meister's MVP site > http://homepage.swissonline.ch/cindymeister/MergFram.htm > > > Pedro Janssen wrote: > > >Thanks Marty for your response. I will try this when i am at work. > > > >I didn't convert the mdw file to A2k, but i could open the converted > >database with this mdw. > >How is this possible? > > > >Pedro Janssen > > > > > > > >----- Original Message ----- > >From: "MartyConnelly" > >To: "Access Developers discussion and problem solving" > > > >Sent: Thursday, January 15, 2004 12:13 AM > >Subject: Re: [AccessD] error after converting (mailmerge) > > > > > > > > > >>How about trying > >>strConnect = "Provider=Microsoft.Jet.OLEDB.4.0;" & _ > >> "Data Source=c:\somepath\mydb.mdb;" & _ > >> "Jet OLEDB:System Database=MySystem.mdw", _ > >> "myUsername", "myPassword" > >>Note, remember to convert both the MDB and the MDW to the 4.0 > >>database format when using the 4.0 OLE DB Provider. Make a new copy of > >>97 mdw to handle 2000. > >> > >> > >>pedro at plex.nl wrote: > >> > >> > >> > >>>Hello Group, > >>> > >>>i converted a A97 secured database to A2K. > >>>After making the changes in Wrkgadmin.exe and the ODBC Data Sources, i > >>> > >>> > >changed the names in the module. After running the mailmerge i get an error: > >Run-time error '5922' Word was unable to open the data source. The debug > >selects the .OpenDataSource from the code below. > > > > > >>>I figure out why this error occurs. > >>> > >>>TIA > >>> > >>>Pedro Janssen > >>> > >>> > >>> > >>> > >>>Sub CreateMergeDoc(UseDDE As Boolean, PrintDoc As Boolean) > >>> > >>> Dim WordDoc As Word.Document > >>> Dim strLetter As String > >>> Dim strConnect As String > >>> Dim WordApp As Word.Application > >>> > >>> Set WordApp = CreateObject("Word.Application") > >>> > >>> Set WordDoc = WordApp.Documents.Add > >>> With WordDoc.MailMerge > >>> If UseDDE Then > >>> strConnect = "QUERY Uitvoer" > >>> Else > >>> strConnect = "DSN=MS Access 2000 " _ > >>> & "Database;DBQ=E:\Cytologie\positieven\" _ > >>> & "BeveiligdPOSITIEVEN(A2K).mdb;" _ > >>> & "FIL=MS Access;" > >>> End If > >>> .OpenDataSource _ > >>> Name:="E:\Cytologie\positieven\BeveiligdPOSITIEVEN(A2K).mdb", _ > >>> ReadOnly:=True, LinkToSource:=True, _ > >>> Connection:=strConnect, _ > >>> SQLStatement:="SELECT * FROM [Uitvoer], [Aanvrager] WHERE > >>> > >>> > >Uitvoer.AanvragerID = Aanvrager.AanvragerID AND Uitvoer.ControleID = " & > >Forms![Brief]![veld] & ";" > > > > > >>> With Fields > >>> ............... > >>> End With > >>> > >>> With WordApp.Selection > >>> ............... > >>> End With > >>> > >>> > >>> With WordDoc.MailMerge > >>> .DataSource.FirstRecord = 1 > >>> > >>> .Destination = wdSendToNewDocument > >>> > >>> .Execute > >>> > >>> If PrintDoc Then > >>> .Application.Options.PrintBackground = False > >>> .Application.ActiveDocument.PrintOut > >>> End If > >>> End With > >>> > >>> WordApp.Visible = True > >>> End With > >>>End Sub > >>> > >>> > >>> > >>> > >>> > >>> > >>-- > >>Marty Connelly > >>Victoria, B.C. > >>Canada > >> > >> > >> > >>_______________________________________________ > >>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 > > > > > > > > -- > Marty Connelly > Victoria, B.C. > Canada > > > > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com From andy at minstersystems.co.uk Wed Jan 21 09:08:19 2004 From: andy at minstersystems.co.uk (Andy Lacey) Date: Wed, 21 Jan 2004 15:08:19 -0000 Subject: [AccessD] Major Performance Issue! In-Reply-To: <20040121084024.27016.qmail@web60210.mail.yahoo.com> Message-ID: <02fd01c3e030$67dfd440$b274d0d5@minster33c3r25> Sander Rather than attaching the code try pasting it into the email. Shouldn't be a size issue then, unless, of course, there's miles of it! I don't know about anyone else but I certainly would get a clearer picture of what you're doing by seeing the code. Can't really get a handle on it yet. Andy Lacey http://www.minstersystems.co.uk > -----Original Message----- > From: accessd-bounces at databaseadvisors.com > [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Sad Der > Sent: 21 January 2004 08:40 > To: Acces User Group > Subject: [AccessD] Major Performance Issue! > > > Hi group, > > I've got a MAJOR performance issue. I need to display > a lot of data. A performance test showed that it takes > between 120 - 160 seconds (2 minutes - 2.40 minutes) > to display the data! I have no idea how to speed > things up dramaticly. I really could use some tips. > > Here's a description of the current environment: > Access 2000 Client (size: 20 Mb) > Access 2000 Back-end (size: 100 Mb) > approx 4 users > Novel network > > Functionality: > I need to display 4 listbox' with data. > > Every listbox has the same table as source. > Every listbox has a query as RowSource > Every listbox has this layout: > > Proces Type | Date | # Records > > Listbox 1 displays 4 records > Listbox 2 displays 2 records > Listbox 3 displays 6 records > Listbox 4 displays 3 records > > So the table (tblMultiInterface) has 15 records in > total. > > Table tblMultiInterface > Fields: > Proces Type Text > Date Text (!) > Records Text (!) (zero records need to display > N/A) > > I added the code as an attachment but unfortunatly > this mail was blocked! If anybody would like to take a > look at the code I can send it to you directly. > > Comments/tips/etc would be GREATLY appriciated! > > TIA > Sad > > > __________________________________ > Do you Yahoo!? > Yahoo! Hotjobs: Enter the "Signing Bonus" Sweepstakes > http://hotjobs.sweepstakes.yahoo.com/signingbo> nus > > _______________________________________________ > AccessD > mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/a> ccessd > Website: > http://www.databaseadvisors.com > > From lists at theopg.com Wed Jan 21 09:38:40 2004 From: lists at theopg.com (MarkH) Date: Wed, 21 Jan 2004 15:38:40 -0000 Subject: [AccessD] Instantiate Forms as Objects In-Reply-To: Message-ID: <001101c3e034$a4faffe0$330d6bd5@netboxxp> I have some code which works ok. It's a bit tricky as there are limits on how many connections etc. you can have which restricts the number of screens you can open. Also you have to be careful how you refer to the form as its name is no longer reliable when multiple instances are open. I used the hwnd value. If you want I can send some code but it will take a while as my main box is completely dead - maybe a psu failure, maybe mobo... Will be fixing that first I hope... Mark -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Charlotte Foust Sent: 20 January 2004 21:02 To: Access Developers discussion and problem solving Subject: RE: [AccessD] Instantiate Forms as Objects I don't generally do it at all, so I would have to dig back into my archives to see how I did it last time. I seem to recall using a collection and a custom class, but I haven't done it in several years, so my memory is dusty. Charlotte Foust -----Original Message----- From: Ken Ismert [mailto:KIsmert at TexasSystems.com] Sent: Tuesday, January 20, 2004 11:49 AM To: 'Access Developers discussion and problem solving' Subject: RE: [AccessD] Instantiate Forms as Objects So, how do you get muliple instances of the same form open without using the "Set rFrm = New Form_YourForm" syntax? -Ken -----Original Message----- From: Charlotte Foust [mailto:cfoust at infostatsystems.com] Sent: Tuesday, January 20, 2004 10:42 AM To: Access Developers discussion and problem solving Subject: RE: [AccessD] Instantiate Forms as Objects Maybe JC knows differently, but as far as I know, you can't do it that way, which is one of the reasons I don't use that syntax. Charlotte Foust _______________________________________________ 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 From weeden1949 at hotmail.com Wed Jan 21 09:45:10 2004 From: weeden1949 at hotmail.com (Greg Smith) Date: Wed, 21 Jan 2004 09:45:10 -0600 Subject: [AccessD] Strange Table Behavior... References: <003201c3df8c$6493d010$210110ac@SUSANONE> Message-ID: Thanks Susan and John C for your feedback. I tried Susan's suggestion to update the table using *SD* as the criteria and replace it with SD, but, alas, no luck there. I even deleted all the SD's from the table, then reloaded them (using a query of course...), but no luck there either. Well, I guess I had "luck", just bad luck... So this time I repeated what I did last week to get rid of it: using a make-table query, I created a whole new table from this one. Set the tables up the same (key fields, etc...), broke the relationships to the old one, deleted it, renamed the 'new' one to the original, rebuilt the relationships, and ... voila...it didn't work either. FINE. So, being a CobbleMeister, I put code in the FE to check for the SD search and automatically make it SD*. It works, but I don't like it. I personally hate making the code try to match data quirks. However, I now do NOT have the county Recorder buggin' me about it. There still has to be an explanation as to why this occurs occasionally, but I can't spend a bunch of time trying to figure it out...particularly if I have a work-around that makes the client happy. The client may be happy but the programmer is bug-eyed trying to figure it out. And on top of everything, I found out yesterday they (the County people) are serious about converting this app, from Access 97, to Access 2003 with SQL. This 'fun' may never end... Greg ----- Original Message ----- From: "Susan Harkins" To: "Access Developers discussion and problem solving" Sent: Tuesday, January 20, 2004 1:34 PM Subject: Re: [AccessD] Strange Table Behavior... This is really over simplistic, but have you tried just deleting SD in the lookup table and re-entering it? You might also run an update on your many table -- *SD* = "SD" I've seen phantom characters work their way in before. The only way to get rid of them is to just delete them and re-enter the data. You're lucky, since you know the field it's in and even if it's in the many data, an update query should take care of it. If it's a phantom character, you won't find it. On the other hand, do any of your operators/users have access to action queries? Almost sounds like someone accidentially changed the SD string in your many table. Have you tried entering a dummy SD record to see if the old method can find it? Just curious. How are you entering that "SD" string? Might check there too. Susan H. From lists at theopg.com Wed Jan 21 10:17:42 2004 From: lists at theopg.com (MarkH) Date: Wed, 21 Jan 2004 16:17:42 -0000 Subject: [AccessD] Instantiate Forms as Objects In-Reply-To: Message-ID: <001201c3e03a$1ed81af0$330d6bd5@netboxxp> Here you go, it's a bit rough as its from a project that's been shelved for a while so it never really got finished... Have fun Mark Option Compare Database Option Explicit ' ' DESCRIPTION: ' Opens a form as a form variable allowing more than one instance of a form ' to be opened ata time. ' ' COMMENTS: ' When working with multiple instances of forms, avoid using criteria in sub ' forms which references prooperties in the parent form (such as using a ref- ' erence to the parent forms key in the subforms datasource). ' ' The form variables name is always that of the form itself so when referring ' to the form in code avoid using the form name (e.g. me.name) ' '----------------------------------------------------------------------- ------- Global frmInst(1 To 12) As Form 'there is a bug with Jet so sometimes only about 18 new instances can be opened. 'This bug relates to max number of open databases / tables and has been apparently 'sorted out in later releases of Jet. See error handler.... ' '---------------------------------------------------------- Function closeInstAll() 'closes all open notes, topics and categories Dim i As Integer For i = 1 To UBound(frmInst) Set frmInst(i) = Nothing Next End Function Function minimizeInstAll() 'minimizes all open notes, topics and categories On Error Resume Next Echo False Dim i As Integer For i = 1 To UBound(frmInst) frmInst(i).SetFocus DoCmd.Minimize Next Forms("frm_treeMenu").SetFocus DoCmd.Restore Echo True End Function Function controlInst(c As String) On Error Resume Next Dim i As Integer Dim X As Integer Dim hw As Long Dim hwX As Variant Dim frm As Form For i = 0 To Forms("frm_TreeMenu").formsList.ListCount If Forms("frm_TreeMenu").formsList.Selected(i) = True Then hw = Forms("frm_TreeMenu").formsList.ItemData(i) For X = 1 To UBound(frmInst) hwX = frmInst(X).hwnd If hwX = hw Then frmInst(X).SetFocus 'fires a form activate event Select Case c Case "R" 'Restore DoCmd.Restore Case "M" 'Minimize DoCmd.Minimize Case "C" 'Close Set frmInst(X) = Nothing End Select End If Next End If Next End Function Function minimizeInst() 'minimizes the first selected instance of a form in the open forms list 'On Error Resume Next controlInst "M" End Function Function restoreInst() 'restores the first selected instance of a form in the open forms list 'On Error Resume Next controlInst "R" End Function Function closeInst() 'Closes selected items on the open forms list 'On Error Resume Next controlInst "C" End Function Function getNextFormVar() As Integer 'returns a reference to the next free form variable On Error GoTo errbit Dim i As Integer Dim X As Long For i = 1 To UBound(frmInst) X = frmInst(i).hwnd tryAgain: Next wayout: getNextFormVar = 0 Exit Function errbit: If Err.Number = 91 Or Err.Number = 2467 Then getNextFormVar = i Else Resume tryAgain End If End Function '======================================================================= ====================== 'Opens new instance of form f using one of the "frm*" globals. ' f = form name ' wc = where clause ' p = parent nodes index Sub openInstance(F As String, wc As String, ni As Integer, addMode As Boolean, Optional parentKey As Integer = 0) On Error GoTo errbit Dim nextFormVar As Integer Dim frm As Form Dim strCap As String Dim ctrl As Control If Not IsLoaded("frm_TreeMenu") Then DoCmd.OpenForm ("frm_TreeMenu") End If If addMode Then strCap = StrConv(Mid(F, 5), vbProperCase) & ": (New Record)" Else strCap = StrConv(Mid(F, 5), vbProperCase) & ": " End If 'check if the record is already open... if so then simply set focus to that record. For Each frm In Forms If frm.name = F Then If frm.Filter = wc Then frm.SetFocus Exit Sub End If End If Next nextFormVar = getNextFormVar noMoreForms: If nextFormVar = 0 Then MsgBox "The system has run out of free form variables. Please close" & Chr(13) & "any unused forms and try again.", vbCritical, "Error" Exit Sub End If Select Case F Case "frm_Category" 'form open event fired next subform then main then main activate then main current Set frmInst(nextFormVar) = New Form_frm_Category Case "frm_Topic" Set frmInst(nextFormVar) = New Form_frm_Topic Case "frm_Note" Set frmInst(nextFormVar) = New Form_frm_note End Select With frmInst(nextFormVar) If addMode Then .AllowAdditions = True .DataEntry = True .Caption = strCap .newRcd = True If parentKey > 0 Then .parentKey = parentKey End If Else .Filter = wc 'next line fires a form current in the subform then main activate and main current .FilterOn = True End If .nodeIndex = ni 'next line triggers activate .SetFocus .formStart For Each ctrl In .Controls If ctrl.Tag = "X" Then ctrl.Visible = True End If Next End With frmInst(nextFormVar).SetFocus DoCmd.Restore listForms wayout: strCap = "" nextFormVar = 0 Exit Sub errbit: DoCmd.Echo True If Err.Number = 2956 Or Err.Number = 3048 Or Err.Number = 2950 Then nextFormVar = 0 Resume noMoreForms Else MsgBox Err.Description Resume wayout End If errLog "multiInstance", Err.Number, Err.Description End Sub From lists at theopg.com Wed Jan 21 10:28:49 2004 From: lists at theopg.com (MarkH) Date: Wed, 21 Jan 2004 16:28:49 -0000 Subject: [AccessD] Instantiate Forms as Objects In-Reply-To: <46B976F2B698FF46A4FE7636509B22DF03D135@stekelbes.ithelps.local> Message-ID: <001301c3e03b$ae87e620$330d6bd5@netboxxp> Oooops... Should have read your post properly. Didn't realise you wanted to pass a form name as a string, sorry.... Good luck mark -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Erwin Craps - IT Helps Sent: 20 January 2004 20:30 To: Access Developers discussion and problem solving Subject: RE: [AccessD] Instantiate Forms as Objects Not at my knowledge neither. But there is a big advantage why that is so. When renaming forms or deleting or absence of (in case of importing routines that are dependant of a form) you would get an compile error straight away. When using syntax like "form_" & strFormName you would only get an error when you run the routine. I find this a very good thing.... Erwin -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Charlotte Foust Sent: Tuesday, January 20, 2004 5:42 PM To: Access Developers discussion and problem solving Subject: RE: [AccessD] Instantiate Forms as Objects Maybe JC knows differently, but as far as I know, you can't do it that way, which is one of the reasons I don't use that syntax. Charlotte Foust -----Original Message----- From: Ken Ismert [mailto:KIsmert at TexasSystems.com] Sent: Tuesday, January 20, 2004 8:33 AM To: 'Access Developers discussion and problem solving' Subject: [AccessD] Instantiate Forms as Objects Hello Group: As you know, you can instantiate an Access form, just like any other object, by using its class name: Dim rFrm as Access.Form Set rFrm = New Form_YourForm ' form 'YourForm' This syntax allows you to create multiple open instances of a form, a necessity for my framework. However, I've run into a problem. What I need is a simple, one-line way to instantiate a form object using a string: sFormName = "YourForm" Set rFrm = MFOS("Form_" & sFormName) ' MFOS = "Magic Function or Syntax" Note: Because of the multiple instance requirement, DoCmd.OpenForm won't work. It can only make one instance of a form. I can't find a CreateObject syntax that works. In my current function, I use a big Case statement matching the form name to it's class. This has become a pain, because every time I add or remove forms, I have to edit the function. Have any of you found a way to do that? -Ken _______________________________________________ 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 _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From Erwin.Craps at ithelps.be Wed Jan 21 10:34:14 2004 From: Erwin.Craps at ithelps.be (Erwin Craps - IT Helps) Date: Wed, 21 Jan 2004 17:34:14 +0100 Subject: [AccessD] OT: empty object frames in word. Message-ID: <46B976F2B698FF46A4FE7636509B22DF03D142@stekelbes.ithelps.local> Hi A while ago someone reported this issue in word that all object frames are empty (but when printed are ok). They can not be resize or whatever and when clicking on it the computer beeps. This is probably a bug, because I did'nt had this problem before in Office 2003 until I did one or another office/windows update. Did anyone succeeded to solve this? Erwin Craps Zaakvoerder www.ithelps.be/jonathan This E-mail is confidential, may be legally privileged, and is for the intended recipient only. Access, disclosure, copying, distribution, or reliance on any of it by anyone else is prohibited and may be a criminal offence. Please delete if obtained in error and E-mail confirmation to the sender. IT Helps - I.T. Help Center *** Box Office Belgium & Luxembourg www.ithelps.be * www.boxoffice.be * www.stadleuven.be IT Helps bvba* ** Mercatorpad 3 ** 3000 Leuven IT Helps * Phone: +32 16 296 404 * Fax: +32 16 296 405 E-mail: Info at ithelps.be Box Office ** Fax: +32 16 296 406 ** Box Office E-mail: Staff at boxoffice.be From cfoust at infostatsystems.com Wed Jan 21 10:34:25 2004 From: cfoust at infostatsystems.com (Charlotte Foust) Date: Wed, 21 Jan 2004 08:34:25 -0800 Subject: [AccessD] Instantiate Forms as Objects Message-ID: Ken, One of the problems with the "Set rFrm = New Form_Whatever" syntax is that Form_Whatever isn't really the form object, it's the class module. You can instantiate a module object in code using Set mdl = Modules("Form_Whatever"), but that doesn't get you where you want to go, and the module has to be open for that to work, just as a form has to be open to use the Set frm = Forms("Whatever"). There is obviously some stuff going on under the hood that MS hasn't made apparent, some automagic manipulations in the Set frm = New Form_Whatever expression. I'm still trying to find an old example of the approach I used. Charlotte -----Original Message----- From: Ken Ismert [mailto:KIsmert at TexasSystems.com] Sent: Tuesday, January 20, 2004 11:49 AM To: 'Access Developers discussion and problem solving' Subject: RE: [AccessD] Instantiate Forms as Objects So, how do you get muliple instances of the same form open without using the "Set rFrm = New Form_YourForm" syntax? -Ken -----Original Message----- From: Charlotte Foust [mailto:cfoust at infostatsystems.com] Sent: Tuesday, January 20, 2004 10:42 AM To: Access Developers discussion and problem solving Subject: RE: [AccessD] Instantiate Forms as Objects Maybe JC knows differently, but as far as I know, you can't do it that way, which is one of the reasons I don't use that syntax. Charlotte Foust _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From Oleg_123 at xuppa.com Wed Jan 21 10:34:30 2004 From: Oleg_123 at xuppa.com (Oleg_123 at xuppa.com) Date: Wed, 21 Jan 2004 11:34:30 -0500 (EST) Subject: [AccessD] Break Name In-Reply-To: <001301c3e03b$ae87e620$330d6bd5@netboxxp> References: <46B976F2B698FF46A4FE7636509B22DF03D135@stekelbes.ithelps.local> <001301c3e03b$ae87e620$330d6bd5@netboxxp> Message-ID: <22322.12.3.132.98.1074702870.squirrel@heck.bay9.com> Hey Group I did a finction that separates names into first and last,and makes propercase - ex. Name: "MCDONALD, REYNA" becomes FirstName: "Reyna" LastName "McDonald" How can Insert the 2 new fields into the same table ? I tried Update... Public Function BreakName() 'Separate The Name field to Firs and LastName and ProperCase it 'Uses MDL-Proper Module MsgBox ("hey") Dim db As DAO.Database Dim rs As DAO.Recordset Set db = CurrentDb Dim strLine As String Dim strSQL1 As String Dim strSQL2 As String Dim FName As String Dim LName As String Dim a As Integer strSQL1 = "Select * From [emp table1]" Set rs = db.OpenRecordset(strSQL1) Do Until rs.EOF strLine = rs("Employee Name") ' strLine = Proper(strLine) a = InStr(strLine, ",") FName = Mid(strLine, a + 2) LName = Left(strLine, a - 1) 'rs(0) = strLine strSQL2 = "Update [Emp Table1] Set (LastName, FirstName) = Values(" & "'" & FindAndReplace(CStr(LName), Chr(39), Chr(39) + Chr(39)) & "','" & FindAndReplace(CStr(FName), Chr(39), Chr(39) + Chr(39)) & "')" Debug.Print strSQL2 CurrentDb.Execute (strSQL2) rs.MoveNext Loop MsgBox ("end") End Function ----------------------------------------- Get Breaking News from CNN, ABC, NBC, CBS Now. http://www.xuppa.com/news/?link=webmail From cfoust at infostatsystems.com Wed Jan 21 10:36:34 2004 From: cfoust at infostatsystems.com (Charlotte Foust) Date: Wed, 21 Jan 2004 08:36:34 -0800 Subject: [AccessD] MDB to sql server Message-ID: That has been my experience as well. And do the upsize from the data file, not the FE. Charlotte Foust -----Original Message----- From: Haslett, Andrew [mailto:andrew.haslett at ilc.gov.au] Sent: Tuesday, January 20, 2004 6:41 PM To: 'Access Developers discussion and problem solving' Subject: RE: [AccessD] MDB to sql server I've found its better in this case to use the upsizing wizard from within Access 2k, as it seems to handle the native data types of Access better than importing from DTS. Make sure you have the Access patch installed first (can't remember what its called but its available at Office Update - something like a 'readiness update' or the like). Still check your primary key and identity fields in SQL afterwards as I can't recall if there were any other issues.. There may well have been a couple of options you needed to change during the export process to retain all constraints. Cheers, Andrew -----Original Message----- From: John W. Colby [mailto:jwcolby at colbyconsulting.com] Sent: Wednesday, 21 January 2004 12:14 PM To: AccessD Subject: [AccessD] MDB to sql server My client DIS has finally ordered a new server for their database, a shiny new Dell dual P4 2.4g with 1gb ram etc., Windows 2K Server OS and SQL Server 2K. Given that the MDB was running on an old PIII 400 mhz NT running all the email and everything else the company owned, just the new server hardware should provide a decent boost in performance. However they also want to move to SQL Server. I have a server machine here at the office running Win2K Pro and SQL Server 2K. My intention is to do the data port from MDB to SQL Server at my office in advance, figuring out how to do it and discovering all the pitfalls before hand. The database consists of approximately 90 tables, of which ~30 are lookup tables, ~30 are main tables / child tables, and a handful of many-many. This MDB is heavily normalized with relationships established, no cascade delete. I use Autonumber PKs exclusively. I tried to do the import from inside SQL Server using DTS(?) but ended up with 17 tables not imported, and the structure but not the data for several main tables. What is the best method to use for getting the database moved into SQL Server, preferable maintaining the incrementing autonumber methodology as well as the relationships, with referential integrity enforced, no cascade deletes? I went through this exercise a couple of years ago with a similar size database, and managed, in the end to get it imported and functioning. John W. Colby www.ColbyConsulting.com _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com IMPORTANT - PLEASE READ ******************** This email and any files transmitted with it are confidential and may contain information protected by law from disclosure. If you have received this message in error, please notify the sender immediately and delete this email from your system. No warranty is given that this email or files, if attached to this email, are free from computer viruses or other defects. They are provided on the basis the user assumes all responsibility for loss, damage or consequence resulting directly or indirectly from their use, whether caused by the negligence of the sender or not. _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From gustav at cactus.dk Wed Jan 21 11:22:08 2004 From: gustav at cactus.dk (Gustav Brock) Date: Wed, 21 Jan 2004 18:22:08 +0100 Subject: [AccessD] vbNull = 1 Message-ID: <16337315767.20040121182208@cactus.dk> Hi all Why does the VB constant vbNull equal 1 and not 0 (zero)? /gustav From Mark.Mitsules at ngc.com Wed Jan 21 11:44:30 2004 From: Mark.Mitsules at ngc.com (Mitsules, Mark S. (Newport News)) Date: Wed, 21 Jan 2004 12:44:30 -0500 Subject: [AccessD] vbNull = 1 Message-ID: Gustav, There is a very short discussion of "When is Nothing something?" here: http://www.vbdesign.net/expresso/archive/topic/3244.html Mark =================== When is Nothing something? One of the most important elements of VBA, as a language, is its ability to detect nothing! There are many different nothings, and some of them are something, and as a rule they are not interchangeable. Lets take a look at assigning and checking nothing... ************* vbEmpty: Determines if a variable has been initialized - If varVariable = vbEmpty Then You should not use vbEmpty to make your variable nothing, because it makes it something! The value you are assigning is 0 (or if it is a string variable, "0") and the IsEmpty test will fail! ************ vbNull This one is great for testing for Null in a variable (database users take note) using VarType: If VarType (varVariable) = vbNull Then again, don't use this constant to try to assign a Null value, because its not nothing.. True value of vbNull is 1 (in a string variable "1") ************ vbNullChar Test for, or assign, a NullChar What is a Null char? The same thing as Chr(0). This one is great for working with the API when you need to pass a string that ends with a Null character, just add the constant onto the end of the string you are going to pass.. strVariable = strVariable & vbNullChar ************ vbNullString Test for, or assign, a null string I use this one all of the time for the API. It is the same thing as this: strVariable = "" You can see it in much of the code when I am looking for the Hwnd of a window using FindWindow lngHwnd = FindWindow(vbNullstring, Me.Caption) *********** Nothing For objects only - determines if the variable has a valid object reference or used to destroy the current object reference If objVariable Is Not Nothing Then objVariable = Nothing End If ********** Null Saved this one for last because it can confuse your code. Null assigns a Null value to your variant type variable, and you can use it to test for a Null value using IsNull, but because Null = false, a test like this varVariable = Null If varVariable = Null Then MsgBox "Its Null" End If will never show the message! Instead use this: If IsNull(varVariable) Then MsgBox "Its Null" End If and as a final not about nothing, don't try to use the Null keyword on strongly typed variables, if you do you will get the error "Invalid use of Null" -----Original Message----- From: Gustav Brock [mailto:gustav at cactus.dk] Sent: Wednesday, January 21, 2004 12:22 PM To: Access Developers discussion and problem solving Subject: [AccessD] vbNull = 1 Hi all Why does the VB constant vbNull equal 1 and not 0 (zero)? /gustav _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From jwcolby at colbyconsulting.com Wed Jan 21 11:47:57 2004 From: jwcolby at colbyconsulting.com (John W. Colby) Date: Wed, 21 Jan 2004 12:47:57 -0500 Subject: [AccessD] Instantiate Forms as Objects In-Reply-To: Message-ID: Charlotte, That's true but the form still opens, all the events fire etc. So yes, you are getting a pointer to the form class but doing so opens the form and returns a handle to the form. John W. Colby www.ColbyConsulting.com -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Charlotte Foust Sent: Wednesday, January 21, 2004 11:34 AM To: Access Developers discussion and problem solving Subject: RE: [AccessD] Instantiate Forms as Objects Ken, One of the problems with the "Set rFrm = New Form_Whatever" syntax is that Form_Whatever isn't really the form object, it's the class module. You can instantiate a module object in code using Set mdl = Modules("Form_Whatever"), but that doesn't get you where you want to go, and the module has to be open for that to work, just as a form has to be open to use the Set frm = Forms("Whatever"). There is obviously some stuff going on under the hood that MS hasn't made apparent, some automagic manipulations in the Set frm = New Form_Whatever expression. I'm still trying to find an old example of the approach I used. Charlotte -----Original Message----- From: Ken Ismert [mailto:KIsmert at TexasSystems.com] Sent: Tuesday, January 20, 2004 11:49 AM To: 'Access Developers discussion and problem solving' Subject: RE: [AccessD] Instantiate Forms as Objects So, how do you get muliple instances of the same form open without using the "Set rFrm = New Form_YourForm" syntax? -Ken -----Original Message----- From: Charlotte Foust [mailto:cfoust at infostatsystems.com] Sent: Tuesday, January 20, 2004 10:42 AM To: Access Developers discussion and problem solving Subject: RE: [AccessD] Instantiate Forms as Objects Maybe JC knows differently, but as far as I know, you can't do it that way, which is one of the reasons I don't use that syntax. Charlotte Foust _______________________________________________ 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 From cfoust at infostatsystems.com Wed Jan 21 11:50:35 2004 From: cfoust at infostatsystems.com (Charlotte Foust) Date: Wed, 21 Jan 2004 09:50:35 -0800 Subject: [AccessD] vbNull = 1 Message-ID: Because vbEmpty is equal to zero. Charlotte Foust -----Original Message----- From: Gustav Brock [mailto:gustav at cactus.dk] Sent: Wednesday, January 21, 2004 9:22 AM To: Access Developers discussion and problem solving Subject: [AccessD] vbNull = 1 Hi all Why does the VB constant vbNull equal 1 and not 0 (zero)? /gustav _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From andy at minstersystems.co.uk Wed Jan 21 11:53:46 2004 From: andy at minstersystems.co.uk (Andy Lacey) Date: Wed, 21 Jan 2004 17:53:46 -0000 Subject: [AccessD] Break Name In-Reply-To: <22322.12.3.132.98.1074702870.squirrel@heck.bay9.com> Message-ID: <031f01c3e047$847732d0$b274d0d5@minster33c3r25> Oleg, just do it your DAO loop, so With rs Do Until .EOF strLine = ![Employee Name] strLine = Proper(strLine) a = InStr(strLine, ",") FName = Mid(strLine, a + 2) LName = Left(strLine, a - 1) .Edit !Lastname=Lname !FirstName=Fname .Update .MoveNext Loop End With Andy Lacey http://www.minstersystems.co.uk > -----Original Message----- > From: accessd-bounces at databaseadvisors.com > [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of > Oleg_123 at xuppa.com > Sent: 21 January 2004 16:35 > To: accessd at databaseadvisors.com > Subject: [AccessD] Break Name > > > Hey Group > I did a finction that separates names into first and last,and > makes propercase - ex. Name: "MCDONALD, REYNA" becomes > FirstName: "Reyna" LastName "McDonald" How can Insert the 2 > new fields into the same table ? I tried Update... > > > > Public Function BreakName() > > > 'Separate The Name field to Firs and LastName and ProperCase > it 'Uses MDL-Proper Module > > > MsgBox ("hey") > Dim db As DAO.Database > Dim rs As DAO.Recordset > Set db = CurrentDb > > Dim strLine As String > Dim strSQL1 As String > Dim strSQL2 As String > Dim FName As String > Dim LName As String > Dim a As Integer > > > strSQL1 = "Select * From [emp table1]" > Set rs = db.OpenRecordset(strSQL1) > > > Do Until rs.EOF > strLine = rs("Employee Name") > ' > strLine = Proper(strLine) > a = InStr(strLine, ",") > FName = Mid(strLine, a + 2) > LName = Left(strLine, a - 1) > > 'rs(0) = strLine > > > strSQL2 = "Update [Emp Table1] Set (LastName, FirstName) = > Values(" & "'" & FindAndReplace(CStr(LName), Chr(39), Chr(39) > + Chr(39)) & "','" & FindAndReplace(CStr(FName), Chr(39), > Chr(39) + Chr(39)) & "')" Debug.Print strSQL2 > > CurrentDb.Execute (strSQL2) > rs.MoveNext > Loop > > MsgBox ("end") > > End Function > > > > ----------------------------------------- > Get Breaking News from CNN, ABC, NBC, CBS Now. > http://www.xuppa.com/news/?link=webmail > > > > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/a> ccessd > Website: > http://www.databaseadvisors.com > > From Oleg_123 at xuppa.com Wed Jan 21 11:56:48 2004 From: Oleg_123 at xuppa.com (Oleg_123 at xuppa.com) Date: Wed, 21 Jan 2004 12:56:48 -0500 (EST) Subject: [AccessD] vbNull = 1 In-Reply-To: References: Message-ID: <22539.12.3.132.98.1074707808.squirrel@heck.bay9.com> whats the difference between Empty and Null ? > Because vbEmpty is equal to zero. > > Charlotte Foust > > -----Original Message----- > From: Gustav Brock [mailto:gustav at cactus.dk] > Sent: Wednesday, January 21, 2004 9:22 AM > To: Access Developers discussion and problem solving > Subject: [AccessD] vbNull = 1 > > > Hi all > > Why does the VB constant vbNull equal 1 and not 0 (zero)? > > /gustav > > _______________________________________________ > 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 ----------------------------------------- Get Breaking News from CNN, ABC, NBC, CBS Now. http://www.xuppa.com/news/?link=webmail From gustav at cactus.dk Wed Jan 21 12:00:42 2004 From: gustav at cactus.dk (Gustav Brock) Date: Wed, 21 Jan 2004 19:00:42 +0100 Subject: [AccessD] vbNull = 1 In-Reply-To: References: Message-ID: <15839630195.20040121190042@cactus.dk> Hi Mark and Charlotte Thanks! I had forgotten vbNull is related to VarType() ... that explains. Then I guess this guy is slightly off track abusing our constants but he managed to confuse me: http://www.imt.net/~joe/matt/program/vb/HOWTOs/ShellExecuteAPI/ /gustav > Gustav, > There is a very short discussion of "When is Nothing something?" here: > http://www.vbdesign.net/expresso/archive/topic/3244.html > Mark > vbNull > This one is great for testing for Null in a variable (database users take > note) using VarType: > If VarType (varVariable) = vbNull Then > again, don't use this constant to try to assign a Null value, because its > not nothing.. > True value of vbNull is 1 (in a string variable "1") > ************ > Why does the VB constant vbNull equal 1 and not 0 (zero)? From Oleg_123 at xuppa.com Wed Jan 21 12:08:33 2004 From: Oleg_123 at xuppa.com (Oleg_123 at xuppa.com) Date: Wed, 21 Jan 2004 13:08:33 -0500 (EST) Subject: [AccessD] Break Name In-Reply-To: <031f01c3e047$847732d0$b274d0d5@minster33c3r25> References: <22322.12.3.132.98.1074702870.squirrel@heck.bay9.com> <031f01c3e047$847732d0$b274d0d5@minster33c3r25> Message-ID: <22471.12.3.132.98.1074708513.squirrel@heck.bay9.com> Andy ! - you are a genius. (well I knew that for a while now) :)) thanks > Oleg, just do it your DAO loop, so > > With rs > Do Until .EOF > strLine = ![Employee Name] > strLine = Proper(strLine) > > a = InStr(strLine, ",") > FName = Mid(strLine, a + 2) > LName = Left(strLine, a - 1) > .Edit > !Lastname=Lname > !FirstName=Fname > .Update > .MoveNext > Loop > End With > > Andy Lacey > http://www.minstersystems.co.uk > >> -----Original Message----- >> From: accessd-bounces at databaseadvisors.com >> [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of >> Oleg_123 at xuppa.com >> Sent: 21 January 2004 16:35 >> To: accessd at databaseadvisors.com >> Subject: [AccessD] Break Name >> >> >> Hey Group >> I did a finction that separates names into first and last,and >> makes propercase - ex. Name: "MCDONALD, REYNA" becomes >> FirstName: "Reyna" LastName "McDonald" How can Insert the 2 >> new fields into the same table ? I tried Update... >> >> >> >> Public Function BreakName() >> >> >> 'Separate The Name field to Firs and LastName and ProperCase >> it 'Uses MDL-Proper Module >> >> >> MsgBox ("hey") >> Dim db As DAO.Database >> Dim rs As DAO.Recordset >> Set db = CurrentDb >> >> Dim strLine As String >> Dim strSQL1 As String >> Dim strSQL2 As String >> Dim FName As String >> Dim LName As String >> Dim a As Integer >> >> >> strSQL1 = "Select * From [emp table1]" >> Set rs = db.OpenRecordset(strSQL1) >> >> >> Do Until rs.EOF >> strLine = rs("Employee Name") >> ' >> strLine = Proper(strLine) >> a = InStr(strLine, ",") >> FName = Mid(strLine, a + 2) >> LName = Left(strLine, a - 1) >> >> 'rs(0) = strLine >> >> >> strSQL2 = "Update [Emp Table1] Set (LastName, FirstName) = >> Values(" & "'" & FindAndReplace(CStr(LName), Chr(39), Chr(39) >> + Chr(39)) & "','" & FindAndReplace(CStr(FName), Chr(39), >> Chr(39) + Chr(39)) & "')" Debug.Print strSQL2 >> >> CurrentDb.Execute (strSQL2) >> rs.MoveNext >> Loop >> >> MsgBox ("end") >> >> End Function >> >> >> >> ----------------------------------------- >> Get Breaking News from CNN, ABC, NBC, CBS Now. >> http://www.xuppa.com/news/?link=webmail >> >> >> >> _______________________________________________ >> AccessD mailing list >> AccessD at databaseadvisors.com >> http://databaseadvisors.com/mailman/listinfo/a> ccessd >> Website: >> http://www.databaseadvisors.com >> >> > > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com ----------------------------------------- Get Breaking News from CNN, ABC, NBC, CBS Now. http://www.xuppa.com/news/?link=webmail From cfoust at infostatsystems.com Wed Jan 21 12:41:28 2004 From: cfoust at infostatsystems.com (Charlotte Foust) Date: Wed, 21 Jan 2004 10:41:28 -0800 Subject: [AccessD] vbNull = 1 Message-ID: Null is the absence of a value. Empty is unitialized, never populated. Charlotte Foust -----Original Message----- From: Oleg_123 at xuppa.com [mailto:Oleg_123 at xuppa.com] Sent: Wednesday, January 21, 2004 9:57 AM To: accessd at databaseadvisors.com Subject: RE: [AccessD] vbNull = 1 whats the difference between Empty and Null ? > Because vbEmpty is equal to zero. > > Charlotte Foust > > -----Original Message----- > From: Gustav Brock [mailto:gustav at cactus.dk] > Sent: Wednesday, January 21, 2004 9:22 AM > To: Access Developers discussion and problem solving > Subject: [AccessD] vbNull = 1 > > > Hi all > > Why does the VB constant vbNull equal 1 and not 0 (zero)? > > /gustav > > _______________________________________________ > 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 ----------------------------------------- Get Breaking News from CNN, ABC, NBC, CBS Now. http://www.xuppa.com/news/?link=webmail _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From cfoust at infostatsystems.com Wed Jan 21 12:51:02 2004 From: cfoust at infostatsystems.com (Charlotte Foust) Date: Wed, 21 Jan 2004 10:51:02 -0800 Subject: [AccessD] vbNull = 1 Message-ID: I'd say he *was* abusing VB constants. I can't imagine why he would use vbNull in the hWnd argument, but I suppose it's because he's written a public sub and is passing the name of the program to be opened into the routine. I have no idea what passing an hWnd of 1 would do with the message boxes generated, but I have seen 1 passed explicitly in that argument before. Charlotte Foust -----Original Message----- From: Gustav Brock [mailto:gustav at cactus.dk] Sent: Wednesday, January 21, 2004 10:01 AM To: Access Developers discussion and problem solving Subject: Re: [AccessD] vbNull = 1 Hi Mark and Charlotte Thanks! I had forgotten vbNull is related to VarType() ... that explains. Then I guess this guy is slightly off track abusing our constants but he managed to confuse me: http://www.imt.net/~joe/matt/program/vb/HOWTOs/ShellExecuteAPI/ /gustav > Gustav, > There is a very short discussion of "When is Nothing something?" here: > http://www.vbdesign.net/expresso/archive/topic/3244.html > Mark > vbNull > This one is great for testing for Null in a variable (database users > take > note) using VarType: > If VarType (varVariable) = vbNull Then > again, don't use this constant to try to assign a Null value, because > its not nothing.. True value of vbNull is 1 (in a string variable "1") > ************ > Why does the VB constant vbNull equal 1 and not 0 (zero)? _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From gustav at cactus.dk Wed Jan 21 13:10:48 2004 From: gustav at cactus.dk (Gustav Brock) Date: Wed, 21 Jan 2004 20:10:48 +0100 Subject: [AccessD] vbNull = 1 In-Reply-To: References: Message-ID: <11143836303.20040121201048@cactus.dk> Hi Charlotte > I'd say he *was* abusing VB constants. I can't imagine why he would use > vbNull in the hWnd argument, but I suppose it's because he's written a > public sub and is passing the name of the program to be opened into the > routine. I have no idea what passing an hWnd of 1 would do with the > message boxes generated, but I have seen 1 passed explicitly in that > argument before. I don't know. If I pass the function a valid hWnd it makes no difference, neither is a value returned of the opened app's hWnd. So I have chosen to feed a zero - makes more sense to me. /gustav From rl_stewart at highstream.net Wed Jan 21 14:41:05 2004 From: rl_stewart at highstream.net (Robert L. Stewart) Date: Wed, 21 Jan 2004 14:41:05 -0600 Subject: [AccessD] Re: Break Name In-Reply-To: <200401211800.i0LI0Em03025@databaseadvisors.com> Message-ID: <5.1.0.14.2.20040121143618.0292c348@pop3.highstream.net> See changes below: At 12:00 PM 1/21/2004 -0600, you wrote: >Public Function BreakName() > > >'Separate The Name field to Firs and LastName and ProperCase it >'Uses MDL-Proper Module > > >MsgBox ("hey") >Dim db As DAO.Database >Dim rs As DAO.Recordset >Set db = CurrentDb > >Dim strLine As String >Dim strSQL1 As String >Dim strFName As String >Dim strLName As String >Dim a As Integer > > >strSQL1 = "Select * From [emp table1]" >Set rs = db.OpenRecordset(strSQL1) > > >Do Until rs.EOF > strLine = rs("Employee Name") > ' > strLine = Proper(strLine) > a = InStr(strLine, ",") > strFName = Mid(strLine, a + 2) > strLName = Left(strLine, a - 1) > > 'rs(0) = strLine rs.edit rs!Fname = strfname rs!Lname = strLname rs.update > rs.MoveNext >Loop > > MsgBox ("end") > >End Function Robert From stuart at lexacorp.com.pg Wed Jan 21 16:19:57 2004 From: stuart at lexacorp.com.pg (Stuart McLachlan) Date: Thu, 22 Jan 2004 08:19:57 +1000 Subject: [AccessD] vbNull = 1 In-Reply-To: <16337315767.20040121182208@cactus.dk> Message-ID: <400F87AD.11959.2DED33@localhost> On 21 Jan 2004 at 18:22, Gustav Brock wrote: > Hi all > > Why does the VB constant vbNull equal 1 and not 0 (zero)? > Same reason that vbArray = 8192 etc. That's just the assigned value of the constant. -- Lexacorp Ltd http://www.lexacorp.com.pg Information Technology Consultancy, Software Development,System Support. From stuart at lexacorp.com.pg Wed Jan 21 16:43:19 2004 From: stuart at lexacorp.com.pg (Stuart McLachlan) Date: Thu, 22 Jan 2004 08:43:19 +1000 Subject: [AccessD] vbNull = 1 In-Reply-To: Message-ID: <400F8D27.23149.435405@localhost> On 21 Jan 2004 at 10:51, Charlotte Foust wrote: > > Thanks! > I had forgotten vbNull is related to VarType() ... that explains. > > Then I guess this guy is slightly off track abusing our constants but he > managed to confuse me: > > http://www.imt.net/~joe/matt/program/vb/HOWTOs/ShellExecuteAPI/ > > /gustav > He's *completely* off track with this: ShellExecute(vbNull, "", strProgram, "", "", SW_SHOWNORMAL) hWnd should be the parent window for the called application. This window receives any message boxes that an application produces. It should either be the main window of the calling application or 0 (certainly not 1). I'd guess he tried to use Null originally and it didn't work so he tried vbNull and found that it did work. -- Lexacorp Ltd http://www.lexacorp.com.pg Information Technology Consultancy, Software Development,System Support. From Paul.Millard at freight.fedex.com Wed Jan 21 16:56:07 2004 From: Paul.Millard at freight.fedex.com (Millard, Paul --- Sr. Developer Analyst ---WGO) Date: Wed, 21 Jan 2004 14:56:07 -0800 Subject: [AccessD] Union Query Message-ID: <67B2D43A2067B248A36B007650A2312C145376@PSJOE2K1.fxfwest.freight.fedex.com> Hi I'm having trouble merging two queries together in a union query. The reason for developing query is I'm trying to force a group to show 5 items listed 1 through 5 and their record count and force a 0 when the group doesn't below in the data table (table2). Below is the query, query result an desired result along with two tables. The union I'm trying to perform right now does not merge together which I need. Any help would greatly be appreciated. Paul Millard San Jose, CA select t1.GrpId GrpId, 0 Bills from tblOpusGrp t1 where t1.Grp = 'WtBreak' union select t1.WtBreak GrpId, Count(*) Bills from tblOpus1 t1 where t1.CustNum = '84304389' group by t1.WtBreak query result. 1 0 1 5 2 0 2 3 3 0 3 1 4 0 5 0 5 1 desired query result. 1 5 2 3 3 1 4 0 5 1 table 1 Grp GrpId GrpDesc WtBreak 1 L5C WtBreak 2 M5C WtBreak 3 M1M WtBreak 4 M2M WtBreak 5 M5M table 2 WtBreak Count 1 5 2 3 3 1 5 1 table 2 detail Wt WtBreak 908.0 2 629.0 2 137.0 1 224.0 1 11800.0 5 1610.0 3 379.0 1 258.0 1 793.0 2 192.0 1 ********************************************************** This message contains information that is confidential and proprietary to FedEx Freight or its affiliates. It is intended only for the recipient named and for the express purpose(s) described therein. Any other use is prohibited. **************************************************************** From martyconnelly at shaw.ca Wed Jan 21 17:00:16 2004 From: martyconnelly at shaw.ca (MartyConnelly) Date: Wed, 21 Jan 2004 15:00:16 -0800 Subject: [AccessD] error after converting (mailmerge) References: <200401141408.i0EE8cNA020272@mailhostC.plex.net> Message-ID: <400F0480.5000602@shaw.ca> I can get this to work with Access97 to Word2003 (my default) by dropping some extraneous code,ie. not using connection string. The mdb I am opening is seperate from the one I am running Access in. It does however open 2 copies of word 1 default (document3.doc) and 1 (form letters1.doc) It also prints too. does not close either word document. Sub test() Dim bltest As Boolean bltest = True CreateMergeDoc bltest, True End Sub Sub CreateMergeDoc(UseDDE As Boolean, PrintDoc As Boolean) Dim WordDoc As Word.Document Dim strLetter As String Dim strConnect As String Dim WordApp As Word.Application Set WordApp = CreateObject("Word.Application") Set WordDoc = WordApp.Documents.Add With WordDoc.MailMerge .OpenDataSource _ Name:="C:\Documents and Settings\marty\My Documents\WordMergetestold97.mdb", _ ReadOnly:=True, LinkToSource:=True, _ SQLStatement:="SELECT * FROM [Table1] WHERE Table1.MyField = " & 123 & ";" ' With Fields '............... 'End With 'With WordApp.Selection '............... 'End With With WordDoc.MailMerge .DataSource.FirstRecord = 1 Debug.Print .DataSource.TableName .Destination = wdSendToNewDocument .Execute If PrintDoc Then .Application.Options.PrintBackground = False .Application.ActiveDocument.PrintOut End If End With WordApp.Visible = True End With End Sub pedro at plex.nl wrote: >Hello Group, > >i converted a A97 secured database to A2K. >After making the changes in Wrkgadmin.exe and the ODBC Data Sources, i changed the names in the module. After running the mailmerge i get an error: Run-time error '5922' Word was unable to open the data source. The debug selects the .OpenDataSource from the code below. > >I figure out why this error occurs. > >TIA > >Pedro Janssen > > > > >Sub CreateMergeDoc(UseDDE As Boolean, PrintDoc As Boolean) > > Dim WordDoc As Word.Document > Dim strLetter As String > Dim strConnect As String > Dim WordApp As Word.Application > > Set WordApp = CreateObject("Word.Application") > > Set WordDoc = WordApp.Documents.Add > With WordDoc.MailMerge > If UseDDE Then > strConnect = "QUERY Uitvoer" > Else > strConnect = "DSN=MS Access 2000 " _ > & "Database;DBQ=E:\Cytologie\positieven\" _ > & "BeveiligdPOSITIEVEN(A2K).mdb;" _ > & "FIL=MS Access;" > End If > .OpenDataSource _ > Name:="E:\Cytologie\positieven\BeveiligdPOSITIEVEN(A2K).mdb", _ > ReadOnly:=True, LinkToSource:=True, _ > Connection:=strConnect, _ > SQLStatement:="SELECT * FROM [Uitvoer], [Aanvrager] WHERE Uitvoer.AanvragerID = Aanvrager.AanvragerID AND Uitvoer.ControleID = " & Forms![Brief]![veld] & ";" > > With Fields > ............... > End With > > With WordApp.Selection > ............... > End With > > > With WordDoc.MailMerge > .DataSource.FirstRecord = 1 > > .Destination = wdSendToNewDocument > > .Execute > > If PrintDoc Then > .Application.Options.PrintBackground = False > .Application.ActiveDocument.PrintOut > End If > End With > > WordApp.Visible = True > End With >End Sub > >_______________________________________________ >AccessD mailing list >AccessD at databaseadvisors.com >http://databaseadvisors.com/mailman/listinfo/accessd >Website: http://www.databaseadvisors.com > > > -- Marty Connelly Victoria, B.C. Canada From DWUTKA at marlow.com Wed Jan 21 17:34:30 2004 From: DWUTKA at marlow.com (DWUTKA at marlow.com) Date: Wed, 21 Jan 2004 17:34:30 -0600 Subject: [AccessD] Union Query Message-ID: <2F8793082E00D4119A1700B0D0216BF80222779E@main2.marlow.com> No need for a Union Query. You can just use a group query, with a Left Join. I may have your table names backwards, but here's the SQL: SELECT tblOpusGrp.GrpID, Count(tblOpus1.WtBreak) AS CountOfWtBreak FROM tblOpusGrp LEFT JOIN tblOpus1 ON tblOpusGrp.GrpID = tblOpus1.WtBreak GROUP BY tblOpusGrp.GrpID; Drew -----Original Message----- From: Millard, Paul --- Sr. Developer Analyst ---WGO [mailto:Paul.Millard at freight.fedex.com] Sent: Wednesday, January 21, 2004 4:56 PM To: Access Developers discussion and problem solving Subject: [AccessD] Union Query Hi I'm having trouble merging two queries together in a union query. The reason for developing query is I'm trying to force a group to show 5 items listed 1 through 5 and their record count and force a 0 when the group doesn't below in the data table (table2). Below is the query, query result an desired result along with two tables. The union I'm trying to perform right now does not merge together which I need. Any help would greatly be appreciated. Paul Millard San Jose, CA select t1.GrpId GrpId, 0 Bills from tblOpusGrp t1 where t1.Grp = 'WtBreak' union select t1.WtBreak GrpId, Count(*) Bills from tblOpus1 t1 where t1.CustNum = '84304389' group by t1.WtBreak query result. 1 0 1 5 2 0 2 3 3 0 3 1 4 0 5 0 5 1 desired query result. 1 5 2 3 3 1 4 0 5 1 table 1 Grp GrpId GrpDesc WtBreak 1 L5C WtBreak 2 M5C WtBreak 3 M1M WtBreak 4 M2M WtBreak 5 M5M table 2 WtBreak Count 1 5 2 3 3 1 5 1 table 2 detail Wt WtBreak 908.0 2 629.0 2 137.0 1 224.0 1 11800.0 5 1610.0 3 379.0 1 258.0 1 793.0 2 192.0 1 ********************************************************** This message contains information that is confidential and proprietary to FedEx Freight or its affiliates. It is intended only for the recipient named and for the express purpose(s) described therein. Any other use is prohibited. **************************************************************** _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From bruce_bruen at mlc.com.au Wed Jan 21 17:35:37 2004 From: bruce_bruen at mlc.com.au (bruce_bruen at mlc.com.au) Date: Thu, 22 Jan 2004 10:35:37 +1100 Subject: [AccessD] Union Query Message-ID: Suggest this ma be closer to what you are seeking rether than a UNION. SELECT tblOpusGrp.GrpId, Count (T1.Wt) AS Bills FROM (select * from tblOpus where custnum="84304389") AS T1 RIGHT JOIN tblOpusGrp ON T1.WtBreak = tblOpusGrp.GrpId WHERE (((tblOpusGrp.Grp)="WtBreak")) GROUP BY tblOpusGrp.GrpId; rgrds Bruce "Millard, Paul --- Sr. Developer Analyst ---WGO" To: "Access Developers discussion and problem solving" ex.com> cc: Sent by: Subject: [AccessD] Union Query accessd-bounces at databasea dvisors.com 22/01/2004 09:56 Please respond to Access Developers discussion and problem solving Hi I'm having trouble merging two queries together in a union query. The reason for developing query is I'm trying to force a group to show 5 items listed 1 through 5 and their record count and force a 0 when the group doesn't below in the data table (table2). Below is the query, query result an desired result along with two tables. The union I'm trying to perform right now does not merge together which I need. Any help would greatly be appreciated. Paul Millard San Jose, CA select t1.GrpId GrpId, 0 Bills from tblOpusGrp t1 where t1.Grp = 'WtBreak' union select t1.WtBreak GrpId, Count(*) Bills from tblOpus1 t1 where t1.CustNum = '84304389' group by t1.WtBreak query result. 1 0 1 5 2 0 2 3 3 0 3 1 4 0 5 0 5 1 desired query result. 1 5 2 3 3 1 4 0 5 1 table 1 Grp GrpId GrpDesc WtBreak 1 L5C WtBreak 2 M5C WtBreak 3 M1M WtBreak 4 M2M WtBreak 5 M5M table 2 WtBreak Count 1 5 2 3 3 1 5 1 table 2 detail Wt WtBreak 908.0 2 629.0 2 137.0 1 224.0 1 11800.0 5 1610.0 3 379.0 1 258.0 1 793.0 2 192.0 1 ********************************************************** This message contains information that is confidential and proprietary to FedEx Freight or its affiliates. It is intended only for the recipient named and for the express purpose(s) described therein. Any other use is prohibited. **************************************************************** _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From Paul.Millard at freight.fedex.com Wed Jan 21 17:41:30 2004 From: Paul.Millard at freight.fedex.com (Millard, Paul --- Sr. Developer Analyst ---WGO) Date: Wed, 21 Jan 2004 15:41:30 -0800 Subject: [AccessD] Union Query Solved Message-ID: <67B2D43A2067B248A36B007650A2312C145377@PSJOE2K1.fxfwest.freight.fedex.com> I solved my own problem. For those who want to know...Create a wrapper/subquery. I do them in Oracle but couldn't figure out why they wouldn't work in SQL Server until now. SQL Server requires a table name where Oracle does not. I guess owning a SQL Server book would be helpful after all. -Paul Select t1.GrpId, Sum(t1.Bills) Bills from ( select t1.GrpId GrpId, 0 Bills from tblOpusGrp t1 where t1.Grp = 'WtBreak' union select t1.WtBreak GrpId, Count(*) Bills from tblOpus1 t1 where t1.CustNum = '84304389' group by t1.WtBreak ) t1 group by t1.GrpId 1 5 2 3 3 1 4 0 5 1 -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Millard, Paul --- Sr. Developer Analyst ---WGO Sent: Wednesday, January 21, 2004 2:56 PM To: Access Developers discussion and problem solving Subject: [AccessD] Union Query Hi I'm having trouble merging two queries together in a union query. The reason for developing query is I'm trying to force a group to show 5 items listed 1 through 5 and their record count and force a 0 when the group doesn't below in the data table (table2). Below is the query, query result an desired result along with two tables. The union I'm trying to perform right now does not merge together which I need. Any help would greatly be appreciated. Paul Millard San Jose, CA select t1.GrpId GrpId, 0 Bills from tblOpusGrp t1 where t1.Grp = 'WtBreak' union select t1.WtBreak GrpId, Count(*) Bills from tblOpus1 t1 where t1.CustNum = '84304389' group by t1.WtBreak query result. 1 0 1 5 2 0 2 3 3 0 3 1 4 0 5 0 5 1 desired query result. 1 5 2 3 3 1 4 0 5 1 table 1 Grp GrpId GrpDesc WtBreak 1 L5C WtBreak 2 M5C WtBreak 3 M1M WtBreak 4 M2M WtBreak 5 M5M table 2 WtBreak Count 1 5 2 3 3 1 5 1 table 2 detail Wt WtBreak 908.0 2 629.0 2 137.0 1 224.0 1 11800.0 5 1610.0 3 379.0 1 258.0 1 793.0 2 192.0 1 ********************************************************** This message contains information that is confidential and proprietary to FedEx Freight or its affiliates. It is intended only for the recipient named and for the express purpose(s) described therein. Any other use is prohibited. **************************************************************** _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From d.dick at uws.edu.au Wed Jan 21 17:49:04 2004 From: d.dick at uws.edu.au (Darren DICK) Date: Thu, 22 Jan 2004 10:49:04 +1100 Subject: [AccessD] A2K: Error 3251 References: Message-ID: <00b101c3e079$26bea9c0$48619a89@DDICK> Thanks to all who responded dbOpenDynaset was the answer as opposed to dbOpenSnapshot Thanks Guys This list is great DD ----- Original Message ----- From: "Jim Lawrence (AccessD)" To: "Access Developers discussion and problem solving" Sent: Wednesday, January 21, 2004 6:20 PM Subject: RE: [AccessD] A2K: Error 3251 > Hi Darren: > > You have to make sure your DAO is referenced, the db object and rs recordset > object is dimensioned and the right type of object is used, that has edit > and update functionality. > > Example: > > Dim selSQL As String > Dim rs as DAO.recordset > Dim db as DAO.database > > set db = CurrentDb() > set rs = db.OpenRecordset(selSQL, dbOpenDynaset) > > ... then everything should work just fine. > > HTH > Jim > > -----Original Message----- > From: accessd-bounces at databaseadvisors.com > [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Darren DICK > Sent: Tuesday, January 20, 2004 9:18 PM > To: AccessD List > Subject: [AccessD] A2K: Error 3251 > > > Hi All > This should be simple > > I have some code updating a table of records > > Dim selSQL As String > Dim rs As Recordset > > selSQL = "SELECT tblMyTable.* FROM tblMyTable;" > > Set rs = db.OpenRecordset(selSQL, dbOpenSnapshot) > > With rs > .Edit <===Code Fails Here > !MyField = Me.txtMyControl > .Update > End With > > The rror I get is... > Error 3251: Operation is not supported for this type of Object > > Any suggestions?? > > Many thanks > > DArren > > _______________________________________________ > 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 From joeget at vgernet.net Wed Jan 21 18:14:42 2004 From: joeget at vgernet.net (John Eget) Date: Wed, 21 Jan 2004 19:14:42 -0500 Subject: [AccessD] access 2.0 to XP issue Message-ID: <008f01c3e07c$bf755490$4ec2f63f@Desktop> Today I was asked to take a access 2.0 backend and make it work with XP!! The 2.0 will not work with XP at all. I need to update some table specifications, and make it work on an XP PC. Any ideas John Eget From Paul.Millard at freight.fedex.com Wed Jan 21 18:08:24 2004 From: Paul.Millard at freight.fedex.com (Millard, Paul --- Sr. Developer Analyst ---WGO) Date: Wed, 21 Jan 2004 16:08:24 -0800 Subject: [AccessD] Union Query Message-ID: <67B2D43A2067B248A36B007650A2312C145378@PSJOE2K1.fxfwest.freight.fedex.com> Thanks Bruce and Drew for your responses. Actually, this is a great way of doing things! -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of bruce_bruen at mlc.com.au Sent: Wednesday, January 21, 2004 3:36 PM To: Access Developers discussion and problem solving Subject: Re: [AccessD] Union Query Suggest this ma be closer to what you are seeking rether than a UNION. SELECT tblOpusGrp.GrpId, Count (T1.Wt) AS Bills FROM (select * from tblOpus where custnum="84304389") AS T1 RIGHT JOIN tblOpusGrp ON T1.WtBreak = tblOpusGrp.GrpId WHERE (((tblOpusGrp.Grp)="WtBreak")) GROUP BY tblOpusGrp.GrpId; rgrds Bruce "Millard, Paul --- Sr. Developer Analyst ---WGO" To: "Access Developers discussion and problem solving" ex.com> cc: Sent by: Subject: [AccessD] Union Query accessd-bounces at databasea dvisors.com 22/01/2004 09:56 Please respond to Access Developers discussion and problem solving Hi I'm having trouble merging two queries together in a union query. The reason for developing query is I'm trying to force a group to show 5 items listed 1 through 5 and their record count and force a 0 when the group doesn't below in the data table (table2). Below is the query, query result an desired result along with two tables. The union I'm trying to perform right now does not merge together which I need. Any help would greatly be appreciated. Paul Millard San Jose, CA select t1.GrpId GrpId, 0 Bills from tblOpusGrp t1 where t1.Grp = 'WtBreak' union select t1.WtBreak GrpId, Count(*) Bills from tblOpus1 t1 where t1.CustNum = '84304389' group by t1.WtBreak query result. 1 0 1 5 2 0 2 3 3 0 3 1 4 0 5 0 5 1 desired query result. 1 5 2 3 3 1 4 0 5 1 table 1 Grp GrpId GrpDesc WtBreak 1 L5C WtBreak 2 M5C WtBreak 3 M1M WtBreak 4 M2M WtBreak 5 M5M table 2 WtBreak Count 1 5 2 3 3 1 5 1 table 2 detail Wt WtBreak 908.0 2 629.0 2 137.0 1 224.0 1 11800.0 5 1610.0 3 379.0 1 258.0 1 793.0 2 192.0 1 ********************************************************** This message contains information that is confidential and proprietary to FedEx Freight or its affiliates. It is intended only for the recipient named and for the express purpose(s) described therein. Any other use is prohibited. **************************************************************** _______________________________________________ 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 From BBarabash at TappeConstruction.com Wed Jan 21 18:16:25 2004 From: BBarabash at TappeConstruction.com (Brett Barabash) Date: Wed, 21 Jan 2004 18:16:25 -0600 Subject: [AccessD] access 2.0 to XP issue Message-ID: <426071E0B0A6D311B3C0006008B0AB23AFE2C9@TAPPEEXCH01> Hmm... I maintain several A2 in-house apps, and they all work on Windows XP just fine. I don't have Access XP running here, but they work just fine linked to an A2K front-end. What's your specific issue? Have you installed A2 on your machines, or are you trying to modify linked tables? -----Original Message----- From: John Eget [mailto:joeget at vgernet.net] Sent: Wednesday, January 21, 2004 6:15 PM To: AccessD at databaseadvisors.com Subject: [AccessD] access 2.0 to XP issue Today I was asked to take a access 2.0 backend and make it work with XP!! The 2.0 will not work with XP at all. I need to update some table specifications, and make it work on an XP PC. Any ideas John Eget -------------------------------------------------------------------------------------------------------------------- This email and any files transmitted with it are confidential and intended solely for the use of the individual or entity to whom they are addressed. If you have received this email in error please notify the originator of the message. This footer also confirms that this email message has been scanned for the presence of computer viruses. Any views expressed in this message are those of the individual sender, except where the sender specifies and with authority, states them to be the views of Tappe Construction Co. Scanning of this message and addition of this footer is performed by SurfControl E-mail Filter software in conjunction with virus detection software. From cfoust at infostatsystems.com Wed Jan 21 18:21:05 2004 From: cfoust at infostatsystems.com (Charlotte Foust) Date: Wed, 21 Jan 2004 16:21:05 -0800 Subject: [AccessD] access 2.0 to XP issue Message-ID: Access XP or Windows XP? The earliest version AXP will work with is 97. What exactly do you need to do, convert it to AXP or something else? Your best bet might be to use A97 to convert the A2.0 database to 97 for starters. The 97 format will definitely run on WinXP and can be read/converted by AXP. Charlotte Foust -----Original Message----- From: John Eget [mailto:joeget at vgernet.net] Sent: Wednesday, January 21, 2004 4:15 PM To: AccessD at databaseadvisors.com Subject: [AccessD] access 2.0 to XP issue Today I was asked to take a access 2.0 backend and make it work with XP!! The 2.0 will not work with XP at all. I need to update some table specifications, and make it work on an XP PC. Any ideas John Eget _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From joeget at vgernet.net Wed Jan 21 18:32:49 2004 From: joeget at vgernet.net (John Eget) Date: Wed, 21 Jan 2004 19:32:49 -0500 Subject: [AccessD] access 2.0 to XP issue References: Message-ID: <00c701c3e07f$473b4180$4ec2f63f@Desktop> Access XP ----- Original Message ----- From: "Charlotte Foust" To: "Access Developers discussion and problem solving" Sent: Wednesday, January 21, 2004 7:21 PM Subject: RE: [AccessD] access 2.0 to XP issue > Access XP or Windows XP? The earliest version AXP will work with is 97. > What exactly do you need to do, convert it to AXP or something else? > Your best bet might be to use A97 to convert the A2.0 database to 97 for > starters. The 97 format will definitely run on WinXP and can be > read/converted by AXP. > > Charlotte Foust > > -----Original Message----- > From: John Eget [mailto:joeget at vgernet.net] > Sent: Wednesday, January 21, 2004 4:15 PM > To: AccessD at databaseadvisors.com > Subject: [AccessD] access 2.0 to XP issue > > > Today I was asked to take a access 2.0 backend and make it work with > XP!! The 2.0 will not work with XP at all. I need to update some table > specifications, and make it work on an XP PC. Any ideas John Eget > _______________________________________________ > 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 From becklesd at tiscali.co.uk Wed Jan 21 19:10:36 2004 From: becklesd at tiscali.co.uk (David Beckles) Date: Thu, 22 Jan 2004 01:10:36 +0000 Subject: [AccessD] RE: Instantiate Forms as Objects Message-ID: <5.2.0.9.2.20040122011000.02324b10@127.0.0.1> Dear Ken, One way of achieving (most of) what you want to do is as follows: 1. In each of your forms create the function Public Function NewInstance() As Form Set NewInstance = New Form_TestForm End Function Its purpose is merely to return a reference to a new instance of the form. You could also define it as a new public property of the form, instead of a function. 2. Define the following function in some general module Public Function OpenFormMultiple(FormName As String) As Form ' check the Forms collection, and if the form is in it then use the NewInstance() method of the form ' otherwise open the form in the usual way and return a reference to it. ' in either case, the form will not be visible. ' if any errors occur, then the value Nothing will be returned, so remember to test for it. On Error Resume Next ' You could use fancier error handling if you wanted Dim F As Form Set OpenFormMultiple = Nothing Set F = Forms(FormName) If F Is Nothing Then Application.Echo False ' this is to suppress the screen flicker DoCmd.OpenForm FormName Set F = Forms(FormName) F.Visible = False Set OpenFormMultiple = F Application.Echo True Else Set OpenFormMultiple = F.NewInstance() End If End Function One problem with this arrangement is that you can close all the instances of a form except the first by setting the reference to Nothing. The first instance has to be closed by going into the Forms collection. I have not found a way around that as yet. I hope that this helps, David From accessd666 at yahoo.com Thu Jan 22 00:25:38 2004 From: accessd666 at yahoo.com (Sad Der) Date: Wed, 21 Jan 2004 22:25:38 -0800 (PST) Subject: [AccessD] Major Performance Issue! + Code In-Reply-To: <02fd01c3e030$67dfd440$b274d0d5@minster33c3r25> Message-ID: <20040122062538.53174.qmail@web60209.mail.yahoo.com> Here is (part of) the code: PS: I found the GetMaxDate() function, I think on wolfwares.com! '========================================================================================= ' Function Name : FillStamMeetProces ' Parameters : No parameters ' Return value : (String) ' Purpose : ' Assumptions : --- ' Uses : --- ' Created : 2003-10-24 10:12, SaDe ' Modifications : '========================================================================================= Function FillStamMeetProces(strProces As String) As String '150 StamMeetData '210 StamMeetData Dim strMeD As String 'Message_date Dim strSQL As String Dim strRecordcount As String On Error GoTo FillStamMeetProces_Error Select Case strProces Case "SM" 'Cleanup table DeleteRecords strProces '---------------------------------------- ' 150 Te verwerken ontvangen stamgegevens '---------------------------------------- '--------------------------------------------------------- 'MaxDate() '--------------------------------------------------------- strSQL = vbNullString 'SQL statement to fetch most recent date strSQL = "SELECT Max([Bericht 150 (Update Master Data)].Message_Date) AS MaxOfMessage_Date " & _ "FROM [Bericht 150 (Update Master Data)] " & _ "WHERE Connect_EAN =" & "'" & gstrSelectedEan & "' " strMeD = GetMaxDate(strSQL) If Len(strMeD) = 0 Then strMeD = "N/A" End If '--------------------------------------------------------- 'Aantal Records '--------------------------------------------------------- strSQL = vbNullString 'SQL statement to fetch most recent date strSQL = "SELECT COUNT(*) " & _ "FROM [Bericht 150 (Update Master Data)] " & _ "WHERE Connect_EAN =" & "'" & gstrSelectedEan & "' " strRecordcount = GetRecordCount(strSQL) 'Check if a date was returned If strRecordcount = vbNullString Then strRecordcount = "0" End If 'Create new record AddRecords strProces, "150", strMeD, strRecordcount '---------------------------------------- ' 210 Te verwerken ontvangen meetdata '---------------------------------------- '--------------------------------------------------------- 'MaxDate() '--------------------------------------------------------- strMeD = vbNullString strSQL = vbNullString 'SQL statement to fetch most recent date strSQL = "SELECT Max(V2_210_MEDTD1.message_date) AS MaxOfmessage_date " & _ "FROM V2_210_MEDTD1 " & _ "WHERE Connect_EAN =" & "'" & gstrSelectedEan & "' " strMeD = GetMaxDate(strSQL) If Len(strMeD) = 0 Then strMeD = "N/A" End If '--------------------------------------------------------- 'Aantal Records '--------------------------------------------------------- strSQL = vbNullString 'SQL statement to fetch most recent date strSQL = "SELECT COUNT(*) " & _ "FROM V2_210_MEDTD1 " & _ "WHERE Connect_EAN =" & "'" & gstrSelectedEan & "' " strRecordcount = GetRecordCount(strSQL) 'Check if a date was returned If strRecordcount = vbNullString Then strRecordcount = "0" End If 'Create new record AddRecords strProces, "210", strMeD, strRecordcount Case Else MsgBox "UNKNOW PROCES!" End Select FillStamMeetProces_Exit: ' Collect your garbage here Exit Function FillStamMeetProces_Error: ' Collect your garbage here Call g_oGenErr.Throw("Switchdatabase.mMultiInterface", "FillStamMeetProces") End Function Function GetMaxDate(strSQL As String) As String 'Dim strSQL As String Dim conn As ADODB.Connection Dim rstBericht As ADODB.Recordset Dim strMaxDate As String Set conn = CurrentProject.Connection Set rstBericht = New ADODB.Recordset With rstBericht .ActiveConnection = conn .CursorType = adOpenKeyset .LockType = adLockReadOnly .Source = strSQL .Open If .RecordCount > 0 Then If IsNull(.Fields(0)) Then strMaxDate = vbNullString Else strMaxDate = .Fields(0) End If Else strMaxDate = vbNullString End If End With 'Return value GetMaxDate = strMaxDate Set rstBericht = Nothing End Function '========================================================================================= ' Function Name : AddRecords ' Parameters : strProces As String ' strBericht As String ' strDatum As String ' strAantal As String ' Return value : (Boolean) ' Purpose : Inserts records into tblMultiInterface. This table is used to display detail ' information regarding the switch, verhuis, stam & meetdata and contract ' processes ' Assumptions : --- ' Uses : --- ' Created : 2003-10-21 09:00, SaDe ' Modifications : '========================================================================================= Function AddRecords(strProces As String, strBericht As String, strDatum As String, strAantal As String) As Boolean Dim strSQL As String On Error GoTo AddRecords_Error strSQL = "INSERT INTO tblMultiInterface VALUES (""" & strProces & """,""" & strBericht & """,""" & strDatum & """,""" & strAantal & """ )" DoCmd.RunSQL strSQL AddRecords_Exit: ' Collect your garbage here Exit Function AddRecords_Error: ' Collect your garbage here Call g_oGenErr.Throw("Switchdatabase.Form_fMultiInterface", "AddRecords") End Function --- Andy Lacey wrote: > Sander > Rather than attaching the code try pasting it into > the email. Shouldn't be a > size issue then, unless, of course, there's miles of > it! I don't know about > anyone else but I certainly would get a clearer > picture of what you're doing > by seeing the code. Can't really get a handle on it > yet. > > Andy Lacey > http://www.minstersystems.co.uk > > > -----Original Message----- > > From: accessd-bounces at databaseadvisors.com > > [mailto:accessd-bounces at databaseadvisors.com] On > Behalf Of Sad Der > > Sent: 21 January 2004 08:40 > > To: Acces User Group > > Subject: [AccessD] Major Performance Issue! > > > > > > Hi group, > > > > I've got a MAJOR performance issue. I need to > display > > a lot of data. A performance test showed that it > takes > > between 120 - 160 seconds (2 minutes - 2.40 > minutes) > > to display the data! I have no idea how to speed > > things up dramaticly. I really could use some > tips. > > > > Here's a description of the current environment: > > Access 2000 Client (size: 20 Mb) > > Access 2000 Back-end (size: 100 Mb) > > approx 4 users > > Novel network > > > > Functionality: > > I need to display 4 listbox' with data. > > > > Every listbox has the same table as source. > > Every listbox has a query as RowSource > > Every listbox has this layout: > > > > Proces Type | Date | # Records > > > > Listbox 1 displays 4 records > > Listbox 2 displays 2 records > > Listbox 3 displays 6 records > > Listbox 4 displays 3 records > > > > So the table (tblMultiInterface) has 15 records in > > total. > > > > Table tblMultiInterface > > Fields: > > Proces Type Text > > Date Text (!) > > Records Text (!) (zero records need to > display > > N/A) > > > > I added the code as an attachment but unfortunatly > > this mail was blocked! If anybody would like to > take a > > look at the code I can send it to you directly. > > > > Comments/tips/etc would be GREATLY appriciated! > > > > TIA > > Sad > > > > > > __________________________________ > > Do you Yahoo!? > > Yahoo! Hotjobs: Enter the "Signing Bonus" > Sweepstakes > > http://hotjobs.sweepstakes.yahoo.com/signingbo> > nus > > > > _______________________________________________ > > AccessD > > mailing list > > AccessD at databaseadvisors.com > > http://databaseadvisors.com/mailman/listinfo/a> > ccessd > > Website: > > http://www.databaseadvisors.com > > > > > > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com __________________________________ Do you Yahoo!? Yahoo! SiteBuilder - Free web site building tool. Try it! http://webhosting.yahoo.com/ps/sb/ From martyconnelly at shaw.ca Thu Jan 22 00:58:07 2004 From: martyconnelly at shaw.ca (MartyConnelly) Date: Wed, 21 Jan 2004 22:58:07 -0800 Subject: [AccessD] Worldwide Media exchange or is this a Schuss Boomer? References: <67B2D43A2067B248A36B007650A2312C145378@PSJOE2K1.fxfwest.freight.fedex.com> Message-ID: <400F747F.6000403@shaw.ca> http://wwmx.org/FullMediaView.aspx?mediaid=29423 mainsite http://wwmx.org/WebClient.aspx Here is a interesting new use of GPS and Images via ASP.net from Microsoft Research. Free download of api and net client For all surveillance lovers: microsoft research ask people from all over the world to send in photos and the location data, where the photos were shot. they hope to collect "gazillions" of photos and make a visual map of the whole world... -- Marty Connelly Victoria, B.C. Canada From Erwin.Craps at ithelps.be Thu Jan 22 01:56:28 2004 From: Erwin.Craps at ithelps.be (Erwin Craps - IT Helps) Date: Thu, 22 Jan 2004 08:56:28 +0100 Subject: [AccessD] Worldwide Media exchange or is this a Schuss Boomer? Message-ID: <46B976F2B698FF46A4FE7636509B22DF03D149@stekelbes.ithelps.local> Looks like fun... Gonna upload some pics.... Leuven is not present yet... Erwin -----Oorspronkelijk bericht----- Van: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] Namens MartyConnelly Verzonden: donderdag 22 januari 2004 7:58 Aan: Access Developers discussion and problem solving Onderwerp: [AccessD] Worldwide Media exchange or is this a Schuss Boomer? http://wwmx.org/FullMediaView.aspx?mediaid=29423 mainsite http://wwmx.org/WebClient.aspx Here is a interesting new use of GPS and Images via ASP.net from Microsoft Research. Free download of api and net client For all surveillance lovers: microsoft research ask people from all over the world to send in photos and the location data, where the photos were shot. they hope to collect "gazillions" of photos and make a visual map of the whole world... -- Marty Connelly Victoria, B.C. Canada _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From accessd666 at yahoo.com Thu Jan 22 02:47:25 2004 From: accessd666 at yahoo.com (Sad Der) Date: Thu, 22 Jan 2004 00:47:25 -0800 (PST) Subject: [AccessD] HOWTO: Transform code to Function/Sub Message-ID: <20040122084725.46032.qmail@web60206.mail.yahoo.com> Hi group, I've got an app (A2k) and I use a lot of check boxes to select all listbox items. Can someone please help me how I can transform the code to a function? I found this in the HELP. But I cannot figure out how I can combine the SET and a parameter?! Sub BoundData() Dim frm As Form, ctl As Control Dim varItm As Variant Set frm = Forms!Contacts Set ctl = frm!Names For Each varItm In ctl.ItemsSelected Debug.Print ctl.ItemData(varItm) Next varItm End Sub I think I need 2 params: Form Listbox Here's my code: Dim intCountItems As Integer Dim x As Integer intCountItems = lstTabellen.ListCount If chkAllTabellen.Value = -1 Then For x = 0 To intCountItems - 1 With lstTabellen If Not .Selected(x) Then .Selected(x) = True End If End With Next x Else For x = 0 To intCountItems - 1 With lstTabellen If .Selected(x) Then .Selected(x) = False End If End With Next x End If End Sub TIA SAD __________________________________ Do you Yahoo!? Yahoo! SiteBuilder - Free web site building tool. Try it! http://webhosting.yahoo.com/ps/sb/ From becklesd at tiscali.co.uk Wed Jan 21 19:10:09 2004 From: becklesd at tiscali.co.uk (David Beckles) Date: Thu, 22 Jan 2004 01:10:09 +0000 Subject: [AccessD] RE: Instantiate Forms as Objects Message-ID: <5.2.0.9.2.20040122003533.0226d4c0@127.0.0.1> Dear Ken, One way of achieving (most of) what you want to do is as follows: 1. In each of your forms create the function Public Function NewInstance() As Form Set NewInstance = New Form_TestForm End Function Its purpose is merely to return a reference to a new instance of the form. You could also define it as a new public property of the form, instead of a function. 2. Define the following function in some general module Public Function OpenFormMultiple(FormName As String) As Form ' check the Forms collection, and if the form is in it then use the NewInstance() method of the form ' otherwise open the form in the usual way and return a reference to it. ' in either case, the form will not be visible. ' if any errors occur, then the value Nothing will be returned, so remember to test for it. On Error Resume Next ' You could use fancier error handling if you wanted Dim F As Form Set OpenFormMultiple = Nothing Set F = Forms(FormName) If F Is Nothing Then Application.Echo False ' this is to suppress the screen flicker DoCmd.OpenForm FormName Set F = Forms(FormName) F.Visible = False Set OpenFormMultiple = F Application.Echo True Else Set OpenFormMultiple = F.NewInstance() End If End Function One problem with this arrangement is that you can close all the instances of a form except the first by setting the reference to Nothing. The first instance has to be closed by going into the Forms collection. I have not found a way around that as yet. I hope that this helps, David From andy at minstersystems.co.uk Thu Jan 22 03:02:53 2004 From: andy at minstersystems.co.uk (Andy Lacey) Date: Thu, 22 Jan 2004 09:02:53 -0000 Subject: [AccessD] Major Performance Issue! + Code In-Reply-To: <20040122062538.53174.qmail@web60209.mail.yahoo.com> Message-ID: <007801c3e0c6$8540f8c0$b274d0d5@minster33c3r25> Sander The first thing I suggest you do is put timing code in to isolate where you have performance issue(s). If you don't already have something I can send you a copy of JC's timer class (I'm sure he won't mind). There's no point aiming attention at one routine only to find that it represented 0.01% of the overall time. So, first up, find the lines of code which are doing the damage. Andy Lacey http://www.minstersystems.co.uk > -----Original Message----- > From: accessd-bounces at databaseadvisors.com > [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Sad Der > Sent: 22 January 2004 06:26 > To: Access Developers discussion and problem solving > Subject: RE: [AccessD] Major Performance Issue! + Code > > > Here is (part of) the code: > PS: I found the GetMaxDate() function, I think on wolfwares.com! > > '============================================================= > ============================ > ' Function Name : FillStamMeetProces > ' Parameters : No parameters > ' Return value : (String) > ' Purpose : > ' Assumptions : --- > ' Uses : --- > ' Created : 2003-10-24 10:12, SaDe > ' Modifications : > '============================================================= > ============================ > Function FillStamMeetProces(strProces As String) As > String > '150 StamMeetData > '210 StamMeetData > Dim strMeD As String 'Message_date > Dim strSQL As String > Dim strRecordcount As String > > On Error GoTo FillStamMeetProces_Error > Select Case strProces > Case "SM" > 'Cleanup table > DeleteRecords strProces > > '---------------------------------------- > ' 150 Te verwerken ontvangen stamgegevens > '---------------------------------------- > > '--------------------------------------------------------- > 'MaxDate() > > '--------------------------------------------------------- > strSQL = vbNullString > > 'SQL statement to fetch most recent date > strSQL = "SELECT Max([Bericht 150 (Update Master > Data)].Message_Date) AS MaxOfMessage_Date " & _ > "FROM [Bericht 150 (Update Master > Data)] " & _ > "WHERE Connect_EAN =" & "'" & > gstrSelectedEan & "' " > > strMeD = GetMaxDate(strSQL) > If Len(strMeD) = 0 Then > strMeD = "N/A" > End If > > '--------------------------------------------------------- > 'Aantal Records > > '--------------------------------------------------------- > strSQL = vbNullString > 'SQL statement to fetch most recent date > strSQL = "SELECT COUNT(*) " & _ > "FROM [Bericht 150 (Update Master > Data)] " & _ > "WHERE Connect_EAN =" & "'" & > gstrSelectedEan & "' " > > strRecordcount = GetRecordCount(strSQL) > > 'Check if a date was returned > If strRecordcount = vbNullString Then > strRecordcount = "0" > End If > > 'Create new record > AddRecords strProces, "150", strMeD, > strRecordcount > > '---------------------------------------- > ' 210 Te verwerken ontvangen meetdata > '---------------------------------------- > > '--------------------------------------------------------- > 'MaxDate() > > '--------------------------------------------------------- > strMeD = vbNullString > strSQL = vbNullString > 'SQL statement to fetch most recent date > strSQL = "SELECT Max(V2_210_MEDTD1.message_date) > AS MaxOfmessage_date " & _ > "FROM V2_210_MEDTD1 " & _ > "WHERE Connect_EAN =" & "'" & > gstrSelectedEan & "' " > > strMeD = GetMaxDate(strSQL) > If Len(strMeD) = 0 Then > strMeD = "N/A" > End If > > '--------------------------------------------------------- > 'Aantal Records > > '--------------------------------------------------------- > strSQL = vbNullString > 'SQL statement to fetch most recent date > strSQL = "SELECT COUNT(*) " & _ > "FROM V2_210_MEDTD1 " & _ > "WHERE Connect_EAN =" & "'" & > gstrSelectedEan & "' " > > strRecordcount = GetRecordCount(strSQL) > > 'Check if a date was returned > If strRecordcount = vbNullString Then > strRecordcount = "0" > End If > > 'Create new record > AddRecords strProces, "210", strMeD, > strRecordcount > Case Else > MsgBox "UNKNOW PROCES!" > End Select > > FillStamMeetProces_Exit: > ' Collect your garbage here > Exit Function > FillStamMeetProces_Error: > ' Collect your garbage here > Call > g_oGenErr.Throw("Switchdatabase.mMultiInterface", > "FillStamMeetProces") > End Function > > Function GetMaxDate(strSQL As String) As String > 'Dim strSQL As String > Dim conn As ADODB.Connection > Dim rstBericht As ADODB.Recordset > Dim strMaxDate As String > > Set conn = CurrentProject.Connection > Set rstBericht = New ADODB.Recordset > > > With rstBericht > .ActiveConnection = conn > .CursorType = adOpenKeyset > .LockType = adLockReadOnly > .Source = strSQL > .Open > If .RecordCount > 0 Then > If IsNull(.Fields(0)) Then > strMaxDate = vbNullString > Else > strMaxDate = .Fields(0) > End If > Else > strMaxDate = vbNullString > End If > End With > > 'Return value > GetMaxDate = strMaxDate > > Set rstBericht = Nothing > End Function > > > '============================================================= > ============================ > ' Function Name : AddRecords > ' Parameters : strProces As String > ' strBericht As String > ' strDatum As String > ' strAantal As String > ' Return value : (Boolean) > ' Purpose : Inserts records into > tblMultiInterface. This table is used to display > detail > ' information regarding the > switch, verhuis, stam & meetdata and contract > ' processes > ' Assumptions : --- > ' Uses : --- > ' Created : 2003-10-21 09:00, SaDe > ' Modifications : > '============================================================= > ============================ > Function AddRecords(strProces As String, strBericht As > String, strDatum As String, strAantal As String) As > Boolean > Dim strSQL As String > > On Error GoTo AddRecords_Error > strSQL = "INSERT INTO tblMultiInterface VALUES (""" > & strProces & """,""" & strBericht & """,""" & > strDatum & """,""" & strAantal & """ )" > DoCmd.RunSQL strSQL > > AddRecords_Exit: > ' Collect your garbage here > Exit Function > AddRecords_Error: > ' Collect your garbage here > Call > g_oGenErr.Throw("Switchdatabase.Form_fMultiInterface", > "AddRecords") > > End Function > > --- Andy Lacey wrote: > > Sander > > Rather than attaching the code try pasting it into > > the email. Shouldn't be a > > size issue then, unless, of course, there's miles of > > it! I don't know about > > anyone else but I certainly would get a clearer > > picture of what you're doing > > by seeing the code. Can't really get a handle on it > > yet. > > > > Andy Lacey > > http://www.minstersystems.co.uk > > > > > -----Original Message----- > > > From: accessd-bounces at databaseadvisors.com > > > [mailto:accessd-bounces at databaseadvisors.com] On > > Behalf Of Sad Der > > > Sent: 21 January 2004 08:40 > > > To: Acces User Group > > > Subject: [AccessD] Major Performance Issue! > > > > > > > > > Hi group, > > > > > > I've got a MAJOR performance issue. I need to > > display > > > a lot of data. A performance test showed that it > > takes > > > between 120 - 160 seconds (2 minutes - 2.40 > > minutes) > > > to display the data! I have no idea how to speed > > > things up dramaticly. I really could use some > > tips. > > > > > > Here's a description of the current environment: > > > Access 2000 Client (size: 20 Mb) > > > Access 2000 Back-end (size: 100 Mb) > > > approx 4 users > > > Novel network > > > > > > Functionality: > > > I need to display 4 listbox' with data. > > > > > > Every listbox has the same table as source. > > > Every listbox has a query as RowSource > > > Every listbox has this layout: > > > > > > Proces Type | Date | # Records > > > > > > Listbox 1 displays 4 records > > > Listbox 2 displays 2 records > > > Listbox 3 displays 6 records > > > Listbox 4 displays 3 records > > > > > > So the table (tblMultiInterface) has 15 records in > > > total. > > > > > > Table tblMultiInterface > > > Fields: > > > Proces Type Text > > > Date Text (!) > > > Records Text (!) (zero records need to > > display > > > N/A) > > > > > > I added the code as an attachment but unfortunatly > > > this mail was blocked! If anybody would like to > > take a > > > look at the code I can send it to you directly. > > > > > > Comments/tips/etc would be GREATLY appriciated! > > > > > > TIA > > > Sad > > > > > > > > > __________________________________ > > > Do you Yahoo!? > > > Yahoo! Hotjobs: Enter the "Signing Bonus" > > Sweepstakes > > > http://hotjobs.sweepstakes.yahoo.com/signingbo> > > nus > > > > > > _______________________________________________ > > > AccessD > > > mailing list > > > AccessD at databaseadvisors.com > > > http://databaseadvisors.com/mailman/listinfo/a> > > ccessd > > > Website: > > > http://www.databaseadvisors.com > > > > > > > > > > _______________________________________________ > > AccessD mailing list > > AccessD at databaseadvisors.com > > http://databaseadvisors.com/mailman/listinfo/accessd > > Website: http://www.databaseadvisors.com > > > __________________________________ > Do you Yahoo!? > Yahoo! SiteBuilder - Free web site building tool. Try it! http://webhosting.yahoo.com/ps/sb/ _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From gustav at cactus.dk Thu Jan 22 02:54:17 2004 From: gustav at cactus.dk (Gustav Brock) Date: Thu, 22 Jan 2004 09:54:17 +0100 Subject: [AccessD] Major Performance Issue! + Code In-Reply-To: <20040122062538.53174.qmail@web60209.mail.yahoo.com> References: <20040122062538.53174.qmail@web60209.mail.yahoo.com> Message-ID: <933378007.20040122095417@cactus.dk> Hi Sad Maybe I should have had two espressos as wake-up coffee - anyway I find it hard to follow this. However, quoting your original message: >> > I need to display 4 listbox' with data. >> > >> > Every listbox has the same table as source. >> > Every listbox has a query as RowSource >> > Every listbox has this layout: >> > >> > Proces Type | Date | # Records >> > >> > Listbox 1 displays 4 records >> > Listbox 2 displays 2 records >> > Listbox 3 displays 6 records >> > Listbox 4 displays 3 records >> > >> > So the table (tblMultiInterface) has 15 records in total. I guess - as you list all records - it should be possible somehow to group the records and do a "Select .. In .." or mark the records for selection. This process can't last for many minutes. The process time must be caused by the selection of the original records which you seem to write to a temporay table. /gustav From accessd666 at yahoo.com Thu Jan 22 03:23:36 2004 From: accessd666 at yahoo.com (Sad Der) Date: Thu, 22 Jan 2004 01:23:36 -0800 (PST) Subject: [AccessD] Major Performance Issue! + Code + Time In-Reply-To: <007801c3e0c6$8540f8c0$b274d0d5@minster33c3r25> Message-ID: <20040122092336.89411.qmail@web60204.mail.yahoo.com> Hi, i already timed every proces. here are the results: Proces Time Switch 10 seconds Stam 21 seconds Verhuis 27 seconds CI 94 seconds So the CI is a big one. On the other hand, the other processes also take up a lot of time! SD --- Andy Lacey wrote: > Sander > The first thing I suggest you do is put timing code > in to isolate where you > have performance issue(s). If you don't already have > something I can send > you a copy of JC's timer class (I'm sure he won't > mind). There's no point > aiming attention at one routine only to find that it > represented 0.01% of > the overall time. So, first up, find the lines of > code which are doing the > damage. > > Andy Lacey > http://www.minstersystems.co.uk > > > -----Original Message----- > > From: accessd-bounces at databaseadvisors.com > > [mailto:accessd-bounces at databaseadvisors.com] On > Behalf Of Sad Der > > Sent: 22 January 2004 06:26 > > To: Access Developers discussion and problem > solving > > Subject: RE: [AccessD] Major Performance Issue! + > Code > > > > > > Here is (part of) the code: > > PS: I found the GetMaxDate() function, I think on > wolfwares.com! > > > > > '============================================================= > > ============================ > > ' Function Name : FillStamMeetProces > > ' Parameters : No parameters > > ' Return value : (String) > > ' Purpose : > > ' Assumptions : --- > > ' Uses : --- > > ' Created : 2003-10-24 10:12, SaDe > > ' Modifications : > > > '============================================================= > > ============================ > > Function FillStamMeetProces(strProces As String) > As > > String > > '150 StamMeetData > > '210 StamMeetData > > Dim strMeD As String 'Message_date > > Dim strSQL As String > > Dim strRecordcount As String > > > > On Error GoTo FillStamMeetProces_Error > > Select Case strProces > > Case "SM" > > 'Cleanup table > > DeleteRecords strProces > > > > '---------------------------------------- > > ' 150 Te verwerken ontvangen > stamgegevens > > '---------------------------------------- > > > > > '--------------------------------------------------------- > > 'MaxDate() > > > > > '--------------------------------------------------------- > > strSQL = vbNullString > > > > 'SQL statement to fetch most recent date > > strSQL = "SELECT Max([Bericht 150 (Update > Master > > Data)].Message_Date) AS MaxOfMessage_Date " & _ > > "FROM [Bericht 150 (Update Master > > Data)] " & _ > > "WHERE Connect_EAN =" & "'" & > > gstrSelectedEan & "' " > > > > strMeD = GetMaxDate(strSQL) > > If Len(strMeD) = 0 Then > > strMeD = "N/A" > > End If > > > > > '--------------------------------------------------------- > > 'Aantal Records > > > > > '--------------------------------------------------------- > > strSQL = vbNullString > > 'SQL statement to fetch most recent date > > strSQL = "SELECT COUNT(*) " & _ > > "FROM [Bericht 150 (Update Master > > Data)] " & _ > > "WHERE Connect_EAN =" & "'" & > > gstrSelectedEan & "' " > > > > strRecordcount = GetRecordCount(strSQL) > > > > 'Check if a date was returned > > If strRecordcount = vbNullString Then > > strRecordcount = "0" > > End If > > > > 'Create new record > > AddRecords strProces, "150", strMeD, > > strRecordcount > > > > '---------------------------------------- > > ' 210 Te verwerken ontvangen meetdata > > '---------------------------------------- > > > > > '--------------------------------------------------------- > > 'MaxDate() > > > > > '--------------------------------------------------------- > > strMeD = vbNullString > > strSQL = vbNullString > > 'SQL statement to fetch most recent date > > strSQL = "SELECT > Max(V2_210_MEDTD1.message_date) > > AS MaxOfmessage_date " & _ > > "FROM V2_210_MEDTD1 " & _ > > "WHERE Connect_EAN =" & "'" & > > gstrSelectedEan & "' " > > > > strMeD = GetMaxDate(strSQL) > > If Len(strMeD) = 0 Then > > strMeD = "N/A" > > End If > > > > > '--------------------------------------------------------- > > 'Aantal Records > > > > > '--------------------------------------------------------- > > strSQL = vbNullString > > 'SQL statement to fetch most recent date > > strSQL = "SELECT COUNT(*) " & _ > > "FROM V2_210_MEDTD1 " & _ > > "WHERE Connect_EAN =" & "'" & > > gstrSelectedEan & "' " > > > > strRecordcount = GetRecordCount(strSQL) > > > > 'Check if a date was returned > > If strRecordcount = vbNullString Then > > strRecordcount = "0" > > End If > > > > 'Create new record > > AddRecords strProces, "210", strMeD, > > strRecordcount > > Case Else > > MsgBox "UNKNOW PROCES!" > > End Select > > > > FillStamMeetProces_Exit: > > ' Collect your garbage here > > Exit Function > > FillStamMeetProces_Error: > > ' Collect your garbage here > > Call > > g_oGenErr.Throw("Switchdatabase.mMultiInterface", > > "FillStamMeetProces") > > End Function > > > > Function GetMaxDate(strSQL As String) As String > > 'Dim strSQL As String > > Dim conn As ADODB.Connection > > Dim rstBericht As ADODB.Recordset > > Dim strMaxDate As String > > > > Set conn = CurrentProject.Connection > > Set rstBericht = New ADODB.Recordset > > > > > > With rstBericht > > .ActiveConnection = conn > > .CursorType = adOpenKeyset > > .LockType = adLockReadOnly > > .Source = strSQL > > .Open > > If .RecordCount > 0 Then > > If IsNull(.Fields(0)) Then > > strMaxDate = vbNullString > > Else > > strMaxDate = .Fields(0) > > End If > > Else > > strMaxDate = vbNullString > > End If > > End With > > > === message truncated === __________________________________ Do you Yahoo!? Yahoo! SiteBuilder - Free web site building tool. Try it! http://webhosting.yahoo.com/ps/sb/ From Erwin.Craps at ithelps.be Thu Jan 22 04:16:30 2004 From: Erwin.Craps at ithelps.be (Erwin Craps - IT Helps) Date: Thu, 22 Jan 2004 11:16:30 +0100 Subject: [AccessD] Major Performance Issue! + Code + Time Message-ID: <46B976F2B698FF46A4FE7636509B22DF03D14C@stekelbes.ithelps.local> Hi Sad I don't seem to find the CI code so it's dificult to suggest you something. Altough 1 remark that I experianced in some heavy testing I done in Access 2K concerning the use of DAO or ADO. I see that u are using Access 2K with an MDB backend. First of all, use of ADO should be (future wise) be stimulated over DAO. However. In a pretty heavy app I have I had procedures that took 5 to 30 minutes to perform, and therefor I done some heavy testing with ADO/DAO to improve speed on these. My conclusings where that when using MSA2K and the jet database (MDB file) the use of ADO should be avoided or even compleetly ignored in time consuming or itteration functions. ADO is, when using, JET, much much slower than DAO in almost every case. I noticed that some simple function are by average 2 to 7 times slower. In some case they where 15 to 30 times slower. So using ADO with Jet is fine when you will not use the function in an itteration. For example your function GetMaxDate(). If this is used in an itteration x thousend of times, you will get high speed advantages when recoding the function with DAO or even a simple dlookup or dmax. Also putting indexes on the filter fiels of an sql string in a function used in itteration is ofcourse also important but this is beside the ADO/DAO issue. Please note for the record that the use of ADO should be motivated (certainly with SQL server as a backend) but ADO does have long delays compared with DAO in at least Access 2000. Did no testing in 2K2 or 2K2, so I don't know for these, but I expect it to be the same. I decided for my self not to use ADO as long as I work with JET (mdb backend files) (except when using ASP/ASPX) Erwin From accessd666 at yahoo.com Thu Jan 22 04:29:32 2004 From: accessd666 at yahoo.com (Sad Der) Date: Thu, 22 Jan 2004 02:29:32 -0800 (PST) Subject: [AccessD] Major Performance Issue! + Code + Time In-Reply-To: <46B976F2B698FF46A4FE7636509B22DF03D14C@stekelbes.ithelps.local> Message-ID: <20040122102932.67265.qmail@web60202.mail.yahoo.com> thnx, I'll try rebuilding it to DAO and then time it again. Sad --- Erwin Craps - IT Helps wrote: > Hi Sad > > I don't seem to find the CI code so it's dificult to > suggest you > something. > > Altough 1 remark that I experianced in some heavy > testing I done in > Access 2K concerning the use of DAO or ADO. I see > that u are using > Access 2K with an MDB backend. > > First of all, use of ADO should be (future wise) be > stimulated over DAO. > However. > In a pretty heavy app I have I had procedures that > took 5 to 30 minutes > to perform, and therefor I done some heavy testing > with ADO/DAO to > improve speed on these. > > My conclusings where that when using MSA2K and the > jet database (MDB > file) the use of ADO should be avoided or even > compleetly ignored in > time consuming or itteration functions. > ADO is, when using, JET, much much slower than DAO > in almost every case. > I noticed that some simple function are by average 2 > to 7 times slower. > In some case they where 15 to 30 times slower. > > So using ADO with Jet is fine when you will not use > the function in an > itteration. > For example your function GetMaxDate(). If this is > used in an itteration > x thousend of times, you will get high speed > advantages when recoding > the function with DAO or even a simple dlookup or > dmax. > Also putting indexes on the filter fiels of an sql > string in a function > used in itteration is ofcourse also important but > this is beside the > ADO/DAO issue. > > Please note for the record that the use of ADO > should be motivated > (certainly with SQL server as a backend) but ADO > does have long delays > compared with DAO in at least Access 2000. > Did no testing in 2K2 or 2K2, so I don't know for > these, but I expect it > to be the same. > I decided for my self not to use ADO as long as I > work with JET (mdb > backend files) (except when using ASP/ASPX) > > > > Erwin > > > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com __________________________________ Do you Yahoo!? Yahoo! SiteBuilder - Free web site building tool. Try it! http://webhosting.yahoo.com/ps/sb/ From Alun.Garraway at otto.de Thu Jan 22 05:12:56 2004 From: Alun.Garraway at otto.de (Garraway, Alun) Date: Thu, 22 Jan 2004 12:12:56 +0100 Subject: [AccessD] changing data from "Crosstab" to "Normal" tbl view? Message-ID: hi, I have a tbl that looks like a spreedsheet, the table looks like this: ART_NR W1 W2 W3 W4 .... W30 110 10 8 12 14 258 20 16 22 13 what I want to do is "normalize" the data like this: ART_NR WEEK ORDERS 110 1 10 110 2 8 110 3 12 110 4 14 258 1 20 258 2 16 etc is that possible (with sql), I can't think of anything :-( alun From andy at minstersystems.co.uk Thu Jan 22 06:27:59 2004 From: andy at minstersystems.co.uk (Andy Lacey) Date: Thu, 22 Jan 2004 12:27:59 -0000 Subject: [AccessD] Major Performance Issue! + Code + Time In-Reply-To: <20040122102932.67265.qmail@web60202.mail.yahoo.com> Message-ID: <008701c3e0e3$2bcae0e0$b274d0d5@minster33c3r25> Make sure you have indexes on the significant fields too. Andy Lacey http://www.minstersystems.co.uk > -----Original Message----- > From: accessd-bounces at databaseadvisors.com > [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Sad Der > Sent: 22 January 2004 10:30 > To: Access Developers discussion and problem solving > Subject: RE: [AccessD] Major Performance Issue! + Code + Time > > > thnx, > I'll try rebuilding it to DAO and then time it again. > > Sad > --- Erwin Craps - IT Helps > wrote: > > Hi Sad > > > > I don't seem to find the CI code so it's dificult to > > suggest you > > something. > > > > Altough 1 remark that I experianced in some heavy > > testing I done in > > Access 2K concerning the use of DAO or ADO. I see > > that u are using > > Access 2K with an MDB backend. > > > > First of all, use of ADO should be (future wise) be stimulated over > > DAO. However. > > In a pretty heavy app I have I had procedures that > > took 5 to 30 minutes > > to perform, and therefor I done some heavy testing > > with ADO/DAO to > > improve speed on these. > > > > My conclusings where that when using MSA2K and the > > jet database (MDB > > file) the use of ADO should be avoided or even > > compleetly ignored in > > time consuming or itteration functions. > > ADO is, when using, JET, much much slower than DAO > > in almost every case. > > I noticed that some simple function are by average 2 > > to 7 times slower. > > In some case they where 15 to 30 times slower. > > > > So using ADO with Jet is fine when you will not use > > the function in an > > itteration. > > For example your function GetMaxDate(). If this is > > used in an itteration > > x thousend of times, you will get high speed > > advantages when recoding > > the function with DAO or even a simple dlookup or > > dmax. > > Also putting indexes on the filter fiels of an sql > > string in a function > > used in itteration is ofcourse also important but > > this is beside the > > ADO/DAO issue. > > > > Please note for the record that the use of ADO > > should be motivated > > (certainly with SQL server as a backend) but ADO > > does have long delays > > compared with DAO in at least Access 2000. > > Did no testing in 2K2 or 2K2, so I don't know for > > these, but I expect it > > to be the same. > > I decided for my self not to use ADO as long as I > > work with JET (mdb > > backend files) (except when using ASP/ASPX) > > > > > > > > Erwin > > > > > > _______________________________________________ > > AccessD mailing list > > AccessD at databaseadvisors.com > > http://databaseadvisors.com/mailman/listinfo/accessd > > Website: http://www.databaseadvisors.com > > > __________________________________ > Do you Yahoo!? > Yahoo! SiteBuilder - Free web site building tool. Try it! http://webhosting.yahoo.com/ps/sb/ _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From Developer at UltraDNT.com Thu Jan 22 07:37:01 2004 From: Developer at UltraDNT.com (Developer) Date: Thu, 22 Jan 2004 08:37:01 -0500 Subject: [AccessD] Worldwide Media exchange or is this a Schuss Boomer? In-Reply-To: <400F747F.6000403@shaw.ca> Message-ID: <000901c3e0ec$d1070df0$7001a8c0@COA3> Schuss boomer? -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of MartyConnelly Sent: Thursday, January 22, 2004 1:58 AM To: Access Developers discussion and problem solving Subject: [AccessD] Worldwide Media exchange or is this a Schuss Boomer? http://wwmx.org/FullMediaView.aspx?mediaid=29423 mainsite http://wwmx.org/WebClient.aspx Here is a interesting new use of GPS and Images via ASP.net from Microsoft Research. Free download of api and net client For all surveillance lovers: microsoft research ask people from all over the world to send in photos and the location data, where the photos were shot. they hope to collect "gazillions" of photos and make a visual map of the whole world... -- Marty Connelly Victoria, B.C. Canada _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From serbach at new.rr.com Thu Jan 22 07:54:09 2004 From: serbach at new.rr.com (Steven W. Erbach) Date: Thu, 22 Jan 2004 07:54:09 -0600 Subject: [AccessD] A2K: Something new Message-ID: <20040122075409.551708087.serbach@new.rr.com> Dear Group, You think you've seen it all, when all of a sudden... I've taken over development and support of a domestic violence shelter statistics program. In my efforts to re-factor (how's that for an Extreme Programming term?) some of the data entry forms I've run into something odd. One of the main data entry forms (key field ChildID) has a subform which contains a Tab object. Each of the tabs on this subform contains a sub-subform. While getting familiar with the workings of the program I noticed that one of the sub-subforms did not have the proper linking fields set up. The subform's linking field is that same ChildID...but the RecordSource table for the subform is NOT keyed! The sub-subform in question also has only ChildID as the linking field...but the key field for the sub-subform's table is FreeFormID. ChildID is a foreign key in that table. The behavior I'm seeing is this: when I go to check the linking fields in the subform I noticed that the VB window's title bar shows the following: Microsoft Visual Basic - STATISTICS [running] After a moment I see the Subform Field Linker dialog box. While the dialog box is on-screen the title bar of the VB window shows [running]. When I close the dialog box the VB window flashes and [running] disappears from the title bar. But when I go to check the linking fields for the sub-subform in question, [running] appears once again in the VB title bar, but then I see a Microsoft Access dialog box with the following message and OK button: Object variable or With block variable not set ...as if the application was trying to start itself! I can't get at the Subform Field Linker dialog box at all. When I click OK on the dialog box the VB window flashes and [running] disappears from the title bar. So I tried deleting the sub-subform and placing it on the tab page again. When I've finished using the subform tool to place the object on the tab page, I get another dialog box labeled "StatsTracker" (the name of the application): Your code contains a syntax error, or a Stats Tracker function you need isn't available. If the syntax is correct, check the Control Wizards subkey or the Libraries key in the StatsTracker section of the Windows Registry to verify that the entries you need are listed and available. I click OK and I see the subform object on the tab page. I can assign the Source Object property, but when I go to Link Master Fields I get the "Object variable or With block variable not set" message. Can any of you figure out what's happening to me here? Thank you. Regards, Steve Erbach Scientific Marketing Neenah, WI 920-969-0504 Message created with Bloomba Disclaimer: No tree was killed in the transmission of this message. However, several coulombs of electrons were temporarily inconvenienced. From jwcolby at colbyconsulting.com Thu Jan 22 08:50:43 2004 From: jwcolby at colbyconsulting.com (John W. Colby) Date: Thu, 22 Jan 2004 09:50:43 -0500 Subject: [AccessD] Major Performance Issue! + Code In-Reply-To: <007801c3e0c6$8540f8c0$b274d0d5@minster33c3r25> Message-ID: Andy, I don't mind at all sharing my demos. However I have also placed a copy of this timer in a demo, on my site under Misc Demos / C2DbTimerClass. John W. Colby www.ColbyConsulting.com -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Andy Lacey Sent: Thursday, January 22, 2004 4:03 AM To: 'Access Developers discussion and problem solving' Subject: RE: [AccessD] Major Performance Issue! + Code Sander The first thing I suggest you do is put timing code in to isolate where you have performance issue(s). If you don't already have something I can send you a copy of JC's timer class (I'm sure he won't mind). There's no point aiming attention at one routine only to find that it represented 0.01% of the overall time. So, first up, find the lines of code which are doing the damage. Andy Lacey http://www.minstersystems.co.uk > -----Original Message----- > From: accessd-bounces at databaseadvisors.com > [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Sad Der > Sent: 22 January 2004 06:26 > To: Access Developers discussion and problem solving > Subject: RE: [AccessD] Major Performance Issue! + Code > > > Here is (part of) the code: > PS: I found the GetMaxDate() function, I think on wolfwares.com! > > '============================================================= > ============================ > ' Function Name : FillStamMeetProces > ' Parameters : No parameters > ' Return value : (String) > ' Purpose : > ' Assumptions : --- > ' Uses : --- > ' Created : 2003-10-24 10:12, SaDe > ' Modifications : > '============================================================= > ============================ > Function FillStamMeetProces(strProces As String) As > String > '150 StamMeetData > '210 StamMeetData > Dim strMeD As String 'Message_date > Dim strSQL As String > Dim strRecordcount As String > > On Error GoTo FillStamMeetProces_Error > Select Case strProces > Case "SM" > 'Cleanup table > DeleteRecords strProces > > '---------------------------------------- > ' 150 Te verwerken ontvangen stamgegevens > '---------------------------------------- > > '--------------------------------------------------------- > 'MaxDate() > > '--------------------------------------------------------- > strSQL = vbNullString > > 'SQL statement to fetch most recent date > strSQL = "SELECT Max([Bericht 150 (Update Master > Data)].Message_Date) AS MaxOfMessage_Date " & _ > "FROM [Bericht 150 (Update Master > Data)] " & _ > "WHERE Connect_EAN =" & "'" & > gstrSelectedEan & "' " > > strMeD = GetMaxDate(strSQL) > If Len(strMeD) = 0 Then > strMeD = "N/A" > End If > > '--------------------------------------------------------- > 'Aantal Records > > '--------------------------------------------------------- > strSQL = vbNullString > 'SQL statement to fetch most recent date > strSQL = "SELECT COUNT(*) " & _ > "FROM [Bericht 150 (Update Master > Data)] " & _ > "WHERE Connect_EAN =" & "'" & > gstrSelectedEan & "' " > > strRecordcount = GetRecordCount(strSQL) > > 'Check if a date was returned > If strRecordcount = vbNullString Then > strRecordcount = "0" > End If > > 'Create new record > AddRecords strProces, "150", strMeD, > strRecordcount > > '---------------------------------------- > ' 210 Te verwerken ontvangen meetdata > '---------------------------------------- > > '--------------------------------------------------------- > 'MaxDate() > > '--------------------------------------------------------- > strMeD = vbNullString > strSQL = vbNullString > 'SQL statement to fetch most recent date > strSQL = "SELECT Max(V2_210_MEDTD1.message_date) > AS MaxOfmessage_date " & _ > "FROM V2_210_MEDTD1 " & _ > "WHERE Connect_EAN =" & "'" & > gstrSelectedEan & "' " > > strMeD = GetMaxDate(strSQL) > If Len(strMeD) = 0 Then > strMeD = "N/A" > End If > > '--------------------------------------------------------- > 'Aantal Records > > '--------------------------------------------------------- > strSQL = vbNullString > 'SQL statement to fetch most recent date > strSQL = "SELECT COUNT(*) " & _ > "FROM V2_210_MEDTD1 " & _ > "WHERE Connect_EAN =" & "'" & > gstrSelectedEan & "' " > > strRecordcount = GetRecordCount(strSQL) > > 'Check if a date was returned > If strRecordcount = vbNullString Then > strRecordcount = "0" > End If > > 'Create new record > AddRecords strProces, "210", strMeD, > strRecordcount > Case Else > MsgBox "UNKNOW PROCES!" > End Select > > FillStamMeetProces_Exit: > ' Collect your garbage here > Exit Function > FillStamMeetProces_Error: > ' Collect your garbage here > Call > g_oGenErr.Throw("Switchdatabase.mMultiInterface", > "FillStamMeetProces") > End Function > > Function GetMaxDate(strSQL As String) As String > 'Dim strSQL As String > Dim conn As ADODB.Connection > Dim rstBericht As ADODB.Recordset > Dim strMaxDate As String > > Set conn = CurrentProject.Connection > Set rstBericht = New ADODB.Recordset > > > With rstBericht > .ActiveConnection = conn > .CursorType = adOpenKeyset > .LockType = adLockReadOnly > .Source = strSQL > .Open > If .RecordCount > 0 Then > If IsNull(.Fields(0)) Then > strMaxDate = vbNullString > Else > strMaxDate = .Fields(0) > End If > Else > strMaxDate = vbNullString > End If > End With > > 'Return value > GetMaxDate = strMaxDate > > Set rstBericht = Nothing > End Function > > > '============================================================= > ============================ > ' Function Name : AddRecords > ' Parameters : strProces As String > ' strBericht As String > ' strDatum As String > ' strAantal As String > ' Return value : (Boolean) > ' Purpose : Inserts records into > tblMultiInterface. This table is used to display > detail > ' information regarding the > switch, verhuis, stam & meetdata and contract > ' processes > ' Assumptions : --- > ' Uses : --- > ' Created : 2003-10-21 09:00, SaDe > ' Modifications : > '============================================================= > ============================ > Function AddRecords(strProces As String, strBericht As > String, strDatum As String, strAantal As String) As > Boolean > Dim strSQL As String > > On Error GoTo AddRecords_Error > strSQL = "INSERT INTO tblMultiInterface VALUES (""" > & strProces & """,""" & strBericht & """,""" & > strDatum & """,""" & strAantal & """ )" > DoCmd.RunSQL strSQL > > AddRecords_Exit: > ' Collect your garbage here > Exit Function > AddRecords_Error: > ' Collect your garbage here > Call > g_oGenErr.Throw("Switchdatabase.Form_fMultiInterface", > "AddRecords") > > End Function > > --- Andy Lacey wrote: > > Sander > > Rather than attaching the code try pasting it into > > the email. Shouldn't be a > > size issue then, unless, of course, there's miles of > > it! I don't know about > > anyone else but I certainly would get a clearer > > picture of what you're doing > > by seeing the code. Can't really get a handle on it > > yet. > > > > Andy Lacey > > http://www.minstersystems.co.uk > > > > > -----Original Message----- > > > From: accessd-bounces at databaseadvisors.com > > > [mailto:accessd-bounces at databaseadvisors.com] On > > Behalf Of Sad Der > > > Sent: 21 January 2004 08:40 > > > To: Acces User Group > > > Subject: [AccessD] Major Performance Issue! > > > > > > > > > Hi group, > > > > > > I've got a MAJOR performance issue. I need to > > display > > > a lot of data. A performance test showed that it > > takes > > > between 120 - 160 seconds (2 minutes - 2.40 > > minutes) > > > to display the data! I have no idea how to speed > > > things up dramaticly. I really could use some > > tips. > > > > > > Here's a description of the current environment: > > > Access 2000 Client (size: 20 Mb) > > > Access 2000 Back-end (size: 100 Mb) > > > approx 4 users > > > Novel network > > > > > > Functionality: > > > I need to display 4 listbox' with data. > > > > > > Every listbox has the same table as source. > > > Every listbox has a query as RowSource > > > Every listbox has this layout: > > > > > > Proces Type | Date | # Records > > > > > > Listbox 1 displays 4 records > > > Listbox 2 displays 2 records > > > Listbox 3 displays 6 records > > > Listbox 4 displays 3 records > > > > > > So the table (tblMultiInterface) has 15 records in > > > total. > > > > > > Table tblMultiInterface > > > Fields: > > > Proces Type Text > > > Date Text (!) > > > Records Text (!) (zero records need to > > display > > > N/A) > > > > > > I added the code as an attachment but unfortunatly > > > this mail was blocked! If anybody would like to > > take a > > > look at the code I can send it to you directly. > > > > > > Comments/tips/etc would be GREATLY appriciated! > > > > > > TIA > > > Sad > > > > > > > > > __________________________________ > > > Do you Yahoo!? > > > Yahoo! Hotjobs: Enter the "Signing Bonus" > > Sweepstakes > > > http://hotjobs.sweepstakes.yahoo.com/signingbo> > > nus > > > > > > _______________________________________________ > > > AccessD > > > mailing list > > > AccessD at databaseadvisors.com > > > http://databaseadvisors.com/mailman/listinfo/a> > > ccessd > > > Website: > > > http://www.databaseadvisors.com > > > > > > > > > > _______________________________________________ > > AccessD mailing list > > AccessD at databaseadvisors.com > > http://databaseadvisors.com/mailman/listinfo/accessd > > Website: http://www.databaseadvisors.com > > > __________________________________ > Do you Yahoo!? > Yahoo! SiteBuilder - Free web site building tool. Try it! http://webhosting.yahoo.com/ps/sb/ _______________________________________________ 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 From andy at minstersystems.co.uk Thu Jan 22 09:03:15 2004 From: andy at minstersystems.co.uk (Andy Lacey) Date: Thu, 22 Jan 2004 15:03:15 -0000 Subject: [AccessD] Major Performance Issue! + Code In-Reply-To: Message-ID: <00be01c3e0f8$dcf0ddb0$b274d0d5@minster33c3r25> I did look John. Did I miss it or have you only just done that? Either way I really hope you don't mind. I did hesitate but as I'd got it from you I was sure it'd be ok. As it happends Sander hasn't asked for it. Andy Lacey http://www.minstersystems.co.uk > -----Original Message----- > From: accessd-bounces at databaseadvisors.com > [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of > John W. Colby > Sent: 22 January 2004 14:51 > To: Access Developers discussion and problem solving > Subject: RE: [AccessD] Major Performance Issue! + Code > > > Andy, > > I don't mind at all sharing my demos. However I have also > placed a copy of this timer in a demo, on my site under Misc > Demos / C2DbTimerClass. > > John W. Colby > www.ColbyConsulting.com > > -----Original Message----- > From: accessd-bounces at databaseadvisors.com > [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Andy Lacey > Sent: Thursday, January 22, 2004 4:03 AM > To: 'Access Developers discussion and problem solving' > Subject: RE: [AccessD] Major Performance Issue! + Code > > > Sander > The first thing I suggest you do is put timing code in to > isolate where you have performance issue(s). If you don't > already have something I can send you a copy of JC's timer > class (I'm sure he won't mind). There's no point aiming > attention at one routine only to find that it represented > 0.01% of the overall time. So, first up, find the lines of > code which are doing the damage. > > Andy Lacey > http://www.minstersystems.co.uk > > > -----Original Message----- > > From: accessd-bounces at databaseadvisors.com > > [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Sad Der > > Sent: 22 January 2004 06:26 > > To: Access Developers discussion and problem solving > > Subject: RE: [AccessD] Major Performance Issue! + Code > > > > > > Here is (part of) the code: > > PS: I found the GetMaxDate() function, I think on wolfwares.com! > > > > '============================================================= > > ============================ > > ' Function Name : FillStamMeetProces > > ' Parameters : No parameters > > ' Return value : (String) > > ' Purpose : > > ' Assumptions : --- > > ' Uses : --- > > ' Created : 2003-10-24 10:12, SaDe > > ' Modifications : > > '============================================================= > > ============================ > > Function FillStamMeetProces(strProces As String) As > > String > > '150 StamMeetData > > '210 StamMeetData > > Dim strMeD As String 'Message_date > > Dim strSQL As String > > Dim strRecordcount As String > > > > On Error GoTo FillStamMeetProces_Error > > Select Case strProces > > Case "SM" > > 'Cleanup table > > DeleteRecords strProces > > > > '---------------------------------------- > > ' 150 Te verwerken ontvangen stamgegevens > > '---------------------------------------- > > > > '--------------------------------------------------------- > > 'MaxDate() > > > > '--------------------------------------------------------- > > strSQL = vbNullString > > > > 'SQL statement to fetch most recent date > > strSQL = "SELECT Max([Bericht 150 (Update Master > > Data)].Message_Date) AS MaxOfMessage_Date " & _ > > "FROM [Bericht 150 (Update Master > > Data)] " & _ > > "WHERE Connect_EAN =" & "'" & > > gstrSelectedEan & "' " > > > > strMeD = GetMaxDate(strSQL) > > If Len(strMeD) = 0 Then > > strMeD = "N/A" > > End If > > > > '--------------------------------------------------------- > > 'Aantal Records > > > > '--------------------------------------------------------- > > strSQL = vbNullString > > 'SQL statement to fetch most recent date > > strSQL = "SELECT COUNT(*) " & _ > > "FROM [Bericht 150 (Update Master > > Data)] " & _ > > "WHERE Connect_EAN =" & "'" & > > gstrSelectedEan & "' " > > > > strRecordcount = GetRecordCount(strSQL) > > > > 'Check if a date was returned > > If strRecordcount = vbNullString Then > > strRecordcount = "0" > > End If > > > > 'Create new record > > AddRecords strProces, "150", strMeD, > > strRecordcount > > > > '---------------------------------------- > > ' 210 Te verwerken ontvangen meetdata > > '---------------------------------------- > > > > '--------------------------------------------------------- > > 'MaxDate() > > > > '--------------------------------------------------------- > > strMeD = vbNullString > > strSQL = vbNullString > > 'SQL statement to fetch most recent date > > strSQL = "SELECT Max(V2_210_MEDTD1.message_date) > > AS MaxOfmessage_date " & _ > > "FROM V2_210_MEDTD1 " & _ > > "WHERE Connect_EAN =" & "'" & > > gstrSelectedEan & "' " > > > > strMeD = GetMaxDate(strSQL) > > If Len(strMeD) = 0 Then > > strMeD = "N/A" > > End If > > > > '--------------------------------------------------------- > > 'Aantal Records > > > > '--------------------------------------------------------- > > strSQL = vbNullString > > 'SQL statement to fetch most recent date > > strSQL = "SELECT COUNT(*) " & _ > > "FROM V2_210_MEDTD1 " & _ > > "WHERE Connect_EAN =" & "'" & > > gstrSelectedEan & "' " > > > > strRecordcount = GetRecordCount(strSQL) > > > > 'Check if a date was returned > > If strRecordcount = vbNullString Then > > strRecordcount = "0" > > End If > > > > 'Create new record > > AddRecords strProces, "210", strMeD, > > strRecordcount > > Case Else > > MsgBox "UNKNOW PROCES!" > > End Select > > > > FillStamMeetProces_Exit: > > ' Collect your garbage here > > Exit Function > > FillStamMeetProces_Error: > > ' Collect your garbage here > > Call > > g_oGenErr.Throw("Switchdatabase.mMultiInterface", > > "FillStamMeetProces") > > End Function > > > > Function GetMaxDate(strSQL As String) As String > > 'Dim strSQL As String > > Dim conn As ADODB.Connection > > Dim rstBericht As ADODB.Recordset > > Dim strMaxDate As String > > > > Set conn = CurrentProject.Connection > > Set rstBericht = New ADODB.Recordset > > > > > > With rstBericht > > .ActiveConnection = conn > > .CursorType = adOpenKeyset > > .LockType = adLockReadOnly > > .Source = strSQL > > .Open > > If .RecordCount > 0 Then > > If IsNull(.Fields(0)) Then > > strMaxDate = vbNullString > > Else > > strMaxDate = .Fields(0) > > End If > > Else > > strMaxDate = vbNullString > > End If > > End With > > > > 'Return value > > GetMaxDate = strMaxDate > > > > Set rstBericht = Nothing > > End Function > > > > > > '============================================================= > > ============================ > > ' Function Name : AddRecords > > ' Parameters : strProces As String > > ' strBericht As String > > ' strDatum As String > > ' strAantal As String > > ' Return value : (Boolean) > > ' Purpose : Inserts records into > > tblMultiInterface. This table is used to display > > detail > > ' information regarding the > > switch, verhuis, stam & meetdata and contract > > ' processes > > ' Assumptions : --- > > ' Uses : --- > > ' Created : 2003-10-21 09:00, SaDe > > ' Modifications : > > '============================================================= > > ============================ > > Function AddRecords(strProces As String, strBericht As String, > > strDatum As String, strAantal As String) As Boolean > > Dim strSQL As String > > > > On Error GoTo AddRecords_Error > > strSQL = "INSERT INTO tblMultiInterface VALUES (""" > > & strProces & """,""" & strBericht & """,""" & > > strDatum & """,""" & strAantal & """ )" > > DoCmd.RunSQL strSQL > > > > AddRecords_Exit: > > ' Collect your garbage here > > Exit Function > > AddRecords_Error: > > ' Collect your garbage here > > Call g_oGenErr.Throw("Switchdatabase.Form_fMultiInterface", > > "AddRecords") > > > > End Function > > > > --- Andy Lacey wrote: > > > Sander > > > Rather than attaching the code try pasting it into > > > the email. Shouldn't be a > > > size issue then, unless, of course, there's miles of > > > it! I don't know about > > > anyone else but I certainly would get a clearer > > > picture of what you're doing > > > by seeing the code. Can't really get a handle on it > > > yet. > > > > > > Andy Lacey > > > http://www.minstersystems.co.uk > > > > > > > -----Original Message----- > > > > From: accessd-bounces at databaseadvisors.com > > > > [mailto:accessd-bounces at databaseadvisors.com] On > > > Behalf Of Sad Der > > > > Sent: 21 January 2004 08:40 > > > > To: Acces User Group > > > > Subject: [AccessD] Major Performance Issue! > > > > > > > > > > > > Hi group, > > > > > > > > I've got a MAJOR performance issue. I need to > > > display > > > > a lot of data. A performance test showed that it > > > takes > > > > between 120 - 160 seconds (2 minutes - 2.40 > > > minutes) > > > > to display the data! I have no idea how to speed > > > > things up dramaticly. I really could use some > > > tips. > > > > > > > > Here's a description of the current environment: > > > > Access 2000 Client (size: 20 Mb) > > > > Access 2000 Back-end (size: 100 Mb) > > > > approx 4 users > > > > Novel network > > > > > > > > Functionality: > > > > I need to display 4 listbox' with data. > > > > > > > > Every listbox has the same table as source. > > > > Every listbox has a query as RowSource > > > > Every listbox has this layout: > > > > > > > > Proces Type | Date | # Records > > > > > > > > Listbox 1 displays 4 records > > > > Listbox 2 displays 2 records > > > > Listbox 3 displays 6 records > > > > Listbox 4 displays 3 records > > > > > > > > So the table (tblMultiInterface) has 15 records in > > > > total. > > > > > > > > Table tblMultiInterface > > > > Fields: > > > > Proces Type Text > > > > Date Text (!) > > > > Records Text (!) (zero records need to > > > display > > > > N/A) > > > > > > > > I added the code as an attachment but unfortunatly > > > > this mail was blocked! If anybody would like to > > > take a > > > > look at the code I can send it to you directly. > > > > > > > > Comments/tips/etc would be GREATLY appriciated! > > > > > > > > TIA > > > > Sad > > > > > > > > > > > > __________________________________ > > > > Do you Yahoo!? > > > > Yahoo! Hotjobs: Enter the "Signing Bonus" > > > Sweepstakes > > > > http://hotjobs.sweepstakes.yahoo.com/signingbo> > > > nus > > > > > > > > _______________________________________________ > > > > AccessD > > > > mailing list > > > > AccessD at databaseadvisors.com > > > > http://databaseadvisors.com/mailman/listinfo/a> > > > ccessd > > > > Website: > > > > http://www.databaseadvisors.com > > > > > > > > > > > > > > _______________________________________________ > > > AccessD mailing list > > > AccessD at databaseadvisors.com > > > http://databaseadvisors.com/mailman/listinfo/accessd > > > Website: http://www.databaseadvisors.com > > > > > > __________________________________ > > Do you Yahoo!? > > Yahoo! SiteBuilder - Free web site building tool. Try it! > http://webhosting.yahoo.com/ps/sb/ > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/a> ccessd > Website: > http://www.databaseadvisors.com > > > > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/a> ccessd > Website: > http://www.databaseadvisors.com > > > > > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/a> ccessd > Website: > http://www.databaseadvisors.com > > From mark at theopg.com Thu Jan 22 09:09:58 2004 From: mark at theopg.com (Mark H) Date: Thu, 22 Jan 2004 15:09:58 -0000 Subject: [AccessD] [OT Slightly] Access XP to Word using ADO results in toolbars being turned off in word In-Reply-To: Message-ID: <001801c3e0f9$ccc4bd70$330d6bd5@netboxxp> Hello All... Using Office XP and ADO I have a report which is generated from an Access database into a Word document. The word doc uses ADO to collect the report data from report data tables in the mdb, writes it out, saves it to a new document and then closes leaving the user looking at a new copy of the report (less the modules). I use the same template for Word 97 and XP. In XP, if I prompt the user to save the report when its created (using Dialogs(wdDialogFileSaveAs)), or even save it without prompting (using activedocument.saveas), they are left looking at the report but all toolbars are hidden... !?! And I can't see how to turn them back on... In office 97 everything works fine. Any ideas much appreciated... Cheers Mark From jwcolby at colbyconsulting.com Thu Jan 22 09:14:18 2004 From: jwcolby at colbyconsulting.com (John W. Colby) Date: Thu, 22 Jan 2004 10:14:18 -0500 Subject: [AccessD] Major Performance Issue! + Code In-Reply-To: <00be01c3e0f8$dcf0ddb0$b274d0d5@minster33c3r25> Message-ID: I just put it up 10 minutes ago. And I really don't mind at all. All of the demos I do are designed to help our list members to learn neat stuff and do their jobs better. John W. Colby www.ColbyConsulting.com -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Andy Lacey Sent: Thursday, January 22, 2004 10:03 AM To: 'Access Developers discussion and problem solving' Subject: RE: [AccessD] Major Performance Issue! + Code I did look John. Did I miss it or have you only just done that? Either way I really hope you don't mind. I did hesitate but as I'd got it from you I was sure it'd be ok. As it happends Sander hasn't asked for it. Andy Lacey http://www.minstersystems.co.uk > -----Original Message----- > From: accessd-bounces at databaseadvisors.com > [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of > John W. Colby > Sent: 22 January 2004 14:51 > To: Access Developers discussion and problem solving > Subject: RE: [AccessD] Major Performance Issue! + Code > > > Andy, > > I don't mind at all sharing my demos. However I have also > placed a copy of this timer in a demo, on my site under Misc > Demos / C2DbTimerClass. > > John W. Colby > www.ColbyConsulting.com > > -----Original Message----- > From: accessd-bounces at databaseadvisors.com > [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Andy Lacey > Sent: Thursday, January 22, 2004 4:03 AM > To: 'Access Developers discussion and problem solving' > Subject: RE: [AccessD] Major Performance Issue! + Code > > > Sander > The first thing I suggest you do is put timing code in to > isolate where you have performance issue(s). If you don't > already have something I can send you a copy of JC's timer > class (I'm sure he won't mind). There's no point aiming > attention at one routine only to find that it represented > 0.01% of the overall time. So, first up, find the lines of > code which are doing the damage. > > Andy Lacey > http://www.minstersystems.co.uk > > > -----Original Message----- > > From: accessd-bounces at databaseadvisors.com > > [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Sad Der > > Sent: 22 January 2004 06:26 > > To: Access Developers discussion and problem solving > > Subject: RE: [AccessD] Major Performance Issue! + Code > > > > > > Here is (part of) the code: > > PS: I found the GetMaxDate() function, I think on wolfwares.com! > > > > '============================================================= > > ============================ > > ' Function Name : FillStamMeetProces > > ' Parameters : No parameters > > ' Return value : (String) > > ' Purpose : > > ' Assumptions : --- > > ' Uses : --- > > ' Created : 2003-10-24 10:12, SaDe > > ' Modifications : > > '============================================================= > > ============================ > > Function FillStamMeetProces(strProces As String) As > > String > > '150 StamMeetData > > '210 StamMeetData > > Dim strMeD As String 'Message_date > > Dim strSQL As String > > Dim strRecordcount As String > > > > On Error GoTo FillStamMeetProces_Error > > Select Case strProces > > Case "SM" > > 'Cleanup table > > DeleteRecords strProces > > > > '---------------------------------------- > > ' 150 Te verwerken ontvangen stamgegevens > > '---------------------------------------- > > > > '--------------------------------------------------------- > > 'MaxDate() > > > > '--------------------------------------------------------- > > strSQL = vbNullString > > > > 'SQL statement to fetch most recent date > > strSQL = "SELECT Max([Bericht 150 (Update Master > > Data)].Message_Date) AS MaxOfMessage_Date " & _ > > "FROM [Bericht 150 (Update Master > > Data)] " & _ > > "WHERE Connect_EAN =" & "'" & > > gstrSelectedEan & "' " > > > > strMeD = GetMaxDate(strSQL) > > If Len(strMeD) = 0 Then > > strMeD = "N/A" > > End If > > > > '--------------------------------------------------------- > > 'Aantal Records > > > > '--------------------------------------------------------- > > strSQL = vbNullString > > 'SQL statement to fetch most recent date > > strSQL = "SELECT COUNT(*) " & _ > > "FROM [Bericht 150 (Update Master > > Data)] " & _ > > "WHERE Connect_EAN =" & "'" & > > gstrSelectedEan & "' " > > > > strRecordcount = GetRecordCount(strSQL) > > > > 'Check if a date was returned > > If strRecordcount = vbNullString Then > > strRecordcount = "0" > > End If > > > > 'Create new record > > AddRecords strProces, "150", strMeD, > > strRecordcount > > > > '---------------------------------------- > > ' 210 Te verwerken ontvangen meetdata > > '---------------------------------------- > > > > '--------------------------------------------------------- > > 'MaxDate() > > > > '--------------------------------------------------------- > > strMeD = vbNullString > > strSQL = vbNullString > > 'SQL statement to fetch most recent date > > strSQL = "SELECT Max(V2_210_MEDTD1.message_date) > > AS MaxOfmessage_date " & _ > > "FROM V2_210_MEDTD1 " & _ > > "WHERE Connect_EAN =" & "'" & > > gstrSelectedEan & "' " > > > > strMeD = GetMaxDate(strSQL) > > If Len(strMeD) = 0 Then > > strMeD = "N/A" > > End If > > > > '--------------------------------------------------------- > > 'Aantal Records > > > > '--------------------------------------------------------- > > strSQL = vbNullString > > 'SQL statement to fetch most recent date > > strSQL = "SELECT COUNT(*) " & _ > > "FROM V2_210_MEDTD1 " & _ > > "WHERE Connect_EAN =" & "'" & > > gstrSelectedEan & "' " > > > > strRecordcount = GetRecordCount(strSQL) > > > > 'Check if a date was returned > > If strRecordcount = vbNullString Then > > strRecordcount = "0" > > End If > > > > 'Create new record > > AddRecords strProces, "210", strMeD, > > strRecordcount > > Case Else > > MsgBox "UNKNOW PROCES!" > > End Select > > > > FillStamMeetProces_Exit: > > ' Collect your garbage here > > Exit Function > > FillStamMeetProces_Error: > > ' Collect your garbage here > > Call > > g_oGenErr.Throw("Switchdatabase.mMultiInterface", > > "FillStamMeetProces") > > End Function > > > > Function GetMaxDate(strSQL As String) As String > > 'Dim strSQL As String > > Dim conn As ADODB.Connection > > Dim rstBericht As ADODB.Recordset > > Dim strMaxDate As String > > > > Set conn = CurrentProject.Connection > > Set rstBericht = New ADODB.Recordset > > > > > > With rstBericht > > .ActiveConnection = conn > > .CursorType = adOpenKeyset > > .LockType = adLockReadOnly > > .Source = strSQL > > .Open > > If .RecordCount > 0 Then > > If IsNull(.Fields(0)) Then > > strMaxDate = vbNullString > > Else > > strMaxDate = .Fields(0) > > End If > > Else > > strMaxDate = vbNullString > > End If > > End With > > > > 'Return value > > GetMaxDate = strMaxDate > > > > Set rstBericht = Nothing > > End Function > > > > > > '============================================================= > > ============================ > > ' Function Name : AddRecords > > ' Parameters : strProces As String > > ' strBericht As String > > ' strDatum As String > > ' strAantal As String > > ' Return value : (Boolean) > > ' Purpose : Inserts records into > > tblMultiInterface. This table is used to display > > detail > > ' information regarding the > > switch, verhuis, stam & meetdata and contract > > ' processes > > ' Assumptions : --- > > ' Uses : --- > > ' Created : 2003-10-21 09:00, SaDe > > ' Modifications : > > '============================================================= > > ============================ > > Function AddRecords(strProces As String, strBericht As String, > > strDatum As String, strAantal As String) As Boolean > > Dim strSQL As String > > > > On Error GoTo AddRecords_Error > > strSQL = "INSERT INTO tblMultiInterface VALUES (""" > > & strProces & """,""" & strBericht & """,""" & > > strDatum & """,""" & strAantal & """ )" > > DoCmd.RunSQL strSQL > > > > AddRecords_Exit: > > ' Collect your garbage here > > Exit Function > > AddRecords_Error: > > ' Collect your garbage here > > Call g_oGenErr.Throw("Switchdatabase.Form_fMultiInterface", > > "AddRecords") > > > > End Function > > > > --- Andy Lacey wrote: > > > Sander > > > Rather than attaching the code try pasting it into > > > the email. Shouldn't be a > > > size issue then, unless, of course, there's miles of > > > it! I don't know about > > > anyone else but I certainly would get a clearer > > > picture of what you're doing > > > by seeing the code. Can't really get a handle on it > > > yet. > > > > > > Andy Lacey > > > http://www.minstersystems.co.uk > > > > > > > -----Original Message----- > > > > From: accessd-bounces at databaseadvisors.com > > > > [mailto:accessd-bounces at databaseadvisors.com] On > > > Behalf Of Sad Der > > > > Sent: 21 January 2004 08:40 > > > > To: Acces User Group > > > > Subject: [AccessD] Major Performance Issue! > > > > > > > > > > > > Hi group, > > > > > > > > I've got a MAJOR performance issue. I need to > > > display > > > > a lot of data. A performance test showed that it > > > takes > > > > between 120 - 160 seconds (2 minutes - 2.40 > > > minutes) > > > > to display the data! I have no idea how to speed > > > > things up dramaticly. I really could use some > > > tips. > > > > > > > > Here's a description of the current environment: > > > > Access 2000 Client (size: 20 Mb) > > > > Access 2000 Back-end (size: 100 Mb) > > > > approx 4 users > > > > Novel network > > > > > > > > Functionality: > > > > I need to display 4 listbox' with data. > > > > > > > > Every listbox has the same table as source. > > > > Every listbox has a query as RowSource > > > > Every listbox has this layout: > > > > > > > > Proces Type | Date | # Records > > > > > > > > Listbox 1 displays 4 records > > > > Listbox 2 displays 2 records > > > > Listbox 3 displays 6 records > > > > Listbox 4 displays 3 records > > > > > > > > So the table (tblMultiInterface) has 15 records in > > > > total. > > > > > > > > Table tblMultiInterface > > > > Fields: > > > > Proces Type Text > > > > Date Text (!) > > > > Records Text (!) (zero records need to > > > display > > > > N/A) > > > > > > > > I added the code as an attachment but unfortunatly > > > > this mail was blocked! If anybody would like to > > > take a > > > > look at the code I can send it to you directly. > > > > > > > > Comments/tips/etc would be GREATLY appriciated! > > > > > > > > TIA > > > > Sad > > > > > > > > > > > > __________________________________ > > > > Do you Yahoo!? > > > > Yahoo! Hotjobs: Enter the "Signing Bonus" > > > Sweepstakes > > > > http://hotjobs.sweepstakes.yahoo.com/signingbo> > > > nus > > > > > > > > _______________________________________________ > > > > AccessD > > > > mailing list > > > > AccessD at databaseadvisors.com > > > > http://databaseadvisors.com/mailman/listinfo/a> > > > ccessd > > > > Website: > > > > http://www.databaseadvisors.com > > > > > > > > > > > > > > _______________________________________________ > > > AccessD mailing list > > > AccessD at databaseadvisors.com > > > http://databaseadvisors.com/mailman/listinfo/accessd > > > Website: http://www.databaseadvisors.com > > > > > > __________________________________ > > Do you Yahoo!? > > Yahoo! SiteBuilder - Free web site building tool. Try it! > http://webhosting.yahoo.com/ps/sb/ > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/a> ccessd > Website: > http://www.databaseadvisors.com > > > > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/a> ccessd > Website: > http://www.databaseadvisors.com > > > > > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/a> ccessd > Website: > http://www.databaseadvisors.com > > _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From lists at theopg.com Thu Jan 22 09:33:01 2004 From: lists at theopg.com (MarkH) Date: Thu, 22 Jan 2004 15:33:01 -0000 Subject: [AccessD] [OT Slightly] Access XP to Word using ADO results in toolbars beingturned off in word (FIXED) In-Reply-To: <001801c3e0f9$ccc4bd70$330d6bd5@netboxxp> Message-ID: <001c01c3e0fd$05bbfe60$330d6bd5@netboxxp> Turns out it was due to "Windows in Taskbar" being set to true.... Mark -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Mark H Sent: 22 January 2004 15:10 To: 'Access Developers discussion and problem solving' Subject: [AccessD] [OT Slightly] Access XP to Word using ADO results in toolbars beingturned off in word Hello All... Using Office XP and ADO I have a report which is generated from an Access database into a Word document. The word doc uses ADO to collect the report data from report data tables in the mdb, writes it out, saves it to a new document and then closes leaving the user looking at a new copy of the report (less the modules). I use the same template for Word 97 and XP. In XP, if I prompt the user to save the report when its created (using Dialogs(wdDialogFileSaveAs)), or even save it without prompting (using activedocument.saveas), they are left looking at the report but all toolbars are hidden... !?! And I can't see how to turn them back on... In office 97 everything works fine. Any ideas much appreciated... Cheers Mark _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From adtp at touchtelindia.net Thu Jan 22 10:26:54 2004 From: adtp at touchtelindia.net (A.D.Tejpal) Date: Thu, 22 Jan 2004 21:56:54 +0530 Subject: [AccessD] changing data from "Crosstab" to "Normal" tbl view? References: Message-ID: <008c01c3e104$a2beadf0$c9edf73d@winxp> Alun, You might like to take a look at my sample database named CrossTabAndReverse at RogersAccessLibrary (Other Developers Section). It covers the functionality needed by you. Regards, A.D.Tejpal -------------- ----- Original Message ----- From: Garraway, Alun To: Access DatabaseAdvisors (E-Mail) Sent: Thursday, January 22, 2004 16:42 Subject: [AccessD] changing data from "Crosstab" to "Normal" tbl view? hi, I have a tbl that looks like a spreedsheet, the table looks like this: ART_NR W1 W2 W3 W4 .... W30 110 10 8 12 14 258 20 16 22 13 what I want to do is "normalize" the data like this: ART_NR WEEK ORDERS 110 1 10 110 2 8 110 3 12 110 4 14 258 1 20 258 2 16 etc is that possible (with sql), I can't think of anything :-( alun From rl_stewart at highstream.net Thu Jan 22 10:37:16 2004 From: rl_stewart at highstream.net (Robert L. Stewart) Date: Thu, 22 Jan 2004 10:37:16 -0600 Subject: [AccessD] Re: A2K: Something new In-Reply-To: <200401221533.i0MFX5m04862@databaseadvisors.com> Message-ID: <5.1.0.14.2.20040122103547.0299a930@pop3.highstream.net> Steve, If you can send me the db, without data, I will look at it and see what I can figure our from it. Robert P.S. I tried to send this to your email: serbach at new.rr.com and go it returned At 09:33 AM 1/22/2004 -0600, you wrote: >Date: Thu, 22 Jan 2004 07:54:09 -0600 >From: "Steven W. Erbach" >Subject: [AccessD] A2K: Something new >To: "Access Developers discussion and problem solving" > >Message-ID: <20040122075409.551708087.serbach at new.rr.com> >Content-Type: text/plain > >Dear Group, > >You think you've seen it all, when all of a sudden... > >I've taken over development and support of a domestic violence shelter >statistics program. In my efforts to re-factor (how's that for an Extreme >Programming term?) some of the data entry forms I've run into something odd. > >One of the main data entry forms (key field ChildID) has a subform which >contains a Tab object. Each of the tabs on this subform contains a >sub-subform. While getting familiar with the workings of the program I >noticed that one of the sub-subforms did not have the proper linking >fields set up. > >The subform's linking field is that same ChildID...but the RecordSource >table for the subform is NOT keyed! The sub-subform in question also has >only ChildID as the linking field...but the key field for the >sub-subform's table is FreeFormID. ChildID is a foreign key in that table. > >The behavior I'm seeing is this: when I go to check the linking fields in >the subform I noticed that the VB window's title bar shows the following: > >Microsoft Visual Basic - STATISTICS [running] > >After a moment I see the Subform Field Linker dialog box. While the dialog >box is on-screen the title bar of the VB window shows [running]. When I >close the dialog box the VB window flashes and [running] disappears from >the title bar. > >But when I go to check the linking fields for the sub-subform in question, >[running] appears once again in the VB title bar, but then I see a >Microsoft Access dialog box with the following message and OK button: > >Object variable or With block variable not set > >...as if the application was trying to start itself! I can't get at the >Subform Field Linker dialog box at all. When I click OK on the dialog box >the VB window flashes and [running] disappears from the title bar. > >So I tried deleting the sub-subform and placing it on the tab page again. >When I've finished using the subform tool to place the object on the tab >page, I get another dialog box labeled "StatsTracker" (the name of the >application): > >Your code contains a syntax error, or a Stats Tracker function you need >isn't available. >If the syntax is correct, check the Control Wizards subkey or the >Libraries key in the StatsTracker section of the Windows Registry to >verify that the entries you need are listed and available. > >I click OK and I see the subform object on the tab page. I can assign the >Source Object property, but when I go to Link Master Fields I get the >"Object variable or With block variable not set" message. > >Can any of you figure out what's happening to me here? Thank you. > >Regards, > >Steve Erbach >Scientific Marketing >Neenah, WI >920-969-0504 From gustav at cactus.dk Thu Jan 22 10:54:13 2004 From: gustav at cactus.dk (Gustav Brock) Date: Thu, 22 Jan 2004 17:54:13 +0100 Subject: [AccessD] changing data from "Crosstab" to "Normal" tbl view? In-Reply-To: References: Message-ID: <5232174093.20040122175413@cactus.dk> Hi Alun Quoting Alexei Kartaschov from 2001-10-05: Suppose your crosstab table is tblCT with fields Key, A, B, C, D... 1. Pure but uninspired. SELECT Key, "A" AS Letter, A AS MyData FROM tblCT UNION SELECT Key, "B", B FROM tblCT ... UNION SELECT Key, "Z", Z FROM tblCT /gustav > I have a tbl that looks like a spreedsheet, the table looks like this: > ART_NR W1 W2 W3 W4 .... W30 > 110 10 8 12 14 > 258 20 16 22 13 > what I want to do is "normalize" the data like this: > ART_NR WEEK ORDERS > 110 1 10 > 110 2 8 > 110 3 12 > 110 4 14 > 258 1 20 > 258 2 16 > etc > is that possible (with sql), I can't think of anything :-( > alun From weeden1949 at hotmail.com Thu Jan 22 10:56:45 2004 From: weeden1949 at hotmail.com (Greg Smith) Date: Thu, 22 Jan 2004 10:56:45 -0600 Subject: [AccessD] Remove Punctuation References: <003201c3df8c$6493d010$210110ac@SUSANONE> Message-ID: Hello everyone! Greetings from Frigid Iowa. Access 97. I need to remove punctuation from a single field in a table which has about 1,500,000 records in it...so far. It's only 4 columns wide, but fairly lengthy. A client has to have all punctuation removed from this particular field, which is a text field. I have code which removes the punctuation (as Smith, Greg W. becomes Smith Greg W ) but leaves a space in it's place. Yes, it gets rid of the punctuation, but for future consistancy (from now on, they are putting the data in without any punctuation) I can't have the additional space where the "," or "." was or the search routines will not find every instance of, for example, "Smith Greg W" because "Smith Greg W " isn't the same. The code I'm using came from M$'s support, and it does work for removing the characters that I want to remove. However, if I use "" instead of " ", nothing gets changed. It's "ACC: Sample Function to Replace Special Characters", article #109825. Is there a better way to do this? I remember doing this several years ago when I was first setting up their data, but it's been waaaaay too many moons since then. Any help would be greatly appreciated! TIA! Greg Smith Weeden1949 at hotmail.com From cfoust at infostatsystems.com Thu Jan 22 10:58:42 2004 From: cfoust at infostatsystems.com (Charlotte Foust) Date: Thu, 22 Jan 2004 08:58:42 -0800 Subject: [AccessD] Remove Punctuation Message-ID: There is no built-in replace function in Access 97, so you're stuck with clunky code, but the way I've always done this is to search for two spaces and replace them with one. If you iterate that until the instr([textfield], " ") {that's two spaces, BTW} returns a zero, that will get rid of the extra spaces. Charlotte Foust -----Original Message----- From: Greg Smith [mailto:weeden1949 at hotmail.com] Sent: Thursday, January 22, 2004 8:57 AM To: Access Developers discussion and problem solving Subject: [AccessD] Remove Punctuation Hello everyone! Greetings from Frigid Iowa. Access 97. I need to remove punctuation from a single field in a table which has about 1,500,000 records in it...so far. It's only 4 columns wide, but fairly lengthy. A client has to have all punctuation removed from this particular field, which is a text field. I have code which removes the punctuation (as Smith, Greg W. becomes Smith Greg W ) but leaves a space in it's place. Yes, it gets rid of the punctuation, but for future consistancy (from now on, they are putting the data in without any punctuation) I can't have the additional space where the "," or "." was or the search routines will not find every instance of, for example, "Smith Greg W" because "Smith Greg W " isn't the same. The code I'm using came from M$'s support, and it does work for removing the characters that I want to remove. However, if I use "" instead of " ", nothing gets changed. It's "ACC: Sample Function to Replace Special Characters", article #109825. Is there a better way to do this? I remember doing this several years ago when I was first setting up their data, but it's been waaaaay too many moons since then. Any help would be greatly appreciated! TIA! Greg Smith Weeden1949 at hotmail.com _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From Alun.Garraway at otto.de Thu Jan 22 11:18:59 2004 From: Alun.Garraway at otto.de (Garraway, Alun) Date: Thu, 22 Jan 2004 18:18:59 +0100 Subject: [AccessD] changing data from "Crosstab" to "Normal" tbl view? Message-ID: thanx A.D. I'll try it out, and let you know. alun -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of A.D.Tejpal Sent: Thursday, January 22, 2004 5:27 PM To: Access Developers discussion and problem solving Subject: Re: [AccessD] changing data from "Crosstab" to "Normal" tbl view? Alun, You might like to take a look at my sample database named CrossTabAndReverse at RogersAccessLibrary (Other Developers Section). It covers the functionality needed by you. Regards, A.D.Tejpal -------------- ----- Original Message ----- From: Garraway, Alun To: Access DatabaseAdvisors (E-Mail) Sent: Thursday, January 22, 2004 16:42 Subject: [AccessD] changing data from "Crosstab" to "Normal" tbl view? hi, I have a tbl that looks like a spreedsheet, the table looks like this: ART_NR W1 W2 W3 W4 .... W30 110 10 8 12 14 258 20 16 22 13 what I want to do is "normalize" the data like this: ART_NR WEEK ORDERS 110 1 10 110 2 8 110 3 12 110 4 14 258 1 20 258 2 16 etc is that possible (with sql), I can't think of anything :-( alun _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From ssharkins at bellsouth.net Thu Jan 22 11:25:39 2004 From: ssharkins at bellsouth.net (Susan Harkins) Date: Thu, 22 Jan 2004 12:25:39 -0500 Subject: [AccessD] modifying Outlook contact items from Access Message-ID: <004701c3e10c$c24a4410$210110ac@SUSANONE> I'm familiar enough with the Outlook model that importing Contact data into Access is easy -- but I'm wondering if any of you use Access to actually modify Outlook contact information? I haven't even started, but would be interested in hearing how others do it. I know you can link, but that only works if Outlook is the default mail client. Susan H. From Alun.Garraway at otto.de Thu Jan 22 11:28:47 2004 From: Alun.Garraway at otto.de (Garraway, Alun) Date: Thu, 22 Jan 2004 18:28:47 +0100 Subject: [AccessD] changing data from "Crosstab" to "Normal" tbl view? Message-ID: Gustav, as the north germans say "alte Schwede!" :-O tried it on a small table..... it works! kewl :-) but it also means i need a union for every col.......... 30 weeks don't know if its practical with 40k datasets, have to give it a try, thanx a lot for the sql though, till now I've never seen/had any real use for a union. all the best :-) alun -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Gustav Brock Sent: Thursday, January 22, 2004 5:54 PM To: Access Developers discussion and problem solving Subject: Re: [AccessD] changing data from "Crosstab" to "Normal" tbl view? Hi Alun Quoting Alexei Kartaschov from 2001-10-05: Suppose your crosstab table is tblCT with fields Key, A, B, C, D... 1. Pure but uninspired. SELECT Key, "A" AS Letter, A AS MyData FROM tblCT UNION SELECT Key, "B", B FROM tblCT ... UNION SELECT Key, "Z", Z FROM tblCT /gustav > I have a tbl that looks like a spreedsheet, the table looks like this: > ART_NR W1 W2 W3 W4 .... W30 > 110 10 8 12 14 > 258 20 16 22 13 > what I want to do is "normalize" the data like this: > ART_NR WEEK ORDERS > 110 1 10 > 110 2 8 > 110 3 12 > 110 4 14 > 258 1 20 > 258 2 16 > etc > is that possible (with sql), I can't think of anything :-( > alun _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From rusty.hammond at cpiqpc.com Thu Jan 22 11:40:20 2004 From: rusty.hammond at cpiqpc.com (rusty.hammond at cpiqpc.com) Date: Thu, 22 Jan 2004 11:40:20 -0600 Subject: [AccessD] Remove Punctuation Message-ID: <8301C8A868251E4C8ECD3D4FFEA40F8A0811A8A3@cpixchng-1.cpiqpc.net> Greg, I'm sure there's other functions out there to do this but here's the code from one I wrote a long time ago. It may not be pretty but it works. Using your example, you would call it like this: strMyNewString=CleanChars("Smith, Greg W.",",.","N") Function CleanChars(strMyString As String, strSearchString As String, strSpace As String) 'This function strips strSearchString characters from strMyString 'strSearchString can be one character long or several characters long 'This function will search for each individual character of strSearchString in strMyString Dim strTemp As String Dim strNew As String Dim strSearchChar As String Dim intWhereChar As Integer Dim X As Long strNew = strMyString For X = 1 To Len(strSearchString) strSearchChar = Mid(strSearchString, X, 1) intWhereChar = InStr(1, strNew, strSearchChar) If strSpace = "Y" Or strSpace = "y" Then 'This Loop replaces strSearchString with a space Do Until intWhereChar = 0 strTemp = Left(strNew, intWhereChar - 1) & " " & Right(strNew, Len(strNew) - intWhereChar) strNew = strTemp intWhereChar = InStr(1, strNew, strSearchChar) Loop Else 'This Loop removes SearchStr and does NOT replace it with a space Do Until intWhereChar = 0 strTemp = Left(strNew, intWhereChar - 1) & Right(strNew, Len(strNew) - intWhereChar) strNew = strTemp intWhereChar = InStr(1, strNew, strSearchChar) Loop End If Next X CleanChars = strNew End Function -----Original Message----- From: Greg Smith [mailto:weeden1949 at hotmail.com] Sent: Thursday, January 22, 2004 10:57 AM To: Access Developers discussion and problem solving Subject: [AccessD] Remove Punctuation Hello everyone! Greetings from Frigid Iowa. Access 97. I need to remove punctuation from a single field in a table which has about 1,500,000 records in it...so far. It's only 4 columns wide, but fairly lengthy. A client has to have all punctuation removed from this particular field, which is a text field. I have code which removes the punctuation (as Smith, Greg W. becomes Smith Greg W ) but leaves a space in it's place. Yes, it gets rid of the punctuation, but for future consistancy (from now on, they are putting the data in without any punctuation) I can't have the additional space where the "," or "." was or the search routines will not find every instance of, for example, "Smith Greg W" because "Smith Greg W " isn't the same. The code I'm using came from M$'s support, and it does work for removing the characters that I want to remove. However, if I use "" instead of " ", nothing gets changed. It's "ACC: Sample Function to Replace Special Characters", article #109825. Is there a better way to do this? I remember doing this several years ago when I was first setting up their data, but it's been waaaaay too many moons since then. Any help would be greatly appreciated! TIA! Greg Smith Weeden1949 at hotmail.com _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From serbach at new.rr.com Thu Jan 22 11:49:35 2004 From: serbach at new.rr.com (Steven W. Erbach) Date: Thu, 22 Jan 2004 11:49:35 -0600 Subject: [AccessD] Re: A2K: Something new Message-ID: <20040122114935.2016904512.serbach@new.rr.com> Robert, >> If you can send me the db, without data, I will look at it and see what I can figure our from it. << Thanks for the offer. I might pass on it, though, because there are 117 tables that I'd have to empty. The FE is 10 MB in size...and I just compacted it. Are you sure you want to do this? Regards, Steve Erbach Scientific Marketing Neenah, WI 920-969-0504 Message created with Bloomba Disclaimer: No tree was killed in the transmission of this message. However, several coulombs of electrons were temporarily inconvenienced. From martyconnelly at shaw.ca Thu Jan 22 11:51:06 2004 From: martyconnelly at shaw.ca (MartyConnelly) Date: Thu, 22 Jan 2004 09:51:06 -0800 Subject: [AccessD] Worldwide Media exchange or is this a Schuss Boomer? References: <000901c3e0ec$d1070df0$7001a8c0@COA3> Message-ID: <40100D8A.8000601@shaw.ca> Old Austrian downhill skiing term to describe a daredevil skier or someone skiing on the verge of going out of control and skiing directly in the fall line all the way down the hill making very little turns. But the picture on the sign is a Kangaroo on skis or a boomer. Developer wrote: >Schuss boomer? > > >-----Original Message----- >From: accessd-bounces at databaseadvisors.com >[mailto:accessd-bounces at databaseadvisors.com] On Behalf Of MartyConnelly >Sent: Thursday, January 22, 2004 1:58 AM >To: Access Developers discussion and problem solving >Subject: [AccessD] Worldwide Media exchange or is this a Schuss Boomer? > > >http://wwmx.org/FullMediaView.aspx?mediaid=29423 >mainsite >http://wwmx.org/WebClient.aspx > >Here is a interesting new use of GPS and Images via ASP.net from >Microsoft Research. Free download of api and net client >For all surveillance lovers: microsoft research ask people from all >over the world to send in photos and the location data, where the photos > >were shot. they hope to collect "gazillions" of photos and make a visual > >map of the whole world... > > > -- Marty Connelly Victoria, B.C. Canada From martyconnelly at shaw.ca Thu Jan 22 12:19:14 2004 From: martyconnelly at shaw.ca (MartyConnelly) Date: Thu, 22 Jan 2004 10:19:14 -0800 Subject: [AccessD] Remove Punctuation References: Message-ID: <40101422.9050000@shaw.ca> These replacement functions work in A97: I got these from a post from John Viescas http://www.viescas.com/ for VB6 functions Split, Replace, Join and InStrRev Caveat these may have possible problems on boundary conditions or optimization and have not undergone full QA. If you need pure speed replacement functions that have been peer reviewed, some of the timing differences are somewhat amazing, most give a 50% improvement, some by a factor of 10 over the internal Access or VB6 intrinsic functions For timing charts and code. try http://www.xbeat.net/vbspeed/ Public Function InStrRev(strCheck As Variant, _ strMatch As Variant, _ Optional intStart As Integer = -1, _ Optional intCompare As Integer = 2) As Variant '----------------------------------------------------------- ' Inputs: String to check, ' match string, ' optional starting position (default = -1), ' optional string compare value (default vbDatabaseCompare) ' Outputs: Position of match string, starting from the end ' Created By: JLV 11/15/01 ' Last Revised: JLV 11/15/01 ' ** Duplicates the functionality of the VB 6 INSTRREV function. '----------------------------------------------------------- Dim intS As Integer, intR As Integer Dim intI As Integer, intLenC As Integer, intLenM As Integer ' Do some initial checks If (intCompare < 0) Or (intCompare > 2) Then Err.Raise 5 Exit Function End If If IsNull(strCheck) Then InStrRev = Null Exit Function End If If VarType(strCheck) <> vbString Then Err.Raise 5 Exit Function End If If IsNull(strMatch) Then InStrRev = Null Exit Function End If If VarType(strMatch) <> vbString Then Err.Raise 5 Exit Function End If If Len(strCheck) = 0 Then InStrRev = 0 Exit Function End If If Len(strMatch) = 0 Then InStrRev = intStart Exit Function End If If intStart > Len(strMatch) Then InStrRev = 0 Exit Function End If If Len(strMatch) > Len(strCheck) Then InStrRev = 0 Exit Function End If ' OK, have some work to do! intS = intStart intLenC = Len(strCheck) intLenM = Len(strMatch) If intS = -1 Then intS = intLenC ' Set default not found InStrRev = 0 ' Now loop to see if we can find it For intI = intS To 1 Step -1 intR = InStr(intI, strCheck, strMatch, intCompare) If intR <> 0 Then InStrRev = intR Exit For End If Next intI End Function Public Function Join(varArray As Variant, Optional strDelimiter As String = "") As String '----------------------------------------------------------- ' Inputs: An array of strings and an optional delimiter ' Outputs: A concatenated string assembled from the ' array elements, delimited by the optional ' delimiter character ' Created By: JLV 09/05/01 ' Last Revised: 09/05/01 ' ** Duplicates the functionality of the VB 6 JOIN function '----------------------------------------------------------- Dim intL As Integer, intU As Integer, intI As Integer Dim strWork As String If Not IsArray(varArray) Then Exit Function intL = LBound(varArray) intU = UBound(varArray) strWork = varArray(intL) For intI = intL + 1 To intU strWork = strWork & strDelimiter & varArray(intI) Next intI Join = strWork End Function Public Function Replace(strIn As Variant, strFind As String, _ strReplace As String, Optional intStart As Integer = 1, _ Optional intCount As Integer = -1, _ Optional intCompare As Integer = 0) As String '----------------------------------------------------------- ' Inputs: String to search and replace, ' search string, replacement string, ' optional starting position (default = 1), ' optional replacement limit (default = -1 .. ALL) ' optional string compare value (default = 0 .. vbBinaryCompare) ' Outputs: Replaced string ' Created By: JLV 09/05/01 ' Last Revised: JLV 09/05/01 ' ** Duplicates the functionality of the VB 6 REPLACE function. '----------------------------------------------------------- Dim strWork As String, intS As Integer, intCnt As Integer Dim intI As Integer, intLenF As Integer, intLenR As Integer If (intCompare < 0) Or (intCompare > 2) Then Err.Raise 5 Exit Function End If If VarType(strIn) <> vbString Then Err.Raise 5 Exit Function End If strWork = strIn intS = intStart intCnt = intCount intLenF = Len(strFind) intLenR = Len(strReplace) ' If find string zero length or count is zero, then nothing to replace If (intLenF = 0) Or (intCnt = 0) Then Replace = strIn Exit Function End If ' If start beyond length of string, return empty string If intS > Len(strWork) Then Replace = "" Exit Function End If ' Got some work to do -- find strings to replace Do intI = InStr(intS, strWork, strFind, intCompare) If intI = 0 Then Exit Do ' Insert the replace string strWork = Left(strWork, intI - 1) & strReplace & Mid(strWork, intI + intLenF) intS = intS + intI + intLenR - 1 ' Bump start to end of the replace string intCnt = intCnt - 1 ' Decrement the max replace counter Loop Until intCnt = 0 Replace = strWork End Function Public Function Split(strToSplit As String, _ Optional strDelimiter As String = " ", _ Optional intCount As Integer = -1, _ Optional intCompare As Integer = 0) As Variant '----------------------------------------------------------- ' Inputs: String to search, ' delimiter string, ' optional replacement limit (default = -1 .. ALL) ' optional string compare value (default vbBinaryCompare) ' Outputs: Array containing items found in the string ' based on the delimiter provided ' Created By: JLV 09/05/01 ' Last Revised: JLV 09/05/01 ' ** Duplicates the functionality of the VB 6 SPLIT function. '----------------------------------------------------------- Dim strWork As String, intCnt As Integer, intIndex As Integer Dim intI As Integer, strArray() As String If (intCompare < 0) Or (intCompare > 2) Then Err.Raise 5 Exit Function End If strWork = strToSplit intCnt = intCount ' If count is zero, return the empty array If intCnt = 0 Then Split = strArray Exit Function End If ' If the Delimiter is zero-length, return a 1-entry array If strDelimiter = "" Then ReDim strArray(0) strArray(0) = strWork Split = strArray Exit Function End If ' Decrement count by 1 because function returns ' whatever is left at the end intCnt = intCnt - 1 ' Loop until the counter is zero Do Until intCnt = 0 intI = InStr(1, strWork, strDelimiter, intCompare) ' If delimiter not found, end the loop If intI = 0 Then Exit Do ' Add 1 to the number returned intIndex = intIndex + 1 ' Expand the array ReDim Preserve strArray(0 To intIndex - 1) ' Use index - 1 .. zero-based array strArray(intIndex - 1) = Left(strWork, intI - 1) ' Remove the found entry strWork = Mid(strWork, intI + 1) intCnt = intCnt - 1 Loop ' Put anything left over in the last entry of the array If Len(strWork) > 0 Then intIndex = intIndex + 1 ReDim Preserve strArray(0 To intIndex - 1) strArray(intIndex - 1) = strWork End If ' Return the result Split = strArray End Function Charlotte Foust wrote: >There is no built-in replace function in Access 97, so you're stuck with >clunky code, but the way I've always done this is to search for two >spaces and replace them with one. If you iterate that until the >instr([textfield], " ") {that's two spaces, BTW} returns a zero, that >will get rid of the extra spaces. > >Charlotte Foust > >-----Original Message----- >From: Greg Smith [mailto:weeden1949 at hotmail.com] >Sent: Thursday, January 22, 2004 8:57 AM >To: Access Developers discussion and problem solving >Subject: [AccessD] Remove Punctuation > > >Hello everyone! Greetings from Frigid Iowa. > >Access 97. > >I need to remove punctuation from a single field in a table which has >about 1,500,000 records in it...so far. It's only 4 columns wide, but >fairly lengthy. > >A client has to have all punctuation removed from this particular field, >which is a text field. I have code which removes the punctuation (as >Smith, Greg W. becomes Smith Greg W ) but leaves a space in it's place. >Yes, it gets rid of the punctuation, but for future consistancy (from >now on, they are putting the data in without any punctuation) I can't >have the additional space where the "," or "." was or the search >routines will not find every instance of, for example, "Smith Greg W" >because "Smith Greg W " isn't the same. > >The code I'm using came from M$'s support, and it does work for removing >the characters that I want to remove. However, if I use "" instead of " >", nothing gets changed. It's "ACC: Sample Function to Replace Special >Characters", article #109825. > >Is there a better way to do this? I remember doing this several years >ago when I was first setting up their data, but it's been waaaaay too >many moons since then. > >Any help would be greatly appreciated! > >TIA! > >Greg Smith >Weeden1949 at hotmail.com > > >_______________________________________________ >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 > > > -- Marty Connelly Victoria, B.C. Canada From john at winhaven.net Thu Jan 22 12:27:43 2004 From: john at winhaven.net (John Bartow) Date: Thu, 22 Jan 2004 12:27:43 -0600 Subject: [AccessD] Re: A2K: Something new In-Reply-To: <20040122114935.2016904512.serbach@new.rr.com> Message-ID: Steve, Sounds intriguing, if you do send it on you could import everything into a new DB and for the tables choose the option: "Definition Only". HTH JB > -----Original Message----- > From: accessd-bounces at databaseadvisors.com > [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Steven W. > Erbach > Sent: Thursday, January 22, 2004 11:50 AM > To: Access Developers discussion and problem solving > Subject: Re: [AccessD] Re: A2K: Something new > > > Robert, > > >> If you can send me the db, without data, I will look at it and > see what I can figure our from it. << > > Thanks for the offer. I might pass on it, though, because there > are 117 tables that I'd have to empty. The FE is 10 MB in > size...and I just compacted it. Are you sure you want to do this? > > Regards, > > Steve Erbach > Scientific Marketing > Neenah, WI > 920-969-0504 > > Message created with Bloomba > > Disclaimer: No tree was killed in the transmission of this > message. However, several coulombs of electrons were temporarily > inconvenienced. > > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com > > From andy at minstersystems.co.uk Thu Jan 22 12:28:03 2004 From: andy at minstersystems.co.uk (Andy Lacey) Date: Thu, 22 Jan 2004 18:28:03 -0000 Subject: [AccessD] modifying Outlook contact items from Access In-Reply-To: <004701c3e10c$c24a4410$210110ac@SUSANONE> Message-ID: <00f401c3e115$79953410$b274d0d5@minster33c3r25> Hi Susan Well I cheat. I have a number of Outlook address books some of which are based on Access data. I use a 3rd-party product which each night wipes out these address books, extracts the Access data and rebuilds the address books. Works like a charm. I could no doubt write something but as the product existed..... See http://www.teamscope.com/otherpro/datalink.asp Andy Lacey http://www.minstersystems.co.uk > -----Original Message----- > From: accessd-bounces at databaseadvisors.com > [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of > Susan Harkins > Sent: 22 January 2004 17:26 > To: AccessD at databaseadvisors.com > Subject: [AccessD] modifying Outlook contact items from Access > > > I'm familiar enough with the Outlook model that importing > Contact data into Access is easy -- but I'm wondering if any > of you use Access to actually modify Outlook contact > information? I haven't even started, but would be interested > in hearing how others do it. I know you can link, but that > only works if Outlook is the default mail client. > > Susan H. > > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/a> ccessd > Website: > http://www.databaseadvisors.com > > From ssharkins at bellsouth.net Thu Jan 22 12:34:22 2004 From: ssharkins at bellsouth.net (Susan Harkins) Date: Thu, 22 Jan 2004 13:34:22 -0500 Subject: [AccessD] modifying Outlook contact items from Access References: <00f401c3e115$79953410$b274d0d5@minster33c3r25> Message-ID: <000601c3e116$5e767ee0$210110ac@SUSANONE> This is for instructional purposes, so I have to do it the long hard way. :) I can import the data into Access, modify it, and send it back to Outlook. I'm just wondering if there isn't a more direct route -- it would be cool if I could connect an Access form's to a recordset that's connected directly to Outlook -- so the changes in Access would be immediate -- I just don't know if that's possible, or even the best way to go about it. Susan H. > Hi Susan > Well I cheat. I have a number of Outlook address books some of which are > based on Access data. I use a 3rd-party product which each night wipes out > these address books, extracts the Access data and rebuilds the address > books. Works like a charm. I could no doubt write something but as the > product existed..... See http://www.teamscope.com/otherpro/datalink.asp > > > Andy Lacey > http://www.minstersystems.co.uk > > > -----Original Message----- > > From: accessd-bounces at databaseadvisors.com > > [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of > > Susan Harkins > > Sent: 22 January 2004 17:26 > > To: AccessD at databaseadvisors.com > > Subject: [AccessD] modifying Outlook contact items from Access > > > > > > I'm familiar enough with the Outlook model that importing > > Contact data into Access is easy -- but I'm wondering if any > > of you use Access to actually modify Outlook contact > > information? I haven't even started, but would be interested > > in hearing how others do it. I know you can link, but that > > only works if Outlook is the default mail client. > > > > Susan H. > > > > _______________________________________________ > > AccessD mailing list > > AccessD at databaseadvisors.com > > http://databaseadvisors.com/mailman/listinfo/a> ccessd > > Website: > > http://www.databaseadvisors.com > > > > > > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com > From KIsmert at TexasSystems.com Thu Jan 22 12:41:53 2004 From: KIsmert at TexasSystems.com (Ken Ismert) Date: Thu, 22 Jan 2004 12:41:53 -0600 Subject: [AccessD] RE: Instantiate Forms as Objects In-Reply-To: <5.2.0.9.2.20040122011000.02324b10@127.0.0.1> Message-ID: <005101c3e117$67f40a90$2a3ca8c0@TEXASSYSTEMS.COM> David, Intriguing ... assigning the responsibility of creating the form instance to the form class itself. I have several comments regarding your code: 1. If you copied "TestForm" to "New_Form", New_Form.NewInstance would create TestForm instances, an implicit mismatch. To catch this error, I would suggest: Public Function NewInstance() As Access.Form If Not (TypeOf Me Is Form_TestForm) Then ' Raise Type Mismatch Error Err.Raise 13, "Form_" & Me.Name & ".NewInstance", "Type mismatch" End If Set NewInstance = New Form_TestForm End Function This way, TestForm.NewInstance works, but New_Form.NewInstance generates a runtime error, prompting you to fix the routine. 2. To avoid the screen flicker, you could try opening the form with acHidden 3. Regarding the problem you mentioned, I would suggest putting all form references into a collection. You could key it with the Form.Hwnd property, as MarkH did in his code. Closing a form would be a matter of setting focus to the form, issuing a DoCmd.Close, and removing it from the collection. This approach is as workable as any other. The nice thing about it is, if you delete a form, you don't have to update your form creation function. If you copy a form, you still have to remember to modify its NewInstance function, which is not a bad tradeoff. -Ken -----Original Message----- From: David Beckles [mailto:becklesd at tiscali.co.uk] Sent: Wednesday, January 21, 2004 7:11 PM To: accessd at databaseadvisors.com Subject: [AccessD] RE: Instantiate Forms as Objects Dear Ken, One way of achieving (most of) what you want to do is as follows: 1. In each of your forms create the function Public Function NewInstance() As Form Set NewInstance = New Form_TestForm End Function Its purpose is merely to return a reference to a new instance of the form. You could also define it as a new public property of the form, instead of a function. 2. Define the following function in some general module Public Function OpenFormMultiple(FormName As String) As Form ' check the Forms collection, and if the form is in it then use the NewInstance() method of the form ' otherwise open the form in the usual way and return a reference to it. ' in either case, the form will not be visible. ' if any errors occur, then the value Nothing will be returned, so remember to test for it. On Error Resume Next ' You could use fancier error handling if you wanted Dim F As Form Set OpenFormMultiple = Nothing Set F = Forms(FormName) If F Is Nothing Then Application.Echo False ' this is to suppress the screen flicker DoCmd.OpenForm FormName Set F = Forms(FormName) F.Visible = False Set OpenFormMultiple = F Application.Echo True Else Set OpenFormMultiple = F.NewInstance() End If End Function One problem with this arrangement is that you can close all the instances of a form except the first by setting the reference to Nothing. The first instance has to be closed by going into the Forms collection. I have not found a way around that as yet. I hope that this helps, David From serbach at new.rr.com Thu Jan 22 12:57:18 2004 From: serbach at new.rr.com (Steven W. Erbach) Date: Thu, 22 Jan 2004 12:57:18 -0600 Subject: [AccessD] Re: A2K: Something new Message-ID: <20040122125718.1611006317.serbach@new.rr.com> John, >> Sounds intriguing << Intriguing? It's a pain in the tuchis! I mean, why, in form design mode, would the application "run" when I try to open the Subform Field Linker? Is it some rogue macro? A missing reference? It acts like there's a missing global RecordSet variable...and I can't get at the Subform Linker. If I don't try and mess with the subform the application runs just fine...except for the fact that data entered in the naughty sub-subform doesn't show up again when I go back to the ChildID I started with. That's where I noticed the subform linking problem in the first place. Regards, Steve Erbach Scientific Marketing Neenah, WI 920-969-0504 Message created with Bloomba Disclaimer: No tree was killed in the transmission of this message. However, several coulombs of electrons were temporarily inconvenienced. From rl_stewart at highstream.net Thu Jan 22 13:10:33 2004 From: rl_stewart at highstream.net (Robert L. Stewart) Date: Thu, 22 Jan 2004 13:10:33 -0600 Subject: [AccessD] Re: Remove Punctuation In-Reply-To: <200401221800.i0MI0Lm08782@databaseadvisors.com> Message-ID: <5.1.0.14.2.20040122130828.02a371e8@pop3.highstream.net> Greg, Try this function. It seems to work on everything I could throw at it. ***** Watch for word wrap ***** Function ReplaceChar(InputString As String) As String Dim intLen As Integer Dim intCounter As Integer 'First, remove all carriage returns/linefeeds from the string InputString = Replace(InputString, vbCrLf, " ") 'Find the length of the remaining string now that CR/LF are removed intLen = Len(InputString) 'Now loop through each remaining character in the string, and if it is a control 'character (ASCII value less than 32 and > 32 but < 47), then replace that character with a space For intCounter = 1 To intLen If Asc(Mid(InputString, intCounter, 1)) < 32 Then InputString = Replace(InputString, Mid(InputString, intCounter, 1), "") End If Next intCounter intLen = Len(InputString) For intCounter = 1 To intLen - 1 If Asc(Mid(InputString, intCounter, 1)) > 32 And Asc(Mid(InputString, intCounter, 1)) < 47 Then InputString = Replace(InputString, Mid(InputString, intCounter, 1), "") End If Next intCounter 'Return the input string, which has now had all control charcters 'converted into spaces ReplaceChar = InputString End Function Robert At 12:00 PM 1/22/2004 -0600, you wrote: >From: Greg Smith [mailto:weeden1949 at hotmail.com] >Sent: Thursday, January 22, 2004 10:57 AM >To: Access Developers discussion and problem solving >Subject: [AccessD] Remove Punctuation > > >Hello everyone! Greetings from Frigid Iowa. > >Access 97. > >I need to remove punctuation from a single field in a table which has about >1,500,000 records in it...so far. It's only 4 columns wide, but fairly >lengthy. > >A client has to have all punctuation removed from this particular field, >which is a text field. I have code which removes the punctuation (as Smith, >Greg W. becomes Smith Greg W ) but leaves a space in it's place. Yes, it >gets rid of the punctuation, but for future consistancy (from now on, they >are putting the data in without any punctuation) I can't have the additional >space where the "," or "." was or the search routines will not find every >instance of, for example, "Smith Greg W" because "Smith Greg W " isn't the >same. > >The code I'm using came from M$'s support, and it does work for removing the >characters that I want to remove. However, if I use "" instead of " ", >nothing gets changed. It's "ACC: Sample Function to Replace Special >Characters", article #109825. > >Is there a better way to do this? I remember doing this several years ago >when I was first setting up their data, but it's been waaaaay too many moons >since then. > >Any help would be greatly appreciated! > >TIA! > >Greg Smith >Weeden1949 at hotmail.com From rl_stewart at highstream.net Thu Jan 22 13:14:58 2004 From: rl_stewart at highstream.net (Robert L. Stewart) Date: Thu, 22 Jan 2004 13:14:58 -0600 Subject: [AccessD] Re: A2K: Something new In-Reply-To: <200401221800.i0MI0Lm08782@databaseadvisors.com> Message-ID: <5.1.0.14.2.20040122131113.02a34430@pop3.highstream.net> Sure, Here is the simple way of getting it to me. Create a new database. Import all the objects from the old one into it. Before starting the import, click on the options button and select definition only. It will automatically move only the structure of the tables over. Zip it and send it directly to my email address. Also, there is something wrong with yours because I cannot send directly to it. Robert At 12:00 PM 1/22/2004 -0600, you wrote: >Date: Thu, 22 Jan 2004 11:49:35 -0600 >From: "Steven W. Erbach" >Subject: Re: [AccessD] Re: A2K: Something new >To: "Access Developers discussion and problem solving" > >Message-ID: <20040122114935.2016904512.serbach at new.rr.com> >Content-Type: text/plain > >Robert, > > >> If you can send me the db, without data, I will look at it and see > what I can figure our from it. << > >Thanks for the offer. I might pass on it, though, because there are 117 >tables that I'd have to empty. The FE is 10 MB in size...and I just >compacted it. Are you sure you want to do this? > >Regards, > >Steve Erbach >Scientific Marketing >Neenah, WI >920-969-0504 From martyconnelly at shaw.ca Thu Jan 22 14:04:27 2004 From: martyconnelly at shaw.ca (MartyConnelly) Date: Thu, 22 Jan 2004 12:04:27 -0800 Subject: [AccessD] modifying Outlook contact items from Access References: <00f401c3e115$79953410$b274d0d5@minster33c3r25> <000601c3e116$5e767ee0$210110ac@SUSANONE> Message-ID: <40102CCB.4080901@shaw.ca> There is an Exchange OLEDB Provider available for those that use it. http://msdn.microsoft.com/library/default.asp?url=/library/en-us/wss/wss/_exch2k_search_tasks.asp And this method might work This article describes how you can open a connection to a Microsoft Exchange or to a Microsoft Outlook mailbox by using ActiveX Data Objects (ADO) and the Jet OLE DB provider http://support.microsoft.com/?kbid=275262 Susan Harkins wrote: >This is for instructional purposes, so I have to do it the long hard way. :) > >I can import the data into Access, modify it, and send it back to Outlook. >I'm just wondering if there isn't a more direct route -- it would be cool if >I could connect an Access form's to a recordset that's connected directly to >Outlook -- so the changes in Access would be immediate -- I just don't know >if that's possible, or even the best way to go about it. > >Susan H. > > > > >>Hi Susan >>Well I cheat. I have a number of Outlook address books some of which are >>based on Access data. I use a 3rd-party product which each night wipes out >>these address books, extracts the Access data and rebuilds the address >>books. Works like a charm. I could no doubt write something but as the >>product existed..... See http://www.teamscope.com/otherpro/datalink.asp >> >> >>Andy Lacey >>http://www.minstersystems.co.uk >> >> >> >>>-----Original Message----- >>>From: accessd-bounces at databaseadvisors.com >>>[mailto:accessd-bounces at databaseadvisors.com] On Behalf Of >>>Susan Harkins >>>Sent: 22 January 2004 17:26 >>>To: AccessD at databaseadvisors.com >>>Subject: [AccessD] modifying Outlook contact items from Access >>> >>> >>>I'm familiar enough with the Outlook model that importing >>>Contact data into Access is easy -- but I'm wondering if any >>>of you use Access to actually modify Outlook contact >>>information? I haven't even started, but would be interested >>>in hearing how others do it. I know you can link, but that >>>only works if Outlook is the default mail client. >>> >>>Susan H. >>> >>>_______________________________________________ >>>AccessD mailing list >>>AccessD at databaseadvisors.com >>>http://databaseadvisors.com/mailman/listinfo/a> ccessd >>>Website: >>>http://www.databaseadvisors.com >>> >>> >>> >>> >>_______________________________________________ >>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 > > > -- Marty Connelly Victoria, B.C. Canada From pharold at proftesting.com Thu Jan 22 14:36:49 2004 From: pharold at proftesting.com (Perry Harold) Date: Thu, 22 Jan 2004 15:36:49 -0500 Subject: [AccessD] Remove Punctuation In-Reply-To: Message-ID: <000001c3e127$76222830$082da8c0@D58BT131> As an aside - If you ever need to identify the last name again (assuming that the field is a Full Name field from your example), how will you find any multiple-name last names that don't include dashes? Perry Harold -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Greg Smith Sent: Thursday, January 22, 2004 11:57 AM To: Access Developers discussion and problem solving Subject: [AccessD] Remove Punctuation Hello everyone! Greetings from Frigid Iowa. Access 97. I need to remove punctuation from a single field in a table which has about 1,500,000 records in it...so far. It's only 4 columns wide, but fairly lengthy. A client has to have all punctuation removed from this particular field, which is a text field. I have code which removes the punctuation (as Smith, Greg W. becomes Smith Greg W ) but leaves a space in it's place. Yes, it gets rid of the punctuation, but for future consistancy (from now on, they are putting the data in without any punctuation) I can't have the additional space where the "," or "." was or the search routines will not find every instance of, for example, "Smith Greg W" because "Smith Greg W " isn't the same. The code I'm using came from M$'s support, and it does work for removing the characters that I want to remove. However, if I use "" instead of " ", nothing gets changed. It's "ACC: Sample Function to Replace Special Characters", article #109825. Is there a better way to do this? I remember doing this several years ago when I was first setting up their data, but it's been waaaaay too many moons since then. Any help would be greatly appreciated! TIA! Greg Smith Weeden1949 at hotmail.com _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From serbach at new.rr.com Thu Jan 22 14:52:28 2004 From: serbach at new.rr.com (Steven W. Erbach) Date: Thu, 22 Jan 2004 14:52:28 -0600 Subject: [AccessD] Re: A2K: Something new Message-ID: <20040122145228.943780630.serbach@new.rr.com> Robert, I've discovered something that is germaine to the discussion: my original question dealt with clicking on a sub-subform and trying to get to the Subform Field Linker. That is, I opened the master form that contains Subform A. Subform A contains Subform B. It was Subform B's linking fields I was trying to change. However when I open Subform A in design mode and then try to access the linking fields in Subform B, then the Subform Field Linker comes up. I still see '[running]' appear in the VB title bar, but at least the Subform Field Linker wizard -- or whatever it is -- appears. It's just when I try to fiddle with the linking fields in a sub-subform to the Master that I have trouble with the "Object variable or With block variable not set" message and the Linker not appearing. I have installed Access XP recently and I've noticed a thing or two relating to the help files that are different from before I installed Access XP...maybe this has something to do with the error message? Regards, Steve Erbach Scientific Marketing Neenah, WI 920-969-0504 Message created with Bloomba Disclaimer: No tree was killed in the transmission of this message. However, several coulombs of electrons were temporarily inconvenienced. From ssharkins at bellsouth.net Thu Jan 22 15:18:29 2004 From: ssharkins at bellsouth.net (Susan Harkins) Date: Thu, 22 Jan 2004 16:18:29 -0500 Subject: [AccessD] modifying Outlook contact items from Access References: <00f401c3e115$79953410$b274d0d5@minster33c3r25> <000601c3e116$5e767ee0$210110ac@SUSANONE> <40102CCB.4080901@shaw.ca> Message-ID: <001b01c3e12d$4af0aa50$210110ac@SUSANONE> Thanks Marty -- first one's too complicated. The second doesn't work because Outlook isn't the default mail client -- if Outlook was the default mail client, you could just link and skip the code altogether. ;( Seems like the second ought to work, I'm just missing something. Susan H. > There is an Exchange OLEDB Provider available for those that use it. > > http://msdn.microsoft.com/library/default.asp?url=/library/en-us/wss/wss/_ex ch2k_search_tasks.asp > And this method might work > > This article describes how you can open a connection to a Microsoft > Exchange or to a Microsoft Outlook mailbox by using ActiveX Data Objects > (ADO) and the Jet OLE DB provider > http://support.microsoft.com/?kbid=275262 > > Susan Harkins wrote: > > >This is for instructional purposes, so I have to do it the long hard way. :) > > > >I can import the data into Access, modify it, and send it back to Outlook. > >I'm just wondering if there isn't a more direct route -- it would be cool if > >I could connect an Access form's to a recordset that's connected directly to > >Outlook -- so the changes in Access would be immediate -- I just don't know > >if that's possible, or even the best way to go about it. > > > >Susan H. > > > > > > > > > >>Hi Susan > >>Well I cheat. I have a number of Outlook address books some of which are > >>based on Access data. I use a 3rd-party product which each night wipes out > >>these address books, extracts the Access data and rebuilds the address > >>books. Works like a charm. I could no doubt write something but as the > >>product existed..... See http://www.teamscope.com/otherpro/datalink.asp > >> > >> > >>Andy Lacey > >>http://www.minstersystems.co.uk > >> > >> > >> > >>>-----Original Message----- > >>>From: accessd-bounces at databaseadvisors.com > >>>[mailto:accessd-bounces at databaseadvisors.com] On Behalf Of > >>>Susan Harkins > >>>Sent: 22 January 2004 17:26 > >>>To: AccessD at databaseadvisors.com > >>>Subject: [AccessD] modifying Outlook contact items from Access > >>> > >>> > >>>I'm familiar enough with the Outlook model that importing > >>>Contact data into Access is easy -- but I'm wondering if any > >>>of you use Access to actually modify Outlook contact > >>>information? I haven't even started, but would be interested > >>>in hearing how others do it. I know you can link, but that > >>>only works if Outlook is the default mail client. > >>> > >>>Susan H. > >>> > >>>_______________________________________________ > >>>AccessD mailing list > >>>AccessD at databaseadvisors.com > >>>http://databaseadvisors.com/mailman/listinfo/a> ccessd > >>>Website: > >>>http://www.databaseadvisors.com > >>> > >>> > >>> > >>> > >>_______________________________________________ > >>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 > > > > > > > > -- > Marty Connelly > Victoria, B.C. > Canada > > > > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com > From Erwin.Craps at ithelps.be Thu Jan 22 15:18:42 2004 From: Erwin.Craps at ithelps.be (Erwin Craps - IT Helps) Date: Thu, 22 Jan 2004 22:18:42 +0100 Subject: [AccessD] modifying Outlook contact items from Access Message-ID: <46B976F2B698FF46A4FE7636509B22DF72B6@stekelbes.ithelps.local> Hi Susan Here's some code that creates contacts in Outlook from Access. The function needs adapting, cause I grabbed it right of my app... Public Function CreateContactsInOutlook() ' Comments : ' Parameters: - ' Modified : ' ' -------------------------------------------------- 'TVCodeTools ErrorEnablerStart On Error GoTo PROC_ERR 'TVCodeTools ErrorEnablerEnd Dim oOut As Outlook.Application Dim oNSpace As Outlook.NameSpace Dim oFolderContact As Outlook.MAPIFolder Dim oFolder As Outlook.MAPIFolder Dim objOItem As Object Dim strFolderName As String Dim rsCust As Recordset Dim strSQL As String Dim intCounter As Integer Dim lngItemCounter As Long Dim varCUST_GID As Variant DoCmd.Hourglass True Set oOut = Outlook.Application Set oNSpace = oOut.GetNamespace("MAPI") Set oFolderContact = oNSpace.GetDefaultFolder(olFolderContacts) 'Create Folders strFolderName = "IT Helps Relations" On Error Resume Next Set oFolder = oFolderContact.Folders(strFolderName) If Err <> 0 Then On Error GoTo PROC_ERR Set oFolder = oFolderContact.Folders.Add(strFolderName, olFolderContacts) Else For lngItemCounter = oFolderContact.Folders(strFolderName).Items.Count To 1 Step -1 oFolderContact.Folders(strFolderName).Items(lngItemCounter).Delete DoEvents Next lngItemCounter End If On Error Resume Next oFolder.ShowAsOutlookAB = True On Error GoTo PROC_ERR strSQL = "SELECT CUST_Main.*, CUST_Names.CUST_LID, CUST_Names.Mailing ,CUST_Names.Language_LID, SUB_L_Titles.Title, SUB_L_Titles.LetterStart, CUST_Names.FirstName, CUST_Names.SurName, CUST_Names.DirectFax, CUST_Names.DirectPhone, CUST_Names.Email, CUST_Names.GSMnumber, SUB_L_Countries.Country " _ & "FROM SUB_L_Countries RIGHT JOIN (CUST_Main LEFT JOIN (SUB_L_Titles RIGHT JOIN CUST_Names ON SUB_L_Titles.Title_LID = CUST_Names.Title_LID) ON CUST_Main.CUST_GID = CUST_Names.CUST_GID) ON SUB_L_Countries.Country_LID = CUST_Main.Country_LID " _ & "WHERE CUST_Names.Mailing = true " _ & " ORDER BY CUST_Main.CUST_GID;" Set rsCust = CurrentDb.OpenRecordset(strSQL, dbOpenDynaset) With rsCust Do While rsCust.EOF = False 'Save Main company data If varCUST_GID <> .Fields("CUST_GID") Then If (Nz(.Fields("MainPhone")) <> "") Or (Nz(.Fields("EmailAddress")) <> "") Then Set objOItem = oFolderContact.Folders(strFolderName).Items.Add(olContactItem) objOItem.BusinessAddressCity = Nz(.Fields("City")) objOItem.BusinessAddressCountry = Nz(.Fields("Country")) objOItem.BusinessAddressPostalCode = Nz(.Fields("Postalcode")) objOItem.BusinessAddressStreet = Nz(.Fields("Street")) objOItem.BusinessFaxNumber = InternationalPhone(Nz(.Fields("MainFax"))) objOItem.BusinessTelephoneNumber = InternationalPhone(Nz(.Fields("MainPhone"))) objOItem.CompanyName = Nz(.Fields("Company")) objOItem.CustomerID = Nz(.Fields("CUST_GID")) objOItem.Email1AddressType = "SMTP" objOItem.Email1Address = Nz(.Fields("EmailAddress")) objOItem.Fullname = Nz(.Fields("Company")) objOItem.FileAs = objOItem.Fullname objOItem.Save End If End If 'Save Contact person data If (Nz(.Fields("DirectPhone")) <> "") Or (Nz(.Fields("GSMnumber")) <> "") Or (Nz(.Fields("Email")) <> "") Then Set objOItem = oFolderContact.Folders(strFolderName).Items.Add(olContactItem) objOItem.BusinessAddressCity = Nz(.Fields("City")) objOItem.BusinessAddressCountry = Nz(.Fields("Country")) objOItem.BusinessAddressPostalCode = Nz(.Fields("Postalcode")) objOItem.BusinessAddressStreet = Nz(.Fields("Street")) objOItem.BusinessFaxNumber = InternationalPhone(Nz(.Fields("DirectFax"))) objOItem.BusinessTelephoneNumber = InternationalPhone(Nz(.Fields("DirectPhone"))) objOItem.MobileTelephoneNumber = InternationalPhone(Nz(.Fields("GSMnumber"))) objOItem.CompanyName = Nz(.Fields("Company")) objOItem.CustomerID = Nz(.Fields("CUST_LID")) objOItem.Email1AddressType = "SMTP" objOItem.Email1Address = Nz(.Fields("Email")) objOItem.FirstName = Nz(.Fields("Firstname")) objOItem.LastName = Nz(.Fields("Surname")) objOItem.Title = Nz(.Fields("Title")) objOItem.Fullname = Nz(.Fields("Surname")) & ", " & Nz(.Fields("Firstname")) objOItem.FileAs = objOItem.Fullname objOItem.Save End If varCUST_GID = .Fields("CUST_GID") .MoveNext Loop End With 'TVCodeTools ErrorHandlerStart PROC_EXIT: On Error Resume Next rsCust.Close Set rsCust = Nothing Set oFolder = Nothing Set oFolderContact = Nothing Set oNSpace = Nothing Set oOut = Nothing DoCmd.Hourglass False MsgBox "Finished!" Exit Function PROC_ERR: Select Case Err Case 0 'Do Nothing Case Else MsgBox Err.Description & vbCrLf & "CreateContactsInOutlook", vbOKOnly, "ERROR:" & Err.Number Resume PROC_EXIT End Select 'TVCodeTools ErrorHandlerEnd End Function -----Oorspronkelijk bericht----- Van: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] Namens MartyConnelly Verzonden: donderdag 22 januari 2004 21:04 Aan: Access Developers discussion and problem solving Onderwerp: Re: [AccessD] modifying Outlook contact items from Access There is an Exchange OLEDB Provider available for those that use it. http://msdn.microsoft.com/library/default.asp?url=/library/en-us/wss/wss /_exch2k_search_tasks.asp And this method might work This article describes how you can open a connection to a Microsoft Exchange or to a Microsoft Outlook mailbox by using ActiveX Data Objects (ADO) and the Jet OLE DB provider http://support.microsoft.com/?kbid=275262 Susan Harkins wrote: >This is for instructional purposes, so I have to do it the long hard >way. :) > >I can import the data into Access, modify it, and send it back to >Outlook. I'm just wondering if there isn't a more direct route -- it >would be cool if I could connect an Access form's to a recordset that's >connected directly to Outlook -- so the changes in Access would be >immediate -- I just don't know if that's possible, or even the best way >to go about it. > >Susan H. > > > > >>Hi Susan >>Well I cheat. I have a number of Outlook address books some of which >>are based on Access data. I use a 3rd-party product which each night >>wipes out these address books, extracts the Access data and rebuilds >>the address books. Works like a charm. I could no doubt write >>something but as the product existed..... See >>http://www.teamscope.com/otherpro/datalink.asp >> >> >>Andy Lacey >>http://www.minstersystems.co.uk >> >> >> >>>-----Original Message----- >>>From: accessd-bounces at databaseadvisors.com >>>[mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Susan >>>Harkins >>>Sent: 22 January 2004 17:26 >>>To: AccessD at databaseadvisors.com >>>Subject: [AccessD] modifying Outlook contact items from Access >>> >>> >>>I'm familiar enough with the Outlook model that importing Contact >>>data into Access is easy -- but I'm wondering if any of you use >>>Access to actually modify Outlook contact information? I haven't even >>>started, but would be interested in hearing how others do it. I know >>>you can link, but that only works if Outlook is the default mail >>>client. >>> >>>Susan H. >>> >>>_______________________________________________ >>>AccessD mailing list >>>AccessD at databaseadvisors.com >>>http://databaseadvisors.com/mailman/listinfo/a> ccessd >>>Website: >>>http://www.databaseadvisors.com >>> >>> >>> >>> >>_______________________________________________ >>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 > > > -- Marty Connelly Victoria, B.C. Canada _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From Oleg_123 at xuppa.com Thu Jan 22 15:20:22 2004 From: Oleg_123 at xuppa.com (Oleg_123 at xuppa.com) Date: Thu, 22 Jan 2004 16:20:22 -0500 (EST) Subject: [AccessD] query that deletess dups ? In-Reply-To: <15839630195.20040121190042@cactus.dk> References: <15839630195.20040121190042@cactus.dk> Message-ID: <25088.12.3.132.98.1074806422.squirrel@heck.bay9.com> How can I delete dup records ? Anyone can give me a hint... SELECT DISTINCTROW [emp table].[employee number], [emp table].[employee name], [emp table].COMPANY FROM [emp table] WHERE ((([emp table].[employee number]) In (SELECT [employee number] FROM [emp table] As Tmp GROUP BY [employee number],[employee name] HAVING Count(*)>1 And [employee name] = [emp table].[employee name]))) ORDER BY [emp table].[employee number], [emp table].[employee name]; ----------------------------------------- Get Breaking News from CNN, ABC, NBC, CBS Now. http://www.xuppa.com/news/?link=webmail From kaupca at chevrontexaco.com Thu Jan 22 15:22:57 2004 From: kaupca at chevrontexaco.com (Kaup, Chester A) Date: Thu, 22 Jan 2004 15:22:57 -0600 Subject: [AccessD] Parameter Query asks twice Message-ID: <193572B4E0FC1744BEDFEE63F82CEC9E0F9748@bocnte2k4.boc.chevrontexaco.net> I have a form with a drop down list on it. Once an item is selected from the list it is used as the criteria for SQL statement that is the data row source for a chart on a report that opens in print preview. This work great. When I go to print the chart it asks for the criteria again. Is there a way to prevent this and just print the report? Thanks. No trees were killed in the sending of this message. However a large number of electrons were terribly inconvenienced. From cfoust at infostatsystems.com Thu Jan 22 16:04:18 2004 From: cfoust at infostatsystems.com (Charlotte Foust) Date: Thu, 22 Jan 2004 14:04:18 -0800 Subject: [AccessD] Parameter Query asks twice Message-ID: What version of Access are you using? Running reports based on parameter queries means that you have to pass the parameters to the query. Does the query reference the form? Is the form open when you're trying to run the report? Charlotte Foust -----Original Message----- From: Kaup, Chester A [mailto:kaupca at chevrontexaco.com] Sent: Thursday, January 22, 2004 1:23 PM To: accessd at databaseadvisors.com Subject: [AccessD] Parameter Query asks twice I have a form with a drop down list on it. Once an item is selected from the list it is used as the criteria for SQL statement that is the data row source for a chart on a report that opens in print preview. This work great. When I go to print the chart it asks for the criteria again. Is there a way to prevent this and just print the report? Thanks. No trees were killed in the sending of this message. However a large number of electrons were terribly inconvenienced. _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From bruce_bruen at mlc.com.au Thu Jan 22 16:06:12 2004 From: bruce_bruen at mlc.com.au (bruce_bruen at mlc.com.au) Date: Fri, 23 Jan 2004 09:06:12 +1100 Subject: [AccessD] Worldwide Media exchange or is this a Schuss Boomer? Message-ID: The sign in the picture has been altered with the addition of black duct tape. MartyConnelly To: Access Developers discussion and problem solving Sent by: accessd-bounces at databasea cc: dvisors.com Subject: Re: [AccessD] Worldwide Media exchange or is this a Schuss Boomer? 23/01/2004 04:51 Please respond to Access Developers discussion and problem solving Old Austrian downhill skiing term to describe a daredevil skier or someone skiing on the verge of going out of control and skiing directly in the fall line all the way down the hill making very little turns. But the picture on the sign is a Kangaroo on skis or a boomer. Developer wrote: >Schuss boomer? > > >-----Original Message----- >From: accessd-bounces at databaseadvisors.com >[mailto:accessd-bounces at databaseadvisors.com] On Behalf Of MartyConnelly >Sent: Thursday, January 22, 2004 1:58 AM >To: Access Developers discussion and problem solving >Subject: [AccessD] Worldwide Media exchange or is this a Schuss Boomer? > > >http://wwmx.org/FullMediaView.aspx?mediaid=29423 >mainsite >http://wwmx.org/WebClient.aspx > >Here is a interesting new use of GPS and Images via ASP.net from >Microsoft Research. Free download of api and net client >For all surveillance lovers: microsoft research ask people from all >over the world to send in photos and the location data, where the photos > >were shot. they hope to collect "gazillions" of photos and make a visual > >map of the whole world... > > > -- Marty Connelly Victoria, B.C. Canada _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From kaupca at chevrontexaco.com Thu Jan 22 16:25:59 2004 From: kaupca at chevrontexaco.com (Kaup, Chester A) Date: Thu, 22 Jan 2004 16:25:59 -0600 Subject: [AccessD] Parameter Query asks twice Message-ID: <193572B4E0FC1744BEDFEE63F82CEC9E0F9749@bocnte2k4.boc.chevrontexaco.net> I really did not state the problem correctly the first time. The data from the drop down list on the form works fine in the query. The problem is that the SQL statement in the report asks for a date both when previewing the report and when printing the report. I am using Access 2002. Thanks -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Charlotte Foust Sent: Thursday, January 22, 2004 4:04 PM To: Access Developers discussion and problem solving Subject: RE: [AccessD] Parameter Query asks twice What version of Access are you using? Running reports based on parameter queries means that you have to pass the parameters to the query. Does the query reference the form? Is the form open when you're trying to run the report? Charlotte Foust -----Original Message----- From: Kaup, Chester A [mailto:kaupca at chevrontexaco.com] Sent: Thursday, January 22, 2004 1:23 PM To: accessd at databaseadvisors.com Subject: [AccessD] Parameter Query asks twice I have a form with a drop down list on it. Once an item is selected from the list it is used as the criteria for SQL statement that is the data row source for a chart on a report that opens in print preview. This work great. When I go to print the chart it asks for the criteria again. Is there a way to prevent this and just print the report? Thanks. No trees were killed in the sending of this message. However a large number of electrons were terribly inconvenienced. _______________________________________________ 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 From weeden1949 at hotmail.com Thu Jan 22 17:05:24 2004 From: weeden1949 at hotmail.com (Greg Smith) Date: Thu, 22 Jan 2004 17:05:24 -0600 Subject: [AccessD] Remove Punctuation References: <000001c3e127$76222830$082da8c0@D58BT131> Message-ID: Perry: That's a good question. One that the State Recorder's are still wrestling with since they came up with this stroke of brilliance. If we leave the 'history' data alone, they'll have to do a 'double search' to make sure they get every occurance of, say, "Smith, Greg W." if all the current history stays as it is, and everything after Feb 1 is changed to no punctuation. They are apparently striving for consistancy in the data, but by doing this, they are causing inconsistancy to say the least. And each individual recorder's office can choose to either change the history or not. Gives me a headache just to think about what the result of this is. But, we'll play if they pay. Right now they are leaning toward NOT changing the history. Sigh. Methinks it's time for a brewsky...after I get home. Or more. Greg ----- Original Message ----- From: "Perry Harold" To: "'Access Developers discussion and problem solving'" Sent: Thursday, January 22, 2004 2:36 PM Subject: RE: [AccessD] Remove Punctuation As an aside - If you ever need to identify the last name again (assuming that the field is a Full Name field from your example), how will you find any multiple-name last names that don't include dashes? Perry Harold -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Greg Smith Sent: Thursday, January 22, 2004 11:57 AM To: Access Developers discussion and problem solving Subject: [AccessD] Remove Punctuation Hello everyone! Greetings from Frigid Iowa. Access 97. I need to remove punctuation from a single field in a table which has about 1,500,000 records in it...so far. It's only 4 columns wide, but fairly lengthy. blah blah blah...;) From wdhindman at bellsouth.net Thu Jan 22 17:55:59 2004 From: wdhindman at bellsouth.net (William Hindman) Date: Thu, 22 Jan 2004 18:55:59 -0500 Subject: [AccessD] Remove Punctuation References: <000001c3e127$76222830$082da8c0@D58BT131> Message-ID: <007201c3e143$48f7e590$6101a8c0@dejpolsys> ...bureaucrats! ...this game gets really out of hand when you start putting in names like Dong Wong Song Jong, etc. ...the only real answer is to parse the name into separate fields and concatenate all subsequent versions on demand ...otherwise you inevitably get data entry errors and dupes :( William Hindman - Next Year In The Free State! ----- Original Message ----- From: "Greg Smith" To: "Access Developers discussion and problem solving" Sent: Thursday, January 22, 2004 6:05 PM Subject: Re: [AccessD] Remove Punctuation > Perry: > > That's a good question. One that the State Recorder's are still wrestling > with since they came up with this stroke of brilliance. If we leave the > 'history' data alone, they'll have to do a 'double search' to make sure they > get every occurance of, say, "Smith, Greg W." if all the current history > stays as it is, and everything after Feb 1 is changed to no punctuation. > They are apparently striving for consistancy in the data, but by doing this, > they are causing inconsistancy to say the least. And each individual > recorder's office can choose to either change the history or not. Gives me > a headache just to think about what the result of this is. > > But, we'll play if they pay. Right now they are leaning toward NOT changing > the history. Sigh. > > Methinks it's time for a brewsky...after I get home. Or more. > > Greg > > > ----- Original Message ----- > From: "Perry Harold" > To: "'Access Developers discussion and problem solving'" > > Sent: Thursday, January 22, 2004 2:36 PM > Subject: RE: [AccessD] Remove Punctuation > > > As an aside - If you ever need to identify the last name again (assuming > that the field is a Full Name field from your example), how will you find > any multiple-name last names that don't include dashes? > > Perry Harold > > -----Original Message----- > From: accessd-bounces at databaseadvisors.com > [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Greg Smith > Sent: Thursday, January 22, 2004 11:57 AM > To: Access Developers discussion and problem solving > Subject: [AccessD] Remove Punctuation > > > Hello everyone! Greetings from Frigid Iowa. > > Access 97. > > I need to remove punctuation from a single field in a table which has about > 1,500,000 records in it...so far. It's only 4 columns wide, but fairly > lengthy. > > blah blah blah...;) > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com > From d.dick at uws.edu.au Thu Jan 22 17:54:31 2004 From: d.dick at uws.edu.au (Darren DICK) Date: Fri, 23 Jan 2004 10:54:31 +1100 Subject: [AccessD] A2K: Something new References: <20040122075409.551708087.serbach@new.rr.com> Message-ID: <00ab01c3e143$1757bbf0$19669a89@DDICK> Just a WAG but look for timers firing on the subs - even on the main I have had odd things happen to me when timers are firing. Especially quick timer intervals like 350 or 100 Good luck DD ----- Original Message ----- From: "Steven W. Erbach" To: "Access Developers discussion and problem solving" Sent: Friday, January 23, 2004 12:54 AM Subject: [AccessD] A2K: Something new > Dear Group, > > You think you've seen it all, when all of a sudden... > > I've taken over development and support of a domestic violence shelter statistics program. In my efforts to re-factor (how's that for an Extreme Programming term?) some of the data entry forms I've run into something odd. > > One of the main data entry forms (key field ChildID) has a subform which contains a Tab object. Each of the tabs on this subform contains a sub-subform. While getting familiar with the workings of the program I noticed that one of the sub-subforms did not have the proper linking fields set up. > > The subform's linking field is that same ChildID...but the RecordSource table for the subform is NOT keyed! The sub-subform in question also has only ChildID as the linking field...but the key field for the sub-subform's table is FreeFormID. ChildID is a foreign key in that table. > > The behavior I'm seeing is this: when I go to check the linking fields in the subform I noticed that the VB window's title bar shows the following: > > Microsoft Visual Basic - STATISTICS [running] > > After a moment I see the Subform Field Linker dialog box. While the dialog box is on-screen the title bar of the VB window shows [running]. When I close the dialog box the VB window flashes and [running] disappears from the title bar. > > But when I go to check the linking fields for the sub-subform in question, [running] appears once again in the VB title bar, but then I see a Microsoft Access dialog box with the following message and OK button: > > Object variable or With block variable not set > > ...as if the application was trying to start itself! I can't get at the Subform Field Linker dialog box at all. When I click OK on the dialog box the VB window flashes and [running] disappears from the title bar. > > So I tried deleting the sub-subform and placing it on the tab page again. When I've finished using the subform tool to place the object on the tab page, I get another dialog box labeled "StatsTracker" (the name of the application): > > Your code contains a syntax error, or a Stats Tracker function you need isn't available. > If the syntax is correct, check the Control Wizards subkey or the Libraries key in the StatsTracker section of the Windows Registry to verify that the entries you need are listed and available. > > I click OK and I see the subform object on the tab page. I can assign the Source Object property, but when I go to Link Master Fields I get the "Object variable or With block variable not set" message. > > Can any of you figure out what's happening to me here? Thank you. > > Regards, > > Steve Erbach > Scientific Marketing > Neenah, WI > 920-969-0504 > > Message created with Bloomba > > Disclaimer: No tree was killed in the transmission of this message. However, several coulombs of electrons were temporarily inconvenienced. > > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com From bruce_bruen at mlc.com.au Thu Jan 22 18:03:54 2004 From: bruce_bruen at mlc.com.au (bruce_bruen at mlc.com.au) Date: Fri, 23 Jan 2004 11:03:54 +1100 Subject: [AccessD] Remove Punctuation Message-ID: Not to mention His Exellecy Professor Dr Emile d'Artigan van den Brook Junior III or the illustious Mr Y "William Hindman" To: "Access Developers discussion and problem solving" Sent by: accessd-bounces at databasea cc: dvisors.com Subject: Re: [AccessD] Remove Punctuation 23/01/2004 10:55 Please respond to Access Developers discussion and problem solving ...bureaucrats! ...this game gets really out of hand when you start putting in names like Dong Wong Song Jong, etc. ...the only real answer is to parse the name into separate fields and concatenate all subsequent versions on demand ...otherwise you inevitably get data entry errors and dupes :( William Hindman - Next Year In The Free State! ----- Original Message ----- From: "Greg Smith" To: "Access Developers discussion and problem solving" Sent: Thursday, January 22, 2004 6:05 PM Subject: Re: [AccessD] Remove Punctuation > Perry: > > That's a good question. One that the State Recorder's are still wrestling > with since they came up with this stroke of brilliance. If we leave the > 'history' data alone, they'll have to do a 'double search' to make sure they > get every occurance of, say, "Smith, Greg W." if all the current history > stays as it is, and everything after Feb 1 is changed to no punctuation. > They are apparently striving for consistancy in the data, but by doing this, > they are causing inconsistancy to say the least. And each individual > recorder's office can choose to either change the history or not. Gives me > a headache just to think about what the result of this is. > > But, we'll play if they pay. Right now they are leaning toward NOT changing > the history. Sigh. > > Methinks it's time for a brewsky...after I get home. Or more. > > Greg > > > ----- Original Message ----- > From: "Perry Harold" > To: "'Access Developers discussion and problem solving'" > > Sent: Thursday, January 22, 2004 2:36 PM > Subject: RE: [AccessD] Remove Punctuation > > > As an aside - If you ever need to identify the last name again (assuming > that the field is a Full Name field from your example), how will you find > any multiple-name last names that don't include dashes? > > Perry Harold > > -----Original Message----- > From: accessd-bounces at databaseadvisors.com > [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Greg Smith > Sent: Thursday, January 22, 2004 11:57 AM > To: Access Developers discussion and problem solving > Subject: [AccessD] Remove Punctuation > > > Hello everyone! Greetings from Frigid Iowa. > > Access 97. > > I need to remove punctuation from a single field in a table which has about > 1,500,000 records in it...so far. It's only 4 columns wide, but fairly > lengthy. > > blah blah blah...;) > _______________________________________________ > 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 From davesharpe2 at cox.net Thu Jan 22 18:14:15 2004 From: davesharpe2 at cox.net (Dave Sharpe) Date: Thu, 22 Jan 2004 19:14:15 -0500 Subject: [AccessD] query that deletess dups ? References: <15839630195.20040121190042@cactus.dk> <25088.12.3.132.98.1074806422.squirrel@heck.bay9.com> Message-ID: <003a01c3e145$d651bd60$dd2f0a44@bcsext6137> Oleg ( I think ) As there have been no attempts yet; I googled and found the following that looks like it should help You. http://www.databasejournal.com/features/msaccess/article.php/3077791 Dave ----- Original Message ----- From: To: Sent: Thursday, January 22, 2004 4:20 PM Subject: [AccessD] query that deletess dups ? How can I delete dup records ? Anyone can give me a hint... SELECT DISTINCTROW [emp table].[employee number], [emp table].[employee name], [emp table].COMPANY FROM [emp table] WHERE ((([emp table].[employee number]) In (SELECT [employee number] FROM [emp table] As Tmp GROUP BY [employee number],[employee name] HAVING Count(*)>1 And [employee name] = [emp table].[employee name]))) ORDER BY [emp table].[employee number], [emp table].[employee name]; ----------------------------------------- Get Breaking News from CNN, ABC, NBC, CBS Now. http://www.xuppa.com/news/?link=webmail _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From bruce_bruen at mlc.com.au Thu Jan 22 18:19:34 2004 From: bruce_bruen at mlc.com.au (bruce_bruen at mlc.com.au) Date: Fri, 23 Jan 2004 11:19:34 +1100 Subject: [AccessD] query that deletess dups ? Message-ID: Check the archives, I had a similar problem last year. I believe it was either Wiliam H or Gustav thtat provided the answer using a select first, last or max field in the table you wish to delete from. You could search on my surname. Sorry, the actual anser is on a drive I dont have anymore.... Bruce "Dave Sharpe" To: "Access Developers discussion and problem solving" Sent by: accessd-bounces at databasea cc: dvisors.com Subject: Re: [AccessD] query that deletess dups ? 23/01/2004 11:14 Please respond to Access Developers discussion and problem solving Oleg ( I think ) As there have been no attempts yet; I googled and found the following that looks like it should help You. http://www.databasejournal.com/features/msaccess/article.php/3077791 Dave ----- Original Message ----- From: To: Sent: Thursday, January 22, 2004 4:20 PM Subject: [AccessD] query that deletess dups ? How can I delete dup records ? Anyone can give me a hint... SELECT DISTINCTROW [emp table].[employee number], [emp table].[employee name], [emp table].COMPANY FROM [emp table] WHERE ((([emp table].[employee number]) In (SELECT [employee number] FROM [emp table] As Tmp GROUP BY [employee number],[employee name] HAVING Count(*)>1 And [employee name] = [emp table].[employee name]))) ORDER BY [emp table].[employee number], [emp table].[employee name]; ----------------------------------------- Get Breaking News from CNN, ABC, NBC, CBS Now. http://www.xuppa.com/news/?link=webmail _______________________________________________ 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 From ssharkins at bellsouth.net Thu Jan 22 18:55:00 2004 From: ssharkins at bellsouth.net (Susan Harkins) Date: Thu, 22 Jan 2004 19:55:00 -0500 Subject: [AccessD] modifying Outlook contact items from Access References: <46B976F2B698FF46A4FE7636509B22DF72B6@stekelbes.ithelps.local> Message-ID: <000601c3e14b$91b1eee0$210110ac@SUSANONE> Thanks Erwin -- I've found lots of examples for adding new contact items. What I haven't found is an example of modifying an existing one. There must be a method I'm not aware of or perhaps I'm working with the wrong collection --just simply setting a equality's statement doesn't work. It doesn't return an error, but it doesn't work either. For Each itm In fld.Items If itm.Class = olContact Then If itm = rst(0) Then itm.Birthday = rst(1) End If End If Next where rst is a simple two field record and rst(1) equals the new birthday. Susan H. ----- Original Message ----- From: "Erwin Craps - IT Helps" To: "Access Developers discussion and problem solving" Sent: Thursday, January 22, 2004 4:18 PM Subject: RE: [AccessD] modifying Outlook contact items from Access > Hi Susan > > Here's some code that creates contacts in Outlook from Access. > The function needs adapting, cause I grabbed it right of my app... > > > > > Public Function CreateContactsInOutlook() > ' Comments : > ' Parameters: - > ' Modified : > ' > ' -------------------------------------------------- > 'TVCodeTools ErrorEnablerStart > On Error GoTo PROC_ERR > 'TVCodeTools ErrorEnablerEnd > > Dim oOut As Outlook.Application > Dim oNSpace As Outlook.NameSpace > Dim oFolderContact As Outlook.MAPIFolder > Dim oFolder As Outlook.MAPIFolder > Dim objOItem As Object > Dim strFolderName As String > Dim rsCust As Recordset > Dim strSQL As String > Dim intCounter As Integer > Dim lngItemCounter As Long > Dim varCUST_GID As Variant > > DoCmd.Hourglass True > > Set oOut = Outlook.Application > Set oNSpace = oOut.GetNamespace("MAPI") > Set oFolderContact = oNSpace.GetDefaultFolder(olFolderContacts) > > 'Create Folders > strFolderName = "IT Helps Relations" > On Error Resume Next > Set oFolder = oFolderContact.Folders(strFolderName) > If Err <> 0 Then > On Error GoTo PROC_ERR > Set oFolder = oFolderContact.Folders.Add(strFolderName, > olFolderContacts) > Else > For lngItemCounter = > oFolderContact.Folders(strFolderName).Items.Count To 1 Step -1 > > oFolderContact.Folders(strFolderName).Items(lngItemCounter).Delete > DoEvents > Next lngItemCounter > End If > On Error Resume Next > oFolder.ShowAsOutlookAB = True > On Error GoTo PROC_ERR > > > strSQL = "SELECT CUST_Main.*, CUST_Names.CUST_LID, > CUST_Names.Mailing ,CUST_Names.Language_LID, SUB_L_Titles.Title, > SUB_L_Titles.LetterStart, CUST_Names.FirstName, CUST_Names.SurName, > CUST_Names.DirectFax, CUST_Names.DirectPhone, CUST_Names.Email, > CUST_Names.GSMnumber, SUB_L_Countries.Country " _ > & "FROM SUB_L_Countries RIGHT JOIN (CUST_Main LEFT JOIN > (SUB_L_Titles RIGHT JOIN CUST_Names ON SUB_L_Titles.Title_LID = > CUST_Names.Title_LID) ON CUST_Main.CUST_GID = CUST_Names.CUST_GID) ON > SUB_L_Countries.Country_LID = CUST_Main.Country_LID " _ > & "WHERE CUST_Names.Mailing = true " _ > & " ORDER BY CUST_Main.CUST_GID;" > > Set rsCust = CurrentDb.OpenRecordset(strSQL, dbOpenDynaset) > > With rsCust > Do While rsCust.EOF = False > 'Save Main company data > If varCUST_GID <> .Fields("CUST_GID") Then > If (Nz(.Fields("MainPhone")) <> "") Or > (Nz(.Fields("EmailAddress")) <> "") Then > Set objOItem = > oFolderContact.Folders(strFolderName).Items.Add(olContactItem) > objOItem.BusinessAddressCity = Nz(.Fields("City")) > objOItem.BusinessAddressCountry = > Nz(.Fields("Country")) > objOItem.BusinessAddressPostalCode = > Nz(.Fields("Postalcode")) > objOItem.BusinessAddressStreet = > Nz(.Fields("Street")) > objOItem.BusinessFaxNumber = > InternationalPhone(Nz(.Fields("MainFax"))) > objOItem.BusinessTelephoneNumber = > InternationalPhone(Nz(.Fields("MainPhone"))) > objOItem.CompanyName = Nz(.Fields("Company")) > objOItem.CustomerID = Nz(.Fields("CUST_GID")) > objOItem.Email1AddressType = "SMTP" > objOItem.Email1Address = Nz(.Fields("EmailAddress")) > objOItem.Fullname = Nz(.Fields("Company")) > objOItem.FileAs = objOItem.Fullname > objOItem.Save > End If > End If > > 'Save Contact person data > If (Nz(.Fields("DirectPhone")) <> "") Or > (Nz(.Fields("GSMnumber")) <> "") Or (Nz(.Fields("Email")) <> "") Then > Set objOItem = > oFolderContact.Folders(strFolderName).Items.Add(olContactItem) > objOItem.BusinessAddressCity = Nz(.Fields("City")) > objOItem.BusinessAddressCountry = Nz(.Fields("Country")) > objOItem.BusinessAddressPostalCode = > Nz(.Fields("Postalcode")) > objOItem.BusinessAddressStreet = Nz(.Fields("Street")) > objOItem.BusinessFaxNumber = > InternationalPhone(Nz(.Fields("DirectFax"))) > objOItem.BusinessTelephoneNumber = > InternationalPhone(Nz(.Fields("DirectPhone"))) > objOItem.MobileTelephoneNumber = > InternationalPhone(Nz(.Fields("GSMnumber"))) > objOItem.CompanyName = Nz(.Fields("Company")) > objOItem.CustomerID = Nz(.Fields("CUST_LID")) > objOItem.Email1AddressType = "SMTP" > objOItem.Email1Address = Nz(.Fields("Email")) > objOItem.FirstName = Nz(.Fields("Firstname")) > objOItem.LastName = Nz(.Fields("Surname")) > objOItem.Title = Nz(.Fields("Title")) > objOItem.Fullname = Nz(.Fields("Surname")) & ", " & > Nz(.Fields("Firstname")) > objOItem.FileAs = objOItem.Fullname > objOItem.Save > End If > varCUST_GID = .Fields("CUST_GID") > .MoveNext > Loop > End With > > > 'TVCodeTools ErrorHandlerStart > PROC_EXIT: > On Error Resume Next > rsCust.Close > Set rsCust = Nothing > Set oFolder = Nothing > Set oFolderContact = Nothing > Set oNSpace = Nothing > Set oOut = Nothing > DoCmd.Hourglass False > MsgBox "Finished!" > Exit Function > > PROC_ERR: > Select Case Err > Case 0 > 'Do Nothing > Case Else > MsgBox Err.Description & vbCrLf & "CreateContactsInOutlook", > vbOKOnly, "ERROR:" & Err.Number > Resume PROC_EXIT > End Select > 'TVCodeTools ErrorHandlerEnd > > End Function > > > > > -----Oorspronkelijk bericht----- > Van: accessd-bounces at databaseadvisors.com > [mailto:accessd-bounces at databaseadvisors.com] Namens MartyConnelly > Verzonden: donderdag 22 januari 2004 21:04 > Aan: Access Developers discussion and problem solving > Onderwerp: Re: [AccessD] modifying Outlook contact items from Access > > > There is an Exchange OLEDB Provider available for those that use it. > > http://msdn.microsoft.com/library/default.asp?url=/library/en-us/wss/wss > /_exch2k_search_tasks.asp > And this method might work > > This article describes how you can open a connection to a Microsoft > Exchange or to a Microsoft Outlook mailbox by using ActiveX Data Objects > > (ADO) and the Jet OLE DB provider > http://support.microsoft.com/?kbid=275262 > > Susan Harkins wrote: > > >This is for instructional purposes, so I have to do it the long hard > >way. :) > > > >I can import the data into Access, modify it, and send it back to > >Outlook. I'm just wondering if there isn't a more direct route -- it > >would be cool if I could connect an Access form's to a recordset that's > > >connected directly to Outlook -- so the changes in Access would be > >immediate -- I just don't know if that's possible, or even the best way > > >to go about it. > > > >Susan H. > > > > > > > > > >>Hi Susan > >>Well I cheat. I have a number of Outlook address books some of which > >>are based on Access data. I use a 3rd-party product which each night > >>wipes out these address books, extracts the Access data and rebuilds > >>the address books. Works like a charm. I could no doubt write > >>something but as the product existed..... See > >>http://www.teamscope.com/otherpro/datalink.asp > >> > >> > >>Andy Lacey > >>http://www.minstersystems.co.uk > >> > >> > >> > >>>-----Original Message----- > >>>From: accessd-bounces at databaseadvisors.com > >>>[mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Susan > >>>Harkins > >>>Sent: 22 January 2004 17:26 > >>>To: AccessD at databaseadvisors.com > >>>Subject: [AccessD] modifying Outlook contact items from Access > >>> > >>> > >>>I'm familiar enough with the Outlook model that importing Contact > >>>data into Access is easy -- but I'm wondering if any of you use > >>>Access to actually modify Outlook contact information? I haven't even > > >>>started, but would be interested in hearing how others do it. I know > >>>you can link, but that only works if Outlook is the default mail > >>>client. > >>> > >>>Susan H. > >>> > >>>_______________________________________________ > >>>AccessD mailing list > >>>AccessD at databaseadvisors.com > >>>http://databaseadvisors.com/mailman/listinfo/a> ccessd > >>>Website: > >>>http://www.databaseadvisors.com > >>> > >>> > >>> > >>> > >>_______________________________________________ > >>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 > > > > > > > > -- > Marty Connelly > Victoria, B.C. > Canada > > > > _______________________________________________ > 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 > From jwcolby at colbyconsulting.com Thu Jan 22 20:52:41 2004 From: jwcolby at colbyconsulting.com (John W. Colby) Date: Thu, 22 Jan 2004 21:52:41 -0500 Subject: [AccessD] Vonage Message-ID: Is anyone using this? Comments? http://www.vonage.com John W. Colby www.ColbyConsulting.com From andy at minstersystems.co.uk Fri Jan 23 01:36:47 2004 From: andy at minstersystems.co.uk (Andy Lacey) Date: Fri, 23 Jan 2004 07:36:47 -0000 Subject: [AccessD] Parameter Query asks twice In-Reply-To: <193572B4E0FC1744BEDFEE63F82CEC9E0F9749@bocnte2k4.boc.chevrontexaco.net> Message-ID: <009401c3e183$a875be80$b274d0d5@minster33c3r25> Chester If your report's recordsource refers correctly to the form's list field as its criteria (ie =Forms.[frmYourForm].[ctlName] ) then there should be no prompt at all. It should just work. If you're getting prompted then you've either got a criteria that Access can't resolve (maybe mistyped) or you've actually listed something in the Parameters box within the report definition. If the latter, delete it. Andy Lacey http://www.minstersystems.co.uk > -----Original Message----- > From: accessd-bounces at databaseadvisors.com > [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of > Kaup, Chester A > Sent: 22 January 2004 22:26 > To: Access Developers discussion and problem solving > Subject: RE: [AccessD] Parameter Query asks twice > > > I really did not state the problem correctly the first time. > The data from the drop down list on the form works fine in > the query. The problem is that the SQL statement in the > report asks for a date both when previewing the report and > when printing the report. > > I am using Access 2002. > > Thanks > > > -----Original Message----- > From: accessd-bounces at databaseadvisors.com > [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of > Charlotte Foust > Sent: Thursday, January 22, 2004 4:04 PM > To: Access Developers discussion and problem solving > Subject: RE: [AccessD] Parameter Query asks twice > > > What version of Access are you using? Running reports based > on parameter queries means that you have to pass the > parameters to the query. Does the query reference the form? > Is the form open when you're trying to run the report? > > Charlotte Foust > > -----Original Message----- > From: Kaup, Chester A [mailto:kaupca at chevrontexaco.com] > Sent: Thursday, January 22, 2004 1:23 PM > To: accessd at databaseadvisors.com > Subject: [AccessD] Parameter Query asks twice > > > I have a form with a drop down list on it. Once an item is > selected from the list it is used as the criteria for SQL > statement that is the data row source for a chart on a report > that opens in print preview. This work great. When I go to > print the chart it asks for the criteria again. Is there a > way to prevent this and just print the report? Thanks. > > No trees were killed in the sending of this message. However > a large number of electrons were terribly inconvenienced. > > > > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/a> ccessd > Website: > http://www.databaseadvisors.com > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/a> ccessd > Website: > http://www.databaseadvisors.com > > > > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/a> ccessd > Website: > http://www.databaseadvisors.com > > From accessd666 at yahoo.com Fri Jan 23 03:44:14 2004 From: accessd666 at yahoo.com (Sad Der) Date: Fri, 23 Jan 2004 01:44:14 -0800 (PST) Subject: [AccessD] Create New DB + link table check (Was: Major Performance issue) Message-ID: <20040123094414.54603.qmail@web60206.mail.yahoo.com> Hi group, I've got a solution to my performance problem. Before the users start their analyses I copy the data to the local database! Copying the data takes about 45-55 seconds, calculating the data LESS THEN 2 seconds!! :-) I don't want this copied data in the original client so I want to create a new mdb. I don't have my A2KDH Enterprise Edition with me I'm asking you guys. Does anybody have a (set of) function(s) to create a DB with tables and link to it? I've searched wolfwares.com but I couldn't find any of it and this subject has to be discussed here at some point....or not? The idea is: User needs to use the Analyses tool Create new TEMP DB (duration: ?) Create tables (duration: ?) Check links (duration: ?) Copy data from BE (duration: 45-55 seconds) When user stops the MAIN application (= Analyses tool is part of the MAIN application) delete the TEMP DB. TIA Sad __________________________________ Do you Yahoo!? Yahoo! SiteBuilder - Free web site building tool. Try it! http://webhosting.yahoo.com/ps/sb/ From awithing at twcny.rr.com Fri Jan 23 04:37:39 2004 From: awithing at twcny.rr.com (augusta) Date: Fri, 23 Jan 2004 05:37:39 -0500 Subject: [AccessD] Vonage In-Reply-To: Message-ID: <000b01c3e19c$efed4d00$6401a8c0@dell8200> I signed up a few weeks ago. It may or may not have wrecked just a bit of havoc on my (fairly complicated) network. But overall I love it! The only bummer is that you always have to dial the 1+area code . . . (But I hear some in NJ are doing that already). Great price! > -----Original Message----- > From: accessd-bounces at databaseadvisors.com [mailto:accessd- > bounces at databaseadvisors.com] On Behalf Of John W. Colby > Sent: Thursday, January 22, 2004 9:53 PM > To: AccessD > Subject: [AccessD] Vonage > > Is anyone using this? Comments? > > http://www.vonage.com > > John W. Colby > www.ColbyConsulting.com > > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com From Erwin.Craps at ithelps.be Fri Jan 23 05:08:16 2004 From: Erwin.Craps at ithelps.be (Erwin Craps - IT Helps) Date: Fri, 23 Jan 2004 12:08:16 +0100 Subject: [AccessD] modifying Outlook contact items from Access Message-ID: <46B976F2B698FF46A4FE7636509B22DF03D15A@stekelbes.ithelps.local> Have a bit of a hangover today... I live in a 35000 students-city and Thursday night is out-night (for me that is once every tree months due to, well not used anymore. It takes me tree months to recuperate :-)... I'll try to take a small peak in to it. But you should be able to change data with adapting my routine to edit rather than new. Erwin -----Oorspronkelijk bericht----- Van: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] Namens Susan Harkins Verzonden: vrijdag 23 januari 2004 1:55 Aan: Access Developers discussion and problem solving Onderwerp: Re: [AccessD] modifying Outlook contact items from Access Thanks Erwin -- I've found lots of examples for adding new contact items. What I haven't found is an example of modifying an existing one. There must be a method I'm not aware of or perhaps I'm working with the wrong collection --just simply setting a equality's statement doesn't work. It doesn't return an error, but it doesn't work either. For Each itm In fld.Items If itm.Class = olContact Then If itm = rst(0) Then itm.Birthday = rst(1) End If End If Next where rst is a simple two field record and rst(1) equals the new birthday. Susan H. ----- Original Message ----- From: "Erwin Craps - IT Helps" To: "Access Developers discussion and problem solving" Sent: Thursday, January 22, 2004 4:18 PM Subject: RE: [AccessD] modifying Outlook contact items from Access > Hi Susan > > Here's some code that creates contacts in Outlook from Access. > The function needs adapting, cause I grabbed it right of my app... > > > > > Public Function CreateContactsInOutlook() > ' Comments : > ' Parameters: - > ' Modified : > ' > ' -------------------------------------------------- > 'TVCodeTools ErrorEnablerStart > On Error GoTo PROC_ERR > 'TVCodeTools ErrorEnablerEnd > > Dim oOut As Outlook.Application > Dim oNSpace As Outlook.NameSpace > Dim oFolderContact As Outlook.MAPIFolder > Dim oFolder As Outlook.MAPIFolder > Dim objOItem As Object > Dim strFolderName As String > Dim rsCust As Recordset > Dim strSQL As String > Dim intCounter As Integer > Dim lngItemCounter As Long > Dim varCUST_GID As Variant > > DoCmd.Hourglass True > > Set oOut = Outlook.Application > Set oNSpace = oOut.GetNamespace("MAPI") > Set oFolderContact = oNSpace.GetDefaultFolder(olFolderContacts) > > 'Create Folders > strFolderName = "IT Helps Relations" > On Error Resume Next > Set oFolder = oFolderContact.Folders(strFolderName) > If Err <> 0 Then > On Error GoTo PROC_ERR > Set oFolder = oFolderContact.Folders.Add(strFolderName, > olFolderContacts) > Else > For lngItemCounter = > oFolderContact.Folders(strFolderName).Items.Count To 1 Step -1 > > oFolderContact.Folders(strFolderName).Items(lngItemCounter).Delete > DoEvents > Next lngItemCounter > End If > On Error Resume Next > oFolder.ShowAsOutlookAB = True > On Error GoTo PROC_ERR > > > strSQL = "SELECT CUST_Main.*, CUST_Names.CUST_LID, > CUST_Names.Mailing ,CUST_Names.Language_LID, SUB_L_Titles.Title, > SUB_L_Titles.LetterStart, CUST_Names.FirstName, CUST_Names.SurName, > CUST_Names.DirectFax, CUST_Names.DirectPhone, CUST_Names.Email, > CUST_Names.GSMnumber, SUB_L_Countries.Country " _ > & "FROM SUB_L_Countries RIGHT JOIN (CUST_Main LEFT JOIN > (SUB_L_Titles RIGHT JOIN CUST_Names ON SUB_L_Titles.Title_LID = > CUST_Names.Title_LID) ON CUST_Main.CUST_GID = CUST_Names.CUST_GID) ON > SUB_L_Countries.Country_LID = CUST_Main.Country_LID " _ > & "WHERE CUST_Names.Mailing = true " _ > & " ORDER BY CUST_Main.CUST_GID;" > > Set rsCust = CurrentDb.OpenRecordset(strSQL, dbOpenDynaset) > > With rsCust > Do While rsCust.EOF = False > 'Save Main company data > If varCUST_GID <> .Fields("CUST_GID") Then > If (Nz(.Fields("MainPhone")) <> "") Or > (Nz(.Fields("EmailAddress")) <> "") Then > Set objOItem = > oFolderContact.Folders(strFolderName).Items.Add(olContactItem) > objOItem.BusinessAddressCity = Nz(.Fields("City")) > objOItem.BusinessAddressCountry = > Nz(.Fields("Country")) > objOItem.BusinessAddressPostalCode = > Nz(.Fields("Postalcode")) > objOItem.BusinessAddressStreet = > Nz(.Fields("Street")) > objOItem.BusinessFaxNumber = > InternationalPhone(Nz(.Fields("MainFax"))) > objOItem.BusinessTelephoneNumber = > InternationalPhone(Nz(.Fields("MainPhone"))) > objOItem.CompanyName = Nz(.Fields("Company")) > objOItem.CustomerID = Nz(.Fields("CUST_GID")) > objOItem.Email1AddressType = "SMTP" > objOItem.Email1Address = Nz(.Fields("EmailAddress")) > objOItem.Fullname = Nz(.Fields("Company")) > objOItem.FileAs = objOItem.Fullname > objOItem.Save > End If > End If > > 'Save Contact person data > If (Nz(.Fields("DirectPhone")) <> "") Or > (Nz(.Fields("GSMnumber")) <> "") Or (Nz(.Fields("Email")) <> "") Then > Set objOItem = > oFolderContact.Folders(strFolderName).Items.Add(olContactItem) > objOItem.BusinessAddressCity = Nz(.Fields("City")) > objOItem.BusinessAddressCountry = Nz(.Fields("Country")) > objOItem.BusinessAddressPostalCode = > Nz(.Fields("Postalcode")) > objOItem.BusinessAddressStreet = Nz(.Fields("Street")) > objOItem.BusinessFaxNumber = > InternationalPhone(Nz(.Fields("DirectFax"))) > objOItem.BusinessTelephoneNumber = > InternationalPhone(Nz(.Fields("DirectPhone"))) > objOItem.MobileTelephoneNumber = > InternationalPhone(Nz(.Fields("GSMnumber"))) > objOItem.CompanyName = Nz(.Fields("Company")) > objOItem.CustomerID = Nz(.Fields("CUST_LID")) > objOItem.Email1AddressType = "SMTP" > objOItem.Email1Address = Nz(.Fields("Email")) > objOItem.FirstName = Nz(.Fields("Firstname")) > objOItem.LastName = Nz(.Fields("Surname")) > objOItem.Title = Nz(.Fields("Title")) > objOItem.Fullname = Nz(.Fields("Surname")) & ", " & > Nz(.Fields("Firstname")) > objOItem.FileAs = objOItem.Fullname > objOItem.Save > End If > varCUST_GID = .Fields("CUST_GID") > .MoveNext > Loop > End With > > > 'TVCodeTools ErrorHandlerStart > PROC_EXIT: > On Error Resume Next > rsCust.Close > Set rsCust = Nothing > Set oFolder = Nothing > Set oFolderContact = Nothing > Set oNSpace = Nothing > Set oOut = Nothing > DoCmd.Hourglass False > MsgBox "Finished!" > Exit Function > > PROC_ERR: > Select Case Err > Case 0 > 'Do Nothing > Case Else > MsgBox Err.Description & vbCrLf & > "CreateContactsInOutlook", vbOKOnly, "ERROR:" & Err.Number > Resume PROC_EXIT > End Select > 'TVCodeTools ErrorHandlerEnd > > End Function > > > > > -----Oorspronkelijk bericht----- > Van: accessd-bounces at databaseadvisors.com > [mailto:accessd-bounces at databaseadvisors.com] Namens MartyConnelly > Verzonden: donderdag 22 januari 2004 21:04 > Aan: Access Developers discussion and problem solving > Onderwerp: Re: [AccessD] modifying Outlook contact items from Access > > > There is an Exchange OLEDB Provider available for those that use it. > > http://msdn.microsoft.com/library/default.asp?url=/library/en-us/wss/w > ss > /_exch2k_search_tasks.asp > And this method might work > > This article describes how you can open a connection to a Microsoft > Exchange or to a Microsoft Outlook mailbox by using ActiveX Data > Objects > > (ADO) and the Jet OLE DB provider > http://support.microsoft.com/?kbid=275262 > > Susan Harkins wrote: > > >This is for instructional purposes, so I have to do it the long hard > >way. :) > > > >I can import the data into Access, modify it, and send it back to > >Outlook. I'm just wondering if there isn't a more direct route -- it > >would be cool if I could connect an Access form's to a recordset > >that's > > >connected directly to Outlook -- so the changes in Access would be > >immediate -- I just don't know if that's possible, or even the best > >way > > >to go about it. > > > >Susan H. > > > > > > > > > >>Hi Susan > >>Well I cheat. I have a number of Outlook address books some of which > >>are based on Access data. I use a 3rd-party product which each night > >>wipes out these address books, extracts the Access data and rebuilds > >>the address books. Works like a charm. I could no doubt write > >>something but as the product existed..... See > >>http://www.teamscope.com/otherpro/datalink.asp > >> > >> > >>Andy Lacey > >>http://www.minstersystems.co.uk > >> > >> > >> > >>>-----Original Message----- > >>>From: accessd-bounces at databaseadvisors.com > >>>[mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Susan > >>>Harkins > >>>Sent: 22 January 2004 17:26 > >>>To: AccessD at databaseadvisors.com > >>>Subject: [AccessD] modifying Outlook contact items from Access > >>> > >>> > >>>I'm familiar enough with the Outlook model that importing Contact > >>>data into Access is easy -- but I'm wondering if any of you use > >>>Access to actually modify Outlook contact information? I haven't > >>>even > > >>>started, but would be interested in hearing how others do it. I > >>>know you can link, but that only works if Outlook is the default > >>>mail client. > >>> > >>>Susan H. > >>> > >>>_______________________________________________ > >>>AccessD mailing list > >>>AccessD at databaseadvisors.com > >>>http://databaseadvisors.com/mailman/listinfo/a> ccessd > >>>Website: > >>>http://www.databaseadvisors.com > >>> > >>> > >>> > >>> > >>_______________________________________________ > >>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 > > > > > > > > -- > Marty Connelly > Victoria, B.C. > Canada > > > > _______________________________________________ > 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 > _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From gustav at cactus.dk Fri Jan 23 06:03:24 2004 From: gustav at cactus.dk (Gustav Brock) Date: Fri, 23 Jan 2004 13:03:24 +0100 Subject: [AccessD] Create New DB + link table check (Was: Major Performance issue) In-Reply-To: <20040123094414.54603.qmail@web60206.mail.yahoo.com> References: <20040123094414.54603.qmail@web60206.mail.yahoo.com> Message-ID: <15514379096.20040123130324@cactus.dk> Hi Sad JC has a demo for this purpose: http://www.colbyconsulting.com/C2DbDemoBEBuild.htm But I wonder if this is the only method. If your source data are the same for all queries you can open a snapshot (which copies the data once), leave it open; then query this - which should take a couple of seconds. If you are able to write protect the frontend (main) then, of course, no temporary data will be written into it and no bloat will occur. /gustav > I've got a solution to my performance problem. Before > the users start their analyses I copy the data to the > local database! Copying the data takes about 45-55 > seconds, calculating the data LESS THEN 2 seconds!! > :-) > I don't want this copied data in the original client > so I want to create a new mdb. I don't have my A2KDH > Enterprise Edition with me I'm asking you guys. > Does anybody have a (set of) function(s) to create a > DB with tables and link to it? > I've searched wolfwares.com but I couldn't find any of > it and this subject has to be discussed here at some > point....or not? > The idea is: > User needs to use the Analyses tool > Create new TEMP DB (duration: ?) > Create tables (duration: ?) > Check links (duration: ?) > Copy data from BE (duration: 45-55 seconds) > When user stops the MAIN application (= Analyses tool > is part of the MAIN application) delete the TEMP DB. From serbach at new.rr.com Fri Jan 23 06:40:20 2004 From: serbach at new.rr.com (Steven W. Erbach) Date: Fri, 23 Jan 2004 06:40:20 -0600 Subject: [AccessD] A2K: Something new Message-ID: <20040123064020.1613214714.serbach@new.rr.com> Darren, >> look for timers firing on the subs << Not a bad WAG, but this application has a minimal amount of code. No timers. Now that I can get at the Subform Field Linker by putting the subform in design mode (rather than trying to get the Linker while designing the Main form and looking at the links in a sub-subform) I think I'll be all right. I guess that the [running] I see on the VB title bar just means that an Access wizard is running. Why that wizard chokes when I try to get the links in a sub-subform is the thing that puzzles me. Regards, Steve Erbach Scientific Marketing Neenah, WI 920-969-0504 Message created with Bloomba Disclaimer: No tree was killed in the transmission of this message. However, several coulombs of electrons were temporarily inconvenienced. From jwcolby at colbyconsulting.com Fri Jan 23 06:43:10 2004 From: jwcolby at colbyconsulting.com (John W. Colby) Date: Fri, 23 Jan 2004 07:43:10 -0500 Subject: [AccessD] subform only allows one record Message-ID: I need to set up a subform that only allows a single record to be entered. I have a function in the subform that checks if the recordsetclone.recordcount >0 and if so sets AllowAdditions = false. This works fine if any records already exist but if a new record is created, then if the person does a page down to save the first record, they end up in a second record. I am firing this function I built from the OnCurrent of the parent, as well as the OnCurrent of the subform itself. Haven't tried yet from before update. Does anyone do this kind of thing? If so how do you accomplish it? John W. Colby www.ColbyConsulting.com From DWUTKA at marlow.com Thu Jan 22 14:26:36 2004 From: DWUTKA at marlow.com (DWUTKA at marlow.com) Date: Thu, 22 Jan 2004 14:26:36 -0600 Subject: [AccessD] modifying Outlook contact items from Access Message-ID: <2F8793082E00D4119A1700B0D0216BF8022277A0@main2.marlow.com> Um, setup a linked table to an Outlook/Exchange Folder? What version of Access. It's there by default for A2k (and I would assume later versions...) but in 97, you have to download a free Add-in from Microsoft. Drew -----Original Message----- From: Susan Harkins [mailto:ssharkins at bellsouth.net] Sent: Thursday, January 22, 2004 12:34 PM To: Access Developers discussion and problem solving Subject: Re: [AccessD] modifying Outlook contact items from Access This is for instructional purposes, so I have to do it the long hard way. :) I can import the data into Access, modify it, and send it back to Outlook. I'm just wondering if there isn't a more direct route -- it would be cool if I could connect an Access form's to a recordset that's connected directly to Outlook -- so the changes in Access would be immediate -- I just don't know if that's possible, or even the best way to go about it. Susan H. > Hi Susan > Well I cheat. I have a number of Outlook address books some of which are > based on Access data. I use a 3rd-party product which each night wipes out > these address books, extracts the Access data and rebuilds the address > books. Works like a charm. I could no doubt write something but as the > product existed..... See http://www.teamscope.com/otherpro/datalink.asp > > > Andy Lacey > http://www.minstersystems.co.uk > > > -----Original Message----- > > From: accessd-bounces at databaseadvisors.com > > [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of > > Susan Harkins > > Sent: 22 January 2004 17:26 > > To: AccessD at databaseadvisors.com > > Subject: [AccessD] modifying Outlook contact items from Access > > > > > > I'm familiar enough with the Outlook model that importing > > Contact data into Access is easy -- but I'm wondering if any > > of you use Access to actually modify Outlook contact > > information? I haven't even started, but would be interested > > in hearing how others do it. I know you can link, but that > > only works if Outlook is the default mail client. > > > > Susan H. > > > > _______________________________________________ > > AccessD mailing list > > AccessD at databaseadvisors.com > > http://databaseadvisors.com/mailman/listinfo/a> ccessd > > Website: > > http://www.databaseadvisors.com > > > > > > _______________________________________________ > 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 From gustav at cactus.dk Fri Jan 23 07:13:39 2004 From: gustav at cactus.dk (Gustav Brock) Date: Fri, 23 Jan 2004 14:13:39 +0100 Subject: [AccessD] subform only allows one record In-Reply-To: References: Message-ID: <8018594016.20040123141339@cactus.dk> Hi John > I need to set up a subform that only allows a single record to be entered. > I have a function in the subform that checks if the > recordsetclone.recordcount >0 and if so sets AllowAdditions = false. This > works fine if any records already exist but if a new record is created, then > if the person does a page down to save the first record, they end up in a > second record. I am firing this function I built from the OnCurrent of the > parent, as well as the OnCurrent of the subform itself. Haven't tried yet > from before update. > Does anyone do this kind of thing? If so how do you accomplish it? If you can't or won't control this is at the table level, we have this generic function: Public Sub SetFormAllowAdditions( _ ByVal frm As Form, _ ByVal lngRecordCountMax As Long) ' Limits count of records in subform. ' ' Usage: ' Add this line for max. n rows: ' ' Call SetFormAllowAdditions(Me.Form, n) ' ' in these subs of the form: ' ' Form_AfterInsert() ' Form_AfterDelConfirm(Status As Integer) ' ' And in the main form: ' ' Call SetFormAllowAdditions(Me!subFrmControl.Form, n) ' ' in this sub of the main form: ' ' Form_Current() ' ' 2003-01-28. Cactus Data ApS. CPH. Dim booAllowAdditions As Boolean With frm booAllowAdditions = (.RecordsetClone.RecordCount < lngRecordCountMax) ' Only change edit state if needed. If booAllowAdditions <> .AllowAdditions Then .AllowAdditions = booAllowAdditions End If End With End Sub /gustav From JColby at dispec.com Fri Jan 23 09:05:11 2004 From: JColby at dispec.com (Colby, John) Date: Fri, 23 Jan 2004 10:05:11 -0500 Subject: [AccessD] subform only allows one record Message-ID: <05C61C52D7CAD211A7830008C7DF6F1079BD03@DISABILITYINS01> Gustav, Thanks for that. Controlling this at the table level means that the user is notified either when she attempts to create a new record or when she tries to save a new record. Either way is klunky. I don't want my users even seeing the new record if they already have one record or if they have just finished saving the first record. It is that "just finished saving" that is throwing me off. It's almost as if in order to leave this record (and thus save it) you must go to a new record which I don't want happening. John W. Colby The database guy -----Original Message----- From: Gustav Brock [mailto:gustav at cactus.dk] Sent: Friday, January 23, 2004 8:14 AM To: Access Developers discussion and problem solving Subject: Re: [AccessD] subform only allows one record Hi John > I need to set up a subform that only allows a single record to be entered. > I have a function in the subform that checks if the > recordsetclone.recordcount >0 and if so sets AllowAdditions = false. This > works fine if any records already exist but if a new record is created, then > if the person does a page down to save the first record, they end up in a > second record. I am firing this function I built from the OnCurrent of the > parent, as well as the OnCurrent of the subform itself. Haven't tried yet > from before update. > Does anyone do this kind of thing? If so how do you accomplish it? If you can't or won't control this is at the table level, we have this generic function: Public Sub SetFormAllowAdditions( _ ByVal frm As Form, _ ByVal lngRecordCountMax As Long) ' Limits count of records in subform. ' ' Usage: ' Add this line for max. n rows: ' ' Call SetFormAllowAdditions(Me.Form, n) ' ' in these subs of the form: ' ' Form_AfterInsert() ' Form_AfterDelConfirm(Status As Integer) ' ' And in the main form: ' ' Call SetFormAllowAdditions(Me!subFrmControl.Form, n) ' ' in this sub of the main form: ' ' Form_Current() ' ' 2003-01-28. Cactus Data ApS. CPH. Dim booAllowAdditions As Boolean With frm booAllowAdditions = (.RecordsetClone.RecordCount < lngRecordCountMax) ' Only change edit state if needed. If booAllowAdditions <> .AllowAdditions Then .AllowAdditions = booAllowAdditions End If End With End Sub /gustav _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From gustav at cactus.dk Fri Jan 23 09:22:09 2004 From: gustav at cactus.dk (Gustav Brock) Date: Fri, 23 Jan 2004 16:22:09 +0100 Subject: [AccessD] subform only allows one record In-Reply-To: <05C61C52D7CAD211A7830008C7DF6F1079BD03@DISABILITYINS01> References: <05C61C52D7CAD211A7830008C7DF6F1079BD03@DISABILITYINS01> Message-ID: <16426303542.20040123162209@cactus.dk> Hi John I agree, table level handling leaves you with error handling only - which is not very nice for the user. /gustav > Thanks for that. Controlling this at the table level means that the user is > notified either when she attempts to create a new record or when she tries > to save a new record. Either way is klunky. I don't want my users even > seeing the new record if they already have one record or if they have just > finished saving the first record. It is that "just finished saving" that is > throwing me off. It's almost as if in order to leave this record (and thus > save it) you must go to a new record which I don't want happening. > John W. Colby > The database guy From ssharkins at bellsouth.net Fri Jan 23 09:32:04 2004 From: ssharkins at bellsouth.net (Susan Harkins) Date: Fri, 23 Jan 2004 10:32:04 -0500 Subject: [AccessD] modifying Outlook contact items from Access References: <46B976F2B698FF46A4FE7636509B22DF03D15A@stekelbes.ithelps.local> Message-ID: <003e01c3e1c6$7ea829b0$210110ac@SUSANONE> > But you should be able to change data with adapting my routine to edit > rather than new. ==========I think so too, I just haven't hit on it yet. Susan H. From ssharkins at bellsouth.net Fri Jan 23 09:31:14 2004 From: ssharkins at bellsouth.net (Susan Harkins) Date: Fri, 23 Jan 2004 10:31:14 -0500 Subject: [AccessD] modifying Outlook contact items from Access References: <2F8793082E00D4119A1700B0D0216BF8022277A0@main2.marlow.com> Message-ID: <003801c3e1c6$7871e450$210110ac@SUSANONE> Yes, you can link to Outlook from Access 2000 -- well, I'm sure you can with Access k2 -- but Outlook has to be the default mail client -- which is the problem. So, I need code -- and I was hoping there was a way to directly link to the data via an ADO object or something -- but I haven't been able to make it work. So, I can import it, change it, and send it back -- but so far, sending it back hasn't actually updated it in Outlook. Susan H. > Um, setup a linked table to an Outlook/Exchange Folder? What version of > Access. It's there by default for A2k (and I would assume later > versions...) but in 97, you have to download a free Add-in from Microsoft. > > Drew > > -----Original Message----- > From: Susan Harkins [mailto:ssharkins at bellsouth.net] > Sent: Thursday, January 22, 2004 12:34 PM > To: Access Developers discussion and problem solving > Subject: Re: [AccessD] modifying Outlook contact items from Access > > > This is for instructional purposes, so I have to do it the long hard way. :) > > I can import the data into Access, modify it, and send it back to Outlook. > I'm just wondering if there isn't a more direct route -- it would be cool if > I could connect an Access form's to a recordset that's connected directly to > Outlook -- so the changes in Access would be immediate -- I just don't know > if that's possible, or even the best way to go about it. > > Susan H. > > > > Hi Susan > > Well I cheat. I have a number of Outlook address books some of which are > > based on Access data. I use a 3rd-party product which each night wipes out > > these address books, extracts the Access data and rebuilds the address > > books. Works like a charm. I could no doubt write something but as the > > product existed..... See http://www.teamscope.com/otherpro/datalink.asp > > > > > > Andy Lacey > > http://www.minstersystems.co.uk > > > > > -----Original Message----- > > > From: accessd-bounces at databaseadvisors.com > > > [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of > > > Susan Harkins > > > Sent: 22 January 2004 17:26 > > > To: AccessD at databaseadvisors.com > > > Subject: [AccessD] modifying Outlook contact items from Access > > > > > > > > > I'm familiar enough with the Outlook model that importing > > > Contact data into Access is easy -- but I'm wondering if any > > > of you use Access to actually modify Outlook contact > > > information? I haven't even started, but would be interested > > > in hearing how others do it. I know you can link, but that > > > only works if Outlook is the default mail client. > > > > > > Susan H. > > > > > > _______________________________________________ > > > AccessD mailing list > > > AccessD at databaseadvisors.com > > > http://databaseadvisors.com/mailman/listinfo/a> ccessd > > > Website: > > > http://www.databaseadvisors.com > > > > > > > > > > _______________________________________________ > > 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 > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com > From mikedorism at adelphia.net Fri Jan 23 10:39:08 2004 From: mikedorism at adelphia.net (Mike & Doris Manning) Date: Fri, 23 Jan 2004 11:39:08 -0500 Subject: [AccessD] modifying Outlook contact items from Access In-Reply-To: <003801c3e1c6$7871e450$210110ac@SUSANONE> Message-ID: <000001c3e1cf$6c946410$8b194244@hargrove.internal> Have you looked here... http://www.slipstick.com/dev/database.htm Doris Manning Database Administrator Hargrove Inc. www.hargroveinc.com -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Susan Harkins Sent: Friday, January 23, 2004 10:31 AM To: Access Developers discussion and problem solving Subject: Re: [AccessD] modifying Outlook contact items from Access Yes, you can link to Outlook from Access 2000 -- well, I'm sure you can with Access k2 -- but Outlook has to be the default mail client -- which is the problem. So, I need code -- and I was hoping there was a way to directly link to the data via an ADO object or something -- but I haven't been able to make it work. So, I can import it, change it, and send it back -- but so far, sending it back hasn't actually updated it in Outlook. Susan H. > Um, setup a linked table to an Outlook/Exchange Folder? What version > of Access. It's there by default for A2k (and I would assume later > versions...) but in 97, you have to download a free Add-in from > Microsoft. > > Drew > > -----Original Message----- > From: Susan Harkins [mailto:ssharkins at bellsouth.net] > Sent: Thursday, January 22, 2004 12:34 PM > To: Access Developers discussion and problem solving > Subject: Re: [AccessD] modifying Outlook contact items from Access > > > This is for instructional purposes, so I have to do it the long hard > way. :) > > I can import the data into Access, modify it, and send it back to > Outlook. I'm just wondering if there isn't a more direct route -- it > would be cool if > I could connect an Access form's to a recordset that's connected > directly to > Outlook -- so the changes in Access would be immediate -- I just don't know > if that's possible, or even the best way to go about it. > > Susan H. > > > > Hi Susan > > Well I cheat. I have a number of Outlook address books some of which > > are based on Access data. I use a 3rd-party product which each night > > wipes out > > these address books, extracts the Access data and rebuilds the > > address books. Works like a charm. I could no doubt write something > > but as the product existed..... See > > http://www.teamscope.com/otherpro/datalink.asp > > > > > > Andy Lacey > > http://www.minstersystems.co.uk > > > > > -----Original Message----- > > > From: accessd-bounces at databaseadvisors.com > > > [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Susan > > > Harkins > > > Sent: 22 January 2004 17:26 > > > To: AccessD at databaseadvisors.com > > > Subject: [AccessD] modifying Outlook contact items from Access > > > > > > > > > I'm familiar enough with the Outlook model that importing Contact > > > data into Access is easy -- but I'm wondering if any of you use > > > Access to actually modify Outlook contact information? I haven't > > > even started, but would be interested in hearing how others do it. > > > I know you can link, but that only works if Outlook is the default > > > mail client. > > > > > > Susan H. > > > > > > _______________________________________________ > > > AccessD mailing list > > > AccessD at databaseadvisors.com > > > http://databaseadvisors.com/mailman/listinfo/a> ccessd > > > Website: > > > http://www.databaseadvisors.com > > > > > > > > > > _______________________________________________ > > 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 > _______________________________________________ > 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 From adtp at touchtelindia.net Fri Jan 23 11:46:20 2004 From: adtp at touchtelindia.net (A.D.Tejpal) Date: Fri, 23 Jan 2004 23:16:20 +0530 Subject: [AccessD] subform only allows one record References: Message-ID: <00f701c3e1d8$fb5bd170$f3edf73d@winxp> John, Kindly put the code given below in the subform's code module and let me know whether it meets your requirement. Regards, A.D.Tejpal -------------- -------------- Code Start -------------- Option Compare Database Option Explicit Private RecNo As Integer ' Global Variable Private Sub Form_AfterDelConfirm(Status As Integer) RecNo = RecNo - 1 Me.AllowAdditions = True End Sub Private Sub Form_AfterInsert() RecNo = RecNo + 1 Me.AllowAdditions = False End Sub Private Sub Form_Load() RecNo = DCount("*", Me.RecordSource) If RecNo > 0 Then Me.AllowAdditions = False Else Me.AllowAdditions = True End If End Sub ------------- Code End ------------- ----- Original Message ----- From: John W. Colby To: AccessD Sent: Friday, January 23, 2004 18:13 Subject: [AccessD] subform only allows one record I need to set up a subform that only allows a single record to be entered. I have a function in the subform that checks if the recordsetclone.recordcount >0 and if so sets AllowAdditions = false. This works fine if any records already exist but if a new record is created, then if the person does a page down to save the first record, they end up in a second record. I am firing this function I built from the OnCurrent of the parent, as well as the OnCurrent of the subform itself. Haven't tried yet from before update. Does anyone do this kind of thing? If so how do you accomplish it? John W. Colby www.ColbyConsulting.com From ssharkins at bellsouth.net Fri Jan 23 11:38:53 2004 From: ssharkins at bellsouth.net (Susan Harkins) Date: Fri, 23 Jan 2004 12:38:53 -0500 Subject: [AccessD] modifying Outlook contact items from Access References: <000001c3e1cf$6c946410$8b194244@hargrove.internal> Message-ID: <006001c3e1d9$92a62260$210110ac@SUSANONE> Thanks Doris -- looks like they've got a lot of good stuff. Susan H. > Have you looked here... http://www.slipstick.com/dev/database.htm > > Doris Manning > Database Administrator > Hargrove Inc. > www.hargroveinc.com From my.lists at verizon.net Fri Jan 23 13:26:44 2004 From: my.lists at verizon.net (Francisco H Tapia) Date: Fri, 23 Jan 2004 11:26:44 -0800 Subject: [AccessD] Vonage In-Reply-To: <000b01c3e19c$efed4d00$6401a8c0@dell8200> References: <000b01c3e19c$efed4d00$6401a8c0@dell8200> Message-ID: <40117574.5010903@verizon.net> Price sounds good, but if you are using DSL it's not really like you're saving much.. :( Verizon = 29.00 DSL = 35.00 --------------- 64.00 plus the vonage price? :S, I can't get rid of verizon as they are my telco. the only thing that would make sense is to switch to cable then it's just the price of the cable bill plus vonage. -- -Francisco augusta wrote: >I signed up a few weeks ago. It may or may not have wrecked just a bit >of havoc on my (fairly complicated) network. But overall I love it! The >only bummer is that you always have to dial the 1+area code . . . (But I >hear some in NJ are doing that already). Great price! > > > >>-----Original Message----- >>From: accessd-bounces at databaseadvisors.com [mailto:accessd- >>bounces at databaseadvisors.com] On Behalf Of John W. Colby >>Sent: Thursday, January 22, 2004 9:53 PM >>To: AccessD >>Subject: [AccessD] Vonage >> >>Is anyone using this? Comments? >> >>http://www.vonage.com >> >>John W. Colby >>www.ColbyConsulting.com >> >> From ssharkins at bellsouth.net Fri Jan 23 14:13:23 2004 From: ssharkins at bellsouth.net (Susan Harkins) Date: Fri, 23 Jan 2004 15:13:23 -0500 Subject: [AccessD] modifying Outlook contact items from Access References: <000001c3e1cf$6c946410$8b194244@hargrove.internal> Message-ID: <009901c3e1ed$5b4170e0$210110ac@SUSANONE> Well, I've been through some of it -- most of it -- same story -- how to "add" data, but not modify what's already there. I'm going to just use an .Add method and see if it'll overwrite what's already there. Susan H. > Have you looked here... http://www.slipstick.com/dev/database.htm > From jwcolby at colbyconsulting.com Fri Jan 23 16:18:52 2004 From: jwcolby at colbyconsulting.com (John W. Colby) Date: Fri, 23 Jan 2004 17:18:52 -0500 Subject: [AccessD] Vonage In-Reply-To: <40117574.5010903@verizon.net> Message-ID: My blazing fast internet recently went up 50% to $45 / month. The cable company wants $35 / month for unlimited internet so I could just get it through them, but I thought I'd give Vonage a try. Vonage has $15, $25 and $35 packages which allows me to try it for cheap and see if it really works before turning off the land line. John W. Colby www.ColbyConsulting.com -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Francisco H Tapia Sent: Friday, January 23, 2004 2:27 PM To: Access Developers discussion and problem solving Subject: Re: [AccessD] Vonage Price sounds good, but if you are using DSL it's not really like you're saving much.. :( Verizon = 29.00 DSL = 35.00 --------------- 64.00 plus the vonage price? :S, I can't get rid of verizon as they are my telco. the only thing that would make sense is to switch to cable then it's just the price of the cable bill plus vonage. -- -Francisco augusta wrote: >I signed up a few weeks ago. It may or may not have wrecked just a bit >of havoc on my (fairly complicated) network. But overall I love it! The >only bummer is that you always have to dial the 1+area code . . . (But I >hear some in NJ are doing that already). Great price! > > > >>-----Original Message----- >>From: accessd-bounces at databaseadvisors.com [mailto:accessd- >>bounces at databaseadvisors.com] On Behalf Of John W. Colby >>Sent: Thursday, January 22, 2004 9:53 PM >>To: AccessD >>Subject: [AccessD] Vonage >> >>Is anyone using this? Comments? >> >>http://www.vonage.com >> >>John W. Colby >>www.ColbyConsulting.com >> >> _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From awithing at twcny.rr.com Fri Jan 23 16:38:59 2004 From: awithing at twcny.rr.com (awithing) Date: Fri, 23 Jan 2004 17:38:59 -0500 Subject: [AccessD] Vonage In-Reply-To: Message-ID: <000201c3e201$b1e538a0$6701a8c0@laptopD800> Well, I think that it is worth a try. I put my land line on a message rate for a while until I feel totally comfortable with Vonage. -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of John W. Colby Sent: Friday, January 23, 2004 5:19 PM To: Access Developers discussion and problem solving Subject: RE: [AccessD] Vonage My blazing fast internet recently went up 50% to $45 / month. The cable company wants $35 / month for unlimited internet so I could just get it through them, but I thought I'd give Vonage a try. Vonage has $15, $25 and $35 packages which allows me to try it for cheap and see if it really works before turning off the land line. John W. Colby www.ColbyConsulting.com -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Francisco H Tapia Sent: Friday, January 23, 2004 2:27 PM To: Access Developers discussion and problem solving Subject: Re: [AccessD] Vonage Price sounds good, but if you are using DSL it's not really like you're saving much.. :( Verizon = 29.00 DSL = 35.00 --------------- 64.00 plus the vonage price? :S, I can't get rid of verizon as they are my telco. the only thing that would make sense is to switch to cable then it's just the price of the cable bill plus vonage. -- -Francisco augusta wrote: >I signed up a few weeks ago. It may or may not have wrecked just a bit >of havoc on my (fairly complicated) network. But overall I love it! The >only bummer is that you always have to dial the 1+area code . . . (But I >hear some in NJ are doing that already). Great price! > > > >>-----Original Message----- >>From: accessd-bounces at databaseadvisors.com [mailto:accessd- >>bounces at databaseadvisors.com] On Behalf Of John W. Colby >>Sent: Thursday, January 22, 2004 9:53 PM >>To: AccessD >>Subject: [AccessD] Vonage >> >>Is anyone using this? Comments? >> >>http://www.vonage.com >> >>John W. Colby >>www.ColbyConsulting.com >> >> _______________________________________________ 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 From rusty.hammond at cpiqpc.com Fri Jan 23 16:27:56 2004 From: rusty.hammond at cpiqpc.com (rusty.hammond at cpiqpc.com) Date: Fri, 23 Jan 2004 16:27:56 -0600 Subject: [AccessD] Opening a word document from code Message-ID: <8301C8A868251E4C8ECD3D4FFEA40F8A0811A8AB@cpixchng-1.cpiqpc.net> I'm working on code in Access 97 to simply open an existing Word document from a network drive, add a quick line of text at the top of the first page, then close the document. I'm running into problems when someone else has the Word document open. Does anyone have code to tell if a Word document is open before attempting to open it and getting an error? TIA Rusty Hammond From martyconnelly at shaw.ca Fri Jan 23 17:05:53 2004 From: martyconnelly at shaw.ca (MartyConnelly) Date: Fri, 23 Jan 2004 15:05:53 -0800 Subject: [AccessD] Opening a word document from code References: <8301C8A868251E4C8ECD3D4FFEA40F8A0811A8AB@cpixchng-1.cpiqpc.net> Message-ID: <4011A8D1.70808@shaw.ca> Debug.Print IsFileOpen("C:\Documents and Settings\marty\My Documents\Doc1.doc") ' This function checks to see if a file is open or not. If the file is ' already open, it returns True. If the file is not open, it returns ' False. Otherwise, a run-time error will occur because there is ' some other problem accessing the file. Function IsFileOpen(filename As String) As Boolean Dim filenum As Integer, errnum As Integer On Error Resume Next ' Turn error checking off. filenum = FreeFile() ' Get a free file number. ' Attempt to open the file and lock it. Open filename For Input Lock Read As #filenum Close filenum ' Close the file. errnum = Err ' Save the error number that occurred. On Error GoTo 0 ' Turn error checking back on. ' Check to see which error occurred. Select Case errnum ' No error occurred. ' File is NOT already open by another user. Case 0 IsFileOpen = False ' Error number for "Permission Denied." ' File is already opened by another user. Case 70 IsFileOpen = True ' Another error occurred. Case Else Error errnum End Select End Function rusty.hammond at cpiqpc.com wrote: >I'm working on code in Access 97 to simply open an existing Word document >from a network drive, add a quick line of text at the top of the first page, >then close the document. I'm running into problems when someone else has >the Word document open. Does anyone have code to tell if a Word document is >open before attempting to open it and getting an error? > >TIA > >Rusty Hammond > > > -- Marty Connelly Victoria, B.C. Canada From scapistrant at symphonyinfo.com Fri Jan 23 17:40:46 2004 From: scapistrant at symphonyinfo.com (Steve Capistrant) Date: Fri, 23 Jan 2004 17:40:46 -0600 Subject: [AccessD] Job posting In-Reply-To: <00ab01c3e143$1757bbf0$19669a89@DDICK> Message-ID: Hello group. I'm in search of an Access developer looking for a permanent full time position in the Twin Cities (Minnesota) area. Business is booming. Please email or call if you have an interest. Symphony is a software development shop providing custom software since 1996, with the great majority of work done in Access, but also dealing with SQL Server BEs and data-driven websites using ASP. Regards, Steve Capistrant scapistrant at symphonyinfo.com Symphony Information Services www.symphonyinfo.com Phone: 763-391-7400 7308 Aspen Lane North, Suite 132, Brooklyn Park, MN 55428 From glen_mcwilliams at msn.com Fri Jan 23 18:17:57 2004 From: glen_mcwilliams at msn.com (Glen McWilliams) Date: Fri, 23 Jan 2004 16:17:57 -0800 Subject: [AccessD] Vonage References: Message-ID: John Don't complain, that is less than what I pay ($49.95). Glen H. McWilliams Creative HighTek, Inc. ----- Original Message ----- From: John W. Colby To: Access Developers discussion and problem solving Sent: Friday, January 23, 2004 2:18 PM Subject: RE: [AccessD] Vonage My blazing fast internet recently went up 50% to $45 / month. The cable company wants $35 / month for unlimited internet so I could just get it through them, but I thought I'd give Vonage a try. Vonage has $15, $25 and $35 packages which allows me to try it for cheap and see if it really works before turning off the land line. John W. Colby www.ColbyConsulting.com -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Francisco H Tapia Sent: Friday, January 23, 2004 2:27 PM To: Access Developers discussion and problem solving Subject: Re: [AccessD] Vonage Price sounds good, but if you are using DSL it's not really like you're saving much.. :( Verizon = 29.00 DSL = 35.00 --------------- 64.00 plus the vonage price? :S, I can't get rid of verizon as they are my telco. the only thing that would make sense is to switch to cable then it's just the price of the cable bill plus vonage. -- -Francisco augusta wrote: >I signed up a few weeks ago. It may or may not have wrecked just a bit >of havoc on my (fairly complicated) network. But overall I love it! The >only bummer is that you always have to dial the 1+area code . . . (But I >hear some in NJ are doing that already). Great price! > > > >>-----Original Message----- >>From: accessd-bounces at databaseadvisors.com [mailto:accessd- >>bounces at databaseadvisors.com] On Behalf Of John W. Colby >>Sent: Thursday, January 22, 2004 9:53 PM >>To: AccessD >>Subject: [AccessD] Vonage >> >>Is anyone using this? Comments? >> >>http://www.vonage.com >> >>John W. Colby >>www.ColbyConsulting.com >> >> _______________________________________________ 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 From stuart at lexacorp.com.pg Fri Jan 23 19:22:58 2004 From: stuart at lexacorp.com.pg (Stuart McLachlan) Date: Sat, 24 Jan 2004 11:22:58 +1000 Subject: [AccessD] Vonage In-Reply-To: Message-ID: <40125592.4363.17E60A@localhost> Will you guys stop it! I pay approx USD200 per month just for my connection and about a further 30c per MB downloaded. On 23 Jan 2004 at 16:17, Glen McWilliams wrote: > John > > Don't complain, that is less than what I pay ($49.95). > > Glen H. McWilliams > Creative HighTek, Inc. > ----- Original Message ----- > From: John W. Colby > To: Access Developers discussion and problem solving > Sent: Friday, January 23, 2004 2:18 PM > Subject: RE: [AccessD] Vonage > > > My blazing fast internet recently went up 50% to $45 / month. The cable > company wants $35 / month for unlimited internet so I could just get it > through them, but I thought I'd give Vonage a try. Vonage has $15, $25 and > $35 packages which allows me to try it for cheap and see if it really works > before turning off the land line. > > John W. Colby > www.ColbyConsulting.com > > -----Original Message----- > From: accessd-bounces at databaseadvisors.com > [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Francisco H > Tapia > Sent: Friday, January 23, 2004 2:27 PM > To: Access Developers discussion and problem solving > Subject: Re: [AccessD] Vonage > > > Price sounds good, but if you are using DSL it's not really like you're > saving much.. :( > > Verizon = 29.00 > DSL = 35.00 > --------------- > 64.00 > > plus the vonage price? :S, I can't get rid of verizon as they are my > telco. the only thing that would make sense is to switch to cable then > it's just the price of the cable bill plus vonage. > > > -- -- Lexacorp Ltd http://www.lexacorp.com.pg Information Technology Consultancy, Software Development,System Support. From accessd at shaw.ca Fri Jan 23 19:28:30 2004 From: accessd at shaw.ca (Jim Lawrence (AccessD)) Date: Fri, 23 Jan 2004 17:28:30 -0800 Subject: [AccessD] Create New DB + link table check (Was: Major Performance issue) In-Reply-To: <20040123094414.54603.qmail@web60206.mail.yahoo.com> Message-ID: Hi Sad: Check the article at the DBA, http://www.databaseadvisors.com/newletters/newsletter112003/0311UnboundRepor ts.htm (watch for wrap clip) It demonstrates exactly what you have discovered, when working with large data sets. It is sometimes more efficient to download the data and post process it. Some of the code in this article may help you. HTH Jim -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Sad Der Sent: Friday, January 23, 2004 1:44 AM To: Acces User Group Subject: [AccessD] Create New DB + link table check (Was: Major Performance issue) Hi group, I've got a solution to my performance problem. Before the users start their analyses I copy the data to the local database! Copying the data takes about 45-55 seconds, calculating the data LESS THEN 2 seconds!! :-) I don't want this copied data in the original client so I want to create a new mdb. I don't have my A2KDH Enterprise Edition with me I'm asking you guys. Does anybody have a (set of) function(s) to create a DB with tables and link to it? I've searched wolfwares.com but I couldn't find any of it and this subject has to be discussed here at some point....or not? The idea is: User needs to use the Analyses tool Create new TEMP DB (duration: ?) Create tables (duration: ?) Check links (duration: ?) Copy data from BE (duration: 45-55 seconds) When user stops the MAIN application (= Analyses tool is part of the MAIN application) delete the TEMP DB. TIA Sad __________________________________ Do you Yahoo!? Yahoo! SiteBuilder - Free web site building tool. Try it! http://webhosting.yahoo.com/ps/sb/ _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From accessd at shaw.ca Fri Jan 23 19:38:38 2004 From: accessd at shaw.ca (Jim Lawrence (AccessD)) Date: Fri, 23 Jan 2004 17:38:38 -0800 Subject: [AccessD] subform only allows one record In-Reply-To: Message-ID: Hi John: Just a comment... If you only need one record why are you not just folding the required fields into the current form? Jim -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of John W. Colby Sent: Friday, January 23, 2004 4:43 AM To: AccessD Subject: [AccessD] subform only allows one record I need to set up a subform that only allows a single record to be entered. I have a function in the subform that checks if the recordsetclone.recordcount >0 and if so sets AllowAdditions = false. This works fine if any records already exist but if a new record is created, then if the person does a page down to save the first record, they end up in a second record. I am firing this function I built from the OnCurrent of the parent, as well as the OnCurrent of the subform itself. Haven't tried yet from before update. Does anyone do this kind of thing? If so how do you accomplish it? John W. Colby www.ColbyConsulting.com _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From markamatte at hotmail.com Fri Jan 23 19:48:34 2004 From: markamatte at hotmail.com (Mark A Matte) Date: Sat, 24 Jan 2004 01:48:34 +0000 Subject: [AccessD] query that deletess dups ? Message-ID: Another idea is to create a copy of the structure of the table...identify the fields that make up a unique key and make them a key in the new table...run an APPEND query from old table to populate new table...it will omit the dups for you... Hope it helps... Mark >From: bruce_bruen at mlc.com.au >Reply-To: Access Developers discussion and problem >solving >To: Access Developers discussion and problem >solving >Subject: Re: [AccessD] query that deletess dups ? >Date: Fri, 23 Jan 2004 11:19:34 +1100 > > > > > >Check the archives, I had a similar problem last year. I believe it was >either Wiliam H or Gustav thtat provided the answer using a select first, >last or max field in the table you wish to delete from. You could search on >my surname. > >Sorry, the actual anser is on a drive I dont have anymore.... > >Bruce > > > > "Dave Sharpe" > To: "Access >Developers discussion and problem solving" > Sent by: > > accessd-bounces at databasea cc: > dvisors.com Subject: Re: >[AccessD] query that deletess dups ? > > > 23/01/2004 11:14 > Please respond to Access > Developers discussion and > problem solving > > > > > > >Oleg ( I think ) > >As there have been no attempts yet; I googled and found the >following that looks like it should help You. > >http://www.databasejournal.com/features/msaccess/article.php/3077791 > >Dave > > >----- Original Message ----- >From: >To: >Sent: Thursday, January 22, 2004 4:20 PM >Subject: [AccessD] query that deletess dups ? > > >How can I delete dup records ? Anyone can give me a hint... > >SELECT DISTINCTROW [emp table].[employee number], [emp table].[employee >name], [emp table].COMPANY >FROM [emp table] >WHERE ((([emp table].[employee number]) In (SELECT [employee number] FROM >[emp table] As Tmp GROUP BY [employee number],[employee name] HAVING >Count(*)>1 And [employee name] = [emp table].[employee name]))) >ORDER BY [emp table].[employee number], [emp table].[employee name]; > > >----------------------------------------- >Get Breaking News from CNN, ABC, NBC, CBS Now. >http://www.xuppa.com/news/?link=webmail > > >_______________________________________________ >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 > > > >_______________________________________________ >AccessD mailing list >AccessD at databaseadvisors.com >http://databaseadvisors.com/mailman/listinfo/accessd >Website: http://www.databaseadvisors.com _________________________________________________________________ Get a FREE online virus check for your PC here, from McAfee. http://clinic.mcafee.com/clinic/ibuy/campaign.asp?cid=3963 From lmrazek at lcm-res.com Sat Jan 24 07:46:53 2004 From: lmrazek at lcm-res.com (Lawrence Mrazek) Date: Sat, 24 Jan 2004 07:46:53 -0600 Subject: [AccessD] Vonage In-Reply-To: Message-ID: <007101c3e280$871298a0$036fa8c0@DellLaptop> I used it and liked it (when it worked), but ultimately had to cancel the service because Vonage couldn't maintain a connection to the phone router on my network due to some latency and speed problems with my DSL connection. I was on the lower end of the acceptable speed needed for Vonage. That said, it would have saved me at least 40/month on my business phone fax charges, since Vonage doesn't charge (yet) all of the federal, state and local taxes that appear on my phone bill. When I did have a connection, voice quality was pretty good. Try it, but don't cancel your regular phone service until you're sure that it works OK! Good Luck! Larry Mrazek LCM Research, Inc. ph. 314-432-5886 fx. 314-432-3304 lmrazek at lcm-res.com http://www.lcm-res.com -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of John W. Colby Sent: Thursday, January 22, 2004 8:53 PM To: AccessD Subject: [AccessD] Vonage Is anyone using this? Comments? http://www.vonage.com John W. Colby www.ColbyConsulting.com _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From jwcolby at colbyconsulting.com Sat Jan 24 08:44:18 2004 From: jwcolby at colbyconsulting.com (John W. Colby) Date: Sat, 24 Jan 2004 09:44:18 -0500 Subject: [AccessD] Vonage In-Reply-To: <007101c3e280$871298a0$036fa8c0@DellLaptop> Message-ID: I have a cable connection to the internet so I doubt I'll have issues. Plus the modem they now use has something in it that, if you place the modem between the cable modem and the router, allows the phone router to take all the bandwidth it needs to maintain the QOS (as they call it). John W. Colby www.ColbyConsulting.com -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Lawrence Mrazek Sent: Saturday, January 24, 2004 8:47 AM To: 'Access Developers discussion and problem solving' Subject: RE: [AccessD] Vonage I used it and liked it (when it worked), but ultimately had to cancel the service because Vonage couldn't maintain a connection to the phone router on my network due to some latency and speed problems with my DSL connection. I was on the lower end of the acceptable speed needed for Vonage. That said, it would have saved me at least 40/month on my business phone fax charges, since Vonage doesn't charge (yet) all of the federal, state and local taxes that appear on my phone bill. When I did have a connection, voice quality was pretty good. Try it, but don't cancel your regular phone service until you're sure that it works OK! Good Luck! Larry Mrazek LCM Research, Inc. ph. 314-432-5886 fx. 314-432-3304 lmrazek at lcm-res.com http://www.lcm-res.com -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of John W. Colby Sent: Thursday, January 22, 2004 8:53 PM To: AccessD Subject: [AccessD] Vonage Is anyone using this? Comments? http://www.vonage.com John W. Colby www.ColbyConsulting.com _______________________________________________ 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 From gustav at cactus.dk Sat Jan 24 08:46:00 2004 From: gustav at cactus.dk (Gustav Brock) Date: Sat, 24 Jan 2004 15:46:00 +0100 Subject: [AccessD] Print to picture (was: Export Access Report to Word) In-Reply-To: <2033328814.20031107181446@cactus.dk> References: <2033328814.20031107181446@cactus.dk> Message-ID: <17022529806.20040124154600@cactus.dk> Hi All Juriy has released a version 1.02 of his PTP, Print to Picture and has added a page in English: http://progrex.narod.ru/ptpeng.html A help file in English is now included. Again, download is extremely slow but stable. PTP is freeware. /gustav > Hi Rocky and Bryan et all > As a freeware alternative to SnagIt, have a look at "Print To Picture" > by a Russian guy, Gretchko Juriy, at: > http://progrex.narod.ru/ptp.html > Every thing except the program is in Russian but at this page you > would download (at the bottom of the page) link two and perhaps three. > The first you can spell "Program Print to picture, version 1.01", the > second is a plugin which I'm not shure really is needed. > When printing, resolution can be chosen from 50 x 50 to 600 x 600 dpi > and file format can be BMP, PCX or PNG. > It looks very promising! I've been looking for this kind of util for > years - thanks for putting me on the track again. > A tiny print of the page is attached for those of you accepting > attachments. > PS: Download speed from the site is very slow but stable, just be > patient. > /gustav >> Here's another way that I stumbled across, while looking for something >> else.... >> SnagIt, a screen capture application, will actually allow you to do a >> "Printer" capture. >> It will capture a print and save it each page as an image. All you >> print to a special SnagIt "printer" and it will capture each page >> separately at printer quality. >> You can get SnagIt from >> http://www.techsmith.com/products/snagit/default.asp >> They have a 30 day trial and it only costs $40. >> Bryan Carbonnell >> bryan_carbonnell at cbc.ca From mwp.reid at qub.ac.uk Sat Jan 24 09:21:25 2004 From: mwp.reid at qub.ac.uk (Martin Reid) Date: Sat, 24 Jan 2004 15:21:25 -0000 Subject: [AccessD] Vonage References: Message-ID: <001501c3e28d$bbb65260$a2f66e51@martin1> I pay ?15 per month unlimited phone and ?25 per month for broadband Martin ----- Original Message ----- From: "John W. Colby" To: "Access Developers discussion and problem solving" Sent: Saturday, January 24, 2004 2:44 PM Subject: RE: [AccessD] Vonage > I have a cable connection to the internet so I doubt I'll have issues. Plus > the modem they now use has something in it that, if you place the modem > between the cable modem and the router, allows the phone router to take all > the bandwidth it needs to maintain the QOS (as they call it). > > John W. Colby > www.ColbyConsulting.com > > -----Original Message----- > From: accessd-bounces at databaseadvisors.com > [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Lawrence > Mrazek > Sent: Saturday, January 24, 2004 8:47 AM > To: 'Access Developers discussion and problem solving' > Subject: RE: [AccessD] Vonage > > > I used it and liked it (when it worked), but ultimately had to cancel the > service because Vonage couldn't maintain a connection to the phone router on > my network due to some latency and speed problems with my DSL connection. I > was on the lower end of the acceptable speed needed for Vonage. That said, > it would have saved me at least 40/month on my business phone fax charges, > since Vonage doesn't charge (yet) all of the federal, state and local taxes > that appear on my phone bill. When I did have a connection, voice quality > was pretty good. > > Try it, but don't cancel your regular phone service until you're sure that > it works OK! Good Luck! > > Larry Mrazek > LCM Research, Inc. > ph. 314-432-5886 > fx. 314-432-3304 > lmrazek at lcm-res.com > http://www.lcm-res.com > > -----Original Message----- > From: accessd-bounces at databaseadvisors.com > [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of John W. Colby > Sent: Thursday, January 22, 2004 8:53 PM > To: AccessD > Subject: [AccessD] Vonage > > > Is anyone using this? Comments? > > http://www.vonage.com > > John W. Colby > www.ColbyConsulting.com > > _______________________________________________ > 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 > > > > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com > From jwcolby at colbyconsulting.com Sat Jan 24 09:36:42 2004 From: jwcolby at colbyconsulting.com (John W. Colby) Date: Sat, 24 Jan 2004 10:36:42 -0500 Subject: [AccessD] Vonage In-Reply-To: <001501c3e28d$bbb65260$a2f66e51@martin1> Message-ID: Lol. I can certainly understand the unlimited phone. The whole of Ireland isn't much larger than San Diego County. For me to call my mom in Arizona is like you calling to Greece. I have sisters and mother in Arizona (2600 miles), Nashville Tennessee (1000 miles), Brother-in-law in Florida (1200 miles), Brother-in-law in Washington DC (350 miles), Sister-in-law in Rochester New York (300 miles), and the closest... a Sister-in-Law in Syracuse New York (240 miles). Cheap long distance is essential. John W. Colby www.ColbyConsulting.com -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Martin Reid Sent: Saturday, January 24, 2004 10:21 AM To: Access Developers discussion and problem solving Subject: Re: [AccessD] Vonage I pay ?15 per month unlimited phone and ?25 per month for broadband Martin ----- Original Message ----- From: "John W. Colby" To: "Access Developers discussion and problem solving" Sent: Saturday, January 24, 2004 2:44 PM Subject: RE: [AccessD] Vonage > I have a cable connection to the internet so I doubt I'll have issues. Plus > the modem they now use has something in it that, if you place the modem > between the cable modem and the router, allows the phone router to take all > the bandwidth it needs to maintain the QOS (as they call it). > > John W. Colby > www.ColbyConsulting.com From ssharkins at bellsouth.net Sat Jan 24 12:35:01 2004 From: ssharkins at bellsouth.net (Susan Harkins) Date: Sat, 24 Jan 2004 13:35:01 -0500 Subject: [AccessD] data type for field in a closed table Message-ID: <00c501c3e2aa$15762d90$210110ac@SUSANONE> I'm trying to return a field's data type. I have the field by name -- as a string -- and I just can't seem to get it into a Field object variable so I can tap into the Type property. The field is the result of a listbox selection. varField = lstField.Value How can I get from there to fld = varField to here varType = fld.Type Everything I've tried returns an Object required at the fld=varField statement because varField is a string, not a real reference. At least, I think that's the problem. Or, if I'm going about it entirely wrong, clue me in please. :) Susan H. From gustav at cactus.dk Sat Jan 24 13:21:14 2004 From: gustav at cactus.dk (Gustav Brock) Date: Sat, 24 Jan 2004 20:21:14 +0100 Subject: [AccessD] data type for field in a closed table In-Reply-To: <00c501c3e2aa$15762d90$210110ac@SUSANONE> References: <00c501c3e2aa$15762d90$210110ac@SUSANONE> Message-ID: <3939044703.20040124202114@cactus.dk> Hi Susan > I'm trying to return a field's data type. > I have the field by name -- as a string -- and I just can't seem to get it > into a Field object variable so I can tap into the Type property. The field > is the result of a listbox selection. > varField = lstField.Value > How can I get from there to > fld = varField > to here > varType = fld.Type > Everything I've tried returns an Object required at the fld=varField > statement because varField is a string, not a real reference. At least, I > think that's the problem. Something like this? If the rowsource is an SQL string: Dim dbs As Database Dim qdf As QueryDef dim intVarType As Integer Set dbs = CurrentDb() Set qdf = dbs.CreateQueryDef(vbNullString) qdf.SQL = Me!lstDemo.RowSource intVarType = qdf.Fields("YourFieldName").Type Debug.Print intVarType qdf.Close Set qdf = Nothing Set dbs = Nothing If not an SQL string, just pick the name of the stored query and use that as qdf. /gustav From ssharkins at bellsouth.net Sat Jan 24 13:26:31 2004 From: ssharkins at bellsouth.net (Susan Harkins) Date: Sat, 24 Jan 2004 14:26:31 -0500 Subject: Nevermind -- kind of Re: [AccessD] data type for field in a closed table References: <00c501c3e2aa$15762d90$210110ac@SUSANONE> Message-ID: <011501c3e2af$f9948440$210110ac@SUSANONE> I'm just going to create a recordset object -- if anyone knows of a more direct way, please let me know. Thanks! Susan H. > I'm trying to return a field's data type. > > I have the field by name -- as a string -- and I just can't seem to get it > into a Field object variable so I can tap into the Type property. The field > is the result of a listbox selection. > From ssharkins at bellsouth.net Sat Jan 24 13:32:11 2004 From: ssharkins at bellsouth.net (Susan Harkins) Date: Sat, 24 Jan 2004 14:32:11 -0500 Subject: [AccessD] data type for field in a closed table References: <00c501c3e2aa$15762d90$210110ac@SUSANONE> <3939044703.20040124202114@cactus.dk> Message-ID: <011b01c3e2b0$c7fd3ed0$210110ac@SUSANONE> I considered that, but was trying to avoid DAO -- I should've mentioned that -- I apologize. I'm using ADO -- and looping through the recordset doesn't really require anymore code than the DAO querydef -- if I'm not mistaken, ADO doesn't use the QueryDef object. But, on the other hand, you don't have to create a Recordset using your code. Thanks Gustav. Susan H. > Hi Susan > > > I'm trying to return a field's data type. > > > I have the field by name -- as a string -- and I just can't seem to get it > > into a Field object variable so I can tap into the Type property. The field > > is the result of a listbox selection. > > > varField = lstField.Value > > > How can I get from there to > > > fld = varField > > > to here > > > varType = fld.Type > > > Everything I've tried returns an Object required at the fld=varField > > statement because varField is a string, not a real reference. At least, I > > think that's the problem. > > Something like this? If the rowsource is an SQL string: > > Dim dbs As Database > Dim qdf As QueryDef > dim intVarType As Integer > > Set dbs = CurrentDb() > Set qdf = dbs.CreateQueryDef(vbNullString) > qdf.SQL = Me!lstDemo.RowSource > > intVarType = qdf.Fields("YourFieldName").Type > Debug.Print intVarType > > qdf.Close > > Set qdf = Nothing > Set dbs = Nothing > > If not an SQL string, just pick the name of the stored query and use > that as qdf. > > /gustav > > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com > From markamatte at hotmail.com Sat Jan 24 14:17:15 2004 From: markamatte at hotmail.com (Mark A Matte) Date: Sat, 24 Jan 2004 20:17:15 +0000 Subject: [AccessD] SubQuery Help??? Message-ID: Hello All, I'm having a brain cramp...I have a table with 3 fields: ID, Date, Amount. I'm pulling the records between A-Date and B-Date...from these records I need the date where the Amount is greatest...can someone refresh my memory... Thanks, Mark _________________________________________________________________ Find high-speed ?net deals ? comparison-shop your local providers here. https://broadband.msn.com From ssharkins at bellsouth.net Sat Jan 24 14:24:07 2004 From: ssharkins at bellsouth.net (Susan Harkins) Date: Sat, 24 Jan 2004 15:24:07 -0500 Subject: [AccessD] data types Message-ID: <014901c3e2b8$054650e0$210110ac@SUSANONE> I'm getting a adVarWChar (202) data type on an Access Text field -- is the W because it's coming via a Recordset or the Connection object? From the docs I've read so far, it isn't really clear. Susan H. From BBarabash at TappeConstruction.com Sat Jan 24 15:08:36 2004 From: BBarabash at TappeConstruction.com (Brett Barabash) Date: Sat, 24 Jan 2004 15:08:36 -0600 Subject: [AccessD] SubQuery Help??? Message-ID: <426071E0B0A6D311B3C0006008B0AB23AFE2E0@TAPPEEXCH01> Howzabout: SELECT ID, Date, Amount FROM MyTable WHERE Date Between [A-Date] And [B-Date] AND Amount = (SELECT Max([Amount]) FROM MyTable WHERE Date Between [A-Date] And [B-Date]) -----Original Message----- From: Mark A Matte [mailto:markamatte at hotmail.com] Sent: Saturday, January 24, 2004 2:17 PM To: accessd at databaseadvisors.com Subject: [AccessD] SubQuery Help??? Hello All, I'm having a brain cramp...I have a table with 3 fields: ID, Date, Amount. I'm pulling the records between A-Date and B-Date...from these records I need the date where the Amount is greatest...can someone refresh my memory... Thanks, Mark -------------------------------------------------------------------------------------------------------------------- This email and any files transmitted with it are confidential and intended solely for the use of the individual or entity to whom they are addressed. If you have received this email in error please notify the originator of the message. This footer also confirms that this email message has been scanned for the presence of computer viruses. Any views expressed in this message are those of the individual sender, except where the sender specifies and with authority, states them to be the views of Tappe Construction Co. Scanning of this message and addition of this footer is performed by SurfControl E-mail Filter software in conjunction with virus detection software. From markamatte at hotmail.com Sat Jan 24 15:54:40 2004 From: markamatte at hotmail.com (Mark A Matte) Date: Sat, 24 Jan 2004 21:54:40 +0000 Subject: [AccessD] SubQuery Help??? Message-ID: Sorry, I wasn't quite clear...here is the data ID Date Amount a 2/3 4.5 a 2/4 5.8 b 2/3 3.7 b 2/4 2.5 a 2/6 3.8 The results I would like to see are: ID Date Amount a 2/4 5.8 b 2/3 3.7 Any ideas? Thanks, Mark >From: Brett Barabash >Reply-To: Access Developers discussion and problem >solving >To: "'Access Developers discussion and problem solving'" > >Subject: RE: [AccessD] SubQuery Help??? >Date: Sat, 24 Jan 2004 15:08:36 -0600 > >Howzabout: > >SELECT ID, Date, Amount >FROM MyTable >WHERE Date Between [A-Date] And [B-Date] >AND Amount = > (SELECT Max([Amount]) > FROM MyTable > WHERE Date Between [A-Date] And [B-Date]) > >-----Original Message----- >From: Mark A Matte [mailto:markamatte at hotmail.com] >Sent: Saturday, January 24, 2004 2:17 PM >To: accessd at databaseadvisors.com >Subject: [AccessD] SubQuery Help??? > > >Hello All, > >I'm having a brain cramp...I have a table with 3 fields: ID, Date, Amount. >I'm pulling the records between A-Date and B-Date...from these records I >need the date where the Amount is greatest...can someone refresh my >memory... > >Thanks, > >Mark > >-------------------------------------------------------------------------------------------------------------------- >This email and any files transmitted with it are confidential and >intended solely for the use of the individual or entity to whom >they are addressed. >If you have received this email in error please notify the >originator of the message. This footer also confirms that this >email message has been scanned for the presence of computer viruses. > >Any views expressed in this message are those of the individual >sender, except where the sender specifies and with authority, >states them to be the views of Tappe Construction Co. > >Scanning of this message and addition of this footer is performed >by SurfControl E-mail Filter software in conjunction with >virus detection software. > >_______________________________________________ >AccessD mailing list >AccessD at databaseadvisors.com >http://databaseadvisors.com/mailman/listinfo/accessd >Website: http://www.databaseadvisors.com _________________________________________________________________ Scope out the new MSN Plus Internet Software ? optimizes dial-up to the max! http://join.msn.com/?pgmarket=en-us&page=byoa/plus&ST=1 From stuart at lexacorp.com.pg Sat Jan 24 16:46:11 2004 From: stuart at lexacorp.com.pg (Stuart McLachlan) Date: Sun, 25 Jan 2004 08:46:11 +1000 Subject: [AccessD] SubQuery Help??? In-Reply-To: Message-ID: <40138253.12278.119807@localhost> On 24 Jan 2004 at 20:17, Mark A Matte wrote: > Hello All, > > I'm having a brain cramp...I have a table with 3 fields: ID, Date, Amount. > I'm pulling the records between A-Date and B-Date...from these records I > need the date where the Amount is greatest...can someone refresh my > memory... > Select ID,[Date] as HiDate,HiAmount >From tblAmounts Inner Join (Select Distinct ID, Max(Amount) as HiAmount GroupBy By ID) As qMaxAmount On tblAmounts.ID = qMaxAmount.ID And tblAmounts.Amount = qMaxAmount,HiAmount -- Lexacorp Ltd http://www.lexacorp.com.pg Information Technology Consultancy, Software Development,System Support. From BBarabash at TappeConstruction.com Sat Jan 24 16:57:22 2004 From: BBarabash at TappeConstruction.com (Brett Barabash) Date: Sat, 24 Jan 2004 16:57:22 -0600 Subject: [AccessD] SubQuery Help??? Message-ID: <426071E0B0A6D311B3C0006008B0AB23AFE2E1@TAPPEEXCH01> This gives me the results you specified based on the given data sample: SELECT ID, [Date], Amount FROM MyTable WHERE Amount = (SELECT Max([Amount]) FROM MyTable Sub WHERE Sub.ID = MyTable.ID) In your earlier message, it sounded like you wanted to limit the data range as well, in which case just add a Between clause to the main and sub queries. -----Original Message----- From: Mark A Matte [mailto:markamatte at hotmail.com] Sent: Saturday, January 24, 2004 3:55 PM To: accessd at databaseadvisors.com Subject: RE: [AccessD] SubQuery Help??? Sorry, I wasn't quite clear...here is the data ID Date Amount a 2/3 4.5 a 2/4 5.8 b 2/3 3.7 b 2/4 2.5 a 2/6 3.8 The results I would like to see are: ID Date Amount a 2/4 5.8 b 2/3 3.7 Any ideas? Thanks, Mark >From: Brett Barabash >Reply-To: Access Developers discussion and problem >solving >To: "'Access Developers discussion and problem solving'" > >Subject: RE: [AccessD] SubQuery Help??? >Date: Sat, 24 Jan 2004 15:08:36 -0600 > >Howzabout: > >SELECT ID, Date, Amount >FROM MyTable >WHERE Date Between [A-Date] And [B-Date] >AND Amount = > (SELECT Max([Amount]) > FROM MyTable > WHERE Date Between [A-Date] And [B-Date]) > >-----Original Message----- >From: Mark A Matte [mailto:markamatte at hotmail.com] >Sent: Saturday, January 24, 2004 2:17 PM >To: accessd at databaseadvisors.com >Subject: [AccessD] SubQuery Help??? > > >Hello All, > >I'm having a brain cramp...I have a table with 3 fields: ID, Date, Amount. >I'm pulling the records between A-Date and B-Date...from these records I >need the date where the Amount is greatest...can someone refresh my >memory... > >Thanks, > >Mark > >--------------------------------------------------------------------------- ----------------------------------------- >This email and any files transmitted with it are confidential and >intended solely for the use of the individual or entity to whom >they are addressed. >If you have received this email in error please notify the >originator of the message. This footer also confirms that this >email message has been scanned for the presence of computer viruses. > >Any views expressed in this message are those of the individual >sender, except where the sender specifies and with authority, >states them to be the views of Tappe Construction Co. > >Scanning of this message and addition of this footer is performed >by SurfControl E-mail Filter software in conjunction with >virus detection software. > >_______________________________________________ >AccessD mailing list >AccessD at databaseadvisors.com >http://databaseadvisors.com/mailman/listinfo/accessd >Website: http://www.databaseadvisors.com _________________________________________________________________ Scope out the new MSN Plus Internet Software - optimizes dial-up to the max! http://join.msn.com/?pgmarket=en-us&page=byoa/plus&ST=1 _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -------------------------------------------------------------------------------------------------------------------- This email and any files transmitted with it are confidential and intended solely for the use of the individual or entity to whom they are addressed. If you have received this email in error please notify the originator of the message. This footer also confirms that this email message has been scanned for the presence of computer viruses. Any views expressed in this message are those of the individual sender, except where the sender specifies and with authority, states them to be the views of Tappe Construction Co. Scanning of this message and addition of this footer is performed by SurfControl E-mail Filter software in conjunction with virus detection software. From Jim.Hale at FleetPride.com Thu Jan 15 13:33:00 2004 From: Jim.Hale at FleetPride.com (Hale, Jim) Date: Thu, 15 Jan 2004 13:33:00 -0600 Subject: [AccessD] Message-ID: <6A6AA9DF57E4F046BDA1E273BDDB677201A9FC@corp-es01.fleetpride.com> Using the Excel export icon on the toolbar limits the output to approx 16k records, a limitation that goes back (as best as I can remember) to Excel 5. Use file export and select Excel 2000 to export up to the max of 63k records. HTH Jim Hale -----Original Message----- From: Stoker, Kenneth E [mailto:Kenneth.Stoker at pnl.gov] Sent: Thursday, January 15, 2004 11:29 AM To: AccessD at databaseadvisors.com Subject: [AccessD] I have a coworker who is getting the following error message when trying to output 17K+ records from a query to Excel. There are too many rows to output, based on the limitation specified by the output format or by Microsoft Access. Is there a setting that can be changed to increase the amount output? Is she hitting a limitation? Can anyone help here. Thanks. Ken Stoker Technology Commercialization Information Systems Administrator PH: (509) 375-3758 FAX: (509) 375-6731 E-mail: Kenneth.Stoker at pnl.gov _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From Jim.Hale at FleetPride.com Thu Jan 15 14:48:20 2004 From: Jim.Hale at FleetPride.com (Hale, Jim) Date: Thu, 15 Jan 2004 14:48:20 -0600 Subject: [AccessD] Implements vs WithEvents Message-ID: <6A6AA9DF57E4F046BDA1E273BDDB677201A9FD@corp-es01.fleetpride.com> Very nice explanation, thanks. Jim Hale -----Original Message----- From: John W. Colby [mailto:jwcolby at colbyconsulting.com] Sent: Tuesday, January 13, 2004 9:03 PM To: Access Developers discussion and problem solving Subject: RE: [AccessD] Implements vs WithEvents Robert, Risking sounding ignorant, I don't know what the VBA DHB is so I can't help you there. However AFAIK you can't use Implements for something like a control or form. These objects have code inside them that cause things to happen, properties to modify their behavior etc. ALL THAT STUFF can actually be inherited in VB.NET. That is, you can actually start with a combo box, subclass that combo box, GET ALL OF IT'S FUNCTIONALITY, all of it's code, all of its properties and methods, plus add your own!!! Or even override things to change the way the combo box functions. THAT is true inheritance. Not so in Access / VBA. An object like a combo box is a self contained unit that you simply cannot get inside of or modify in any meaningful way. It appears to us Access programmers almost like an ocx, i.e. a black box that does things. IMPORTANT... one of the things these objects do is raise Events! IOW, they tell you when a user clicks the mouse, double clicks the mouse etc. "inside" their boundaries on the screen. Knowing this, every Access programmer ALREADY USES WITHEVENTS. How? By creating an event stub in a form's class, and inserting code in that event stub to do something that the programmer wants to do when that event happens. The confusing thing is that a form's class DOES NOT REQUIRE a withevents dimension statement for any controls contained in the form (or for itself - the form - for that matter). However there is an IMPLICIT dim statement in the class, invisible, but there none the less. So every Access programmer already knows all about handling events for combos, command buttons etc. They (most of us anyway) use the built-in wizards in the form's builder interface to insert event handler stubs into the form's class and insert code there. THAT IS WITHEVENT PROGRAMMING, with all the details taken care of for you. Well guess what, ANY CLASS can have those same event handlers in them!!! The only differenc is that if the class is not a form class, there must be an EXPLICIT dim Withevents statement for any control (any object actually) that you wish to sink events for. 'inside my own combo class header... 'Dim a combo withevents Private WithEvents mcbo As ComboBox Having the dim statement does nothing more than tell my combo class that a control of a specific type MAY be transferring control of one or more of it's events to the class directly. It does NOT say WHICH control. To do that you have to pass in a control to the class and inside the class, SET the dimmed control = the passed in control. 'inside my own combo class... 'Pass in a control and SET the internal control variable function Init(lcbo as ComboBox) set mcbo = lcbo end init THAT tells the class which combo to sink events for (the one being passed in of course). Once you do that, the class can sink ANY of the control's events. But you still haven't told the class WHICH events to sink. IOW, Even having done this, nothing will happen in your class unless you create an event stub for the control event you wish to process inside the class. 'inside my own combo class... 'create an event stub to which control will be passed when a specific event fires. Private Sub mcbo_AfterUpdate() 'Do Something really cool Msgbox "Something really cool" End Sub THAT tells the combo class WHICH event(s) to sink. Now you must of course instantiate your own combo class in your form and pass in a specific control to it. 'inside my FORM'S class header... 'dimension my own combo class dim fclsMyCombo as clsMyCombo 'inside my FORM'S class Private Sub Form_Open(Cancel As Integer) 'CREATE AN INSTANCE OF MY COOL COMBO CLASS Set fclsMyCombo = new clsMyCombo 'PASS A REFERENCE TO A SPECIFIC COMBO ON MY FORM fclsMyCombo.Init cboStates 'a combo displaying all the states in the union End Sub THAT tells Access to dimension a class, create a class instance and WHICH combo to pass off to the class instance. NOW, with ALL THESE THINGS IN PLACE, if that combo AfterUpdate fires, control will EVENTUALLY get to your class and your message box will display it's message. Notice that your form doesn't need any event stub in it for the control. Even though the ONLY sub in your form's class is the Form_Open, the event stub in your class will sink the event and the message box will display its message. I know full well that all this sounds like a LOT of work just to get control into a class but after you've done it a few times it will be 2nd nature. And of course you can then have a combo class that (see my other post) handles the double click, opens a form, allows your user to edit the data, and when the form closes, requeries the combo, all neatly encapsulated in a class. Plus all the other neato keenarino stuff you can imagine your combo doing. Hang in there. It took me three tries, each six months apart to finally "get" Shamil's stuff and understand Withevents. Looking back I can't understand why, but life is like that sometimes. And no, the demos for the book are copyrighted by Wrox and I can't legally distribute them, however there are many demos (by me of course) on DatabaseAdvisors' web site. I also have a bunch on my own site. This stuff is important, keep trying. John W. Colby www.ColbyConsulting.com -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Robert Gracie Sent: Tuesday, January 13, 2004 8:47 PM To: Access Developers discussion and problem solving Subject: RE: [AccessD] Implements vs WithEvents "Hmmmmmmm, As confusion sets in, he takes and stabs himself in the chest with his keyboard...:-)" I'm trying to understand why the VBA DHB is teaching that using INTERFACE inheritance classes (by way of the Implements Keyword and such) is much better then simply using Event, RaiseEvent, and WithEvents... The problem, for me at least, is getting my mind around the larger concept, and knowing which structure to use and why. With my very limited understanding, the way they have presented, it seems reasonable to go this route if only to help keep control over code execution... I guess I just need to keep pounding away at these concepts....... Robert Gracie www.servicexp.com -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of John W. Colby Sent: Tuesday, January 13, 2004 7:54 PM To: Access Developers discussion and problem solving Subject: [AccessD] Implements vs WithEvents Charlotte, >They have somewhat different purposes. No, they have completely different purposes. >Implements allows you to subclass an existing object/class and give it additional or different functionality, so you can have a class Dog and a subclass Spaniel that has a property Retriever. Well... true but not exactly. My issue with that statement is the term subclass as you use it. Yes you are subclassing the original but ONLY the interface. IMHO that is almost useless Implements is an interface ONLY inheritance, i.e. it allows (forces) you to start with the same public data and method DEFINITION but does not actually inherit the behaviors (methods) themselves. I.e. the code that runs in the class that is being subclassed is NOT inherited into the subclass. Access' inheritance (interface) is not very useful except as a template kind of thing. I find it useless enough that I personally don't bother. On the other hand Shamil is a proponent so it must have its uses. When you move to VB.NET (or any of the other .net languages I believe) TRUE inheritance is available. I.e. if you have a method with a thousand lines of code, when you subclass that object the new object inherits that code as well as the data. In our Implements subclassing, you would have to cut and paste that thousand lines of code into the subclass. Can you say maintenance nightmare? >You can intercept and respond to specific events when they happen in the object. Did the Bark event trigger? WithEvents lets you find out and respond from another class/object. Exactly correct. One of the MAJOR shortcomings of Access / VBA (in fact VB prior to VB.Net) is that Inheritance is virtually non-existent, and even worse, objects other than forms don't have a built in class that you can get at to add functionality directly to. What WithEvents really does is allow you to build class wrappers for objects so that you can encapsulate behaviors (functionality) in your class. In essence you still have two objects, the control (or even another class or OCX) and your class, but now you can put all of the common functionality in your class along with the event stubs of the control/class/ocx that generates the event. This does not get you any further down the road towards inheritance, sadly it simply doesn't appear to be possible in Access / VBA. But it does provide a huge step up in encapsulation. John W. Colby www.ColbyConsulting.com -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Charlotte Foust Sent: Tuesday, January 13, 2004 4:56 PM To: Access Developers discussion and problem solving Subject: RE: [AccessD] =function() in .onclick They have somewhat different purposes. Implements allows you to subclass an existing object/class and give it additional or different functionality, so you can have a class Dog and a subclass Spaniel that has a property Retriever. WithEvents allows you to monitor the events of an object/class. You can intercept and respond to specific events when they happen in the object. Did the Bark event trigger? WithEvents lets you find out and respond from another class/object. Charlotte Foust -----Original Message----- From: Robert Gracie [mailto:Subscriptions at servicexp.com] Sent: Tuesday, January 13, 2004 1:45 PM To: Access Developers discussion and problem solving Subject: RE: [AccessD] =function() in .onclick Hello All, Since I'm just learning this type of programming technique I thought I would ask a question... Why not use Implements instead of WithEvents? My limited understand of WithEvents is that they will not return functionality unit they (the event) has completed processing... Since I'm just at the "door" so to speak with learning how to use and incorporate these new (to me) programming techniques into my work, I really want to start out using the "best" technique... Robert Gracie www.servicexp.com _______________________________________________ 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 _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From jwcolby at colbyconsulting.com Sat Jan 24 22:33:14 2004 From: jwcolby at colbyconsulting.com (John W. Colby) Date: Sat, 24 Jan 2004 23:33:14 -0500 Subject: [AccessD] Implements vs WithEvents In-Reply-To: <6A6AA9DF57E4F046BDA1E273BDDB677201A9FD@corp-es01.fleetpride.com> Message-ID: Always Welcome. John W. Colby www.ColbyConsulting.com -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Hale, Jim Sent: Thursday, January 15, 2004 3:48 PM To: 'Access Developers discussion and problem solving' Subject: RE: [AccessD] Implements vs WithEvents Very nice explanation, thanks. Jim Hale -----Original Message----- From: John W. Colby [mailto:jwcolby at colbyconsulting.com] Sent: Tuesday, January 13, 2004 9:03 PM To: Access Developers discussion and problem solving Subject: RE: [AccessD] Implements vs WithEvents Robert, Risking sounding ignorant, I don't know what the VBA DHB is so I can't help you there. However AFAIK you can't use Implements for something like a control or form. These objects have code inside them that cause things to happen, properties to modify their behavior etc. ALL THAT STUFF can actually be inherited in VB.NET. That is, you can actually start with a combo box, subclass that combo box, GET ALL OF IT'S FUNCTIONALITY, all of it's code, all of its properties and methods, plus add your own!!! Or even override things to change the way the combo box functions. THAT is true inheritance. Not so in Access / VBA. An object like a combo box is a self contained unit that you simply cannot get inside of or modify in any meaningful way. It appears to us Access programmers almost like an ocx, i.e. a black box that does things. IMPORTANT... one of the things these objects do is raise Events! IOW, they tell you when a user clicks the mouse, double clicks the mouse etc. "inside" their boundaries on the screen. Knowing this, every Access programmer ALREADY USES WITHEVENTS. How? By creating an event stub in a form's class, and inserting code in that event stub to do something that the programmer wants to do when that event happens. The confusing thing is that a form's class DOES NOT REQUIRE a withevents dimension statement for any controls contained in the form (or for itself - the form - for that matter). However there is an IMPLICIT dim statement in the class, invisible, but there none the less. So every Access programmer already knows all about handling events for combos, command buttons etc. They (most of us anyway) use the built-in wizards in the form's builder interface to insert event handler stubs into the form's class and insert code there. THAT IS WITHEVENT PROGRAMMING, with all the details taken care of for you. Well guess what, ANY CLASS can have those same event handlers in them!!! The only differenc is that if the class is not a form class, there must be an EXPLICIT dim Withevents statement for any control (any object actually) that you wish to sink events for. 'inside my own combo class header... 'Dim a combo withevents Private WithEvents mcbo As ComboBox Having the dim statement does nothing more than tell my combo class that a control of a specific type MAY be transferring control of one or more of it's events to the class directly. It does NOT say WHICH control. To do that you have to pass in a control to the class and inside the class, SET the dimmed control = the passed in control. 'inside my own combo class... 'Pass in a control and SET the internal control variable function Init(lcbo as ComboBox) set mcbo = lcbo end init THAT tells the class which combo to sink events for (the one being passed in of course). Once you do that, the class can sink ANY of the control's events. But you still haven't told the class WHICH events to sink. IOW, Even having done this, nothing will happen in your class unless you create an event stub for the control event you wish to process inside the class. 'inside my own combo class... 'create an event stub to which control will be passed when a specific event fires. Private Sub mcbo_AfterUpdate() 'Do Something really cool Msgbox "Something really cool" End Sub THAT tells the combo class WHICH event(s) to sink. Now you must of course instantiate your own combo class in your form and pass in a specific control to it. 'inside my FORM'S class header... 'dimension my own combo class dim fclsMyCombo as clsMyCombo 'inside my FORM'S class Private Sub Form_Open(Cancel As Integer) 'CREATE AN INSTANCE OF MY COOL COMBO CLASS Set fclsMyCombo = new clsMyCombo 'PASS A REFERENCE TO A SPECIFIC COMBO ON MY FORM fclsMyCombo.Init cboStates 'a combo displaying all the states in the union End Sub THAT tells Access to dimension a class, create a class instance and WHICH combo to pass off to the class instance. NOW, with ALL THESE THINGS IN PLACE, if that combo AfterUpdate fires, control will EVENTUALLY get to your class and your message box will display it's message. Notice that your form doesn't need any event stub in it for the control. Even though the ONLY sub in your form's class is the Form_Open, the event stub in your class will sink the event and the message box will display its message. I know full well that all this sounds like a LOT of work just to get control into a class but after you've done it a few times it will be 2nd nature. And of course you can then have a combo class that (see my other post) handles the double click, opens a form, allows your user to edit the data, and when the form closes, requeries the combo, all neatly encapsulated in a class. Plus all the other neato keenarino stuff you can imagine your combo doing. Hang in there. It took me three tries, each six months apart to finally "get" Shamil's stuff and understand Withevents. Looking back I can't understand why, but life is like that sometimes. And no, the demos for the book are copyrighted by Wrox and I can't legally distribute them, however there are many demos (by me of course) on DatabaseAdvisors' web site. I also have a bunch on my own site. This stuff is important, keep trying. John W. Colby www.ColbyConsulting.com -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Robert Gracie Sent: Tuesday, January 13, 2004 8:47 PM To: Access Developers discussion and problem solving Subject: RE: [AccessD] Implements vs WithEvents "Hmmmmmmm, As confusion sets in, he takes and stabs himself in the chest with his keyboard...:-)" I'm trying to understand why the VBA DHB is teaching that using INTERFACE inheritance classes (by way of the Implements Keyword and such) is much better then simply using Event, RaiseEvent, and WithEvents... The problem, for me at least, is getting my mind around the larger concept, and knowing which structure to use and why. With my very limited understanding, the way they have presented, it seems reasonable to go this route if only to help keep control over code execution... I guess I just need to keep pounding away at these concepts....... Robert Gracie www.servicexp.com -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of John W. Colby Sent: Tuesday, January 13, 2004 7:54 PM To: Access Developers discussion and problem solving Subject: [AccessD] Implements vs WithEvents Charlotte, >They have somewhat different purposes. No, they have completely different purposes. >Implements allows you to subclass an existing object/class and give it additional or different functionality, so you can have a class Dog and a subclass Spaniel that has a property Retriever. Well... true but not exactly. My issue with that statement is the term subclass as you use it. Yes you are subclassing the original but ONLY the interface. IMHO that is almost useless Implements is an interface ONLY inheritance, i.e. it allows (forces) you to start with the same public data and method DEFINITION but does not actually inherit the behaviors (methods) themselves. I.e. the code that runs in the class that is being subclassed is NOT inherited into the subclass. Access' inheritance (interface) is not very useful except as a template kind of thing. I find it useless enough that I personally don't bother. On the other hand Shamil is a proponent so it must have its uses. When you move to VB.NET (or any of the other .net languages I believe) TRUE inheritance is available. I.e. if you have a method with a thousand lines of code, when you subclass that object the new object inherits that code as well as the data. In our Implements subclassing, you would have to cut and paste that thousand lines of code into the subclass. Can you say maintenance nightmare? >You can intercept and respond to specific events when they happen in the object. Did the Bark event trigger? WithEvents lets you find out and respond from another class/object. Exactly correct. One of the MAJOR shortcomings of Access / VBA (in fact VB prior to VB.Net) is that Inheritance is virtually non-existent, and even worse, objects other than forms don't have a built in class that you can get at to add functionality directly to. What WithEvents really does is allow you to build class wrappers for objects so that you can encapsulate behaviors (functionality) in your class. In essence you still have two objects, the control (or even another class or OCX) and your class, but now you can put all of the common functionality in your class along with the event stubs of the control/class/ocx that generates the event. This does not get you any further down the road towards inheritance, sadly it simply doesn't appear to be possible in Access / VBA. But it does provide a huge step up in encapsulation. John W. Colby www.ColbyConsulting.com -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Charlotte Foust Sent: Tuesday, January 13, 2004 4:56 PM To: Access Developers discussion and problem solving Subject: RE: [AccessD] =function() in .onclick They have somewhat different purposes. Implements allows you to subclass an existing object/class and give it additional or different functionality, so you can have a class Dog and a subclass Spaniel that has a property Retriever. WithEvents allows you to monitor the events of an object/class. You can intercept and respond to specific events when they happen in the object. Did the Bark event trigger? WithEvents lets you find out and respond from another class/object. Charlotte Foust -----Original Message----- From: Robert Gracie [mailto:Subscriptions at servicexp.com] Sent: Tuesday, January 13, 2004 1:45 PM To: Access Developers discussion and problem solving Subject: RE: [AccessD] =function() in .onclick Hello All, Since I'm just learning this type of programming technique I thought I would ask a question... Why not use Implements instead of WithEvents? My limited understand of WithEvents is that they will not return functionality unit they (the event) has completed processing... Since I'm just at the "door" so to speak with learning how to use and incorporate these new (to me) programming techniques into my work, I really want to start out using the "best" technique... Robert Gracie www.servicexp.com _______________________________________________ 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 _______________________________________________ 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 From gustav at cactus.dk Sun Jan 25 03:40:30 2004 From: gustav at cactus.dk (Gustav Brock) Date: Sun, 25 Jan 2004 10:40:30 +0100 Subject: [AccessD] SubQuery Help??? In-Reply-To: References: Message-ID: <1821314379.20040125104030@cactus.dk> Hi Mark What if several dates of the same id show identical amounts? /gustav > I wasn't quite clear...here is the data > ID Date Amount > a 2/3 4.5 > a 2/4 5.8 > b 2/3 3.7 > b 2/4 2.5 > a 2/6 3.8 > The results I would like to see are: > ID Date Amount > a 2/4 5.8 > b 2/3 3.7 >>From: Brett Barabash >>Reply-To: Access Developers discussion and problem >>solving >>To: "'Access Developers discussion and problem solving'" >> >>Subject: RE: [AccessD] SubQuery Help??? >>Date: Sat, 24 Jan 2004 15:08:36 -0600 >> >>Howzabout: >> >>SELECT ID, Date, Amount >>FROM MyTable >>WHERE Date Between [A-Date] And [B-Date] >>AND Amount = >> (SELECT Max([Amount]) >> FROM MyTable >> WHERE Date Between [A-Date] And [B-Date]) >> >>-----Original Message----- >>From: Mark A Matte [mailto:markamatte at hotmail.com] >>Sent: Saturday, January 24, 2004 2:17 PM >>To: accessd at databaseadvisors.com >>Subject: [AccessD] SubQuery Help??? >> >> >>Hello All, >> >>I'm having a brain cramp...I have a table with 3 fields: ID, Date, Amount. >>I'm pulling the records between A-Date and B-Date...from these records I >>need the date where the Amount is greatest...can someone refresh my >>memory... From mikedorism at adelphia.net Sun Jan 25 10:07:49 2004 From: mikedorism at adelphia.net (Mike & Doris Manning) Date: Sun, 25 Jan 2004 11:07:49 -0500 Subject: [AccessD] data types In-Reply-To: <014901c3e2b8$054650e0$210110ac@SUSANONE> Message-ID: <000001c3e35d$6352a490$8b194244@hargrove.internal> It could be an Ntext field Doris Manning Database Administrator Hargrove Inc. www.hargroveinc.com -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Susan Harkins Sent: Saturday, January 24, 2004 3:24 PM To: AccessD at databaseadvisors.com Subject: [AccessD] data types I'm getting a adVarWChar (202) data type on an Access Text field -- is the W because it's coming via a Recordset or the Connection object? From the docs I've read so far, it isn't really clear. Susan H. _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From ssharkins at bellsouth.net Sun Jan 25 11:08:16 2004 From: ssharkins at bellsouth.net (Susan Harkins) Date: Sun, 25 Jan 2004 12:08:16 -0500 Subject: [AccessD] data types References: <000001c3e35d$6352a490$8b194244@hargrove.internal> Message-ID: <005401c3e366$de3fd340$210110ac@SUSANONE> It's the constant for a Text field. It's a real pia keeping up with all the constants -- I wish they'd offer just one set -- just one set... Susan H. > It could be an Ntext field > > Doris Manning > Database Administrator > Hargrove Inc. > www.hargroveinc.com > > > -----Original Message----- > From: accessd-bounces at databaseadvisors.com > [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Susan Harkins > Sent: Saturday, January 24, 2004 3:24 PM > To: AccessD at databaseadvisors.com > Subject: [AccessD] data types > > > I'm getting a adVarWChar (202) data type on an Access Text field -- is the W > because it's coming via a Recordset or the Connection object? From the docs > I've read so far, it isn't really clear. > > Susan H. > > _______________________________________________ > 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 > From Developer at UltraDNT.com Sun Jan 25 14:10:47 2004 From: Developer at UltraDNT.com (Developer) Date: Sun, 25 Jan 2004 15:10:47 -0500 Subject: [AccessD] data types In-Reply-To: <005401c3e366$de3fd340$210110ac@SUSANONE> Message-ID: <000301c3e37f$520a8a00$7001a8c0@COA3> It is specifically because you are using ADO provider, so its both (or neither) the connection and/or recordset. The ADO constant 202 is equivalent to Access text, and SQL NVarChar. If you want "dbText" you have to open it with DAO. There's a chart of the ADO Enums at http://able-consulting.com/adodatatypeenum1.htm. Hth Steve -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Susan Harkins Sent: Sunday, January 25, 2004 12:08 PM To: Access Developers discussion and problem solving Subject: Re: [AccessD] data types It's the constant for a Text field. It's a real pia keeping up with all the constants -- I wish they'd offer just one set -- just one set... Susan H. > It could be an Ntext field > > Doris Manning > Database Administrator > Hargrove Inc. > www.hargroveinc.com > > > -----Original Message----- > From: accessd-bounces at databaseadvisors.com > [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Susan > Harkins > Sent: Saturday, January 24, 2004 3:24 PM > To: AccessD at databaseadvisors.com > Subject: [AccessD] data types > > > I'm getting a adVarWChar (202) data type on an Access Text field -- is > the W > because it's coming via a Recordset or the Connection object? From the docs > I've read so far, it isn't really clear. > > Susan H. > > _______________________________________________ > 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 > _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From tinanfields at torchlake.com Sun Jan 25 15:07:52 2004 From: tinanfields at torchlake.com (Tina Norris Fields) Date: Sun, 25 Jan 2004 16:07:52 -0500 Subject: [AccessD] Form as Subform - Query Fails - Why? References: <000a01c3d2e5$08d311e0$7001a8c0@COA3> Message-ID: <40143028.4040804@torchlake.com> Steve, That make way too much sense to be legal!!! Thanks for the terrific thoughts. I will put them to good use. Regards, Tina Developer wrote: >Tina: >Your automation code was not recognized because, as I recall from an >earlier post, your Access button was using the CreateObject method to >open Word. This is the "late binding" approach, and is useful because >it is version indepenedent. You have to add a reference in a module >under Project/References to the version of Word you are using to get >intellisense and recognizable constants. > >I posted earlier about this, also, concerning Access to Word MailMerge >... Basically, my preferred method is to have a form that takes the >input parameters from the user, generate a recordset from their >parameters, loop the recordset and write the data to a .CSV file (I >always use "c:\temp\rpt.csv"), and then merge that to a .DOT. All the >Word DOT's for my app are stored in the same folder as the BE .mdb, so I >can dynamically generate a list box of available DOTs at run-time, and >all look for "c:\temp\rpt.csv". This avoids that "toolbar" issue (which >I have seen too many times) and as a CSV, the data is also >"Excel-ready", so I can use the same code, and then open Excel instead >of mail merging to Word. This method also lets the user develop new >merge letters, without changing the application. > >Hth, >Steve > > > > > >-----Original Message----- >From: accessd-bounces at databaseadvisors.com >[mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Tina Norris >Fields >Sent: Sunday, January 04, 2004 7:36 AM >To: Access Developers discussion and problem solving >Subject: Re: [AccessD] Form as Subform - Query Fails - Why? > > >Hi again Gustav, > >I ended up keeping the button to just launch Word. I created a little >macro in Word to open the acknowledgement form letter, which already >looks for its data source as the tblAcknowledgePay in the TLA database. > My user has only to click to merge the document, and there are her >acknowledgement letters! It all looks much more spiffy and easy now >than what she was doing - seriously. > >It used to be advisable to close Access before launching Word and >loading a document to merge data from a database - (A95, A97) since Word > >would open an instance of Access as part of the merge process, and >having two copies of Access open at one time placed heavy demands on the > >system resources. That no longer appears to be the case. I'm >delighted. However, during my work on this little modification, from >time to time Word would fail to find the data source with which it has >been linked forever and functionality would disappear, i.e., the merge >toolbar dimmed and no commands worked, Closing the programs and >relaunching them fixed that usually. Now that I've finished fiddling >with it, just running the queries and launching the merge form document, > >things are behaving nicely. > >I did study the Microsoft Automation help file, but the things it >suggested weren't recognized from within Access, so I still have some >learning to do there. Objects such as wordApp and wordDoc were >unrecognized from within Access - worked great from within Word. So >there has to be an import statement or something like that to tell >Access to look to another library of objects, too. Back to the books! > Thanks for your help. I will work on the syntax until the thing does >work for me, I can see the situation arising again sometime. > >Best regards, >Tina > > >Gustav Brock wrote: > > > >>Hi Tina >> >>Try with >> >> Between >> >> >> >> >[Forms]![fInstructions]![subYourSubformControlName].Form![BeginningDate] > > >> And >> >> >> >[Forms]![fInstructions]![subYourSubformControlName].Form![EndingDate] > > >>/gustav >> >> >> >> >> >> >>>Hi John, >>> >>> >>> >>> >> >> >> >> >>>Thanks for the reply. I think I have not been completely clear about >>>my >>>quandary. The parameter query selects records based on the following: >>> >>> >>> >>> >> >> >> >> >>>Between [Forms]![fCalendar]![BeginningDate] And >>>[Forms]![fCalendar]![EndingDate] >>> >>> >>> >>> >> >> >> >> >>>- which works fine as long as one sets the dates by opening fCalendar >>>as >>>a stand-alone form. >>> >>> >>> >>> >> >> >> >> >>>I made a form with a series of instructions, hoping to guide my user >>> >>> >>>from step to step without having to remind the user to set the dates >> >> >>>first in the fCalendar - >>>the idea was to embed an instance of the fCalendar in the instruction >>>form - set the dates right here in what is now a subform of the >>>instruction form. >>> >>> >>> >>> >> >> >> >> >>>If one sets the dates in the embedded instance of fCalendar, the query >>>does not find its parameters. Well, say I to myself, I probably need >>> >>> >to > > >>>tell the query where to find those date textboxes, but I do not find a >>> >>> > > > >>>way to identify them other than as they are already identified . Is >>>there a collection other than [Forms] I need to find? When I examine >>> >>> >my > > >>>fCalendar through the subform control, I see all the correct textbox >>>names - it certainly appears to be the same form - why does setting >>> >>> >its > > >>>dates not provide the necessary parameters to the query? I don't see >>> >>> >it. > > >>> >>> >>> >>> >>_______________________________________________ >>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 > >_______________________________________________ >AccessD mailing list >AccessD at databaseadvisors.com >http://databaseadvisors.com/mailman/listinfo/accessd >Website: http://www.databaseadvisors.com > > > From accessd666 at yahoo.com Mon Jan 26 04:27:56 2004 From: accessd666 at yahoo.com (Sad Der) Date: Mon, 26 Jan 2004 02:27:56 -0800 (PST) Subject: [AccessD] Make-table query points to c:\documents and settings?! Message-ID: <20040126102756.58921.qmail@web60209.mail.yahoo.com> Hi group, I've created a routine that creates a new DB.This Temp_Db is created in the same directory as the FE. I then use a couple of MAKE TABLE-queries to create tables in the temp_db. This worked great. Now, i'm getting errors that my MAKE_TABLE-queries cannot find the Temp_db!? I get this error: Err.Number = 3024 Err.Description =Could not find file: C:\Documents and Settings\.... As you can see it points to C:\Documents and Settings. However the temp_db is created on my d:\projects\... Here's the code I use: ******************************************************* Else Set db = Workspaces(0).CreateDatabase(strPath & "TEMP_FE_" & strFile, dbLangGeneral) Set db = CurrentDb() Set qdf = New DAO.QueryDef '------------------------------------------------ 'Create tables in newly created database '------------------------------------------------ 'Loop through query list For Each qdf In db.QueryDefs 'check if qryName starts with qryMake_ If InStr(1, qdf.Name, "qryMake_") Then Call CreateTables(qdf.Name) x = x + 1 End If Next Call MsgBox("The following objects have been created:" & vbCrLf & _ " - Temporary database" & vbCrLf & _ " - " & x & " Tables", vbInformation + vbDefaultButton1, "Objects created") End If ******************************************************* Any idea's why it points to C:\documents and Settings? When I created the make table queries I selected the temp_db. Sander __________________________________ Do you Yahoo!? Yahoo! SiteBuilder - Free web site building tool. Try it! http://webhosting.yahoo.com/ps/sb/ From gustav at cactus.dk Mon Jan 26 04:47:37 2004 From: gustav at cactus.dk (Gustav Brock) Date: Mon, 26 Jan 2004 11:47:37 +0100 Subject: [AccessD] Make-table query points to c:\documents and settings?! In-Reply-To: <20040126102756.58921.qmail@web60209.mail.yahoo.com> References: <20040126102756.58921.qmail@web60209.mail.yahoo.com> Message-ID: <13210704912.20040126114737@cactus.dk> Hi Sad What does Debug.Print strPath & "TEMP_FE_" & strFile print? /gustav > Set db = Workspaces(0).CreateDatabase(strPath & > "TEMP_FE_" & strFile, dbLangGeneral) From Erwin.Craps at ithelps.be Mon Jan 26 05:48:58 2004 From: Erwin.Craps at ithelps.be (Erwin Craps - IT Helps) Date: Mon, 26 Jan 2004 12:48:58 +0100 Subject: [AccessD] Make-table query points to c:\documents and settings?! Message-ID: <46B976F2B698FF46A4FE7636509B22DF03D164@stekelbes.ithelps.local> I don't understand why you create a new database in "set db" and then set db back to the current one. If you do "For Each qdf In db.QueryDefs" If you create a table in db that would be the current db and not the new db?! If function "CreateTables" does create the table in new db, then that should be fine but... You should db.close before setting it to the current one. Even better use dim dbCurr en dim dbNew statements for avoiding confusion. Please note that you do not need to close currentdb (dbCurr.close). Just set it to nothing. Erwin -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Sad Der Sent: Monday, January 26, 2004 11:28 AM To: Acces User Group Subject: [AccessD] Make-table query points to c:\documents and settings?! Hi group, I've created a routine that creates a new DB.This Temp_Db is created in the same directory as the FE. I then use a couple of MAKE TABLE-queries to create tables in the temp_db. This worked great. Now, i'm getting errors that my MAKE_TABLE-queries cannot find the Temp_db!? I get this error: Err.Number = 3024 Err.Description =Could not find file: C:\Documents and Settings\.... As you can see it points to C:\Documents and Settings. However the temp_db is created on my d:\projects\... Here's the code I use: ******************************************************* Else Set db = Workspaces(0).CreateDatabase(strPath & "TEMP_FE_" & strFile, dbLangGeneral) Set db = CurrentDb() Set qdf = New DAO.QueryDef '------------------------------------------------ 'Create tables in newly created database '------------------------------------------------ 'Loop through query list For Each qdf In db.QueryDefs 'check if qryName starts with qryMake_ If InStr(1, qdf.Name, "qryMake_") Then Call CreateTables(qdf.Name) x = x + 1 End If Next Call MsgBox("The following objects have been created:" & vbCrLf & _ " - Temporary database" & vbCrLf & _ " - " & x & " Tables", vbInformation + vbDefaultButton1, "Objects created") End If ******************************************************* Any idea's why it points to C:\documents and Settings? When I created the make table queries I selected the temp_db. Sander __________________________________ Do you Yahoo!? Yahoo! SiteBuilder - Free web site building tool. Try it! http://webhosting.yahoo.com/ps/sb/ _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From accessd666 at yahoo.com Mon Jan 26 07:46:10 2004 From: accessd666 at yahoo.com (Sad Der) Date: Mon, 26 Jan 2004 05:46:10 -0800 (PST) Subject: [AccessD] Make-table query points to c:\documents and settings?! In-Reply-To: <13210704912.20040126114737@cactus.dk> Message-ID: <20040126134610.64095.qmail@web60210.mail.yahoo.com> Gustav, It says: d:\projects.... Already checked that. Sander --- Gustav Brock wrote: > Hi Sad > > What does > > Debug.Print strPath & "TEMP_FE_" & strFile > > print? > > /gustav > > > > Set db = > Workspaces(0).CreateDatabase(strPath & > > "TEMP_FE_" & strFile, dbLangGeneral) > > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com __________________________________ Do you Yahoo!? Yahoo! SiteBuilder - Free web site building tool. Try it! http://webhosting.yahoo.com/ps/sb/ From accessd666 at yahoo.com Mon Jan 26 07:58:31 2004 From: accessd666 at yahoo.com (Sad Der) Date: Mon, 26 Jan 2004 05:58:31 -0800 (PST) Subject: [AccessD] Make-table query points to c:\documents and settings?! In-Reply-To: <46B976F2B698FF46A4FE7636509B22DF03D164@stekelbes.ithelps.local> Message-ID: <20040126135831.75097.qmail@web60208.mail.yahoo.com> I create a new database. After that I set Db back to current db. Then I loop through all queries in current db searching for my MakeTable queries. Using my CreateTable function I start the MakeTable queries. You're corrected in saying that I should use 2 objects but...I didn't. I tested it and it worked. Worked...that is. because now it want's to create the tables on c:\.... Sander --- Erwin Craps - IT Helps wrote: > I don't understand why you create a new database in > "set db" and then > set db back to the current one. > If you do "For Each qdf In db.QueryDefs" > > If you create a table in db that would be the > current db and not the new > db?! > If function "CreateTables" does create the table in > new db, then that > should be fine but... > > You should db.close before setting it to the current > one. > Even better use dim dbCurr en dim dbNew statements > for avoiding > confusion. > > Please note that you do not need to close currentdb > (dbCurr.close). > Just set it to nothing. > > > Erwin > > > > > -----Original Message----- > From: accessd-bounces at databaseadvisors.com > [mailto:accessd-bounces at databaseadvisors.com] On > Behalf Of Sad Der > Sent: Monday, January 26, 2004 11:28 AM > To: Acces User Group > Subject: [AccessD] Make-table query points to > c:\documents and > settings?! > > Hi group, > > I've created a routine that creates a new DB.This > Temp_Db is created in > the same directory as the FE. > > I then use a couple of MAKE TABLE-queries to create > tables in the > temp_db. > > This worked great. Now, i'm getting errors that my > MAKE_TABLE-queries > cannot find the Temp_db!? > I get this error: > Err.Number = 3024 > Err.Description =Could not find file: C:\Documents > and Settings\.... > > As you can see it points to C:\Documents and > Settings. > However the temp_db is created on my d:\projects\... > > Here's the code I use: > ******************************************************* > Else > Set db = Workspaces(0).CreateDatabase(strPath > & "TEMP_FE_" & > strFile, dbLangGeneral) > Set db = CurrentDb() > Set qdf = New DAO.QueryDef > > '------------------------------------------------ > 'Create tables in newly created database > > '------------------------------------------------ > 'Loop through query list > For Each qdf In db.QueryDefs > 'check if qryName starts with qryMake_ > If InStr(1, qdf.Name, "qryMake_") Then > Call CreateTables(qdf.Name) > x = x + 1 > End If > Next > Call MsgBox("The following objects have been > created:" & vbCrLf & > _ > " - Temporary database" & vbCrLf > & _ > " - " & x & " Tables", > vbInformation + > vbDefaultButton1, "Objects created") > > End If > ******************************************************* > Any idea's why it points to C:\documents and > Settings? > When I created the make table queries I selected the > temp_db. > > Sander > > __________________________________ > Do you Yahoo!? > Yahoo! SiteBuilder - Free web site building tool. > Try it! > http://webhosting.yahoo.com/ps/sb/ > _______________________________________________ > 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 __________________________________ Do you Yahoo!? Yahoo! SiteBuilder - Free web site building tool. Try it! http://webhosting.yahoo.com/ps/sb/ From gustav at cactus.dk Mon Jan 26 08:00:50 2004 From: gustav at cactus.dk (Gustav Brock) Date: Mon, 26 Jan 2004 15:00:50 +0100 Subject: [AccessD] Make-table query points to c:\documents and settings?! In-Reply-To: <20040126134610.64095.qmail@web60210.mail.yahoo.com> References: <20040126134610.64095.qmail@web60210.mail.yahoo.com> Message-ID: <6222298112.20040126150050@cactus.dk> Hi Sad So did you specify the full path of the tables in those make-table queries? /gustav > Gustav, > It says: d:\projects.... > Already checked that. > Sander > --- Gustav Brock wrote: >> Hi Sad >> >> What does >> >> Debug.Print strPath & "TEMP_FE_" & strFile >> >> print? >> >> /gustav >> >> >> > Set db = >> Workspaces(0).CreateDatabase(strPath & >> > "TEMP_FE_" & strFile, dbLangGeneral) From accessd666 at yahoo.com Mon Jan 26 08:29:34 2004 From: accessd666 at yahoo.com (Sad Der) Date: Mon, 26 Jan 2004 06:29:34 -0800 (PST) Subject: [AccessD] Make-table query points to c:\documents and settings?! In-Reply-To: <6222298112.20040126150050@cactus.dk> Message-ID: <20040126142934.80492.qmail@web60204.mail.yahoo.com> No, where can I do that? I looked at the properties but I just saw in wich db the tables will be created. Not the path! Sander --- Gustav Brock wrote: > Hi Sad > > So did you specify the full path of the tables in > those make-table > queries? > > /gustav > > > > Gustav, > > > It says: d:\projects.... > > Already checked that. > > > Sander > > --- Gustav Brock wrote: > >> Hi Sad > >> > >> What does > >> > >> Debug.Print strPath & "TEMP_FE_" & strFile > >> > >> print? > >> > >> /gustav > >> > >> > >> > Set db = > >> Workspaces(0).CreateDatabase(strPath & > >> > "TEMP_FE_" & strFile, dbLangGeneral) > > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com __________________________________ Do you Yahoo!? Yahoo! SiteBuilder - Free web site building tool. Try it! http://webhosting.yahoo.com/ps/sb/ From gustav at cactus.dk Mon Jan 26 08:43:23 2004 From: gustav at cactus.dk (Gustav Brock) Date: Mon, 26 Jan 2004 15:43:23 +0100 Subject: [AccessD] Make-table query points to c:\documents and settings?! In-Reply-To: <20040126142934.80492.qmail@web60204.mail.yahoo.com> References: <20040126142934.80492.qmail@web60204.mail.yahoo.com> Message-ID: <13824851013.20040126154323@cactus.dk> Hi Sad Switch from design view of the query to SQL view ... /gustav > No, where can I do that? > I looked at the properties but I just saw in wich db > the tables will be created. Not the path! > Sander > --- Gustav Brock wrote: >> Hi Sad >> >> So did you specify the full path of the tables in >> those make-table >> queries? >> >> /gustav >> >> >> > Gustav, >> >> > It says: d:\projects.... >> > Already checked that. >> >> > Sander >> > --- Gustav Brock wrote: >> >> Hi Sad >> >> >> >> What does >> >> >> >> Debug.Print strPath & "TEMP_FE_" & strFile >> >> >> >> print? >> >> >> >> /gustav >> >> >> >> >> >> > Set db = >> >> Workspaces(0).CreateDatabase(strPath & >> >> > "TEMP_FE_" & strFile, dbLangGeneral) From john at winhaven.net Mon Jan 26 10:00:19 2004 From: john at winhaven.net (John Bartow) Date: Mon, 26 Jan 2004 10:00:19 -0600 Subject: [AccessD] LWS Beta testers In-Reply-To: Message-ID: John, When can I get LWS? John B. > -----Original Message----- > From: accessd-bounces at databaseadvisors.com > [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of John W. Colby > Sent: Sunday, December 21, 2003 6:30 PM > To: AccessD > Subject: [AccessD] LWS Beta testers > > > Folks, > > I am working on my Light Weight Security system and am looking for beta > testers, i.e. people who would like a presentation level security system > such as I am designing. This email will briefly outline how > things work so > that you can decide whether you would like to test it. I am looking for > PROGRAMMERS as beta testers. > > LWS is designed to restrict basic operations on forms and controls. The > form operations / properties that it will affect are Open form, > Edit record, > Delete record and Add record. The control properties affected > are Enabled, > Locked, and Visible. > > LWS is NOT designed to replace Access' (or SQL Server's) security. LWS is > designed to allow the developer to restrict operations at the INTERFACE > level, i.e. who can open forms, who can edit records in a given form, who > can SEE a given control on a given form, who can EDIT data in a given > control on a given form. These are fundamentally different > issues than the > built in DATA security that Access and SQL Server provide. I designed LWS > because my clients asked for things like "only allow certain users to be > able to see (or use) this control" or "only allow certain users to be able > to open this form" etc. > > As an example, suppose you have a form that is used by several different > groups of people in the company. One group can only use the form > to browse > data, never edit or delete the data. One group is allowed to > open the form > and edit records, but never delete records. Another group can also delete > records. Another group is allowed to edit most of the data but several of > the fields should be read only, i.e. that group cannot edit those fields. > Another form displays sensitive data that only the Personnel group can see > (and edit) the salary field for. Other groups can see the form but the > salary field is just invisible. > > All of these kinds of issues are what LWS is designed to address. > > LWS is designed around a Users / Groups metaphor similar to > Windows NT/2K/XP > etc. Users exist but don't directly have any innate abilities. Users > belong to Groups. Groups can do things. > > Forms and controls can be manipulated by groups. Groups can open (or not) > forms, edit / delete (or not) records in a given form. Groups can see / > enter / edit (or not) specific controls on forms. All of these > things that > groups can do are simply manipulations of the built in properties of the > forms or controls. Open (not a property but controlled by LWS), > AllowEdit, > AllowDelete, AllowAdd etc can be masked by LWS as the form opens such that > specific groups can control these properties while others cannot. Control > properties Visible, Enabled and Locked are controlled in the same manner. > > There are a set of tables that support the LWS system: > > uSysLWSUsers contains user information - Name, PEID (mapped to your > Personnel ID if you desire) and password hash (MD5). > usystblLWSGroup contains group information - Name and the 2^x bit that is > used for mapping it's abilities later. > usystblLWSGroupUser contains mappings of users to groups. A simple m-m > uSysLWSUsers and usystblLWSGroup. > MsysForms contains form security information - Form ID, Form name, Open, > Edit, Add and Delete maps. > MsysControls contains control security information - Form ID, > Control name, > Enabled, Locked and Visible maps > > There are a handful of forms to support LWS: > > usysfrmLWSLogin - The login form. > usysfrmLWSUsers - The form for setting up users. > usysfrmLWSGroups - The form for setting up groups. > usysfrmLWSSetupFrmSecurity - The form that assists the developer > in setting > up form security > > LWS is NOT finished, but all of the basic tables are in place, I am using > the login in my apps, and the code to implement LWS security for forms and > controls is up and functioning. > > LWS will be a library (MDA for now) with full source code > available to beta > testers. Please remember, I am looking for "code jocks" for now. You > should be comfortable instantiating classes, calling class methods and > setting class properties, manipulating form and control attributes via VB > etc. > > I REALLY need people with the time to play with this thing, tell me what > they like or don't like, what I haven't considered etc. > > I think this should give enough information to allow you to decide whether > you are interested. If you are interested, please contact me OFF LIST at > LWS at colbyconsulting.com. > > John W. Colby > www.ColbyConsulting.com > > > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com > > From Lambert.Heenan at AIG.com Mon Jan 26 10:23:37 2004 From: Lambert.Heenan at AIG.com (Heenan, Lambert) Date: Mon, 26 Jan 2004 11:23:37 -0500 Subject: [AccessD] Annoying Feature of Access 2002 Message-ID: <8B98F8EA48F8BA47A2F24E0D0AF40CF407AD7D50@xlivmbx12.aig.com> A few weeks ago I complained about the fact that when you change one module in Outlook 2002 all the other modules then show the same modified time as the one you just changed. This can make it a tad difficult to keep track of what you just worked on. Assuming I'm not the only one that finds this annoying, and that we're not all working with Visual Source Safe, here's a simple work around. Just create a query with this SQL... SELECT MSysObjects.Name, MSysObjects.DateCreate, MSysObjects.DateUpdate FROM MSysObjects WHERE (((MSysObjects.Type)=-32761)); and then attach this query to a macro which you can then associate with a toolbar button. You will then have a one click way to find out what really got changed in module land. HTH :-) Lambert From dwaters at usinternet.com Mon Jan 26 11:04:19 2004 From: dwaters at usinternet.com (Dan Waters) Date: Mon, 26 Jan 2004 11:04:19 -0600 Subject: [AccessD] Annoying Feature of Access 2002 In-Reply-To: <13373915.1075134553301.JavaMail.root@localhost.localdomain> Message-ID: <000001c3e42e$72ec8e80$de1811d8@DanWaters> Yahoo! I'm going to title this button as the Lambert Wizard! Thanks! Dan Waters -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Heenan, Lambert Sent: Monday, January 26, 2004 10:24 AM To: Access-D Email (accessd at databaseadvisors.com); ACCESS-L Email (ACCESS-L at PEACH.EASE.LSOFT.COM) Subject: [AccessD] Annoying Feature of Access 2002 A few weeks ago I complained about the fact that when you change one module in Outlook 2002 all the other modules then show the same modified time as the one you just changed. This can make it a tad difficult to keep track of what you just worked on. Assuming I'm not the only one that finds this annoying, and that we're not all working with Visual Source Safe, here's a simple work around. Just create a query with this SQL... SELECT MSysObjects.Name, MSysObjects.DateCreate, MSysObjects.DateUpdate FROM MSysObjects WHERE (((MSysObjects.Type)=-32761)); and then attach this query to a macro which you can then associate with a toolbar button. You will then have a one click way to find out what really got changed in module land. HTH :-) Lambert _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From cfoust at infostatsystems.com Mon Jan 26 11:26:01 2004 From: cfoust at infostatsystems.com (Charlotte Foust) Date: Mon, 26 Jan 2004 09:26:01 -0800 Subject: [AccessD] data type for field in a closed table Message-ID: It doesn't matter whether you're using DAO or ADO, you need to use the Set keyword to instantiate an object like a field, and there's no way to using just the name of the field. Have you tried using the Type property of the field? Online help has an example of code to determine the type property using an ADO recordset opened on the table. Charlotte Foust -----Original Message----- From: Susan Harkins [mailto:ssharkins at bellsouth.net] Sent: Saturday, January 24, 2004 11:32 AM To: Access Developers discussion and problem solving Subject: Re: [AccessD] data type for field in a closed table I considered that, but was trying to avoid DAO -- I should've mentioned that -- I apologize. I'm using ADO -- and looping through the recordset doesn't really require anymore code than the DAO querydef -- if I'm not mistaken, ADO doesn't use the QueryDef object. But, on the other hand, you don't have to create a Recordset using your code. Thanks Gustav. Susan H. > Hi Susan > > > I'm trying to return a field's data type. > > > I have the field by name -- as a string -- and I just can't seem to > > get it > > into a Field object variable so I can tap into the Type property. > > The field > > is the result of a listbox selection. > > > varField = lstField.Value > > > How can I get from there to > > > fld = varField > > > to here > > > varType = fld.Type > > > Everything I've tried returns an Object required at the fld=varField > > statement because varField is a string, not a real reference. At > > least, I > > think that's the problem. > > Something like this? If the rowsource is an SQL string: > > Dim dbs As Database > Dim qdf As QueryDef > dim intVarType As Integer > > Set dbs = CurrentDb() > Set qdf = dbs.CreateQueryDef(vbNullString) > qdf.SQL = Me!lstDemo.RowSource > > intVarType = qdf.Fields("YourFieldName").Type > Debug.Print intVarType > > qdf.Close > > Set qdf = Nothing > Set dbs = Nothing > > If not an SQL string, just pick the name of the stored query and use > that as qdf. > > /gustav > > _______________________________________________ > 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 From accessd666 at yahoo.com Mon Jan 26 12:44:38 2004 From: accessd666 at yahoo.com (Sad Der) Date: Mon, 26 Jan 2004 10:44:38 -0800 (PST) Subject: [AccessD] Make-table query points to c:\documents and settings?! In-Reply-To: <13824851013.20040126154323@cactus.dk> Message-ID: <20040126184438.97312.qmail@web60205.mail.yahoo.com> I build it in SQL view. There's no path in there either... :-( Sander --- Gustav Brock wrote: > Hi Sad > > Switch from design view of the query to SQL view ... > > /gustav > > > > No, where can I do that? > > I looked at the properties but I just saw in wich > db > > the tables will be created. Not the path! > > > Sander > > --- Gustav Brock wrote: > >> Hi Sad > >> > >> So did you specify the full path of the tables in > >> those make-table > >> queries? > >> > >> /gustav > >> > >> > >> > Gustav, > >> > >> > It says: d:\projects.... > >> > Already checked that. > >> > >> > Sander > >> > --- Gustav Brock wrote: > >> >> Hi Sad > >> >> > >> >> What does > >> >> > >> >> Debug.Print strPath & "TEMP_FE_" & strFile > >> >> > >> >> print? > >> >> > >> >> /gustav > >> >> > >> >> > >> >> > Set db = > >> >> Workspaces(0).CreateDatabase(strPath & > >> >> > "TEMP_FE_" & strFile, dbLangGeneral) > > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com __________________________________ Do you Yahoo!? Yahoo! SiteBuilder - Free web site building tool. Try it! http://webhosting.yahoo.com/ps/sb/ From Mike.W.Gowey at doc.state.or.us Mon Jan 26 13:13:04 2004 From: Mike.W.Gowey at doc.state.or.us (Gowey Mike W) Date: Mon, 26 Jan 2004 12:13:04 -0700 Subject: [AccessD] Database Error Message-ID: <05EBB8A3BEB95B4F8216BE4EF486077801D9FF33@srciml1.ds.doc.state.or.us> Hi Everyone, Has anyone else seen the below message? Is there anyway to correct this error? There is no lock file in the folder and nobody has it open.... Thanks for any advice given.. The Microsoft Jet database engine cannot open the file 'C:\DSU DATA BASE 2000.MDB'. It is already opened exclusively by another user, or you need permission to view its data. From ranthony at wrsystems.com Mon Jan 26 13:26:50 2004 From: ranthony at wrsystems.com (Randall Anthony) Date: Mon, 26 Jan 2004 14:26:50 -0500 Subject: [AccessD] Database Error Message-ID: <5F21A4E8B8DD734992EF9E70AC9D30641289FA@mail2.wrsystems.com> The short answer is that it is probably corrupted. There have been a number of posts addressing this issue recently. If repair/compact does not work, you may try the /decompile switch. Search the archives for /decompile or database corruption. -----Original Message----- From: Gowey Mike W [mailto:Mike.W.Gowey at doc.state.or.us] Sent: Monday, January 26, 2004 2:13 PM To: Access Developers discussion and problem solving Subject: [AccessD] Database Error Hi Everyone, Has anyone else seen the below message? Is there anyway to correct this error? There is no lock file in the folder and nobody has it open.... Thanks for any advice given.. The Microsoft Jet database engine cannot open the file 'C:\DSU DATA BASE 2000.MDB'. It is already opened exclusively by another user, or you need permission to view its data. _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From lists at theopg.com Mon Jan 26 13:30:28 2004 From: lists at theopg.com (MarkH) Date: Mon, 26 Jan 2004 19:30:28 -0000 Subject: [AccessD] Temp tables and access security In-Reply-To: Message-ID: <000201c3e442$eb9faab0$f70b6bd5@netboxxp> Hello All Using AXP on Win 2000 I have a secured database and was wondering what permissions I need to grant to allow the system to create temp tables (Access BE) when a user logs in. I'm missing something I reckon... Cheers Mark From Erwin.Craps at ithelps.be Mon Jan 26 13:31:40 2004 From: Erwin.Craps at ithelps.be (Erwin Craps - IT Helps) Date: Mon, 26 Jan 2004 20:31:40 +0100 Subject: [AccessD] Database Error Message-ID: <46B976F2B698FF46A4FE7636509B22DF03D169@stekelbes.ithelps.local> Hi Mike You would'nt believe me I had the same thing today!!! My 7am backup tape was full and the backup software requested for an additional tape to continue. The MDB file was partialy backupped and the backup software kept the file locked until I cancelled the backup. Same symtoms, could not enter the db and there was no lock file.... I only noticed this around 10am when people started to call me because the website (database access) was not working... I use Veritas backup, I believe version 8,6. Erwin -----Oorspronkelijk bericht----- Van: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] Namens Gowey Mike W Verzonden: maandag 26 januari 2004 20:13 Aan: Access Developers discussion and problem solving Onderwerp: [AccessD] Database Error Hi Everyone, Has anyone else seen the below message? Is there anyway to correct this error? There is no lock file in the folder and nobody has it open.... Thanks for any advice given.. The Microsoft Jet database engine cannot open the file 'C:\DSU DATA BASE 2000.MDB'. It is already opened exclusively by another user, or you need permission to view its data. _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From cfoust at infostatsystems.com Mon Jan 26 13:45:14 2004 From: cfoust at infostatsystems.com (Charlotte Foust) Date: Mon, 26 Jan 2004 11:45:14 -0800 Subject: [AccessD] Temp tables and access security Message-ID: Why would a user be creating temp tables in the BE? Normally temp tables would be created in the front end. Are you asking about Access security permissions or Windows permissions? In Windows, you need pretty much full permissions if you're going to be modifying the design of the BE. Charlotte Foust -----Original Message----- From: MarkH [mailto:lists at theopg.com] Sent: Monday, January 26, 2004 11:30 AM To: 'Access Developers discussion and problem solving' Subject: [AccessD] Temp tables and access security Hello All Using AXP on Win 2000 I have a secured database and was wondering what permissions I need to grant to allow the system to create temp tables (Access BE) when a user logs in. I'm missing something I reckon... Cheers Mark _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From jeffrey.demulling at usbank.com Mon Jan 26 14:39:30 2004 From: jeffrey.demulling at usbank.com (jeffrey.demulling at usbank.com) Date: Mon, 26 Jan 2004 14:39:30 -0600 Subject: [AccessD] ODBC Connection Information Not Showing in ODBC Data Sources Message-ID: Operating System Windows NT 4.0 A LAN Admin has installed an Oracle ODBC Driver for RDB and the installation says the driver has installed successfully. Looking in the registry it show the driver is installed. However when the user tries to set up an actual connection the driver is not listed as being there. This is also happening with another user for Gupta's SQLBase Driver pack. Anyone know of any solutions to make the driver appear in the as being installed? TIA. -Jeff From garciad at kentri.org Mon Jan 26 14:45:12 2004 From: garciad at kentri.org (Dwylene Garcia) Date: Mon, 26 Jan 2004 15:45:12 -0500 Subject: [AccessD] Form doesn't work on new laptop Message-ID: I have an odd problem that has managed to stump several IT people. We are on the verge of giving up but I thought I would make an attempt to ask this group if anyone has seen such a problem. I have a fairly complicated form (one-to-many-to-many relationship, Main form with two subform, one subform filters the other subform) and this form has worked for 2 years and still does work on every desktop in our office. However, one employee received a new laptop this week running Windows 2000, Office XP and Access 2000 (the same as all the desktops) and the database opens and it appears that the less complicated forms work fine but this one form which is the main form used will not populate the subforms correctly. It recognizes there are records but it won't show them in the combo box... I have found this http://support.microsoft.com/default.aspx?scid=kb;en-us;208866&Product=acc2000 in the knowledge base that seems to restate the problem exactly. However, I'm looking for a solution that does not involve altering my form since it does work on the desktop computers. Why will it work on a desktop and not a laptop???? I don't have time to alter the database to make it work on this one laptop when 7 other desktop computers run the database fine. I'm wondering if anyone else has ever experienced this and I'm hoping that it's something silly that I overlooked while troubleshooting. I think we have hit all the obvious troubleshooting points like reinstalling MS Office, I took the database off the network and tried to run from the C:/. When it first happened we received an error "Object invalid or no longer set.", that error is not showing up now. Dwylene Garcia Computer Applications Trainer Kent Hospital, Department of Education Email: garciad at kenthospital.org From Lambert.Heenan at AIG.com Mon Jan 26 14:54:41 2004 From: Lambert.Heenan at AIG.com (Heenan, Lambert) Date: Mon, 26 Jan 2004 15:54:41 -0500 Subject: [AccessD] Annoying Feature of Access 2002 Message-ID: <8B98F8EA48F8BA47A2F24E0D0AF40CF407AD7D53@xlivmbx12.aig.com> Fame at last!!! :-) > -----Original Message----- > From: Dan Waters [SMTP:dwaters at usinternet.com] > Sent: Monday, January 26, 2004 12:04 PM > To: 'Access Developers discussion and problem solving' > Subject: RE: [AccessD] Annoying Feature of Access 2002 > > Yahoo! > > I'm going to title this button as the Lambert Wizard! > > Thanks! > Dan Waters > > > -----Original Message----- > From: accessd-bounces at databaseadvisors.com > [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Heenan, Lambert > Sent: Monday, January 26, 2004 10:24 AM > To: Access-D Email (accessd at databaseadvisors.com); ACCESS-L Email > (ACCESS-L at PEACH.EASE.LSOFT.COM) > Subject: [AccessD] Annoying Feature of Access 2002 > > A few weeks ago I complained about the fact that when you change one > module > in Outlook 2002 all the other modules then show the same modified time as > the one you just changed. This can make it a tad difficult to keep track > of > what you just worked on. > > Assuming I'm not the only one that finds this annoying, and that we're not > all working with Visual Source Safe, here's a simple work around. Just > create a query with this SQL... > > SELECT MSysObjects.Name, MSysObjects.DateCreate, MSysObjects.DateUpdate > FROM MSysObjects > WHERE (((MSysObjects.Type)=-32761)); > > and then attach this query to a macro which you can then associate with a > toolbar button. You will then have a one click way to find out what really > got changed in module land. > > HTH :-) > > Lambert > > _______________________________________________ > 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 From DWUTKA at marlow.com Mon Jan 26 15:05:53 2004 From: DWUTKA at marlow.com (DWUTKA at marlow.com) Date: Mon, 26 Jan 2004 15:05:53 -0600 Subject: [AccessD] Form doesn't work on new laptop Message-ID: <2F8793082E00D4119A1700B0D0216BF8022277B0@main2.marlow.com> This is WAY off the cuff, a complete WAG. Laptops, by their nature, are designed to have multiple monitors (the laptop screen, and then a possible external monitor). Sometimes the second monitor is just a mirror of the main monitor, but other times, it can be a 'second' monitor, effectively doubling the width of the desktop. I bring this up, because I have seen combo boxes do WIERD things when used on a multiple monitor system. Quite frankly, I've seen it mostly in Access 97, but wouldn't be surprised to see it in 2000. Drew -----Original Message----- From: Dwylene Garcia [mailto:garciad at kentri.org] Sent: Monday, January 26, 2004 2:45 PM To: accessD at databaseadvisors.com Subject: [AccessD] Form doesn't work on new laptop I have an odd problem that has managed to stump several IT people. We are on the verge of giving up but I thought I would make an attempt to ask this group if anyone has seen such a problem. I have a fairly complicated form (one-to-many-to-many relationship, Main form with two subform, one subform filters the other subform) and this form has worked for 2 years and still does work on every desktop in our office. However, one employee received a new laptop this week running Windows 2000, Office XP and Access 2000 (the same as all the desktops) and the database opens and it appears that the less complicated forms work fine but this one form which is the main form used will not populate the subforms correctly. It recognizes there are records but it won't show them in the combo box... I have found this http://support.microsoft.com/default.aspx?scid=kb;en-us;208866&Product=acc20 00 in the knowledge base that seems to restate the problem exactly. However, I'm looking for a solution that does not involve altering my form since it does work on the desktop computers. Why will it work on a desktop and not a laptop???? I don't have time to alter the database to make it work on this one laptop when 7 other desktop computers run the database fine. I'm wondering if anyone else has ever experienced this and I'm hoping that it's something silly that I overlooked while troubleshooting. I think we have hit all the obvious troubleshooting points like reinstalling MS Office, I took the database off the network and tried to run from the C:/. When it first happened we received an error "Object invalid or no longer set.", that error is not showing up now. Dwylene Garcia Computer Applications Trainer Kent Hospital, Department of Education Email: garciad at kenthospital.org _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From Erwin.Craps at ithelps.be Mon Jan 26 15:22:07 2004 From: Erwin.Craps at ithelps.be (Erwin Craps - IT Helps) Date: Mon, 26 Jan 2004 22:22:07 +0100 Subject: [AccessD] Form doesn't work on new laptop Message-ID: <46B976F2B698FF46A4FE7636509B22DF03D16C@stekelbes.ithelps.local> I seen this to, but has nothing to do with a notebook. Is that maybe a Access runtime on this notebook? The problem I had was with combo/list boxes for which I change the rowsource from VBA. The thing is that the rowsource on the listbox is empty is design mode and I fill it from vba when opening the form. For some reason the Access runtime thinks there nothing to show and does not show when I VBA the rowsource after loading the form. Only solution was to put a SQL string also on the combo/list box rowsource control with the correct number of fields. For reasons of speed I filtered the SQL result so I'm sure no values are displayed when loading the form (textvalue = null) Erwin -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of DWUTKA at marlow.com Sent: Monday, January 26, 2004 10:06 PM To: accessd at databaseadvisors.com Subject: RE: [AccessD] Form doesn't work on new laptop This is WAY off the cuff, a complete WAG. Laptops, by their nature, are designed to have multiple monitors (the laptop screen, and then a possible external monitor). Sometimes the second monitor is just a mirror of the main monitor, but other times, it can be a 'second' monitor, effectively doubling the width of the desktop. I bring this up, because I have seen combo boxes do WIERD things when used on a multiple monitor system. Quite frankly, I've seen it mostly in Access 97, but wouldn't be surprised to see it in 2000. Drew -----Original Message----- From: Dwylene Garcia [mailto:garciad at kentri.org] Sent: Monday, January 26, 2004 2:45 PM To: accessD at databaseadvisors.com Subject: [AccessD] Form doesn't work on new laptop I have an odd problem that has managed to stump several IT people. We are on the verge of giving up but I thought I would make an attempt to ask this group if anyone has seen such a problem. I have a fairly complicated form (one-to-many-to-many relationship, Main form with two subform, one subform filters the other subform) and this form has worked for 2 years and still does work on every desktop in our office. However, one employee received a new laptop this week running Windows 2000, Office XP and Access 2000 (the same as all the desktops) and the database opens and it appears that the less complicated forms work fine but this one form which is the main form used will not populate the subforms correctly. It recognizes there are records but it won't show them in the combo box... I have found this http://support.microsoft.com/default.aspx?scid=kb;en-us;208866&Product=a cc20 00 in the knowledge base that seems to restate the problem exactly. However, I'm looking for a solution that does not involve altering my form since it does work on the desktop computers. Why will it work on a desktop and not a laptop???? I don't have time to alter the database to make it work on this one laptop when 7 other desktop computers run the database fine. I'm wondering if anyone else has ever experienced this and I'm hoping that it's something silly that I overlooked while troubleshooting. I think we have hit all the obvious troubleshooting points like reinstalling MS Office, I took the database off the network and tried to run from the C:/. When it first happened we received an error "Object invalid or no longer set.", that error is not showing up now. Dwylene Garcia Computer Applications Trainer Kent Hospital, Department of Education Email: garciad at kenthospital.org _______________________________________________ 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 From connie.kamrowski at agric.nsw.gov.au Mon Jan 26 17:25:43 2004 From: connie.kamrowski at agric.nsw.gov.au (connie.kamrowski at agric.nsw.gov.au) Date: Tue, 27 Jan 2004 10:25:43 +1100 Subject: [AccessD] Re: Access database deployment Message-ID: Hi, Just doing some analysis work for a new project here. Interested in how developers have previously deployed access databases through web deployment or Citrix metaframe. we are looking to move to a J2EE based development environment over the next 2 years and I am investigating the best methods for Access Database availability in the interim. Ideally I would like to hear your opinions on the security and ease of use of deployment options you have used. All opinions greatly appreciated Connie Kamrowski Analyst/Programmer Information Technology NSW Agriculture Orange Cross posted to OT in the interest of varied opinions. This message is intended for the addressee named and may contain confidential information. If you are not the intended recipient or received it in error, please delete the message and notify sender. Views expressed are those of the individual sender and are not necessarily the views of their organisation. From pedro at plex.nl Mon Jan 26 17:42:51 2004 From: pedro at plex.nl (Pedro Janssen) Date: Tue, 27 Jan 2004 00:42:51 +0100 Subject: [AccessD] Form doesn't work on new laptop References: Message-ID: <003b01c3e466$39e8efb0$fdc581d5@pedro> Hello Dwylene, i have seen this weird stuff to on a complicated form on a laptop. In this case the combobox will not show all the records that are present in the rowsource table (5000 records), only a few hundred. My solution is beginning typing a fake record (not fake in the recordsource table) like zzzzz in the combobox. Because its the last record, it then shows all the records. It isn't a elegant solution, but it works fine. Other solutions are welcome. Pedro Janssen ----- Original Message ----- From: "Dwylene Garcia" To: Sent: Monday, January 26, 2004 9:45 PM Subject: [AccessD] Form doesn't work on new laptop > I have an odd problem that has managed to stump several IT people. We > are on the verge of giving up but I thought I would make an attempt to > ask this group if anyone has seen such a problem. > > I have a fairly complicated form (one-to-many-to-many relationship, > Main form with two subform, one subform filters the other subform) and > this form has worked for 2 years and still does work on every desktop in > our office. However, one employee received a new laptop this week > running Windows 2000, Office XP and Access 2000 (the same as all the > desktops) and the database opens and it appears that the less > complicated forms work fine but this one form which is the main form > used will not populate the subforms correctly. It recognizes there are > records but it won't show them in the combo box... I have found this > http://support.microsoft.com/default.aspx?scid=kb;en-us;208866&Product=acc20 00 > in the knowledge base that seems to restate the problem exactly. > However, I'm looking for a solution that does not involve altering my > form since it does work on the desktop computers. Why will it work on > a desktop and not a laptop???? > > I don't have time to alter the database to make it work on this one > laptop when 7 other desktop computers run the database fine. I'm > wondering if anyone else has ever experienced this and I'm hoping that > it's something silly that I overlooked while troubleshooting. I think > we have hit all the obvious troubleshooting points like reinstalling MS > Office, I took the database off the network and tried to run from the > C:/. When it first happened we received an error "Object invalid or no > longer set.", that error is not showing up now. > > > > Dwylene Garcia > Computer Applications Trainer > Kent Hospital, Department of Education > Email: garciad at kenthospital.org > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com > From lists at theopg.com Mon Jan 26 18:01:59 2004 From: lists at theopg.com (MarkH) Date: Tue, 27 Jan 2004 00:01:59 -0000 Subject: [AccessD] Temp tables and access security In-Reply-To: Message-ID: <000001c3e468$c9895c20$b00d6bd5@netboxxp> Sorry Charlotte, should have said "Access BE and FE", temp tables are in the front-end. I can chamge the code to not use temp tables, but I'd rather leave it alone as it works fine (at the moment :@) Many thanks Mark -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Charlotte Foust Sent: 26 January 2004 19:45 To: Access Developers discussion and problem solving Subject: RE: [AccessD] Temp tables and access security Why would a user be creating temp tables in the BE? Normally temp tables would be created in the front end. Are you asking about Access security permissions or Windows permissions? In Windows, you need pretty much full permissions if you're going to be modifying the design of the BE. Charlotte Foust -----Original Message----- From: MarkH [mailto:lists at theopg.com] Sent: Monday, January 26, 2004 11:30 AM To: 'Access Developers discussion and problem solving' Subject: [AccessD] Temp tables and access security Hello All Using AXP on Win 2000 I have a secured database and was wondering what permissions I need to grant to allow the system to create temp tables (Access BE) when a user logs in. I'm missing something I reckon... Cheers Mark _______________________________________________ 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 From cfoust at infostatsystems.com Mon Jan 26 18:21:00 2004 From: cfoust at infostatsystems.com (Charlotte Foust) Date: Mon, 26 Jan 2004 16:21:00 -0800 Subject: [AccessD] Temp tables and access security Message-ID: So were you asking about Access security or Window security on the file? Charlotte Foust -----Original Message----- From: MarkH [mailto:lists at theopg.com] Sent: Monday, January 26, 2004 4:02 PM To: 'Access Developers discussion and problem solving' Subject: RE: [AccessD] Temp tables and access security Sorry Charlotte, should have said "Access BE and FE", temp tables are in the front-end. I can chamge the code to not use temp tables, but I'd rather leave it alone as it works fine (at the moment :@) Many thanks Mark -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Charlotte Foust Sent: 26 January 2004 19:45 To: Access Developers discussion and problem solving Subject: RE: [AccessD] Temp tables and access security Why would a user be creating temp tables in the BE? Normally temp tables would be created in the front end. Are you asking about Access security permissions or Windows permissions? In Windows, you need pretty much full permissions if you're going to be modifying the design of the BE. Charlotte Foust -----Original Message----- From: MarkH [mailto:lists at theopg.com] Sent: Monday, January 26, 2004 11:30 AM To: 'Access Developers discussion and problem solving' Subject: [AccessD] Temp tables and access security Hello All Using AXP on Win 2000 I have a secured database and was wondering what permissions I need to grant to allow the system to create temp tables (Access BE) when a user logs in. I'm missing something I reckon... Cheers Mark _______________________________________________ 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 _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From dwaters at usinternet.com Mon Jan 26 18:27:31 2004 From: dwaters at usinternet.com (Dan Waters) Date: Mon, 26 Jan 2004 18:27:31 -0600 Subject: [AccessD] Form doesn't work on new laptop In-Reply-To: <8182819.1075150656901.JavaMail.root@localhost.localdomain> Message-ID: <000001c3e46c$5ee67bb0$de1811d8@DanWaters> Dwylene, I received this same error on a single desktop PC running W2K and AXP, when all other machines with the same configuration worked fine. The solution was as follows: In the code module for the form comment out ALL the code - even the Option Explicit and Option Compare database. Then compile the database. Then save the form, exit access. Then reopen the database with a /decompile command. The error should not occur when the form is opened. Then uncomment all the code, compile again, and save the form. The form should now work as intended on this PC. To get to this I went through my usual 'narrowing down' to try to find the problem, and that was what worked. What I suspect happened is that this particular form had some corrupted hidden compiled code behind it which only caused a problem on a particular machine due to that machine's particular configuration. When I commented out the form's entire code module, decompiled, and recompiled, the database believed that this form then had no code at all, and erased the hidden corrupted compiled code. At least this was a relatively easy fix attempt - good luck! Dan Waters Quality Process Solutions PS - use the Comment and Uncomment buttons on the VBA Edit toolbar. -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Dwylene Garcia Sent: Monday, January 26, 2004 2:45 PM To: accessD at databaseadvisors.com Subject: [AccessD] Form doesn't work on new laptop I have an odd problem that has managed to stump several IT people. We are on the verge of giving up but I thought I would make an attempt to ask this group if anyone has seen such a problem. I have a fairly complicated form (one-to-many-to-many relationship, Main form with two subform, one subform filters the other subform) and this form has worked for 2 years and still does work on every desktop in our office. However, one employee received a new laptop this week running Windows 2000, Office XP and Access 2000 (the same as all the desktops) and the database opens and it appears that the less complicated forms work fine but this one form which is the main form used will not populate the subforms correctly. It recognizes there are records but it won't show them in the combo box... I have found this http://support.microsoft.com/default.aspx?scid=kb;en-us;208866&Product=acc20 00 in the knowledge base that seems to restate the problem exactly. However, I'm looking for a solution that does not involve altering my form since it does work on the desktop computers. Why will it work on a desktop and not a laptop???? I don't have time to alter the database to make it work on this one laptop when 7 other desktop computers run the database fine. I'm wondering if anyone else has ever experienced this and I'm hoping that it's something silly that I overlooked while troubleshooting. I think we have hit all the obvious troubleshooting points like reinstalling MS Office, I took the database off the network and tried to run from the C:/. When it first happened we received an error "Object invalid or no longer set.", that error is not showing up now. Dwylene Garcia Computer Applications Trainer Kent Hospital, Department of Education Email: garciad at kenthospital.org _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From lists at theopg.com Mon Jan 26 18:35:41 2004 From: lists at theopg.com (MarkH) Date: Tue, 27 Jan 2004 00:35:41 -0000 Subject: [AccessD] Temp tables and access security In-Reply-To: Message-ID: <000101c3e46d$7e46e750$b00d6bd5@netboxxp> Access... Mark -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Charlotte Foust Sent: 27 January 2004 00:21 To: Access Developers discussion and problem solving Subject: RE: [AccessD] Temp tables and access security So were you asking about Access security or Window security on the file? Charlotte Foust -----Original Message----- From: MarkH [mailto:lists at theopg.com] Sent: Monday, January 26, 2004 4:02 PM To: 'Access Developers discussion and problem solving' Subject: RE: [AccessD] Temp tables and access security Sorry Charlotte, should have said "Access BE and FE", temp tables are in the front-end. I can chamge the code to not use temp tables, but I'd rather leave it alone as it works fine (at the moment :@) Many thanks Mark -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Charlotte Foust Sent: 26 January 2004 19:45 To: Access Developers discussion and problem solving Subject: RE: [AccessD] Temp tables and access security Why would a user be creating temp tables in the BE? Normally temp tables would be created in the front end. Are you asking about Access security permissions or Windows permissions? In Windows, you need pretty much full permissions if you're going to be modifying the design of the BE. Charlotte Foust -----Original Message----- From: MarkH [mailto:lists at theopg.com] Sent: Monday, January 26, 2004 11:30 AM To: 'Access Developers discussion and problem solving' Subject: [AccessD] Temp tables and access security Hello All Using AXP on Win 2000 I have a secured database and was wondering what permissions I need to grant to allow the system to create temp tables (Access BE) when a user logs in. I'm missing something I reckon... Cheers Mark _______________________________________________ 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 _______________________________________________ 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 From ssharkins at bellsouth.net Mon Jan 26 18:56:43 2004 From: ssharkins at bellsouth.net (Susan Harkins) Date: Mon, 26 Jan 2004 19:56:43 -0500 Subject: [AccessD] record locking in a report Message-ID: <000601c3e470$70e60a20$210110ac@SUSANONE> Here's something I've never given any thought to -- report's have Record Locks property. Does this mean that given the current activity that a record might not make it to the report -- even though it satisfies all other criteria? I don't really get it, within the report context. Susan H. From cfoust at infostatsystems.com Mon Jan 26 19:05:12 2004 From: cfoust at infostatsystems.com (Charlotte Foust) Date: Mon, 26 Jan 2004 17:05:12 -0800 Subject: [AccessD] record locking in a report Message-ID: Here's what help says: Specifies whether records in the underlying table or query are locked while a report is previewed or printed. In other words, it determines whether users can modify those records while the report is being printed or previewed. That seems reasonable to me. Charlotte Foust -----Original Message----- From: Susan Harkins [mailto:ssharkins at bellsouth.net] Sent: Monday, January 26, 2004 4:57 PM To: AccessD at databaseadvisors.com Subject: [AccessD] record locking in a report Here's something I've never given any thought to -- report's have Record Locks property. Does this mean that given the current activity that a record might not make it to the report -- even though it satisfies all other criteria? I don't really get it, within the report context. Susan H. _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From cfoust at infostatsystems.com Mon Jan 26 19:10:58 2004 From: cfoust at infostatsystems.com (Charlotte Foust) Date: Mon, 26 Jan 2004 17:10:58 -0800 Subject: [AccessD] AXP prints half line at bottom of report Message-ID: We've run into an aggravating issue with one of our (admittedly) complicated custom reports, where there is a mixture of CanGrow = True and CanGrow = false, unbound and bound controls, subreports, etc. Some of the data will print at the very bottom of the print area, cut off most of the data in that line and just leave the tops and then print again in whole on the next page. This happens to textboxes, subreports, etc., but does not appear to happen to labels. Since we don't know ahead of time where anything will fall on a page, we've racked our brains to figure out a way to prevent this messy situation. It shows up in both preview and print of the report, which may run to one or more pages depending on the data that has been entered. We've played with top and bottom margins but all that does is move the problem around. Any ideas would be embraced gratefully. Charlotte Foust From ssharkins at bellsouth.net Mon Jan 26 20:10:48 2004 From: ssharkins at bellsouth.net (Susan Harkins) Date: Mon, 26 Jan 2004 21:10:48 -0500 Subject: [AccessD] record locking in a report References: Message-ID: <004c01c3e47b$7a7e8c50$210110ac@SUSANONE> I read that -- but it just didn't register -- thanks. Duh moment I guess. Susan H. > Here's what help says: > > Specifies whether records in the underlying table or query are locked > while a report is previewed or printed. > > In other words, it determines whether users can modify those records > while the report is being printed or previewed. That seems reasonable > to me. > > Charlotte Foust > > -----Original Message----- > From: Susan Harkins [mailto:ssharkins at bellsouth.net] > Sent: Monday, January 26, 2004 4:57 PM > To: AccessD at databaseadvisors.com > Subject: [AccessD] record locking in a report > > > Here's something I've never given any thought to -- report's have > Record Locks property. Does this mean that given the current activity > that a record might not make it to the report -- even though it > satisfies all other criteria? I don't really get it, within the report > context. > > Susan H. > > _______________________________________________ > 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 > From gustav at cactus.dk Tue Jan 27 02:14:35 2004 From: gustav at cactus.dk (Gustav Brock) Date: Tue, 27 Jan 2004 09:14:35 +0100 Subject: [AccessD] Make-table query points to c:\documents and settings?! In-Reply-To: <20040126184438.97312.qmail@web60205.mail.yahoo.com> References: <20040126184438.97312.qmail@web60205.mail.yahoo.com> Message-ID: <88973850.20040127091435@cactus.dk> Hi Sad Then I will suggest you rewrite the SQL to include the full path. /gustav > I build it in SQL view. There's no path in there > either... :-( >> Switch from design view of the query to SQL view ... >> >> > No, where can I do that? >> > I looked at the properties but I just saw in wich db >> > the tables will be created. Not the path! >> >> >> So did you specify the full path of the tables in >> >> those make-table >> >> queries? From gustav at cactus.dk Tue Jan 27 02:40:28 2004 From: gustav at cactus.dk (Gustav Brock) Date: Tue, 27 Jan 2004 09:40:28 +0100 Subject: [AccessD] Make-table query points to c:\documents and settings?! In-Reply-To: <88973850.20040127091435@cactus.dk> References: <20040126184438.97312.qmail@web60205.mail.yahoo.com> <88973850.20040127091435@cactus.dk> Message-ID: <602526663.20040127094028@cactus.dk> Hi Sad If this is inconvenient, you may try to run the command ChDir before running the make table queries because your problem is that they try to write to a file in the current directory of the drive and the current directory may be whatever. /gustav > Hi Sad > Then I will suggest you rewrite the SQL to include the full path. > /gustav >> I build it in SQL view. There's no path in there >> either... :-( >>> Switch from design view of the query to SQL view ... >>> >>> > No, where can I do that? >>> > I looked at the properties but I just saw in wich db >>> > the tables will be created. Not the path! >>> >>> >> So did you specify the full path of the tables in >>> >> those make-table >>> >> queries? From accessd666 at yahoo.com Tue Jan 27 03:42:45 2004 From: accessd666 at yahoo.com (Sad Der) Date: Tue, 27 Jan 2004 01:42:45 -0800 (PST) Subject: [AccessD] Make-table query points to c:\documents and settings?! In-Reply-To: <602526663.20040127094028@cactus.dk> Message-ID: <20040127094245.24629.qmail@web60206.mail.yahoo.com> Gustav, a big thank you for all the support. i have rewriten the whole lot! The creation of the database and I'm using code to create the tables in that newly created database instead off calling Make-Table queries. I'm now working on a (semi-)automatic relink thingy. thnx again. Sander --- Gustav Brock wrote: > Hi Sad > > If this is inconvenient, you may try to run the > command > > ChDir > > before running the make table queries because your > problem is that > they try to write to a file in the current directory > of the drive and > the current directory may be whatever. > > /gustav > > > > Hi Sad > > > Then I will suggest you rewrite the SQL to include > the full path. > > > /gustav > > > >> I build it in SQL view. There's no path in there > >> either... :-( > > >>> Switch from design view of the query to SQL view > ... > >>> > >>> > No, where can I do that? > >>> > I looked at the properties but I just saw in > wich db > >>> > the tables will be created. Not the path! > >>> > >>> >> So did you specify the full path of the > tables in > >>> >> those make-table > >>> >> queries? > > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com __________________________________ Do you Yahoo!? Yahoo! SiteBuilder - Free web site building tool. Try it! http://webhosting.yahoo.com/ps/sb/ From viner at eunet.yu Tue Jan 27 05:51:44 2004 From: viner at eunet.yu (Ervin Brindza) Date: Tue, 27 Jan 2004 12:51:44 +0100 Subject: [AccessD] OT: Export Messages from Outlook 5.5 Message-ID: <001201c3e4cb$f8d04a80$0100a8c0@razvoj> Hi fellow listers, sorry for the OT post. I'm using Outlook Express ver. 5.50.4133.2400 at my job(have no idea which application upgraded it from ver. 5.0) and want to copy a folder with messages(.dbx file) to my home computer, where either the ver 5.0 and 6.0 can't manage(can't see) these .dbx files from OE 5.5. I suppose that the only way is to upgrade my "strange" OE 5.5 to 6.0? Will the messages remain the same? I don't want to lose my 4-5 years mail messages... Any suggestions? TIA, Ervin From Subscriptions at servicexp.com Tue Jan 27 06:28:55 2004 From: Subscriptions at servicexp.com (Robert Gracie) Date: Tue, 27 Jan 2004 07:28:55 -0500 Subject: [AccessD] Interface Callback Class Questions. In-Reply-To: <001201c3e4cb$f8d04a80$0100a8c0@razvoj> Message-ID: <000201c3e4d1$2188ff30$6401a8c0@RG> Hello All AK2 mde referencing A2K mdb Objective: To open a report in a (host is an mde referenced to the .mdb) referenced .mdb and have all the events for a given report fire inside the host mde. I can do this for a report located inside the mde, however I can seem to figure out how to get the report inside the .mdb to see the class in the mde, as circular references are not permitted in access. Question: I was thinking that an Interface callback would be an option. So is it possible to use an interface callback across a referenced db to accomplish my objective? Any examples...? Thanks Robert Gracie From john at winhaven.net Tue Jan 27 08:10:41 2004 From: john at winhaven.net (John Bartow) Date: Tue, 27 Jan 2004 08:10:41 -0600 Subject: [AccessD] WinHaven News Flash - MyDoom/Novarg internet worm Message-ID: I don't usually send these things to lists but... I sent this to my clients last night and I am getting blasted by this thing already this morning! Its going to be a slow day for us dial-uppers :o) A Dozen and counting! Hi: There's a nasty new worm going around the internet. There are many reports of this worm in the wild and I've already received a number of emails with this worm attached so be careful! Official name(s): W32/MyDoom-A, Mimail.R, Novarg.A, Shimg, W32.Novarg.A at mm, W32/Mydoom at MM Type: Win32 worm Detection: The following anti-virus products are presently capable of detecting this worm with the latest update. Sophos, Norton, Trend Micro, AVG, F-Secure, McAfee and Panda. Other brands may be capable, I have not checked. Description This is a worm which travels by email and the Kazaa p2p network. The worm harvests email addresses from your hard disk and uses randomly-chosen addresses for both the "to" and "from" fields. This means that the "from" address is spoofed and does not tell you where the mail really came from. The worm arrives in emails with the following characteristics: Subject lines include: error hello hi mail delivery system mail transaction failed server report status test [random collection of characters] Attachment names include: body data doc document file message readme test [random collection of characters] Attachment extensions: bat cmd exe pif scr zip This worm attaches itself to emails in either EXE (Windows program) or ZIP (Zip archive) format. It also drops itself to your System folder under the name taskmon.exe and also drops a file named shimgapi.dll, which is a backdoor program loaded by the worm. The backdoor allows outsiders to connect to TCP port 3127 on your computer. This worm adds the value: Taskmon = taskmon.exe to the following registry key: HKLM\Software\Microsoft\Windows\CurrentVersion\Run This means that W32/MyDoom-A loads every time you logon to your computer. Update those AV prgrams! Have a good week! John R Bartow WinHaven Computer Services PO Box 130 Winneconne, WI 54986-0130 Office: 920-582-7574 john at winhaven.net This message is a free service of WinHaven Consulting LLC. If you don't want to receive these messages please click here: mailto:techasst at winhaven.net?Subject=Please%20remove%20me%20from%20the%20Win Haven%20News%20Flash%20email%20list From john at winhaven.net Tue Jan 27 08:20:44 2004 From: john at winhaven.net (John Bartow) Date: Tue, 27 Jan 2004 08:20:44 -0600 Subject: [AccessD] WinHaven News Flash - MyDoom/Novarg internet worm In-Reply-To: Message-ID: 3 dozen and counting... :o( From adtp at touchtelindia.net Tue Jan 27 11:09:37 2004 From: adtp at touchtelindia.net (A.D.Tejpal) Date: Tue, 27 Jan 2004 22:39:37 +0530 Subject: [AccessD] AXP prints half line at bottom of report References: Message-ID: <009c01c3e4f8$6da3cea0$1aedf73d@winxp> Charlotte, If convenient, zipped copy of pruned down version of your file, containing the problem report along with its record source may kindly be sent to me. Regards, A.D.Tejpal -------------- ----- Original Message ----- From: Charlotte Foust To: AccessD at databaseadvisors.com Sent: Tuesday, January 27, 2004 06:40 Subject: [AccessD] AXP prints half line at bottom of report We've run into an aggravating issue with one of our (admittedly) complicated custom reports, where there is a mixture of CanGrow = True and CanGrow = false, unbound and bound controls, subreports, etc. Some of the data will print at the very bottom of the print area, cut off most of the data in that line and just leave the tops and then print again in whole on the next page. This happens to textboxes, subreports, etc., but does not appear to happen to labels. Since we don't know ahead of time where anything will fall on a page, we've racked our brains to figure out a way to prevent this messy situation. It shows up in both preview and print of the report, which may run to one or more pages depending on the data that has been entered. We've played with top and bottom margins but all that does is move the problem around. Any ideas would be embraced gratefully. Charlotte Foust From Mike.W.Gowey at doc.state.or.us Tue Jan 27 13:12:14 2004 From: Mike.W.Gowey at doc.state.or.us (Gowey Mike W) Date: Tue, 27 Jan 2004 12:12:14 -0700 Subject: [AccessD] Copying a file Message-ID: <05EBB8A3BEB95B4F8216BE4EF486077801D9FF3C@srciml1.ds.doc.state.or.us> Hi Everyone, Could anyone tell me how you would copy a file from one name to another? I currently have in my application to rename a file by using: Name strFileName As strNewName What I would like to be able to do is copy it to another file name rather than renaming it. Thanks in advance for your help. Mike Gowey, MCSA, A+ Team Leader - SRCI Information Systems & Services Division From rl_stewart at highstream.net Tue Jan 27 13:17:39 2004 From: rl_stewart at highstream.net (Robert L. Stewart) Date: Tue, 27 Jan 2004 13:17:39 -0600 Subject: [AccessD] Re: Make-table query points to c:\documents and settings?! In-Reply-To: <200401271803.i0RI3Im20809@databaseadvisors.com> Message-ID: <5.1.0.14.2.20040127131409.029151a0@pop3.highstream.net> Sander, What you have to do is open the other database in code. Then, you can execute the SQL statement to build the tables you are wanting. ADO would work fine for this. The path would be required to open the DB, but not to create the tables. All of this has to be done in code and it has to be done in pure SQL as 2 different SQL statements. First to create the table, second to append the data. So you actually have to open 2 database objects, current and remote. If you need help with the code, let me know and I will post it to the list. Robert At 12:03 PM 1/27/2004 -0600, you wrote: >Date: Mon, 26 Jan 2004 10:44:38 -0800 (PST) >From: Sad Der >Subject: Re: [AccessD] Make-table query points to c:\documents and > settings?! >To: Access Developers discussion and problem solving > >Message-ID: <20040126184438.97312.qmail at web60205.mail.yahoo.com> >Content-Type: text/plain; charset=us-ascii > >I build it in SQL view. There's no path in there >either... :-( > >Sander From rl_stewart at highstream.net Tue Jan 27 13:20:29 2004 From: rl_stewart at highstream.net (Robert L. Stewart) Date: Tue, 27 Jan 2004 13:20:29 -0600 Subject: [AccessD] Re: ODBC Connection Information Not Showing in ODBC Data Sources In-Reply-To: <200401271803.i0RI3Im20809@databaseadvisors.com> Message-ID: <5.1.0.14.2.20040127131943.028dc508@pop3.highstream.net> Jeff, It has to be installed as the administrator of the machine. Robert At 12:03 PM 1/27/2004 -0600, you wrote: >Date: Mon, 26 Jan 2004 14:39:30 -0600 >From: jeffrey.demulling at usbank.com >Subject: [AccessD] ODBC Connection Information Not Showing in ODBC > Data Sources >To: "Access Developers discussion and problem solving" > >Message-ID: > > > >Content-Type: text/plain; charset=us-ascii > > >Operating System Windows NT 4.0 > >A LAN Admin has installed an Oracle ODBC Driver for RDB and the >installation says the driver has installed successfully. Looking in the >registry it show the driver is installed. However when the user tries to >set up an actual connection the driver is not listed as being there. This >is also happening with another user for Gupta's SQLBase Driver pack. >Anyone know of any solutions to make the driver appear in the as being >installed? > >TIA. > >-Jeff From rl_stewart at highstream.net Tue Jan 27 13:28:00 2004 From: rl_stewart at highstream.net (Robert L. Stewart) Date: Tue, 27 Jan 2004 13:28:00 -0600 Subject: [AccessD] Re: Temp tables and access security In-Reply-To: <200401271803.i0RI3Im20809@databaseadvisors.com> Message-ID: <5.1.0.14.2.20040127132452.0476ee88@pop3.highstream.net> Mark, I would suggest using static tables in the front-end. You will need to give the users all permissions except permission to delete and create tables. You can do this if the structure of the temp tables do not change each time they are run. You just truncate (delete all rows) in them and then reload the data. Since I refuse to deal with Access security and I always have a copy of the program MDE on each client, this is the way I handle it. I also have them refresh the local copy at least once a week. Robert At 12:03 PM 1/27/2004 -0600, you wrote: >Date: Tue, 27 Jan 2004 00:01:59 -0000 >From: "MarkH" >Subject: RE: [AccessD] Temp tables and access security >To: "'Access Developers discussion and problem solving'" > >Message-ID: <000001c3e468$c9895c20$b00d6bd5 at netboxxp> >Content-Type: text/plain; charset="us-ascii" > >Sorry Charlotte, should have said "Access BE and FE", temp tables are in >the front-end. I can chamge the code to not use temp tables, but I'd >rather leave it alone as it works fine (at the moment :@) > >Many thanks > >Mark >-----Original Message----- >From: accessd-bounces at databaseadvisors.com >[mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Charlotte >Foust >Sent: 26 January 2004 19:45 >To: Access Developers discussion and problem solving >Subject: RE: [AccessD] Temp tables and access security > > >Why would a user be creating temp tables in the BE? Normally temp >tables would be created in the front end. Are you asking about Access >security permissions or Windows permissions? In Windows, you need >pretty much full permissions if you're going to be modifying the design >of the BE. > >Charlotte Foust > >-----Original Message----- >From: MarkH [mailto:lists at theopg.com] >Sent: Monday, January 26, 2004 11:30 AM >To: 'Access Developers discussion and problem solving' >Subject: [AccessD] Temp tables and access security > > >Hello All > >Using AXP on Win 2000 > >I have a secured database and was wondering what permissions I need to >grant to allow the system to create temp tables (Access BE) when a user >logs in. I'm missing something I reckon... > >Cheers > >Mark From gustav at cactus.dk Tue Jan 27 13:34:49 2004 From: gustav at cactus.dk (Gustav Brock) Date: Tue, 27 Jan 2004 20:34:49 +0100 Subject: [AccessD] Copying a file In-Reply-To: <05EBB8A3BEB95B4F8216BE4EF486077801D9FF3C@srciml1.ds.doc.state.or.us> References: <05EBB8A3BEB95B4F8216BE4EF486077801D9FF3C@srciml1.ds.doc.state.or.us> Message-ID: <19941788038.20040127203449@cactus.dk> Hi Gowey How about FileCopy source, destination /gustav > Could anyone tell me how you would copy a file from one name to another? > I currently have in my application to rename a file by using: > Name strFileName As strNewName > What I would like to be able to do is copy it to another file name > rather than renaming it. From DWUTKA at marlow.com Tue Jan 27 13:49:05 2004 From: DWUTKA at marlow.com (DWUTKA at marlow.com) Date: Tue, 27 Jan 2004 13:49:05 -0600 Subject: [AccessD] Copying a file Message-ID: <2F8793082E00D4119A1700B0D0216BF8022277C1@main2.marlow.com> Private Declare Function CopyFile Lib "kernel32" Alias "CopyFileA" (ByVal lpExistingFileName As String, ByVal lpNewFileName As String, ByVal bFailIfExists As Long) As Long CopyFile "C:\MyFile.txt" & chr(0), "C:\NewName.txt" & chr(0),False Drew -----Original Message----- From: Gowey Mike W [mailto:Mike.W.Gowey at doc.state.or.us] Sent: Tuesday, January 27, 2004 1:12 PM To: Access Developers discussion and problem solving Subject: [AccessD] Copying a file Hi Everyone, Could anyone tell me how you would copy a file from one name to another? I currently have in my application to rename a file by using: Name strFileName As strNewName What I would like to be able to do is copy it to another file name rather than renaming it. Thanks in advance for your help. Mike Gowey, MCSA, A+ Team Leader - SRCI Information Systems & Services Division _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From JColby at dispec.com Tue Jan 27 14:05:07 2004 From: JColby at dispec.com (Colby, John) Date: Tue, 27 Jan 2004 15:05:07 -0500 Subject: [AccessD] Vonage Message-ID: <05C61C52D7CAD211A7830008C7DF6F1079BD0B@DISABILITYINS01> I received the phonemodem last night. Plugged it in (behind my router for those interested), waited 5 minutes, then picked up the receiver and made a call. Extremely easy to set up. The sound so far is crystal clear, no clicks / pops or echoes. I have a brand new ATT 2ghz cordless phone system which I plugged in to it. I can't tell the difference between this and the landline. I haven't done any heavy duty uploads / downloads though I will be doing some testing in the next few days. I went with the $15 / month package for 500 total minutes - local and long distance, with anything after that billed at $.039 / minute. If my useage averages more than 500 minutes I'll move up to the $25 package with unlimited local and 500 long distance minutes. Given my useage patterns I may very well end up with a $15 / month phone including long distance. So far so good. John W. Colby The database guy -----Original Message----- From: John W. Colby [mailto:jwcolby at colbyconsulting.com] Sent: Friday, January 23, 2004 5:19 PM To: Access Developers discussion and problem solving Subject: RE: [AccessD] Vonage My blazing fast internet recently went up 50% to $45 / month. The cable company wants $35 / month for unlimited phone / long distance so I could just get it through them, but I thought I'd give Vonage a try. Vonage has $15, $25 and $35 packages which allows me to try it for cheap and see if it really works before turning off the land line. John W. Colby www.ColbyConsulting.com -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Francisco H Tapia Sent: Friday, January 23, 2004 2:27 PM To: Access Developers discussion and problem solving Subject: Re: [AccessD] Vonage Price sounds good, but if you are using DSL it's not really like you're saving much.. :( Verizon = 29.00 DSL = 35.00 --------------- 64.00 plus the vonage price? :S, I can't get rid of verizon as they are my telco. the only thing that would make sense is to switch to cable then it's just the price of the cable bill plus vonage. -- -Francisco augusta wrote: >I signed up a few weeks ago. It may or may not have wrecked just a bit >of havoc on my (fairly complicated) network. But overall I love it! The >only bummer is that you always have to dial the 1+area code . . . (But I >hear some in NJ are doing that already). Great price! > > > >>-----Original Message----- >>From: accessd-bounces at databaseadvisors.com [mailto:accessd- >>bounces at databaseadvisors.com] On Behalf Of John W. Colby >>Sent: Thursday, January 22, 2004 9:53 PM >>To: AccessD >>Subject: [AccessD] Vonage >> >>Is anyone using this? Comments? >> >>http://www.vonage.com >> >>John W. Colby >>www.ColbyConsulting.com >> >> _______________________________________________ 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 From jeffrey.demulling at usbank.com Tue Jan 27 13:47:42 2004 From: jeffrey.demulling at usbank.com (jeffrey.demulling at usbank.com) Date: Tue, 27 Jan 2004 13:47:42 -0600 Subject: [AccessD] Copying a file Message-ID: You could use the CopyFile API. Private Declare Function CopyFile Lib "kernel32" Alias "CopyFileA" (ByVal lpExistingFileName As String, ByVal lpNewFileName As String, ByVal bFailIfExists As Long) As Long "Gowey Mike W" Sent by: cc: accessd-bounces at databasead Subject: [AccessD] Copying a file visors.com 01/27/2004 01:12 PM Please respond to "Access Developers discussion and problem solving" Hi Everyone, Could anyone tell me how you would copy a file from one name to another? I currently have in my application to rename a file by using: Name strFileName As strNewName What I would like to be able to do is copy it to another file name rather than renaming it. Thanks in advance for your help. Mike Gowey, MCSA, A+ Team Leader - SRCI Information Systems & Services Division _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From lists at theopg.com Tue Jan 27 14:14:53 2004 From: lists at theopg.com (MarkH) Date: Tue, 27 Jan 2004 20:14:53 -0000 Subject: [AccessD] Re: Temp tables and access security In-Reply-To: <5.1.0.14.2.20040127132452.0476ee88@pop3.highstream.net> Message-ID: <000501c3e512$40f9ca70$b00d6bd5@netboxxp> Thanks Robert Mark -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Robert L. Stewart Sent: 27 January 2004 19:28 To: accessd at databaseadvisors.com Subject: [AccessD] Re: Temp tables and access security Mark, I would suggest using static tables in the front-end. You will need to give the users all permissions except permission to delete and create tables. You can do this if the structure of the temp tables do not change each time they are run. You just truncate (delete all rows) in them and then reload the data. Since I refuse to deal with Access security and I always have a copy of the program MDE on each client, this is the way I handle it. I also have them refresh the local copy at least once a week. Robert At 12:03 PM 1/27/2004 -0600, you wrote: >Date: Tue, 27 Jan 2004 00:01:59 -0000 >From: "MarkH" >Subject: RE: [AccessD] Temp tables and access security >To: "'Access Developers discussion and problem solving'" > >Message-ID: <000001c3e468$c9895c20$b00d6bd5 at netboxxp> >Content-Type: text/plain; charset="us-ascii" > >Sorry Charlotte, should have said "Access BE and FE", temp tables are >in the front-end. I can chamge the code to not use temp tables, but I'd >rather leave it alone as it works fine (at the moment :@) > >Many thanks > >Mark >-----Original Message----- >From: accessd-bounces at databaseadvisors.com >[mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Charlotte >Foust >Sent: 26 January 2004 19:45 >To: Access Developers discussion and problem solving >Subject: RE: [AccessD] Temp tables and access security > > >Why would a user be creating temp tables in the BE? Normally temp >tables would be created in the front end. Are you asking about Access >security permissions or Windows permissions? In Windows, you need >pretty much full permissions if you're going to be modifying the design >of the BE. > >Charlotte Foust > >-----Original Message----- >From: MarkH [mailto:lists at theopg.com] >Sent: Monday, January 26, 2004 11:30 AM >To: 'Access Developers discussion and problem solving' >Subject: [AccessD] Temp tables and access security > > >Hello All > >Using AXP on Win 2000 > >I have a secured database and was wondering what permissions I need to >grant to allow the system to create temp tables (Access BE) when a user >logs in. I'm missing something I reckon... > >Cheers > >Mark _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From my.lists at verizon.net Tue Jan 27 14:20:09 2004 From: my.lists at verizon.net (Francisco H Tapia) Date: Tue, 27 Jan 2004 12:20:09 -0800 Subject: [AccessD] Vonage In-Reply-To: <05C61C52D7CAD211A7830008C7DF6F1079BD0B@DISABILITYINS01> References: <05C61C52D7CAD211A7830008C7DF6F1079BD0B@DISABILITYINS01> Message-ID: <4016C7F9.7030908@verizon.net> This will be easy to test, just visit Microsoft.com and download one of their heafty SP's for Windows 2000 or XP ;) then try and make a call.. :) -- -Francisco Colby, John wrote: >I received the phonemodem last night. Plugged it in (behind my router for >those interested), waited 5 minutes, then picked up the receiver and made a >call. Extremely easy to set up. > >The sound so far is crystal clear, no clicks / pops or echoes. I have a >brand new ATT 2ghz cordless phone system which I plugged in to it. I can't >tell the difference between this and the landline. > >I haven't done any heavy duty uploads / downloads though I will be doing >some testing in the next few days. > >I went with the $15 / month package for 500 total minutes - local and long >distance, with anything after that billed at $.039 / minute. If my useage >averages more than 500 minutes I'll move up to the $25 package with >unlimited local and 500 long distance minutes. Given my useage patterns I >may very well end up with a $15 / month phone including long distance. > >So far so good. > >John W. Colby >The database guy > > >-----Original Message----- >From: John W. Colby [mailto:jwcolby at colbyconsulting.com] >Sent: Friday, January 23, 2004 5:19 PM >To: Access Developers discussion and problem solving >Subject: RE: [AccessD] Vonage > > >My blazing fast internet recently went up 50% to $45 / month. The cable >company wants $35 / month for unlimited phone / long distance so I could >just get it through them, but I thought I'd give Vonage a try. Vonage has >$15, $25 and $35 packages which allows me to try it for cheap and see if it >really works before turning off the land line. > >John W. Colby >www.ColbyConsulting.com > >-----Original Message----- >From: accessd-bounces at databaseadvisors.com >[mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Francisco H >Tapia >Sent: Friday, January 23, 2004 2:27 PM >To: Access Developers discussion and problem solving >Subject: Re: [AccessD] Vonage > > >Price sounds good, but if you are using DSL it's not really like you're >saving much.. :( > >Verizon = 29.00 >DSL = 35.00 >--------------- > 64.00 > >plus the vonage price? :S, I can't get rid of verizon as they are my >telco. the only thing that would make sense is to switch to cable then >it's just the price of the cable bill plus vonage. > > >-- >-Francisco > > >augusta wrote: > > > >>I signed up a few weeks ago. It may or may not have wrecked just a bit >>of havoc on my (fairly complicated) network. But overall I love it! The >>only bummer is that you always have to dial the 1+area code . . . (But I >>hear some in NJ are doing that already). Great price! >> >> >> >> >> >>>-----Original Message----- >>>From: accessd-bounces at databaseadvisors.com [mailto:accessd- >>>bounces at databaseadvisors.com] On Behalf Of John W. Colby >>>Sent: Thursday, January 22, 2004 9:53 PM >>>To: AccessD >>>Subject: [AccessD] Vonage >>> >>>Is anyone using this? Comments? >>> >>>http://www.vonage.com >>> >>>John W. Colby >>>www.ColbyConsulting.com >>> >>> >>> >>> > > > > From Lambert.Heenan at AIG.com Tue Jan 27 14:40:42 2004 From: Lambert.Heenan at AIG.com (Heenan, Lambert) Date: Tue, 27 Jan 2004 15:40:42 -0500 Subject: [AccessD] Copying a file Message-ID: <8B98F8EA48F8BA47A2F24E0D0AF40CF407AD7D65@xlivmbx12.aig.com> The disadvantage of using the VBA FileCopy routine is that if the source file is in use the copy will fail. However the API CopyFile will copy the source even if some application has it open. Then again, some people might want the copy blocked in those circs. Lambert > -----Original Message----- > From: Gustav Brock [SMTP:gustav at cactus.dk] > Sent: Tuesday, January 27, 2004 2:35 PM > To: Access Developers discussion and problem solving > Subject: Re: [AccessD] Copying a file > > Hi Gowey > > How about > > FileCopy source, destination > > /gustav > > > Could anyone tell me how you would copy a file from one name to another? > > I currently have in my application to rename a file by using: > > > Name strFileName As strNewName > > > What I would like to be able to do is copy it to another file name > > rather than renaming it. > > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com From clh at christopherhawkins.com Tue Jan 27 16:22:39 2004 From: clh at christopherhawkins.com (Christopher Hawkins) Date: Tue, 27 Jan 2004 15:22:39 -0700 Subject: [AccessD] Vonage Message-ID: <285320-220041227222239678@christopherhawkins.com> $15/month sounds great, but what about setup fees or equipment expenses? What's the "out the door" price look like? -Christopher- ---- Original Message ---- From: JColby at dispec.com To: accessd at databaseadvisors.com, Subject: RE: [AccessD] Vonage Date: Tue, 27 Jan 2004 15:05:07 -0500 >I received the phonemodem last night. Plugged it in (behind my >router for >those interested), waited 5 minutes, then picked up the receiver and >made a >call. Extremely easy to set up. > >The sound so far is crystal clear, no clicks / pops or echoes. I >have a >brand new ATT 2ghz cordless phone system which I plugged in to it. >I can't >tell the difference between this and the landline. > >I haven't done any heavy duty uploads / downloads though I will be >doing >some testing in the next few days. > >I went with the $15 / month package for 500 total minutes - local >and long >distance, with anything after that billed at $.039 / minute. If my >useage >averages more than 500 minutes I'll move up to the $25 package with >unlimited local and 500 long distance minutes. Given my useage >patterns I >may very well end up with a $15 / month phone including long >distance. > >So far so good. > >John W. Colby >The database guy > > >-----Original Message----- >From: John W. Colby [mailto:jwcolby at colbyconsulting.com] >Sent: Friday, January 23, 2004 5:19 PM >To: Access Developers discussion and problem solving >Subject: RE: [AccessD] Vonage > > >My blazing fast internet recently went up 50% to $45 / month. The >cable >company wants $35 / month for unlimited phone / long distance so I >could >just get it through them, but I thought I'd give Vonage a try. >Vonage has >$15, $25 and $35 packages which allows me to try it for cheap and >see if it >really works before turning off the land line. > >John W. Colby >www.ColbyConsulting.com > >-----Original Message----- >From: accessd-bounces at databaseadvisors.com >[mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Francisco H >Tapia >Sent: Friday, January 23, 2004 2:27 PM >To: Access Developers discussion and problem solving >Subject: Re: [AccessD] Vonage > > >Price sounds good, but if you are using DSL it's not really like >you're >saving much.. :( > >Verizon = 29.00 >DSL = 35.00 >--------------- > 64.00 > >plus the vonage price? :S, I can't get rid of verizon as they are my >telco. the only thing that would make sense is to switch to cable >then >it's just the price of the cable bill plus vonage. > > >-- >-Francisco > > >augusta wrote: > >>I signed up a few weeks ago. It may or may not have wrecked just a >bit >>of havoc on my (fairly complicated) network. But overall I love it! > The >>only bummer is that you always have to dial the 1+area code . . . >(But I >>hear some in NJ are doing that already). Great price! >> >> >> >>>-----Original Message----- >>>From: accessd-bounces at databaseadvisors.com [mailto:accessd- >>>bounces at databaseadvisors.com] On Behalf Of John W. Colby >>>Sent: Thursday, January 22, 2004 9:53 PM >>>To: AccessD >>>Subject: [AccessD] Vonage >>> >>>Is anyone using this? Comments? >>> >>>http://www.vonage.com >>> >>>John W. Colby >>>www.ColbyConsulting.com >>> >>> > >_______________________________________________ >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 >_______________________________________________ >AccessD mailing list >AccessD at databaseadvisors.com >http://databaseadvisors.com/mailman/listinfo/accessd >Website: http://www.databaseadvisors.com > > From jwcolby at colbyconsulting.com Tue Jan 27 17:09:49 2004 From: jwcolby at colbyconsulting.com (John W. Colby) Date: Tue, 27 Jan 2004 18:09:49 -0500 Subject: [AccessD] Vonage In-Reply-To: <285320-220041227222239678@christopherhawkins.com> Message-ID: ******************************************************************* Item Quantity Unit Subtotal ******************************************************************* Motorola Device 1 $0.00 $0.00 Area Code: 315 - Syracuse 1 $0.00 $0.00 Activation Fee 1 $29.99 $29.99 *Residential Basic 500 1 $14.99 $14.99 ----------------------------------- State Sales Tax: $0.00 Federal Excise Tax: $1.35 Regulatory Recovery Fee:$1.50 Shipping: $9.95 Total: $57.78 * Monthly Recurring Charge. ******************************************************************* This does not include a charge of approximately $30 which you will be charged for if you do not return the modem at the end of service. Now understand that the telephone company charged me a $60 activation fee when I moved from one location to another location down the road 1/2 mile. All just to change my billing from one jack to another in a switchboard. Hmmm... In addition, ATM the Vonage $14.99 is a flat monthly fee, no taxes or other regulatory charges added. My land line STARTS at 11.53 for flat residence line, plus 5.78 federal subscriber line charge, plus 1.43 Connecticut sales tax, plus .73 federal tax plus .20 E911 surcharge, plus .05 Connecticut Service Fund, plus .39 number portability charge, plus .56 Universal Service fund (local), plus .14 Universal Service Fund (Long Distance). Talk about nickel and dimeing you to death! I NEVER get out with under $25 on a "11.50" phone line, and with all the "short" long distance, I rarely get out for under ~$35 WITHOUT long distance, which is $.10/minute. For a couple of years I have used a prepaid calling card which I programmed into my phone to get my long distance for $.039 per minute (slowly inching up, now $.045). Of course I also have to pay for my blazing fast internet connection, which is a ridiculous $45 / month. Makes the $15 ($25/$35) phone bill seem rather inconsequential. But I could never go back to dialup so since I have this blazing fast internet, I might as well piggyback my phone off of it. I am pleased to say it is working great so far. John W. Colby www.ColbyConsulting.com -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Christopher Hawkins Sent: Tuesday, January 27, 2004 5:23 PM To: accessd at databaseadvisors.com Subject: RE: [AccessD] Vonage $15/month sounds great, but what about setup fees or equipment expenses? What's the "out the door" price look like? -Christopher- ---- Original Message ---- From: JColby at dispec.com To: accessd at databaseadvisors.com, Subject: RE: [AccessD] Vonage Date: Tue, 27 Jan 2004 15:05:07 -0500 >I received the phonemodem last night. Plugged it in (behind my >router for >those interested), waited 5 minutes, then picked up the receiver and >made a >call. Extremely easy to set up. > >The sound so far is crystal clear, no clicks / pops or echoes. I >have a >brand new ATT 2ghz cordless phone system which I plugged in to it. >I can't >tell the difference between this and the landline. > >I haven't done any heavy duty uploads / downloads though I will be >doing >some testing in the next few days. > >I went with the $15 / month package for 500 total minutes - local >and long >distance, with anything after that billed at $.039 / minute. If my >useage >averages more than 500 minutes I'll move up to the $25 package with >unlimited local and 500 long distance minutes. Given my useage >patterns I >may very well end up with a $15 / month phone including long >distance. > >So far so good. > >John W. Colby >The database guy From Helmut.E.Kotsch at t-online.de Tue Jan 27 17:11:13 2004 From: Helmut.E.Kotsch at t-online.de (Helmut Kotsch) Date: Wed, 28 Jan 2004 00:11:13 +0100 Subject: [AccessD] Concatenated stLinkCritria produces Type mismatch error. Message-ID: Hi, I am trying to open a form where 2 conditions have to be met. When only one conditon (as shown in code below as sample#1 and sample#2) is set than it works ok. Sample#1 ==> OK Dim stDocName As String Dim stLinkCriteria As String stDocName = "VERDI-Kunden" stLinkCriteria = "[KundenName]=" & "'" & Me![KundenName] & "'" DoCmd.OpenForm stDocName, , , stLinkCriteria Sample#2 ==> OK Dim stDocName As String Dim stLinkCriteria As String stDocName = "VERDI-Kunden" stLinkCriteria = "[VerbandNr]=" & Me![VerbandNr] DoCmd.OpenForm stDocName, , , stLinkCriteria However when concatenating both conditions as shown in the following code I get a "Type mismatch" error. Dim stDocName As String Dim stLinkCriteria As String stDocName = "VERDI-Kunden" stLinkCriteria = "[KundenName]=" & "'" & Me![KundenName] & "'" And "[VerbandNr]=" & Me![VerbandNr] DoCmd.OpenForm stDocName, , , stLinkCriteria Hope someone can help before this one drives me grazy. Helmut Kotsch From cfoust at infostatsystems.com Tue Jan 27 17:49:16 2004 From: cfoust at infostatsystems.com (Charlotte Foust) Date: Tue, 27 Jan 2004 15:49:16 -0800 Subject: [AccessD] Concatenated stLinkCritria produces Type mismatch error. Message-ID: I don't like to use multiple double quotes like that because it's so hard to read. Your problem is in this line: stLinkCriteria = "[KundenName]=" & "'" & Me![KundenName] & "'" And "[VerbandNr]=" & Me![VerbandNr] Which should be: stLinkCriteria = "[KundenName]=" & "'" & Me![KundenName] & "'" & " And [VerbandNr]=" & Me![VerbandNr] Charlotte Foust -----Original Message----- From: Helmut Kotsch [mailto:Helmut.E.Kotsch at t-online.de] Sent: Tuesday, January 27, 2004 3:11 PM To: accessd at databaseadvisors.com Subject: [AccessD] Concatenated stLinkCritria produces Type mismatch error. Hi, I am trying to open a form where 2 conditions have to be met. When only one conditon (as shown in code below as sample#1 and sample#2) is set than it works ok. Sample#1 ==> OK Dim stDocName As String Dim stLinkCriteria As String stDocName = "VERDI-Kunden" stLinkCriteria = "[KundenName]=" & "'" & Me![KundenName] & "'" DoCmd.OpenForm stDocName, , , stLinkCriteria Sample#2 ==> OK Dim stDocName As String Dim stLinkCriteria As String stDocName = "VERDI-Kunden" stLinkCriteria = "[VerbandNr]=" & Me![VerbandNr] DoCmd.OpenForm stDocName, , , stLinkCriteria However when concatenating both conditions as shown in the following code I get a "Type mismatch" error. Dim stDocName As String Dim stLinkCriteria As String stDocName = "VERDI-Kunden" stLinkCriteria = "[KundenName]=" & "'" & Me![KundenName] & "'" And "[VerbandNr]=" & Me![VerbandNr] DoCmd.OpenForm stDocName, , , stLinkCriteria Hope someone can help before this one drives me grazy. Helmut Kotsch _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From Helmut.E.Kotsch at t-online.de Tue Jan 27 18:22:58 2004 From: Helmut.E.Kotsch at t-online.de (Helmut Kotsch) Date: Wed, 28 Jan 2004 01:22:58 +0100 Subject: AW: [AccessD] Concatenated stLinkCritria produces Type mismatcherror. In-Reply-To: Message-ID: Charlotte you are great. Thank you very much. Here I'm sitting at midnight in Germany defining my problem and there you come back within minutes with a workable solution. What is the alternative to using multiple double quotes? (I don't like them either) Where in the world would someone learn / read about the solution you provided. Even though it works, I don't understand it. To be honest, this whole "quotes syntax" (single and double) is a nightmare to me. Again, thanks a lot. Regards and have a nice day. Helmut Kotsch (Helmut.E.Kotsch at t-online.de) -----Ursprungliche Nachricht----- Von: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]Im Auftrag von Charlotte Foust Gesendet: Mittwoch, 28. Januar 2004 00:49 An: Access Developers discussion and problem solving Betreff: RE: [AccessD] Concatenated stLinkCritria produces Type mismatcherror. I don't like to use multiple double quotes like that because it's so hard to read. Your problem is in this line: stLinkCriteria = "[KundenName]=" & "'" & Me![KundenName] & "'" And "[VerbandNr]=" & Me![VerbandNr] Which should be: stLinkCriteria = "[KundenName]=" & "'" & Me![KundenName] & "'" & " And [VerbandNr]=" & Me![VerbandNr] Charlotte Foust -----Original Message----- From: Helmut Kotsch [mailto:Helmut.E.Kotsch at t-online.de] Sent: Tuesday, January 27, 2004 3:11 PM To: accessd at databaseadvisors.com Subject: [AccessD] Concatenated stLinkCritria produces Type mismatch error. Hi, I am trying to open a form where 2 conditions have to be met. When only one conditon (as shown in code below as sample#1 and sample#2) is set than it works ok. Sample#1 ==> OK Dim stDocName As String Dim stLinkCriteria As String stDocName = "VERDI-Kunden" stLinkCriteria = "[KundenName]=" & "'" & Me![KundenName] & "'" DoCmd.OpenForm stDocName, , , stLinkCriteria Sample#2 ==> OK Dim stDocName As String Dim stLinkCriteria As String stDocName = "VERDI-Kunden" stLinkCriteria = "[VerbandNr]=" & Me![VerbandNr] DoCmd.OpenForm stDocName, , , stLinkCriteria However when concatenating both conditions as shown in the following code I get a "Type mismatch" error. Dim stDocName As String Dim stLinkCriteria As String stDocName = "VERDI-Kunden" stLinkCriteria = "[KundenName]=" & "'" & Me![KundenName] & "'" And "[VerbandNr]=" & Me![VerbandNr] DoCmd.OpenForm stDocName, , , stLinkCriteria Hope someone can help before this one drives me grazy. Helmut Kotsch _______________________________________________ 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 From cfoust at infostatsystems.com Tue Jan 27 18:36:10 2004 From: cfoust at infostatsystems.com (Charlotte Foust) Date: Tue, 27 Jan 2004 16:36:10 -0800 Subject: [AccessD] Concatenated stLinkCritria produces Type mismatcherror. Message-ID: I generally use single quotes inside the double quotes, although it can get tricky if the are quotes inside a field's values. Another alternative is to concatenate chr(34), which is a double quote, between the rest of the string and text value that needs to be surrounded by quotes. Like this: stLinkCriteria = "[KundenName]=" & Chr(34) & Me![KundenName] & Chr(34) & " And [VerbandNr]=" & Me![VerbandNr] I've always found that a lot easier to read. Charlotte Foust -----Original Message----- From: Helmut Kotsch [mailto:Helmut.E.Kotsch at t-online.de] Sent: Tuesday, January 27, 2004 4:23 PM To: Access Developers discussion and problem solving Subject: AW: [AccessD] Concatenated stLinkCritria produces Type mismatcherror. Charlotte you are great. Thank you very much. Here I'm sitting at midnight in Germany defining my problem and there you come back within minutes with a workable solution. What is the alternative to using multiple double quotes? (I don't like them either) Where in the world would someone learn / read about the solution you provided. Even though it works, I don't understand it. To be honest, this whole "quotes syntax" (single and double) is a nightmare to me. Again, thanks a lot. Regards and have a nice day. Helmut Kotsch (Helmut.E.Kotsch at t-online.de) -----Ursprungliche Nachricht----- Von: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]Im Auftrag von Charlotte Foust Gesendet: Mittwoch, 28. Januar 2004 00:49 An: Access Developers discussion and problem solving Betreff: RE: [AccessD] Concatenated stLinkCritria produces Type mismatcherror. I don't like to use multiple double quotes like that because it's so hard to read. Your problem is in this line: stLinkCriteria = "[KundenName]=" & "'" & Me![KundenName] & "'" And "[VerbandNr]=" & Me![VerbandNr] Which should be: stLinkCriteria = "[KundenName]=" & "'" & Me![KundenName] & "'" & " And [VerbandNr]=" & Me![VerbandNr] Charlotte Foust -----Original Message----- From: Helmut Kotsch [mailto:Helmut.E.Kotsch at t-online.de] Sent: Tuesday, January 27, 2004 3:11 PM To: accessd at databaseadvisors.com Subject: [AccessD] Concatenated stLinkCritria produces Type mismatch error. Hi, I am trying to open a form where 2 conditions have to be met. When only one conditon (as shown in code below as sample#1 and sample#2) is set than it works ok. Sample#1 ==> OK Dim stDocName As String Dim stLinkCriteria As String stDocName = "VERDI-Kunden" stLinkCriteria = "[KundenName]=" & "'" & Me![KundenName] & "'" DoCmd.OpenForm stDocName, , , stLinkCriteria Sample#2 ==> OK Dim stDocName As String Dim stLinkCriteria As String stDocName = "VERDI-Kunden" stLinkCriteria = "[VerbandNr]=" & Me![VerbandNr] DoCmd.OpenForm stDocName, , , stLinkCriteria However when concatenating both conditions as shown in the following code I get a "Type mismatch" error. Dim stDocName As String Dim stLinkCriteria As String stDocName = "VERDI-Kunden" stLinkCriteria = "[KundenName]=" & "'" & Me![KundenName] & "'" And "[VerbandNr]=" & Me![VerbandNr] DoCmd.OpenForm stDocName, , , stLinkCriteria Hope someone can help before this one drives me grazy. Helmut Kotsch _______________________________________________ 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 _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From BBarabash at TappeConstruction.com Tue Jan 27 18:46:16 2004 From: BBarabash at TappeConstruction.com (Brett Barabash) Date: Tue, 27 Jan 2004 18:46:16 -0600 Subject: [AccessD] Concatenated stLinkCritria produces Type mismatcher ror. Message-ID: <426071E0B0A6D311B3C0006008B0AB23AFE2F4@TAPPEEXCH01> Personally, (and this is simply preference, I'm sure others will argue) I prefer also avoiding "stranded" quotes, so stLinkCriteria = "[KundenName]=" & "'" & Me![KundenName] & "'" & " And [VerbandNr]=" & Me![VerbandNr] Becomes: stLinkCriteria = "[KundenName]='" & Me![KundenName] & "' And [VerbandNr]=" & Me![VerbandNr] Less string concatenation that way. The only catch is if your code window uses a sans serif font like Arial, Tahoma, etc, the quotes tend to mush together making my method less readable. Otherwise, I find it much easier to debug. -----Original Message----- From: Helmut.E.Kotsch at t-online.de [mailto:Helmut.E.Kotsch at t-online.de] Sent: Tuesday, January 27, 2004 6:23 PM To: Access Developers discussion and problem solving Subject: AW: [AccessD] Concatenated stLinkCritria produces Type mismatcherror. Charlotte you are great. Thank you very much. Here I'm sitting at midnight in Germany defining my problem and there you come back within minutes with a workable solution. What is the alternative to using multiple double quotes? (I don't like them either) Where in the world would someone learn / read about the solution you provided. Even though it works, I don't understand it. To be honest, this whole "quotes syntax" (single and double) is a nightmare to me. Again, thanks a lot. Regards and have a nice day. Helmut Kotsch (Helmut.E.Kotsch at t-online.de) -----Ursprungliche Nachricht----- Von: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]Im Auftrag von Charlotte Foust Gesendet: Mittwoch, 28. Januar 2004 00:49 An: Access Developers discussion and problem solving Betreff: RE: [AccessD] Concatenated stLinkCritria produces Type mismatcherror. I don't like to use multiple double quotes like that because it's so hard to read. Your problem is in this line: stLinkCriteria = "[KundenName]=" & "'" & Me![KundenName] & "'" And "[VerbandNr]=" & Me![VerbandNr] Which should be: stLinkCriteria = "[KundenName]=" & "'" & Me![KundenName] & "'" & " And [VerbandNr]=" & Me![VerbandNr] Charlotte Foust -----Original Message----- From: Helmut Kotsch [mailto:Helmut.E.Kotsch at t-online.de] Sent: Tuesday, January 27, 2004 3:11 PM To: accessd at databaseadvisors.com Subject: [AccessD] Concatenated stLinkCritria produces Type mismatch error. Hi, I am trying to open a form where 2 conditions have to be met. When only one conditon (as shown in code below as sample#1 and sample#2) is set than it works ok. Sample#1 ==> OK Dim stDocName As String Dim stLinkCriteria As String stDocName = "VERDI-Kunden" stLinkCriteria = "[KundenName]=" & "'" & Me![KundenName] & "'" DoCmd.OpenForm stDocName, , , stLinkCriteria Sample#2 ==> OK Dim stDocName As String Dim stLinkCriteria As String stDocName = "VERDI-Kunden" stLinkCriteria = "[VerbandNr]=" & Me![VerbandNr] DoCmd.OpenForm stDocName, , , stLinkCriteria However when concatenating both conditions as shown in the following code I get a "Type mismatch" error. Dim stDocName As String Dim stLinkCriteria As String stDocName = "VERDI-Kunden" stLinkCriteria = "[KundenName]=" & "'" & Me![KundenName] & "'" And "[VerbandNr]=" & Me![VerbandNr] DoCmd.OpenForm stDocName, , , stLinkCriteria Hope someone can help before this one drives me grazy. Helmut Kotsch -------------------------------------------------------------------------------------------------------------------- This email and any files transmitted with it are confidential and intended solely for the use of the individual or entity to whom they are addressed. If you have received this email in error please notify the originator of the message. This footer also confirms that this email message has been scanned for the presence of computer viruses. Any views expressed in this message are those of the individual sender, except where the sender specifies and with authority, states them to be the views of Tappe Construction Co. Scanning of this message and addition of this footer is performed by SurfControl E-mail Filter software in conjunction with virus detection software. From stuart at lexacorp.com.pg Tue Jan 27 19:03:57 2004 From: stuart at lexacorp.com.pg (Stuart McLachlan) Date: Wed, 28 Jan 2004 11:03:57 +1000 Subject: [AccessD] Concatenated stLinkCritria produces Type mismatcher ror. In-Reply-To: <426071E0B0A6D311B3C0006008B0AB23AFE2F4@TAPPEEXCH01> Message-ID: <4017971D.17970.2E2ECEE6@localhost> If it's only once or twice in an app, I also prefer to "avoid stranded quotes". If there is going to be quite a bit of building such strings, I prefer to do this: Function SQuote(BaseString as String) as String SQuote = Chr$(39) & BaseString & Chr$(39) EndFunction Function DQuote(BaseString as String) as String DQuote = Chr$(34) & BaseString & Chr$(34) EndFunction Then I use: stLinkCriteria = "[KundenName]=" & SQuote(Me![KundenName]) & " And [VerbandNr]=" & Me![VerbandNr] or stLinkCriteria = "[KundenName]=" & DQuote(Me![KundenName]) & " And [VerbandNr]=" & Me![VerbandNr] On 27 Jan 2004 at 18:46, Brett Barabash wrote: > Personally, (and this is simply preference, I'm sure others will argue) I > prefer also avoiding "stranded" quotes, so > > stLinkCriteria = "[KundenName]=" & "'" & Me![KundenName] & "'" & " And > [VerbandNr]=" & Me![VerbandNr] > > Becomes: > > stLinkCriteria = "[KundenName]='" & Me![KundenName] & "' And [VerbandNr]=" & > Me![VerbandNr] > > Less string concatenation that way. The only catch is if your code window > uses a sans serif font like Arial, Tahoma, etc, the quotes tend to mush > together making my method less readable. Otherwise, I find it much easier > to debug. > > > -----Original Message----- > From: Helmut.E.Kotsch at t-online.de [mailto:Helmut.E.Kotsch at t-online.de] > Sent: Tuesday, January 27, 2004 6:23 PM > To: Access Developers discussion and problem solving > Subject: AW: [AccessD] Concatenated stLinkCritria produces Type > mismatcherror. > > > Charlotte you are great. Thank you very much. Here I'm sitting at midnight > in Germany defining my problem and there you come back within minutes with a > workable solution. > What is the alternative to using multiple double quotes? (I don't like them > either) > Where in the world would someone learn / read about the solution you > provided. Even though it works, I don't understand it. > To be honest, this whole "quotes syntax" (single and double) is a nightmare > to me. > > Again, thanks a lot. > Regards and have a nice day. > > Helmut Kotsch > > (Helmut.E.Kotsch at t-online.de) > > > -----Ursprungliche Nachricht----- > Von: accessd-bounces at databaseadvisors.com > [mailto:accessd-bounces at databaseadvisors.com]Im Auftrag von Charlotte > Foust > Gesendet: Mittwoch, 28. Januar 2004 00:49 > An: Access Developers discussion and problem solving > Betreff: RE: [AccessD] Concatenated stLinkCritria produces Type > mismatcherror. > > > I don't like to use multiple double quotes like that because it's so > hard to read. Your problem is in this line: > > stLinkCriteria = "[KundenName]=" & "'" & Me![KundenName] & "'" And > "[VerbandNr]=" & Me![VerbandNr] > > Which should be: > > stLinkCriteria = "[KundenName]=" & "'" & Me![KundenName] & "'" & " > And [VerbandNr]=" & Me![VerbandNr] > > Charlotte Foust > > -----Original Message----- > From: Helmut Kotsch [mailto:Helmut.E.Kotsch at t-online.de] > Sent: Tuesday, January 27, 2004 3:11 PM > To: accessd at databaseadvisors.com > Subject: [AccessD] Concatenated stLinkCritria produces Type mismatch > error. > > > Hi, > I am trying to open a form where 2 conditions have to be met. When only > one conditon (as shown in code below as sample#1 and sample#2) is set > than it works ok. > > Sample#1 ==> OK > > Dim stDocName As String > Dim stLinkCriteria As String > stDocName = "VERDI-Kunden" > stLinkCriteria = "[KundenName]=" & "'" & Me![KundenName] & "'" > DoCmd.OpenForm stDocName, , , stLinkCriteria > > Sample#2 ==> OK > > Dim stDocName As String > Dim stLinkCriteria As String > stDocName = "VERDI-Kunden" > stLinkCriteria = "[VerbandNr]=" & Me![VerbandNr] > DoCmd.OpenForm stDocName, , , stLinkCriteria > > However when concatenating both conditions as shown in the following > code I get a "Type mismatch" error. > > Dim stDocName As String > Dim stLinkCriteria As String > stDocName = "VERDI-Kunden" > stLinkCriteria = "[KundenName]=" & "'" & Me![KundenName] & "'" And > "[VerbandNr]=" & Me![VerbandNr] > DoCmd.OpenForm stDocName, , , stLinkCriteria > > Hope someone can help before this one drives me grazy. > > > Helmut Kotsch > > -------------------------------------------------------------------------------------------------------------------- > This email and any files transmitted with it are confidential and > intended solely for the use of the individual or entity to whom > they are addressed. > If you have received this email in error please notify the > originator of the message. This footer also confirms that this > email message has been scanned for the presence of computer viruses. > > Any views expressed in this message are those of the individual > sender, except where the sender specifies and with authority, > states them to be the views of Tappe Construction Co. > > Scanning of this message and addition of this footer is performed > by SurfControl E-mail Filter software in conjunction with > virus detection software. > > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com -- Stuart McLachlan Lexacorp Ltd Application Development, IT Consultancy http://www.lexacorp.com.pg From DWUTKA at marlow.com Tue Jan 27 19:22:21 2004 From: DWUTKA at marlow.com (DWUTKA at marlow.com) Date: Tue, 27 Jan 2004 19:22:21 -0600 Subject: [AccessD] Concatenated stLinkCritria produces Type mismatcher ror. Message-ID: <2F8793082E00D4119A1700B0D0216BF8022277CF@main2.marlow.com> Let's see if I can break it down for you a bit. Double quotes OR single quotes are a string delimiter. Which means, that if either starts a string, that same character has to end the string. Double quotes is usually the one used (like in VBA, a single quote on it's own comments out a line....). So, when building a string, you have nothing to worry about, UNLESS you need to incorporate the delimiter into the string itself. So, if you want: Let's test this. "Let's test this." is the correct string. There is a single quote, but the delimiter isn't used within the string. If you want: Susie said, "I want chocolate ice cream!". Then it get's interesting. However, to represent a double quote, within a string delimited by double quotes, you just put two of them together, so, "Susie said, ""I want chocolate ice cream!""." is the correct string representation. Once you understand the doubling of the delimiter concept, the rest isn't to hard to figure out. So far I've only shown 'full' strings. If you need to put a string together from peices, the SAME rule applies, even though it may look different. If you want to include the dilimiter, you double it. So, if you have : Look for "something". where something is a variable, you would use this: "Look for """ & strSomething & """." Notice, that you have 3 parts to this string. The first part starts and ends with the delimiter ("). The last bit of the first part is a doubling of the double quote, then one more double quote to end the string. (So the delimiter is at the beginning and end of the 'string', and again, the doubling rule puts the delimiter within the string itself....because it's at the end of the segment, there are three in a row, but just remember, that's a double 'delimiter', followed by the delimiter itself...thus three in a row.) The second part is a variable, and is joined to the other parts with the ampersand. The last part, three double quotes, period, double quote, is the delimiter, a doubled delimiter (to represent it in the string on it's own), a period, then the closing delimiter. Now, let's say you want: Something"somethingelse" you would do this: strSomething & """" & strSomethingElse & """" Now you see 4 delimiters. Don't get side tracked. That is really an opening delimiter, the 'doubled' delimiter, and a closing delimiter. So if you saw """""", that produces a string of : "" (open delimiter, 2 doubled delimiters, and a closing delimiter....thus 6 all together, producing 2 double quotes for the contents of the string.) Does that all make sense? Just remember that to represent a delimiter within the string itself, you double the delimiter. Now, not to confuse the issue, but if you look at it even deeper, there is a perfectly logical explanation on how/why this system was developed. Numbers and other variable types are all represented by a specific number of bytes. To you and me 10,300 is 10,300, but to the email program, it's a chr(49), chr(48), chr(44), etc. When I put 10300 in code, the compiler changes the string into 4 bytes (if I am using a long integer variable type). However, a string can be any length (I believe the maximum number of characters for a string in VB/VBA is 2 million, but not positive on that. Since the length is variable, the code has to know where the string starts, and where the string stops, so it knows how much memory it is going to use (since in ASCII, each character takes up 1 byte, and in Unicode they take up 2 bytes.). Because of this, the code needs to know where the string starts and where it stops, so it uses a 'delimiter'. Quite frankly, the reason double quotes seem so difficult to put into strings is because they chose a delimiter normally used within a string. If they had used something like chr(150), which isn't 'typable', it would have been easier to make strings, because when are you going to use chr(150) in normal text, however, it would make looking at most strings hard to see for a programmer. Even if they had used a non-typable character, they couldn't exclude the fact that someone MAY want to use that within the string itself. Thus, no matter what delimiter they were going to use, they had to provide a method of letting that delimiter fall within the string it was delimiting. To do that, they took the double approach. If the code finds the end delimiter, and finds it again, as the next character, it knows that the string isn't REALLY over, because it's been doubled, thus the code simply puts the delimiter within memory as part of the string itself. If it finds the end delimiter, and anything BUT the delimiter afterwards, then it knows it has found the end of that string. Make sense? Drew -----Original Message----- From: Helmut.E.Kotsch at t-online.de [mailto:Helmut.E.Kotsch at t-online.de] Sent: Tuesday, January 27, 2004 6:23 PM To: Access Developers discussion and problem solving Subject: AW: [AccessD] Concatenated stLinkCritria produces Type mismatcherror. Charlotte you are great. Thank you very much. Here I'm sitting at midnight in Germany defining my problem and there you come back within minutes with a workable solution. What is the alternative to using multiple double quotes? (I don't like them either) Where in the world would someone learn / read about the solution you provided. Even though it works, I don't understand it. To be honest, this whole "quotes syntax" (single and double) is a nightmare to me. Again, thanks a lot. Regards and have a nice day. Helmut Kotsch (Helmut.E.Kotsch at t-online.de) -----Ursprungliche Nachricht----- Von: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]Im Auftrag von Charlotte Foust Gesendet: Mittwoch, 28. Januar 2004 00:49 An: Access Developers discussion and problem solving Betreff: RE: [AccessD] Concatenated stLinkCritria produces Type mismatcherror. I don't like to use multiple double quotes like that because it's so hard to read. Your problem is in this line: stLinkCriteria = "[KundenName]=" & "'" & Me![KundenName] & "'" And "[VerbandNr]=" & Me![VerbandNr] Which should be: stLinkCriteria = "[KundenName]=" & "'" & Me![KundenName] & "'" & " And [VerbandNr]=" & Me![VerbandNr] Charlotte Foust -----Original Message----- From: Helmut Kotsch [mailto:Helmut.E.Kotsch at t-online.de] Sent: Tuesday, January 27, 2004 3:11 PM To: accessd at databaseadvisors.com Subject: [AccessD] Concatenated stLinkCritria produces Type mismatch error. Hi, I am trying to open a form where 2 conditions have to be met. When only one conditon (as shown in code below as sample#1 and sample#2) is set than it works ok. Sample#1 ==> OK Dim stDocName As String Dim stLinkCriteria As String stDocName = "VERDI-Kunden" stLinkCriteria = "[KundenName]=" & "'" & Me![KundenName] & "'" DoCmd.OpenForm stDocName, , , stLinkCriteria Sample#2 ==> OK Dim stDocName As String Dim stLinkCriteria As String stDocName = "VERDI-Kunden" stLinkCriteria = "[VerbandNr]=" & Me![VerbandNr] DoCmd.OpenForm stDocName, , , stLinkCriteria However when concatenating both conditions as shown in the following code I get a "Type mismatch" error. Dim stDocName As String Dim stLinkCriteria As String stDocName = "VERDI-Kunden" stLinkCriteria = "[KundenName]=" & "'" & Me![KundenName] & "'" And "[VerbandNr]=" & Me![VerbandNr] DoCmd.OpenForm stDocName, , , stLinkCriteria Hope someone can help before this one drives me grazy. Helmut Kotsch _______________________________________________ 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 _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From bruce_bruen at mlc.com.au Tue Jan 27 18:43:59 2004 From: bruce_bruen at mlc.com.au (bruce_bruen at mlc.com.au) Date: Wed, 28 Jan 2004 11:43:59 +1100 Subject: [AccessD] Concatenated stLinkCritria produces Type mismatch error. Message-ID: stLinkCriteria = "[KundenName]=" & "'" & Me![KundenName] & "' And [VerbandNr]=" & Me![VerbandNr] Youve left the "AND" out of your strLinkCriteria. Helmut.E.Kotsch at t-online. de (Helmut Kotsch) To: Sent by: cc: accessd-bounces at databasea Subject: [AccessD] Concatenated stLinkCritria produces Type mismatch error. dvisors.com 28/01/2004 10:11 Please respond to Access Developers discussion and problem solving Hi, I am trying to open a form where 2 conditions have to be met. When only one conditon (as shown in code below as sample#1 and sample#2) is set than it works ok. Sample#1 ==> OK Dim stDocName As String Dim stLinkCriteria As String stDocName = "VERDI-Kunden" stLinkCriteria = "[KundenName]=" & "'" & Me![KundenName] & "'" DoCmd.OpenForm stDocName, , , stLinkCriteria Sample#2 ==> OK Dim stDocName As String Dim stLinkCriteria As String stDocName = "VERDI-Kunden" stLinkCriteria = "[VerbandNr]=" & Me![VerbandNr] DoCmd.OpenForm stDocName, , , stLinkCriteria However when concatenating both conditions as shown in the following code I get a "Type mismatch" error. Dim stDocName As String Dim stLinkCriteria As String stDocName = "VERDI-Kunden" stLinkCriteria = "[KundenName]=" & "'" & Me![KundenName] & "'" And "[VerbandNr]=" & Me![VerbandNr] DoCmd.OpenForm stDocName, , , stLinkCriteria Hope someone can help before this one drives me grazy. Helmut Kotsch _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From bruce_bruen at mlc.com.au Tue Jan 27 18:52:51 2004 From: bruce_bruen at mlc.com.au (bruce_bruen at mlc.com.au) Date: Wed, 28 Jan 2004 11:52:51 +1100 Subject: [AccessD] Re: Make-table query points to c:\documents and settings?! Message-ID: Dont know if I really understand the question here but afaik the db can be put into the sql string directly as in: Create table [C:\temp\db1.mdb].t1 (f1 string); or have I lost the drift? BB "Robert L. Stewart" cc: Sent by: Subject: [AccessD] Re: Make-table query points to c:\documents and settings?! accessd-bounces at databasea dvisors.com 28/01/2004 06:17 Please respond to Access Developers discussion and problem solving Sander, What you have to do is open the other database in code. Then, you can execute the SQL statement to build the tables you are wanting. ADO would work fine for this. The path would be required to open the DB, but not to create the tables. All of this has to be done in code and it has to be done in pure SQL as 2 different SQL statements. First to create the table, second to append the data. So you actually have to open 2 database objects, current and remote. If you need help with the code, let me know and I will post it to the list. Robert At 12:03 PM 1/27/2004 -0600, you wrote: >Date: Mon, 26 Jan 2004 10:44:38 -0800 (PST) >From: Sad Der >Subject: Re: [AccessD] Make-table query points to c:\documents and > settings?! >To: Access Developers discussion and problem solving > >Message-ID: <20040126184438.97312.qmail at web60205.mail.yahoo.com> >Content-Type: text/plain; charset=us-ascii > >I build it in SQL view. There's no path in there >either... :-( > >Sander _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From paul.hartland at fsmail.net Wed Jan 28 03:28:17 2004 From: paul.hartland at fsmail.net (paul.hartland at fsmail.net) Date: Wed, 28 Jan 2004 10:28:17 +0100 (CET) Subject: [AccessD] Text File Into Access Using Visual Basic 6 Message-ID: <13710544.1075282097676.JavaMail.www@wwinf3005> To all, Can anyone tell me (preferably with sample code, if possible), what is the fastest way to import a .txt file into a predefined table in access via Visual Basic 6. My .txt file contains roughly 365,876 records with two fields ? Barcode, Price. This has to be imported into an Access table also containing two fields Barcode (text), Price (Number, Double, Fixed, 2 decimal places). The .txt file is comma delimited. I?m using Access XP and Visual Basic 6.0 as the front-end. Thanks in advance for any help as, this project needs to be ready for Monday morning Paul Hartland Freeserve AnyTime - HALF PRICE for the first 3 months - Save ?7.50 a month www.freeserve.com/anytime From gustav at cactus.dk Wed Jan 28 03:40:52 2004 From: gustav at cactus.dk (Gustav Brock) Date: Wed, 28 Jan 2004 10:40:52 +0100 Subject: [AccessD] Text File Into Access Using Visual Basic 6 In-Reply-To: <13710544.1075282097676.JavaMail.www@wwinf3005> References: <13710544.1075282097676.JavaMail.www@wwinf3005> Message-ID: <398636869.20040128104052@cactus.dk> Hi Paul That is to pay Seth a visit: http://puma.agron.ksu.edu/~sgsax/download/file_io.txt /gustav > Can anyone tell me (preferably with sample code, if possible), what > is the fastest way to import a .txt file into a predefined table in > access via Visual Basic 6. From paul.hartland at fsmail.net Wed Jan 28 04:07:31 2004 From: paul.hartland at fsmail.net (paul.hartland at fsmail.net) Date: Wed, 28 Jan 2004 11:07:31 +0100 (CET) Subject: [AccessD] Text File Into Access Using Visual Basic 6 Message-ID: <25701656.1075284451100.JavaMail.www@wwinf3005> Thanks Gustav Freeserve AnyTime - HALF PRICE for the first 3 months - Save ?7.50 a month www.freeserve.com/anytime From deanellis at iprimus.com.au Wed Jan 28 06:35:31 2004 From: deanellis at iprimus.com.au (Dean Ellis) Date: Wed, 28 Jan 2004 23:35:31 +1100 (AUS Eastern Daylight Time) Subject: [AccessD] Decompile Message-ID: <4017AC93.000011.80279@jedel> Hi All, My good friend Darren Dick introduced me to this site. I was wondering if any one knows anything about "Decompiling" Databases? I know how to compact the db and compile the code. But I understand you can decompile as well. Some direction on how to get this up and running would be great Cheers Dean From stephen at bondsoftware.co.nz Wed Jan 28 06:38:14 2004 From: stephen at bondsoftware.co.nz (Stephen Bond) Date: Thu, 29 Jan 2004 01:38:14 +1300 Subject: [AccessD] Decompile Message-ID: <70F3D727890C784291D8433E9C418F290885B1@server.bondsoftware.co.nz> You're burning the oil late ... Here's a couple of sites to start you off: http://www.trigeminal.com/usenet/usenet004.asp?1033 http://www.granite.ab.ca/access/decompile.htm Stephen Bond Otatara, New Zealand > -----Original Message----- > From: Dean Ellis [mailto:deanellis at iprimus.com.au] > Sent: Thursday, 29 January 2004 1:36 a.m. > To: AccessD > Subject: [AccessD] Decompile > > > Hi All, > > > > My good friend Darren Dick introduced me to this site. I was > wondering if > any one knows anything about "Decompiling" Databases? I know > how to compact > the db and compile the code. But I understand you can > decompile as well. > > > > Some direction on how to get this up and running would be great > > > > Cheers > > > > Dean > From Mark.Mitsules at ngc.com Wed Jan 28 06:40:07 2004 From: Mark.Mitsules at ngc.com (Mitsules, Mark S. (Newport News)) Date: Wed, 28 Jan 2004 07:40:07 -0500 Subject: [AccessD] Decompile Message-ID: Dean, Courtesy of Stuart Sanders... Mark **************** Thinking about this I thought of a cool (in my view) way of handling this, that is probably what Susan was talking about. Now I'm wondering why I didn't do this years ago. 1. Start Windows Explorer, 2. Select Tools and then Folder Options... 3. Click on the File Types Tab 4. Find the MDB file type 5. Click Advanced 6. Chances are there are 2 options. Open in bold font (denoting default) and New. You can pretty much add what you want here. For decompile, 7. Click New 8. Under action type Decompile 9. Under Application used to perform action type the equivalent for your install: "C:\Program Files\Microsoft Office\Office10\MSACCESS.EXE" /decompile "%1" 10 Click OK and exit out And wallah! You now right click an mdb and have the context option of decompiling it. But it doesn't stop there. For those of us juggling multiple versions of Access you can setup a right click option to open in each. Eg Open in 97 Open in 2000 Open in XP And make sure the path points to the correct version of access. Cheers Stuart **************** -----Original Message----- From: Dean Ellis [mailto:deanellis at iprimus.com.au] Sent: Wednesday, January 28, 2004 7:36 AM To: AccessD Subject: [AccessD] Decompile _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From Erwin.Craps at ithelps.be Wed Jan 28 07:49:00 2004 From: Erwin.Craps at ithelps.be (Erwin Craps - IT Helps) Date: Wed, 28 Jan 2004 14:49:00 +0100 Subject: [AccessD] Decompile Message-ID: <46B976F2B698FF46A4FE7636509B22DF03D191@stekelbes.ithelps.local> Mark YOU ARE GREAT!!! Stupid thing of me is, I very well know this... Just never tought of actualy dooing this for Access Erwin... -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Mitsules, Mark S. (Newport News) Sent: Wednesday, January 28, 2004 1:40 PM To: 'Access Developers discussion and problem solving' Subject: RE: [AccessD] Decompile Dean, Courtesy of Stuart Sanders... Mark **************** Thinking about this I thought of a cool (in my view) way of handling this, that is probably what Susan was talking about. Now I'm wondering why I didn't do this years ago. 1. Start Windows Explorer, 2. Select Tools and then Folder Options... 3. Click on the File Types Tab 4. Find the MDB file type 5. Click Advanced 6. Chances are there are 2 options. Open in bold font (denoting default) and New. You can pretty much add what you want here. For decompile, 7. Click New 8. Under action type Decompile 9. Under Application used to perform action type the equivalent for your install: "C:\Program Files\Microsoft Office\Office10\MSACCESS.EXE" /decompile "%1" 10 Click OK and exit out And wallah! You now right click an mdb and have the context option of decompiling it. But it doesn't stop there. For those of us juggling multiple versions of Access you can setup a right click option to open in each. Eg Open in 97 Open in 2000 Open in XP And make sure the path points to the correct version of access. Cheers Stuart **************** -----Original Message----- From: Dean Ellis [mailto:deanellis at iprimus.com.au] Sent: Wednesday, January 28, 2004 7:36 AM To: AccessD Subject: [AccessD] Decompile _______________________________________________ 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 From Mark.Mitsules at ngc.com Wed Jan 28 08:02:06 2004 From: Mark.Mitsules at ngc.com (Mitsules, Mark S. (Newport News)) Date: Wed, 28 Jan 2004 09:02:06 -0500 Subject: [AccessD] Decompile Message-ID: Erwin, "Greatness?" I take no credit in the solution...only in my archiving "skills". My ListServ folders are grouped by conversation topic. Dean's question contained the exact same subject line as the thread from August 2003. That is how I came across it so quickly, Dean's question bubbled to the top of the old thread and was seven messages above the solution provided by Stuart. Mark -----Original Message----- From: Erwin Craps - IT Helps [mailto:Erwin.Craps at ithelps.be] Sent: Wednesday, January 28, 2004 8:49 AM To: Access Developers discussion and problem solving Subject: RE: [AccessD] Decompile Mark YOU ARE GREAT!!! Stupid thing of me is, I very well know this... Just never tought of actualy dooing this for Access Erwin... -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Mitsules, Mark S. (Newport News) Sent: Wednesday, January 28, 2004 1:40 PM To: 'Access Developers discussion and problem solving' Subject: RE: [AccessD] Decompile Dean, Courtesy of Stuart Sanders... Mark **************** Thinking about this I thought of a cool (in my view) way of handling this, that is probably what Susan was talking about. Now I'm wondering why I didn't do this years ago. 1. Start Windows Explorer, 2. Select Tools and then Folder Options... 3. Click on the File Types Tab 4. Find the MDB file type 5. Click Advanced 6. Chances are there are 2 options. Open in bold font (denoting default) and New. You can pretty much add what you want here. For decompile, 7. Click New 8. Under action type Decompile 9. Under Application used to perform action type the equivalent for your install: "C:\Program Files\Microsoft Office\Office10\MSACCESS.EXE" /decompile "%1" 10 Click OK and exit out And wallah! You now right click an mdb and have the context option of decompiling it. But it doesn't stop there. For those of us juggling multiple versions of Access you can setup a right click option to open in each. Eg Open in 97 Open in 2000 Open in XP And make sure the path points to the correct version of access. Cheers Stuart **************** -----Original Message----- From: Dean Ellis [mailto:deanellis at iprimus.com.au] Sent: Wednesday, January 28, 2004 7:36 AM To: AccessD Subject: [AccessD] Decompile _______________________________________________ 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 _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From Erwin.Craps at ithelps.be Wed Jan 28 08:22:42 2004 From: Erwin.Craps at ithelps.be (Erwin Craps - IT Helps) Date: Wed, 28 Jan 2004 15:22:42 +0100 Subject: [AccessD] Decompile Message-ID: <46B976F2B698FF46A4FE7636509B22DF03D192@stekelbes.ithelps.local> Mark, I stick to what I just said, but for a different reason. YOU ARE SO GREAT!!! By the way, if more than one access it is a bit more complicated, I just experianced. The last Access version runned connects the MDB to that version. Then you loose the Decompile shells until that version is back the default. So you have to do this n time n version of access. Since I have A2K0, A2K2 and A2K3 on my pc, 3 times. I exported the registrey keys in a file for the tree access version in to one file. Everyone can download it from http://www.ithelps.be/temp/KeyForAccessDecompileShell.reg (watch for wrapping) Please, do not import the key straigtaway (by double clicking it). Edit it first and check if your access paths and versions match mine. The file says Access 2K0 in ..\Microsoft Office 2K\... Access 2K2 in ..\Microsoft Office\... Access 2K3 in ..\Microsoft Office 2003\... And ofcourse if I didn't put any trojan horses in it... Erwin -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Mitsules, Mark S. (Newport News) Sent: Wednesday, January 28, 2004 3:02 PM To: 'Access Developers discussion and problem solving' Subject: RE: [AccessD] Decompile Erwin, "Greatness?" I take no credit in the solution...only in my archiving "skills". My ListServ folders are grouped by conversation topic. Dean's question contained the exact same subject line as the thread from August 2003. That is how I came across it so quickly, Dean's question bubbled to the top of the old thread and was seven messages above the solution provided by Stuart. Mark -----Original Message----- From: Erwin Craps - IT Helps [mailto:Erwin.Craps at ithelps.be] Sent: Wednesday, January 28, 2004 8:49 AM To: Access Developers discussion and problem solving Subject: RE: [AccessD] Decompile Mark YOU ARE GREAT!!! Stupid thing of me is, I very well know this... Just never tought of actualy dooing this for Access Erwin... -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Mitsules, Mark S. (Newport News) Sent: Wednesday, January 28, 2004 1:40 PM To: 'Access Developers discussion and problem solving' Subject: RE: [AccessD] Decompile Dean, Courtesy of Stuart Sanders... Mark **************** Thinking about this I thought of a cool (in my view) way of handling this, that is probably what Susan was talking about. Now I'm wondering why I didn't do this years ago. 1. Start Windows Explorer, 2. Select Tools and then Folder Options... 3. Click on the File Types Tab 4. Find the MDB file type 5. Click Advanced 6. Chances are there are 2 options. Open in bold font (denoting default) and New. You can pretty much add what you want here. For decompile, 7. Click New 8. Under action type Decompile 9. Under Application used to perform action type the equivalent for your install: "C:\Program Files\Microsoft Office\Office10\MSACCESS.EXE" /decompile "%1" 10 Click OK and exit out And wallah! You now right click an mdb and have the context option of decompiling it. But it doesn't stop there. For those of us juggling multiple versions of Access you can setup a right click option to open in each. Eg Open in 97 Open in 2000 Open in XP And make sure the path points to the correct version of access. Cheers Stuart **************** -----Original Message----- From: Dean Ellis [mailto:deanellis at iprimus.com.au] Sent: Wednesday, January 28, 2004 7:36 AM To: AccessD Subject: [AccessD] Decompile _______________________________________________ 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 _______________________________________________ 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 From awithing at twcny.rr.com Wed Jan 28 08:38:12 2004 From: awithing at twcny.rr.com (augusta) Date: Wed, 28 Jan 2004 09:38:12 -0500 Subject: [AccessD] Vonage In-Reply-To: Message-ID: <200401281438.i0SEcElL005870@ms-smtp-03.nyroc.rr.com> John do you use Time Warner Central NY RR? > -----Original Message----- > From: accessd-bounces at databaseadvisors.com [mailto:accessd- > bounces at databaseadvisors.com] On Behalf Of John W. Colby > Sent: Tuesday, January 27, 2004 6:10 PM > To: Access Developers discussion and problem solving > Subject: RE: [AccessD] Vonage > > ******************************************************************* > Item Quantity Unit Subtotal > ******************************************************************* > Motorola Device 1 $0.00 $0.00 > Area Code: 315 - Syracuse 1 $0.00 $0.00 > Activation Fee 1 $29.99 $29.99 > *Residential Basic 500 1 $14.99 $14.99 > ----------------------------------- > > State Sales Tax: $0.00 > Federal Excise Tax: $1.35 > Regulatory Recovery Fee:$1.50 > Shipping: $9.95 > Total: $57.78 > > * Monthly Recurring Charge. > ******************************************************************* > > This does not include a charge of approximately $30 which you will be > charged for if you do not return the modem at the end of service. > > Now understand that the telephone company charged me a $60 activation fee > when I moved from one location to another location down the road 1/2 mile. > All just to change my billing from one jack to another in a switchboard. > Hmmm... > > In addition, ATM the Vonage $14.99 is a flat monthly fee, no taxes or > other > regulatory charges added. My land line STARTS at 11.53 for flat residence > line, plus 5.78 federal subscriber line charge, plus 1.43 Connecticut > sales > tax, plus .73 federal tax plus .20 E911 surcharge, plus .05 Connecticut > Service Fund, plus .39 number portability charge, plus .56 Universal > Service > fund (local), plus .14 Universal Service Fund (Long Distance). Talk about > nickel and dimeing you to death! > > I NEVER get out with under $25 on a "11.50" phone line, and with all the > "short" long distance, I rarely get out for under ~$35 WITHOUT long > distance, which is $.10/minute. For a couple of years I have used a > prepaid > calling card which I programmed into my phone to get my long distance for > $.039 per minute (slowly inching up, now $.045). > > Of course I also have to pay for my blazing fast internet connection, > which > is a ridiculous $45 / month. Makes the $15 ($25/$35) phone bill seem > rather > inconsequential. But I could never go back to dialup so since I have this > blazing fast internet, I might as well piggyback my phone off of it. > > I am pleased to say it is working great so far. > > John W. Colby > www.ColbyConsulting.com > > -----Original Message----- > From: accessd-bounces at databaseadvisors.com > [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Christopher > Hawkins > Sent: Tuesday, January 27, 2004 5:23 PM > To: accessd at databaseadvisors.com > Subject: RE: [AccessD] Vonage > > > $15/month sounds great, but what about setup fees or equipment > expenses? What's the "out the door" price look like? > > -Christopher- > > ---- Original Message ---- > From: JColby at dispec.com > To: accessd at databaseadvisors.com, > Subject: RE: [AccessD] Vonage > Date: Tue, 27 Jan 2004 15:05:07 -0500 > > >I received the phonemodem last night. Plugged it in (behind my > >router for > >those interested), waited 5 minutes, then picked up the receiver and > >made a > >call. Extremely easy to set up. > > > >The sound so far is crystal clear, no clicks / pops or echoes. I > >have a > >brand new ATT 2ghz cordless phone system which I plugged in to it. > >I can't > >tell the difference between this and the landline. > > > >I haven't done any heavy duty uploads / downloads though I will be > >doing > >some testing in the next few days. > > > >I went with the $15 / month package for 500 total minutes - local > >and long > >distance, with anything after that billed at $.039 / minute. If my > >useage > >averages more than 500 minutes I'll move up to the $25 package with > >unlimited local and 500 long distance minutes. Given my useage > >patterns I > >may very well end up with a $15 / month phone including long > >distance. > > > >So far so good. > > > >John W. Colby > >The database guy > > > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com From carbonnb at sympatico.ca Wed Jan 28 08:47:30 2004 From: carbonnb at sympatico.ca (Bryan Carbonnell) Date: Wed, 28 Jan 2004 9:47:30 -0500 Subject: [AccessD] Vonage Message-ID: <20040128144735.IDCX16454.tomts6-srv.bellnexxia.net@smtp.bellnexxia.net> OK folks, While VoIP may be an interesting technology, its discussion does not belong here on AccessD. If you want to continue the discussion, please do so over on DBA-Tech. Thanks, You loving Listmater.... -- Bryan Carbonnell - carbonnb at sympatico.ca Unfortunately common sense isn't so common! From jwcolby at colbyconsulting.com Wed Jan 28 09:01:15 2004 From: jwcolby at colbyconsulting.com (John W. Colby) Date: Wed, 28 Jan 2004 10:01:15 -0500 Subject: [AccessD] Vonage In-Reply-To: <200401281438.i0SEcElL005870@ms-smtp-03.nyroc.rr.com> Message-ID: No, mine is Cable Vision - Optimum Online. In fact what you see in the bill is a mistake I made (yes, I do occasionally make a mistake ;-). You can ask for a phone number in any area code. I initially asked for one in Syracuse since I have a sister-in-law living there and it would be local to her. What this meant however is that everyone here where I live (Connecticut) would have to pay long distance to reach me. Uhh... brain farts... so I changed my number back to a local (to my residence) Connecticut number. In fact, for $5 each / month you can get a additional "virtual" numbers so that you could get a number in the city where your mother lives (for example) that would be a local call to her. Or you can get a second "business" number that rings on the same phone. And of course, you can also get 800 numbers. AFAICT you could even get a second phone modem box and plug a second phone into it to have two completely separate (home / business?) phone systems running over the internet connection. That would be perfect for the SOHO that needs an inexpensive business phone completely separate from the home phone. This is pretty cool stuff. John W. Colby www.ColbyConsulting.com -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of augusta Sent: Wednesday, January 28, 2004 9:38 AM To: 'Access Developers discussion and problem solving' Subject: RE: [AccessD] Vonage John do you use Time Warner Central NY RR? > -----Original Message----- > From: accessd-bounces at databaseadvisors.com [mailto:accessd- > bounces at databaseadvisors.com] On Behalf Of John W. Colby > Sent: Tuesday, January 27, 2004 6:10 PM > To: Access Developers discussion and problem solving > Subject: RE: [AccessD] Vonage > > ******************************************************************* > Item Quantity Unit Subtotal > ******************************************************************* > Motorola Device 1 $0.00 $0.00 > Area Code: 315 - Syracuse 1 $0.00 $0.00 > Activation Fee 1 $29.99 $29.99 > *Residential Basic 500 1 $14.99 $14.99 > ----------------------------------- > > State Sales Tax: $0.00 > Federal Excise Tax: $1.35 > Regulatory Recovery Fee:$1.50 > Shipping: $9.95 > Total: $57.78 > > * Monthly Recurring Charge. > ******************************************************************* > > This does not include a charge of approximately $30 which you will be > charged for if you do not return the modem at the end of service. > > Now understand that the telephone company charged me a $60 activation fee > when I moved from one location to another location down the road 1/2 mile. > All just to change my billing from one jack to another in a switchboard. > Hmmm... > > In addition, ATM the Vonage $14.99 is a flat monthly fee, no taxes or > other > regulatory charges added. My land line STARTS at 11.53 for flat residence > line, plus 5.78 federal subscriber line charge, plus 1.43 Connecticut > sales > tax, plus .73 federal tax plus .20 E911 surcharge, plus .05 Connecticut > Service Fund, plus .39 number portability charge, plus .56 Universal > Service > fund (local), plus .14 Universal Service Fund (Long Distance). Talk about > nickel and dimeing you to death! > > I NEVER get out with under $25 on a "11.50" phone line, and with all the > "short" long distance, I rarely get out for under ~$35 WITHOUT long > distance, which is $.10/minute. For a couple of years I have used a > prepaid > calling card which I programmed into my phone to get my long distance for > $.039 per minute (slowly inching up, now $.045). > > Of course I also have to pay for my blazing fast internet connection, > which > is a ridiculous $45 / month. Makes the $15 ($25/$35) phone bill seem > rather > inconsequential. But I could never go back to dialup so since I have this > blazing fast internet, I might as well piggyback my phone off of it. > > I am pleased to say it is working great so far. > > John W. Colby > www.ColbyConsulting.com From Helmut.E.Kotsch at t-online.de Wed Jan 28 09:04:52 2004 From: Helmut.E.Kotsch at t-online.de (Helmut Kotsch) Date: Wed, 28 Jan 2004 16:04:52 +0100 Subject: AW: [AccessD] Concatenated stLinkCritria produces Type mismatcherror. In-Reply-To: <2F8793082E00D4119A1700B0D0216BF8022277CF@main2.marlow.com> Message-ID: Drew, thanks for your effort, appreciate it very much. Very good explanation. Think I have to reread it once and a while to keep it in mind. Helmut -----Urspr?ngliche Nachricht----- Von: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]Im Auftrag von DWUTKA at marlow.com Gesendet: Mittwoch, 28. Januar 2004 02:22 An: accessd at databaseadvisors.com Betreff: RE: [AccessD] Concatenated stLinkCritria produces Type mismatcherror. Let's see if I can break it down for you a bit. Double quotes OR single quotes are a string delimiter. Which means, that if either starts a string, that same character has to end the string. Double quotes is usually the one used (like in VBA, a single quote on it's own comments out a line....). So, when building a string, you have nothing to worry about, UNLESS you need to incorporate the delimiter into the string itself. So, if you want: Let's test this. "Let's test this." is the correct string. There is a single quote, but the delimiter isn't used within the string. If you want: Susie said, "I want chocolate ice cream!". Then it get's interesting. However, to represent a double quote, within a string delimited by double quotes, you just put two of them together, so, "Susie said, ""I want chocolate ice cream!""." is the correct string representation. Once you understand the doubling of the delimiter concept, the rest isn't to hard to figure out. So far I've only shown 'full' strings. If you need to put a string together from peices, the SAME rule applies, even though it may look different. If you want to include the dilimiter, you double it. So, if you have : Look for "something". where something is a variable, you would use this: "Look for """ & strSomething & """." Notice, that you have 3 parts to this string. The first part starts and ends with the delimiter ("). The last bit of the first part is a doubling of the double quote, then one more double quote to end the string. (So the delimiter is at the beginning and end of the 'string', and again, the doubling rule puts the delimiter within the string itself....because it's at the end of the segment, there are three in a row, but just remember, that's a double 'delimiter', followed by the delimiter itself...thus three in a row.) The second part is a variable, and is joined to the other parts with the ampersand. The last part, three double quotes, period, double quote, is the delimiter, a doubled delimiter (to represent it in the string on it's own), a period, then the closing delimiter. Now, let's say you want: Something"somethingelse" you would do this: strSomething & """" & strSomethingElse & """" Now you see 4 delimiters. Don't get side tracked. That is really an opening delimiter, the 'doubled' delimiter, and a closing delimiter. So if you saw """""", that produces a string of : "" (open delimiter, 2 doubled delimiters, and a closing delimiter....thus 6 all together, producing 2 double quotes for the contents of the string.) Does that all make sense? Just remember that to represent a delimiter within the string itself, you double the delimiter. Now, not to confuse the issue, but if you look at it even deeper, there is a perfectly logical explanation on how/why this system was developed. Numbers and other variable types are all represented by a specific number of bytes. To you and me 10,300 is 10,300, but to the email program, it's a chr(49), chr(48), chr(44), etc. When I put 10300 in code, the compiler changes the string into 4 bytes (if I am using a long integer variable type). However, a string can be any length (I believe the maximum number of characters for a string in VB/VBA is 2 million, but not positive on that. Since the length is variable, the code has to know where the string starts, and where the string stops, so it knows how much memory it is going to use (since in ASCII, each character takes up 1 byte, and in Unicode they take up 2 bytes.). Because of this, the code needs to know where the string starts and where it stops, so it uses a 'delimiter'. Quite frankly, the reason double quotes seem so difficult to put into strings is because they chose a delimiter normally used within a string. If they had used something like chr(150), which isn't 'typable', it would have been easier to make strings, because when are you going to use chr(150) in normal text, however, it would make looking at most strings hard to see for a programmer. Even if they had used a non-typable character, they couldn't exclude the fact that someone MAY want to use that within the string itself. Thus, no matter what delimiter they were going to use, they had to provide a method of letting that delimiter fall within the string it was delimiting. To do that, they took the double approach. If the code finds the end delimiter, and finds it again, as the next character, it knows that the string isn't REALLY over, because it's been doubled, thus the code simply puts the delimiter within memory as part of the string itself. If it finds the end delimiter, and anything BUT the delimiter afterwards, then it knows it has found the end of that string. Make sense? Drew -----Original Message----- From: Helmut.E.Kotsch at t-online.de [mailto:Helmut.E.Kotsch at t-online.de] Sent: Tuesday, January 27, 2004 6:23 PM To: Access Developers discussion and problem solving Subject: AW: [AccessD] Concatenated stLinkCritria produces Type mismatcherror. Charlotte you are great. Thank you very much. Here I'm sitting at midnight in Germany defining my problem and there you come back within minutes with a workable solution. What is the alternative to using multiple double quotes? (I don't like them either) Where in the world would someone learn / read about the solution you provided. Even though it works, I don't understand it. To be honest, this whole "quotes syntax" (single and double) is a nightmare to me. Again, thanks a lot. Regards and have a nice day. Helmut Kotsch (Helmut.E.Kotsch at t-online.de) -----Ursprungliche Nachricht----- Von: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]Im Auftrag von Charlotte Foust Gesendet: Mittwoch, 28. Januar 2004 00:49 An: Access Developers discussion and problem solving Betreff: RE: [AccessD] Concatenated stLinkCritria produces Type mismatcherror. I don't like to use multiple double quotes like that because it's so hard to read. Your problem is in this line: stLinkCriteria = "[KundenName]=" & "'" & Me![KundenName] & "'" And "[VerbandNr]=" & Me![VerbandNr] Which should be: stLinkCriteria = "[KundenName]=" & "'" & Me![KundenName] & "'" & " And [VerbandNr]=" & Me![VerbandNr] Charlotte Foust -----Original Message----- From: Helmut Kotsch [mailto:Helmut.E.Kotsch at t-online.de] Sent: Tuesday, January 27, 2004 3:11 PM To: accessd at databaseadvisors.com Subject: [AccessD] Concatenated stLinkCritria produces Type mismatch error. Hi, I am trying to open a form where 2 conditions have to be met. When only one conditon (as shown in code below as sample#1 and sample#2) is set than it works ok. Sample#1 ==> OK Dim stDocName As String Dim stLinkCriteria As String stDocName = "VERDI-Kunden" stLinkCriteria = "[KundenName]=" & "'" & Me![KundenName] & "'" DoCmd.OpenForm stDocName, , , stLinkCriteria Sample#2 ==> OK Dim stDocName As String Dim stLinkCriteria As String stDocName = "VERDI-Kunden" stLinkCriteria = "[VerbandNr]=" & Me![VerbandNr] DoCmd.OpenForm stDocName, , , stLinkCriteria However when concatenating both conditions as shown in the following code I get a "Type mismatch" error. Dim stDocName As String Dim stLinkCriteria As String stDocName = "VERDI-Kunden" stLinkCriteria = "[KundenName]=" & "'" & Me![KundenName] & "'" And "[VerbandNr]=" & Me![VerbandNr] DoCmd.OpenForm stDocName, , , stLinkCriteria Hope someone can help before this one drives me grazy. Helmut Kotsch _______________________________________________ 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 _______________________________________________ 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 From jwcolby at colbyconsulting.com Wed Jan 28 09:20:31 2004 From: jwcolby at colbyconsulting.com (John W. Colby) Date: Wed, 28 Jan 2004 10:20:31 -0500 Subject: [AccessD] Vonage In-Reply-To: <20040128144735.IDCX16454.tomts6-srv.bellnexxia.net@smtp.bellnexxia.net> Message-ID: Right, sorry. It's just been sooooo dead lately I thought I'd brighten things up a bit. ;-) John W. Colby www.ColbyConsulting.com -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Bryan Carbonnell Sent: Wednesday, January 28, 2004 9:47 AM To: accessd at databaseadvisors.com Subject: RE: [AccessD] Vonage OK folks, While VoIP may be an interesting technology, its discussion does not belong here on AccessD. If you want to continue the discussion, please do so over on DBA-Tech. Thanks, You loving Listmater.... -- Bryan Carbonnell - carbonnb at sympatico.ca Unfortunately common sense isn't so common! _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From carbonnb at sympatico.ca Wed Jan 28 09:32:09 2004 From: carbonnb at sympatico.ca (Bryan Carbonnell) Date: Wed, 28 Jan 2004 10:32:09 -0500 Subject: [AccessD] Vonage Message-ID: <20040128153234.WVO16714.tomts27-srv.bellnexxia.net@smtp.bellnexxia.net> > From: "John W. Colby" > Right, sorry. It's just been sooooo dead lately I thought I'd brighten > things up a bit. ;-) That's one of the reasons it was allowed to go on for a week. That and I'm just trying to catch up on my backlog :-)) -- Bryan Carbonnell - carbonnb at sympatico.ca Unfortunately common sense isn't so common! From John.Clark at niagaracounty.com Wed Jan 28 09:38:42 2004 From: John.Clark at niagaracounty.com (John Clark) Date: Wed, 28 Jan 2004 10:38:42 -0500 Subject: [AccessD] Question of process Message-ID: I am beginning a new project. The purpose of this program will be to track indictment cases for the District Attorney's office. My question isn't so much technical, like usual, but rather 'technique'. I'll start with a scenario: Lets say I am a Asst. DA, so I am in the system as such. Then after a couple of years, I go into private practice and become a defense attorney; I may now be in the system as the lawyer for a defendant. Now let's assume that I am assaulted and my attacker is charged, so now I am in this system as a victim of this case. Finally, I cross over to the dark side (I know lawyers are already there), and I am indicted for a crime of my own. I will now be in the system as a defendant, a victim, a defense attorney, and an ADA...these last two, very probably, several times. My situation is that I would like to bring up every instance of a person fitting this description, or similar ones. For Instance a report of the previous example might produce the following: JOHN W CLARK #2001-023 ADA #2001-102 ADA #2001-140 ADA #2002-334 ATTORNEY #2003-153 ATTORNEY #2003-543 VICTIM #2003-654 ATTORNEY #2004-030 DEFENDANT I had originally thought to create a table for the 'types' (i.e. attorney, ADA, victim, etc.), a table with names and personal info, an indictment table, and link these all via a fourth table, but this soon seemed insufficient. The average indictment number will have at least five people connected to it (Defendant, Attorney, ADA, Victim, and Judge), and possibly many more, with multiple victims and/or co-defendants. Am I over thinking this? Would it just be as simple as having a table for each type and searching these tables by indictment number later in the program? I thought that maybe, by typing this out, it would be clearer in my mind, by the time I was done, but I am still fuzzy with it! Thanks for any insight or advise you could give me! John W Clark From jeffrey.demulling at usbank.com Wed Jan 28 09:55:33 2004 From: jeffrey.demulling at usbank.com (jeffrey.demulling at usbank.com) Date: Wed, 28 Jan 2004 09:55:33 -0600 Subject: [AccessD] Question of process Message-ID: Maybe a table like the following: Case Type Name #2001-023 ADA John W. Clark #2001-102 ADA John W. Clark #2001-140 ADA John W. Clark #2002-334 ATTORNEY John W. Clark #2003-153 ATTORNEY John W. Clark #2003-543 VICTIM John W. Clark #2003-654 ATTORNEY John W. Clark #2004-030 DEFENDANT John W. Clark Then maybe when entering the data in the system you have the user input all of the parties to the case and the type of party they are. So the input form would be something like Name: <> Type: <> "John Clark" cc: Sent by: Subject: [AccessD] Question of process accessd-bounces at databasead visors.com 01/28/2004 09:38 AM Please respond to "Access Developers discussion and problem solving" I am beginning a new project. The purpose of this program will be to track indictment cases for the District Attorney's office. My question isn't so much technical, like usual, but rather 'technique'. I'll start with a scenario: Lets say I am a Asst. DA, so I am in the system as such. Then after a couple of years, I go into private practice and become a defense attorney; I may now be in the system as the lawyer for a defendant. Now let's assume that I am assaulted and my attacker is charged, so now I am in this system as a victim of this case. Finally, I cross over to the dark side (I know lawyers are already there), and I am indicted for a crime of my own. I will now be in the system as a defendant, a victim, a defense attorney, and an ADA...these last two, very probably, several times. My situation is that I would like to bring up every instance of a person fitting this description, or similar ones. For Instance a report of the previous example might produce the following: JOHN W CLARK #2001-023 ADA #2001-102 ADA #2001-140 ADA #2002-334 ATTORNEY #2003-153 ATTORNEY #2003-543 VICTIM #2003-654 ATTORNEY #2004-030 DEFENDANT I had originally thought to create a table for the 'types' (i.e. attorney, ADA, victim, etc.), a table with names and personal info, an indictment table, and link these all via a fourth table, but this soon seemed insufficient. The average indictment number will have at least five people connected to it (Defendant, Attorney, ADA, Victim, and Judge), and possibly many more, with multiple victims and/or co-defendants. Am I over thinking this? Would it just be as simple as having a table for each type and searching these tables by indictment number later in the program? I thought that maybe, by typing this out, it would be clearer in my mind, by the time I was done, but I am still fuzzy with it! Thanks for any insight or advise you could give me! John W Clark _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From jwcolby at colbyconsulting.com Wed Jan 28 10:08:09 2004 From: jwcolby at colbyconsulting.com (John W. Colby) Date: Wed, 28 Jan 2004 11:08:09 -0500 Subject: [AccessD] Question of process In-Reply-To: Message-ID: Just off the top of my head: PE_ID Autonumber (of course) ;-) PE_LName text - Person Last Name PE_FName text - Person First Name CT_ID Autonumber - contact type ID CT_Type Text - Type of contact CA_ID Autonumber - Case ID CA_Number text - Case Number CA_OtherStuff - Other fields PECA_ID Autonumber - Person Case ID PECA_IDPE long - Person ID PECA_IDCA long - Case ID PECA_IDCT long - Contact Type The first two tables are your two "main" tables, people and cases. The third is a contact type (Attorney, defendant etc) The fourth is a many-many which relates people and cases with a contact type. Something of that nature anyway. John W. Colby www.ColbyConsulting.com -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of John Clark Sent: Wednesday, January 28, 2004 10:39 AM To: accessd at databaseadvisors.com Subject: [AccessD] Question of process I am beginning a new project. The purpose of this program will be to track indictment cases for the District Attorney's office. My question isn't so much technical, like usual, but rather 'technique'. I'll start with a scenario: Lets say I am a Asst. DA, so I am in the system as such. Then after a couple of years, I go into private practice and become a defense attorney; I may now be in the system as the lawyer for a defendant. Now let's assume that I am assaulted and my attacker is charged, so now I am in this system as a victim of this case. Finally, I cross over to the dark side (I know lawyers are already there), and I am indicted for a crime of my own. I will now be in the system as a defendant, a victim, a defense attorney, and an ADA...these last two, very probably, several times. My situation is that I would like to bring up every instance of a person fitting this description, or similar ones. For Instance a report of the previous example might produce the following: JOHN W CLARK #2001-023 ADA #2001-102 ADA #2001-140 ADA #2002-334 ATTORNEY #2003-153 ATTORNEY #2003-543 VICTIM #2003-654 ATTORNEY #2004-030 DEFENDANT I had originally thought to create a table for the 'types' (i.e. attorney, ADA, victim, etc.), a table with names and personal info, an indictment table, and link these all via a fourth table, but this soon seemed insufficient. The average indictment number will have at least five people connected to it (Defendant, Attorney, ADA, Victim, and Judge), and possibly many more, with multiple victims and/or co-defendants. Am I over thinking this? Would it just be as simple as having a table for each type and searching these tables by indictment number later in the program? I thought that maybe, by typing this out, it would be clearer in my mind, by the time I was done, but I am still fuzzy with it! Thanks for any insight or advise you could give me! John W Clark _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From paul.hartland at fsmail.net Wed Jan 28 03:28:17 2004 From: paul.hartland at fsmail.net (paul.hartland at fsmail.net) Date: Wed, 28 Jan 2004 10:28:17 +0100 (CET) Subject: [AccessD] [dba-VB] Text File Into Access Using Visual Basic 6 Message-ID: <13710544.1075282097676.JavaMail.www@wwinf3005> To all, Can anyone tell me (preferably with sample code, if possible), what is the fastest way to import a .txt file into a predefined table in access via Visual Basic 6. My .txt file contains roughly 365,876 records with two fields ? Barcode, Price. This has to be imported into an Access table also containing two fields Barcode (text), Price (Number, Double, Fixed, 2 decimal places). The .txt file is comma delimited. I?m using Access XP and Visual Basic 6.0 as the front-end. Thanks in advance for any help as, this project needs to be ready for Monday morning Paul Hartland Freeserve AnyTime - HALF PRICE for the first 3 months - Save ?7.50 a month www.freeserve.com/anytime _______________________________________________ dba-VB mailing list dba-VB at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/dba-vb http://www.databaseadvisors.com From gustav at cactus.dk Wed Jan 28 10:17:26 2004 From: gustav at cactus.dk (Gustav Brock) Date: Wed, 28 Jan 2004 17:17:26 +0100 Subject: [AccessD] Question of process In-Reply-To: References: Message-ID: <14532431293.20040128171726@cactus.dk> Hi John One option is to add properties to the persons with "check-in" and "check-out" times, i.e - for each property - when this was assigned and when it was revoked and the type of property for this period. Thus you may have overlapping assignments of properties, temporary assignments and the full log or history of these assignments as well as current status. These properties should have their own properties as needed, some would be which other assignments, if any, each property could (not) coexist with. Following the same route, you could assign addresses, e-mail account, phone no. etc. to the persons; say, when a person moves, invalidate the old address by that date and record the new address to be valid from that date. Again, you'll be able to track a person's addresses over time while maintaining current location. /gustav > I am beginning a new project. The purpose of this program will be to > track indictment cases for the District Attorney's office. My question > isn't so much technical, like usual, but rather 'technique'. > I'll start with a scenario: > Lets say I am a Asst. DA, so I am in the system as such. Then after a > couple of years, I go into private practice and become a defense > attorney; I may now be in the system as the lawyer for a defendant. Now > let's assume that I am assaulted and my attacker is charged, so now I am > in this system as a victim of this case. Finally, I cross over to the > dark side (I know lawyers are already there), and I am indicted for a > crime of my own. I will now be in the system as a defendant, a victim, a > defense attorney, and an ADA...these last two, very probably, several > times. > My situation is that I would like to bring up every instance of a > person fitting this description, or similar ones. For Instance a report > of the previous example might produce the following: > JOHN W CLARK > #2001-023 ADA > #2001-102 ADA > #2001-140 ADA > #2002-334 ATTORNEY > #2003-153 ATTORNEY > #2003-543 VICTIM > #2003-654 ATTORNEY > #2004-030 DEFENDANT > I had originally thought to create a table for the 'types' (i.e. > attorney, ADA, victim, etc.), a table with names and personal info, an > indictment table, and link these all via a fourth table, but this soon > seemed insufficient. The average indictment number will have at least > five people connected to it (Defendant, Attorney, ADA, Victim, and > Judge), and possibly many more, with multiple victims and/or > co-defendants. > Am I over thinking this? Would it just be as simple as having a table > for each type and searching these tables by indictment number later in > the program? > I thought that maybe, by typing this out, it would be clearer in my > mind, by the time I was done, but I am still fuzzy with it! > Thanks for any insight or advise you could give me! > John W Clark From rl_stewart at highstream.net Wed Jan 28 10:56:47 2004 From: rl_stewart at highstream.net (Robert L. Stewart) Date: Wed, 28 Jan 2004 10:56:47 -0600 Subject: [AccessD] Re: Concatenated stLinkCritria produces Type mismatch In-Reply-To: <200401280244.i0S2imm26594@databaseadvisors.com> Message-ID: <5.1.0.14.2.20040128105124.02937368@pop3.highstream.net> Personally, I do not use the criteria on the form. I will base the form on a query. I just change the SQL for the query before opening the form. I use the same technique for reports. After doing it a couple of times, I think you will find it simple. If you need a code sample for the process, I can send it out to the list. Robert At 08:44 PM 1/27/2004 -0600, you wrote: >Date: Wed, 28 Jan 2004 11:03:57 +1000 >From: "Stuart McLachlan" >Subject: RE: [AccessD] Concatenated stLinkCritria produces Type > mismatcher ror. >To: Access Developers discussion and problem solving > >Message-ID: <4017971D.17970.2E2ECEE6 at localhost> >Content-Type: text/plain; charset=US-ASCII > >If it's only once or twice in an app, I also prefer to "avoid stranded >quotes". If there is going to be quite a bit of building such strings, I >prefer to do this: > >Function SQuote(BaseString as String) as String > SQuote = Chr$(39) & BaseString & Chr$(39) >EndFunction > >Function DQuote(BaseString as String) as String > DQuote = Chr$(34) & BaseString & Chr$(34) >EndFunction > > >Then I use: > >stLinkCriteria = "[KundenName]=" & SQuote(Me![KundenName]) & " And >[VerbandNr]=" & Me![VerbandNr] > >or > >stLinkCriteria = "[KundenName]=" & DQuote(Me![KundenName]) & " And >[VerbandNr]=" & Me![VerbandNr] > > > >On 27 Jan 2004 at 18:46, Brett Barabash wrote: > > > Personally, (and this is simply preference, I'm sure others will argue) I > > prefer also avoiding "stranded" quotes, so > > > > stLinkCriteria = "[KundenName]=" & "'" & Me![KundenName] & "'" & " And > > [VerbandNr]=" & Me![VerbandNr] > > > > Becomes: > > > > stLinkCriteria = "[KundenName]='" & Me![KundenName] & "' And > [VerbandNr]=" & > > Me![VerbandNr] > > > > Less string concatenation that way. The only catch is if your code window > > uses a sans serif font like Arial, Tahoma, etc, the quotes tend to mush > > together making my method less readable. Otherwise, I find it much easier > > to debug. > > > > > > -----Original Message----- > > From: Helmut.E.Kotsch at t-online.de [mailto:Helmut.E.Kotsch at t-online.de] > > Sent: Tuesday, January 27, 2004 6:23 PM > > To: Access Developers discussion and problem solving > > Subject: AW: [AccessD] Concatenated stLinkCritria produces Type > > mismatcherror. > > > > > > Charlotte you are great. Thank you very much. Here I'm sitting at midnight > > in Germany defining my problem and there you come back within minutes > with a > > workable solution. > > What is the alternative to using multiple double quotes? (I don't like them > > either) > > Where in the world would someone learn / read about the solution you > > provided. Even though it works, I don't understand it. > > To be honest, this whole "quotes syntax" (single and double) is a nightmare > > to me. > > > > Again, thanks a lot. > > Regards and have a nice day. > > > > Helmut Kotsch > > > > (Helmut.E.Kotsch at t-online.de) > > > > > > -----Ursprungliche Nachricht----- > > Von: accessd-bounces at databaseadvisors.com > > [mailto:accessd-bounces at databaseadvisors.com]Im Auftrag von Charlotte > > Foust > > Gesendet: Mittwoch, 28. Januar 2004 00:49 > > An: Access Developers discussion and problem solving > > Betreff: RE: [AccessD] Concatenated stLinkCritria produces Type > > mismatcherror. > > > > > > I don't like to use multiple double quotes like that because it's so > > hard to read. Your problem is in this line: > > > > stLinkCriteria = "[KundenName]=" & "'" & Me![KundenName] & "'" And > > "[VerbandNr]=" & Me![VerbandNr] > > > > Which should be: > > > > stLinkCriteria = "[KundenName]=" & "'" & Me![KundenName] & "'" & " > > And [VerbandNr]=" & Me![VerbandNr] > > > > Charlotte Foust > > > > -----Original Message----- > > From: Helmut Kotsch [mailto:Helmut.E.Kotsch at t-online.de] > > Sent: Tuesday, January 27, 2004 3:11 PM > > To: accessd at databaseadvisors.com > > Subject: [AccessD] Concatenated stLinkCritria produces Type mismatch > > error. > > > > > > Hi, > > I am trying to open a form where 2 conditions have to be met. When only > > one conditon (as shown in code below as sample#1 and sample#2) is set > > than it works ok. > > > > Sample#1 ==> OK > > > > Dim stDocName As String > > Dim stLinkCriteria As String > > stDocName = "VERDI-Kunden" > > stLinkCriteria = "[KundenName]=" & "'" & Me![KundenName] & "'" > > DoCmd.OpenForm stDocName, , , stLinkCriteria > > > > Sample#2 ==> OK > > > > Dim stDocName As String > > Dim stLinkCriteria As String > > stDocName = "VERDI-Kunden" > > stLinkCriteria = "[VerbandNr]=" & Me![VerbandNr] > > DoCmd.OpenForm stDocName, , , stLinkCriteria > > > > However when concatenating both conditions as shown in the following > > code I get a "Type mismatch" error. > > > > Dim stDocName As String > > Dim stLinkCriteria As String > > stDocName = "VERDI-Kunden" > > stLinkCriteria = "[KundenName]=" & "'" & Me![KundenName] & "'" And > > "[VerbandNr]=" & Me![VerbandNr] > > DoCmd.OpenForm stDocName, , , stLinkCriteria > > > > Hope someone can help before this one drives me grazy. > > > > > > Helmut Kotsch From James at fcidms.com Wed Jan 28 11:14:00 2004 From: James at fcidms.com (James Barash) Date: Wed, 28 Jan 2004 12:14:00 -0500 Subject: [AccessD] [dba-VB] Text File Into Access Using Visual Basic 6 In-Reply-To: Message-ID: Paul: Here is some code I've used. It's modified from some VB.net code but it should work appropriately using ADO. Public sub ImportTextFile(strConnectionString as string, strFilePath as string, strFileName as string, Optional strHeader as string = "NO") Dim cmdTestCommand As ADODB.Command Dim connTestConnection as ADODB.Connection Dim strHeader as string Dim strSQL as string set connTestConnection = new ADODB.Connection connTestConnection.ConnectionString = strConnectionString connTestConnection.Open set cmdTestCommand = new ADODB.command set cmdTestCommand.ActiveConnection = connTestConnection strSQL = "Insert into [" & strTableName & "] Select [BarCode], [Price] FROM [Text;DATABASE=" & strFilePath & ";HDR=" & strHeader & "].[" & strFileName & "]" cmdTestCommand.CommandText = strSQL cmdTestCommand.CommandType = adCmdText cmdTestCommand.Execute , , adExecuteNoRecords connTestConnection.Close set cmdTestCommand = nothing set connTestConnection = nothing End Sub This assumes a file with no header row. If you have a header row, you need to change strHeader = "YES" and the field names in the header need to match those in the table or you need to modify the Insert statement to alias the files field names to match the table field names. You need to supply a string for the Connection String to your mdb file, a string for the Path of the text file and a string for the name of the text file. I left out error checking but certainly you'd want to make sure the files exist first. Also, you need to make sure the text file is properly formatted and all the data matches your table definition. Hope this helps. James Barash -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of paul.hartland at fsmail.net Sent: Wednesday, January 28, 2004 4:28 AM To: dba-vb Cc: accessd Subject: [AccessD] [dba-VB] Text File Into Access Using Visual Basic 6 To all, Can anyone tell me (preferably with sample code, if possible), what is the fastest way to import a .txt file into a predefined table in access via Visual Basic 6. My .txt file contains roughly 365,876 records with two fields ? Barcode, Price. This has to be imported into an Access table also containing two fields Barcode (text), Price (Number, Double, Fixed, 2 decimal places). The .txt file is comma delimited. I?m using Access XP and Visual Basic 6.0 as the front-end. Thanks in advance for any help as, this project needs to be ready for Monday morning Paul Hartland Freeserve AnyTime - HALF PRICE for the first 3 months - Save ?7.50 a month www.freeserve.com/anytime _______________________________________________ dba-VB mailing list dba-VB at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/dba-vb http://www.databaseadvisors.com _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From jimdettman at earthlink.net Wed Jan 28 11:52:51 2004 From: jimdettman at earthlink.net (Jim Dettman) Date: Wed, 28 Jan 2004 12:52:51 -0500 Subject: [AccessD] Vonage In-Reply-To: <200401281438.i0SEcElL005870@ms-smtp-03.nyroc.rr.com> Message-ID: <> I do. I'm just North of Syracuse in Cicero. Jim Dettman President, Online Computer Services of WNY, Inc. (315) 699-3443 jimdettman at earthlink.net -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of augusta Sent: Wednesday, January 28, 2004 9:38 AM To: 'Access Developers discussion and problem solving' Subject: RE: [AccessD] Vonage John do you use Time Warner Central NY RR? > -----Original Message----- > From: accessd-bounces at databaseadvisors.com [mailto:accessd- > bounces at databaseadvisors.com] On Behalf Of John W. Colby > Sent: Tuesday, January 27, 2004 6:10 PM > To: Access Developers discussion and problem solving > Subject: RE: [AccessD] Vonage > > ******************************************************************* > Item Quantity Unit Subtotal > ******************************************************************* > Motorola Device 1 $0.00 $0.00 > Area Code: 315 - Syracuse 1 $0.00 $0.00 > Activation Fee 1 $29.99 $29.99 > *Residential Basic 500 1 $14.99 $14.99 > ----------------------------------- > > State Sales Tax: $0.00 > Federal Excise Tax: $1.35 > Regulatory Recovery Fee:$1.50 > Shipping: $9.95 > Total: $57.78 > > * Monthly Recurring Charge. > ******************************************************************* > > This does not include a charge of approximately $30 which you will be > charged for if you do not return the modem at the end of service. > > Now understand that the telephone company charged me a $60 activation fee > when I moved from one location to another location down the road 1/2 mile. > All just to change my billing from one jack to another in a switchboard. > Hmmm... > > In addition, ATM the Vonage $14.99 is a flat monthly fee, no taxes or > other > regulatory charges added. My land line STARTS at 11.53 for flat residence > line, plus 5.78 federal subscriber line charge, plus 1.43 Connecticut > sales > tax, plus .73 federal tax plus .20 E911 surcharge, plus .05 Connecticut > Service Fund, plus .39 number portability charge, plus .56 Universal > Service > fund (local), plus .14 Universal Service Fund (Long Distance). Talk about > nickel and dimeing you to death! > > I NEVER get out with under $25 on a "11.50" phone line, and with all the > "short" long distance, I rarely get out for under ~$35 WITHOUT long > distance, which is $.10/minute. For a couple of years I have used a > prepaid > calling card which I programmed into my phone to get my long distance for > $.039 per minute (slowly inching up, now $.045). > > Of course I also have to pay for my blazing fast internet connection, > which > is a ridiculous $45 / month. Makes the $15 ($25/$35) phone bill seem > rather > inconsequential. But I could never go back to dialup so since I have this > blazing fast internet, I might as well piggyback my phone off of it. > > I am pleased to say it is working great so far. > > John W. Colby > www.ColbyConsulting.com > > -----Original Message----- > From: accessd-bounces at databaseadvisors.com > [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Christopher > Hawkins > Sent: Tuesday, January 27, 2004 5:23 PM > To: accessd at databaseadvisors.com > Subject: RE: [AccessD] Vonage > > > $15/month sounds great, but what about setup fees or equipment > expenses? What's the "out the door" price look like? > > -Christopher- > > ---- Original Message ---- > From: JColby at dispec.com > To: accessd at databaseadvisors.com, > Subject: RE: [AccessD] Vonage > Date: Tue, 27 Jan 2004 15:05:07 -0500 > > >I received the phonemodem last night. Plugged it in (behind my > >router for > >those interested), waited 5 minutes, then picked up the receiver and > >made a > >call. Extremely easy to set up. > > > >The sound so far is crystal clear, no clicks / pops or echoes. I > >have a > >brand new ATT 2ghz cordless phone system which I plugged in to it. > >I can't > >tell the difference between this and the landline. > > > >I haven't done any heavy duty uploads / downloads though I will be > >doing > >some testing in the next few days. > > > >I went with the $15 / month package for 500 total minutes - local > >and long > >distance, with anything after that billed at $.039 / minute. If my > >useage > >averages more than 500 minutes I'll move up to the $25 package with > >unlimited local and 500 long distance minutes. Given my useage > >patterns I > >may very well end up with a $15 / month phone including long > >distance. > > > >So far so good. > > > >John W. Colby > >The database guy > > > _______________________________________________ > 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 From bchacc at san.rr.com Wed Jan 28 12:06:43 2004 From: bchacc at san.rr.com (Rocky Smolin - Beach Access Software) Date: Wed, 28 Jan 2004 10:06:43 -0800 Subject: [AccessD] Error 2468 - You can't carry out this action at the present time. Message-ID: <005c01c3e5c9$7cb85bf0$6601a8c0@HAL9002> Dear List: I am getting the following error message on a bound form: Error 2468 - You can't carry out this action at the present time. This form has a sub form linked to the main form by the main form's primary key. (Main form is P.O. Header, subform is P.O. Detail). I get this error if I try to delete two records in a row. DoCmd.SetWarnings False DoCmd.DoMenuItem acFormBar, acEditMenu, 8, , acMenuVer70 DoCmd.DoMenuItem acFormBar, acEditMenu, 6, , acMenuVer70 DoCmd.SetWarnings True I also get this error after I try to add a record. The problem started because I wanted to get the last PO in the file, add one to the PO number, and put the prefix and the new PO number ito the new record: DoCmd.GoToRecord , , acNewRec 'If rstPOHeader.RecordCount <> 0 Then ' rstPOHeader.MoveLast ' Me.fldPOPrefix = Nz(rstPOHeader!fldPOPrefix) ' If IsNumeric(rstPOHeader!fldPONumber) Then ' Me.fldPONumber = rstPOHeader!fldPONumber + 1 ' fldPOOrderDate.SetFocus ' Else ' Me.fldPONumber.SetFocus ' End If 'End If 'If Nz(Me.fldPOPrefix) = "" And Nz(rstPOHeader!fldPOPrefix) = "" Then _ Me.fldPOPrefix.SetFocus Right now the code is commented out. If I uncomment the two lines: ' rstPOHeader.MoveLast ' Me.fldPOPrefix = Nz(rstPOHeader!fldPOPrefix) I get the error when I try to save: DoCmd.DoMenuItem acFormBar, acRecordsMenu, acSaveRecord, , acMenuVer70 I checked the web and there is nothing. Has anyone encountered this before? Thanks and regards, Rocky Smolin Beach Access Software From jwcolby at colbyconsulting.com Wed Jan 28 12:11:47 2004 From: jwcolby at colbyconsulting.com (John W. Colby) Date: Wed, 28 Jan 2004 13:11:47 -0500 Subject: [AccessD] Vonage In-Reply-To: Message-ID: We should have lunch some time. My Sister-In-Law lives in Syracuse and we get over there quite often (in good weather). John W. Colby www.ColbyConsulting.com -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Jim Dettman Sent: Wednesday, January 28, 2004 12:53 PM To: Access Developers discussion and problem solving Subject: RE: [AccessD] Vonage <> I do. I'm just North of Syracuse in Cicero. Jim Dettman President, Online Computer Services of WNY, Inc. (315) 699-3443 jimdettman at earthlink.net -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of augusta Sent: Wednesday, January 28, 2004 9:38 AM To: 'Access Developers discussion and problem solving' Subject: RE: [AccessD] Vonage John do you use Time Warner Central NY RR? > -----Original Message----- > From: accessd-bounces at databaseadvisors.com [mailto:accessd- > bounces at databaseadvisors.com] On Behalf Of John W. Colby > Sent: Tuesday, January 27, 2004 6:10 PM > To: Access Developers discussion and problem solving > Subject: RE: [AccessD] Vonage > > ******************************************************************* > Item Quantity Unit Subtotal > ******************************************************************* > Motorola Device 1 $0.00 $0.00 > Area Code: 315 - Syracuse 1 $0.00 $0.00 > Activation Fee 1 $29.99 $29.99 > *Residential Basic 500 1 $14.99 $14.99 > ----------------------------------- > > State Sales Tax: $0.00 > Federal Excise Tax: $1.35 > Regulatory Recovery Fee:$1.50 > Shipping: $9.95 > Total: $57.78 > > * Monthly Recurring Charge. > ******************************************************************* > > This does not include a charge of approximately $30 which you will be > charged for if you do not return the modem at the end of service. > > Now understand that the telephone company charged me a $60 activation fee > when I moved from one location to another location down the road 1/2 mile. > All just to change my billing from one jack to another in a switchboard. > Hmmm... > > In addition, ATM the Vonage $14.99 is a flat monthly fee, no taxes or > other > regulatory charges added. My land line STARTS at 11.53 for flat residence > line, plus 5.78 federal subscriber line charge, plus 1.43 Connecticut > sales > tax, plus .73 federal tax plus .20 E911 surcharge, plus .05 Connecticut > Service Fund, plus .39 number portability charge, plus .56 Universal > Service > fund (local), plus .14 Universal Service Fund (Long Distance). Talk about > nickel and dimeing you to death! > > I NEVER get out with under $25 on a "11.50" phone line, and with all the > "short" long distance, I rarely get out for under ~$35 WITHOUT long > distance, which is $.10/minute. For a couple of years I have used a > prepaid > calling card which I programmed into my phone to get my long distance for > $.039 per minute (slowly inching up, now $.045). > > Of course I also have to pay for my blazing fast internet connection, > which > is a ridiculous $45 / month. Makes the $15 ($25/$35) phone bill seem > rather > inconsequential. But I could never go back to dialup so since I have this > blazing fast internet, I might as well piggyback my phone off of it. > > I am pleased to say it is working great so far. > > John W. Colby > www.ColbyConsulting.com > > -----Original Message----- > From: accessd-bounces at databaseadvisors.com > [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Christopher > Hawkins > Sent: Tuesday, January 27, 2004 5:23 PM > To: accessd at databaseadvisors.com > Subject: RE: [AccessD] Vonage > > > $15/month sounds great, but what about setup fees or equipment > expenses? What's the "out the door" price look like? > > -Christopher- > > ---- Original Message ---- > From: JColby at dispec.com > To: accessd at databaseadvisors.com, > Subject: RE: [AccessD] Vonage > Date: Tue, 27 Jan 2004 15:05:07 -0500 > > >I received the phonemodem last night. Plugged it in (behind my > >router for > >those interested), waited 5 minutes, then picked up the receiver and > >made a > >call. Extremely easy to set up. > > > >The sound so far is crystal clear, no clicks / pops or echoes. I > >have a > >brand new ATT 2ghz cordless phone system which I plugged in to it. > >I can't > >tell the difference between this and the landline. > > > >I haven't done any heavy duty uploads / downloads though I will be > >doing > >some testing in the next few days. > > > >I went with the $15 / month package for 500 total minutes - local > >and long > >distance, with anything after that billed at $.039 / minute. If my > >useage > >averages more than 500 minutes I'll move up to the $25 package with > >unlimited local and 500 long distance minutes. Given my useage > >patterns I > >may very well end up with a $15 / month phone including long > >distance. > > > >So far so good. > > > >John W. Colby > >The database guy > > > _______________________________________________ > 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 _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From ranthony at wrsystems.com Wed Jan 28 12:31:01 2004 From: ranthony at wrsystems.com (Randall Anthony) Date: Wed, 28 Jan 2004 13:31:01 -0500 Subject: [AccessD] Error 2468 - You can't carry out this action at the present time. Message-ID: <5F21A4E8B8DD734992EF9E70AC9D3064128A0E@mail2.wrsystems.com> Right off the top of my head, it has to do with the movefirst, movelast. I ran into this when converting A97 to A2K. Code worked in A97, not A2K and M$ said this was designed behavior. I'll try to find the article. -----Original Message----- From: Rocky Smolin - Beach Access Software [mailto:bchacc at san.rr.com] Sent: Wednesday, January 28, 2004 1:07 PM To: AccessD at databaseadvisors.com Subject: [AccessD] Error 2468 - You can't carry out this action at the present time. Dear List: I am getting the following error message on a bound form: Error 2468 - You can't carry out this action at the present time. This form has a sub form linked to the main form by the main form's primary key. (Main form is P.O. Header, subform is P.O. Detail). I get this error if I try to delete two records in a row. DoCmd.SetWarnings False DoCmd.DoMenuItem acFormBar, acEditMenu, 8, , acMenuVer70 DoCmd.DoMenuItem acFormBar, acEditMenu, 6, , acMenuVer70 DoCmd.SetWarnings True I also get this error after I try to add a record. The problem started because I wanted to get the last PO in the file, add one to the PO number, and put the prefix and the new PO number ito the new record: DoCmd.GoToRecord , , acNewRec 'If rstPOHeader.RecordCount <> 0 Then ' rstPOHeader.MoveLast ' Me.fldPOPrefix = Nz(rstPOHeader!fldPOPrefix) ' If IsNumeric(rstPOHeader!fldPONumber) Then ' Me.fldPONumber = rstPOHeader!fldPONumber + 1 ' fldPOOrderDate.SetFocus ' Else ' Me.fldPONumber.SetFocus ' End If 'End If 'If Nz(Me.fldPOPrefix) = "" And Nz(rstPOHeader!fldPOPrefix) = "" Then _ Me.fldPOPrefix.SetFocus Right now the code is commented out. If I uncomment the two lines: ' rstPOHeader.MoveLast ' Me.fldPOPrefix = Nz(rstPOHeader!fldPOPrefix) I get the error when I try to save: DoCmd.DoMenuItem acFormBar, acRecordsMenu, acSaveRecord, , acMenuVer70 I checked the web and there is nothing. Has anyone encountered this before? Thanks and regards, Rocky Smolin Beach Access Software _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From prodevmg at yahoo.com Wed Jan 28 12:49:21 2004 From: prodevmg at yahoo.com (Lonnie Johnson) Date: Wed, 28 Jan 2004 10:49:21 -0800 (PST) Subject: [AccessD] Access 97 to XP In-Reply-To: <5F21A4E8B8DD734992EF9E70AC9D3064128A0E@mail2.wrsystems.com> Message-ID: <20040128184921.50232.qmail@web20412.mail.yahoo.com> I am converting an application from 97 to XP. I have "unchecked" the box that says hide database window in the startup menu. However, I still get TWO access db icons on my task bar. One has my custom menu I have in the autoexec, the other has the database window and it's objects. Am I missing something here in XP? Lonnie Johnson ProDev, Professional Development of MS Access Databases Visit me at ==> http://www.prodev.us --------------------------------- Do you Yahoo!? Yahoo! SiteBuilder - Free web site building tool. Try it! From stephen at bondsoftware.co.nz Wed Jan 28 12:54:52 2004 From: stephen at bondsoftware.co.nz (Stephen Bond) Date: Thu, 29 Jan 2004 07:54:52 +1300 Subject: [AccessD] Access 97 to XP Message-ID: <70F3D727890C784291D8433E9C418F290885B2@server.bondsoftware.co.nz> Tools > Options > View > Windows in Taskbar (uncheck) > -----Original Message----- > From: Lonnie Johnson [mailto:prodevmg at yahoo.com] > Sent: Thursday, 29 January 2004 7:49 a.m. > To: Access Developers discussion and problem solving > Subject: [AccessD] Access 97 to XP > > > > I am converting an application from 97 to XP. I have > "unchecked" the box that says hide database window in the > startup menu. However, I still get TWO access db icons on my > task bar. One has my custom menu I have in the autoexec, the > other has the database window and it's objects. Am I missing > something here in XP? > > > > Lonnie Johnson > ProDev, Professional Development of MS Access Databases > Visit me at ==> http://www.prodev.us > > > > > > > > > > --------------------------------- > Do you Yahoo!? > Yahoo! SiteBuilder - Free web site building tool. Try it! > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com > From jimdettman at earthlink.net Wed Jan 28 12:59:32 2004 From: jimdettman at earthlink.net (Jim Dettman) Date: Wed, 28 Jan 2004 13:59:32 -0500 Subject: [AccessD] Vonage In-Reply-To: Message-ID: John, <> Definitely. <<(in good weather)>> Definitely Jim -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of John W. Colby Sent: Wednesday, January 28, 2004 1:12 PM To: Access Developers discussion and problem solving Subject: RE: [AccessD] Vonage We should have lunch some time. My Sister-In-Law lives in Syracuse and we get over there quite often (in good weather). John W. Colby www.ColbyConsulting.com -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Jim Dettman Sent: Wednesday, January 28, 2004 12:53 PM To: Access Developers discussion and problem solving Subject: RE: [AccessD] Vonage <> I do. I'm just North of Syracuse in Cicero. Jim Dettman President, Online Computer Services of WNY, Inc. (315) 699-3443 jimdettman at earthlink.net -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of augusta Sent: Wednesday, January 28, 2004 9:38 AM To: 'Access Developers discussion and problem solving' Subject: RE: [AccessD] Vonage John do you use Time Warner Central NY RR? > -----Original Message----- > From: accessd-bounces at databaseadvisors.com [mailto:accessd- > bounces at databaseadvisors.com] On Behalf Of John W. Colby > Sent: Tuesday, January 27, 2004 6:10 PM > To: Access Developers discussion and problem solving > Subject: RE: [AccessD] Vonage > > ******************************************************************* > Item Quantity Unit Subtotal > ******************************************************************* > Motorola Device 1 $0.00 $0.00 > Area Code: 315 - Syracuse 1 $0.00 $0.00 > Activation Fee 1 $29.99 $29.99 > *Residential Basic 500 1 $14.99 $14.99 > ----------------------------------- > > State Sales Tax: $0.00 > Federal Excise Tax: $1.35 > Regulatory Recovery Fee:$1.50 > Shipping: $9.95 > Total: $57.78 > > * Monthly Recurring Charge. > ******************************************************************* > > This does not include a charge of approximately $30 which you will be > charged for if you do not return the modem at the end of service. > > Now understand that the telephone company charged me a $60 activation fee > when I moved from one location to another location down the road 1/2 mile. > All just to change my billing from one jack to another in a switchboard. > Hmmm... > > In addition, ATM the Vonage $14.99 is a flat monthly fee, no taxes or > other > regulatory charges added. My land line STARTS at 11.53 for flat residence > line, plus 5.78 federal subscriber line charge, plus 1.43 Connecticut > sales > tax, plus .73 federal tax plus .20 E911 surcharge, plus .05 Connecticut > Service Fund, plus .39 number portability charge, plus .56 Universal > Service > fund (local), plus .14 Universal Service Fund (Long Distance). Talk about > nickel and dimeing you to death! > > I NEVER get out with under $25 on a "11.50" phone line, and with all the > "short" long distance, I rarely get out for under ~$35 WITHOUT long > distance, which is $.10/minute. For a couple of years I have used a > prepaid > calling card which I programmed into my phone to get my long distance for > $.039 per minute (slowly inching up, now $.045). > > Of course I also have to pay for my blazing fast internet connection, > which > is a ridiculous $45 / month. Makes the $15 ($25/$35) phone bill seem > rather > inconsequential. But I could never go back to dialup so since I have this > blazing fast internet, I might as well piggyback my phone off of it. > > I am pleased to say it is working great so far. > > John W. Colby > www.ColbyConsulting.com > > -----Original Message----- > From: accessd-bounces at databaseadvisors.com > [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Christopher > Hawkins > Sent: Tuesday, January 27, 2004 5:23 PM > To: accessd at databaseadvisors.com > Subject: RE: [AccessD] Vonage > > > $15/month sounds great, but what about setup fees or equipment > expenses? What's the "out the door" price look like? > > -Christopher- > > ---- Original Message ---- > From: JColby at dispec.com > To: accessd at databaseadvisors.com, > Subject: RE: [AccessD] Vonage > Date: Tue, 27 Jan 2004 15:05:07 -0500 > > >I received the phonemodem last night. Plugged it in (behind my > >router for > >those interested), waited 5 minutes, then picked up the receiver and > >made a > >call. Extremely easy to set up. > > > >The sound so far is crystal clear, no clicks / pops or echoes. I > >have a > >brand new ATT 2ghz cordless phone system which I plugged in to it. > >I can't > >tell the difference between this and the landline. > > > >I haven't done any heavy duty uploads / downloads though I will be > >doing > >some testing in the next few days. > > > >I went with the $15 / month package for 500 total minutes - local > >and long > >distance, with anything after that billed at $.039 / minute. If my > >useage > >averages more than 500 minutes I'll move up to the $25 package with > >unlimited local and 500 long distance minutes. Given my useage > >patterns I > >may very well end up with a $15 / month phone including long > >distance. > > > >So far so good. > > > >John W. Colby > >The database guy > > > _______________________________________________ > 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 _______________________________________________ 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 From jwcolby at colbyconsulting.com Wed Jan 28 13:03:15 2004 From: jwcolby at colbyconsulting.com (John W. Colby) Date: Wed, 28 Jan 2004 14:03:15 -0500 Subject: [AccessD] Getting internet data Message-ID: I need to get some internet data into a db. In order to do that I need to "navigate", specifically I have to enter a username / password which will bring me to a specific page. After that clicking on tabs at the top take me to other pages I'd also like to get data off of. Does anyone know how to do this from VBA? John W. Colby www.ColbyConsulting.com From DElam at jenkens.com Wed Jan 28 13:05:54 2004 From: DElam at jenkens.com (Elam, Debbie) Date: Wed, 28 Jan 2004 13:05:54 -0600 Subject: [AccessD] Access 97 to XP Message-ID: <7B1961ED924D1A459E378C9B1BB22B4C0106BA14@natexch.jenkens.com> Every open, unhidden window will have its own taskbar icon. If you notice, all of office is behaving this way now. Open multiple Word documents and each will have it's own icon too. Debbie -----Original Message----- From: Lonnie Johnson [mailto:prodevmg at yahoo.com] Sent: Wednesday, January 28, 2004 12:49 PM To: Access Developers discussion and problem solving Subject: [AccessD] Access 97 to XP I am converting an application from 97 to XP. I have "unchecked" the box that says hide database window in the startup menu. However, I still get TWO access db icons on my task bar. One has my custom menu I have in the autoexec, the other has the database window and it's objects. Am I missing something here in XP? Lonnie Johnson ProDev, Professional Development of MS Access Databases Visit me at ==> http://www.prodev.us --------------------------------- Do you Yahoo!? Yahoo! SiteBuilder - Free web site building tool. Try it! _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com - JENKENS & GILCHRIST E-MAIL NOTICE - This transmission may be: (1) subject to the Attorney-Client Privilege, (2) an attorney work product, or (3) strictly confidential. If you are not the intended recipient of this message, you may not disclose, print, copy or disseminate this information. If you have received this in error, please reply and notify the sender (only) and delete the message. Unauthorized interception of this e-mail is a violation of federal criminal law. This communication does not reflect an intention by the sender or the sender's client or principal to conduct a transaction or make any agreement by electronic means. Nothing contained in this message or in any attachment shall satisfy the requirements for a writing, and nothing contained herein shall constitute a contract or electronic signature under the Electronic Signatures in Global and National Commerce Act, any version of the Uniform Electronic Transactions Act or any other statute governing electronic transactions. From prodevmg at yahoo.com Wed Jan 28 13:14:14 2004 From: prodevmg at yahoo.com (Lonnie Johnson) Date: Wed, 28 Jan 2004 11:14:14 -0800 (PST) Subject: [AccessD] Access 97 to XP In-Reply-To: <70F3D727890C784291D8433E9C418F290885B2@server.bondsoftware.co.nz> Message-ID: <20040128191414.78062.qmail@web20419.mail.yahoo.com> Got it. Thanks. Stephen Bond wrote:Tools > Options > View > Windows in Taskbar (uncheck) > -----Original Message----- > From: Lonnie Johnson [mailto:prodevmg at yahoo.com] > Sent: Thursday, 29 January 2004 7:49 a.m. > To: Access Developers discussion and problem solving > Subject: [AccessD] Access 97 to XP > > > > I am converting an application from 97 to XP. I have > "unchecked" the box that says hide database window in the > startup menu. However, I still get TWO access db icons on my > task bar. One has my custom menu I have in the autoexec, the > other has the database window and it's objects. Am I missing > something here in XP? > > > > Lonnie Johnson > ProDev, Professional Development of MS Access Databases > Visit me at ==> http://www.prodev.us > > > > > > > > > > --------------------------------- > Do you Yahoo!? > Yahoo! SiteBuilder - Free web site building tool. Try it! > _______________________________________________ > 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 Lonnie Johnson ProDev, Professional Development of MS Access Databases Visit me at ==> http://www.prodev.us --------------------------------- Do you Yahoo!? Yahoo! SiteBuilder - Free web site building tool. Try it! From bchacc at san.rr.com Wed Jan 28 13:17:23 2004 From: bchacc at san.rr.com (Rocky Smolin - Beach Access Software) Date: Wed, 28 Jan 2004 11:17:23 -0800 Subject: [AccessD] Error 2468 - You can't carry out this action at the present time. References: <5F21A4E8B8DD734992EF9E70AC9D3064128A0E@mail2.wrsystems.com> Message-ID: <008d01c3e5d3$5bc2f770$6601a8c0@HAL9002> Randall: I think it doesn't have to do with the DAO recordset because the problem with two deletes in a row doesn't mess with that. Rocky ----- Original Message ----- From: "Randall Anthony" To: "'Access Developers discussion and problem solving'" Sent: Wednesday, January 28, 2004 10:31 AM Subject: RE: [AccessD] Error 2468 - You can't carry out this action at the present time. > Right off the top of my head, it has to do with the movefirst, movelast. I > ran into this when converting A97 to A2K. Code worked in A97, not A2K and > M$ said this was designed behavior. I'll try to find the article. > > -----Original Message----- > From: Rocky Smolin - Beach Access Software [mailto:bchacc at san.rr.com] > Sent: Wednesday, January 28, 2004 1:07 PM > To: AccessD at databaseadvisors.com > Subject: [AccessD] Error 2468 - You can't carry out this action at the > present time. > > Dear List: > > I am getting the following error message on a bound form: > > Error 2468 - You can't carry out this action at the present time. > > This form has a sub form linked to the main form by the main form's primary > key. (Main form is P.O. Header, subform is P.O. Detail). > > I get this error if I try to delete two records in a row. > > DoCmd.SetWarnings False > DoCmd.DoMenuItem acFormBar, acEditMenu, 8, , acMenuVer70 > DoCmd.DoMenuItem acFormBar, acEditMenu, 6, , acMenuVer70 > DoCmd.SetWarnings True > > I also get this error after I try to add a record. The problem started > because I wanted to get the last PO in the file, add one to the PO number, > and put the prefix and the new PO number ito the new record: > > DoCmd.GoToRecord , , acNewRec > > 'If rstPOHeader.RecordCount <> 0 Then > ' rstPOHeader.MoveLast > ' Me.fldPOPrefix = Nz(rstPOHeader!fldPOPrefix) > ' If IsNumeric(rstPOHeader!fldPONumber) Then > ' Me.fldPONumber = rstPOHeader!fldPONumber + 1 > ' fldPOOrderDate.SetFocus > ' Else > ' Me.fldPONumber.SetFocus > ' End If > 'End If > 'If Nz(Me.fldPOPrefix) = "" And Nz(rstPOHeader!fldPOPrefix) = "" Then _ > Me.fldPOPrefix.SetFocus > > Right now the code is commented out. If I uncomment the two lines: > > ' rstPOHeader.MoveLast > ' Me.fldPOPrefix = Nz(rstPOHeader!fldPOPrefix) > > I get the error when I try to save: > > DoCmd.DoMenuItem acFormBar, acRecordsMenu, acSaveRecord, , acMenuVer70 > > I checked the web and there is nothing. Has anyone encountered this before? > > Thanks and regards, > > Rocky Smolin > Beach Access Software > _______________________________________________ > 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 > From jeffrey.demulling at usbank.com Wed Jan 28 13:22:34 2004 From: jeffrey.demulling at usbank.com (jeffrey.demulling at usbank.com) Date: Wed, 28 Jan 2004 13:22:34 -0600 Subject: [AccessD] Days 360 Message-ID: I have the following function that is used to calculate the number of days based on a 360 day year. When I compare the results to Excel's Days360 formula I get a different result. The start date I am using is 11/30/2003 and an end date of 12/31/2003 My function returns 31 days and Excel returns 30 days. Can anyone see/tell me why I am getting a different result. TIA Jeff Function CalcDays360(mystartdate As Date, myEndDate As Date) As Double Dim mytotaldays mytotaldays = 0 Select Case DateDiff("m", mystartdate, myEndDate) Case 0 'Both dates are in the same month If myEndDate <> DateAdd("m", 1, DateSerial(Year(myEndDate), Month(myEndDate), 1)) - 1 Then mytotaldays = DateDiff("d", mystartdate, myEndDate) + 1 Else If Day(mystartdate) <> 31 Then mytotaldays = 30 - Day(mystartdate) + 1 Else mytotaldays = 1 End If End If Case Else 'Dates are not in the same month 'Determine Number of Days in the first month If Day(mystartdate) <> 31 Then mytotaldays = 30 - Day(mystartdate) + 1 Else mytotaldays = 1 End If 'Add Number of Days in the second month If myEndDate = DateAdd("m", 1, DateSerial(Year(myEndDate), Month(myEndDate), 1)) - 1 Or Day(myendate) = 30 Then mytotaldays = mytotaldays + 30 Else mytotaldays = mytotaldays + Day(myEndDate) End If 'Add 30 days to total number for each whole months between dates mytotaldays = mytotaldays + (30 * (DateDiff("m", mystartdate, myEndDate) - 1)) End Select CalcDays360 = mytotaldays End Function From bchacc at san.rr.com Wed Jan 28 13:34:16 2004 From: bchacc at san.rr.com (Rocky Smolin - Beach Access Software) Date: Wed, 28 Jan 2004 11:34:16 -0800 Subject: [AccessD] Error 2468 - You can't carry out this action at the present time. References: <5F21A4E8B8DD734992EF9E70AC9D3064128A0E@mail2.wrsystems.com> Message-ID: <009101c3e5d5$b851f700$6601a8c0@HAL9002> Randall: Tried this experiment just to get the DAO recordset out of the way. I deleted all references to it. Then I replaced: 'DoCmd.SetWarnings False 'DoCmd.DoMenuItem acFormBar, acEditMenu, 8, , acMenuVer70 'DoCmd.DoMenuItem acFormBar, acEditMenu, 6, , acMenuVer70 'DoCmd.SetWarnings True with DoCmd.RunCommand acCmdDelete I selected a record and ran that code which does the delete. Then before trying to delete the second record, I checked the table and the record was still there! So the delete (and probably other operations) are not completing for some reason. Pluse, when I get the error, I have to use the task manager to clear access. It won't quit, cant close any forms, etc. Any ideas? Many thanks in advance and regards, is ----- Original Message ----- From: "Randall Anthony" To: "'Access Developers discussion and problem solving'" Sent: Wednesday, January 28, 2004 10:31 AM Subject: RE: [AccessD] Error 2468 - You can't carry out this action at the present time. > Right off the top of my head, it has to do with the movefirst, movelast. I > ran into this when converting A97 to A2K. Code worked in A97, not A2K and > M$ said this was designed behavior. I'll try to find the article. > > -----Original Message----- > From: Rocky Smolin - Beach Access Software [mailto:bchacc at san.rr.com] > Sent: Wednesday, January 28, 2004 1:07 PM > To: AccessD at databaseadvisors.com > Subject: [AccessD] Error 2468 - You can't carry out this action at the > present time. > > Dear List: > > I am getting the following error message on a bound form: > > Error 2468 - You can't carry out this action at the present time. > > This form has a sub form linked to the main form by the main form's primary > key. (Main form is P.O. Header, subform is P.O. Detail). > > I get this error if I try to delete two records in a row. > > DoCmd.SetWarnings False > DoCmd.DoMenuItem acFormBar, acEditMenu, 8, , acMenuVer70 > DoCmd.DoMenuItem acFormBar, acEditMenu, 6, , acMenuVer70 > DoCmd.SetWarnings True > > I also get this error after I try to add a record. The problem started > because I wanted to get the last PO in the file, add one to the PO number, > and put the prefix and the new PO number ito the new record: > > DoCmd.GoToRecord , , acNewRec > > 'If rstPOHeader.RecordCount <> 0 Then > ' rstPOHeader.MoveLast > ' Me.fldPOPrefix = Nz(rstPOHeader!fldPOPrefix) > ' If IsNumeric(rstPOHeader!fldPONumber) Then > ' Me.fldPONumber = rstPOHeader!fldPONumber + 1 > ' fldPOOrderDate.SetFocus > ' Else > ' Me.fldPONumber.SetFocus > ' End If > 'End If > 'If Nz(Me.fldPOPrefix) = "" And Nz(rstPOHeader!fldPOPrefix) = "" Then _ > Me.fldPOPrefix.SetFocus > > Right now the code is commented out. If I uncomment the two lines: > > ' rstPOHeader.MoveLast > ' Me.fldPOPrefix = Nz(rstPOHeader!fldPOPrefix) > > I get the error when I try to save: > > DoCmd.DoMenuItem acFormBar, acRecordsMenu, acSaveRecord, , acMenuVer70 > > I checked the web and there is nothing. Has anyone encountered this before? > > Thanks and regards, > > Rocky Smolin > Beach Access Software > _______________________________________________ > 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 > From ranthony at wrsystems.com Wed Jan 28 13:40:46 2004 From: ranthony at wrsystems.com (Randall Anthony) Date: Wed, 28 Jan 2004 14:40:46 -0500 Subject: [AccessD] Error 2468 - You can't carry out this action at the present time. Message-ID: <5F21A4E8B8DD734992EF9E70AC9D3064128A0F@mail2.wrsystems.com> Whew... Took a while to find it, and at first glance it has nothing to do with your problem, but it may give you some ideas: Dim rst as DAO.recordset Set rst = CurrentDb.OpenRecordset("Customers",dbOpenDynaset,DbSeeChanges) Rst.FindFirst "[Country] = 'Mexico'" Do Until rst.NoMatch Rst.Delete Rst.FindNext "[Country] = 'Mexico'" Loop by design, when using the dbSeeChanges constant (in a Microsoft Jet workspace) JET will trap changes while two or more users (and/or methods) are editing or deleting the same record. Thereby, in your case when using dbSeeChanges you are able to see the result of the record deleted. (note: we tested this on local tables in your database application in both versions of Access: 97 and 2000) RESOLUTION/Workaround: You modified your code to Do Until rst.EOF rst.Delete rst.MoveNext Loop This eliminates the need of forcing JET to repoll the database as it was doing in your original code. -----Original Message----- From: Rocky Smolin - Beach Access Software [mailto:bchacc at san.rr.com] Sent: Wednesday, January 28, 2004 2:17 PM To: Access Developers discussion and problem solving Subject: Re: [AccessD] Error 2468 - You can't carry out this action at thepresent time. Randall: I think it doesn't have to do with the DAO recordset because the problem with two deletes in a row doesn't mess with that. Rocky ----- Original Message ----- From: "Randall Anthony" To: "'Access Developers discussion and problem solving'" Sent: Wednesday, January 28, 2004 10:31 AM Subject: RE: [AccessD] Error 2468 - You can't carry out this action at the present time. > Right off the top of my head, it has to do with the movefirst, movelast. I > ran into this when converting A97 to A2K. Code worked in A97, not A2K and > M$ said this was designed behavior. I'll try to find the article. > > -----Original Message----- > From: Rocky Smolin - Beach Access Software [mailto:bchacc at san.rr.com] > Sent: Wednesday, January 28, 2004 1:07 PM > To: AccessD at databaseadvisors.com > Subject: [AccessD] Error 2468 - You can't carry out this action at the > present time. > > Dear List: > > I am getting the following error message on a bound form: > > Error 2468 - You can't carry out this action at the present time. > > This form has a sub form linked to the main form by the main form's primary > key. (Main form is P.O. Header, subform is P.O. Detail). > > I get this error if I try to delete two records in a row. > > DoCmd.SetWarnings False > DoCmd.DoMenuItem acFormBar, acEditMenu, 8, , acMenuVer70 > DoCmd.DoMenuItem acFormBar, acEditMenu, 6, , acMenuVer70 > DoCmd.SetWarnings True > > I also get this error after I try to add a record. The problem started > because I wanted to get the last PO in the file, add one to the PO number, > and put the prefix and the new PO number ito the new record: > > DoCmd.GoToRecord , , acNewRec > > 'If rstPOHeader.RecordCount <> 0 Then > ' rstPOHeader.MoveLast > ' Me.fldPOPrefix = Nz(rstPOHeader!fldPOPrefix) > ' If IsNumeric(rstPOHeader!fldPONumber) Then > ' Me.fldPONumber = rstPOHeader!fldPONumber + 1 > ' fldPOOrderDate.SetFocus > ' Else > ' Me.fldPONumber.SetFocus > ' End If > 'End If > 'If Nz(Me.fldPOPrefix) = "" And Nz(rstPOHeader!fldPOPrefix) = "" Then _ > Me.fldPOPrefix.SetFocus > > Right now the code is commented out. If I uncomment the two lines: > > ' rstPOHeader.MoveLast > ' Me.fldPOPrefix = Nz(rstPOHeader!fldPOPrefix) > > I get the error when I try to save: > > DoCmd.DoMenuItem acFormBar, acRecordsMenu, acSaveRecord, , acMenuVer70 > > I checked the web and there is nothing. Has anyone encountered this before? > > Thanks and regards, > > Rocky Smolin > Beach Access Software > _______________________________________________ > 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 > _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From pedro at plex.nl Wed Jan 28 13:40:51 2004 From: pedro at plex.nl (Pedro Janssen) Date: Wed, 28 Jan 2004 20:40:51 +0100 Subject: [AccessD] error after converting (mailmerge) SOLVED References: <200401141408.i0EE8cNA020272@mailhostC.plex.net> <400F0480.5000602@shaw.ca> Message-ID: <001401c3e5d8$b2a1a320$f4c581d5@pedro> Hello Marty, it took me a while, but i solved the problem. After changing the code many times. Also with help from the one you gave me. I still received the error. I found an article in the Microsoft Knowledge base where the code i used in A97 was converted by microsoft to A2K. I changed my code to this one, but then i received an error that the ODBC could't open the database. I made a new access driver with the new .mdw file. Decompiled the database and both errors were gone. Thanks for your time. Pedro ----- Original Message ----- From: "MartyConnelly" To: "Access Developers discussion and problem solving" Sent: Thursday, January 22, 2004 12:00 AM Subject: Re: [AccessD] error after converting (mailmerge) > I can get this to work with Access97 to Word2003 (my default) by > dropping some extraneous code,ie. not using connection string. > The mdb I am opening is seperate from the one I am running Access in. > > It does however open 2 copies of word 1 default (document3.doc) and 1 > (form letters1.doc) > It also prints too. does not close either word document. > > Sub test() > Dim bltest As Boolean > bltest = True > CreateMergeDoc bltest, True > End Sub > Sub CreateMergeDoc(UseDDE As Boolean, PrintDoc As Boolean) > > Dim WordDoc As Word.Document > Dim strLetter As String > Dim strConnect As String > Dim WordApp As Word.Application > > Set WordApp = CreateObject("Word.Application") > > Set WordDoc = WordApp.Documents.Add > With WordDoc.MailMerge > > .OpenDataSource _ > Name:="C:\Documents and Settings\marty\My > Documents\WordMergetestold97.mdb", _ > ReadOnly:=True, LinkToSource:=True, _ > SQLStatement:="SELECT * FROM [Table1] WHERE Table1.MyField = " > & 123 & ";" > > ' With Fields > '............... > 'End With > > 'With WordApp.Selection > '............... > 'End With > > > With WordDoc.MailMerge > .DataSource.FirstRecord = 1 > Debug.Print .DataSource.TableName > .Destination = wdSendToNewDocument > > .Execute > > If PrintDoc Then > .Application.Options.PrintBackground = False > .Application.ActiveDocument.PrintOut > End If > End With > > WordApp.Visible = True > End With > End Sub > > pedro at plex.nl wrote: > > >Hello Group, > > > >i converted a A97 secured database to A2K. > >After making the changes in Wrkgadmin.exe and the ODBC Data Sources, i changed the names in the module. After running the mailmerge i get an error: Run-time error '5922' Word was unable to open the data source. The debug selects the .OpenDataSource from the code below. > > > >I figure out why this error occurs. > > > >TIA > > > >Pedro Janssen > > > > > > > > > >Sub CreateMergeDoc(UseDDE As Boolean, PrintDoc As Boolean) > > > > Dim WordDoc As Word.Document > > Dim strLetter As String > > Dim strConnect As String > > Dim WordApp As Word.Application > > > > Set WordApp = CreateObject("Word.Application") > > > > Set WordDoc = WordApp.Documents.Add > > With WordDoc.MailMerge > > If UseDDE Then > > strConnect = "QUERY Uitvoer" > > Else > > strConnect = "DSN=MS Access 2000 " _ > > & "Database;DBQ=E:\Cytologie\positieven\" _ > > & "BeveiligdPOSITIEVEN(A2K).mdb;" _ > > & "FIL=MS Access;" > > End If > > .OpenDataSource _ > > Name:="E:\Cytologie\positieven\BeveiligdPOSITIEVEN(A2K).mdb", _ > > ReadOnly:=True, LinkToSource:=True, _ > > Connection:=strConnect, _ > > SQLStatement:="SELECT * FROM [Uitvoer], [Aanvrager] WHERE Uitvoer.AanvragerID = Aanvrager.AanvragerID AND Uitvoer.ControleID = " & Forms![Brief]![veld] & ";" > > > > With Fields > > ............... > > End With > > > > With WordApp.Selection > > ............... > > End With > > > > > > With WordDoc.MailMerge > > .DataSource.FirstRecord = 1 > > > > .Destination = wdSendToNewDocument > > > > .Execute > > > > If PrintDoc Then > > .Application.Options.PrintBackground = False > > .Application.ActiveDocument.PrintOut > > End If > > End With > > > > WordApp.Visible = True > > End With > >End Sub > > > >_______________________________________________ > >AccessD mailing list > >AccessD at databaseadvisors.com > >http://databaseadvisors.com/mailman/listinfo/accessd > >Website: http://www.databaseadvisors.com > > > > > > > > -- > Marty Connelly > Victoria, B.C. > Canada > > > > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com > > From pedro at plex.nl Wed Jan 28 13:43:48 2004 From: pedro at plex.nl (Pedro Janssen) Date: Wed, 28 Jan 2004 20:43:48 +0100 Subject: [AccessD] error after converting (mailmerge) SOLVED References: <200401141408.i0EE8cNA020272@mailhostC.plex.net> <400F0480.5000602@shaw.ca> Message-ID: <001501c3e5d8$b3fb18a0$f4c581d5@pedro> Hello Marty, it took me a while, but i solved the problem. After changing the code many times. Also with help from the one you gave me. I still received the error. I found an article in the Microsoft Knowledge base where the code i used in A97 was converted by microsoft to A2K. I changed my code to this one, but then i received an error that the ODBC could't open the database. I made a new access odbc driver with the new .mdw file. Decompiled the database and both errors were gone. Thanks for your time. Pedro ----- Original Message ----- From: "MartyConnelly" To: "Access Developers discussion and problem solving" Sent: Thursday, January 22, 2004 12:00 AM Subject: Re: [AccessD] error after converting (mailmerge) > I can get this to work with Access97 to Word2003 (my default) by > dropping some extraneous code,ie. not using connection string. > The mdb I am opening is seperate from the one I am running Access in. > > It does however open 2 copies of word 1 default (document3.doc) and 1 > (form letters1.doc) > It also prints too. does not close either word document. > > Sub test() > Dim bltest As Boolean > bltest = True > CreateMergeDoc bltest, True > End Sub > Sub CreateMergeDoc(UseDDE As Boolean, PrintDoc As Boolean) > > Dim WordDoc As Word.Document > Dim strLetter As String > Dim strConnect As String > Dim WordApp As Word.Application > > Set WordApp = CreateObject("Word.Application") > > Set WordDoc = WordApp.Documents.Add > With WordDoc.MailMerge > > .OpenDataSource _ > Name:="C:\Documents and Settings\marty\My > Documents\WordMergetestold97.mdb", _ > ReadOnly:=True, LinkToSource:=True, _ > SQLStatement:="SELECT * FROM [Table1] WHERE Table1.MyField = " > & 123 & ";" > > ' With Fields > '............... > 'End With > > 'With WordApp.Selection > '............... > 'End With > > > With WordDoc.MailMerge > .DataSource.FirstRecord = 1 > Debug.Print .DataSource.TableName > .Destination = wdSendToNewDocument > > .Execute > > If PrintDoc Then > .Application.Options.PrintBackground = False > .Application.ActiveDocument.PrintOut > End If > End With > > WordApp.Visible = True > End With > End Sub > > pedro at plex.nl wrote: > > >Hello Group, > > > >i converted a A97 secured database to A2K. > >After making the changes in Wrkgadmin.exe and the ODBC Data Sources, i changed the names in the module. After running the mailmerge i get an error: Run-time error '5922' Word was unable to open the data source. The debug selects the .OpenDataSource from the code below. > > > >I figure out why this error occurs. > > > >TIA > > > >Pedro Janssen > > > > > > > > > >Sub CreateMergeDoc(UseDDE As Boolean, PrintDoc As Boolean) > > > > Dim WordDoc As Word.Document > > Dim strLetter As String > > Dim strConnect As String > > Dim WordApp As Word.Application > > > > Set WordApp = CreateObject("Word.Application") > > > > Set WordDoc = WordApp.Documents.Add > > With WordDoc.MailMerge > > If UseDDE Then > > strConnect = "QUERY Uitvoer" > > Else > > strConnect = "DSN=MS Access 2000 " _ > > & "Database;DBQ=E:\Cytologie\positieven\" _ > > & "BeveiligdPOSITIEVEN(A2K).mdb;" _ > > & "FIL=MS Access;" > > End If > > .OpenDataSource _ > > Name:="E:\Cytologie\positieven\BeveiligdPOSITIEVEN(A2K).mdb", _ > > ReadOnly:=True, LinkToSource:=True, _ > > Connection:=strConnect, _ > > SQLStatement:="SELECT * FROM [Uitvoer], [Aanvrager] WHERE Uitvoer.AanvragerID = Aanvrager.AanvragerID AND Uitvoer.ControleID = " & Forms![Brief]![veld] & ";" > > > > With Fields > > ............... > > End With > > > > With WordApp.Selection > > ............... > > End With > > > > > > With WordDoc.MailMerge > > .DataSource.FirstRecord = 1 > > > > .Destination = wdSendToNewDocument > > > > .Execute > > > > If PrintDoc Then > > .Application.Options.PrintBackground = False > > .Application.ActiveDocument.PrintOut > > End If > > End With > > > > WordApp.Visible = True > > End With > >End Sub > > > >_______________________________________________ > >AccessD mailing list > >AccessD at databaseadvisors.com > >http://databaseadvisors.com/mailman/listinfo/accessd > >Website: http://www.databaseadvisors.com > > > > > > > > -- > Marty Connelly > Victoria, B.C. > Canada > > > > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com > > From mikedorism at adelphia.net Wed Jan 28 14:09:34 2004 From: mikedorism at adelphia.net (Mike & Doris Manning) Date: Wed, 28 Jan 2004 15:09:34 -0500 Subject: [AccessD] Days 360 In-Reply-To: Message-ID: <000001c3e5da$a6455a20$8b194244@hargrove.internal> Access starts counting with "11/30/2003 12:00AM" whereas Excel doesn't include "11/30/2003" in the count. Just drop the +1 from your MyTotalDays calculation and you'll be okay. Doris Manning Database Administrator Hargrove Inc. www.hargroveinc.com -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of jeffrey.demulling at usbank.com Sent: Wednesday, January 28, 2004 2:23 PM To: accessd at databaseadvisors.com Subject: [AccessD] Days 360 I have the following function that is used to calculate the number of days based on a 360 day year. When I compare the results to Excel's Days360 formula I get a different result. The start date I am using is 11/30/2003 and an end date of 12/31/2003 My function returns 31 days and Excel returns 30 days. Can anyone see/tell me why I am getting a different result. TIA Jeff Function CalcDays360(mystartdate As Date, myEndDate As Date) As Double Dim mytotaldays mytotaldays = 0 Select Case DateDiff("m", mystartdate, myEndDate) Case 0 'Both dates are in the same month If myEndDate <> DateAdd("m", 1, DateSerial(Year(myEndDate), Month(myEndDate), 1)) - 1 Then mytotaldays = DateDiff("d", mystartdate, myEndDate) + 1 Else If Day(mystartdate) <> 31 Then mytotaldays = 30 - Day(mystartdate) + 1 Else mytotaldays = 1 End If End If Case Else 'Dates are not in the same month 'Determine Number of Days in the first month If Day(mystartdate) <> 31 Then mytotaldays = 30 - Day(mystartdate) + 1 Else mytotaldays = 1 End If 'Add Number of Days in the second month If myEndDate = DateAdd("m", 1, DateSerial(Year(myEndDate), Month(myEndDate), 1)) - 1 Or Day(myendate) = 30 Then mytotaldays = mytotaldays + 30 Else mytotaldays = mytotaldays + Day(myEndDate) End If 'Add 30 days to total number for each whole months between dates mytotaldays = mytotaldays + (30 * (DateDiff("m", mystartdate, myEndDate) - 1)) End Select CalcDays360 = mytotaldays End Function _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From bchacc at san.rr.com Wed Jan 28 14:10:37 2004 From: bchacc at san.rr.com (Rocky Smolin - Beach Access Software) Date: Wed, 28 Jan 2004 12:10:37 -0800 Subject: [AccessD] Error 2468 - You can't carry out this action at thepresent time. References: <5F21A4E8B8DD734992EF9E70AC9D3064128A0F@mail2.wrsystems.com> Message-ID: <00a701c3e5da$cb970850$6601a8c0@HAL9002> Randall: I see what they're saying. But unfortunately, I'm not using DAO in this case. It's a form bound to a table. Regards, Rocky ----- Original Message ----- From: "Randall Anthony" To: "'Access Developers discussion and problem solving'" Sent: Wednesday, January 28, 2004 11:40 AM Subject: RE: [AccessD] Error 2468 - You can't carry out this action at thepresent time. > Whew... Took a while to find it, and at first glance it has nothing to do > with your problem, but it may give you some ideas: > > Dim rst as DAO.recordset > Set rst = CurrentDb.OpenRecordset("Customers",dbOpenDynaset,DbSeeChanges) > Rst.FindFirst "[Country] = 'Mexico'" > Do Until rst.NoMatch > Rst.Delete > Rst.FindNext "[Country] = 'Mexico'" > Loop > > by design, when using the dbSeeChanges constant (in a Microsoft Jet > workspace) JET will trap changes while two or more users (and/or methods) > are editing or deleting the same record. Thereby, in your case when using > dbSeeChanges you are able to see the result of the record deleted. > (note: we tested this on local tables in your database application in both > versions of Access: 97 and 2000) > > RESOLUTION/Workaround: > You modified your code to > > Do Until rst.EOF > rst.Delete > rst.MoveNext > Loop > > This eliminates the need of forcing JET to repoll the database as it was > doing in your original code. > > -----Original Message----- > From: Rocky Smolin - Beach Access Software [mailto:bchacc at san.rr.com] > Sent: Wednesday, January 28, 2004 2:17 PM > To: Access Developers discussion and problem solving > Subject: Re: [AccessD] Error 2468 - You can't carry out this action at > thepresent time. > > Randall: > > I think it doesn't have to do with the DAO recordset because the problem > with two deletes in a row doesn't mess with that. > > Rocky > > ----- Original Message ----- > From: "Randall Anthony" > To: "'Access Developers discussion and problem solving'" > > Sent: Wednesday, January 28, 2004 10:31 AM > Subject: RE: [AccessD] Error 2468 - You can't carry out this action at the > present time. > > > > Right off the top of my head, it has to do with the movefirst, movelast. > I > > ran into this when converting A97 to A2K. Code worked in A97, not A2K and > > M$ said this was designed behavior. I'll try to find the article. > > > > -----Original Message----- > > From: Rocky Smolin - Beach Access Software [mailto:bchacc at san.rr.com] > > Sent: Wednesday, January 28, 2004 1:07 PM > > To: AccessD at databaseadvisors.com > > Subject: [AccessD] Error 2468 - You can't carry out this action at the > > present time. > > > > Dear List: > > > > I am getting the following error message on a bound form: > > > > Error 2468 - You can't carry out this action at the present time. > > > > This form has a sub form linked to the main form by the main form's > primary > > key. (Main form is P.O. Header, subform is P.O. Detail). > > > > I get this error if I try to delete two records in a row. > > > > DoCmd.SetWarnings False > > DoCmd.DoMenuItem acFormBar, acEditMenu, 8, , acMenuVer70 > > DoCmd.DoMenuItem acFormBar, acEditMenu, 6, , acMenuVer70 > > DoCmd.SetWarnings True > > > > I also get this error after I try to add a record. The problem started > > because I wanted to get the last PO in the file, add one to the PO number, > > and put the prefix and the new PO number ito the new record: > > > > DoCmd.GoToRecord , , acNewRec > > > > 'If rstPOHeader.RecordCount <> 0 Then > > ' rstPOHeader.MoveLast > > ' Me.fldPOPrefix = Nz(rstPOHeader!fldPOPrefix) > > ' If IsNumeric(rstPOHeader!fldPONumber) Then > > ' Me.fldPONumber = rstPOHeader!fldPONumber + 1 > > ' fldPOOrderDate.SetFocus > > ' Else > > ' Me.fldPONumber.SetFocus > > ' End If > > 'End If > > 'If Nz(Me.fldPOPrefix) = "" And Nz(rstPOHeader!fldPOPrefix) = "" Then > _ > > Me.fldPOPrefix.SetFocus > > > > Right now the code is commented out. If I uncomment the two lines: > > > > ' rstPOHeader.MoveLast > > ' Me.fldPOPrefix = Nz(rstPOHeader!fldPOPrefix) > > > > I get the error when I try to save: > > > > DoCmd.DoMenuItem acFormBar, acRecordsMenu, acSaveRecord, , acMenuVer70 > > > > I checked the web and there is nothing. Has anyone encountered this > before? > > > > Thanks and regards, > > > > Rocky Smolin > > Beach Access Software > > _______________________________________________ > > 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 > > > > _______________________________________________ > 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 > From ranthony at wrsystems.com Wed Jan 28 14:31:30 2004 From: ranthony at wrsystems.com (Randall Anthony) Date: Wed, 28 Jan 2004 15:31:30 -0500 Subject: [AccessD] Error 2468 - You can't carry out this action atthep resent time. Message-ID: <5F21A4E8B8DD734992EF9E70AC9D3064128A11@mail2.wrsystems.com> Sorry that didn't help, it seemed very similar to the problem I had. Good luck. -----Original Message----- From: Rocky Smolin - Beach Access Software [mailto:bchacc at san.rr.com] Sent: Wednesday, January 28, 2004 3:11 PM To: Access Developers discussion and problem solving Subject: Re: [AccessD] Error 2468 - You can't carry out this action atthepresent time. Randall: I see what they're saying. But unfortunately, I'm not using DAO in this case. It's a form bound to a table. Regards, Rocky ----- Original Message ----- From: "Randall Anthony" To: "'Access Developers discussion and problem solving'" Sent: Wednesday, January 28, 2004 11:40 AM Subject: RE: [AccessD] Error 2468 - You can't carry out this action at thepresent time. > Whew... Took a while to find it, and at first glance it has nothing to do > with your problem, but it may give you some ideas: > > Dim rst as DAO.recordset > Set rst = CurrentDb.OpenRecordset("Customers",dbOpenDynaset,DbSeeChanges) > Rst.FindFirst "[Country] = 'Mexico'" > Do Until rst.NoMatch > Rst.Delete > Rst.FindNext "[Country] = 'Mexico'" > Loop > > by design, when using the dbSeeChanges constant (in a Microsoft Jet > workspace) JET will trap changes while two or more users (and/or methods) > are editing or deleting the same record. Thereby, in your case when using > dbSeeChanges you are able to see the result of the record deleted. > (note: we tested this on local tables in your database application in both > versions of Access: 97 and 2000) > > RESOLUTION/Workaround: > You modified your code to > > Do Until rst.EOF > rst.Delete > rst.MoveNext > Loop > > This eliminates the need of forcing JET to repoll the database as it was > doing in your original code. > > -----Original Message----- > From: Rocky Smolin - Beach Access Software [mailto:bchacc at san.rr.com] > Sent: Wednesday, January 28, 2004 2:17 PM > To: Access Developers discussion and problem solving > Subject: Re: [AccessD] Error 2468 - You can't carry out this action at > thepresent time. > > Randall: > > I think it doesn't have to do with the DAO recordset because the problem > with two deletes in a row doesn't mess with that. > > Rocky > > ----- Original Message ----- > From: "Randall Anthony" > To: "'Access Developers discussion and problem solving'" > > Sent: Wednesday, January 28, 2004 10:31 AM > Subject: RE: [AccessD] Error 2468 - You can't carry out this action at the > present time. > > > > Right off the top of my head, it has to do with the movefirst, movelast. > I > > ran into this when converting A97 to A2K. Code worked in A97, not A2K and > > M$ said this was designed behavior. I'll try to find the article. > > > > -----Original Message----- > > From: Rocky Smolin - Beach Access Software [mailto:bchacc at san.rr.com] > > Sent: Wednesday, January 28, 2004 1:07 PM > > To: AccessD at databaseadvisors.com > > Subject: [AccessD] Error 2468 - You can't carry out this action at the > > present time. > > > > Dear List: > > > > I am getting the following error message on a bound form: > > > > Error 2468 - You can't carry out this action at the present time. > > > > This form has a sub form linked to the main form by the main form's > primary > > key. (Main form is P.O. Header, subform is P.O. Detail). > > > > I get this error if I try to delete two records in a row. > > > > DoCmd.SetWarnings False > > DoCmd.DoMenuItem acFormBar, acEditMenu, 8, , acMenuVer70 > > DoCmd.DoMenuItem acFormBar, acEditMenu, 6, , acMenuVer70 > > DoCmd.SetWarnings True > > > > I also get this error after I try to add a record. The problem started > > because I wanted to get the last PO in the file, add one to the PO number, > > and put the prefix and the new PO number ito the new record: > > > > DoCmd.GoToRecord , , acNewRec > > > > 'If rstPOHeader.RecordCount <> 0 Then > > ' rstPOHeader.MoveLast > > ' Me.fldPOPrefix = Nz(rstPOHeader!fldPOPrefix) > > ' If IsNumeric(rstPOHeader!fldPONumber) Then > > ' Me.fldPONumber = rstPOHeader!fldPONumber + 1 > > ' fldPOOrderDate.SetFocus > > ' Else > > ' Me.fldPONumber.SetFocus > > ' End If > > 'End If > > 'If Nz(Me.fldPOPrefix) = "" And Nz(rstPOHeader!fldPOPrefix) = "" Then > _ > > Me.fldPOPrefix.SetFocus > > > > Right now the code is commented out. If I uncomment the two lines: > > > > ' rstPOHeader.MoveLast > > ' Me.fldPOPrefix = Nz(rstPOHeader!fldPOPrefix) > > > > I get the error when I try to save: > > > > DoCmd.DoMenuItem acFormBar, acRecordsMenu, acSaveRecord, , acMenuVer70 > > > > I checked the web and there is nothing. Has anyone encountered this > before? > > > > Thanks and regards, > > > > Rocky Smolin > > Beach Access Software > > _______________________________________________ > > 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 > > > > _______________________________________________ > 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 > _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From DWUTKA at marlow.com Wed Jan 28 14:36:28 2004 From: DWUTKA at marlow.com (DWUTKA at marlow.com) Date: Wed, 28 Jan 2004 14:36:28 -0600 Subject: [AccessD] Decompile Message-ID: <2F8793082E00D4119A1700B0D0216BF8022277DC@main2.marlow.com> I've seen this several times, just never got around to doing it. (Still haven't, for the decompile.....). But I did add 'Open with Access 97', 'Open with Access 2000', and 'Open Secured DB'. Had to do it twice though, because once Access 2000 was opened, the settings switched, so I had to duplicate them. That Open Secured DB is something I should have put into place a while back. All of my secured databases have the same security settings for my 'personal' admin account, so no matter what database I build, with security, and no matter what .mdw I create, I can use the same account/password with any of the .mdw's, to gain admin access to it. Gotta love it! Thanks for the thread...it kicked me into gear on this... Drew -----Original Message----- From: Erwin Craps - IT Helps [mailto:Erwin.Craps at ithelps.be] Sent: Wednesday, January 28, 2004 7:49 AM To: Access Developers discussion and problem solving Subject: RE: [AccessD] Decompile Mark YOU ARE GREAT!!! Stupid thing of me is, I very well know this... Just never tought of actualy dooing this for Access Erwin... -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Mitsules, Mark S. (Newport News) Sent: Wednesday, January 28, 2004 1:40 PM To: 'Access Developers discussion and problem solving' Subject: RE: [AccessD] Decompile Dean, Courtesy of Stuart Sanders... Mark **************** Thinking about this I thought of a cool (in my view) way of handling this, that is probably what Susan was talking about. Now I'm wondering why I didn't do this years ago. 1. Start Windows Explorer, 2. Select Tools and then Folder Options... 3. Click on the File Types Tab 4. Find the MDB file type 5. Click Advanced 6. Chances are there are 2 options. Open in bold font (denoting default) and New. You can pretty much add what you want here. For decompile, 7. Click New 8. Under action type Decompile 9. Under Application used to perform action type the equivalent for your install: "C:\Program Files\Microsoft Office\Office10\MSACCESS.EXE" /decompile "%1" 10 Click OK and exit out And wallah! You now right click an mdb and have the context option of decompiling it. But it doesn't stop there. For those of us juggling multiple versions of Access you can setup a right click option to open in each. Eg Open in 97 Open in 2000 Open in XP And make sure the path points to the correct version of access. Cheers Stuart **************** -----Original Message----- From: Dean Ellis [mailto:deanellis at iprimus.com.au] Sent: Wednesday, January 28, 2004 7:36 AM To: AccessD Subject: [AccessD] Decompile _______________________________________________ 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 _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From DWUTKA at marlow.com Wed Jan 28 14:38:11 2004 From: DWUTKA at marlow.com (DWUTKA at marlow.com) Date: Wed, 28 Jan 2004 14:38:11 -0600 Subject: [AccessD] Concatenated stLinkCritria produces Type mismatcher ror. Message-ID: <2F8793082E00D4119A1700B0D0216BF8022277DD@main2.marlow.com> LOL. All of that was just to expound upon a simple, one rule foundation. Double the delimiter. Drew -----Original Message----- From: Helmut.E.Kotsch at t-online.de [mailto:Helmut.E.Kotsch at t-online.de] Sent: Wednesday, January 28, 2004 9:05 AM To: Access Developers discussion and problem solving Subject: AW: [AccessD] Concatenated stLinkCritria produces Type mismatcherror. Drew, thanks for your effort, appreciate it very much. Very good explanation. Think I have to reread it once and a while to keep it in mind. Helmut -----Urspr?ngliche Nachricht----- Von: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]Im Auftrag von DWUTKA at marlow.com Gesendet: Mittwoch, 28. Januar 2004 02:22 An: accessd at databaseadvisors.com Betreff: RE: [AccessD] Concatenated stLinkCritria produces Type mismatcherror. Let's see if I can break it down for you a bit. Double quotes OR single quotes are a string delimiter. Which means, that if either starts a string, that same character has to end the string. Double quotes is usually the one used (like in VBA, a single quote on it's own comments out a line....). So, when building a string, you have nothing to worry about, UNLESS you need to incorporate the delimiter into the string itself. So, if you want: Let's test this. "Let's test this." is the correct string. There is a single quote, but the delimiter isn't used within the string. If you want: Susie said, "I want chocolate ice cream!". Then it get's interesting. However, to represent a double quote, within a string delimited by double quotes, you just put two of them together, so, "Susie said, ""I want chocolate ice cream!""." is the correct string representation. Once you understand the doubling of the delimiter concept, the rest isn't to hard to figure out. So far I've only shown 'full' strings. If you need to put a string together from peices, the SAME rule applies, even though it may look different. If you want to include the dilimiter, you double it. So, if you have : Look for "something". where something is a variable, you would use this: "Look for """ & strSomething & """." Notice, that you have 3 parts to this string. The first part starts and ends with the delimiter ("). The last bit of the first part is a doubling of the double quote, then one more double quote to end the string. (So the delimiter is at the beginning and end of the 'string', and again, the doubling rule puts the delimiter within the string itself....because it's at the end of the segment, there are three in a row, but just remember, that's a double 'delimiter', followed by the delimiter itself...thus three in a row.) The second part is a variable, and is joined to the other parts with the ampersand. The last part, three double quotes, period, double quote, is the delimiter, a doubled delimiter (to represent it in the string on it's own), a period, then the closing delimiter. Now, let's say you want: Something"somethingelse" you would do this: strSomething & """" & strSomethingElse & """" Now you see 4 delimiters. Don't get side tracked. That is really an opening delimiter, the 'doubled' delimiter, and a closing delimiter. So if you saw """""", that produces a string of : "" (open delimiter, 2 doubled delimiters, and a closing delimiter....thus 6 all together, producing 2 double quotes for the contents of the string.) Does that all make sense? Just remember that to represent a delimiter within the string itself, you double the delimiter. Now, not to confuse the issue, but if you look at it even deeper, there is a perfectly logical explanation on how/why this system was developed. Numbers and other variable types are all represented by a specific number of bytes. To you and me 10,300 is 10,300, but to the email program, it's a chr(49), chr(48), chr(44), etc. When I put 10300 in code, the compiler changes the string into 4 bytes (if I am using a long integer variable type). However, a string can be any length (I believe the maximum number of characters for a string in VB/VBA is 2 million, but not positive on that. Since the length is variable, the code has to know where the string starts, and where the string stops, so it knows how much memory it is going to use (since in ASCII, each character takes up 1 byte, and in Unicode they take up 2 bytes.). Because of this, the code needs to know where the string starts and where it stops, so it uses a 'delimiter'. Quite frankly, the reason double quotes seem so difficult to put into strings is because they chose a delimiter normally used within a string. If they had used something like chr(150), which isn't 'typable', it would have been easier to make strings, because when are you going to use chr(150) in normal text, however, it would make looking at most strings hard to see for a programmer. Even if they had used a non-typable character, they couldn't exclude the fact that someone MAY want to use that within the string itself. Thus, no matter what delimiter they were going to use, they had to provide a method of letting that delimiter fall within the string it was delimiting. To do that, they took the double approach. If the code finds the end delimiter, and finds it again, as the next character, it knows that the string isn't REALLY over, because it's been doubled, thus the code simply puts the delimiter within memory as part of the string itself. If it finds the end delimiter, and anything BUT the delimiter afterwards, then it knows it has found the end of that string. Make sense? Drew -----Original Message----- From: Helmut.E.Kotsch at t-online.de [mailto:Helmut.E.Kotsch at t-online.de] Sent: Tuesday, January 27, 2004 6:23 PM To: Access Developers discussion and problem solving Subject: AW: [AccessD] Concatenated stLinkCritria produces Type mismatcherror. Charlotte you are great. Thank you very much. Here I'm sitting at midnight in Germany defining my problem and there you come back within minutes with a workable solution. What is the alternative to using multiple double quotes? (I don't like them either) Where in the world would someone learn / read about the solution you provided. Even though it works, I don't understand it. To be honest, this whole "quotes syntax" (single and double) is a nightmare to me. Again, thanks a lot. Regards and have a nice day. Helmut Kotsch (Helmut.E.Kotsch at t-online.de) -----Ursprungliche Nachricht----- Von: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]Im Auftrag von Charlotte Foust Gesendet: Mittwoch, 28. Januar 2004 00:49 An: Access Developers discussion and problem solving Betreff: RE: [AccessD] Concatenated stLinkCritria produces Type mismatcherror. I don't like to use multiple double quotes like that because it's so hard to read. Your problem is in this line: stLinkCriteria = "[KundenName]=" & "'" & Me![KundenName] & "'" And "[VerbandNr]=" & Me![VerbandNr] Which should be: stLinkCriteria = "[KundenName]=" & "'" & Me![KundenName] & "'" & " And [VerbandNr]=" & Me![VerbandNr] Charlotte Foust -----Original Message----- From: Helmut Kotsch [mailto:Helmut.E.Kotsch at t-online.de] Sent: Tuesday, January 27, 2004 3:11 PM To: accessd at databaseadvisors.com Subject: [AccessD] Concatenated stLinkCritria produces Type mismatch error. Hi, I am trying to open a form where 2 conditions have to be met. When only one conditon (as shown in code below as sample#1 and sample#2) is set than it works ok. Sample#1 ==> OK Dim stDocName As String Dim stLinkCriteria As String stDocName = "VERDI-Kunden" stLinkCriteria = "[KundenName]=" & "'" & Me![KundenName] & "'" DoCmd.OpenForm stDocName, , , stLinkCriteria Sample#2 ==> OK Dim stDocName As String Dim stLinkCriteria As String stDocName = "VERDI-Kunden" stLinkCriteria = "[VerbandNr]=" & Me![VerbandNr] DoCmd.OpenForm stDocName, , , stLinkCriteria However when concatenating both conditions as shown in the following code I get a "Type mismatch" error. Dim stDocName As String Dim stLinkCriteria As String stDocName = "VERDI-Kunden" stLinkCriteria = "[KundenName]=" & "'" & Me![KundenName] & "'" And "[VerbandNr]=" & Me![VerbandNr] DoCmd.OpenForm stDocName, , , stLinkCriteria Hope someone can help before this one drives me grazy. Helmut Kotsch _______________________________________________ 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 _______________________________________________ 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 _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From DWUTKA at marlow.com Wed Jan 28 14:39:28 2004 From: DWUTKA at marlow.com (DWUTKA at marlow.com) Date: Wed, 28 Jan 2004 14:39:28 -0600 Subject: [AccessD] Vonage Message-ID: <2F8793082E00D4119A1700B0D0216BF8022277DE@main2.marlow.com> Please note, that until this post, I have COMPLETELY stayed out of this thread! (just wanted that noted in the official 'how bad has Drew been lately' log. Drew -----Original Message----- From: Bryan Carbonnell [mailto:carbonnb at sympatico.ca] Sent: Wednesday, January 28, 2004 9:32 AM To: accessd at databaseadvisors.com Subject: Re: RE: [AccessD] Vonage > From: "John W. Colby" > Right, sorry. It's just been sooooo dead lately I thought I'd brighten > things up a bit. ;-) That's one of the reasons it was allowed to go on for a week. That and I'm just trying to catch up on my backlog :-)) -- Bryan Carbonnell - carbonnb at sympatico.ca Unfortunately common sense isn't so common! _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From ja at alldatacorp.com Wed Jan 28 13:44:53 2004 From: ja at alldatacorp.com (Joe K Anderson) Date: Wed, 28 Jan 2004 11:44:53 -0800 Subject: [AccessD] Error 2468 - You can't carry out this action at the present time. References: <5F21A4E8B8DD734992EF9E70AC9D3064128A0E@mail2.wrsystems.com> <009101c3e5d5$b851f700$6601a8c0@HAL9002> Message-ID: <017201c3e5d7$339073a0$6501a8c0@adiDWS> You may need to do a Requery between deletes? joe ----- Original Message ----- From: Rocky Smolin - Beach Access Software To: Access Developers discussion and problem solving Cc: Wayne Warren Angelucci ; Mark Krisburg ; Joe Anderson ; Gordon Bennett ; Dixon Foss ; Bob Heygood ; Barry Hynum Sent: 01-28-2004 11:34 Subject: Re: [AccessD] Error 2468 - You can't carry out this action at the present time. Randall: Tried this experiment just to get the DAO recordset out of the way. I deleted all references to it. Then I replaced: 'DoCmd.SetWarnings False 'DoCmd.DoMenuItem acFormBar, acEditMenu, 8, , acMenuVer70 'DoCmd.DoMenuItem acFormBar, acEditMenu, 6, , acMenuVer70 'DoCmd.SetWarnings True with DoCmd.RunCommand acCmdDelete I selected a record and ran that code which does the delete. Then before trying to delete the second record, I checked the table and the record was still there! So the delete (and probably other operations) are not completing for some reason. Pluse, when I get the error, I have to use the task manager to clear access. It won't quit, cant close any forms, etc. Any ideas? Many thanks in advance and regards, is ----- Original Message ----- From: "Randall Anthony" To: "'Access Developers discussion and problem solving'" Sent: Wednesday, January 28, 2004 10:31 AM Subject: RE: [AccessD] Error 2468 - You can't carry out this action at the present time. > Right off the top of my head, it has to do with the movefirst, movelast. I > ran into this when converting A97 to A2K. Code worked in A97, not A2K and > M$ said this was designed behavior. I'll try to find the article. > > -----Original Message----- > From: Rocky Smolin - Beach Access Software [mailto:bchacc at san.rr.com] > Sent: Wednesday, January 28, 2004 1:07 PM > To: AccessD at databaseadvisors.com > Subject: [AccessD] Error 2468 - You can't carry out this action at the > present time. > > Dear List: > > I am getting the following error message on a bound form: > > Error 2468 - You can't carry out this action at the present time. > > This form has a sub form linked to the main form by the main form's primary > key. (Main form is P.O. Header, subform is P.O. Detail). > > I get this error if I try to delete two records in a row. > > DoCmd.SetWarnings False > DoCmd.DoMenuItem acFormBar, acEditMenu, 8, , acMenuVer70 > DoCmd.DoMenuItem acFormBar, acEditMenu, 6, , acMenuVer70 > DoCmd.SetWarnings True > > I also get this error after I try to add a record. The problem started > because I wanted to get the last PO in the file, add one to the PO number, > and put the prefix and the new PO number ito the new record: > > DoCmd.GoToRecord , , acNewRec > > 'If rstPOHeader.RecordCount <> 0 Then > ' rstPOHeader.MoveLast > ' Me.fldPOPrefix = Nz(rstPOHeader!fldPOPrefix) > ' If IsNumeric(rstPOHeader!fldPONumber) Then > ' Me.fldPONumber = rstPOHeader!fldPONumber + 1 > ' fldPOOrderDate.SetFocus > ' Else > ' Me.fldPONumber.SetFocus > ' End If > 'End If > 'If Nz(Me.fldPOPrefix) = "" And Nz(rstPOHeader!fldPOPrefix) = "" Then _ > Me.fldPOPrefix.SetFocus > > Right now the code is commented out. If I uncomment the two lines: > > ' rstPOHeader.MoveLast > ' Me.fldPOPrefix = Nz(rstPOHeader!fldPOPrefix) > > I get the error when I try to save: > > DoCmd.DoMenuItem acFormBar, acRecordsMenu, acSaveRecord, , acMenuVer70 > > I checked the web and there is nothing. Has anyone encountered this before? > > Thanks and regards, > > Rocky Smolin > Beach Access Software > _______________________________________________ > 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 > From jeffrey.demulling at usbank.com Wed Jan 28 14:47:04 2004 From: jeffrey.demulling at usbank.com (jeffrey.demulling at usbank.com) Date: Wed, 28 Jan 2004 14:47:04 -0600 Subject: [AccessD] Days 360 Message-ID: Doris, Thanks for the help. After sending the email, I had to talk with my boss and asked her to go over the code also (she is not a programmer), but just talking it through with her made me realize the mistake. You just confirmed it. "Mike & Doris Manning" To: "'Access Developers discussion and problem solving'" Sent by: accessd-bounces at databasead cc: visors.com Subject: RE: [AccessD] Days 360 01/28/2004 02:09 PM Please respond to "Access Developers discussion and problem solving" Access starts counting with "11/30/2003 12:00AM" whereas Excel doesn't include "11/30/2003" in the count. Just drop the +1 from your MyTotalDays calculation and you'll be okay. Doris Manning Database Administrator Hargrove Inc. www.hargroveinc.com -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of jeffrey.demulling at usbank.com Sent: Wednesday, January 28, 2004 2:23 PM To: accessd at databaseadvisors.com Subject: [AccessD] Days 360 I have the following function that is used to calculate the number of days based on a 360 day year. When I compare the results to Excel's Days360 formula I get a different result. The start date I am using is 11/30/2003 and an end date of 12/31/2003 My function returns 31 days and Excel returns 30 days. Can anyone see/tell me why I am getting a different result. TIA Jeff Function CalcDays360(mystartdate As Date, myEndDate As Date) As Double Dim mytotaldays mytotaldays = 0 Select Case DateDiff("m", mystartdate, myEndDate) Case 0 'Both dates are in the same month If myEndDate <> DateAdd("m", 1, DateSerial(Year(myEndDate), Month(myEndDate), 1)) - 1 Then mytotaldays = DateDiff("d", mystartdate, myEndDate) + 1 Else If Day(mystartdate) <> 31 Then mytotaldays = 30 - Day(mystartdate) + 1 Else mytotaldays = 1 End If End If Case Else 'Dates are not in the same month 'Determine Number of Days in the first month If Day(mystartdate) <> 31 Then mytotaldays = 30 - Day(mystartdate) + 1 Else mytotaldays = 1 End If 'Add Number of Days in the second month If myEndDate = DateAdd("m", 1, DateSerial(Year(myEndDate), Month(myEndDate), 1)) - 1 Or Day(myendate) = 30 Then mytotaldays = mytotaldays + 30 Else mytotaldays = mytotaldays + Day(myEndDate) End If 'Add 30 days to total number for each whole months between dates mytotaldays = mytotaldays + (30 * (DateDiff("m", mystartdate, myEndDate) - 1)) End Select CalcDays360 = mytotaldays End Function _______________________________________________ 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 From Erwin.Craps at ithelps.be Wed Jan 28 14:53:03 2004 From: Erwin.Craps at ithelps.be (Erwin Craps - IT Helps) Date: Wed, 28 Jan 2004 21:53:03 +0100 Subject: [AccessD] Getting internet data Message-ID: <46B976F2B698FF46A4FE7636509B22DF03D199@stekelbes.ithelps.local> I done that before (and still using it) with a HTTP control from IP Works (I believe they changed name into something else). You can get the page in a string and analyse it further. I believe there is a basic control from MS also in Access or VB, a HTTP control. Only one thing I don't know and is the tricky part... The password. No experiance in that one. But you should look at a HTTP control. I have my first code done with the XML parser. There is a HTTP XML parser to, maybe this can do the trick to. Erwin -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of John W. Colby Sent: Wednesday, January 28, 2004 8:03 PM To: AccessD Subject: [AccessD] Getting internet data I need to get some internet data into a db. In order to do that I need to "navigate", specifically I have to enter a username / password which will bring me to a specific page. After that clicking on tabs at the top take me to other pages I'd also like to get data off of. Does anyone know how to do this from VBA? John W. Colby www.ColbyConsulting.com _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From bchacc at san.rr.com Wed Jan 28 15:03:36 2004 From: bchacc at san.rr.com (Rocky Smolin - Beach Access Software) Date: Wed, 28 Jan 2004 13:03:36 -0800 Subject: [AccessD] Error 2468 - You can't carry out this action at thepresent time. References: <5F21A4E8B8DD734992EF9E70AC9D3064128A0E@mail2.wrsystems.com> <009101c3e5d5$b851f700$6601a8c0@HAL9002> <017201c3e5d7$339073a0$6501a8c0@adiDWS> Message-ID: <00f101c3e5e2$32566c00$6601a8c0@HAL9002> I'm getting closer. I deleted the sub-form that on the second tab of the tab form and the two deletes worked. It has something to do with a sub form on a tab. Any clues, anybody? Rocky ----- Original Message ----- From: "Joe K Anderson" To: "Rocky Smolin - Beach Access Software" ; Cc: "Wayne Warren Angelucci" ; "Gordon Bennett" ; "Barry Hynum" ; "Dixon Foss" ; "Mark Krisburg" Sent: Wednesday, January 28, 2004 11:44 AM Subject: Re: [AccessD] Error 2468 - You can't carry out this action at thepresent time. You may need to do a Requery between deletes? joe ----- Original Message ----- From: Rocky Smolin - Beach Access Software To: Access Developers discussion and problem solving Cc: Wayne Warren Angelucci ; Mark Krisburg ; Joe Anderson ; Gordon Bennett ; Dixon Foss ; Bob Heygood ; Barry Hynum Sent: 01-28-2004 11:34 Subject: Re: [AccessD] Error 2468 - You can't carry out this action at the present time. Randall: Tried this experiment just to get the DAO recordset out of the way. I deleted all references to it. Then I replaced: 'DoCmd.SetWarnings False 'DoCmd.DoMenuItem acFormBar, acEditMenu, 8, , acMenuVer70 'DoCmd.DoMenuItem acFormBar, acEditMenu, 6, , acMenuVer70 'DoCmd.SetWarnings True with DoCmd.RunCommand acCmdDelete I selected a record and ran that code which does the delete. Then before trying to delete the second record, I checked the table and the record was still there! So the delete (and probably other operations) are not completing for some reason. Pluse, when I get the error, I have to use the task manager to clear access. It won't quit, cant close any forms, etc. Any ideas? Many thanks in advance and regards, is ----- Original Message ----- From: "Randall Anthony" To: "'Access Developers discussion and problem solving'" Sent: Wednesday, January 28, 2004 10:31 AM Subject: RE: [AccessD] Error 2468 - You can't carry out this action at the present time. > Right off the top of my head, it has to do with the movefirst, movelast. I > ran into this when converting A97 to A2K. Code worked in A97, not A2K and > M$ said this was designed behavior. I'll try to find the article. > > -----Original Message----- > From: Rocky Smolin - Beach Access Software [mailto:bchacc at san.rr.com] > Sent: Wednesday, January 28, 2004 1:07 PM > To: AccessD at databaseadvisors.com > Subject: [AccessD] Error 2468 - You can't carry out this action at the > present time. > > Dear List: > > I am getting the following error message on a bound form: > > Error 2468 - You can't carry out this action at the present time. > > This form has a sub form linked to the main form by the main form's primary > key. (Main form is P.O. Header, subform is P.O. Detail). > > I get this error if I try to delete two records in a row. > > DoCmd.SetWarnings False > DoCmd.DoMenuItem acFormBar, acEditMenu, 8, , acMenuVer70 > DoCmd.DoMenuItem acFormBar, acEditMenu, 6, , acMenuVer70 > DoCmd.SetWarnings True > > I also get this error after I try to add a record. The problem started > because I wanted to get the last PO in the file, add one to the PO number, > and put the prefix and the new PO number ito the new record: > > DoCmd.GoToRecord , , acNewRec > > 'If rstPOHeader.RecordCount <> 0 Then > ' rstPOHeader.MoveLast > ' Me.fldPOPrefix = Nz(rstPOHeader!fldPOPrefix) > ' If IsNumeric(rstPOHeader!fldPONumber) Then > ' Me.fldPONumber = rstPOHeader!fldPONumber + 1 > ' fldPOOrderDate.SetFocus > ' Else > ' Me.fldPONumber.SetFocus > ' End If > 'End If > 'If Nz(Me.fldPOPrefix) = "" And Nz(rstPOHeader!fldPOPrefix) = "" Then _ > Me.fldPOPrefix.SetFocus > > Right now the code is commented out. If I uncomment the two lines: > > ' rstPOHeader.MoveLast > ' Me.fldPOPrefix = Nz(rstPOHeader!fldPOPrefix) > > I get the error when I try to save: > > DoCmd.DoMenuItem acFormBar, acRecordsMenu, acSaveRecord, , acMenuVer70 > > I checked the web and there is nothing. Has anyone encountered this before? > > Thanks and regards, > > Rocky Smolin > Beach Access Software > _______________________________________________ > 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 > _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From KIsmert at TexasSystems.com Wed Jan 28 14:58:06 2004 From: KIsmert at TexasSystems.com (Ken Ismert) Date: Wed, 28 Jan 2004 14:58:06 -0600 Subject: [AccessD] Interface Callback Class Questions. In-Reply-To: <000201c3e4d1$2188ff30$6401a8c0@RG> Message-ID: <008201c3e5e1$6de5e0d0$2a3ca8c0@TEXASSYSTEMS.COM> Robert, To make this work, you need a public object interface or type library that both projects (your Host and Remote) can agree on. You could define an Interface class in the Remote db, set its Instancing property as 2 - PublicNotCreatable, allowing you to use objects that implement this interface in both the host and remote projects. But that is not strictly necessary, as you already have the Access public type library, which defines the Report interface, which both projects obviously understand. So, you could do it this way: 1. Add a Public Report Open function in a Remote module that returns an Access.Report You also need a matching Report Close function. 2. Add a Report class in the Host to sink events from the remote report. 3. Add code in a Host module to open and close the report. As I only have A2K, I can't answer the question as to whether the Report interface is forward compatible between A2K and AXP. I tend to think so. If not, you will be forced to use another approach, likely one involving interfaces. I do have a question for you: I found I couldn't reference a remote mdb from a host mde. I had to make the remote mdb into an mde, and reference it in the host, before I could successfully make the host mde. How did you get around this? -Ken Here is the code that I wrote to test this functionality: 1. Report Open/Close functions in a Remote module: ================================================== Public Sub RemoteReportClose(sReportName As String) On Error GoTo HandleErr DoCmd.Close acReport, sReportName Exit Sub HandleErr: Err.Raise Number:=Err.Number, _ Description:=Err.Description, _ Source:="modMain.RemoteReportClose" & vbCrLf & Err.Source Exit Sub End Sub Public Function RemoteReportOpen(sReportName As String) As Access.Report On Error GoTo HandleErr ' Init Set RemoteReportOpen = Nothing ' Open Report DoCmd.OpenReport sReportName, acViewPreview ' Return Set RemoteReportOpen = Application.Reports(sReportName) Exit Function HandleErr: Err.Raise Number:=Err.Number, _ Description:=Err.Description, _ Source:="modMain.RemoteReportOpen" & vbCrLf & Err.Source Exit Function End Function 2. The CReportHost class in the Host: ======================================= Option Compare Database Option Explicit Private Const pcsEventStub As String = "[Event Procedure]" Private WithEvents mrRpt As Access.Report Property Get IsOpen() As Boolean IsOpen = Not (mrRpt Is Nothing) End Property Property Get Name() As String Name = "" If mrRpt Is Nothing Then Exit Sub Name = mrRpt.Name End Property Public Sub CloseRemoteReport() On Error GoTo HandleErr ' Close Report if Open If mrRpt Is Nothing Then Exit Sub RemoteReportClose mrRpt.Name Exit Sub HandleErr: Err.Raise Number:=Err.Number, _ Description:=Err.Description, _ Source:="CReportHost.CloseRemoteReport" & vbCrLf & Err.Source Exit Sub End Sub Public Sub OpenRemoteReport(ReportName As String) On Error GoTo HandleErr ' Open Report Set mrRpt = RemoteReportOpen(ReportName) ' Hook Close Event mrRpt.OnClose = pcsEventStub Exit Sub HandleErr: Err.Raise Number:=Err.Number, _ Description:=Err.Description, _ Source:="CReportHost.OpenRemoteReport" & vbCrLf & Err.Source Exit Sub End Sub Private Sub Class_Terminate() On Error Resume Next CloseRemoteReport End Sub Private Sub mrRpt_Close() MsgBox "Report " & mrRpt.Name & " closed!" Set mrRpt = Nothing End Sub 3. Module-level Code in Host: ============================= Public grReportHost As CReportHost ' Call this routine to open a remote report Public Sub OpenRemoteReport(sReportName As String) On Error GoTo HandleErr ' Close current Report, if any If Not (grReportHost Is Nothing) Then If grReportHost.IsOpen Then grReportHost.CloseRemoteReport End If End If ' Remake Host Object Set grReportHost = New CReportHost ' Open Report grReportHost.OpenRemoteReport sReportName Exit Sub HandleErr: MsgBox "Error: " & Err.Number & vbCrLf _ & Err.Description & vbCrLf _ & "modMain.OpenRemoteReport" & vbCrLf & Err.Source Exit Sub End Sub -----Original Message----- From: Robert Gracie [mailto:Subscriptions at servicexp.com] Sent: Tuesday, January 27, 2004 6:29 AM To: 'Access Developers discussion and problem solving' Subject: [AccessD] Interface Callback Class Questions. Hello All AK2 mde referencing A2K mdb Objective: To open a report in a (host is an mde referenced to the .mdb) referenced .mdb and have all the events for a given report fire inside the host mde. I can do this for a report located inside the mde, however I can seem to figure out how to get the report inside the .mdb to see the class in the mde, as circular references are not permitted in access. Question: I was thinking that an Interface callback would be an option. So is it possible to use an interface callback across a referenced db to accomplish my objective? Any examples...? Thanks Robert Gracie From cfoust at infostatsystems.com Wed Jan 28 15:20:43 2004 From: cfoust at infostatsystems.com (Charlotte Foust) Date: Wed, 28 Jan 2004 13:20:43 -0800 Subject: [AccessD] Error 2468 - You can't carry out this action atthepresent time. Message-ID: It sounds like you may have the parent and child forms linked to the same dataset. Do you? Charlotte Foust -----Original Message----- From: Rocky Smolin - Beach Access Software [mailto:bchacc at san.rr.com] Sent: Wednesday, January 28, 2004 1:04 PM To: Access Developers discussion and problem solving Subject: Re: [AccessD] Error 2468 - You can't carry out this action atthepresent time. I'm getting closer. I deleted the sub-form that on the second tab of the tab form and the two deletes worked. It has something to do with a sub form on a tab. Any clues, anybody? Rocky ----- Original Message ----- From: "Joe K Anderson" To: "Rocky Smolin - Beach Access Software" ; Cc: "Wayne Warren Angelucci" ; "Gordon Bennett" ; "Barry Hynum" ; "Dixon Foss" ; "Mark Krisburg" Sent: Wednesday, January 28, 2004 11:44 AM Subject: Re: [AccessD] Error 2468 - You can't carry out this action at thepresent time. You may need to do a Requery between deletes? joe ----- Original Message ----- From: Rocky Smolin - Beach Access Software To: Access Developers discussion and problem solving Cc: Wayne Warren Angelucci ; Mark Krisburg ; Joe Anderson ; Gordon Bennett ; Dixon Foss ; Bob Heygood ; Barry Hynum Sent: 01-28-2004 11:34 Subject: Re: [AccessD] Error 2468 - You can't carry out this action at the present time. Randall: Tried this experiment just to get the DAO recordset out of the way. I deleted all references to it. Then I replaced: 'DoCmd.SetWarnings False 'DoCmd.DoMenuItem acFormBar, acEditMenu, 8, , acMenuVer70 'DoCmd.DoMenuItem acFormBar, acEditMenu, 6, , acMenuVer70 'DoCmd.SetWarnings True with DoCmd.RunCommand acCmdDelete I selected a record and ran that code which does the delete. Then before trying to delete the second record, I checked the table and the record was still there! So the delete (and probably other operations) are not completing for some reason. Pluse, when I get the error, I have to use the task manager to clear access. It won't quit, cant close any forms, etc. Any ideas? Many thanks in advance and regards, is ----- Original Message ----- From: "Randall Anthony" To: "'Access Developers discussion and problem solving'" Sent: Wednesday, January 28, 2004 10:31 AM Subject: RE: [AccessD] Error 2468 - You can't carry out this action at the present time. > Right off the top of my head, it has to do with the movefirst, movelast. I > ran into this when converting A97 to A2K. Code worked in A97, not A2K and > M$ said this was designed behavior. I'll try to find the article. > > -----Original Message----- > From: Rocky Smolin - Beach Access Software [mailto:bchacc at san.rr.com] > Sent: Wednesday, January 28, 2004 1:07 PM > To: AccessD at databaseadvisors.com > Subject: [AccessD] Error 2468 - You can't carry out this action at the > present time. > > Dear List: > > I am getting the following error message on a bound form: > > Error 2468 - You can't carry out this action at the present time. > > This form has a sub form linked to the main form by the main form's primary > key. (Main form is P.O. Header, subform is P.O. Detail). > > I get this error if I try to delete two records in a row. > > DoCmd.SetWarnings False > DoCmd.DoMenuItem acFormBar, acEditMenu, 8, , acMenuVer70 > DoCmd.DoMenuItem acFormBar, acEditMenu, 6, , acMenuVer70 > DoCmd.SetWarnings True > > I also get this error after I try to add a record. The problem started > because I wanted to get the last PO in the file, add one to the PO number, > and put the prefix and the new PO number ito the new record: > > DoCmd.GoToRecord , , acNewRec > > 'If rstPOHeader.RecordCount <> 0 Then > ' rstPOHeader.MoveLast > ' Me.fldPOPrefix = Nz(rstPOHeader!fldPOPrefix) > ' If IsNumeric(rstPOHeader!fldPONumber) Then > ' Me.fldPONumber = rstPOHeader!fldPONumber + 1 > ' fldPOOrderDate.SetFocus > ' Else > ' Me.fldPONumber.SetFocus > ' End If > 'End If > 'If Nz(Me.fldPOPrefix) = "" And Nz(rstPOHeader!fldPOPrefix) = "" Then _ > Me.fldPOPrefix.SetFocus > > Right now the code is commented out. If I uncomment the two lines: > > ' rstPOHeader.MoveLast > ' Me.fldPOPrefix = Nz(rstPOHeader!fldPOPrefix) > > I get the error when I try to save: > > DoCmd.DoMenuItem acFormBar, acRecordsMenu, acSaveRecord, , acMenuVer70 > > I checked the web and there is nothing. Has anyone encountered this before? > > Thanks and regards, > > Rocky Smolin > Beach Access Software > _______________________________________________ > 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 > _______________________________________________ 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 From cfoust at infostatsystems.com Wed Jan 28 15:24:17 2004 From: cfoust at infostatsystems.com (Charlotte Foust) Date: Wed, 28 Jan 2004 13:24:17 -0800 Subject: [AccessD] Decompile Message-ID: I don't bother with the registry keys, I just create a SendTo shortcut for each version of Access I'm running. Something like this: "C:\Program Files\Microsoft Office\Office10\MSACCESS.EXE" /wrkgrp C:\Windows\System32\MyWrk.mdw "%1" /decompile Then all I need do is right click the file in Windows explorer and pick the version I want to send it to for decompile. Charlotte Foust -----Original Message----- From: DWUTKA at marlow.com [mailto:DWUTKA at marlow.com] Sent: Wednesday, January 28, 2004 12:36 PM To: accessd at databaseadvisors.com Subject: RE: [AccessD] Decompile I've seen this several times, just never got around to doing it. (Still haven't, for the decompile.....). But I did add 'Open with Access 97', 'Open with Access 2000', and 'Open Secured DB'. Had to do it twice though, because once Access 2000 was opened, the settings switched, so I had to duplicate them. That Open Secured DB is something I should have put into place a while back. All of my secured databases have the same security settings for my 'personal' admin account, so no matter what database I build, with security, and no matter what .mdw I create, I can use the same account/password with any of the .mdw's, to gain admin access to it. Gotta love it! Thanks for the thread...it kicked me into gear on this... Drew -----Original Message----- From: Erwin Craps - IT Helps [mailto:Erwin.Craps at ithelps.be] Sent: Wednesday, January 28, 2004 7:49 AM To: Access Developers discussion and problem solving Subject: RE: [AccessD] Decompile Mark YOU ARE GREAT!!! Stupid thing of me is, I very well know this... Just never tought of actualy dooing this for Access Erwin... -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Mitsules, Mark S. (Newport News) Sent: Wednesday, January 28, 2004 1:40 PM To: 'Access Developers discussion and problem solving' Subject: RE: [AccessD] Decompile Dean, Courtesy of Stuart Sanders... Mark **************** Thinking about this I thought of a cool (in my view) way of handling this, that is probably what Susan was talking about. Now I'm wondering why I didn't do this years ago. 1. Start Windows Explorer, 2. Select Tools and then Folder Options... 3. Click on the File Types Tab 4. Find the MDB file type 5. Click Advanced 6. Chances are there are 2 options. Open in bold font (denoting default) and New. You can pretty much add what you want here. For decompile, 7. Click New 8. Under action type Decompile 9. Under Application used to perform action type the equivalent for your install: "C:\Program Files\Microsoft Office\Office10\MSACCESS.EXE" /decompile "%1" 10 Click OK and exit out And wallah! You now right click an mdb and have the context option of decompiling it. But it doesn't stop there. For those of us juggling multiple versions of Access you can setup a right click option to open in each. Eg Open in 97 Open in 2000 Open in XP And make sure the path points to the correct version of access. Cheers Stuart **************** -----Original Message----- From: Dean Ellis [mailto:deanellis at iprimus.com.au] Sent: Wednesday, January 28, 2004 7:36 AM To: AccessD Subject: [AccessD] Decompile _______________________________________________ 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 _______________________________________________ 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 From DWUTKA at marlow.com Wed Jan 28 15:29:39 2004 From: DWUTKA at marlow.com (DWUTKA at marlow.com) Date: Wed, 28 Jan 2004 15:29:39 -0600 Subject: [AccessD] Question of process Message-ID: <2F8793082E00D4119A1700B0D0216BF8022277DF@main2.marlow.com> I think you just need to apply the rules of normalization here. Build a 'person' table, with information that is common no matter what 'type' they are. Then, if you need more information for a particular type, build a table for the extra information, but give it a foriegn key field back to the person table. That way, the person ID will interrelate all types that a person is. Drew -----Original Message----- From: John Clark [mailto:John.Clark at niagaracounty.com] Sent: Wednesday, January 28, 2004 9:39 AM To: accessd at databaseadvisors.com Subject: [AccessD] Question of process I am beginning a new project. The purpose of this program will be to track indictment cases for the District Attorney's office. My question isn't so much technical, like usual, but rather 'technique'. I'll start with a scenario: Lets say I am a Asst. DA, so I am in the system as such. Then after a couple of years, I go into private practice and become a defense attorney; I may now be in the system as the lawyer for a defendant. Now let's assume that I am assaulted and my attacker is charged, so now I am in this system as a victim of this case. Finally, I cross over to the dark side (I know lawyers are already there), and I am indicted for a crime of my own. I will now be in the system as a defendant, a victim, a defense attorney, and an ADA...these last two, very probably, several times. My situation is that I would like to bring up every instance of a person fitting this description, or similar ones. For Instance a report of the previous example might produce the following: JOHN W CLARK #2001-023 ADA #2001-102 ADA #2001-140 ADA #2002-334 ATTORNEY #2003-153 ATTORNEY #2003-543 VICTIM #2003-654 ATTORNEY #2004-030 DEFENDANT I had originally thought to create a table for the 'types' (i.e. attorney, ADA, victim, etc.), a table with names and personal info, an indictment table, and link these all via a fourth table, but this soon seemed insufficient. The average indictment number will have at least five people connected to it (Defendant, Attorney, ADA, Victim, and Judge), and possibly many more, with multiple victims and/or co-defendants. Am I over thinking this? Would it just be as simple as having a table for each type and searching these tables by indictment number later in the program? I thought that maybe, by typing this out, it would be clearer in my mind, by the time I was done, but I am still fuzzy with it! Thanks for any insight or advise you could give me! John W Clark _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From DWUTKA at marlow.com Wed Jan 28 15:33:21 2004 From: DWUTKA at marlow.com (DWUTKA at marlow.com) Date: Wed, 28 Jan 2004 15:33:21 -0600 Subject: [AccessD] Getting internet data Message-ID: <2F8793082E00D4119A1700B0D0216BF8022277E0@main2.marlow.com> John, I wrote some code that that PUSHES data to a web page, but it would be a simple matter of reversing the process (sort of) to read data from the web. Here's the module I wrote to do that: Option Compare Database Public KatIE As InternetExplorer Function CheckForNull(strTemp) If IsNull(strTemp) Then CheckForNull = "" Else CheckForNull = strTemp End If End Function Function OpenKatExplorer() Dim rs As ADODB.Recordset Set rs = New ADODB.Recordset rs.Open "tblDefaultURL", CurrentProject.Connection, adOpenKeyset, adLockReadOnly rs.MoveFirst Set KatIE = Nothing Set KatIE = GetObject("", "InternetExplorer.Application") KatIE.Visible = True KatIE.Navigate rs.Fields(0).Value rs.Close Set rs = Nothing End Function Function SetKatData(strKey As String) On Error GoTo ErrorHandler Dim strSQL As String Dim rs As Recordset Dim rsTemp As Recordset Dim itm Dim tmpDate As Date Dim intMonth As Long Dim intYear As Long strSQL = "SELECT tblSORM_TWCC1S.I_strLastName, tblSORM_TWCC1S.I_strMiddleName, tblS" & _ "ORM_TWCC1S.I_strFirstName, tblSORM_TWCC1S.I_strSex, tblSORM_TWCC1S.I_strSocialSecu" & _ "rityNumber, tblSORM_TWCC1S.I_strHomePhone, tblSORM_TWCC1S.I_strWorkPhoneNumber, tb" & _ "lSORM_TWCC1S.P_logSpeakEnglish, tblSORM_TWCC1S.I_strStreetAddress1, tblSORM_TWCC1S" & _ ".I_strStreetAddress2, tblSORM_TWCC1S.I_strCity, tblSORM_TWCC1S.P_strCounty, tblSOR" & _ "M_TWCC1S.I_strZipCode, tblSORM_TWCC1S.IM_memIncidentDescription, tblSORM_TWCC1S.I_" & _ "strWorksiteLocation, tblSORM_TWCC1S.I_strSiteName, tblSORM_TWCC1S.S_strAddress1, t" & _ "blSORM_TWCC1S.S_strCounty, tblSORM_TWCC1S.S_strCity, tblSORM_TWCC1S.S_strState, tb" & _ "lSORM_TWCC1S.S_strZipCode, tblSORM_TWCC1S.IM_memWitnesses, tblSORM_TWCC1S.I_logDea" & _ "th, tblSORM_TWCC1S.I_strSupervisorNotified, tblSORM_TWCC1S.I_dtmNotifiedOfIncident" & _ ", tblSORM_TWCC1S.P_logRecruitedInState, tblSORM_TWCC1S.P_strJobClassification, tbl" & _ "SORM_TWCC1S.II_intHourPerDay, tblSORM_TWCC1S.II_curWagePerWeek, tblSORM_TWCC1S.SORM" & _ "_curLastPayCheck, tblSORM_TWCC1S.II_intDayPerWeek, tblSORM_TWCC1S.P_strMarried, t" & _ "blSORM_TWCC1S.P_intNumberOfDependents, tblSORM_TWCC1S.P_strSpouseName , tblSORM_TW" & _ "CC1S.I_strDoctorName, tblSORM_TWCC1S.D_strPhone, tblSORM_TWCC1S.D_strStreetAddress" & _ "1, tblSORM_TWCC1S.D_strCity, tblSORM_TWCC1S.D_strState, tblSORM_TWCC1S.D_strZipCod" & _ "e, tblSORM_TWCC1S.I_dtmIncidentDate, tblSORM_TWCC1S.I_dtmIncidentTime, tblSORM_TWC" & _ "C1S.C_strAddress1, tblSORM_TWCC1S.C_strPhone, tblSORM_TWCC1S.C_strCity, tblSORM_TW" & _ "CC1S.C_strState, tblSORM_TWCC1S.C_strZipCode, tblSORM_TWCC1S.C_strFederalTaxNumber" & _ ", tblSORM_TWCC1S.C_strSICStandard, tblSORM_TWCC1S.C_strSICSpecific, tblSORM_TWCC1S" & _ ".P_strPayCode, tblSORM_TWCC1S.P_dtmDateOfHire, tblSORM_TWCC1S.P_dtmDateOf" & _ "Birth, tblSORM_TWCC1S.P_strLanguage, tblSORM_TWCC1S.LD_dtmFirstLostDay, tblSORM_T" & _ "WCC1S.JobCompare, tblSORM_TWCC1S.I_dtmDateBackToWork, tblSORM_TWCC1S.Sorm_intLenOc" & _ "cYears, tblSORM_TWCC1S.Sorm_intLenOccMonths, tblSORM_TWCC1S.Sorm_logacci_prevent_r" & _ "eq, tblSORM_TWCC1S.Sorm_logacci_prevent_received, tblSORM_TWCC1S.Sorm_logOwner, " strSQL = strSQL & "tblSORM_TWCC1S.Sorm_intSickHours, tblSORM_TWCC1S" & _ ".Sorm_intAnnualLeave, tblSORM_TWCC1S.P_strLanguage, tblSORM_TWCC1S.I_strState, t" & _ "blSORM_TWCC1S.P_strCounty, tblSORM_TWCC1S.C_strPersonCompletingFormName" & _ ", tblSORM_TWCC1S.C_strPersonCompletingFormJobTitle, tblSORM_TWCC1S.Sorm_strAgencyLocationCode" & _ ", tblSORM_TWCC1S.Sorm_logacci_prevent_req, tblSORM_TWCC1S.Sorm_logacci_prevent_received " & _ "FROM tblSORM_TWCC1S " & _ "WHERE (((tblSORM_TWCC1S.pkCaseNumber)=""" & strKey & """));" Set rs = New ADODB.Recordset rs.Open strSQL, CurrentProject.Connection, adOpenKeyset, adLockReadOnly If rs.EOF = False Then rs.MoveFirst With KatIE.Document.theForm .lastname.Value = CheckForNull(rs.Fields(0).Value) .middlename.Value = CheckForNull(rs.Fields(1).Value) .firstname.Value = CheckForNull(rs.Fields(2).Value) Select Case UCase(Left(CheckForNull(rs.Fields(3).Value), 1)) Case "F" .gender(0).Checked = True Case "M" .gender(1).Checked = True End Select .SSN.Value = CheckForNull(rs.Fields(4).Value) .homephone.Value = CheckForNull(rs.Fields(5).Value) .employeephone.Value = CheckForNull(rs.Fields(6).Value) If rs.Fields(7).Value = True Then .english(0).Checked = True Else .english(1).Checked = True .language.Value = CheckForNull(rs.Fields(64).Value) End If .mail_address1.Value = CheckForNull(rs.Fields(8).Value) .mail_address2.Value = CheckForNull(rs.Fields(9).Value) .mail_city.Value = CheckForNull(rs.Fields(10).Value) For Each itm In .mail_county.options If Trim(UCase(Mid(itm.Text, 5))) = Trim(UCase(CheckForNull(rs.Fields(11).Value))) Then itm.Selected = True Exit For End If Next .mail_zip.Value = CheckForNull(rs.Fields(12).Value) .mail_state.Value = CheckForNull(rs.Fields(65).Value) .occurred_how.Value = CheckForNull(rs.Fields(13).Value) .injury_location.Value = CheckForNull(rs.Fields(14).Value) .site_address_name.Value = CheckForNull(rs.Fields(15).Value) .site_street.Value = CheckForNull(rs.Fields(16).Value) For Each itm In .site_county.options If Trim(UCase(Mid(itm.Text, 5))) = Trim(UCase(CheckForNull(rs.Fields(17).Value))) Then itm.Selected = True Exit For End If Next .site_city.Value = CheckForNull(rs.Fields(18).Value) .site_state.Value = CheckForNull(rs.Fields(19).Value) .site_zip.Value = CheckForNull(rs.Fields(20).Value) .witnesses.Value = CheckForNull(rs.Fields(21).Value) If rs.Fields(22).Value = True Then .emp_death(0).Checked = True Else .emp_death(1).Checked = True End If .supervisor_name.Value = CheckForNull(rs.Fields(23).Value) .report_date.Value = Format(CheckForNull(rs.Fields(24).Value), "mm/dd/yyyy") If CheckForNull(rs.Fields(25).Value) = True Then .tx_recruit(0).Checked = True Else .tx_recruit(1).Checked = True End If .injured_occupy.Value = CheckForNull(rs.Fields(26).Value) .pay_rate.Value = CheckForNull(rs.Fields(28).Value) .pay_frequency.Value = "W" .full_week_hours.Value = rs.Fields(27).Value * rs.Fields(30).Value .last_paycheck.Value = Format(CheckForNull(rs.Fields(29).Value), "#,##0.00") .full_week_days.Value = CheckForNull(rs.Fields(30).Value) For Each itm In .marital_status.options If Trim(UCase(itm.Text)) = Trim(UCase(CheckForNull(rs.Fields(31).Value))) Then itm.Selected = True Exit For End If Next .kid_number.Value = CheckForNull(rs.Fields(32).Value) .spouse_name.Value = CheckForNull(rs.Fields(33).Value) .doctor_name.Value = CheckForNull(rs.Fields(34).Value) .doctor_phone.Value = Format(CheckForNull(rs.Fields(35).Value), "000-000-0000") .doctor_street.Value = CheckForNull(rs.Fields(36).Value) .doctor_city.Value = CheckForNull(rs.Fields(37).Value) .doctor_state.Value = CheckForNull(rs.Fields(38).Value) .doctor_zip.Value = CheckForNull(rs.Fields(39).Value) .injury_date.Value = Format(CheckForNull(rs.Fields(40).Value), "mm/dd/yyyy") .injury_time.Value = Left(Format(CheckForNull(rs.Fields(41).Value), "hh:nnAMPM"), 5) If Hour(CheckForNull(rs.Fields(41).Value)) >= 12 Then .injury_AMPM(1).Checked = True Else .injury_AMPM(0).Checked = True End If .agency_mail_address.Value = CheckForNull(rs.Fields(42).Value) .agency_phone.Value = Format(CheckForNull(rs.Fields(43).Value), "000-000-0000") .agency_city.Value = CheckForNull(rs.Fields(44).Value) .agency_state.Value = CheckForNull(rs.Fields(45).Value) .agency_zip.Value = CheckForNull(rs.Fields(46).Value) .fed_id_num.Value = CheckForNull(rs.Fields(47).Value) .pSIC.Value = CheckForNull(rs.Fields(48).Value) .sSIC.Value = CheckForNull(rs.Fields(49).Value) .payroll_class_code.Value = CheckForNull(rs.Fields(50).Value) .hire_date.Value = Format(CheckForNull(rs.Fields(51).Value), "mm/dd/yyyy") .birth_date.Value = CheckForNull(rs.Fields(52).Value) .language.Value = CheckForNull(rs.Fields(53).Value) If IsNull(rs.Fields(54).Value) Then .loss_date.Value = "NLT" Else .loss_date.Value = Format(rs.Fields(54).Value, "mm/dd/yyyy") End If If UCase(CheckForNull(rs.Fields(55).Value)) = "YES" Then .normal_job(0).Checked = True Else .normal_job(1).Checked = True End If .return_date.Value = Format(CheckForNull(rs.Fields(56).Value), "mm/dd/yyyy") .occupy_years.Value = CheckForNull(rs.Fields(57).Value) .occupy_months.Value = CheckForNull(rs.Fields(58).Value) If rs.Fields(59).Value = True Then .accident_prevent_req_receive(0).Checked = True Else .accident_prevent_req_receive(1).Checked = True End If If rs.Fields(60).Value = True Then .accident_prevent_req_resolve(0).Checked = True Else .accident_prevent_req_resolve(1).Checked = True End If If rs.Fields(61).Value = True Then .officer(0).Checked = True Else .officer(1).Checked = True End If .injury_cause.Value = CheckForNull(rs.Fields(62).Value) .sick_leave.Value = CheckForNull(rs.Fields(62).Value) .annual_leave.Value = CheckForNull(rs.Fields(63).Value) .completing_name.Value = CheckForNull(rs.Fields(67).Value) .completing_title.Value = CheckForNull(rs.Fields(68).Value) .agency_lcode1.Value = CheckForNull(rs.Fields(69).Value) If rs.Fields(70).Value = True Then .accident_prevent_req_receive(0).Checked = True Else .accident_prevent_req_receive(1).Checked = True End If If rs.Fields(71).Value = True Then .accident_prevent_req_resolve(0).Checked = True Else .accident_prevent_req_resolve(1).Checked = True End If Set rsTemp = New ADODB.Recordset strSQL = "SELECT tblSORM_NatureOfInjury.SormN_strDescription " & _ "FROM tblSORM_NatureOfInjury " & _ "WHERE (((tblSORM_NatureOfInjury.SormN_fk_CaseNumber)=""" & strKey & """));" rsTemp.Open strSQL, CurrentProject.Connection, adOpenKeyset, adLockReadOnly If rsTemp.EOF = False Then rs.MoveFirst Do Until rsTemp.EOF = True For Each itm In .injury_nature.options If Trim(UCase(itm.Text)) = Trim(UCase(rsTemp.Fields(0).Value)) Then itm.Selected = True Exit For End If Next rsTemp.MoveNext Loop rsTemp.Close Set rsTemp = Nothing Set rsTemp = New ADODB.Recordset strSQL = "SELECT tblSORM_BodyPart.SormBDY_strDescription " & _ "FROM tblSORM_BODYPart " & _ "WHERE (((tblSORM_BodyPart.SormBDY_fk_CaseNumber)=""" & strKey & """));" rsTemp.Open strSQL, CurrentProject.Connection, adOpenKeyset, adLockReadOnly If rsTemp.EOF = False Then rs.MoveFirst Do Until rsTemp.EOF = True For Each itm In .part_injured.options If Trim(UCase(itm.Text)) = Trim(UCase(rsTemp.Fields(0).Value)) Then itm.Selected = True Exit For End If Next rsTemp.MoveNext Loop rsTemp.Close Set rsTemp = Nothing Set rsTemp = New ADODB.Recordset strSQL = "SELECT tblSORM_Cause.SormCS_strDescription " & _ "FROM tblSORM_Cause " & _ "WHERE (((tblSORM_Cause.SormCS_fk_CaseNumber)=""" & strKey & """));" rsTemp.Open strSQL, CurrentProject.Connection, adOpenKeyset, adLockReadOnly If rsTemp.EOF = False Then rs.MoveFirst Do Until rsTemp.EOF = True For Each itm In .injury_cause.options If Trim(UCase(itm.Text)) = Trim(UCase(rsTemp.Fields(0).Value)) Then itm.Selected = True Exit For End If Next rsTemp.MoveNext Loop rsTemp.Close Set rsTemp = Nothing tmpDate = CheckForNull(rs.Fields(51).Value) intMonth = 0 intYear = 0 tmpDate = tmpDate + (365.25 / 12) Do Until tmpDate >= rs.Fields(40).Value intMonth = intMonth + 1 If intMonth = 12 Then intMonth = 0 intYear = intYear + 1 End If tmpDate = tmpDate + (365.25 / 12) Loop .pos_service_years.Value = intYear .pos_service_months.Value = intMonth End With MsgBox "Done" Else MsgBox "No Data for this case number.", vbOKOnly + vbCritical, "No Data" End If rs.Close Set rs = Nothing Exit Function ErrorHandler: MsgBox "Data Upload failed." Err.Clear End Function -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of John W. Colby Sent: Wednesday, January 28, 2004 1:03 PM To: AccessD Subject: [AccessD] Getting internet data I need to get some internet data into a db. In order to do that I need to "navigate", specifically I have to enter a username / password which will bring me to a specific page. After that clicking on tabs at the top take me to other pages I'd also like to get data off of. Does anyone know how to do this from VBA? John W. Colby www.ColbyConsulting.com _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From DWUTKA at marlow.com Wed Jan 28 15:36:20 2004 From: DWUTKA at marlow.com (DWUTKA at marlow.com) Date: Wed, 28 Jan 2004 15:36:20 -0600 Subject: [AccessD] Getting internet data Message-ID: <2F8793082E00D4119A1700B0D0216BF8022277E1@main2.marlow.com> You may be able to 'browse' to secured sites, with the following URL: http://username:password at www.website.com This works for sites that use plain text password security, if you are prompted for a domain, along with a name and password, then the URL 'format' above won't work, but IE can be setup to use your currently logged on credentials. Drew -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Erwin Craps - IT Helps Sent: Wednesday, January 28, 2004 2:53 PM To: Access Developers discussion and problem solving Subject: RE: [AccessD] Getting internet data I done that before (and still using it) with a HTTP control from IP Works (I believe they changed name into something else). You can get the page in a string and analyse it further. I believe there is a basic control from MS also in Access or VB, a HTTP control. Only one thing I don't know and is the tricky part... The password. No experiance in that one. But you should look at a HTTP control. I have my first code done with the XML parser. There is a HTTP XML parser to, maybe this can do the trick to. Erwin -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of John W. Colby Sent: Wednesday, January 28, 2004 8:03 PM To: AccessD Subject: [AccessD] Getting internet data I need to get some internet data into a db. In order to do that I need to "navigate", specifically I have to enter a username / password which will bring me to a specific page. After that clicking on tabs at the top take me to other pages I'd also like to get data off of. Does anyone know how to do this from VBA? John W. Colby www.ColbyConsulting.com _______________________________________________ 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 From bchacc at san.rr.com Wed Jan 28 15:42:09 2004 From: bchacc at san.rr.com (Rocky Smolin - Beach Access Software) Date: Wed, 28 Jan 2004 13:42:09 -0800 Subject: [AccessD] Error 2468 - You can't carry out this actionatthepresent time. References: Message-ID: <012e01c3e5e7$94fbec90$6601a8c0@HAL9002> Charlotte: No the main form has record source "tblPOHeader" and the sub-form on the second page of the tab has record source "tblPODetail". Rocky ----- Original Message ----- From: "Charlotte Foust" To: "Access Developers discussion and problem solving" Sent: Wednesday, January 28, 2004 1:20 PM Subject: RE: [AccessD] Error 2468 - You can't carry out this actionatthepresent time. > It sounds like you may have the parent and child forms linked to the > same dataset. Do you? > > Charlotte Foust > > -----Original Message----- > From: Rocky Smolin - Beach Access Software [mailto:bchacc at san.rr.com] > Sent: Wednesday, January 28, 2004 1:04 PM > To: Access Developers discussion and problem solving > Subject: Re: [AccessD] Error 2468 - You can't carry out this action > atthepresent time. > > > I'm getting closer. I deleted the sub-form that on the second tab of > the tab form and the two deletes worked. > > It has something to do with a sub form on a tab. Any clues, anybody? > > Rocky > > ----- Original Message ----- > From: "Joe K Anderson" > To: "Rocky Smolin - Beach Access Software" ; > > Cc: "Wayne Warren Angelucci" ; "Gordon > Bennett" ; "Barry Hynum" > ; "Dixon Foss" ; "Mark Krisburg" > > Sent: Wednesday, January 28, 2004 11:44 AM > Subject: Re: [AccessD] Error 2468 - You can't carry out this action at > thepresent time. > > > You may need to do a Requery between deletes? > > joe > ----- Original Message ----- > From: Rocky Smolin - Beach Access Software > To: Access Developers discussion and problem solving > Cc: Wayne Warren Angelucci ; Mark Krisburg ; Joe Anderson ; Gordon > Bennett ; Dixon Foss ; Bob Heygood ; Barry Hynum > Sent: 01-28-2004 11:34 > Subject: Re: [AccessD] Error 2468 - You can't carry out this action at > the present time. > > > Randall: > > Tried this experiment just to get the DAO recordset out of the way. I > deleted all references to it. > > Then I replaced: > > 'DoCmd.SetWarnings False > 'DoCmd.DoMenuItem acFormBar, acEditMenu, 8, , acMenuVer70 > 'DoCmd.DoMenuItem acFormBar, acEditMenu, 6, , acMenuVer70 > 'DoCmd.SetWarnings True > > with > > DoCmd.RunCommand acCmdDelete > > I selected a record and ran that code which does the delete. Then > before > trying to delete the second record, I checked the table and the record > was > still there! > > So the delete (and probably other operations) are not completing for > some > reason. > > Pluse, when I get the error, I have to use the task manager to clear > access. > It won't quit, cant close any forms, etc. > > Any ideas? > > Many thanks in advance and regards, > > is > > ----- Original Message ----- > From: "Randall Anthony" > To: "'Access Developers discussion and problem solving'" > > Sent: Wednesday, January 28, 2004 10:31 AM > Subject: RE: [AccessD] Error 2468 - You can't carry out this action at > the > present time. > > > > Right off the top of my head, it has to do with the movefirst, > movelast. > I > > ran into this when converting A97 to A2K. Code worked in A97, not > A2K and > > M$ said this was designed behavior. I'll try to find the article. > > > > -----Original Message----- > > From: Rocky Smolin - Beach Access Software > [mailto:bchacc at san.rr.com] > > Sent: Wednesday, January 28, 2004 1:07 PM > > To: AccessD at databaseadvisors.com > > Subject: [AccessD] Error 2468 - You can't carry out this action at > the > > present time. > > > > Dear List: > > > > I am getting the following error message on a bound form: > > > > Error 2468 - You can't carry out this action at the present time. > > > > This form has a sub form linked to the main form by the main form's > primary > > key. (Main form is P.O. Header, subform is P.O. Detail). > > > > I get this error if I try to delete two records in a row. > > > > DoCmd.SetWarnings False > > DoCmd.DoMenuItem acFormBar, acEditMenu, 8, , acMenuVer70 > > DoCmd.DoMenuItem acFormBar, acEditMenu, 6, , acMenuVer70 > > DoCmd.SetWarnings True > > > > I also get this error after I try to add a record. The problem > started > > because I wanted to get the last PO in the file, add one to the PO > number, > > and put the prefix and the new PO number ito the new record: > > > > DoCmd.GoToRecord , , acNewRec > > > > 'If rstPOHeader.RecordCount <> 0 Then > > ' rstPOHeader.MoveLast > > ' Me.fldPOPrefix = Nz(rstPOHeader!fldPOPrefix) > > ' If IsNumeric(rstPOHeader!fldPONumber) Then > > ' Me.fldPONumber = rstPOHeader!fldPONumber + 1 > > ' fldPOOrderDate.SetFocus > > ' Else > > ' Me.fldPONumber.SetFocus > > ' End If > > 'End If > > 'If Nz(Me.fldPOPrefix) = "" And Nz(rstPOHeader!fldPOPrefix) = "" > Then > _ > > Me.fldPOPrefix.SetFocus > > > > Right now the code is commented out. If I uncomment the two lines: > > > > ' rstPOHeader.MoveLast > > ' Me.fldPOPrefix = Nz(rstPOHeader!fldPOPrefix) > > > > I get the error when I try to save: > > > > DoCmd.DoMenuItem acFormBar, acRecordsMenu, acSaveRecord, , > acMenuVer70 > > > > I checked the web and there is nothing. Has anyone encountered this > before? > > > > Thanks and regards, > > > > Rocky Smolin > > Beach Access Software > > _______________________________________________ > > 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 > > > _______________________________________________ > 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 > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com From my.lists at verizon.net Wed Jan 28 15:43:25 2004 From: my.lists at verizon.net (Francisco H Tapia) Date: Wed, 28 Jan 2004 13:43:25 -0800 Subject: [AccessD] Vonage In-Reply-To: <2F8793082E00D4119A1700B0D0216BF8022277DE@main2.marlow.com> References: <2F8793082E00D4119A1700B0D0216BF8022277DE@main2.marlow.com> Message-ID: <40182CFD.7090707@verizon.net> Drew who? ;o) -- -Francisco (I know, I know, this should be in OT or at least dba-tech) DWUTKA at marlow.com wrote: >Please note, that until this post, I have COMPLETELY stayed out of this >thread! (just wanted that noted in the official 'how bad has Drew >been lately' log. > >Drew > >-----Original Message----- >From: Bryan Carbonnell [mailto:carbonnb at sympatico.ca] >Sent: Wednesday, January 28, 2004 9:32 AM >To: accessd at databaseadvisors.com >Subject: Re: RE: [AccessD] Vonage > > > > >>From: "John W. Colby" >> >> > > > >>Right, sorry. It's just been sooooo dead lately I thought I'd brighten >>things up a bit. ;-) >> >> > >That's one of the reasons it was allowed to go on for a week. > >That and I'm just trying to catch up on my backlog :-)) > > > > > From prosoft6 at hotmail.com Wed Jan 28 15:43:35 2004 From: prosoft6 at hotmail.com (Julie Reardon-Taylor) Date: Wed, 28 Jan 2004 16:43:35 -0500 Subject: [AccessD] Vonage Message-ID: Hey, Include me too. I'm just an hour North of Syracuse in Watertown. Julie Reardon-Taylor PRO-SOFT OF NY, INC. www.pro-soft.net _________________________________________________________________ Scope out the new MSN Plus Internet Software ? optimizes dial-up to the max! http://join.msn.com/?pgmarket=en-us&page=byoa/plus&ST=1 From martyconnelly at shaw.ca Wed Jan 28 15:42:55 2004 From: martyconnelly at shaw.ca (MartyConnelly) Date: Wed, 28 Jan 2004 13:42:55 -0800 Subject: [AccessD] Getting internet data References: <46B976F2B698FF46A4FE7636509B22DF03D199@stekelbes.ithelps.local> Message-ID: <40182CDF.4070607@shaw.ca> Something like this may work Sub test() 'set reference to MS xml 3 or 4 Dim xmlhttp As MSXML2.XMLHTTP40 Set xmlhttp = New MSXML2.XMLHTTP40 'xmlhttp.Open "POST", "http://moneycentral.msn.com/investor/research/printrep.asp?Symbol=MSFT", False 'where uid and pwd are userid and password strings 'if this doesnt work the userid may have to be passed in the headers xmlhttp.Open "GET", "http://moneycentral.msn.com/scripts/webquote.dll?iPage=qd&Symbol=MSFT", False,uid.pwd xmlhttp.send 'xmlhttp.Open "POST", strURL, False 'xmlhttp.send (sString) Debug.Print xmlhttp.responseText 'then parse responseText string End Sub Erwin Craps - IT Helps wrote: >I done that before (and still using it) with a HTTP control from IP >Works (I believe they changed name into something else). >You can get the page in a string and analyse it further. >I believe there is a basic control from MS also in Access or VB, a HTTP >control. > >Only one thing I don't know and is the tricky part... The password. >No experiance in that one. But you should look at a HTTP control. > >I have my first code done with the XML parser. There is a HTTP XML >parser to, maybe this can do the trick to. > >Erwin > > >-----Original Message----- >From: accessd-bounces at databaseadvisors.com >[mailto:accessd-bounces at databaseadvisors.com] On Behalf Of John W. Colby >Sent: Wednesday, January 28, 2004 8:03 PM >To: AccessD >Subject: [AccessD] Getting internet data > >I need to get some internet data into a db. In order to do that I need >to "navigate", specifically I have to enter a username / password which >will bring me to a specific page. After that clicking on tabs at the >top take me to other pages I'd also like to get data off of. > >Does anyone know how to do this from VBA? > >John W. Colby >www.ColbyConsulting.com > > >_______________________________________________ >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 > > > -- Marty Connelly Victoria, B.C. Canada From bchacc at san.rr.com Wed Jan 28 16:13:25 2004 From: bchacc at san.rr.com (Rocky Smolin - Beach Access Software) Date: Wed, 28 Jan 2004 14:13:25 -0800 Subject: [AccessD] Error 2468 - You can't carry out this actionatthepresent time. References: Message-ID: <013201c3e5eb$f3402b50$6601a8c0@HAL9002> Charlotte: Further to my reply, I found that when I did a delete then, before I did anything else, I went and looked in the tblPOHeader and the record was still there. For some reason it's not completing the delete and that's why I think it's telling me that I can't make any moves at this time. Rocky ----- Original Message ----- From: "Charlotte Foust" To: "Access Developers discussion and problem solving" Sent: Wednesday, January 28, 2004 1:20 PM Subject: RE: [AccessD] Error 2468 - You can't carry out this actionatthepresent time. > It sounds like you may have the parent and child forms linked to the > same dataset. Do you? > > Charlotte Foust > > -----Original Message----- > From: Rocky Smolin - Beach Access Software [mailto:bchacc at san.rr.com] > Sent: Wednesday, January 28, 2004 1:04 PM > To: Access Developers discussion and problem solving > Subject: Re: [AccessD] Error 2468 - You can't carry out this action > atthepresent time. > > > I'm getting closer. I deleted the sub-form that on the second tab of > the tab form and the two deletes worked. > > It has something to do with a sub form on a tab. Any clues, anybody? > > Rocky > > ----- Original Message ----- > From: "Joe K Anderson" > To: "Rocky Smolin - Beach Access Software" ; > > Cc: "Wayne Warren Angelucci" ; "Gordon > Bennett" ; "Barry Hynum" > ; "Dixon Foss" ; "Mark Krisburg" > > Sent: Wednesday, January 28, 2004 11:44 AM > Subject: Re: [AccessD] Error 2468 - You can't carry out this action at > thepresent time. > > > You may need to do a Requery between deletes? > > joe > ----- Original Message ----- > From: Rocky Smolin - Beach Access Software > To: Access Developers discussion and problem solving > Cc: Wayne Warren Angelucci ; Mark Krisburg ; Joe Anderson ; Gordon > Bennett ; Dixon Foss ; Bob Heygood ; Barry Hynum > Sent: 01-28-2004 11:34 > Subject: Re: [AccessD] Error 2468 - You can't carry out this action at > the present time. > > > Randall: > > Tried this experiment just to get the DAO recordset out of the way. I > deleted all references to it. > > Then I replaced: > > 'DoCmd.SetWarnings False > 'DoCmd.DoMenuItem acFormBar, acEditMenu, 8, , acMenuVer70 > 'DoCmd.DoMenuItem acFormBar, acEditMenu, 6, , acMenuVer70 > 'DoCmd.SetWarnings True > > with > > DoCmd.RunCommand acCmdDelete > > I selected a record and ran that code which does the delete. Then > before > trying to delete the second record, I checked the table and the record > was > still there! > > So the delete (and probably other operations) are not completing for > some > reason. > > Pluse, when I get the error, I have to use the task manager to clear > access. > It won't quit, cant close any forms, etc. > > Any ideas? > > Many thanks in advance and regards, > > is > > ----- Original Message ----- > From: "Randall Anthony" > To: "'Access Developers discussion and problem solving'" > > Sent: Wednesday, January 28, 2004 10:31 AM > Subject: RE: [AccessD] Error 2468 - You can't carry out this action at > the > present time. > > > > Right off the top of my head, it has to do with the movefirst, > movelast. > I > > ran into this when converting A97 to A2K. Code worked in A97, not > A2K and > > M$ said this was designed behavior. I'll try to find the article. > > > > -----Original Message----- > > From: Rocky Smolin - Beach Access Software > [mailto:bchacc at san.rr.com] > > Sent: Wednesday, January 28, 2004 1:07 PM > > To: AccessD at databaseadvisors.com > > Subject: [AccessD] Error 2468 - You can't carry out this action at > the > > present time. > > > > Dear List: > > > > I am getting the following error message on a bound form: > > > > Error 2468 - You can't carry out this action at the present time. > > > > This form has a sub form linked to the main form by the main form's > primary > > key. (Main form is P.O. Header, subform is P.O. Detail). > > > > I get this error if I try to delete two records in a row. > > > > DoCmd.SetWarnings False > > DoCmd.DoMenuItem acFormBar, acEditMenu, 8, , acMenuVer70 > > DoCmd.DoMenuItem acFormBar, acEditMenu, 6, , acMenuVer70 > > DoCmd.SetWarnings True > > > > I also get this error after I try to add a record. The problem > started > > because I wanted to get the last PO in the file, add one to the PO > number, > > and put the prefix and the new PO number ito the new record: > > > > DoCmd.GoToRecord , , acNewRec > > > > 'If rstPOHeader.RecordCount <> 0 Then > > ' rstPOHeader.MoveLast > > ' Me.fldPOPrefix = Nz(rstPOHeader!fldPOPrefix) > > ' If IsNumeric(rstPOHeader!fldPONumber) Then > > ' Me.fldPONumber = rstPOHeader!fldPONumber + 1 > > ' fldPOOrderDate.SetFocus > > ' Else > > ' Me.fldPONumber.SetFocus > > ' End If > > 'End If > > 'If Nz(Me.fldPOPrefix) = "" And Nz(rstPOHeader!fldPOPrefix) = "" > Then > _ > > Me.fldPOPrefix.SetFocus > > > > Right now the code is commented out. If I uncomment the two lines: > > > > ' rstPOHeader.MoveLast > > ' Me.fldPOPrefix = Nz(rstPOHeader!fldPOPrefix) > > > > I get the error when I try to save: > > > > DoCmd.DoMenuItem acFormBar, acRecordsMenu, acSaveRecord, , > acMenuVer70 > > > > I checked the web and there is nothing. Has anyone encountered this > before? > > > > Thanks and regards, > > > > Rocky Smolin > > Beach Access Software > > _______________________________________________ > > 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 > > > _______________________________________________ > 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 > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com From andrew.haslett at ilc.gov.au Wed Jan 28 16:27:27 2004 From: andrew.haslett at ilc.gov.au (Haslett, Andrew) Date: Thu, 29 Jan 2004 08:57:27 +1030 Subject: [AccessD] OT: Getting internet data Message-ID: >From memory you can use the XMLHTTP component to scrape URL's. Can't recall any authentication methods, although there's been a couple of versions I think. Cheers, Andrew -----Original Message----- From: DWUTKA at marlow.com [mailto:DWUTKA at marlow.com] Sent: Thursday, 29 January 2004 8:06 AM To: accessd at databaseadvisors.com Subject: RE: [AccessD] Getting internet data You may be able to 'browse' to secured sites, with the following URL: http://username:password at www.website.com This works for sites that use plain text password security, if you are prompted for a domain, along with a name and password, then the URL 'format' above won't work, but IE can be setup to use your currently logged on credentials. Drew -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Erwin Craps - IT Helps Sent: Wednesday, January 28, 2004 2:53 PM To: Access Developers discussion and problem solving Subject: RE: [AccessD] Getting internet data I done that before (and still using it) with a HTTP control from IP Works (I believe they changed name into something else). You can get the page in a string and analyse it further. I believe there is a basic control from MS also in Access or VB, a HTTP control. Only one thing I don't know and is the tricky part... The password. No experiance in that one. But you should look at a HTTP control. I have my first code done with the XML parser. There is a HTTP XML parser to, maybe this can do the trick to. Erwin -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of John W. Colby Sent: Wednesday, January 28, 2004 8:03 PM To: AccessD Subject: [AccessD] Getting internet data I need to get some internet data into a db. In order to do that I need to "navigate", specifically I have to enter a username / password which will bring me to a specific page. After that clicking on tabs at the top take me to other pages I'd also like to get data off of. Does anyone know how to do this from VBA? John W. Colby www.ColbyConsulting.com _______________________________________________ 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 _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com IMPORTANT - PLEASE READ ******************** This email and any files transmitted with it are confidential and may contain information protected by law from disclosure. If you have received this message in error, please notify the sender immediately and delete this email from your system. No warranty is given that this email or files, if attached to this email, are free from computer viruses or other defects. They are provided on the basis the user assumes all responsibility for loss, damage or consequence resulting directly or indirectly from their use, whether caused by the negligence of the sender or not. From mastercafe at ctv.es Wed Jan 28 17:11:07 2004 From: mastercafe at ctv.es (MastercafeCTV) Date: Thu, 29 Jan 2004 00:11:07 +0100 Subject: [AccessD] Snapshot export fail In-Reply-To: <2F8793082E00D4119A1700B0D0216BF8022277DC@main2.marlow.com> Message-ID: <001f01c3e5f4$03312840$0200a8c0@servercafe> We have a main Form to prepare the output for the reports (to screen, excel or printer), for the screen que use de SNP format with this sentece: DoCmd.OutputTo acOutputReport, stDocName, acFormatSNP, "c:\STEEL\SNP\" & stDocName & ".snp" DoCmd.OpenForm "SnapShot", acNormal, , , acFormEdit, acDialog, "c:\STEEL\SNP\" & stDocName & ".snp" In the second line we open the main form that retrieve the SNP file that we create on the first line. The problem is that some computer indicate that OUTPUT FORMAT not AVAILABLE. We install Win2k with AXP and run fine only in 2 computers, and the other 4 not possible. We try to install the snaphot control, and check the main library, AXP is full installed. What happen?? What is the problem?? What we forget to do?? Juan =========================================== MASTERCAFE SL - NIF B-82.617.614 www.mastercafe.com Deleg. Asturias Tel 985.88.49.44 / 627.531.764 Fax 627.500.205 info at mastercafe.com juan at mastercafe.com Deleg. Madrid Tel 627.474.285 cecilia at mastercafe.com =========================================== From doug at murphyscreativity.com Wed Jan 28 17:44:35 2004 From: doug at murphyscreativity.com (Doug Murphy) Date: Wed, 28 Jan 2004 15:44:35 -0800 Subject: [AccessD] Error # 3343 Unrecognized database format In-Reply-To: Message-ID: <001a01c3e5f8$afdde1b0$8500a8c0@CX615377a> Folks, I have a client who has started getting an Error #3343 on their back end DB. The DB is Access 97. From what I can find on this error it usually has to do with database writes being interupted or hard shutdowns. They claim that there have been no changes to thier network and that all computers are working fine. I am going up to their site tomorrow to see if I can figure out what is going on. Any suggestions on what to look for asside from the normal Access maintenance related things. I am not a network person so don't really know how to diagnose those types of issues that might be causing this problem. Thanks for any suggestions you can provide. Doug From cfoust at infostatsystems.com Wed Jan 28 17:47:59 2004 From: cfoust at infostatsystems.com (Charlotte Foust) Date: Wed, 28 Jan 2004 15:47:59 -0800 Subject: [AccessD] Error 2468 - You can't carry out thisactionatthepresent time. Message-ID: Rocky, I suspect you're running into an issue I've seen in somewhat similar circumstances, where the deletion didn't actually seem to get processed until I requeried the subform. Have you tried a DBEngine.Idle dbRefreshCache after the deletion? Charlotte Foust -----Original Message----- From: Rocky Smolin - Beach Access Software [mailto:bchacc at san.rr.com] Sent: Wednesday, January 28, 2004 2:13 PM To: Access Developers discussion and problem solving Subject: Re: [AccessD] Error 2468 - You can't carry out thisactionatthepresent time. Charlotte: Further to my reply, I found that when I did a delete then, before I did anything else, I went and looked in the tblPOHeader and the record was still there. For some reason it's not completing the delete and that's why I think it's telling me that I can't make any moves at this time. Rocky ----- Original Message ----- From: "Charlotte Foust" To: "Access Developers discussion and problem solving" Sent: Wednesday, January 28, 2004 1:20 PM Subject: RE: [AccessD] Error 2468 - You can't carry out this actionatthepresent time. > It sounds like you may have the parent and child forms linked to the > same dataset. Do you? > > Charlotte Foust > > -----Original Message----- > From: Rocky Smolin - Beach Access Software [mailto:bchacc at san.rr.com] > Sent: Wednesday, January 28, 2004 1:04 PM > To: Access Developers discussion and problem solving > Subject: Re: [AccessD] Error 2468 - You can't carry out this action > atthepresent time. > > > I'm getting closer. I deleted the sub-form that on the second tab of > the tab form and the two deletes worked. > > It has something to do with a sub form on a tab. Any clues, anybody? > > Rocky > > ----- Original Message ----- > From: "Joe K Anderson" > To: "Rocky Smolin - Beach Access Software" ; > > Cc: "Wayne Warren Angelucci" ; "Gordon > Bennett" ; "Barry Hynum" > ; "Dixon Foss" ; "Mark Krisburg" > > Sent: Wednesday, January 28, 2004 11:44 AM > Subject: Re: [AccessD] Error 2468 - You can't carry out this action at > thepresent time. > > > You may need to do a Requery between deletes? > > joe > ----- Original Message ----- > From: Rocky Smolin - Beach Access Software > To: Access Developers discussion and problem solving > Cc: Wayne Warren Angelucci ; Mark Krisburg ; Joe Anderson ; Gordon > Bennett ; Dixon Foss ; Bob Heygood ; Barry Hynum > Sent: 01-28-2004 11:34 > Subject: Re: [AccessD] Error 2468 - You can't carry out this action > at the present time. > > > Randall: > > Tried this experiment just to get the DAO recordset out of the way. I > deleted all references to it. > > Then I replaced: > > 'DoCmd.SetWarnings False > 'DoCmd.DoMenuItem acFormBar, acEditMenu, 8, , acMenuVer70 > 'DoCmd.DoMenuItem acFormBar, acEditMenu, 6, , acMenuVer70 > 'DoCmd.SetWarnings True > > with > > DoCmd.RunCommand acCmdDelete > > I selected a record and ran that code which does the delete. Then > before > trying to delete the second record, I checked the table and the > record was > still there! > > So the delete (and probably other operations) are not completing for > some > reason. > > Pluse, when I get the error, I have to use the task manager to clear > access. > It won't quit, cant close any forms, etc. > > Any ideas? > > Many thanks in advance and regards, > > is > > ----- Original Message ----- > From: "Randall Anthony" > To: "'Access Developers discussion and problem solving'" > > Sent: Wednesday, January 28, 2004 10:31 AM > Subject: RE: [AccessD] Error 2468 - You can't carry out this action > at the > present time. > > > > Right off the top of my head, it has to do with the movefirst, > movelast. > I > > ran into this when converting A97 to A2K. Code worked in A97, not > A2K and > > M$ said this was designed behavior. I'll try to find the article. > > > > -----Original Message----- > > From: Rocky Smolin - Beach Access Software > [mailto:bchacc at san.rr.com] > > Sent: Wednesday, January 28, 2004 1:07 PM > > To: AccessD at databaseadvisors.com > > Subject: [AccessD] Error 2468 - You can't carry out this action at > the > > present time. > > > > Dear List: > > > > I am getting the following error message on a bound form: > > > > Error 2468 - You can't carry out this action at the present time. > > > > This form has a sub form linked to the main form by the main form's > primary > > key. (Main form is P.O. Header, subform is P.O. Detail). > > > > I get this error if I try to delete two records in a row. > > > > DoCmd.SetWarnings False > > DoCmd.DoMenuItem acFormBar, acEditMenu, 8, , acMenuVer70 > > DoCmd.DoMenuItem acFormBar, acEditMenu, 6, , acMenuVer70 > > DoCmd.SetWarnings True > > > > I also get this error after I try to add a record. The problem > started > > because I wanted to get the last PO in the file, add one to the PO > number, > > and put the prefix and the new PO number ito the new record: > > > > DoCmd.GoToRecord , , acNewRec > > > > 'If rstPOHeader.RecordCount <> 0 Then > > ' rstPOHeader.MoveLast > > ' Me.fldPOPrefix = Nz(rstPOHeader!fldPOPrefix) > > ' If IsNumeric(rstPOHeader!fldPONumber) Then > > ' Me.fldPONumber = rstPOHeader!fldPONumber + 1 > > ' fldPOOrderDate.SetFocus > > ' Else > > ' Me.fldPONumber.SetFocus > > ' End If > > 'End If > > 'If Nz(Me.fldPOPrefix) = "" And Nz(rstPOHeader!fldPOPrefix) = "" > Then > _ > > Me.fldPOPrefix.SetFocus > > > > Right now the code is commented out. If I uncomment the two lines: > > > > ' rstPOHeader.MoveLast > > ' Me.fldPOPrefix = Nz(rstPOHeader!fldPOPrefix) > > > > I get the error when I try to save: > > > > DoCmd.DoMenuItem acFormBar, acRecordsMenu, acSaveRecord, , > acMenuVer70 > > > > I checked the web and there is nothing. Has anyone encountered this > before? > > > > Thanks and regards, > > > > Rocky Smolin > > Beach Access Software > > _______________________________________________ > > 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 > > > _______________________________________________ > 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 > _______________________________________________ > 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 From awithing at twcny.rr.com Wed Jan 28 17:53:31 2004 From: awithing at twcny.rr.com (augusta) Date: Wed, 28 Jan 2004 18:53:31 -0500 Subject: [AccessD] Vonage In-Reply-To: Message-ID: <200401282353.i0SNrWEk000698@ms-smtp-02.nyroc.rr.com> Come to lunch in Clayton! > -----Original Message----- > From: accessd-bounces at databaseadvisors.com [mailto:accessd- > bounces at databaseadvisors.com] On Behalf Of John W. Colby > Sent: Wednesday, January 28, 2004 1:12 PM > To: Access Developers discussion and problem solving > Subject: RE: [AccessD] Vonage > > We should have lunch some time. My Sister-In-Law lives in Syracuse and we > get over there quite often (in good weather). > > John W. Colby > www.ColbyConsulting.com > > -----Original Message----- > From: accessd-bounces at databaseadvisors.com > [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Jim Dettman > Sent: Wednesday, January 28, 2004 12:53 PM > To: Access Developers discussion and problem solving > Subject: RE: [AccessD] Vonage > > > <> > > I do. I'm just North of Syracuse in Cicero. > > Jim Dettman > President, > Online Computer Services of WNY, Inc. > (315) 699-3443 > jimdettman at earthlink.net > > -----Original Message----- > From: accessd-bounces at databaseadvisors.com > [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of augusta > Sent: Wednesday, January 28, 2004 9:38 AM > To: 'Access Developers discussion and problem solving' > Subject: RE: [AccessD] Vonage > > > John do you use Time Warner Central NY RR? > > > -----Original Message----- > > From: accessd-bounces at databaseadvisors.com [mailto:accessd- > > bounces at databaseadvisors.com] On Behalf Of John W. Colby > > Sent: Tuesday, January 27, 2004 6:10 PM > > To: Access Developers discussion and problem solving > > Subject: RE: [AccessD] Vonage > > > > ******************************************************************* > > Item Quantity Unit Subtotal > > ******************************************************************* > > Motorola Device 1 $0.00 $0.00 > > Area Code: 315 - Syracuse 1 $0.00 $0.00 > > Activation Fee 1 $29.99 $29.99 > > *Residential Basic 500 1 $14.99 $14.99 > > ----------------------------------- > > > > State Sales Tax: $0.00 > > Federal Excise Tax: $1.35 > > Regulatory Recovery Fee:$1.50 > > Shipping: $9.95 > > Total: $57.78 > > > > * Monthly Recurring Charge. > > ******************************************************************* > > > > This does not include a charge of approximately $30 which you will be > > charged for if you do not return the modem at the end of service. > > > > Now understand that the telephone company charged me a $60 activation > fee > > when I moved from one location to another location down the road 1/2 > mile. > > All just to change my billing from one jack to another in a switchboard. > > Hmmm... > > > > In addition, ATM the Vonage $14.99 is a flat monthly fee, no taxes or > > other > > regulatory charges added. My land line STARTS at 11.53 for flat > residence > > line, plus 5.78 federal subscriber line charge, plus 1.43 Connecticut > > sales > > tax, plus .73 federal tax plus .20 E911 surcharge, plus .05 Connecticut > > Service Fund, plus .39 number portability charge, plus .56 Universal > > Service > > fund (local), plus .14 Universal Service Fund (Long Distance). Talk > about > > nickel and dimeing you to death! > > > > I NEVER get out with under $25 on a "11.50" phone line, and with all the > > "short" long distance, I rarely get out for under ~$35 WITHOUT long > > distance, which is $.10/minute. For a couple of years I have used a > > prepaid > > calling card which I programmed into my phone to get my long distance > for > > $.039 per minute (slowly inching up, now $.045). > > > > Of course I also have to pay for my blazing fast internet connection, > > which > > is a ridiculous $45 / month. Makes the $15 ($25/$35) phone bill seem > > rather > > inconsequential. But I could never go back to dialup so since I have > this > > blazing fast internet, I might as well piggyback my phone off of it. > > > > I am pleased to say it is working great so far. > > > > John W. Colby > > www.ColbyConsulting.com > > > > -----Original Message----- > > From: accessd-bounces at databaseadvisors.com > > [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Christopher > > Hawkins > > Sent: Tuesday, January 27, 2004 5:23 PM > > To: accessd at databaseadvisors.com > > Subject: RE: [AccessD] Vonage > > > > > > $15/month sounds great, but what about setup fees or equipment > > expenses? What's the "out the door" price look like? > > > > -Christopher- > > > > ---- Original Message ---- > > From: JColby at dispec.com > > To: accessd at databaseadvisors.com, > > Subject: RE: [AccessD] Vonage > > Date: Tue, 27 Jan 2004 15:05:07 -0500 > > > > >I received the phonemodem last night. Plugged it in (behind my > > >router for > > >those interested), waited 5 minutes, then picked up the receiver and > > >made a > > >call. Extremely easy to set up. > > > > > >The sound so far is crystal clear, no clicks / pops or echoes. I > > >have a > > >brand new ATT 2ghz cordless phone system which I plugged in to it. > > >I can't > > >tell the difference between this and the landline. > > > > > >I haven't done any heavy duty uploads / downloads though I will be > > >doing > > >some testing in the next few days. > > > > > >I went with the $15 / month package for 500 total minutes - local > > >and long > > >distance, with anything after that billed at $.039 / minute. If my > > >useage > > >averages more than 500 minutes I'll move up to the $25 package with > > >unlimited local and 500 long distance minutes. Given my useage > > >patterns I > > >may very well end up with a $15 / month phone including long > > >distance. > > > > > >So far so good. > > > > > >John W. Colby > > >The database guy > > > > > > _______________________________________________ > > 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 > > > _______________________________________________ > 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 From andrew.haslett at ilc.gov.au Wed Jan 28 17:57:58 2004 From: andrew.haslett at ilc.gov.au (Haslett, Andrew) Date: Thu, 29 Jan 2004 10:27:58 +1030 Subject: [AccessD] Getting internet data Message-ID: Might want to check out this article. Looks like this feature will soon be removed: http://support.microsoft.com/?kbid=834489 -----Original Message----- From: DWUTKA at marlow.com [mailto:DWUTKA at marlow.com] Sent: Thursday, 29 January 2004 8:06 AM To: accessd at databaseadvisors.com Subject: RE: [AccessD] Getting internet data You may be able to 'browse' to secured sites, with the following URL: http://username:password at www.website.com This works for sites that use plain text password security, if you are prompted for a domain, along with a name and password, then the URL 'format' above won't work, but IE can be setup to use your currently logged on credentials. Drew -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Erwin Craps - IT Helps Sent: Wednesday, January 28, 2004 2:53 PM To: Access Developers discussion and problem solving Subject: RE: [AccessD] Getting internet data I done that before (and still using it) with a HTTP control from IP Works (I believe they changed name into something else). You can get the page in a string and analyse it further. I believe there is a basic control from MS also in Access or VB, a HTTP control. Only one thing I don't know and is the tricky part... The password. No experiance in that one. But you should look at a HTTP control. I have my first code done with the XML parser. There is a HTTP XML parser to, maybe this can do the trick to. Erwin -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of John W. Colby Sent: Wednesday, January 28, 2004 8:03 PM To: AccessD Subject: [AccessD] Getting internet data I need to get some internet data into a db. In order to do that I need to "navigate", specifically I have to enter a username / password which will bring me to a specific page. After that clicking on tabs at the top take me to other pages I'd also like to get data off of. Does anyone know how to do this from VBA? John W. Colby www.ColbyConsulting.com _______________________________________________ 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 _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com IMPORTANT - PLEASE READ ******************** This email and any files transmitted with it are confidential and may contain information protected by law from disclosure. If you have received this message in error, please notify the sender immediately and delete this email from your system. No warranty is given that this email or files, if attached to this email, are free from computer viruses or other defects. They are provided on the basis the user assumes all responsibility for loss, damage or consequence resulting directly or indirectly from their use, whether caused by the negligence of the sender or not. From bchacc at san.rr.com Wed Jan 28 17:57:15 2004 From: bchacc at san.rr.com (Rocky Smolin - Beach Access Software) Date: Wed, 28 Jan 2004 15:57:15 -0800 Subject: [AccessD] Error # 3343 Unrecognized database format References: <001a01c3e5f8$afdde1b0$8500a8c0@CX615377a> Message-ID: <01b001c3e5fa$74c4dff0$6601a8c0@HAL9002> Doug: In my limited experience, this has been caused by a faulty NIC in one of the client machines. Hard to pin down because it will be intermittent. Last time a client experienced periodic corruptions of their back end it was traced to the NIC on one machine. Replaced that NIC and it stopped corrupting. You might look at their oldest machines or see if someone put a $7.95 NIC in one of the boxes. HTH Rocky ----- Original Message ----- From: "Doug Murphy" To: "'Access Developers discussion and problem solving'" Sent: Wednesday, January 28, 2004 3:44 PM Subject: [AccessD] Error # 3343 Unrecognized database format > Folks, > > I have a client who has started getting an Error #3343 on their back end > DB. The DB is Access 97. From what I can find on this error it usually > has to do with database writes being interupted or hard shutdowns. They > claim that there have been no changes to thier network and that all > computers are working fine. I am going up to their site tomorrow to see > if I can figure out what is going on. Any suggestions on what to look > for asside from the normal Access maintenance related things. I am not > a network person so don't really know how to diagnose those types of > issues that might be causing this problem. > > Thanks for any suggestions you can provide. > > Doug > > > > > > > > > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com > From bchacc at san.rr.com Wed Jan 28 18:08:18 2004 From: bchacc at san.rr.com (Rocky Smolin - Beach Access Software) Date: Wed, 28 Jan 2004 16:08:18 -0800 Subject: [AccessD] Error 2468 - You can't carry out thisactionatthepresenttime. References: Message-ID: <01d201c3e5fb$ffb96d00$6601a8c0@HAL9002> No but you can bet I will right now. (What's Engine.Idle do?) Rocky ----- Original Message ----- From: "Charlotte Foust" To: "Access Developers discussion and problem solving" Sent: Wednesday, January 28, 2004 3:47 PM Subject: RE: [AccessD] Error 2468 - You can't carry out thisactionatthepresenttime. > Rocky, > > I suspect you're running into an issue I've seen in somewhat similar > circumstances, where the deletion didn't actually seem to get processed > until I requeried the subform. Have you tried a DBEngine.Idle > dbRefreshCache after the deletion? > > Charlotte Foust > > -----Original Message----- > From: Rocky Smolin - Beach Access Software [mailto:bchacc at san.rr.com] > Sent: Wednesday, January 28, 2004 2:13 PM > To: Access Developers discussion and problem solving > Subject: Re: [AccessD] Error 2468 - You can't carry out > thisactionatthepresent time. > > > Charlotte: > > Further to my reply, I found that when I did a delete then, before I did > anything else, I went and looked in the tblPOHeader and the record was > still there. For some reason it's not completing the delete and that's > why I think it's telling me that I can't make any moves at this time. > > Rocky > > ----- Original Message ----- > From: "Charlotte Foust" > To: "Access Developers discussion and problem solving" > > Sent: Wednesday, January 28, 2004 1:20 PM > Subject: RE: [AccessD] Error 2468 - You can't carry out this > actionatthepresent time. > > > > It sounds like you may have the parent and child forms linked to the > > same dataset. Do you? > > > > Charlotte Foust > > > > -----Original Message----- > > From: Rocky Smolin - Beach Access Software [mailto:bchacc at san.rr.com] > > Sent: Wednesday, January 28, 2004 1:04 PM > > To: Access Developers discussion and problem solving > > Subject: Re: [AccessD] Error 2468 - You can't carry out this action > > atthepresent time. > > > > > > I'm getting closer. I deleted the sub-form that on the second tab of > > the tab form and the two deletes worked. > > > > It has something to do with a sub form on a tab. Any clues, anybody? > > > > Rocky > > > > ----- Original Message ----- > > From: "Joe K Anderson" > > To: "Rocky Smolin - Beach Access Software" ; > > > > Cc: "Wayne Warren Angelucci" ; "Gordon > > Bennett" ; "Barry Hynum" > > ; "Dixon Foss" ; "Mark Krisburg" > > > > Sent: Wednesday, January 28, 2004 11:44 AM > > Subject: Re: [AccessD] Error 2468 - You can't carry out this action at > > thepresent time. > > > > > > You may need to do a Requery between deletes? > > > > joe > > ----- Original Message ----- > > From: Rocky Smolin - Beach Access Software > > To: Access Developers discussion and problem solving > > Cc: Wayne Warren Angelucci ; Mark Krisburg ; Joe Anderson ; Gordon > > Bennett ; Dixon Foss ; Bob Heygood ; Barry Hynum > > Sent: 01-28-2004 11:34 > > Subject: Re: [AccessD] Error 2468 - You can't carry out this action > > at the present time. > > > > > > Randall: > > > > Tried this experiment just to get the DAO recordset out of the way. > I > > deleted all references to it. > > > > Then I replaced: > > > > 'DoCmd.SetWarnings False > > 'DoCmd.DoMenuItem acFormBar, acEditMenu, 8, , acMenuVer70 > > 'DoCmd.DoMenuItem acFormBar, acEditMenu, 6, , acMenuVer70 > > 'DoCmd.SetWarnings True > > > > with > > > > DoCmd.RunCommand acCmdDelete > > > > I selected a record and ran that code which does the delete. Then > > before > > trying to delete the second record, I checked the table and the > > record was > > still there! > > > > So the delete (and probably other operations) are not completing for > > > some > > reason. > > > > Pluse, when I get the error, I have to use the task manager to clear > > > access. > > It won't quit, cant close any forms, etc. > > > > Any ideas? > > > > Many thanks in advance and regards, > > > > is > > > > ----- Original Message ----- > > From: "Randall Anthony" > > To: "'Access Developers discussion and problem solving'" > > > > Sent: Wednesday, January 28, 2004 10:31 AM > > Subject: RE: [AccessD] Error 2468 - You can't carry out this action > > at the > > present time. > > > > > > > Right off the top of my head, it has to do with the movefirst, > > movelast. > > I > > > ran into this when converting A97 to A2K. Code worked in A97, not > > > A2K and > > > M$ said this was designed behavior. I'll try to find the article. > > > > > > -----Original Message----- > > > From: Rocky Smolin - Beach Access Software > > [mailto:bchacc at san.rr.com] > > > Sent: Wednesday, January 28, 2004 1:07 PM > > > To: AccessD at databaseadvisors.com > > > Subject: [AccessD] Error 2468 - You can't carry out this action at > > > the > > > present time. > > > > > > Dear List: > > > > > > I am getting the following error message on a bound form: > > > > > > Error 2468 - You can't carry out this action at the present time. > > > > > > This form has a sub form linked to the main form by the main > form's > > primary > > > key. (Main form is P.O. Header, subform is P.O. Detail). > > > > > > I get this error if I try to delete two records in a row. > > > > > > DoCmd.SetWarnings False > > > DoCmd.DoMenuItem acFormBar, acEditMenu, 8, , acMenuVer70 > > > DoCmd.DoMenuItem acFormBar, acEditMenu, 6, , acMenuVer70 > > > DoCmd.SetWarnings True > > > > > > I also get this error after I try to add a record. The problem > > started > > > because I wanted to get the last PO in the file, add one to the PO > > > number, > > > and put the prefix and the new PO number ito the new record: > > > > > > DoCmd.GoToRecord , , acNewRec > > > > > > 'If rstPOHeader.RecordCount <> 0 Then > > > ' rstPOHeader.MoveLast > > > ' Me.fldPOPrefix = Nz(rstPOHeader!fldPOPrefix) > > > ' If IsNumeric(rstPOHeader!fldPONumber) Then > > > ' Me.fldPONumber = rstPOHeader!fldPONumber + 1 > > > ' fldPOOrderDate.SetFocus > > > ' Else > > > ' Me.fldPONumber.SetFocus > > > ' End If > > > 'End If > > > 'If Nz(Me.fldPOPrefix) = "" And Nz(rstPOHeader!fldPOPrefix) = > "" > > Then > > _ > > > Me.fldPOPrefix.SetFocus > > > > > > Right now the code is commented out. If I uncomment the two > lines: > > > > > > ' rstPOHeader.MoveLast > > > ' Me.fldPOPrefix = Nz(rstPOHeader!fldPOPrefix) > > > > > > I get the error when I try to save: > > > > > > DoCmd.DoMenuItem acFormBar, acRecordsMenu, acSaveRecord, , > > acMenuVer70 > > > > > > I checked the web and there is nothing. Has anyone encountered > this > > before? > > > > > > Thanks and regards, > > > > > > Rocky Smolin > > > Beach Access Software > > > _______________________________________________ > > > 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 > > > > > _______________________________________________ > > 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 > > _______________________________________________ > > 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 > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com > From bchacc at san.rr.com Wed Jan 28 18:17:30 2004 From: bchacc at san.rr.com (Rocky Smolin - Beach Access Software) Date: Wed, 28 Jan 2004 16:17:30 -0800 Subject: [AccessD] Error 2468 - You can't carry out thisactionatthepresenttime. References: Message-ID: <01dc01c3e5fd$4926ec00$6601a8c0@HAL9002> Rats. No soap. Got the error on the second delete after adding the dbengineidle and the subfrm requery like this: DoCmd.SetWarnings False DoCmd.DoMenuItem acFormBar, acEditMenu, 8, , acMenuVer70 DoCmd.DoMenuItem acFormBar, acEditMenu, 6, , acMenuVer70 DoCmd.SetWarnings True DBEngine.Idle dbRefreshCache Me.Requery Me!subfrmPODetail.Requery Any other ideas? Thanks and regards, Rocky ----- Original Message ----- From: "Charlotte Foust" To: "Access Developers discussion and problem solving" Sent: Wednesday, January 28, 2004 3:47 PM Subject: RE: [AccessD] Error 2468 - You can't carry out thisactionatthepresenttime. > Rocky, > > I suspect you're running into an issue I've seen in somewhat similar > circumstances, where the deletion didn't actually seem to get processed > until I requeried the subform. Have you tried a DBEngine.Idle > dbRefreshCache after the deletion? > > Charlotte Foust > > -----Original Message----- > From: Rocky Smolin - Beach Access Software [mailto:bchacc at san.rr.com] > Sent: Wednesday, January 28, 2004 2:13 PM > To: Access Developers discussion and problem solving > Subject: Re: [AccessD] Error 2468 - You can't carry out > thisactionatthepresent time. > > > Charlotte: > > Further to my reply, I found that when I did a delete then, before I did > anything else, I went and looked in the tblPOHeader and the record was > still there. For some reason it's not completing the delete and that's > why I think it's telling me that I can't make any moves at this time. > > Rocky > > ----- Original Message ----- > From: "Charlotte Foust" > To: "Access Developers discussion and problem solving" > > Sent: Wednesday, January 28, 2004 1:20 PM > Subject: RE: [AccessD] Error 2468 - You can't carry out this > actionatthepresent time. > > > > It sounds like you may have the parent and child forms linked to the > > same dataset. Do you? > > > > Charlotte Foust > > > > -----Original Message----- > > From: Rocky Smolin - Beach Access Software [mailto:bchacc at san.rr.com] > > Sent: Wednesday, January 28, 2004 1:04 PM > > To: Access Developers discussion and problem solving > > Subject: Re: [AccessD] Error 2468 - You can't carry out this action > > atthepresent time. > > > > > > I'm getting closer. I deleted the sub-form that on the second tab of > > the tab form and the two deletes worked. > > > > It has something to do with a sub form on a tab. Any clues, anybody? > > > > Rocky > > > > ----- Original Message ----- > > From: "Joe K Anderson" > > To: "Rocky Smolin - Beach Access Software" ; > > > > Cc: "Wayne Warren Angelucci" ; "Gordon > > Bennett" ; "Barry Hynum" > > ; "Dixon Foss" ; "Mark Krisburg" > > > > Sent: Wednesday, January 28, 2004 11:44 AM > > Subject: Re: [AccessD] Error 2468 - You can't carry out this action at > > thepresent time. > > > > > > You may need to do a Requery between deletes? > > > > joe > > ----- Original Message ----- > > From: Rocky Smolin - Beach Access Software > > To: Access Developers discussion and problem solving > > Cc: Wayne Warren Angelucci ; Mark Krisburg ; Joe Anderson ; Gordon > > Bennett ; Dixon Foss ; Bob Heygood ; Barry Hynum > > Sent: 01-28-2004 11:34 > > Subject: Re: [AccessD] Error 2468 - You can't carry out this action > > at the present time. > > > > > > Randall: > > > > Tried this experiment just to get the DAO recordset out of the way. > I > > deleted all references to it. > > > > Then I replaced: > > > > 'DoCmd.SetWarnings False > > 'DoCmd.DoMenuItem acFormBar, acEditMenu, 8, , acMenuVer70 > > 'DoCmd.DoMenuItem acFormBar, acEditMenu, 6, , acMenuVer70 > > 'DoCmd.SetWarnings True > > > > with > > > > DoCmd.RunCommand acCmdDelete > > > > I selected a record and ran that code which does the delete. Then > > before > > trying to delete the second record, I checked the table and the > > record was > > still there! > > > > So the delete (and probably other operations) are not completing for > > > some > > reason. > > > > Pluse, when I get the error, I have to use the task manager to clear > > > access. > > It won't quit, cant close any forms, etc. > > > > Any ideas? > > > > Many thanks in advance and regards, > > > > is > > > > ----- Original Message ----- > > From: "Randall Anthony" > > To: "'Access Developers discussion and problem solving'" > > > > Sent: Wednesday, January 28, 2004 10:31 AM > > Subject: RE: [AccessD] Error 2468 - You can't carry out this action > > at the > > present time. > > > > > > > Right off the top of my head, it has to do with the movefirst, > > movelast. > > I > > > ran into this when converting A97 to A2K. Code worked in A97, not > > > A2K and > > > M$ said this was designed behavior. I'll try to find the article. > > > > > > -----Original Message----- > > > From: Rocky Smolin - Beach Access Software > > [mailto:bchacc at san.rr.com] > > > Sent: Wednesday, January 28, 2004 1:07 PM > > > To: AccessD at databaseadvisors.com > > > Subject: [AccessD] Error 2468 - You can't carry out this action at > > > the > > > present time. > > > > > > Dear List: > > > > > > I am getting the following error message on a bound form: > > > > > > Error 2468 - You can't carry out this action at the present time. > > > > > > This form has a sub form linked to the main form by the main > form's > > primary > > > key. (Main form is P.O. Header, subform is P.O. Detail). > > > > > > I get this error if I try to delete two records in a row. > > > > > > DoCmd.SetWarnings False > > > DoCmd.DoMenuItem acFormBar, acEditMenu, 8, , acMenuVer70 > > > DoCmd.DoMenuItem acFormBar, acEditMenu, 6, , acMenuVer70 > > > DoCmd.SetWarnings True > > > > > > I also get this error after I try to add a record. The problem > > started > > > because I wanted to get the last PO in the file, add one to the PO > > > number, > > > and put the prefix and the new PO number ito the new record: > > > > > > DoCmd.GoToRecord , , acNewRec > > > > > > 'If rstPOHeader.RecordCount <> 0 Then > > > ' rstPOHeader.MoveLast > > > ' Me.fldPOPrefix = Nz(rstPOHeader!fldPOPrefix) > > > ' If IsNumeric(rstPOHeader!fldPONumber) Then > > > ' Me.fldPONumber = rstPOHeader!fldPONumber + 1 > > > ' fldPOOrderDate.SetFocus > > > ' Else > > > ' Me.fldPONumber.SetFocus > > > ' End If > > > 'End If > > > 'If Nz(Me.fldPOPrefix) = "" And Nz(rstPOHeader!fldPOPrefix) = > "" > > Then > > _ > > > Me.fldPOPrefix.SetFocus > > > > > > Right now the code is commented out. If I uncomment the two > lines: > > > > > > ' rstPOHeader.MoveLast > > > ' Me.fldPOPrefix = Nz(rstPOHeader!fldPOPrefix) > > > > > > I get the error when I try to save: > > > > > > DoCmd.DoMenuItem acFormBar, acRecordsMenu, acSaveRecord, , > > acMenuVer70 > > > > > > I checked the web and there is nothing. Has anyone encountered > this > > before? > > > > > > Thanks and regards, > > > > > > Rocky Smolin > > > Beach Access Software > > > _______________________________________________ > > > 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 > > > > > _______________________________________________ > > 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 > > _______________________________________________ > > 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 > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com > From cfoust at infostatsystems.com Wed Jan 28 18:22:08 2004 From: cfoust at infostatsystems.com (Charlotte Foust) Date: Wed, 28 Jan 2004 16:22:08 -0800 Subject: [AccessD] Error 2468 - You can't carry outthisactionatthepresenttime. Message-ID: Ack! Lose that old A95 code, please! I can't even read it any more. Comment out the SetWarnings False and see what Access tells you about the operation. HOY! I just noticed that you appear to be running this from the parent form. Which form are you trying to delete a record from? Charlotte Foust -----Original Message----- From: Rocky Smolin - Beach Access Software [mailto:bchacc at san.rr.com] Sent: Wednesday, January 28, 2004 4:18 PM To: Access Developers discussion and problem solving Subject: Re: [AccessD] Error 2468 - You can't carry outthisactionatthepresenttime. Rats. No soap. Got the error on the second delete after adding the dbengineidle and the subfrm requery like this: DoCmd.SetWarnings False DoCmd.DoMenuItem acFormBar, acEditMenu, 8, , acMenuVer70 DoCmd.DoMenuItem acFormBar, acEditMenu, 6, , acMenuVer70 DoCmd.SetWarnings True DBEngine.Idle dbRefreshCache Me.Requery Me!subfrmPODetail.Requery Any other ideas? Thanks and regards, Rocky ----- Original Message ----- From: "Charlotte Foust" To: "Access Developers discussion and problem solving" Sent: Wednesday, January 28, 2004 3:47 PM Subject: RE: [AccessD] Error 2468 - You can't carry out thisactionatthepresenttime. > Rocky, > > I suspect you're running into an issue I've seen in somewhat similar > circumstances, where the deletion didn't actually seem to get > processed until I requeried the subform. Have you tried a > DBEngine.Idle dbRefreshCache after the deletion? > > Charlotte Foust > > -----Original Message----- > From: Rocky Smolin - Beach Access Software [mailto:bchacc at san.rr.com] > Sent: Wednesday, January 28, 2004 2:13 PM > To: Access Developers discussion and problem solving > Subject: Re: [AccessD] Error 2468 - You can't carry out > thisactionatthepresent time. > > > Charlotte: > > Further to my reply, I found that when I did a delete then, before I > did anything else, I went and looked in the tblPOHeader and the record > was still there. For some reason it's not completing the delete and > that's why I think it's telling me that I can't make any moves at this > time. > > Rocky > > ----- Original Message ----- > From: "Charlotte Foust" > To: "Access Developers discussion and problem solving" > > Sent: Wednesday, January 28, 2004 1:20 PM > Subject: RE: [AccessD] Error 2468 - You can't carry out this > actionatthepresent time. > > > > It sounds like you may have the parent and child forms linked to the > > same dataset. Do you? > > > > Charlotte Foust > > > > -----Original Message----- > > From: Rocky Smolin - Beach Access Software > > [mailto:bchacc at san.rr.com] > > Sent: Wednesday, January 28, 2004 1:04 PM > > To: Access Developers discussion and problem solving > > Subject: Re: [AccessD] Error 2468 - You can't carry out this action > > atthepresent time. > > > > > > I'm getting closer. I deleted the sub-form that on the second tab > > of the tab form and the two deletes worked. > > > > It has something to do with a sub form on a tab. Any clues, > > anybody? > > > > Rocky > > > > ----- Original Message ----- > > From: "Joe K Anderson" > > To: "Rocky Smolin - Beach Access Software" ; > > > > Cc: "Wayne Warren Angelucci" ; "Gordon > > Bennett" ; "Barry Hynum" > > ; "Dixon Foss" ; "Mark Krisburg" > > > > Sent: Wednesday, January 28, 2004 11:44 AM > > Subject: Re: [AccessD] Error 2468 - You can't carry out this action > > at thepresent time. > > > > > > You may need to do a Requery between deletes? > > > > joe > > ----- Original Message ----- > > From: Rocky Smolin - Beach Access Software > > To: Access Developers discussion and problem solving > > Cc: Wayne Warren Angelucci ; Mark Krisburg ; Joe Anderson ; Gordon > > Bennett ; Dixon Foss ; Bob Heygood ; Barry Hynum > > Sent: 01-28-2004 11:34 > > Subject: Re: [AccessD] Error 2468 - You can't carry out this > > action at the present time. > > > > > > Randall: > > > > Tried this experiment just to get the DAO recordset out of the > > way. > I > > deleted all references to it. > > > > Then I replaced: > > > > 'DoCmd.SetWarnings False > > 'DoCmd.DoMenuItem acFormBar, acEditMenu, 8, , acMenuVer70 > > 'DoCmd.DoMenuItem acFormBar, acEditMenu, 6, , acMenuVer70 > > 'DoCmd.SetWarnings True > > > > with > > > > DoCmd.RunCommand acCmdDelete > > > > I selected a record and ran that code which does the delete. Then > > before > > trying to delete the second record, I checked the table and the > > record was > > still there! > > > > So the delete (and probably other operations) are not completing > > for > > > some > > reason. > > > > Pluse, when I get the error, I have to use the task manager to > > clear > > > access. > > It won't quit, cant close any forms, etc. > > > > Any ideas? > > > > Many thanks in advance and regards, > > > > is > > > > ----- Original Message ----- > > From: "Randall Anthony" > > To: "'Access Developers discussion and problem solving'" > > > > Sent: Wednesday, January 28, 2004 10:31 AM > > Subject: RE: [AccessD] Error 2468 - You can't carry out this > > action at the > > present time. > > > > > > > Right off the top of my head, it has to do with the movefirst, > > movelast. > > I > > > ran into this when converting A97 to A2K. Code worked in A97, > > not > > > A2K and > > > M$ said this was designed behavior. I'll try to find the article. > > > > > > -----Original Message----- > > > From: Rocky Smolin - Beach Access Software > > [mailto:bchacc at san.rr.com] > > > Sent: Wednesday, January 28, 2004 1:07 PM > > > To: AccessD at databaseadvisors.com > > > Subject: [AccessD] Error 2468 - You can't carry out this action > > at > > > the > > > present time. > > > > > > Dear List: > > > > > > I am getting the following error message on a bound form: > > > > > > Error 2468 - You can't carry out this action at the present time. > > > > > > This form has a sub form linked to the main form by the main > form's > > primary > > > key. (Main form is P.O. Header, subform is P.O. Detail). > > > > > > I get this error if I try to delete two records in a row. > > > > > > DoCmd.SetWarnings False > > > DoCmd.DoMenuItem acFormBar, acEditMenu, 8, , acMenuVer70 > > > DoCmd.DoMenuItem acFormBar, acEditMenu, 6, , acMenuVer70 > > > DoCmd.SetWarnings True > > > > > > I also get this error after I try to add a record. The problem > > started > > > because I wanted to get the last PO in the file, add one to the > > PO > > > number, > > > and put the prefix and the new PO number ito the new record: > > > > > > DoCmd.GoToRecord , , acNewRec > > > > > > 'If rstPOHeader.RecordCount <> 0 Then > > > ' rstPOHeader.MoveLast > > > ' Me.fldPOPrefix = Nz(rstPOHeader!fldPOPrefix) > > > ' If IsNumeric(rstPOHeader!fldPONumber) Then > > > ' Me.fldPONumber = rstPOHeader!fldPONumber + 1 > > > ' fldPOOrderDate.SetFocus > > > ' Else > > > ' Me.fldPONumber.SetFocus > > > ' End If > > > 'End If > > > 'If Nz(Me.fldPOPrefix) = "" And Nz(rstPOHeader!fldPOPrefix) = > "" > > Then > > _ > > > Me.fldPOPrefix.SetFocus > > > > > > Right now the code is commented out. If I uncomment the two > lines: > > > > > > ' rstPOHeader.MoveLast > > > ' Me.fldPOPrefix = Nz(rstPOHeader!fldPOPrefix) > > > > > > I get the error when I try to save: > > > > > > DoCmd.DoMenuItem acFormBar, acRecordsMenu, acSaveRecord, , > > acMenuVer70 > > > > > > I checked the web and there is nothing. Has anyone encountered > this > > before? > > > > > > Thanks and regards, > > > > > > Rocky Smolin > > > Beach Access Software > > > _______________________________________________ > > > 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 > > > > > _______________________________________________ > > 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 > > _______________________________________________ > > 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 > _______________________________________________ > 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 From DWUTKA at marlow.com Wed Jan 28 18:26:05 2004 From: DWUTKA at marlow.com (DWUTKA at marlow.com) Date: Wed, 28 Jan 2004 18:26:05 -0600 Subject: [AccessD] Getting internet data Message-ID: <2F8793082E00D4119A1700B0D0216BF8022277F5@main2.marlow.com> WHAT is microsoft thinking! Grrrr..... Somedays I just think Redmond been smoking something funny! If I download that update, I'm just going to disable it in the registry. I like their user work arounds: Don't use it. Tough. At least, that's what they sounded like! Drew -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Haslett, Andrew Sent: Wednesday, January 28, 2004 5:58 PM To: 'Access Developers discussion and problem solving' Subject: RE: [AccessD] Getting internet data Might want to check out this article. Looks like this feature will soon be removed: http://support.microsoft.com/?kbid=834489 -----Original Message----- From: DWUTKA at marlow.com [mailto:DWUTKA at marlow.com] Sent: Thursday, 29 January 2004 8:06 AM To: accessd at databaseadvisors.com Subject: RE: [AccessD] Getting internet data You may be able to 'browse' to secured sites, with the following URL: http://username:password at www.website.com This works for sites that use plain text password security, if you are prompted for a domain, along with a name and password, then the URL 'format' above won't work, but IE can be setup to use your currently logged on credentials. Drew -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Erwin Craps - IT Helps Sent: Wednesday, January 28, 2004 2:53 PM To: Access Developers discussion and problem solving Subject: RE: [AccessD] Getting internet data I done that before (and still using it) with a HTTP control from IP Works (I believe they changed name into something else). You can get the page in a string and analyse it further. I believe there is a basic control from MS also in Access or VB, a HTTP control. Only one thing I don't know and is the tricky part... The password. No experiance in that one. But you should look at a HTTP control. I have my first code done with the XML parser. There is a HTTP XML parser to, maybe this can do the trick to. Erwin -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of John W. Colby Sent: Wednesday, January 28, 2004 8:03 PM To: AccessD Subject: [AccessD] Getting internet data I need to get some internet data into a db. In order to do that I need to "navigate", specifically I have to enter a username / password which will bring me to a specific page. After that clicking on tabs at the top take me to other pages I'd also like to get data off of. Does anyone know how to do this from VBA? John W. Colby www.ColbyConsulting.com _______________________________________________ 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 _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com IMPORTANT - PLEASE READ ******************** This email and any files transmitted with it are confidential and may contain information protected by law from disclosure. If you have received this message in error, please notify the sender immediately and delete this email from your system. No warranty is given that this email or files, if attached to this email, are free from computer viruses or other defects. They are provided on the basis the user assumes all responsibility for loss, damage or consequence resulting directly or indirectly from their use, whether caused by the negligence of the sender or not. _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From jwcolby at colbyconsulting.com Wed Jan 28 18:29:21 2004 From: jwcolby at colbyconsulting.com (John W. Colby) Date: Wed, 28 Jan 2004 19:29:21 -0500 Subject: [AccessD] Vonage In-Reply-To: <200401282353.i0SNrWEk000698@ms-smtp-02.nyroc.rr.com> Message-ID: LOL. I can't tell you the number of times I've driven right by there. My wife is from Massena and we drive up 81 to 37 and across. John W. Colby www.ColbyConsulting.com -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of augusta Sent: Wednesday, January 28, 2004 6:54 PM To: 'Access Developers discussion and problem solving' Subject: RE: [AccessD] Vonage Come to lunch in Clayton! > -----Original Message----- > From: accessd-bounces at databaseadvisors.com [mailto:accessd- > bounces at databaseadvisors.com] On Behalf Of John W. Colby > Sent: Wednesday, January 28, 2004 1:12 PM > To: Access Developers discussion and problem solving > Subject: RE: [AccessD] Vonage > > We should have lunch some time. My Sister-In-Law lives in Syracuse and we > get over there quite often (in good weather). > > John W. Colby > www.ColbyConsulting.com > > -----Original Message----- > From: accessd-bounces at databaseadvisors.com > [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Jim Dettman > Sent: Wednesday, January 28, 2004 12:53 PM > To: Access Developers discussion and problem solving > Subject: RE: [AccessD] Vonage > > > <> > > I do. I'm just North of Syracuse in Cicero. > > Jim Dettman > President, > Online Computer Services of WNY, Inc. > (315) 699-3443 > jimdettman at earthlink.net > > -----Original Message----- > From: accessd-bounces at databaseadvisors.com > [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of augusta > Sent: Wednesday, January 28, 2004 9:38 AM > To: 'Access Developers discussion and problem solving' > Subject: RE: [AccessD] Vonage > > > John do you use Time Warner Central NY RR? > > > -----Original Message----- > > From: accessd-bounces at databaseadvisors.com [mailto:accessd- > > bounces at databaseadvisors.com] On Behalf Of John W. Colby > > Sent: Tuesday, January 27, 2004 6:10 PM > > To: Access Developers discussion and problem solving > > Subject: RE: [AccessD] Vonage > > > > ******************************************************************* > > Item Quantity Unit Subtotal > > ******************************************************************* > > Motorola Device 1 $0.00 $0.00 > > Area Code: 315 - Syracuse 1 $0.00 $0.00 > > Activation Fee 1 $29.99 $29.99 > > *Residential Basic 500 1 $14.99 $14.99 > > ----------------------------------- > > > > State Sales Tax: $0.00 > > Federal Excise Tax: $1.35 > > Regulatory Recovery Fee:$1.50 > > Shipping: $9.95 > > Total: $57.78 > > > > * Monthly Recurring Charge. > > ******************************************************************* > > > > This does not include a charge of approximately $30 which you will be > > charged for if you do not return the modem at the end of service. > > > > Now understand that the telephone company charged me a $60 activation > fee > > when I moved from one location to another location down the road 1/2 > mile. > > All just to change my billing from one jack to another in a switchboard. > > Hmmm... > > > > In addition, ATM the Vonage $14.99 is a flat monthly fee, no taxes or > > other > > regulatory charges added. My land line STARTS at 11.53 for flat > residence > > line, plus 5.78 federal subscriber line charge, plus 1.43 Connecticut > > sales > > tax, plus .73 federal tax plus .20 E911 surcharge, plus .05 Connecticut > > Service Fund, plus .39 number portability charge, plus .56 Universal > > Service > > fund (local), plus .14 Universal Service Fund (Long Distance). Talk > about > > nickel and dimeing you to death! > > > > I NEVER get out with under $25 on a "11.50" phone line, and with all the > > "short" long distance, I rarely get out for under ~$35 WITHOUT long > > distance, which is $.10/minute. For a couple of years I have used a > > prepaid > > calling card which I programmed into my phone to get my long distance > for > > $.039 per minute (slowly inching up, now $.045). > > > > Of course I also have to pay for my blazing fast internet connection, > > which > > is a ridiculous $45 / month. Makes the $15 ($25/$35) phone bill seem > > rather > > inconsequential. But I could never go back to dialup so since I have > this > > blazing fast internet, I might as well piggyback my phone off of it. > > > > I am pleased to say it is working great so far. > > > > John W. Colby > > www.ColbyConsulting.com > > > > -----Original Message----- > > From: accessd-bounces at databaseadvisors.com > > [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Christopher > > Hawkins > > Sent: Tuesday, January 27, 2004 5:23 PM > > To: accessd at databaseadvisors.com > > Subject: RE: [AccessD] Vonage > > > > > > $15/month sounds great, but what about setup fees or equipment > > expenses? What's the "out the door" price look like? > > > > -Christopher- > > > > ---- Original Message ---- > > From: JColby at dispec.com > > To: accessd at databaseadvisors.com, > > Subject: RE: [AccessD] Vonage > > Date: Tue, 27 Jan 2004 15:05:07 -0500 > > > > >I received the phonemodem last night. Plugged it in (behind my > > >router for > > >those interested), waited 5 minutes, then picked up the receiver and > > >made a > > >call. Extremely easy to set up. > > > > > >The sound so far is crystal clear, no clicks / pops or echoes. I > > >have a > > >brand new ATT 2ghz cordless phone system which I plugged in to it. > > >I can't > > >tell the difference between this and the landline. > > > > > >I haven't done any heavy duty uploads / downloads though I will be > > >doing > > >some testing in the next few days. > > > > > >I went with the $15 / month package for 500 total minutes - local > > >and long > > >distance, with anything after that billed at $.039 / minute. If my > > >useage > > >averages more than 500 minutes I'll move up to the $25 package with > > >unlimited local and 500 long distance minutes. Given my useage > > >patterns I > > >may very well end up with a $15 / month phone including long > > >distance. > > > > > >So far so good. > > > > > >John W. Colby > > >The database guy > > > > > > _______________________________________________ > > 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 > > > _______________________________________________ > 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 _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From bchacc at san.rr.com Wed Jan 28 19:06:42 2004 From: bchacc at san.rr.com (Rocky Smolin - Beach Access Software) Date: Wed, 28 Jan 2004 17:06:42 -0800 Subject: [AccessD] Error 2468 - You can't carryoutthisactionatthepresenttime. References: Message-ID: <022a01c3e604$28942140$6601a8c0@HAL9002> Trying to delete from the parent form. A parent record that has no child records. For delete what should I use: DoCmd.RunCommand acDeleteRecord? That code came from the command button wizard. Rocky ----- Original Message ----- From: "Charlotte Foust" To: "Access Developers discussion and problem solving" Sent: Wednesday, January 28, 2004 4:22 PM Subject: RE: [AccessD] Error 2468 - You can't carryoutthisactionatthepresenttime. > Ack! Lose that old A95 code, please! I can't even read it any more. > Comment out the SetWarnings False and see what Access tells you about > the operation. > > HOY! I just noticed that you appear to be running this from the parent > form. Which form are you trying to delete a record from? > > Charlotte Foust > > -----Original Message----- > From: Rocky Smolin - Beach Access Software [mailto:bchacc at san.rr.com] > Sent: Wednesday, January 28, 2004 4:18 PM > To: Access Developers discussion and problem solving > Subject: Re: [AccessD] Error 2468 - You can't carry > outthisactionatthepresenttime. > > > Rats. No soap. Got the error on the second delete after adding the > dbengineidle and the subfrm requery like this: > > > DoCmd.SetWarnings False > DoCmd.DoMenuItem acFormBar, acEditMenu, 8, , acMenuVer70 > DoCmd.DoMenuItem acFormBar, acEditMenu, 6, , acMenuVer70 > DoCmd.SetWarnings True > > DBEngine.Idle dbRefreshCache > > Me.Requery > Me!subfrmPODetail.Requery > > Any other ideas? > > Thanks and regards, > > Rocky > > ----- Original Message ----- > From: "Charlotte Foust" > To: "Access Developers discussion and problem solving" > > Sent: Wednesday, January 28, 2004 3:47 PM > Subject: RE: [AccessD] Error 2468 - You can't carry out > thisactionatthepresenttime. > > > > Rocky, > > > > I suspect you're running into an issue I've seen in somewhat similar > > circumstances, where the deletion didn't actually seem to get > > processed until I requeried the subform. Have you tried a > > DBEngine.Idle dbRefreshCache after the deletion? > > > > Charlotte Foust > > > > -----Original Message----- > > From: Rocky Smolin - Beach Access Software [mailto:bchacc at san.rr.com] > > Sent: Wednesday, January 28, 2004 2:13 PM > > To: Access Developers discussion and problem solving > > Subject: Re: [AccessD] Error 2468 - You can't carry out > > thisactionatthepresent time. > > > > > > Charlotte: > > > > Further to my reply, I found that when I did a delete then, before I > > did anything else, I went and looked in the tblPOHeader and the record > > > was still there. For some reason it's not completing the delete and > > that's why I think it's telling me that I can't make any moves at this > > > time. > > > > Rocky > > > > ----- Original Message ----- > > From: "Charlotte Foust" > > To: "Access Developers discussion and problem solving" > > > > Sent: Wednesday, January 28, 2004 1:20 PM > > Subject: RE: [AccessD] Error 2468 - You can't carry out this > > actionatthepresent time. > > > > > > > It sounds like you may have the parent and child forms linked to the > > > > same dataset. Do you? > > > > > > Charlotte Foust > > > > > > -----Original Message----- > > > From: Rocky Smolin - Beach Access Software > > > [mailto:bchacc at san.rr.com] > > > Sent: Wednesday, January 28, 2004 1:04 PM > > > To: Access Developers discussion and problem solving > > > Subject: Re: [AccessD] Error 2468 - You can't carry out this action > > > atthepresent time. > > > > > > > > > I'm getting closer. I deleted the sub-form that on the second tab > > > of the tab form and the two deletes worked. > > > > > > It has something to do with a sub form on a tab. Any clues, > > > anybody? > > > > > > Rocky > > > > > > ----- Original Message ----- > > > From: "Joe K Anderson" > > > To: "Rocky Smolin - Beach Access Software" ; > > > > > > Cc: "Wayne Warren Angelucci" ; "Gordon > > > Bennett" ; "Barry Hynum" > > > ; "Dixon Foss" ; "Mark Krisburg" > > > > > > > Sent: Wednesday, January 28, 2004 11:44 AM > > > Subject: Re: [AccessD] Error 2468 - You can't carry out this action > > > at thepresent time. > > > > > > > > > You may need to do a Requery between deletes? > > > > > > joe > > > ----- Original Message ----- > > > From: Rocky Smolin - Beach Access Software > > > To: Access Developers discussion and problem solving > > > Cc: Wayne Warren Angelucci ; Mark Krisburg ; Joe Anderson ; Gordon > > > > Bennett ; Dixon Foss ; Bob Heygood ; Barry Hynum > > > Sent: 01-28-2004 11:34 > > > Subject: Re: [AccessD] Error 2468 - You can't carry out this > > > action at the present time. > > > > > > > > > Randall: > > > > > > Tried this experiment just to get the DAO recordset out of the > > > way. > > I > > > deleted all references to it. > > > > > > Then I replaced: > > > > > > 'DoCmd.SetWarnings False > > > 'DoCmd.DoMenuItem acFormBar, acEditMenu, 8, , acMenuVer70 > > > 'DoCmd.DoMenuItem acFormBar, acEditMenu, 6, , acMenuVer70 > > > 'DoCmd.SetWarnings True > > > > > > with > > > > > > DoCmd.RunCommand acCmdDelete > > > > > > I selected a record and ran that code which does the delete. Then > > > > before > > > trying to delete the second record, I checked the table and the > > > record was > > > still there! > > > > > > So the delete (and probably other operations) are not completing > > > for > > > > > some > > > reason. > > > > > > Pluse, when I get the error, I have to use the task manager to > > > clear > > > > > access. > > > It won't quit, cant close any forms, etc. > > > > > > Any ideas? > > > > > > Many thanks in advance and regards, > > > > > > is > > > > > > ----- Original Message ----- > > > From: "Randall Anthony" > > > To: "'Access Developers discussion and problem solving'" > > > > > > Sent: Wednesday, January 28, 2004 10:31 AM > > > Subject: RE: [AccessD] Error 2468 - You can't carry out this > > > action at the > > > present time. > > > > > > > > > > Right off the top of my head, it has to do with the movefirst, > > > movelast. > > > I > > > > ran into this when converting A97 to A2K. Code worked in A97, > > > not > > > > > A2K and > > > > M$ said this was designed behavior. I'll try to find the > article. > > > > > > > > -----Original Message----- > > > > From: Rocky Smolin - Beach Access Software > > > [mailto:bchacc at san.rr.com] > > > > Sent: Wednesday, January 28, 2004 1:07 PM > > > > To: AccessD at databaseadvisors.com > > > > Subject: [AccessD] Error 2468 - You can't carry out this action > > > at > > > > > the > > > > present time. > > > > > > > > Dear List: > > > > > > > > I am getting the following error message on a bound form: > > > > > > > > Error 2468 - You can't carry out this action at the present > time. > > > > > > > > This form has a sub form linked to the main form by the main > > form's > > > primary > > > > key. (Main form is P.O. Header, subform is P.O. Detail). > > > > > > > > I get this error if I try to delete two records in a row. > > > > > > > > DoCmd.SetWarnings False > > > > DoCmd.DoMenuItem acFormBar, acEditMenu, 8, , acMenuVer70 > > > > DoCmd.DoMenuItem acFormBar, acEditMenu, 6, , acMenuVer70 > > > > DoCmd.SetWarnings True > > > > > > > > I also get this error after I try to add a record. The problem > > > started > > > > because I wanted to get the last PO in the file, add one to the > > > PO > > > > > number, > > > > and put the prefix and the new PO number ito the new record: > > > > > > > > DoCmd.GoToRecord , , acNewRec > > > > > > > > 'If rstPOHeader.RecordCount <> 0 Then > > > > ' rstPOHeader.MoveLast > > > > ' Me.fldPOPrefix = Nz(rstPOHeader!fldPOPrefix) > > > > ' If IsNumeric(rstPOHeader!fldPONumber) Then > > > > ' Me.fldPONumber = rstPOHeader!fldPONumber + 1 > > > > ' fldPOOrderDate.SetFocus > > > > ' Else > > > > ' Me.fldPONumber.SetFocus > > > > ' End If > > > > 'End If > > > > 'If Nz(Me.fldPOPrefix) = "" And Nz(rstPOHeader!fldPOPrefix) > = > > "" > > > Then > > > _ > > > > Me.fldPOPrefix.SetFocus > > > > > > > > Right now the code is commented out. If I uncomment the two > > lines: > > > > > > > > ' rstPOHeader.MoveLast > > > > ' Me.fldPOPrefix = Nz(rstPOHeader!fldPOPrefix) > > > > > > > > I get the error when I try to save: > > > > > > > > DoCmd.DoMenuItem acFormBar, acRecordsMenu, acSaveRecord, , > > > acMenuVer70 > > > > > > > > I checked the web and there is nothing. Has anyone encountered > > this > > > before? > > > > > > > > Thanks and regards, > > > > > > > > Rocky Smolin > > > > Beach Access Software > > > > _______________________________________________ > > > > 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 > > > > > > > _______________________________________________ > > > 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 > > > _______________________________________________ > > > 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 > > _______________________________________________ > > 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 > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com > From cfoust at infostatsystems.com Wed Jan 28 19:16:55 2004 From: cfoust at infostatsystems.com (Charlotte Foust) Date: Wed, 28 Jan 2004 17:16:55 -0800 Subject: [AccessD] Error 2468 - You can'tcarryoutthisactionatthepresenttime. Message-ID: Yep, the command button wizard still writes Access 95 code. Cute, huh? Is there anything else on your form that has a connection to the same table the parent form is based on? If not, then you need to make sure there is a current record before you try deleting again. You might stick some debug.print code in there to print the current Me.fldPOPrefix or return the Me.NewRecord flag to see where you are. If you wind up on a new record by deleting the last record in the recordset, then you'll get an error if you try to go to a new record. If you're on the new record when you try to delete, you'll get an error because there is no current record. If you have started to create a new record, you can't delete it because it isn't saved, and you can't go to NewRecord for the same reason. Any way you look at it, it pays to make sure you know where you are before you try to do anything. Charlotte Foust -----Original Message----- From: Rocky Smolin - Beach Access Software [mailto:bchacc at san.rr.com] Sent: Wednesday, January 28, 2004 5:07 PM To: Access Developers discussion and problem solving Subject: Re: [AccessD] Error 2468 - You can'tcarryoutthisactionatthepresenttime. Trying to delete from the parent form. A parent record that has no child records. For delete what should I use: DoCmd.RunCommand acDeleteRecord? That code came from the command button wizard. Rocky ----- Original Message ----- From: "Charlotte Foust" To: "Access Developers discussion and problem solving" Sent: Wednesday, January 28, 2004 4:22 PM Subject: RE: [AccessD] Error 2468 - You can't carryoutthisactionatthepresenttime. > Ack! Lose that old A95 code, please! I can't even read it any more. > Comment out the SetWarnings False and see what Access tells you about > the operation. > > HOY! I just noticed that you appear to be running this from the > parent form. Which form are you trying to delete a record from? > > Charlotte Foust > > -----Original Message----- > From: Rocky Smolin - Beach Access Software [mailto:bchacc at san.rr.com] > Sent: Wednesday, January 28, 2004 4:18 PM > To: Access Developers discussion and problem solving > Subject: Re: [AccessD] Error 2468 - You can't carry > outthisactionatthepresenttime. > > > Rats. No soap. Got the error on the second delete after adding the > dbengineidle and the subfrm requery like this: > > > DoCmd.SetWarnings False > DoCmd.DoMenuItem acFormBar, acEditMenu, 8, , acMenuVer70 > DoCmd.DoMenuItem acFormBar, acEditMenu, 6, , acMenuVer70 > DoCmd.SetWarnings True > > DBEngine.Idle dbRefreshCache > > Me.Requery > Me!subfrmPODetail.Requery > > Any other ideas? > > Thanks and regards, > > Rocky > > ----- Original Message ----- > From: "Charlotte Foust" > To: "Access Developers discussion and problem solving" > > Sent: Wednesday, January 28, 2004 3:47 PM > Subject: RE: [AccessD] Error 2468 - You can't carry out > thisactionatthepresenttime. > > > > Rocky, > > > > I suspect you're running into an issue I've seen in somewhat similar > > circumstances, where the deletion didn't actually seem to get > > processed until I requeried the subform. Have you tried a > > DBEngine.Idle dbRefreshCache after the deletion? > > > > Charlotte Foust > > > > -----Original Message----- > > From: Rocky Smolin - Beach Access Software > > [mailto:bchacc at san.rr.com] > > Sent: Wednesday, January 28, 2004 2:13 PM > > To: Access Developers discussion and problem solving > > Subject: Re: [AccessD] Error 2468 - You can't carry out > > thisactionatthepresent time. > > > > > > Charlotte: > > > > Further to my reply, I found that when I did a delete then, before I > > did anything else, I went and looked in the tblPOHeader and the > > record > > > was still there. For some reason it's not completing the delete and > > that's why I think it's telling me that I can't make any moves at > > this > > > time. > > > > Rocky > > > > ----- Original Message ----- > > From: "Charlotte Foust" > > To: "Access Developers discussion and problem solving" > > > > Sent: Wednesday, January 28, 2004 1:20 PM > > Subject: RE: [AccessD] Error 2468 - You can't carry out this > > actionatthepresent time. > > > > > > > It sounds like you may have the parent and child forms linked to > > > the > > > > same dataset. Do you? > > > > > > Charlotte Foust > > > > > > -----Original Message----- > > > From: Rocky Smolin - Beach Access Software > > > [mailto:bchacc at san.rr.com] > > > Sent: Wednesday, January 28, 2004 1:04 PM > > > To: Access Developers discussion and problem solving > > > Subject: Re: [AccessD] Error 2468 - You can't carry out this > > > action atthepresent time. > > > > > > > > > I'm getting closer. I deleted the sub-form that on the second tab > > > of the tab form and the two deletes worked. > > > > > > It has something to do with a sub form on a tab. Any clues, > > > anybody? > > > > > > Rocky > > > > > > ----- Original Message ----- > > > From: "Joe K Anderson" > > > To: "Rocky Smolin - Beach Access Software" ; > > > > > > Cc: "Wayne Warren Angelucci" ; "Gordon > > > Bennett" ; "Barry Hynum" > > > ; "Dixon Foss" ; "Mark > > > Krisburg" > > > > > > > Sent: Wednesday, January 28, 2004 11:44 AM > > > Subject: Re: [AccessD] Error 2468 - You can't carry out this > > > action at thepresent time. > > > > > > > > > You may need to do a Requery between deletes? > > > > > > joe > > > ----- Original Message ----- > > > From: Rocky Smolin - Beach Access Software > > > To: Access Developers discussion and problem solving > > > Cc: Wayne Warren Angelucci ; Mark Krisburg ; Joe Anderson ; > > > Gordon > > > > Bennett ; Dixon Foss ; Bob Heygood ; Barry Hynum > > > Sent: 01-28-2004 11:34 > > > Subject: Re: [AccessD] Error 2468 - You can't carry out this > > > action at the present time. > > > > > > > > > Randall: > > > > > > Tried this experiment just to get the DAO recordset out of the > > > way. > > I > > > deleted all references to it. > > > > > > Then I replaced: > > > > > > 'DoCmd.SetWarnings False > > > 'DoCmd.DoMenuItem acFormBar, acEditMenu, 8, , acMenuVer70 > > > 'DoCmd.DoMenuItem acFormBar, acEditMenu, 6, , acMenuVer70 > > > 'DoCmd.SetWarnings True > > > > > > with > > > > > > DoCmd.RunCommand acCmdDelete > > > > > > I selected a record and ran that code which does the delete. > > > Then > > > > before > > > trying to delete the second record, I checked the table and the > > > record was > > > still there! > > > > > > So the delete (and probably other operations) are not completing > > > for > > > > > some > > > reason. > > > > > > Pluse, when I get the error, I have to use the task manager to > > > clear > > > > > access. > > > It won't quit, cant close any forms, etc. > > > > > > Any ideas? > > > > > > Many thanks in advance and regards, > > > > > > is > > > > > > ----- Original Message ----- > > > From: "Randall Anthony" > > > To: "'Access Developers discussion and problem solving'" > > > > > > Sent: Wednesday, January 28, 2004 10:31 AM > > > Subject: RE: [AccessD] Error 2468 - You can't carry out this > > > action at the > > > present time. > > > > > > > > > > Right off the top of my head, it has to do with the movefirst, > > > movelast. > > > I > > > > ran into this when converting A97 to A2K. Code worked in A97, > > > not > > > > > A2K and > > > > M$ said this was designed behavior. I'll try to find the > article. > > > > > > > > -----Original Message----- > > > > From: Rocky Smolin - Beach Access Software > > > [mailto:bchacc at san.rr.com] > > > > Sent: Wednesday, January 28, 2004 1:07 PM > > > > To: AccessD at databaseadvisors.com > > > > Subject: [AccessD] Error 2468 - You can't carry out this > > > action at > > > > > the > > > > present time. > > > > > > > > Dear List: > > > > > > > > I am getting the following error message on a bound form: > > > > > > > > Error 2468 - You can't carry out this action at the present > time. > > > > > > > > This form has a sub form linked to the main form by the main > > form's > > > primary > > > > key. (Main form is P.O. Header, subform is P.O. Detail). > > > > > > > > I get this error if I try to delete two records in a row. > > > > > > > > DoCmd.SetWarnings False > > > > DoCmd.DoMenuItem acFormBar, acEditMenu, 8, , acMenuVer70 > > > > DoCmd.DoMenuItem acFormBar, acEditMenu, 6, , acMenuVer70 > > > > DoCmd.SetWarnings True > > > > > > > > I also get this error after I try to add a record. The > > > problem started > > > > because I wanted to get the last PO in the file, add one to > > > the PO > > > > > number, > > > > and put the prefix and the new PO number ito the new record: > > > > > > > > DoCmd.GoToRecord , , acNewRec > > > > > > > > 'If rstPOHeader.RecordCount <> 0 Then > > > > ' rstPOHeader.MoveLast > > > > ' Me.fldPOPrefix = Nz(rstPOHeader!fldPOPrefix) > > > > ' If IsNumeric(rstPOHeader!fldPONumber) Then > > > > ' Me.fldPONumber = rstPOHeader!fldPONumber + 1 > > > > ' fldPOOrderDate.SetFocus > > > > ' Else > > > > ' Me.fldPONumber.SetFocus > > > > ' End If > > > > 'End If > > > > 'If Nz(Me.fldPOPrefix) = "" And Nz(rstPOHeader!fldPOPrefix) > = > > "" > > > Then > > > _ > > > > Me.fldPOPrefix.SetFocus > > > > > > > > Right now the code is commented out. If I uncomment the two > > lines: > > > > > > > > ' rstPOHeader.MoveLast > > > > ' Me.fldPOPrefix = Nz(rstPOHeader!fldPOPrefix) > > > > > > > > I get the error when I try to save: > > > > > > > > DoCmd.DoMenuItem acFormBar, acRecordsMenu, acSaveRecord, , > > > acMenuVer70 > > > > > > > > I checked the web and there is nothing. Has anyone > > > encountered > > this > > > before? > > > > > > > > Thanks and regards, > > > > > > > > Rocky Smolin > > > > Beach Access Software > > > > _______________________________________________ > > > > 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 > > > > > > > _______________________________________________ > > > 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 > > > _______________________________________________ > > > 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 > > _______________________________________________ > > 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 > _______________________________________________ > 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 From carbonnb at sympatico.ca Wed Jan 28 19:48:03 2004 From: carbonnb at sympatico.ca (Bryan Carbonnell) Date: Wed, 28 Jan 2004 20:48:03 -0500 Subject: [AccessD] Vonage In-Reply-To: References: <200401282353.i0SNrWEk000698@ms-smtp-02.nyroc.rr.com> Message-ID: <40182003.32485.B4C567@localhost> OK folks, now we are drifting dangerously close to OT fodder. -- Bryan Carbonnell - carbonnb at sympatico.ca You're just jealous because the voices only talk to me. From Subscriptions at servicexp.com Wed Jan 28 20:04:22 2004 From: Subscriptions at servicexp.com (Robert Gracie) Date: Wed, 28 Jan 2004 21:04:22 -0500 Subject: [AccessD] Interface Callback Class Questions. In-Reply-To: <008201c3e5e1$6de5e0d0$2a3ca8c0@TEXASSYSTEMS.COM> Message-ID: <000001c3e60c$371f73b0$6501a8c0@RG> Ken, Thank you very much for the help. RE: Yep your correct, you can't reference an "un-compiled" reference in an mde, which does change my approach a bit. The object however remains the same.. I implemented your solution below, and noted a few problems. The report fires, however none of the events (Close) are being hooked. I can run the report once, any attempt to run the report again fails on "RemoteReportClose mrRpt.Name" ERROR Number 2467....... Object or property... either does not exist or is closed...... I tried it in both A2K and AXP Formats, same results Do I need to hook the opening report to the events in the CReportHost class internally of the opening report, such as on the OnOpen event? I'm new to the "DEEP" Programming method so I could be way off base..... What do you think? Do you do any teaching? You are a good teacher..... Thanks For the Help Ken... Robert Gracie -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Ken Ismert Sent: Wednesday, January 28, 2004 3:58 PM To: 'Access Developers discussion and problem solving' Subject: RE: [AccessD] Interface Callback Class Questions. Robert, To make this work, you need a public object interface or type library that both projects (your Host and Remote) can agree on. You could define an Interface class in the Remote db, set its Instancing property as 2 - PublicNotCreatable, allowing you to use objects that implement this interface in both the host and remote projects. But that is not strictly necessary, as you already have the Access public type library, which defines the Report interface, which both projects obviously understand. So, you could do it this way: 1. Add a Public Report Open function in a Remote module that returns an Access.Report You also need a matching Report Close function. 2. Add a Report class in the Host to sink events from the remote report. 3. Add code in a Host module to open and close the report. As I only have A2K, I can't answer the question as to whether the Report interface is forward compatible between A2K and AXP. I tend to think so. If not, you will be forced to use another approach, likely one involving interfaces. I do have a question for you: I found I couldn't reference a remote mdb from a host mde. I had to make the remote mdb into an mde, and reference it in the host, before I could successfully make the host mde. How did you get around this? -Ken Here is the code that I wrote to test this functionality: 1. Report Open/Close functions in a Remote module: ================================================== Public Sub RemoteReportClose(sReportName As String) On Error GoTo HandleErr DoCmd.Close acReport, sReportName Exit Sub HandleErr: Err.Raise Number:=Err.Number, _ Description:=Err.Description, _ Source:="modMain.RemoteReportClose" & vbCrLf & Err.Source Exit Sub End Sub Public Function RemoteReportOpen(sReportName As String) As Access.Report On Error GoTo HandleErr ' Init Set RemoteReportOpen = Nothing ' Open Report DoCmd.OpenReport sReportName, acViewPreview ' Return Set RemoteReportOpen = Application.Reports(sReportName) Exit Function HandleErr: Err.Raise Number:=Err.Number, _ Description:=Err.Description, _ Source:="modMain.RemoteReportOpen" & vbCrLf & Err.Source Exit Function End Function 2. The CReportHost class in the Host: ======================================= Option Compare Database Option Explicit Private Const pcsEventStub As String = "[Event Procedure]" Private WithEvents mrRpt As Access.Report Property Get IsOpen() As Boolean IsOpen = Not (mrRpt Is Nothing) End Property Property Get Name() As String Name = "" If mrRpt Is Nothing Then Exit Sub Name = mrRpt.Name End Property Public Sub CloseRemoteReport() On Error GoTo HandleErr ' Close Report if Open If mrRpt Is Nothing Then Exit Sub RemoteReportClose mrRpt.Name Exit Sub HandleErr: Err.Raise Number:=Err.Number, _ Description:=Err.Description, _ Source:="CReportHost.CloseRemoteReport" & vbCrLf & Err.Source Exit Sub End Sub Public Sub OpenRemoteReport(ReportName As String) On Error GoTo HandleErr ' Open Report Set mrRpt = RemoteReportOpen(ReportName) ' Hook Close Event mrRpt.OnClose = pcsEventStub Exit Sub HandleErr: Err.Raise Number:=Err.Number, _ Description:=Err.Description, _ Source:="CReportHost.OpenRemoteReport" & vbCrLf & Err.Source Exit Sub End Sub Private Sub Class_Terminate() On Error Resume Next CloseRemoteReport End Sub Private Sub mrRpt_Close() MsgBox "Report " & mrRpt.Name & " closed!" Set mrRpt = Nothing End Sub 3. Module-level Code in Host: ============================= Public grReportHost As CReportHost ' Call this routine to open a remote report Public Sub OpenRemoteReport(sReportName As String) On Error GoTo HandleErr ' Close current Report, if any If Not (grReportHost Is Nothing) Then If grReportHost.IsOpen Then grReportHost.CloseRemoteReport End If End If ' Remake Host Object Set grReportHost = New CReportHost ' Open Report grReportHost.OpenRemoteReport sReportName Exit Sub HandleErr: MsgBox "Error: " & Err.Number & vbCrLf _ & Err.Description & vbCrLf _ & "modMain.OpenRemoteReport" & vbCrLf & Err.Source Exit Sub End Sub -----Original Message----- From: Robert Gracie [mailto:Subscriptions at servicexp.com] Sent: Tuesday, January 27, 2004 6:29 AM To: 'Access Developers discussion and problem solving' Subject: [AccessD] Interface Callback Class Questions. Hello All AK2 mde referencing A2K mdb Objective: To open a report in a (host is an mde referenced to the .mdb) referenced .mdb and have all the events for a given report fire inside the host mde. I can do this for a report located inside the mde, however I can seem to figure out how to get the report inside the .mdb to see the class in the mde, as circular references are not permitted in access. Question: I was thinking that an Interface callback would be an option. So is it possible to use an interface callback across a referenced db to accomplish my objective? Any examples...? Thanks Robert Gracie _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From accessd at shaw.ca Wed Jan 28 20:08:05 2004 From: accessd at shaw.ca (Jim Lawrence (AccessD)) Date: Wed, 28 Jan 2004 18:08:05 -0800 Subject: [AccessD] Error 2468 - You can't carry out this action at the present time. In-Reply-To: <005c01c3e5c9$7cb85bf0$6601a8c0@HAL9002> Message-ID: Hi Rocky: My suggestion and unfortunately I do not have the code at my finger tips. 1. Open a DAO recordset, selecting all the records to be removed, in dynamic mode with optimistic lock set (dbOpenDynamic, dbOptimistic). 2. Turn error off and set error to 0. When looping through the recordset, deleting/updating the content watch for an error number change...someone may be in one the records and you will not be able to delete it...other errors can (for the most part) be ignored. 3. Run requery and turn the errors on. HTH Jim -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Rocky Smolin - Beach Access Software Sent: Wednesday, January 28, 2004 10:07 AM To: AccessD at databaseadvisors.com Subject: [AccessD] Error 2468 - You can't carry out this action at the present time. Dear List: I am getting the following error message on a bound form: Error 2468 - You can't carry out this action at the present time. This form has a sub form linked to the main form by the main form's primary key. (Main form is P.O. Header, subform is P.O. Detail). I get this error if I try to delete two records in a row. DoCmd.SetWarnings False DoCmd.DoMenuItem acFormBar, acEditMenu, 8, , acMenuVer70 DoCmd.DoMenuItem acFormBar, acEditMenu, 6, , acMenuVer70 DoCmd.SetWarnings True I also get this error after I try to add a record. The problem started because I wanted to get the last PO in the file, add one to the PO number, and put the prefix and the new PO number ito the new record: DoCmd.GoToRecord , , acNewRec 'If rstPOHeader.RecordCount <> 0 Then ' rstPOHeader.MoveLast ' Me.fldPOPrefix = Nz(rstPOHeader!fldPOPrefix) ' If IsNumeric(rstPOHeader!fldPONumber) Then ' Me.fldPONumber = rstPOHeader!fldPONumber + 1 ' fldPOOrderDate.SetFocus ' Else ' Me.fldPONumber.SetFocus ' End If 'End If 'If Nz(Me.fldPOPrefix) = "" And Nz(rstPOHeader!fldPOPrefix) = "" Then _ Me.fldPOPrefix.SetFocus Right now the code is commented out. If I uncomment the two lines: ' rstPOHeader.MoveLast ' Me.fldPOPrefix = Nz(rstPOHeader!fldPOPrefix) I get the error when I try to save: DoCmd.DoMenuItem acFormBar, acRecordsMenu, acSaveRecord, , acMenuVer70 I checked the web and there is nothing. Has anyone encountered this before? Thanks and regards, Rocky Smolin Beach Access Software _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From bchacc at san.rr.com Wed Jan 28 20:34:20 2004 From: bchacc at san.rr.com (Rocky Smolin - Beach Access Software) Date: Wed, 28 Jan 2004 18:34:20 -0800 Subject: [AccessD] Error 2468 - You can'tcarryoutthisactionatthepresenttime. References: Message-ID: <024001c3e610$66b99750$6601a8c0@HAL9002> "Any way you look at it, it pays to make sure you know where you are before you try to do anything. " Good advice at any time. Brain fade dictates I address this in the a.m. Thanks for your input and have a nice night. Rocky ----- Original Message ----- From: "Charlotte Foust" To: "Access Developers discussion and problem solving" Sent: Wednesday, January 28, 2004 5:16 PM Subject: RE: [AccessD] Error 2468 - You can'tcarryoutthisactionatthepresenttime. > Yep, the command button wizard still writes Access 95 code. Cute, huh? > > Is there anything else on your form that has a connection to the same > table the parent form is based on? If not, then you need to make sure > there is a current record before you try deleting again. You might > stick some debug.print code in there to print the current Me.fldPOPrefix > or return the Me.NewRecord flag to see where you are. If you wind up on > a new record by deleting the last record in the recordset, then you'll > get an error if you try to go to a new record. If you're on the new > record when you try to delete, you'll get an error because there is no > current record. If you have started to create a new record, you can't > delete it because it isn't saved, and you can't go to NewRecord for the > same reason. Any way you look at it, it pays to make sure you know > where you are before you try to do anything. > > Charlotte Foust > > -----Original Message----- > From: Rocky Smolin - Beach Access Software [mailto:bchacc at san.rr.com] > Sent: Wednesday, January 28, 2004 5:07 PM > To: Access Developers discussion and problem solving > Subject: Re: [AccessD] Error 2468 - You > can'tcarryoutthisactionatthepresenttime. > > > Trying to delete from the parent form. A parent record that has no > child records. > > For delete what should I use: DoCmd.RunCommand acDeleteRecord? > > That code came from the command button wizard. > > Rocky > > ----- Original Message ----- > From: "Charlotte Foust" > To: "Access Developers discussion and problem solving" > > Sent: Wednesday, January 28, 2004 4:22 PM > Subject: RE: [AccessD] Error 2468 - You can't > carryoutthisactionatthepresenttime. > > > > Ack! Lose that old A95 code, please! I can't even read it any more. > > Comment out the SetWarnings False and see what Access tells you about > > the operation. > > > > HOY! I just noticed that you appear to be running this from the > > parent form. Which form are you trying to delete a record from? > > > > Charlotte Foust > > > > -----Original Message----- > > From: Rocky Smolin - Beach Access Software [mailto:bchacc at san.rr.com] > > Sent: Wednesday, January 28, 2004 4:18 PM > > To: Access Developers discussion and problem solving > > Subject: Re: [AccessD] Error 2468 - You can't carry > > outthisactionatthepresenttime. > > > > > > Rats. No soap. Got the error on the second delete after adding the > > dbengineidle and the subfrm requery like this: > > > > > > DoCmd.SetWarnings False > > DoCmd.DoMenuItem acFormBar, acEditMenu, 8, , acMenuVer70 > > DoCmd.DoMenuItem acFormBar, acEditMenu, 6, , acMenuVer70 > > DoCmd.SetWarnings True > > > > DBEngine.Idle dbRefreshCache > > > > Me.Requery > > Me!subfrmPODetail.Requery > > > > Any other ideas? > > > > Thanks and regards, > > > > Rocky > > > > ----- Original Message ----- > > From: "Charlotte Foust" > > To: "Access Developers discussion and problem solving" > > > > Sent: Wednesday, January 28, 2004 3:47 PM > > Subject: RE: [AccessD] Error 2468 - You can't carry out > > thisactionatthepresenttime. > > > > > > > Rocky, > > > > > > I suspect you're running into an issue I've seen in somewhat similar > > > > circumstances, where the deletion didn't actually seem to get > > > processed until I requeried the subform. Have you tried a > > > DBEngine.Idle dbRefreshCache after the deletion? > > > > > > Charlotte Foust > > > > > > -----Original Message----- > > > From: Rocky Smolin - Beach Access Software > > > [mailto:bchacc at san.rr.com] > > > Sent: Wednesday, January 28, 2004 2:13 PM > > > To: Access Developers discussion and problem solving > > > Subject: Re: [AccessD] Error 2468 - You can't carry out > > > thisactionatthepresent time. > > > > > > > > > Charlotte: > > > > > > Further to my reply, I found that when I did a delete then, before I > > > > did anything else, I went and looked in the tblPOHeader and the > > > record > > > > > was still there. For some reason it's not completing the delete and > > > > that's why I think it's telling me that I can't make any moves at > > > this > > > > > time. > > > > > > Rocky > > > > > > ----- Original Message ----- > > > From: "Charlotte Foust" > > > To: "Access Developers discussion and problem solving" > > > > > > Sent: Wednesday, January 28, 2004 1:20 PM > > > Subject: RE: [AccessD] Error 2468 - You can't carry out this > > > actionatthepresent time. > > > > > > > > > > It sounds like you may have the parent and child forms linked to > > > > the > > > > > > same dataset. Do you? > > > > > > > > Charlotte Foust > > > > > > > > -----Original Message----- > > > > From: Rocky Smolin - Beach Access Software > > > > [mailto:bchacc at san.rr.com] > > > > Sent: Wednesday, January 28, 2004 1:04 PM > > > > To: Access Developers discussion and problem solving > > > > Subject: Re: [AccessD] Error 2468 - You can't carry out this > > > > action atthepresent time. > > > > > > > > > > > > I'm getting closer. I deleted the sub-form that on the second tab > > > > > of the tab form and the two deletes worked. > > > > > > > > It has something to do with a sub form on a tab. Any clues, > > > > anybody? > > > > > > > > Rocky > > > > > > > > ----- Original Message ----- > > > > From: "Joe K Anderson" > > > > To: "Rocky Smolin - Beach Access Software" ; > > > > > > > > Cc: "Wayne Warren Angelucci" ; "Gordon > > > > Bennett" ; "Barry Hynum" > > > > ; "Dixon Foss" ; "Mark > > > > Krisburg" > > > > > > > > > > Sent: Wednesday, January 28, 2004 11:44 AM > > > > Subject: Re: [AccessD] Error 2468 - You can't carry out this > > > > action at thepresent time. > > > > > > > > > > > > You may need to do a Requery between deletes? > > > > > > > > joe > > > > ----- Original Message ----- > > > > From: Rocky Smolin - Beach Access Software > > > > To: Access Developers discussion and problem solving > > > > Cc: Wayne Warren Angelucci ; Mark Krisburg ; Joe Anderson ; > > > > Gordon > > > > > > Bennett ; Dixon Foss ; Bob Heygood ; Barry Hynum > > > > Sent: 01-28-2004 11:34 > > > > Subject: Re: [AccessD] Error 2468 - You can't carry out this > > > > action at the present time. > > > > > > > > > > > > Randall: > > > > > > > > Tried this experiment just to get the DAO recordset out of the > > > > way. > > > I > > > > deleted all references to it. > > > > > > > > Then I replaced: > > > > > > > > 'DoCmd.SetWarnings False > > > > 'DoCmd.DoMenuItem acFormBar, acEditMenu, 8, , acMenuVer70 > > > > 'DoCmd.DoMenuItem acFormBar, acEditMenu, 6, , acMenuVer70 > > > > 'DoCmd.SetWarnings True > > > > > > > > with > > > > > > > > DoCmd.RunCommand acCmdDelete > > > > > > > > I selected a record and ran that code which does the delete. > > > > Then > > > > > > before > > > > trying to delete the second record, I checked the table and the > > > > record was > > > > still there! > > > > > > > > So the delete (and probably other operations) are not completing > > > > > for > > > > > > > some > > > > reason. > > > > > > > > Pluse, when I get the error, I have to use the task manager to > > > > clear > > > > > > > access. > > > > It won't quit, cant close any forms, etc. > > > > > > > > Any ideas? > > > > > > > > Many thanks in advance and regards, > > > > > > > > is > > > > > > > > ----- Original Message ----- > > > > From: "Randall Anthony" > > > > To: "'Access Developers discussion and problem solving'" > > > > > > > > Sent: Wednesday, January 28, 2004 10:31 AM > > > > Subject: RE: [AccessD] Error 2468 - You can't carry out this > > > > action at the > > > > present time. > > > > > > > > > > > > > Right off the top of my head, it has to do with the movefirst, > > > > > movelast. > > > > I > > > > > ran into this when converting A97 to A2K. Code worked in A97, > > > > > not > > > > > > > A2K and > > > > > M$ said this was designed behavior. I'll try to find the > > article. > > > > > > > > > > -----Original Message----- > > > > > From: Rocky Smolin - Beach Access Software > > > > [mailto:bchacc at san.rr.com] > > > > > Sent: Wednesday, January 28, 2004 1:07 PM > > > > > To: AccessD at databaseadvisors.com > > > > > Subject: [AccessD] Error 2468 - You can't carry out this > > > > action at > > > > > > > the > > > > > present time. > > > > > > > > > > Dear List: > > > > > > > > > > I am getting the following error message on a bound form: > > > > > > > > > > Error 2468 - You can't carry out this action at the present > > time. > > > > > > > > > > This form has a sub form linked to the main form by the main > > > form's > > > > primary > > > > > key. (Main form is P.O. Header, subform is P.O. Detail). > > > > > > > > > > I get this error if I try to delete two records in a row. > > > > > > > > > > DoCmd.SetWarnings False > > > > > DoCmd.DoMenuItem acFormBar, acEditMenu, 8, , acMenuVer70 > > > > > DoCmd.DoMenuItem acFormBar, acEditMenu, 6, , acMenuVer70 > > > > > DoCmd.SetWarnings True > > > > > > > > > > I also get this error after I try to add a record. The > > > > problem started > > > > > because I wanted to get the last PO in the file, add one to > > > > the PO > > > > > > > number, > > > > > and put the prefix and the new PO number ito the new record: > > > > > > > > > > DoCmd.GoToRecord , , acNewRec > > > > > > > > > > 'If rstPOHeader.RecordCount <> 0 Then > > > > > ' rstPOHeader.MoveLast > > > > > ' Me.fldPOPrefix = Nz(rstPOHeader!fldPOPrefix) > > > > > ' If IsNumeric(rstPOHeader!fldPONumber) Then > > > > > ' Me.fldPONumber = rstPOHeader!fldPONumber + 1 > > > > > ' fldPOOrderDate.SetFocus > > > > > ' Else > > > > > ' Me.fldPONumber.SetFocus > > > > > ' End If > > > > > 'End If > > > > > 'If Nz(Me.fldPOPrefix) = "" And > Nz(rstPOHeader!fldPOPrefix) > > = > > > "" > > > > Then > > > > _ > > > > > Me.fldPOPrefix.SetFocus > > > > > > > > > > Right now the code is commented out. If I uncomment the two > > > lines: > > > > > > > > > > ' rstPOHeader.MoveLast > > > > > ' Me.fldPOPrefix = Nz(rstPOHeader!fldPOPrefix) > > > > > > > > > > I get the error when I try to save: > > > > > > > > > > DoCmd.DoMenuItem acFormBar, acRecordsMenu, acSaveRecord, , > > > > acMenuVer70 > > > > > > > > > > I checked the web and there is nothing. Has anyone > > > > encountered > > > this > > > > before? > > > > > > > > > > Thanks and regards, > > > > > > > > > > Rocky Smolin > > > > > Beach Access Software > > > > > _______________________________________________ > > > > > 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 > > > > > > > > > _______________________________________________ > > > > 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 > > > > _______________________________________________ > > > > 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 > > > _______________________________________________ > > > 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 > > _______________________________________________ > > 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 > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com From gustav at cactus.dk Thu Jan 29 04:16:04 2004 From: gustav at cactus.dk (Gustav Brock) Date: Thu, 29 Jan 2004 11:16:04 +0100 Subject: [AccessD] Days 360 In-Reply-To: References: Message-ID: <69582338.20040129111604@cactus.dk> Hi Jeffrey First, are you aware of the typo here: > Month(myEndDate), 1)) - 1 Or Day(myendate) = 30 Then Second, a performance as Excel's Days360() may not be the ultimate goal as it not up to the standards. Visit this link to read more and for data samples: http://www.entisoft.com/ESTools/MathFinancial_Days360.HTML /gustav > I have the following function that is used to calculate the number of days > based on a 360 day year. When I compare the results to Excel's Days360 > formula I get a different result. > The start date I am using is 11/30/2003 and an end date of 12/31/2003 > My function returns 31 days and Excel returns 30 days. > Can anyone see/tell me why I am getting a different result. > TIA > Jeff > Function CalcDays360(mystartdate As Date, myEndDate As Date) As Double > Dim mytotaldays > mytotaldays = 0 > Select Case DateDiff("m", mystartdate, myEndDate) > Case 0 'Both dates are in the same month > If myEndDate <> DateAdd("m", 1, DateSerial(Year(myEndDate), > Month(myEndDate), 1)) - 1 Then > mytotaldays = DateDiff("d", mystartdate, myEndDate) + 1 > Else > If Day(mystartdate) <> 31 Then > mytotaldays = 30 - Day(mystartdate) + 1 > Else > mytotaldays = 1 > End If > End If > Case Else 'Dates are not in the same month > 'Determine Number of Days in the first month > If Day(mystartdate) <> 31 Then > mytotaldays = 30 - Day(mystartdate) + 1 > Else > mytotaldays = 1 > End If > 'Add Number of Days in the second month > If myEndDate = DateAdd("m", 1, DateSerial(Year(myEndDate), > Month(myEndDate), 1)) - 1 Or Day(myendate) = 30 Then > mytotaldays = mytotaldays + 30 > Else > mytotaldays = mytotaldays + Day(myEndDate) > End If > 'Add 30 days to total number for each whole months between dates > mytotaldays = mytotaldays + (30 * (DateDiff("m", mystartdate, > myEndDate) - 1)) > End Select > CalcDays360 = mytotaldays > End Function From accessd666 at yahoo.com Thu Jan 29 07:08:08 2004 From: accessd666 at yahoo.com (Sad Der) Date: Thu, 29 Jan 2004 05:08:08 -0800 (PST) Subject: [AccessD] Store all days between 2 dates / Type Mismatch Message-ID: <20040129130808.68198.qmail@web60209.mail.yahoo.com> Hi group, does anybody know how I can fill an array with the DATES between a startdate and an enddate? I'm using datediff to calculate the no of days. I want to use this in a loop e.g.: Dim x as Integer Dim arrDays() as Variant Dim intNumberOfDays as Integer dim strStart as String Dim strEnd as String intNumberOfDays = DateDiff("d", strStart, strEnd) ReDim arrDays(intNumberOfDays) for x = 0 to intNumberOfDays arrDays(x) = strStart + x next x I keep getting a Type Mismatch error. I also tried: arrDays(x) = CVAR(strStart + x) Any ideas? TIA. Sander Example: StartDate EndDate Return value(s) 21/01/2004 21/01/2004 21/01/2004 21/01/2004 22/01/2004 21/01/2004;22/01/2004 31/12/2003 02/01/2004 31/12/2003;01/01/2004;02/01/2004 __________________________________ Do you Yahoo!? Yahoo! SiteBuilder - Free web site building tool. Try it! http://webhosting.yahoo.com/ps/sb/ From gustav at cactus.dk Thu Jan 29 07:19:48 2004 From: gustav at cactus.dk (Gustav Brock) Date: Thu, 29 Jan 2004 14:19:48 +0100 Subject: [AccessD] Store all days between 2 dates / Type Mismatch In-Reply-To: <20040129130808.68198.qmail@web60209.mail.yahoo.com> References: <20040129130808.68198.qmail@web60209.mail.yahoo.com> Message-ID: <10820606520.20040129141948@cactus.dk> Hi Sad Never use strings for dates. Either change to datatype Date or convert the strings to date/time values: > intNumberOfDays = DateDiff("d", CDate(strStart), CDate(strEnd)) > ReDim arrDays(intNumberOfDays) > for x = 0 to intNumberOfDays > arrDays(x) = DateAdd("d", x, CDate(strStart)) > next x /gustav > does anybody know how I can fill an array with the > DATES between a startdate and an enddate? > I'm using datediff to calculate the no of days. I want > to use this in a loop e.g.: > Dim x as Integer > Dim arrDays() as Variant > Dim intNumberOfDays as Integer > dim strStart as String > Dim strEnd as String > intNumberOfDays = DateDiff("d", strStart, strEnd) > ReDim arrDays(intNumberOfDays) > for x = 0 to intNumberOfDays > arrDays(x) = strStart + x > next x > I keep getting a Type Mismatch error. I also tried: > arrDays(x) = CVAR(strStart + x) > Any ideas? > TIA. > Sander > Example: > StartDate EndDate Return value(s) > 21/01/2004 21/01/2004 21/01/2004 > 21/01/2004 22/01/2004 21/01/2004;22/01/2004 > 31/12/2003 02/01/2004 31/12/2003;01/01/2004;02/01/2004 From Erwin.Craps at ithelps.be Thu Jan 29 07:24:46 2004 From: Erwin.Craps at ithelps.be (Erwin Craps - IT Helps) Date: Thu, 29 Jan 2004 14:24:46 +0100 Subject: [AccessD] Store all days between 2 dates / Type Mismatch Message-ID: <46B976F2B698FF46A4FE7636509B22DF03D1A2@stekelbes.ithelps.local> Just at first sight strStart strEnd Should be date type and not string An I supose arrDays() to. -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Sad Der Sent: Thursday, January 29, 2004 2:08 PM To: Acces User Group Subject: [AccessD] Store all days between 2 dates / Type Mismatch Hi group, does anybody know how I can fill an array with the DATES between a startdate and an enddate? I'm using datediff to calculate the no of days. I want to use this in a loop e.g.: Dim x as Integer Dim arrDays() as Variant Dim intNumberOfDays as Integer dim strStart as String Dim strEnd as String intNumberOfDays = DateDiff("d", strStart, strEnd) ReDim arrDays(intNumberOfDays) for x = 0 to intNumberOfDays arrDays(x) = strStart + x next x I keep getting a Type Mismatch error. I also tried: arrDays(x) = CVAR(strStart + x) Any ideas? TIA. Sander Example: StartDate EndDate Return value(s) 21/01/2004 21/01/2004 21/01/2004 21/01/2004 22/01/2004 21/01/2004;22/01/2004 31/12/2003 02/01/2004 31/12/2003;01/01/2004;02/01/2004 __________________________________ Do you Yahoo!? Yahoo! SiteBuilder - Free web site building tool. Try it! http://webhosting.yahoo.com/ps/sb/ _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From paul.hartland at fsmail.net Thu Jan 29 07:26:30 2004 From: paul.hartland at fsmail.net (paul.hartland at fsmail.net) Date: Thu, 29 Jan 2004 14:26:30 +0100 (CET) Subject: [AccessD] Store all days between 2 dates / Type Mismatch Message-ID: <21974776.1075382790483.JavaMail.www@wwinf3003> Sander, Try this: Dim x as Integer Dim arrDays() as Variant Dim StartDate as Date Dim EndDate As Date Dim IncDate As Date x = 0 IncDate = StartDate Do Until(IncDate>EndDate) arrDays(x) = IncDate x = x + 1 IncDate = IncDate + 1 Loop Paul Message date : Jan 29 2004, 01:17 PM >From : "Sad Der" To : "Acces User Group" Copy to : Subject : [AccessD] Store all days between 2 dates / Type Mismatch Hi group, does anybody know how I can fill an array with the DATES between a startdate and an enddate? I'm using datediff to calculate the no of days. I want to use this in a loop e.g.: Dim x as Integer Dim arrDays() as Variant Dim intNumberOfDays as Integer dim strStart as String Dim strEnd as String intNumberOfDays = DateDiff("d", strStart, strEnd) ReDim arrDays(intNumberOfDays) for x = 0 to intNumberOfDays arrDays(x) = strStart + x next x I keep getting a Type Mismatch error. I also tried: arrDays(x) = CVAR(strStart + x) Any ideas? TIA. Sander Example: StartDate EndDate Return value(s) 21/01/2004 21/01/2004 21/01/2004 21/01/2004 22/01/2004 21/01/2004;22/01/2004 31/12/2003 02/01/2004 31/12/2003;01/01/2004;02/01/2004 __________________________________ Do you Yahoo!? Yahoo! SiteBuilder - Free web site building tool. Try it! http://webhosting.yahoo.com/ps/sb/ _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com Freeserve AnyTime - HALF PRICE for the first 3 months - Save ?7.50 a month www.freeserve.com/anytime From weeden1949 at hotmail.com Thu Jan 29 08:20:38 2004 From: weeden1949 at hotmail.com (Greg Smith) Date: Thu, 29 Jan 2004 08:20:38 -0600 Subject: [AccessD] Error # 3343 Unrecognized database format References: <001a01c3e5f8$afdde1b0$8500a8c0@CX615377a> Message-ID: Doug: I've seen this before. One of my clients has A97 FE and BE and occasionally gets the "Unrecognized db ... error". Their MIS guy has found that almost every time it happened they had a bad switch, bad NIC, or bad wiring which was causing the user's FE to break the connection improperly, leaving the BE in a questionable state. Of course, the same thing can occur if users reboot their computers or reset them without logging out of Access first. HTH! Greg Smith weeden1949 at hotmail.com ----- Original Message ----- From: "Doug Murphy" To: "'Access Developers discussion and problem solving'" Sent: Wednesday, January 28, 2004 5:44 PM Subject: [AccessD] Error # 3343 Unrecognized database format Folks, I have a client who has started getting an Error #3343 on their back end DB. The DB is Access 97. From what I can find on this error it usually has to do with database writes being interupted or hard shutdowns. They claim that there have been no changes to thier network and that all etc. etc. From ggonzalez at cccis.com Thu Jan 29 09:28:18 2004 From: ggonzalez at cccis.com (ggonzalez at cccis.com) Date: Thu, 29 Jan 2004 09:28:18 -0600 Subject: [AccessD] Access as Service Message-ID: Has anyone ever had to run an Access application as a service on a computer? if so can you pint me in the direction on how I could do this. Thanks! From Oleg_123 at xuppa.com Thu Jan 29 10:12:07 2004 From: Oleg_123 at xuppa.com (Oleg_123 at xuppa.com) Date: Thu, 29 Jan 2004 11:12:07 -0500 (EST) Subject: [AccessD] macro can't find function In-Reply-To: References: <005401c3be4a$9a497ab0$69fa2250@servercafe> Message-ID: <39791.12.3.132.98.1075392727.squirrel@heck.bay9.com> Group, I have a long macro that opens several queries, at the end its suppose to RunCode - function, however it gives me an message "The expression you entered has a function name that xxx can't find". When I run that function separetely it works fine, and the name is spelled correctly since i didn't type it but selected it using their device what should i do ? ----------------------------------------- Get Breaking News from CNN, ABC, NBC, CBS Now. http://www.xuppa.com/news/?link=webmail From andy at minstersystems.co.uk Thu Jan 29 10:27:36 2004 From: andy at minstersystems.co.uk (Andy Lacey) Date: Thu, 29 Jan 2004 16:27:36 -0000 Subject: [AccessD] macro can't find function In-Reply-To: <39791.12.3.132.98.1075392727.squirrel@heck.bay9.com> Message-ID: <006701c3e684$cecba530$b274d0d5@minster33c3r25> Oleg In a macro the function has to be expressed as fn(), ie. no = sign before it but must have the parentheses. May be worth checking. Oh and the function must of course be Public. Andy Lacey http://www.minstersystems.co.uk > -----Original Message----- > From: accessd-bounces at databaseadvisors.com > [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of > Oleg_123 at xuppa.com > Sent: 29 January 2004 16:12 > To: accessd at databaseadvisors.com > Subject: RE: [AccessD] macro can't find function > > > Group, > > I have a long macro that opens several queries, at the end > its suppose to RunCode - function, however it gives me an > message "The expression you entered has a function name that > xxx can't find". When I run that function separetely it works > fine, and the name is spelled correctly since i didn't type > it but selected it using their device what should i do ? > > > ----------------------------------------- > Get Breaking News from CNN, ABC, NBC, CBS Now. > http://www.xuppa.com/news/?link=webmail > > > > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/a> ccessd > Website: > http://www.databaseadvisors.com > > From HollisVJ at pgdp.usec.com Thu Jan 29 10:29:16 2004 From: HollisVJ at pgdp.usec.com (Hollis,Virginia) Date: Thu, 29 Jan 2004 10:29:16 -0600 Subject: [AccessD] Code Not Working in XP Message-ID: <618EB4D6DDCDD3119B0A00508B6FD37A0CB0CFBD@cntexchange.pgdp.usec.com> I have been using the code shown below to access data on our Intranet. The code matches a field entry in the database and looks up the details. In this example it finds a stock number. Problem: The code does not work for users that are running XP. It does not do anything, it will not even try to access the web. They click the button and nothing happens. What can I do to correct this for users of XP? Virginia _____ strPath = " http://web.com/vr.asp?xml=orafin%2Stock= " strFile = strPath & Me.StockNumber If Dir(strFile) = "" Then strFile = strPath & Me.StockNumber End If Call fHandleFile(strFile, WIN_MAX) From serbach at new.rr.com Thu Jan 29 10:37:03 2004 From: serbach at new.rr.com (Steven W. Erbach) Date: Thu, 29 Jan 2004 10:37:03 -0600 Subject: [AccessD] This doesn't look right Message-ID: <20040129103703.1501118476.serbach@new.rr.com> Dear Group, I'm "re-factoring" an application that I took over from a developer who's reducing her workload to devote more time to her family. There is a query that looks curious to me and I wonder if you lot could give me some insight into how Access works. The query creates a SubTotal and has four Criteria rows and, of course, the Total line is activated. The query looks at four fields on an open form (frmReport) which feed values into the query. Two of those fields are txtLogStartDate and txtLogEndDate. The other two are txtCity and txtCounty. The four Criteria rows look at various combinations of whether txtCity and txtCounty are filled in or not on the form that feeds the query. The ArrivalDate in the query grid looks at the range of dates between txtLogStartDate and txtLogEndDate on the form. What's odd is that, at first, the ArrivalDate query column had WHERE in the Total line. The County and City columns show Group By. The range of dates is supposed to be the same for every one of the four Criteria rows...BUT with ArrivalDate set to WHERE there was only one Criteria statement in the first row of the four Criteria rows. It looked like this: Between [Forms]![frmReport]![txtLogStartDate] And [Forms]![frmReport]![txtLogEndDate] Or Between [Forms]![frmReport]![txtLogStartDate] And [Forms]![frmReport]![txtLogEndDate] Or Between [Forms]![frmReport]![txtLogStartDate] And [Forms]![frmReport]![txtLogEndDate] Or Between [Forms]![frmReport]![txtLogStartDate] And [Forms]![frmReport]![txtLogEndDate] (Sorry for the wrap) That is, that entire thing was in one cell of one row of the Criteria grid. I tried to cut and paste individual "Between" statements into each of the four rows of the Criteria grid; but when I saved the query, closed it, and re-opened it, that huge long multiple-Between statement re-appeared in just the first row of the Criteria grid. However, when I changed the ArrivalDate Total line to GROUP BY and *then* cut and paste individual Between statements into each row of the Criteria grid, when I saved, closed, and re-opened the query the Between statements stayed where they were; that is, one for each of the four rows of the Criteria grid. Now, it was obvious to me that the two forms of the query would produce different results, and that turned out to be true. My question is this: when you're putting together a multi-Criteria row query and you want one column to show the same criteria in each row, the natural thing to do is choose WHERE in the Total row. You can test the query while you're designing it and you'll get results. But when you save the query, thinking that you've done your duty, you're actually saving something incorrect since, if you don't look at it again, Access will re-format all those WHERE statements in each row of the Criteria grid into one concatenated statement in one row. I thought I knew queries pretty well, but this one throws me. In the SQL statement formed when the ArrivalDate showed WHERE, that big long concatenated multi-Between statement wound up in the WHERE clause. (Didn't matter whether the Between statements were in separate criteria rows or not.) But when I reformed the query to split the Between statements into separate Criteria rows and selected GROUP BY for the ArrivalDate column, the Between criteria wound up in the HAVING clause. I guess it's just an experience thing, right? Regards, Steve Erbach Scientific Marketing Neenah, WI 920-969-0504 Message created with Bloomba Disclaimer: No tree was killed in the transmission of this message. However, several coulombs of electrons were temporarily inconvenienced. From bchacc at san.rr.com Thu Jan 29 10:51:18 2004 From: bchacc at san.rr.com (Rocky Smolin - Beach Access Software) Date: Thu, 29 Jan 2004 08:51:18 -0800 Subject: [AccessD] Error 2468 - You can'tcarry out this action at the present time - solved References: <024001c3e610$66b99750$6601a8c0@HAL9002> Message-ID: <00ed01c3e688$1dd64bf0$6601a8c0@HAL9002> Charlotte: Well I solved it. It turns out that I'm using the ADH resizing code and had the resizer called in the open event of the subform. When I removed that one line of code, everything started to work. I have no idea why that resizing code hosed the record operations. But once I figured out it was something in the subform, I deleted all the subform code and everything worked that failed before. So then I restored the code and began to remove one module at a time and it wasn't long before I removed the OnOpen event code and everything worked. So then since there was only a few lines of code in that module, it was a simple matter to guess it was the adhScaleForm routine. Thanks for your input. Rocky ----- Original Message ----- From: "Rocky Smolin - Beach Access Software" To: "Access Developers discussion and problem solving" Sent: Wednesday, January 28, 2004 6:34 PM Subject: Re: [AccessD] Error 2468 - You can'tcarryoutthisactionatthepresenttime. > "Any way you look at it, it pays to make sure you know where you are before > you try to do anything. " > > Good advice at any time. Brain fade dictates I address this in the a.m. > Thanks for your input and have a nice night. > > Rocky > > > ----- Original Message ----- > From: "Charlotte Foust" > To: "Access Developers discussion and problem solving" > > Sent: Wednesday, January 28, 2004 5:16 PM > Subject: RE: [AccessD] Error 2468 - You > can'tcarryoutthisactionatthepresenttime. > > > > Yep, the command button wizard still writes Access 95 code. Cute, huh? > > > > Is there anything else on your form that has a connection to the same > > table the parent form is based on? If not, then you need to make sure > > there is a current record before you try deleting again. You might > > stick some debug.print code in there to print the current Me.fldPOPrefix > > or return the Me.NewRecord flag to see where you are. If you wind up on > > a new record by deleting the last record in the recordset, then you'll > > get an error if you try to go to a new record. If you're on the new > > record when you try to delete, you'll get an error because there is no > > current record. If you have started to create a new record, you can't > > delete it because it isn't saved, and you can't go to NewRecord for the > > same reason. Any way you look at it, it pays to make sure you know > > where you are before you try to do anything. > > > > Charlotte Foust > > > > -----Original Message----- > > From: Rocky Smolin - Beach Access Software [mailto:bchacc at san.rr.com] > > Sent: Wednesday, January 28, 2004 5:07 PM > > To: Access Developers discussion and problem solving > > Subject: Re: [AccessD] Error 2468 - You > > can'tcarryoutthisactionatthepresenttime. > > > > > > Trying to delete from the parent form. A parent record that has no > > child records. > > > > For delete what should I use: DoCmd.RunCommand acDeleteRecord? > > > > That code came from the command button wizard. > > > > Rocky > > > > ----- Original Message ----- > > From: "Charlotte Foust" > > To: "Access Developers discussion and problem solving" > > > > Sent: Wednesday, January 28, 2004 4:22 PM > > Subject: RE: [AccessD] Error 2468 - You can't > > carryoutthisactionatthepresenttime. > > > > > > > Ack! Lose that old A95 code, please! I can't even read it any more. > > > Comment out the SetWarnings False and see what Access tells you about > > > the operation. > > > > > > HOY! I just noticed that you appear to be running this from the > > > parent form. Which form are you trying to delete a record from? > > > > > > Charlotte Foust > > > > > > -----Original Message----- > > > From: Rocky Smolin - Beach Access Software [mailto:bchacc at san.rr.com] > > > Sent: Wednesday, January 28, 2004 4:18 PM > > > To: Access Developers discussion and problem solving > > > Subject: Re: [AccessD] Error 2468 - You can't carry > > > outthisactionatthepresenttime. > > > > > > > > > Rats. No soap. Got the error on the second delete after adding the > > > dbengineidle and the subfrm requery like this: > > > > > > > > > DoCmd.SetWarnings False > > > DoCmd.DoMenuItem acFormBar, acEditMenu, 8, , acMenuVer70 > > > DoCmd.DoMenuItem acFormBar, acEditMenu, 6, , acMenuVer70 > > > DoCmd.SetWarnings True > > > > > > DBEngine.Idle dbRefreshCache > > > > > > Me.Requery > > > Me!subfrmPODetail.Requery > > > > > > Any other ideas? > > > > > > Thanks and regards, > > > > > > Rocky > > > > > > ----- Original Message ----- > > > From: "Charlotte Foust" > > > To: "Access Developers discussion and problem solving" > > > > > > Sent: Wednesday, January 28, 2004 3:47 PM > > > Subject: RE: [AccessD] Error 2468 - You can't carry out > > > thisactionatthepresenttime. > > > > > > > > > > Rocky, > > > > > > > > I suspect you're running into an issue I've seen in somewhat similar > > > > > > circumstances, where the deletion didn't actually seem to get > > > > processed until I requeried the subform. Have you tried a > > > > DBEngine.Idle dbRefreshCache after the deletion? > > > > > > > > Charlotte Foust > > > > > > > > -----Original Message----- > > > > From: Rocky Smolin - Beach Access Software > > > > [mailto:bchacc at san.rr.com] > > > > Sent: Wednesday, January 28, 2004 2:13 PM > > > > To: Access Developers discussion and problem solving > > > > Subject: Re: [AccessD] Error 2468 - You can't carry out > > > > thisactionatthepresent time. > > > > > > > > > > > > Charlotte: > > > > > > > > Further to my reply, I found that when I did a delete then, before I > > > > > > did anything else, I went and looked in the tblPOHeader and the > > > > record > > > > > > > was still there. For some reason it's not completing the delete and > > > > > > that's why I think it's telling me that I can't make any moves at > > > > this > > > > > > > time. > > > > > > > > Rocky > > > > > > > > ----- Original Message ----- > > > > From: "Charlotte Foust" > > > > To: "Access Developers discussion and problem solving" > > > > > > > > Sent: Wednesday, January 28, 2004 1:20 PM > > > > Subject: RE: [AccessD] Error 2468 - You can't carry out this > > > > actionatthepresent time. > > > > > > > > > > > > > It sounds like you may have the parent and child forms linked to > > > > > the > > > > > > > > same dataset. Do you? > > > > > > > > > > Charlotte Foust > > > > > > > > > > -----Original Message----- > > > > > From: Rocky Smolin - Beach Access Software > > > > > [mailto:bchacc at san.rr.com] > > > > > Sent: Wednesday, January 28, 2004 1:04 PM > > > > > To: Access Developers discussion and problem solving > > > > > Subject: Re: [AccessD] Error 2468 - You can't carry out this > > > > > action atthepresent time. > > > > > > > > > > > > > > > I'm getting closer. I deleted the sub-form that on the second tab > > > > > > > of the tab form and the two deletes worked. > > > > > > > > > > It has something to do with a sub form on a tab. Any clues, > > > > > anybody? > > > > > > > > > > Rocky > > > > > > > > > > ----- Original Message ----- > > > > > From: "Joe K Anderson" > > > > > To: "Rocky Smolin - Beach Access Software" ; > > > > > > > > > > Cc: "Wayne Warren Angelucci" ; "Gordon > > > > > Bennett" ; "Barry Hynum" > > > > > ; "Dixon Foss" ; "Mark > > > > > Krisburg" > > > > > > > > > > > > > Sent: Wednesday, January 28, 2004 11:44 AM > > > > > Subject: Re: [AccessD] Error 2468 - You can't carry out this > > > > > action at thepresent time. > > > > > > > > > > > > > > > You may need to do a Requery between deletes? > > > > > > > > > > joe > > > > > ----- Original Message ----- > > > > > From: Rocky Smolin - Beach Access Software > > > > > To: Access Developers discussion and problem solving > > > > > Cc: Wayne Warren Angelucci ; Mark Krisburg ; Joe Anderson ; > > > > > Gordon > > > > > > > > Bennett ; Dixon Foss ; Bob Heygood ; Barry Hynum > > > > > Sent: 01-28-2004 11:34 > > > > > Subject: Re: [AccessD] Error 2468 - You can't carry out this > > > > > action at the present time. > > > > > > > > > > > > > > > Randall: > > > > > > > > > > Tried this experiment just to get the DAO recordset out of the > > > > > way. > > > > I > > > > > deleted all references to it. > > > > > > > > > > Then I replaced: > > > > > > > > > > 'DoCmd.SetWarnings False > > > > > 'DoCmd.DoMenuItem acFormBar, acEditMenu, 8, , acMenuVer70 > > > > > 'DoCmd.DoMenuItem acFormBar, acEditMenu, 6, , acMenuVer70 > > > > > 'DoCmd.SetWarnings True > > > > > > > > > > with > > > > > > > > > > DoCmd.RunCommand acCmdDelete > > > > > > > > > > I selected a record and ran that code which does the delete. > > > > > Then > > > > > > > > before > > > > > trying to delete the second record, I checked the table and the > > > > > record was > > > > > still there! > > > > > > > > > > So the delete (and probably other operations) are not completing > > > > > > > for > > > > > > > > > some > > > > > reason. > > > > > > > > > > Pluse, when I get the error, I have to use the task manager to > > > > > clear > > > > > > > > > access. > > > > > It won't quit, cant close any forms, etc. > > > > > > > > > > Any ideas? > > > > > > > > > > Many thanks in advance and regards, > > > > > > > > > > is > > > > > > > > > > ----- Original Message ----- > > > > > From: "Randall Anthony" > > > > > To: "'Access Developers discussion and problem solving'" > > > > > > > > > > Sent: Wednesday, January 28, 2004 10:31 AM > > > > > Subject: RE: [AccessD] Error 2468 - You can't carry out this > > > > > action at the > > > > > present time. > > > > > > > > > > > > > > > > Right off the top of my head, it has to do with the movefirst, > > > > > > > movelast. > > > > > I > > > > > > ran into this when converting A97 to A2K. Code worked in A97, > > > > > > > not > > > > > > > > > A2K and > > > > > > M$ said this was designed behavior. I'll try to find the > > > article. > > > > > > > > > > > > -----Original Message----- > > > > > > From: Rocky Smolin - Beach Access Software > > > > > [mailto:bchacc at san.rr.com] > > > > > > Sent: Wednesday, January 28, 2004 1:07 PM > > > > > > To: AccessD at databaseadvisors.com > > > > > > Subject: [AccessD] Error 2468 - You can't carry out this > > > > > action at > > > > > > > > > the > > > > > > present time. > > > > > > > > > > > > Dear List: > > > > > > > > > > > > I am getting the following error message on a bound form: > > > > > > > > > > > > Error 2468 - You can't carry out this action at the present > > > time. > > > > > > > > > > > > This form has a sub form linked to the main form by the main > > > > form's > > > > > primary > > > > > > key. (Main form is P.O. Header, subform is P.O. Detail). > > > > > > > > > > > > I get this error if I try to delete two records in a row. > > > > > > > > > > > > DoCmd.SetWarnings False > > > > > > DoCmd.DoMenuItem acFormBar, acEditMenu, 8, , acMenuVer70 > > > > > > DoCmd.DoMenuItem acFormBar, acEditMenu, 6, , acMenuVer70 > > > > > > DoCmd.SetWarnings True > > > > > > > > > > > > I also get this error after I try to add a record. The > > > > > problem started > > > > > > because I wanted to get the last PO in the file, add one to > > > > > the PO > > > > > > > > > number, > > > > > > and put the prefix and the new PO number ito the new record: > > > > > > > > > > > > DoCmd.GoToRecord , , acNewRec > > > > > > > > > > > > 'If rstPOHeader.RecordCount <> 0 Then > > > > > > ' rstPOHeader.MoveLast > > > > > > ' Me.fldPOPrefix = Nz(rstPOHeader!fldPOPrefix) > > > > > > ' If IsNumeric(rstPOHeader!fldPONumber) Then > > > > > > ' Me.fldPONumber = rstPOHeader!fldPONumber + 1 > > > > > > ' fldPOOrderDate.SetFocus > > > > > > ' Else > > > > > > ' Me.fldPONumber.SetFocus > > > > > > ' End If > > > > > > 'End If > > > > > > 'If Nz(Me.fldPOPrefix) = "" And > > Nz(rstPOHeader!fldPOPrefix) > > > = > > > > "" > > > > > Then > > > > > _ > > > > > > Me.fldPOPrefix.SetFocus > > > > > > > > > > > > Right now the code is commented out. If I uncomment the two > > > > lines: > > > > > > > > > > > > ' rstPOHeader.MoveLast > > > > > > ' Me.fldPOPrefix = Nz(rstPOHeader!fldPOPrefix) > > > > > > > > > > > > I get the error when I try to save: > > > > > > > > > > > > DoCmd.DoMenuItem acFormBar, acRecordsMenu, acSaveRecord, , > > > > > acMenuVer70 > > > > > > > > > > > > I checked the web and there is nothing. Has anyone > > > > > encountered > > > > this > > > > > before? > > > > > > > > > > > > Thanks and regards, > > > > > > > > > > > > Rocky Smolin > > > > > > Beach Access Software > > > > > > _______________________________________________ > > > > > > 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 > > > > > > > > > > > _______________________________________________ > > > > > 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 > > > > > _______________________________________________ > > > > > 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 > > > > _______________________________________________ > > > > 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 > > > _______________________________________________ > > > 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 > > _______________________________________________ > > 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 From roz.clarke at donnslaw.co.uk Thu Jan 29 10:54:02 2004 From: roz.clarke at donnslaw.co.uk (Roz Clarke) Date: Thu, 29 Jan 2004 16:54:02 -0000 Subject: [AccessD] Charts Message-ID: <61F915314798D311A2F800A0C9C83188047C6A1F@dibble.observatory.donnslaw.co.uk> Hi all. Hope everyone is well. I have a problem with a chart I need to display in Access. I used to do this by exporting data to Excel but the connection to Excel has been so slow and unstable that I am now trying to bring it within Access. The data I need to display is in a cross-tab query, where I have categories as the row header and months of the year as the column header. I need to show all the months even though we currently have data only for January. If I base the chart on the cross-tab, I cannot see a way to tell it that each column should be an axis entry. If I base the chart on a select query, it correctly allows me to set 'month' as an axis, but only shows me January. Can anyone help? TIA Roz From Oleg_123 at xuppa.com Thu Jan 29 10:52:19 2004 From: Oleg_123 at xuppa.com (Oleg_123 at xuppa.com) Date: Thu, 29 Jan 2004 11:52:19 -0500 (EST) Subject: [AccessD] macro can't find function In-Reply-To: <006701c3e684$cecba530$b274d0d5@minster33c3r25> References: <39791.12.3.132.98.1075392727.squirrel@heck.bay9.com> <006701c3e684$cecba530$b274d0d5@minster33c3r25> Message-ID: <39923.12.3.132.98.1075395139.squirrel@heck.bay9.com> it's public (of course ;-) and this is how it looks -- BreakName () i decided to try to make that macro call another macro which contains the function > Oleg > > In a macro the function has to be expressed as fn(), ie. no = sign > before it but must have the parentheses. May be worth checking. Oh and > the function must of course be Public. > > Andy Lacey > http://www.minstersystems.co.uk > >> -----Original Message----- >> From: accessd-bounces at databaseadvisors.com >> [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of >> Oleg_123 at xuppa.com >> Sent: 29 January 2004 16:12 >> To: accessd at databaseadvisors.com >> Subject: RE: [AccessD] macro can't find function >> >> >> Group, >> >> I have a long macro that opens several queries, at the end >> its suppose to RunCode - function, however it gives me an >> message "The expression you entered has a function name that >> xxx can't find". When I run that function separetely it works >> fine, and the name is spelled correctly since i didn't type >> it but selected it using their device what should i do ? >> >> >> ----------------------------------------- >> Get Breaking News from CNN, ABC, NBC, CBS Now. >> http://www.xuppa.com/news/?link=webmail >> >> >> >> _______________________________________________ >> AccessD mailing list >> AccessD at databaseadvisors.com >> http://databaseadvisors.com/mailman/listinfo/a> ccessd >> Website: >> http://www.databaseadvisors.com >> >> > > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com ----------------------------------------- Get Breaking News from CNN, ABC, NBC, CBS Now. http://www.xuppa.com/news/?link=webmail From my.lists at verizon.net Thu Jan 29 10:52:19 2004 From: my.lists at verizon.net (Francisco H Tapia) Date: Thu, 29 Jan 2004 08:52:19 -0800 Subject: [AccessD] Access as Service In-Reply-To: References: Message-ID: <40193A43.9010304@verizon.net> Access is a huge application for loading as a service... I've never attempted to set up access as a service, however I've seen many articles on the web about setting up a vb service, so try searching in codehound.com, or planet-source-code.com for those keywords... -- -Francisco ggonzalez at cccis.com wrote: > > > >Has anyone ever had to run an Access application as a service on a >computer? if so can you pint me in the direction on how I could do this. > >Thanks! > > > From rl_stewart at highstream.net Thu Jan 29 10:54:25 2004 From: rl_stewart at highstream.net (Robert L. Stewart) Date: Thu, 29 Jan 2004 10:54:25 -0600 Subject: [AccessD] Re: Error 2468 - You can't carryoutthisactionatthepresenttime In-Reply-To: <200401291635.i0TGZLm08364@databaseadvisors.com> Message-ID: <5.1.0.14.2.20040129105105.02998e38@pop3.highstream.net> Rocky, Try this: Application.RunCommand 223 Robert At 10:35 AM 1/29/2004 -0600, you wrote: >Date: Wed, 28 Jan 2004 17:06:42 -0800 >From: "Rocky Smolin - Beach Access Software" >Subject: Re: [AccessD] Error 2468 - You can't > carryoutthisactionatthepresenttime. >To: "Access Developers discussion and problem solving" > >Message-ID: <022a01c3e604$28942140$6601a8c0 at HAL9002> >Content-Type: text/plain; charset="iso-8859-1" > >Trying to delete from the parent form. A parent record that has no child >records. > >For delete what should I use: DoCmd.RunCommand acDeleteRecord? > >That code came from the command button wizard. > >Rocky From cfoust at infostatsystems.com Thu Jan 29 10:57:39 2004 From: cfoust at infostatsystems.com (Charlotte Foust) Date: Thu, 29 Jan 2004 08:57:39 -0800 Subject: [AccessD] This doesn't look right Message-ID: There's a difference between WHERE and HAVING, as you discovered. Using WHERE in a totals query doesn't include the field being evaluated in the output fields, it just filters the result based on that field. HAVING includes the field being evaluated, and that has a profound effect of the results, since you're also grouping by those fields. Charlotte Foust -----Original Message----- From: Steven W. Erbach [mailto:serbach at new.rr.com] Sent: Thursday, January 29, 2004 8:37 AM To: Access Developers discussion and problem solving Subject: [AccessD] This doesn't look right Dear Group, I'm "re-factoring" an application that I took over from a developer who's reducing her workload to devote more time to her family. There is a query that looks curious to me and I wonder if you lot could give me some insight into how Access works. The query creates a SubTotal and has four Criteria rows and, of course, the Total line is activated. The query looks at four fields on an open form (frmReport) which feed values into the query. Two of those fields are txtLogStartDate and txtLogEndDate. The other two are txtCity and txtCounty. The four Criteria rows look at various combinations of whether txtCity and txtCounty are filled in or not on the form that feeds the query. The ArrivalDate in the query grid looks at the range of dates between txtLogStartDate and txtLogEndDate on the form. What's odd is that, at first, the ArrivalDate query column had WHERE in the Total line. The County and City columns show Group By. The range of dates is supposed to be the same for every one of the four Criteria rows...BUT with ArrivalDate set to WHERE there was only one Criteria statement in the first row of the four Criteria rows. It looked like this: Between [Forms]![frmReport]![txtLogStartDate] And [Forms]![frmReport]![txtLogEndDate] Or Between [Forms]![frmReport]![txtLogStartDate] And [Forms]![frmReport]![txtLogEndDate] Or Between [Forms]![frmReport]![txtLogStartDate] And [Forms]![frmReport]![txtLogEndDate] Or Between [Forms]![frmReport]![txtLogStartDate] And [Forms]![frmReport]![txtLogEndDate] (Sorry for the wrap) That is, that entire thing was in one cell of one row of the Criteria grid. I tried to cut and paste individual "Between" statements into each of the four rows of the Criteria grid; but when I saved the query, closed it, and re-opened it, that huge long multiple-Between statement re-appeared in just the first row of the Criteria grid. However, when I changed the ArrivalDate Total line to GROUP BY and *then* cut and paste individual Between statements into each row of the Criteria grid, when I saved, closed, and re-opened the query the Between statements stayed where they were; that is, one for each of the four rows of the Criteria grid. Now, it was obvious to me that the two forms of the query would produce different results, and that turned out to be true. My question is this: when you're putting together a multi-Criteria row query and you want one column to show the same criteria in each row, the natural thing to do is choose WHERE in the Total row. You can test the query while you're designing it and you'll get results. But when you save the query, thinking that you've done your duty, you're actually saving something incorrect since, if you don't look at it again, Access will re-format all those WHERE statements in each row of the Criteria grid into one concatenated statement in one row. I thought I knew queries pretty well, but this one throws me. In the SQL statement formed when the ArrivalDate showed WHERE, that big long concatenated multi-Between statement wound up in the WHERE clause. (Didn't matter whether the Between statements were in separate criteria rows or not.) But when I reformed the query to split the Between statements into separate Criteria rows and selected GROUP BY for the ArrivalDate column, the Between criteria wound up in the HAVING clause. I guess it's just an experience thing, right? Regards, Steve Erbach Scientific Marketing Neenah, WI 920-969-0504 Message created with Bloomba Disclaimer: No tree was killed in the transmission of this message. However, several coulombs of electrons were temporarily inconvenienced. _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From cfoust at infostatsystems.com Thu Jan 29 10:58:54 2004 From: cfoust at infostatsystems.com (Charlotte Foust) Date: Thu, 29 Jan 2004 08:58:54 -0800 Subject: [AccessD] Error 2468 - You can'tcarry out this action at thepresent time - solved Message-ID: Glad you got it solved. Sometimes the obvious gets overlooked. Charlotte Foust -----Original Message----- From: Rocky Smolin - Beach Access Software [mailto:bchacc at san.rr.com] Sent: Thursday, January 29, 2004 8:51 AM To: Access Developers discussion and problem solving Subject: Re: [AccessD] Error 2468 - You can'tcarry out this action at thepresent time - solved Charlotte: Well I solved it. It turns out that I'm using the ADH resizing code and had the resizer called in the open event of the subform. When I removed that one line of code, everything started to work. I have no idea why that resizing code hosed the record operations. But once I figured out it was something in the subform, I deleted all the subform code and everything worked that failed before. So then I restored the code and began to remove one module at a time and it wasn't long before I removed the OnOpen event code and everything worked. So then since there was only a few lines of code in that module, it was a simple matter to guess it was the adhScaleForm routine. Thanks for your input. Rocky ----- Original Message ----- From: "Rocky Smolin - Beach Access Software" To: "Access Developers discussion and problem solving" Sent: Wednesday, January 28, 2004 6:34 PM Subject: Re: [AccessD] Error 2468 - You can'tcarryoutthisactionatthepresenttime. > "Any way you look at it, it pays to make sure you know where you are before > you try to do anything. " > > Good advice at any time. Brain fade dictates I address this in the > a.m. Thanks for your input and have a nice night. > > Rocky > > > ----- Original Message ----- > From: "Charlotte Foust" > To: "Access Developers discussion and problem solving" > > Sent: Wednesday, January 28, 2004 5:16 PM > Subject: RE: [AccessD] Error 2468 - You > can'tcarryoutthisactionatthepresenttime. > > > > Yep, the command button wizard still writes Access 95 code. Cute, > > huh? > > > > Is there anything else on your form that has a connection to the > > same table the parent form is based on? If not, then you need to > > make sure there is a current record before you try deleting again. > > You might stick some debug.print code in there to print the current > > Me.fldPOPrefix or return the Me.NewRecord flag to see where you are. > > If you wind up on a new record by deleting the last record in the > > recordset, then you'll get an error if you try to go to a new > > record. If you're on the new record when you try to delete, you'll get an error because there is no > > current record. If you have started to create a new record, you can't > > delete it because it isn't saved, and you can't go to NewRecord for > > the same reason. Any way you look at it, it pays to make sure you > > know where you are before you try to do anything. > > > > Charlotte Foust > > > > -----Original Message----- > > From: Rocky Smolin - Beach Access Software > > [mailto:bchacc at san.rr.com] > > Sent: Wednesday, January 28, 2004 5:07 PM > > To: Access Developers discussion and problem solving > > Subject: Re: [AccessD] Error 2468 - You > > can'tcarryoutthisactionatthepresenttime. > > > > > > Trying to delete from the parent form. A parent record that has no > > child records. > > > > For delete what should I use: DoCmd.RunCommand acDeleteRecord? > > > > That code came from the command button wizard. > > > > Rocky > > > > ----- Original Message ----- > > From: "Charlotte Foust" > > To: "Access Developers discussion and problem solving" > > > > Sent: Wednesday, January 28, 2004 4:22 PM > > Subject: RE: [AccessD] Error 2468 - You can't > > carryoutthisactionatthepresenttime. > > > > > > > Ack! Lose that old A95 code, please! I can't even read it any > > > more. Comment out the SetWarnings False and see what Access tells > > > you about the operation. > > > > > > HOY! I just noticed that you appear to be running this from the > > > parent form. Which form are you trying to delete a record from? > > > > > > Charlotte Foust > > > > > > -----Original Message----- > > > From: Rocky Smolin - Beach Access Software > > > [mailto:bchacc at san.rr.com] > > > Sent: Wednesday, January 28, 2004 4:18 PM > > > To: Access Developers discussion and problem solving > > > Subject: Re: [AccessD] Error 2468 - You can't carry > > > outthisactionatthepresenttime. > > > > > > > > > Rats. No soap. Got the error on the second delete after adding > > > the dbengineidle and the subfrm requery like this: > > > > > > > > > DoCmd.SetWarnings False > > > DoCmd.DoMenuItem acFormBar, acEditMenu, 8, , acMenuVer70 > > > DoCmd.DoMenuItem acFormBar, acEditMenu, 6, , acMenuVer70 > > > DoCmd.SetWarnings True > > > > > > DBEngine.Idle dbRefreshCache > > > > > > Me.Requery > > > Me!subfrmPODetail.Requery > > > > > > Any other ideas? > > > > > > Thanks and regards, > > > > > > Rocky > > > > > > ----- Original Message ----- > > > From: "Charlotte Foust" > > > To: "Access Developers discussion and problem solving" > > > > > > Sent: Wednesday, January 28, 2004 3:47 PM > > > Subject: RE: [AccessD] Error 2468 - You can't carry out > > > thisactionatthepresenttime. > > > > > > > > > > Rocky, > > > > > > > > I suspect you're running into an issue I've seen in somewhat > > > > similar > > > > > > circumstances, where the deletion didn't actually seem to get > > > > processed until I requeried the subform. Have you tried a > > > > DBEngine.Idle dbRefreshCache after the deletion? > > > > > > > > Charlotte Foust > > > > > > > > -----Original Message----- > > > > From: Rocky Smolin - Beach Access Software > > > > [mailto:bchacc at san.rr.com] > > > > Sent: Wednesday, January 28, 2004 2:13 PM > > > > To: Access Developers discussion and problem solving > > > > Subject: Re: [AccessD] Error 2468 - You can't carry out > > > > thisactionatthepresent time. > > > > > > > > > > > > Charlotte: > > > > > > > > Further to my reply, I found that when I did a delete then, > > > > before I > > > > > > did anything else, I went and looked in the tblPOHeader and the > > > > record > > > > > > > was still there. For some reason it's not completing the delete > > > > and > > > > > > that's why I think it's telling me that I can't make any moves > > > > at this > > > > > > > time. > > > > > > > > Rocky > > > > > > > > ----- Original Message ----- > > > > From: "Charlotte Foust" > > > > To: "Access Developers discussion and problem solving" > > > > > > > > Sent: Wednesday, January 28, 2004 1:20 PM > > > > Subject: RE: [AccessD] Error 2468 - You can't carry out this > > > > actionatthepresent time. > > > > > > > > > > > > > It sounds like you may have the parent and child forms linked > > > > > to the > > > > > > > > same dataset. Do you? > > > > > > > > > > Charlotte Foust > > > > > > > > > > -----Original Message----- > > > > > From: Rocky Smolin - Beach Access Software > > > > > [mailto:bchacc at san.rr.com] > > > > > Sent: Wednesday, January 28, 2004 1:04 PM > > > > > To: Access Developers discussion and problem solving > > > > > Subject: Re: [AccessD] Error 2468 - You can't carry out this > > > > > action atthepresent time. > > > > > > > > > > > > > > > I'm getting closer. I deleted the sub-form that on the second > > > > > tab > > > > > > > of the tab form and the two deletes worked. > > > > > > > > > > It has something to do with a sub form on a tab. Any clues, > > > > > anybody? > > > > > > > > > > Rocky > > > > > > > > > > ----- Original Message ----- > > > > > From: "Joe K Anderson" > > > > > To: "Rocky Smolin - Beach Access Software" > > > > > ; > > > > > Cc: "Wayne Warren Angelucci" ; > > > > > "Gordon Bennett" ; "Barry > > > > > Hynum" ; "Dixon Foss" ; > > > > > "Mark Krisburg" > > > > > > > > > > > > > Sent: Wednesday, January 28, 2004 11:44 AM > > > > > Subject: Re: [AccessD] Error 2468 - You can't carry out this > > > > > action at thepresent time. > > > > > > > > > > > > > > > You may need to do a Requery between deletes? > > > > > > > > > > joe > > > > > ----- Original Message ----- > > > > > From: Rocky Smolin - Beach Access Software > > > > > To: Access Developers discussion and problem solving > > > > > Cc: Wayne Warren Angelucci ; Mark Krisburg ; Joe Anderson ; > > > > > Gordon > > > > > > > > Bennett ; Dixon Foss ; Bob Heygood ; Barry Hynum > > > > > Sent: 01-28-2004 11:34 > > > > > Subject: Re: [AccessD] Error 2468 - You can't carry out this > > > > > action at the present time. > > > > > > > > > > > > > > > Randall: > > > > > > > > > > Tried this experiment just to get the DAO recordset out of > > > > > the way. > > > > I > > > > > deleted all references to it. > > > > > > > > > > Then I replaced: > > > > > > > > > > 'DoCmd.SetWarnings False > > > > > 'DoCmd.DoMenuItem acFormBar, acEditMenu, 8, , acMenuVer70 > > > > > 'DoCmd.DoMenuItem acFormBar, acEditMenu, 6, , acMenuVer70 > > > > > 'DoCmd.SetWarnings True > > > > > > > > > > with > > > > > > > > > > DoCmd.RunCommand acCmdDelete > > > > > > > > > > I selected a record and ran that code which does the delete. > > > > > Then > > > > > > > > before > > > > > trying to delete the second record, I checked the table and > > > > > the record was > > > > > still there! > > > > > > > > > > So the delete (and probably other operations) are not > > > > > completing > > > > > > > for > > > > > > > > > some > > > > > reason. > > > > > > > > > > Pluse, when I get the error, I have to use the task manager > > > > > to clear > > > > > > > > > access. > > > > > It won't quit, cant close any forms, etc. > > > > > > > > > > Any ideas? > > > > > > > > > > Many thanks in advance and regards, > > > > > > > > > > is > > > > > > > > > > ----- Original Message ----- > > > > > From: "Randall Anthony" > > > > > To: "'Access Developers discussion and problem solving'" > > > > > > > > > > Sent: Wednesday, January 28, 2004 10:31 AM > > > > > Subject: RE: [AccessD] Error 2468 - You can't carry out this > > > > > action at the > > > > > present time. > > > > > > > > > > > > > > > > Right off the top of my head, it has to do with the > > > > > movefirst, > > > > > > > movelast. > > > > > I > > > > > > ran into this when converting A97 to A2K. Code worked in > > > > > A97, > > > > > > > not > > > > > > > > > A2K and > > > > > > M$ said this was designed behavior. I'll try to find the > > > article. > > > > > > > > > > > > -----Original Message----- > > > > > > From: Rocky Smolin - Beach Access Software > > > > > [mailto:bchacc at san.rr.com] > > > > > > Sent: Wednesday, January 28, 2004 1:07 PM > > > > > > To: AccessD at databaseadvisors.com > > > > > > Subject: [AccessD] Error 2468 - You can't carry out this > > > > > action at > > > > > > > > > the > > > > > > present time. > > > > > > > > > > > > Dear List: > > > > > > > > > > > > I am getting the following error message on a bound form: > > > > > > > > > > > > Error 2468 - You can't carry out this action at the > > > > > present > > > time. > > > > > > > > > > > > This form has a sub form linked to the main form by the > > > > > main > > > > form's > > > > > primary > > > > > > key. (Main form is P.O. Header, subform is P.O. Detail). > > > > > > > > > > > > I get this error if I try to delete two records in a row. > > > > > > > > > > > > DoCmd.SetWarnings False > > > > > > DoCmd.DoMenuItem acFormBar, acEditMenu, 8, , acMenuVer70 > > > > > > DoCmd.DoMenuItem acFormBar, acEditMenu, 6, , acMenuVer70 > > > > > > DoCmd.SetWarnings True > > > > > > > > > > > > I also get this error after I try to add a record. The > > > > > problem started > > > > > > because I wanted to get the last PO in the file, add one > > > > > to the PO > > > > > > > > > number, > > > > > > and put the prefix and the new PO number ito the new record: > > > > > > > > > > > > DoCmd.GoToRecord , , acNewRec > > > > > > > > > > > > 'If rstPOHeader.RecordCount <> 0 Then > > > > > > ' rstPOHeader.MoveLast > > > > > > ' Me.fldPOPrefix = Nz(rstPOHeader!fldPOPrefix) > > > > > > ' If IsNumeric(rstPOHeader!fldPONumber) Then > > > > > > ' Me.fldPONumber = rstPOHeader!fldPONumber + 1 > > > > > > ' fldPOOrderDate.SetFocus > > > > > > ' Else > > > > > > ' Me.fldPONumber.SetFocus > > > > > > ' End If > > > > > > 'End If > > > > > > 'If Nz(Me.fldPOPrefix) = "" And > > Nz(rstPOHeader!fldPOPrefix) > > > = > > > > "" > > > > > Then > > > > > _ > > > > > > Me.fldPOPrefix.SetFocus > > > > > > > > > > > > Right now the code is commented out. If I uncomment the > > > > > two > > > > lines: > > > > > > > > > > > > ' rstPOHeader.MoveLast > > > > > > ' Me.fldPOPrefix = Nz(rstPOHeader!fldPOPrefix) > > > > > > > > > > > > I get the error when I try to save: > > > > > > > > > > > > DoCmd.DoMenuItem acFormBar, acRecordsMenu, acSaveRecord, , > > > > > acMenuVer70 > > > > > > > > > > > > I checked the web and there is nothing. Has anyone > > > > > encountered > > > > this > > > > > before? > > > > > > > > > > > > Thanks and regards, > > > > > > > > > > > > Rocky Smolin > > > > > > Beach Access Software > > > > > > _______________________________________________ > > > > > > 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 > > > > > > > > > > > _______________________________________________ > > > > > 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 > > > > > _______________________________________________ > > > > > 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 > > > > _______________________________________________ > > > > 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 > > > _______________________________________________ > > > 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 > > _______________________________________________ > > 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 _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From bchacc at san.rr.com Thu Jan 29 11:02:59 2004 From: bchacc at san.rr.com (Rocky Smolin - Beach Access Software) Date: Thu, 29 Jan 2004 09:02:59 -0800 Subject: [AccessD] Error 2468 - You can'tcarry out this action at thepresent time - solved References: <024001c3e610$66b99750$6601a8c0@HAL9002> <00ed01c3e688$1dd64bf0$6601a8c0@HAL9002> Message-ID: <011401c3e689$bf9273a0$6601a8c0@HAL9002> Uh-oh. Write in haste. Repent at leisure. Can now add multiple POs but deletes still do not work. Back to the drawing board. Rocky ----- Original Message ----- From: "Rocky Smolin - Beach Access Software" To: "Access Developers discussion and problem solving" Sent: Thursday, January 29, 2004 8:51 AM Subject: Re: [AccessD] Error 2468 - You can'tcarry out this action at thepresent time - solved > Charlotte: > > Well I solved it. It turns out that I'm using the ADH resizing code and had > the resizer called in the open event of the subform. When I removed that > one line of code, everything started to work. I have no idea why that > resizing code hosed the record operations. > > But once I figured out it was something in the subform, I deleted all the > subform code and everything worked that failed before. So then I restored > the code and began to remove one module at a time and it wasn't long before > I removed the OnOpen event code and everything worked. So then since there > was only a few lines of code in that module, it was a simple matter to guess > it was the adhScaleForm routine. > > Thanks for your input. > > Rocky > > ----- Original Message ----- > From: "Rocky Smolin - Beach Access Software" > To: "Access Developers discussion and problem solving" > > Sent: Wednesday, January 28, 2004 6:34 PM > Subject: Re: [AccessD] Error 2468 - You > can'tcarryoutthisactionatthepresenttime. > > > > "Any way you look at it, it pays to make sure you know where you are > before > > you try to do anything. " > > > > Good advice at any time. Brain fade dictates I address this in the a.m. > > Thanks for your input and have a nice night. > > > > Rocky > > > > > > ----- Original Message ----- > > From: "Charlotte Foust" > > To: "Access Developers discussion and problem solving" > > > > Sent: Wednesday, January 28, 2004 5:16 PM > > Subject: RE: [AccessD] Error 2468 - You > > can'tcarryoutthisactionatthepresenttime. > > > > > > > Yep, the command button wizard still writes Access 95 code. Cute, huh? > > > > > > Is there anything else on your form that has a connection to the same > > > table the parent form is based on? If not, then you need to make sure > > > there is a current record before you try deleting again. You might > > > stick some debug.print code in there to print the current Me.fldPOPrefix > > > or return the Me.NewRecord flag to see where you are. If you wind up on > > > a new record by deleting the last record in the recordset, then you'll > > > get an error if you try to go to a new record. If you're on the new > > > record when you try to delete, you'll get an error because there is no > > > current record. If you have started to create a new record, you can't > > > delete it because it isn't saved, and you can't go to NewRecord for the > > > same reason. Any way you look at it, it pays to make sure you know > > > where you are before you try to do anything. > > > > > > Charlotte Foust > > > > > > -----Original Message----- > > > From: Rocky Smolin - Beach Access Software [mailto:bchacc at san.rr.com] > > > Sent: Wednesday, January 28, 2004 5:07 PM > > > To: Access Developers discussion and problem solving > > > Subject: Re: [AccessD] Error 2468 - You > > > can'tcarryoutthisactionatthepresenttime. > > > > > > > > > Trying to delete from the parent form. A parent record that has no > > > child records. > > > > > > For delete what should I use: DoCmd.RunCommand acDeleteRecord? > > > > > > That code came from the command button wizard. > > > > > > Rocky > > > > > > ----- Original Message ----- > > > From: "Charlotte Foust" > > > To: "Access Developers discussion and problem solving" > > > > > > Sent: Wednesday, January 28, 2004 4:22 PM > > > Subject: RE: [AccessD] Error 2468 - You can't > > > carryoutthisactionatthepresenttime. > > > > > > > > > > Ack! Lose that old A95 code, please! I can't even read it any more. > > > > Comment out the SetWarnings False and see what Access tells you about > > > > the operation. > > > > > > > > HOY! I just noticed that you appear to be running this from the > > > > parent form. Which form are you trying to delete a record from? > > > > > > > > Charlotte Foust > > > > > > > > -----Original Message----- > > > > From: Rocky Smolin - Beach Access Software [mailto:bchacc at san.rr.com] > > > > Sent: Wednesday, January 28, 2004 4:18 PM > > > > To: Access Developers discussion and problem solving > > > > Subject: Re: [AccessD] Error 2468 - You can't carry > > > > outthisactionatthepresenttime. > > > > > > > > > > > > Rats. No soap. Got the error on the second delete after adding the > > > > dbengineidle and the subfrm requery like this: > > > > > > > > > > > > DoCmd.SetWarnings False > > > > DoCmd.DoMenuItem acFormBar, acEditMenu, 8, , acMenuVer70 > > > > DoCmd.DoMenuItem acFormBar, acEditMenu, 6, , acMenuVer70 > > > > DoCmd.SetWarnings True > > > > > > > > DBEngine.Idle dbRefreshCache > > > > > > > > Me.Requery > > > > Me!subfrmPODetail.Requery > > > > > > > > Any other ideas? > > > > > > > > Thanks and regards, > > > > > > > > Rocky > > > > > > > > ----- Original Message ----- > > > > From: "Charlotte Foust" > > > > To: "Access Developers discussion and problem solving" > > > > > > > > Sent: Wednesday, January 28, 2004 3:47 PM > > > > Subject: RE: [AccessD] Error 2468 - You can't carry out > > > > thisactionatthepresenttime. > > > > > > > > > > > > > Rocky, > > > > > > > > > > I suspect you're running into an issue I've seen in somewhat similar > > > > > > > > circumstances, where the deletion didn't actually seem to get > > > > > processed until I requeried the subform. Have you tried a > > > > > DBEngine.Idle dbRefreshCache after the deletion? > > > > > > > > > > Charlotte Foust > > > > > > > > > > -----Original Message----- > > > > > From: Rocky Smolin - Beach Access Software > > > > > [mailto:bchacc at san.rr.com] > > > > > Sent: Wednesday, January 28, 2004 2:13 PM > > > > > To: Access Developers discussion and problem solving > > > > > Subject: Re: [AccessD] Error 2468 - You can't carry out > > > > > thisactionatthepresent time. > > > > > > > > > > > > > > > Charlotte: > > > > > > > > > > Further to my reply, I found that when I did a delete then, before I > > > > > > > > did anything else, I went and looked in the tblPOHeader and the > > > > > record > > > > > > > > > was still there. For some reason it's not completing the delete and > > > > > > > > that's why I think it's telling me that I can't make any moves at > > > > > this > > > > > > > > > time. > > > > > > > > > > Rocky > > > > > > > > > > ----- Original Message ----- > > > > > From: "Charlotte Foust" > > > > > To: "Access Developers discussion and problem solving" > > > > > > > > > > Sent: Wednesday, January 28, 2004 1:20 PM > > > > > Subject: RE: [AccessD] Error 2468 - You can't carry out this > > > > > actionatthepresent time. > > > > > > > > > > > > > > > > It sounds like you may have the parent and child forms linked to > > > > > > the > > > > > > > > > > same dataset. Do you? > > > > > > > > > > > > Charlotte Foust > > > > > > > > > > > > -----Original Message----- > > > > > > From: Rocky Smolin - Beach Access Software > > > > > > [mailto:bchacc at san.rr.com] > > > > > > Sent: Wednesday, January 28, 2004 1:04 PM > > > > > > To: Access Developers discussion and problem solving > > > > > > Subject: Re: [AccessD] Error 2468 - You can't carry out this > > > > > > action atthepresent time. > > > > > > > > > > > > > > > > > > I'm getting closer. I deleted the sub-form that on the second tab > > > > > > > > > of the tab form and the two deletes worked. > > > > > > > > > > > > It has something to do with a sub form on a tab. Any clues, > > > > > > anybody? > > > > > > > > > > > > Rocky > > > > > > > > > > > > ----- Original Message ----- > > > > > > From: "Joe K Anderson" > > > > > > To: "Rocky Smolin - Beach Access Software" ; > > > > > > > > > > > > Cc: "Wayne Warren Angelucci" ; "Gordon > > > > > > Bennett" ; "Barry Hynum" > > > > > > ; "Dixon Foss" ; "Mark > > > > > > Krisburg" > > > > > > > > > > > > > > > > Sent: Wednesday, January 28, 2004 11:44 AM > > > > > > Subject: Re: [AccessD] Error 2468 - You can't carry out this > > > > > > action at thepresent time. > > > > > > > > > > > > > > > > > > You may need to do a Requery between deletes? > > > > > > > > > > > > joe > > > > > > ----- Original Message ----- > > > > > > From: Rocky Smolin - Beach Access Software > > > > > > To: Access Developers discussion and problem solving > > > > > > Cc: Wayne Warren Angelucci ; Mark Krisburg ; Joe Anderson ; > > > > > > Gordon > > > > > > > > > > Bennett ; Dixon Foss ; Bob Heygood ; Barry Hynum > > > > > > Sent: 01-28-2004 11:34 > > > > > > Subject: Re: [AccessD] Error 2468 - You can't carry out this > > > > > > action at the present time. > > > > > > > > > > > > > > > > > > Randall: > > > > > > > > > > > > Tried this experiment just to get the DAO recordset out of the > > > > > > way. > > > > > I > > > > > > deleted all references to it. > > > > > > > > > > > > Then I replaced: > > > > > > > > > > > > 'DoCmd.SetWarnings False > > > > > > 'DoCmd.DoMenuItem acFormBar, acEditMenu, 8, , acMenuVer70 > > > > > > 'DoCmd.DoMenuItem acFormBar, acEditMenu, 6, , acMenuVer70 > > > > > > 'DoCmd.SetWarnings True > > > > > > > > > > > > with > > > > > > > > > > > > DoCmd.RunCommand acCmdDelete > > > > > > > > > > > > I selected a record and ran that code which does the delete. > > > > > > Then > > > > > > > > > > before > > > > > > trying to delete the second record, I checked the table and the > > > > > > record was > > > > > > still there! > > > > > > > > > > > > So the delete (and probably other operations) are not completing > > > > > > > > > for > > > > > > > > > > > some > > > > > > reason. > > > > > > > > > > > > Pluse, when I get the error, I have to use the task manager to > > > > > > clear > > > > > > > > > > > access. > > > > > > It won't quit, cant close any forms, etc. > > > > > > > > > > > > Any ideas? > > > > > > > > > > > > Many thanks in advance and regards, > > > > > > > > > > > > is > > > > > > > > > > > > ----- Original Message ----- > > > > > > From: "Randall Anthony" > > > > > > To: "'Access Developers discussion and problem solving'" > > > > > > > > > > > > Sent: Wednesday, January 28, 2004 10:31 AM > > > > > > Subject: RE: [AccessD] Error 2468 - You can't carry out this > > > > > > action at the > > > > > > present time. > > > > > > > > > > > > > > > > > > > Right off the top of my head, it has to do with the movefirst, > > > > > > > > > movelast. > > > > > > I > > > > > > > ran into this when converting A97 to A2K. Code worked in A97, > > > > > > > > > not > > > > > > > > > > > A2K and > > > > > > > M$ said this was designed behavior. I'll try to find the > > > > article. > > > > > > > > > > > > > > -----Original Message----- > > > > > > > From: Rocky Smolin - Beach Access Software > > > > > > [mailto:bchacc at san.rr.com] > > > > > > > Sent: Wednesday, January 28, 2004 1:07 PM > > > > > > > To: AccessD at databaseadvisors.com > > > > > > > Subject: [AccessD] Error 2468 - You can't carry out this > > > > > > action at > > > > > > > > > > > the > > > > > > > present time. > > > > > > > > > > > > > > Dear List: > > > > > > > > > > > > > > I am getting the following error message on a bound form: > > > > > > > > > > > > > > Error 2468 - You can't carry out this action at the present > > > > time. > > > > > > > > > > > > > > This form has a sub form linked to the main form by the main > > > > > form's > > > > > > primary > > > > > > > key. (Main form is P.O. Header, subform is P.O. Detail). > > > > > > > > > > > > > > I get this error if I try to delete two records in a row. > > > > > > > > > > > > > > DoCmd.SetWarnings False > > > > > > > DoCmd.DoMenuItem acFormBar, acEditMenu, 8, , acMenuVer70 > > > > > > > DoCmd.DoMenuItem acFormBar, acEditMenu, 6, , acMenuVer70 > > > > > > > DoCmd.SetWarnings True > > > > > > > > > > > > > > I also get this error after I try to add a record. The > > > > > > problem started > > > > > > > because I wanted to get the last PO in the file, add one to > > > > > > the PO > > > > > > > > > > > number, > > > > > > > and put the prefix and the new PO number ito the new record: > > > > > > > > > > > > > > DoCmd.GoToRecord , , acNewRec > > > > > > > > > > > > > > 'If rstPOHeader.RecordCount <> 0 Then > > > > > > > ' rstPOHeader.MoveLast > > > > > > > ' Me.fldPOPrefix = Nz(rstPOHeader!fldPOPrefix) > > > > > > > ' If IsNumeric(rstPOHeader!fldPONumber) Then > > > > > > > ' Me.fldPONumber = rstPOHeader!fldPONumber + 1 > > > > > > > ' fldPOOrderDate.SetFocus > > > > > > > ' Else > > > > > > > ' Me.fldPONumber.SetFocus > > > > > > > ' End If > > > > > > > 'End If > > > > > > > 'If Nz(Me.fldPOPrefix) = "" And > > > Nz(rstPOHeader!fldPOPrefix) > > > > = > > > > > "" > > > > > > Then > > > > > > _ > > > > > > > Me.fldPOPrefix.SetFocus > > > > > > > > > > > > > > Right now the code is commented out. If I uncomment the two > > > > > lines: > > > > > > > > > > > > > > ' rstPOHeader.MoveLast > > > > > > > ' Me.fldPOPrefix = Nz(rstPOHeader!fldPOPrefix) > > > > > > > > > > > > > > I get the error when I try to save: > > > > > > > > > > > > > > DoCmd.DoMenuItem acFormBar, acRecordsMenu, acSaveRecord, , > > > > > > acMenuVer70 > > > > > > > > > > > > > > I checked the web and there is nothing. Has anyone > > > > > > encountered > > > > > this > > > > > > before? > > > > > > > > > > > > > > Thanks and regards, > > > > > > > > > > > > > > Rocky Smolin > > > > > > > Beach Access Software > > > > > > > _______________________________________________ > > > > > > > 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 > > > > > > > > > > > > > _______________________________________________ > > > > > > 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 > > > > > > _______________________________________________ > > > > > > 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 > > > > > _______________________________________________ > > > > > 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 > > > > _______________________________________________ > > > > 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 > > > _______________________________________________ > > > 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 > > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com > From Lambert.Heenan at AIG.com Thu Jan 29 11:08:00 2004 From: Lambert.Heenan at AIG.com (Heenan, Lambert) Date: Thu, 29 Jan 2004 12:08:00 -0500 Subject: [AccessD] macro can't find function Message-ID: <8B98F8EA48F8BA47A2F24E0D0AF40CF407AD7D71@xlivmbx12.aig.com> I'd suggest you get rid of the space between "BreakName" and the opening parentheses. Lambert > -----Original Message----- > From: Oleg_123 at xuppa.com [SMTP:Oleg_123 at xuppa.com] > Sent: Thursday, January 29, 2004 11:52 AM > To: accessd at databaseadvisors.com > Subject: RE: [AccessD] macro can't find function > > it's public (of course ;-) > and this is how it looks -- BreakName () > > i decided to try to make that macro call another macro which contains the > function > > > Oleg > > > > In a macro the function has to be expressed as fn(), ie. no = sign > > before it but must have the parentheses. May be worth checking. Oh and > > the function must of course be Public. > > > > Andy Lacey > > http://www.minstersystems.co.uk > > > >> -----Original Message----- > >> From: accessd-bounces at databaseadvisors.com > >> [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of > >> Oleg_123 at xuppa.com > >> Sent: 29 January 2004 16:12 > >> To: accessd at databaseadvisors.com > >> Subject: RE: [AccessD] macro can't find function > >> > >> > >> Group, > >> > >> I have a long macro that opens several queries, at the end > >> its suppose to RunCode - function, however it gives me an > >> message "The expression you entered has a function name that > >> xxx can't find". When I run that function separetely it works > >> fine, and the name is spelled correctly since i didn't type > >> it but selected it using their device what should i do ? > >> > >> > >> ----------------------------------------- > >> Get Breaking News from CNN, ABC, NBC, CBS Now. > >> http://www.xuppa.com/news/?link=webmail > >> > >> > >> > >> _______________________________________________ > >> AccessD mailing list > >> AccessD at databaseadvisors.com > >> http://databaseadvisors.com/mailman/listinfo/a> ccessd > >> Website: > >> http://www.databaseadvisors.com > >> > >> > > > > _______________________________________________ > > AccessD mailing list > > AccessD at databaseadvisors.com > > http://databaseadvisors.com/mailman/listinfo/accessd > > Website: http://www.databaseadvisors.com > > > > ----------------------------------------- > Get Breaking News from CNN, ABC, NBC, CBS Now. > http://www.xuppa.com/news/?link=webmail > > > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com From Erwin.Craps at ithelps.be Thu Jan 29 11:12:08 2004 From: Erwin.Craps at ithelps.be (Erwin Craps - IT Helps) Date: Thu, 29 Jan 2004 18:12:08 +0100 Subject: [AccessD] Code Not Working in XP Message-ID: <46B976F2B698FF46A4FE7636509B22DF03D1A8@stekelbes.ithelps.local> What the code in fHandleFile? -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Hollis,Virginia Sent: Thursday, January 29, 2004 5:29 PM To: 'accessD at databaseadvisors.com' Subject: [AccessD] Code Not Working in XP I have been using the code shown below to access data on our Intranet. The code matches a field entry in the database and looks up the details. In this example it finds a stock number. Problem: The code does not work for users that are running XP. It does not do anything, it will not even try to access the web. They click the button and nothing happens. What can I do to correct this for users of XP? Virginia _____ strPath = " http://web.com/vr.asp?xml=orafin%2Stock= " strFile = strPath & Me.StockNumber If Dir(strFile) = "" Then strFile = strPath & Me.StockNumber End If Call fHandleFile(strFile, WIN_MAX) _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From andy at minstersystems.co.uk Thu Jan 29 11:14:19 2004 From: andy at minstersystems.co.uk (Andy Lacey) Date: Thu, 29 Jan 2004 17:14:19 -0000 Subject: [AccessD] macro can't find function In-Reply-To: <8B98F8EA48F8BA47A2F24E0D0AF40CF407AD7D71@xlivmbx12.aig.com> Message-ID: <007101c3e68b$55342830$b274d0d5@minster33c3r25> Beat me to it Lambert :-) Andy Lacey http://www.minstersystems.co.uk > -----Original Message----- > From: accessd-bounces at databaseadvisors.com > [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of > Heenan, Lambert > Sent: 29 January 2004 17:08 > To: 'Access Developers discussion and problem solving' > Subject: RE: [AccessD] macro can't find function > > > I'd suggest you get rid of the space between "BreakName" and > the opening parentheses. > > Lambert > > > -----Original Message----- > > From: Oleg_123 at xuppa.com [SMTP:Oleg_123 at xuppa.com] > > Sent: Thursday, January 29, 2004 11:52 AM > > To: accessd at databaseadvisors.com > > Subject: RE: [AccessD] macro can't find function > > > > it's public (of course ;-) > > and this is how it looks -- BreakName () > > > > i decided to try to make that macro call another macro > which contains > > the function > > > > > Oleg > > > > > > In a macro the function has to be expressed as fn(), ie. > no = sign > > > before it but must have the parentheses. May be worth > checking. Oh > > > and the function must of course be Public. > > > > > > Andy Lacey > > > http://www.minstersystems.co.uk > > > > > >> -----Original Message----- > > >> From: accessd-bounces at databaseadvisors.com > > >> [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of > > >> Oleg_123 at xuppa.com > > >> Sent: 29 January 2004 16:12 > > >> To: accessd at databaseadvisors.com > > >> Subject: RE: [AccessD] macro can't find function > > >> > > >> > > >> Group, > > >> > > >> I have a long macro that opens several queries, at the end its > > >> suppose to RunCode - function, however it gives me an > message "The > > >> expression you entered has a function name that xxx can't find". > > >> When I run that function separetely it works fine, and > the name is > > >> spelled correctly since i didn't type it but selected it using > > >> their device what should i do ? > > >> > > >> > > >> ----------------------------------------- > > >> Get Breaking News from CNN, ABC, NBC, CBS Now. > > >> http://www.xuppa.com/news/?link=webmail > > >> > > >> > > >> > > >> _______________________________________________ > > >> AccessD mailing list > > >> AccessD at databaseadvisors.com > > >> http://databaseadvisors.com/mailman/listinfo/a> ccessd > > >> Website: > > >> http://www.databaseadvisors.com > > >> > > >> > > > > > > _______________________________________________ > > > AccessD mailing list > > > AccessD at databaseadvisors.com > > > http://databaseadvisors.com/mailman/listinfo/accessd > > > Website: http://www.databaseadvisors.com > > > > > > > > ----------------------------------------- > > Get Breaking News from CNN, ABC, NBC, CBS Now. > > http://www.xuppa.com/news/?link=webmail > > > > > > _______________________________________________ > > 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/a> ccessd > Website: > http://www.databaseadvisors.com > > From serbach at new.rr.com Thu Jan 29 11:21:44 2004 From: serbach at new.rr.com (Steven W. Erbach) Date: Thu, 29 Jan 2004 11:21:44 -0600 Subject: [AccessD] This doesn't look right Message-ID: <20040129112144.741233039.serbach@new.rr.com> Charlotte, >> HAVING includes the field being evaluated, and that has a profound effect of the results, since you're also grouping by those fields. << Very succinctly explained. Thank you. This could wind up to be embarrassing since this app has been in operation for some time using the original developer's code. I just took it over at the beginning of the month. Will I be a savior or a stooge? The question of the day... Regards, Steve Erbach Scientific Marketing Neenah, WI 920-969-0504 Message created with Bloomba Disclaimer: No tree was killed in the transmission of this message. However, several coulombs of electrons were temporarily inconvenienced. From HollisVJ at pgdp.usec.com Thu Jan 29 11:27:12 2004 From: HollisVJ at pgdp.usec.com (Hollis,Virginia) Date: Thu, 29 Jan 2004 11:27:12 -0600 Subject: [AccessD] Pick out the Year Message-ID: <618EB4D6DDCDD3119B0A00508B6FD37A0CB0CFBF@cntexchange.pgdp.usec.com> I have a date field showing the standard date format of mm/dd/yyyy. I need to group and count records by the month & year. For example, I need a count of all records entered in January 04. How do I parse out the month from the date? I tried the left function, but get a data type mismatch. Virginia From stephen at bondsoftware.co.nz Thu Jan 29 11:33:57 2004 From: stephen at bondsoftware.co.nz (Stephen Bond) Date: Fri, 30 Jan 2004 06:33:57 +1300 Subject: [AccessD] Charts Message-ID: <70F3D727890C784291D8433E9C418F290885B4@server.bondsoftware.co.nz> Making an assumption here that you have a Cross-tab Q with the month column header formatted MM ... * go to Query Properties, and put something like this in the 'Column Headings' entry: 1;2;3;4;5;6;7;8;9;10;11;12 This will force a column heading for each month. Stephen Bond > -----Original Message----- > From: Roz Clarke [mailto:roz.clarke at donnslaw.co.uk] > Sent: Friday, 30 January 2004 5:54 a.m. > To: 'Access Developers discussion and problem solving' > Subject: [AccessD] Charts > > > Hi all. Hope everyone is well. > > I have a problem with a chart I need to display in Access. I > used to do this > by exporting data to Excel but the connection to Excel has > been so slow and > unstable that I am now trying to bring it within Access. > > The data I need to display is in a cross-tab query, where I > have categories > as the row header and months of the year as the column > header. I need to > show all the months even though we currently have data only > for January. > > If I base the chart on the cross-tab, I cannot see a way to > tell it that > each column should be an axis entry. If I base the chart on a > select query, > it correctly allows me to set 'month' as an axis, but only > shows me January. > > Can anyone help? > > TIA > > Roz > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com > From HollisVJ at pgdp.usec.com Thu Jan 29 11:45:18 2004 From: HollisVJ at pgdp.usec.com (Hollis,Virginia) Date: Thu, 29 Jan 2004 11:45:18 -0600 Subject: [AccessD] Code Not Working in XP Message-ID: <618EB4D6DDCDD3119B0A00508B6FD37A0CB0CFC1@cntexchange.pgdp.usec.com> It is from Dev Ashish, API: Start an app with ShellExecute This is the link to the site & the code: http://www.mvps.org/access/api/api0018.htm Virginia -----Original Message----- From: Erwin Craps - IT Helps [mailto:Erwin.Craps at ithelps.be] Sent: Thursday, January 29, 2004 11:12 AM To: Access Developers discussion and problem solving Subject: RE: [AccessD] Code Not Working in XP What the code in fHandleFile? -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Hollis,Virginia Sent: Thursday, January 29, 2004 5:29 PM To: 'accessD at databaseadvisors.com' Subject: [AccessD] Code Not Working in XP I have been using the code shown below to access data on our Intranet. The code matches a field entry in the database and looks up the details. In this example it finds a stock number. Problem: The code does not work for users that are running XP. It does not do anything, it will not even try to access the web. They click the button and nothing happens. What can I do to correct this for users of XP? Virginia _____ strPath = " http://web.com/vr.asp?xml=orafin%2Stock= " strFile = strPath & Me.StockNumber If Dir(strFile) = "" Then strFile = strPath & Me.StockNumber End If Call fHandleFile(strFile, WIN_MAX) _______________________________________________ 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 From gustav at cactus.dk Thu Jan 29 11:46:17 2004 From: gustav at cactus.dk (Gustav Brock) Date: Thu, 29 Jan 2004 18:46:17 +0100 Subject: [AccessD] Pick out the Year In-Reply-To: <618EB4D6DDCDD3119B0A00508B6FD37A0CB0CFBF@cntexchange.pgdp.usec.com> References: <618EB4D6DDCDD3119B0A00508B6FD37A0CB0CFBF@cntexchange.pgdp.usec.com> Message-ID: <11836595721.20040129184617@cactus.dk> Hi Virginia How about .. Group By Year(datefield), Month(datefield); /gustav > I have a date field showing the standard date format of mm/dd/yyyy. I need > to group and count records by the month & year. For example, I need a count > of all records entered in January 04. > How do I parse out the month from the date? I tried the left function, but > get a data type mismatch. From cfoust at infostatsystems.com Thu Jan 29 11:49:03 2004 From: cfoust at infostatsystems.com (Charlotte Foust) Date: Thu, 29 Jan 2004 09:49:03 -0800 Subject: [AccessD] This doesn't look right Message-ID: If they've been looking at bogus information all this time, it's hard to tell. "Shoot the messenger" often prevails, but if the information is being used to make business decisions, would they rather make them on valid information or not? Charlotte Foust -----Original Message----- From: Steven W. Erbach [mailto:serbach at new.rr.com] Sent: Thursday, January 29, 2004 9:22 AM To: Access Developers discussion and problem solving Subject: RE: [AccessD] This doesn't look right Charlotte, >> HAVING includes the field being evaluated, and that has a profound >> effect of the results, since you're also grouping by those fields. << Very succinctly explained. Thank you. This could wind up to be embarrassing since this app has been in operation for some time using the original developer's code. I just took it over at the beginning of the month. Will I be a savior or a stooge? The question of the day... Regards, Steve Erbach Scientific Marketing Neenah, WI 920-969-0504 Message created with Bloomba Disclaimer: No tree was killed in the transmission of this message. However, several coulombs of electrons were temporarily inconvenienced. _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From roz.clarke at donnslaw.co.uk Thu Jan 29 12:03:35 2004 From: roz.clarke at donnslaw.co.uk (Roz Clarke) Date: Thu, 29 Jan 2004 18:03:35 -0000 Subject: [AccessD] Charts Message-ID: <61F915314798D311A2F800A0C9C83188047C6A22@dibble.observatory.donnslaw.co.uk> Sorry Stephen, I guess I wasn't clear enough I have the column headings set in my cross-tab query and that works just fine. The problem is when I try to base a line graph on that data... I just can't see a way to do it. -----Original Message----- From: Stephen Bond [mailto:stephen at bondsoftware.co.nz] Sent: 29 January 2004 17:34 To: Access Developers discussion and problem solving Subject: RE: [AccessD] Charts Making an assumption here that you have a Cross-tab Q with the month column header formatted MM ... * go to Query Properties, and put something like this in the 'Column Headings' entry: 1;2;3;4;5;6;7;8;9;10;11;12 This will force a column heading for each month. Stephen Bond > -----Original Message----- > From: Roz Clarke [mailto:roz.clarke at donnslaw.co.uk] > Sent: Friday, 30 January 2004 5:54 a.m. > To: 'Access Developers discussion and problem solving' > Subject: [AccessD] Charts > > > Hi all. Hope everyone is well. > > I have a problem with a chart I need to display in Access. I > used to do this > by exporting data to Excel but the connection to Excel has > been so slow and > unstable that I am now trying to bring it within Access. > > The data I need to display is in a cross-tab query, where I > have categories > as the row header and months of the year as the column > header. I need to > show all the months even though we currently have data only > for January. > > If I base the chart on the cross-tab, I cannot see a way to > tell it that > each column should be an axis entry. If I base the chart on a > select query, > it correctly allows me to set 'month' as an axis, but only > shows me January. > > Can anyone help? > > TIA > > Roz > _______________________________________________ > 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 From BBarabash at TappeConstruction.com Thu Jan 29 12:10:55 2004 From: BBarabash at TappeConstruction.com (Brett Barabash) Date: Thu, 29 Jan 2004 12:10:55 -0600 Subject: [AccessD] Pick out the Year Message-ID: <426071E0B0A6D311B3C0006008B0AB23AFE2FD@TAPPEEXCH01> How about: DatePart("yyyy", ) -----Original Message----- From: Hollis,Virginia [mailto:HollisVJ at pgdp.usec.com] Sent: Thursday, January 29, 2004 11:27 AM To: 'Access Developers discussion and problem solving' Subject: [AccessD] Pick out the Year I have a date field showing the standard date format of mm/dd/yyyy. I need to group and count records by the month & year. For example, I need a count of all records entered in January 04. How do I parse out the month from the date? I tried the left function, but get a data type mismatch. Virginia -------------------------------------------------------------------------------------------------------------------- This email and any files transmitted with it are confidential and intended solely for the use of the individual or entity to whom they are addressed. If you have received this email in error please notify the originator of the message. This footer also confirms that this email message has been scanned for the presence of computer viruses. Any views expressed in this message are those of the individual sender, except where the sender specifies and with authority, states them to be the views of Tappe Construction Co. Scanning of this message and addition of this footer is performed by SurfControl E-mail Filter software in conjunction with virus detection software. From KIsmert at TexasSystems.com Thu Jan 29 12:14:43 2004 From: KIsmert at TexasSystems.com (Ken Ismert) Date: Thu, 29 Jan 2004 12:14:43 -0600 Subject: [AccessD] Interface Callback Class Questions. In-Reply-To: <000001c3e60c$371f73b0$6501a8c0@RG> Message-ID: <005801c3e693$c52df410$2a3ca8c0@TEXASSYSTEMS.COM> Robert, > The report fires, however none of the events (Close) are being hooked. The only thing I can think of here is that the Report must have a module for a class to hook its events. Double-check that 'Has Module' is Yes in report properties. The module can be blank. > I can run the report once, any attempt to run the report again fails on > "RemoteReportClose mrRpt.Name" ERROR Number 2467....... Object or > property... either does not exist or is closed...... I think that if you can hook the Close event, this problem will go away. CReportHost relies on the Close event to set it's mrRpt reference to Nothing. If the close event fails, you get a dangling reference - mrRpt is pointing to an object that has shutdown, and won't respond to further native property or method requests. It is important to note that the Report object is still in memory, because it still has one reference, mrRpt, keeping it alive. This does suggest adding a failsafe to the CReportHost.CloseRemoteReport method: Public Sub CloseRemoteReport() On Error GoTo HandleErr ' Close Report if Open If mrRpt Is Nothing Then Exit Sub ' Fires mrRpt_Close RemoteReportClose mrRpt.Name Exit Sub HandleErr: Select Case Err.Number Case 2467 ' Object or Property doesn't exist or is closed ' User closed Report, but mrRpt_Close event failed: ' Release reference to allow the Report to terminate Set mrRpt = Nothing Case Else Err.Raise Number:=Err.Number, _ Description:=Err.Description, _ Source:="CReportHost.CloseRemoteReport" & vbCrLf & Err.Source End Select Exit Sub End Sub > Do I need to hook the opening report to the events in the CReportHost > class internally of the opening report, such as on the OnOpen event? I'm > new to the "DEEP" Programming method so I could be way off base..... One way to look at this is that Events are a 'pull' mechanism. In other words, declaring an object WithEvents means that you are receiving events from that object, with no setup on that object's side required. The COM object framework handles the detials of making sure all subscribers get the events they signed up for. This is completely transparent to the object generating the events. What's more, there is no way in VB6 to tell within an object, say a Report, that other objects are sinking it's events, AFAIK. (An aside: since Reports and Forms are not 'standard' COM objects, you have to go through the trouble of hooking their events. This isn't entirely bad, as it does allow you to selectively enable/disable events at runtime, if you so need.) So, the short answer is, for traditional events, you don't hook events in the object that generates them. However, if you choose to use interfaces, you can implement a 'push' style callback mechanism. In this case, lets say an object, O, wants to receive 'events'(or more correctly, callbacks) from another object, P. O would present itself to P, usually through a subscribe call, like: ' Code within O rP.Init Me ' Send reference to myself to P P, when it wants to call back O, would do something like: ' Code within P rO.Method ' Some method defined in an interface ' implemented by O Of course, O has to unsubscribe when it shuts down: ' Code within O rP.Term Me ' P sets rO to nothing, allowing ' O to terminate Interface callbacks, from O's perspective, look and act very much like events, except that explicit setup and shutdown are required. From P's perspective, events and callbacks are very different. Events are internally defined in P, and raised using RaiseEvent. Callbacks are done using methods of an externally defined interface, with an object supplied to P at runtime. Anyway, thanks for your flattering words, and I hope this helps. -Ken From rl_stewart at highstream.net Thu Jan 29 12:43:36 2004 From: rl_stewart at highstream.net (Robert L. Stewart) Date: Thu, 29 Jan 2004 12:43:36 -0600 Subject: [AccessD] Re: This doesn't look right In-Reply-To: <200401291635.i0TGZLm08364@databaseadvisors.com> Message-ID: <5.1.0.14.2.20040129124114.028fce58@pop3.highstream.net> Steven, To re-engineer it the best way, I would use 2 queries. One to hold the SQL without criteria. And the second to replace the SQL with what is in the first one plus the criteria from the form. It makes it much cleaner and easier to debug later. Robert At 10:35 AM 1/29/2004 -0600, you wrote: >Date: Thu, 29 Jan 2004 10:37:03 -0600 >From: "Steven W. Erbach" >Subject: [AccessD] This doesn't look right >To: "Access Developers discussion and problem solving" > >Message-ID: <20040129103703.1501118476.serbach at new.rr.com> >Content-Type: text/plain > >Dear Group, > >I'm "re-factoring" an application that I took over from a developer who's >reducing her workload to devote more time to her family. There is a query >that looks curious to me and I wonder if you lot could give me some >insight into how Access works. > >The query creates a SubTotal and has four Criteria rows and, of course, >the Total line is activated. The query looks at four fields on an open >form (frmReport) which feed values into the query. Two of those fields are >txtLogStartDate and txtLogEndDate. The other two are txtCity and txtCounty. > >The four Criteria rows look at various combinations of whether txtCity and >txtCounty are filled in or not on the form that feeds the query. The >ArrivalDate in the query grid looks at the range of dates between >txtLogStartDate and txtLogEndDate on the form. > >What's odd is that, at first, the ArrivalDate query column had WHERE in >the Total line. The County and City columns show Group By. The range of >dates is supposed to be the same for every one of the four Criteria >rows...BUT with ArrivalDate set to WHERE there was only one Criteria >statement in the first row of the four Criteria rows. It looked like this: > >Between [Forms]![frmReport]![txtLogStartDate] And >[Forms]![frmReport]![txtLogEndDate] Or Between >[Forms]![frmReport]![txtLogStartDate] And >[Forms]![frmReport]![txtLogEndDate] Or Between >[Forms]![frmReport]![txtLogStartDate] And >[Forms]![frmReport]![txtLogEndDate] Or Between >[Forms]![frmReport]![txtLogStartDate] And [Forms]![frmReport]![txtLogEndDate] > >(Sorry for the wrap) That is, that entire thing was in one cell of one row >of the Criteria grid. I tried to cut and paste individual "Between" >statements into each of the four rows of the Criteria grid; but when I >saved the query, closed it, and re-opened it, that huge long >multiple-Between statement re-appeared in just the first row of the >Criteria grid. > >However, when I changed the ArrivalDate Total line to GROUP BY and *then* >cut and paste individual Between statements into each row of the Criteria >grid, when I saved, closed, and re-opened the query the Between statements >stayed where they were; that is, one for each of the four rows of the >Criteria grid. > >Now, it was obvious to me that the two forms of the query would produce >different results, and that turned out to be true. My question is this: >when you're putting together a multi-Criteria row query and you want one >column to show the same criteria in each row, the natural thing to do is >choose WHERE in the Total row. You can test the query while you're >designing it and you'll get results. But when you save the query, thinking >that you've done your duty, you're actually saving something incorrect >since, if you don't look at it again, Access will re-format all those >WHERE statements in each row of the Criteria grid into one concatenated >statement in one row. > >I thought I knew queries pretty well, but this one throws me. In the SQL >statement formed when the ArrivalDate showed WHERE, that big long >concatenated multi-Between statement wound up in the WHERE clause. (Didn't >matter whether the Between statements were in separate criteria rows or >not.) But when I reformed the query to split the Between statements into >separate Criteria rows and selected GROUP BY for the ArrivalDate column, >the Between criteria wound up in the HAVING clause. > >I guess it's just an experience thing, right? > >Regards, > >Steve Erbach >Scientific Marketing >Neenah, WI >920-969-0504 From serbach at new.rr.com Thu Jan 29 13:10:25 2004 From: serbach at new.rr.com (Steven W. Erbach) Date: Thu, 29 Jan 2004 13:10:25 -0600 Subject: [AccessD] Re: This doesn't look right Message-ID: <20040129131025.118890213.serbach@new.rr.com> Robert, Thanks for the suggestion. I appreciate it. Regards, Steve Erbach Scientific Marketing Neenah, WI 920-969-0504 Message created with Bloomba Disclaimer: No tree was killed in the transmission of this message. However, several coulombs of electrons were temporarily inconvenienced. From garykjos at hotmail.com Thu Jan 29 13:25:43 2004 From: garykjos at hotmail.com (Gary Kjos) Date: Thu, 29 Jan 2004 13:25:43 -0600 Subject: [AccessD] Pick out the Year Message-ID: Hi Virginia, When I want to do this I usually will create a field in a query with the formatted date in year/month format. Something like; OrderYearMonth: Format(OrderDate,"yyyy/mm") Gary Kjos garykjos at hotmail.com >From: "Hollis,Virginia" >Reply-To: Access Developers discussion and problem >solving >To: "'Access Developers discussion and problem solving'" > >Subject: [AccessD] Pick out the Year >Date: Thu, 29 Jan 2004 11:27:12 -0600 > >I have a date field showing the standard date format of mm/dd/yyyy. I need >to group and count records by the month & year. For example, I need a count >of all records entered in January 04. > >How do I parse out the month from the date? I tried the left function, but >get a data type mismatch. > >Virginia >_______________________________________________ >AccessD mailing list >AccessD at databaseadvisors.com >http://databaseadvisors.com/mailman/listinfo/accessd >Website: http://www.databaseadvisors.com _________________________________________________________________ Let the new MSN Premium Internet Software make the most of your high-speed experience. http://join.msn.com/?pgmarket=en-us&page=byoa/prem&ST=1 From Jim.Hale at FleetPride.com Thu Jan 29 13:20:23 2004 From: Jim.Hale at FleetPride.com (Hale, Jim) Date: Thu, 29 Jan 2004 13:20:23 -0600 Subject: [AccessD] Charts Message-ID: <6A6AA9DF57E4F046BDA1E273BDDB677201AA2C@corp-es01.fleetpride.com> You might explore using pivot charts in Excel. I export the data either manually or in code to a hidden excel worksheet. The chart does the hard work. It is very flexible. It is easier to show than explain so I am sending you an example. HTH Jim Hale -----Original Message----- From: Roz Clarke [mailto:roz.clarke at donnslaw.co.uk] Sent: Thursday, January 29, 2004 12:04 PM To: 'Access Developers discussion and problem solving' Subject: RE: [AccessD] Charts Sorry Stephen, I guess I wasn't clear enough I have the column headings set in my cross-tab query and that works just fine. The problem is when I try to base a line graph on that data... I just can't see a way to do it. -----Original Message----- From: Stephen Bond [mailto:stephen at bondsoftware.co.nz] Sent: 29 January 2004 17:34 To: Access Developers discussion and problem solving Subject: RE: [AccessD] Charts Making an assumption here that you have a Cross-tab Q with the month column header formatted MM ... * go to Query Properties, and put something like this in the 'Column Headings' entry: 1;2;3;4;5;6;7;8;9;10;11;12 This will force a column heading for each month. Stephen Bond > -----Original Message----- > From: Roz Clarke [mailto:roz.clarke at donnslaw.co.uk] > Sent: Friday, 30 January 2004 5:54 a.m. > To: 'Access Developers discussion and problem solving' > Subject: [AccessD] Charts > > > Hi all. Hope everyone is well. > > I have a problem with a chart I need to display in Access. I > used to do this > by exporting data to Excel but the connection to Excel has > been so slow and > unstable that I am now trying to bring it within Access. > > The data I need to display is in a cross-tab query, where I > have categories > as the row header and months of the year as the column > header. I need to > show all the months even though we currently have data only > for January. > > If I base the chart on the cross-tab, I cannot see a way to > tell it that > each column should be an axis entry. If I base the chart on a > select query, > it correctly allows me to set 'month' as an axis, but only > shows me January. > > Can anyone help? > > TIA > > Roz > _______________________________________________ > 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 _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From rl_stewart at highstream.net Thu Jan 29 13:38:37 2004 From: rl_stewart at highstream.net (Robert L. Stewart) Date: Thu, 29 Jan 2004 13:38:37 -0600 Subject: [AccessD] Using Dates In-Reply-To: <200401291800.i0TI0Hm13057@databaseadvisors.com> Message-ID: <5.1.0.14.2.20040129132506.028deff8@pop3.highstream.net> All, I have been seeing a lot of people posting lately in many of the lists about how to do different tings with dates. Here is what I do. I have what is called a Date Dimension table. A dimension table is one used in data warehouses. In this case, it is great for relational data also. The date table has all of the things done to a date that can be done. Here is a sample structure: Date_ID Date/Time (loaded using the date() function) PK Year_Nbr Number, integer Year_Txt Text(4) Month_Nbr Number, byte Month_Nbr_Txt Text(2) Month_Name Text(15) Month_Name_Abbrv Text(3) Day_of_Month_Nbr Number, byte Day_of_Month_Nbr Text(2) Day_Of_Year_Nbr Number, integer Week_Of_Year_Nbr Number, byte Quarter_Nbr Number, byte Quarter_Nbr_Txt Text(2) Fiscal_Period Text(10) Weekday_Flag Text(1) Holiday_Flag Text(1) Last_Day_In_Month_Flag Text(1) By using this table joined to the date, you do not have to do any functions against a date to filter by month, your, quarter, or whatever. If anyone has questions about this, just send them to the list and I will answer them as best I can. Robert From stephen at bondsoftware.co.nz Thu Jan 29 13:43:47 2004 From: stephen at bondsoftware.co.nz (Stephen Bond) Date: Fri, 30 Jan 2004 08:43:47 +1300 Subject: [AccessD] Charts Message-ID: <70F3D727890C784291D8433E9C418F298F55@server.bondsoftware.co.nz> I see what you're up against - I've never been a fan of Access charts ..... Excel always excels .... I had a bit of a play, I'm afraid my approach has overtones of sledgehammer, but tell me what you think: I created a new local table called tblMasterMonths, one field called MM, type number (byte). Filled the table with 12 records, values 1, 2, 3, ... 12. To build the query underlying the Chart, I took the select query I had (the one that only shows me January) and altered it to include tblMasterMonths, with a Left Join from tblmasterMonths to the query that contains the raw data. This forces months with no data to still have an entry in the output. Use the output from this into the Chart. Stephen Bond > -----Original Message----- > From: Roz Clarke [mailto:roz.clarke at donnslaw.co.uk] > Sent: Friday, 30 January 2004 7:04 a.m. > To: 'Access Developers discussion and problem solving' > Subject: RE: [AccessD] Charts > > > Sorry Stephen, I guess I wasn't clear enough > > I have the column headings set in my cross-tab query and that > works just > fine. The problem is when I try to base a line graph on that > data... I just > can't see a way to do it. > > -----Original Message----- > From: Stephen Bond [mailto:stephen at bondsoftware.co.nz] > Sent: 29 January 2004 17:34 > To: Access Developers discussion and problem solving > Subject: RE: [AccessD] Charts > > > Making an assumption here that you have a Cross-tab Q with > the month column > header formatted MM ... > > * go to Query Properties, and put something like this in the 'Column > Headings' entry: 1;2;3;4;5;6;7;8;9;10;11;12 > > This will force a column heading for each month. > > Stephen Bond > > > -----Original Message----- > > From: Roz Clarke [mailto:roz.clarke at donnslaw.co.uk] > > Sent: Friday, 30 January 2004 5:54 a.m. > > To: 'Access Developers discussion and problem solving' > > Subject: [AccessD] Charts > > > > > > Hi all. Hope everyone is well. > > > > I have a problem with a chart I need to display in Access. I > > used to do this > > by exporting data to Excel but the connection to Excel has > > been so slow and > > unstable that I am now trying to bring it within Access. > > > > The data I need to display is in a cross-tab query, where I > > have categories > > as the row header and months of the year as the column > > header. I need to > > show all the months even though we currently have data only > > for January. > > > > If I base the chart on the cross-tab, I cannot see a way to > > tell it that > > each column should be an axis entry. If I base the chart on a > > select query, > > it correctly allows me to set 'month' as an axis, but only > > shows me January. > > > > Can anyone help? > > > > TIA > > > > Roz > > _______________________________________________ > > 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 > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com > From DWUTKA at marlow.com Thu Jan 29 14:23:18 2004 From: DWUTKA at marlow.com (DWUTKA at marlow.com) Date: Thu, 29 Jan 2004 14:23:18 -0600 Subject: [AccessD] Pick out the Year Message-ID: <2F8793082E00D4119A1700B0D0216BF802227808@main2.marlow.com> Just setup the field like this: MonthYear: Format([YourDateField],"mmyyyy") Then group that field. Should do the trick. You can't 'parse' a date data type, because it's not a string (it's actually a double floating point.). To get the Month, or Year of a date, use the Month() and Year() functions. However, you just want to format the month/Year combo, the Format function works well. Drew -----Original Message----- From: accessd-bounces at databaseadvisors.com To: 'Access Developers discussion and problem solving' Sent: 1/29/04 11:27 AM Subject: [AccessD] Pick out the Year I have a date field showing the standard date format of mm/dd/yyyy. I need to group and count records by the month & year. For example, I need a count of all records entered in January 04. How do I parse out the month from the date? I tried the left function, but get a data type mismatch. Virginia _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From martyconnelly at shaw.ca Thu Jan 29 14:24:19 2004 From: martyconnelly at shaw.ca (MartyConnelly) Date: Thu, 29 Jan 2004 12:24:19 -0800 Subject: [AccessD] This doesn't look right References: Message-ID: <40196BF3.5030905@shaw.ca> I know of an oil and gas company TransAlta in Calgary that lost $24 million last summer due to an Excel spreadsheet error. Ray Panko at University of Hawaii came up with a figure of 4% of all cells in Excel have logic errors ,without doing deep debugging or using analysis tools. Errors are not unusual. Charlotte Foust wrote: >If they've been looking at bogus information all this time, it's hard to >tell. "Shoot the messenger" often prevails, but if the information is >being used to make business decisions, would they rather make them on >valid information or not? > >Charlotte Foust > >-----Original Message----- >From: Steven W. Erbach [mailto:serbach at new.rr.com] >Sent: Thursday, January 29, 2004 9:22 AM >To: Access Developers discussion and problem solving >Subject: RE: [AccessD] This doesn't look right > > >Charlotte, > > > >>>HAVING includes the field being evaluated, and that has a profound >>>effect of the results, since you're also grouping by those fields. << >>> >>> > >Very succinctly explained. Thank you. This could wind up to be >embarrassing since this app has been in operation for some time using >the original developer's code. I just took it over at the beginning of >the month. Will I be a savior or a stooge? The question of the day... > >Regards, > >Steve Erbach >Scientific Marketing >Neenah, WI >920-969-0504 > >Message created with Bloomba > >Disclaimer: No tree was killed in the transmission of this message. >However, several coulombs of electrons were temporarily inconvenienced. > >_______________________________________________ >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 > > > -- Marty Connelly Victoria, B.C. Canada From cfoust at infostatsystems.com Thu Jan 29 14:34:58 2004 From: cfoust at infostatsystems.com (Charlotte Foust) Date: Thu, 29 Jan 2004 12:34:58 -0800 Subject: [AccessD] Using Dates Message-ID: Yes, it's a very effective tool for doing date filtering in queries and reports. I've used it in data warehouse type applications and also where users wanted to be able to get results for the last 6 months and compare that to the same period last year or some similar kind of time frame slicing and dicing. The biggest problem with it is creating the code to keep it updated. I usually only updated it once a year to add the new year's values. Charlotte Foust -----Original Message----- From: Robert L. Stewart [mailto:rl_stewart at highstream.net] Sent: Thursday, January 29, 2004 11:39 AM To: accessd at databaseadvisors.com Subject: [AccessD] Using Dates All, I have been seeing a lot of people posting lately in many of the lists about how to do different tings with dates. Here is what I do. I have what is called a Date Dimension table. A dimension table is one used in data warehouses. In this case, it is great for relational data also. The date table has all of the things done to a date that can be done. Here is a sample structure: Date_ID Date/Time (loaded using the date() function) PK Year_Nbr Number, integer Year_Txt Text(4) Month_Nbr Number, byte Month_Nbr_Txt Text(2) Month_Name Text(15) Month_Name_Abbrv Text(3) Day_of_Month_Nbr Number, byte Day_of_Month_Nbr Text(2) Day_Of_Year_Nbr Number, integer Week_Of_Year_Nbr Number, byte Quarter_Nbr Number, byte Quarter_Nbr_Txt Text(2) Fiscal_Period Text(10) Weekday_Flag Text(1) Holiday_Flag Text(1) Last_Day_In_Month_Flag Text(1) By using this table joined to the date, you do not have to do any functions against a date to filter by month, your, quarter, or whatever. If anyone has questions about this, just send them to the list and I will answer them as best I can. Robert _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From cfoust at infostatsystems.com Thu Jan 29 14:36:12 2004 From: cfoust at infostatsystems.com (Charlotte Foust) Date: Thu, 29 Jan 2004 12:36:12 -0800 Subject: [AccessD] This doesn't look right Message-ID: Sounds like an argument for Access. Charlotte Foust -----Original Message----- From: MartyConnelly [mailto:martyconnelly at shaw.ca] Sent: Thursday, January 29, 2004 12:24 PM To: Access Developers discussion and problem solving Subject: Re: [AccessD] This doesn't look right I know of an oil and gas company TransAlta in Calgary that lost $24 million last summer due to an Excel spreadsheet error. Ray Panko at University of Hawaii came up with a figure of 4% of all cells in Excel have logic errors ,without doing deep debugging or using analysis tools. Errors are not unusual. Charlotte Foust wrote: >If they've been looking at bogus information all this time, it's hard >to tell. "Shoot the messenger" often prevails, but if the information >is being used to make business decisions, would they rather make them >on valid information or not? > >Charlotte Foust > >-----Original Message----- >From: Steven W. Erbach [mailto:serbach at new.rr.com] >Sent: Thursday, January 29, 2004 9:22 AM >To: Access Developers discussion and problem solving >Subject: RE: [AccessD] This doesn't look right > > >Charlotte, > > > >>>HAVING includes the field being evaluated, and that has a profound >>>effect of the results, since you're also grouping by those fields. << >>> >>> > >Very succinctly explained. Thank you. This could wind up to be >embarrassing since this app has been in operation for some time using >the original developer's code. I just took it over at the beginning of >the month. Will I be a savior or a stooge? The question of the day... > >Regards, > >Steve Erbach >Scientific Marketing >Neenah, WI >920-969-0504 > >Message created with Bloomba > >Disclaimer: No tree was killed in the transmission of this message. >However, several coulombs of electrons were temporarily inconvenienced. > >_______________________________________________ >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 > > > -- Marty Connelly Victoria, B.C. Canada _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From stuart at lexacorp.com.pg Thu Jan 29 16:16:09 2004 From: stuart at lexacorp.com.pg (Stuart McLachlan) Date: Fri, 30 Jan 2004 08:16:09 +1000 Subject: [AccessD] Access as Service In-Reply-To: Message-ID: <401A12C9.60.187A9A@localhost> On 29 Jan 2004 at 9:28, ggonzalez at cccis.com wrote: > > Has anyone ever had to run an Access application as a service on a > computer? if so can you pint me in the direction on how I could do this. > Never tried it with Access, but take a look at FireDaemon http://www.firedaemon.com/ "FireDaemon is a utility that allows you to install and run virtually any native Win32 application or script (eg. BAT/CMD, Perl, Java, Python, TCL/TK) as a Windows NT/2K/XP/2K3/Longhorn service. FireDaemon features easy configuration (via GUI or XML), a low memory/CPU overhead, subprocess prioritisation, custom environments, CPU binding plus monitoring and logging to the event log and on-disk log files. " -- Lexacorp Ltd http://www.lexacorp.com.pg Information Technology Consultancy, Software Development,System Support. From pharold at proftesting.com Thu Jan 29 18:34:40 2004 From: pharold at proftesting.com (Perry Harold) Date: Thu, 29 Jan 2004 19:34:40 -0500 Subject: [AccessD] Code Not Working in XP In-Reply-To: <618EB4D6DDCDD3119B0A00508B6FD37A0CB0CFBD@cntexchange.pgdp.usec.com> Message-ID: <001301c3e6c8$d8cc2110$082da8c0@D58BT131> Maybe something with the permission settings on the XP boxes. Had something similar that worked great with 98 & did the same thing as yours when switching to XP until some permissions were set to allow them access to the shared resources. Perry Harold -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Hollis,Virginia Sent: Thursday, January 29, 2004 11:29 AM To: 'accessD at databaseadvisors.com' Subject: [AccessD] Code Not Working in XP I have been using the code shown below to access data on our Intranet. The code matches a field entry in the database and looks up the details. In this example it finds a stock number. Problem: The code does not work for users that are running XP. It does not do anything, it will not even try to access the web. They click the button and nothing happens. What can I do to correct this for users of XP? Virginia _____ strPath = " http://web.com/vr.asp?xml=orafin%2Stock= " strFile = strPath & Me.StockNumber If Dir(strFile) = "" Then strFile = strPath & Me.StockNumber End If Call fHandleFile(strFile, WIN_MAX) _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From Subscriptions at servicexp.com Thu Jan 29 20:17:19 2004 From: Subscriptions at servicexp.com (Robert Gracie) Date: Thu, 29 Jan 2004 21:17:19 -0500 Subject: [AccessD] Interface Callback Class Questions. In-Reply-To: <005801c3e693$c52df410$2a3ca8c0@TEXASSYSTEMS.COM> Message-ID: <000201c3e6d7$30d74fc0$6501a8c0@RG> Ken, Thanks A Million!! Yep the report did not have module....:-), and that solved the problem... How in the world do I sink the OnPrint, or OnFormat events... with mrRpt.Section(acDetail).OnPrint = pcsEventStub I think I have tried every possible stub, and it seems like it's just ignored.... Thanks Again!! Robert Gracie -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Ken Ismert Sent: Thursday, January 29, 2004 1:15 PM To: 'Access Developers discussion and problem solving' Subject: RE: [AccessD] Interface Callback Class Questions. Robert, > The report fires, however none of the events (Close) are being hooked. The only thing I can think of here is that the Report must have a module for a class to hook its events. Double-check that 'Has Module' is Yes in report properties. The module can be blank. > I can run the report once, any attempt to run the report again fails > on "RemoteReportClose mrRpt.Name" ERROR Number 2467....... Object or > property... either does not exist or is closed...... I think that if you can hook the Close event, this problem will go away. CReportHost relies on the Close event to set it's mrRpt reference to Nothing. If the close event fails, you get a dangling reference - mrRpt is pointing to an object that has shutdown, and won't respond to further native property or method requests. It is important to note that the Report object is still in memory, because it still has one reference, mrRpt, keeping it alive. This does suggest adding a failsafe to the CReportHost.CloseRemoteReport method: Public Sub CloseRemoteReport() On Error GoTo HandleErr ' Close Report if Open If mrRpt Is Nothing Then Exit Sub ' Fires mrRpt_Close RemoteReportClose mrRpt.Name Exit Sub HandleErr: Select Case Err.Number Case 2467 ' Object or Property doesn't exist or is closed ' User closed Report, but mrRpt_Close event failed: ' Release reference to allow the Report to terminate Set mrRpt = Nothing Case Else Err.Raise Number:=Err.Number, _ Description:=Err.Description, _ Source:="CReportHost.CloseRemoteReport" & vbCrLf & Err.Source End Select Exit Sub End Sub > Do I need to hook the opening report to the events in the CReportHost > class internally of the opening report, such as on the OnOpen event? > I'm new to the "DEEP" Programming method so I could be way off > base..... One way to look at this is that Events are a 'pull' mechanism. In other words, declaring an object WithEvents means that you are receiving events from that object, with no setup on that object's side required. The COM object framework handles the detials of making sure all subscribers get the events they signed up for. This is completely transparent to the object generating the events. What's more, there is no way in VB6 to tell within an object, say a Report, that other objects are sinking it's events, AFAIK. (An aside: since Reports and Forms are not 'standard' COM objects, you have to go through the trouble of hooking their events. This isn't entirely bad, as it does allow you to selectively enable/disable events at runtime, if you so need.) So, the short answer is, for traditional events, you don't hook events in the object that generates them. However, if you choose to use interfaces, you can implement a 'push' style callback mechanism. In this case, lets say an object, O, wants to receive 'events'(or more correctly, callbacks) from another object, P. O would present itself to P, usually through a subscribe call, like: ' Code within O rP.Init Me ' Send reference to myself to P P, when it wants to call back O, would do something like: ' Code within P rO.Method ' Some method defined in an interface ' implemented by O Of course, O has to unsubscribe when it shuts down: ' Code within O rP.Term Me ' P sets rO to nothing, allowing ' O to terminate Interface callbacks, from O's perspective, look and act very much like events, except that explicit setup and shutdown are required. From P's perspective, events and callbacks are very different. Events are internally defined in P, and raised using RaiseEvent. Callbacks are done using methods of an externally defined interface, with an object supplied to P at runtime. Anyway, thanks for your flattering words, and I hope this helps. -Ken _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From accessd666 at yahoo.com Fri Jan 30 01:08:11 2004 From: accessd666 at yahoo.com (Sad Der) Date: Thu, 29 Jan 2004 23:08:11 -0800 (PST) Subject: [AccessD] OT: Cannot get rid of spam! Message-ID: <20040130070811.68143.qmail@web60206.mail.yahoo.com> Hi group, approx 2 weeks ago I saw that my mailbox for my AccessD-list mail was full. I then saw that I had only a 'couple' (100+) e-mails in it. I checked my Bulk folder and it was full with 'microsoft' updates. They all came from e-mail like: qweerejkks at yahoo.com 2q323312 at yahoo.com etc. I receive these mails every day. They keep comming in until my mailbox is completely full. I tried blocking the mailadresses, but since they change every day that didn't work. I tried blocking the 'domain' www.yahoo.com, that also didn't work. I tried to unsubscribe from the mails, no info about that in the mails I checked my Microsoft account, Yahoo account for any subscriptions and i canceled them all. Result? The mails keep coming in! How do I get rid of these mails? TIA!! Sander __________________________________ Do you Yahoo!? Yahoo! SiteBuilder - Free web site building tool. Try it! http://webhosting.yahoo.com/ps/sb/ From accessd666 at yahoo.com Fri Jan 30 01:16:12 2004 From: accessd666 at yahoo.com (Sad Der) Date: Thu, 29 Jan 2004 23:16:12 -0800 (PST) Subject: [AccessD] Charts In-Reply-To: <6A6AA9DF57E4F046BDA1E273BDDB677201AA2C@corp-es01.fleetpride.com> Message-ID: <20040130071612.28363.qmail@web60209.mail.yahoo.com> Jim, please tell me how do you create a Pivot Table in excel using a table in Access?! TIA Sander --- "Hale, Jim" wrote: > You might explore using pivot charts in Excel. I > export the data either > manually or in code to a hidden excel worksheet. The > chart does the hard > work. It is very flexible. It is easier to show than > explain so I am sending > you an example. HTH > Jim Hale > > -----Original Message----- > From: Roz Clarke [mailto:roz.clarke at donnslaw.co.uk] > Sent: Thursday, January 29, 2004 12:04 PM > To: 'Access Developers discussion and problem > solving' > Subject: RE: [AccessD] Charts > > > Sorry Stephen, I guess I wasn't clear enough > > I have the column headings set in my cross-tab query > and that works just > fine. The problem is when I try to base a line graph > on that data... I just > can't see a way to do it. > > -----Original Message----- > From: Stephen Bond > [mailto:stephen at bondsoftware.co.nz] > Sent: 29 January 2004 17:34 > To: Access Developers discussion and problem solving > Subject: RE: [AccessD] Charts > > > Making an assumption here that you have a Cross-tab > Q with the month column > header formatted MM ... > > * go to Query Properties, and put something like > this in the 'Column > Headings' entry: 1;2;3;4;5;6;7;8;9;10;11;12 > > This will force a column heading for each month. > > Stephen Bond > > > -----Original Message----- > > From: Roz Clarke > [mailto:roz.clarke at donnslaw.co.uk] > > Sent: Friday, 30 January 2004 5:54 a.m. > > To: 'Access Developers discussion and problem > solving' > > Subject: [AccessD] Charts > > > > > > Hi all. Hope everyone is well. > > > > I have a problem with a chart I need to display in > Access. I > > used to do this > > by exporting data to Excel but the connection to > Excel has > > been so slow and > > unstable that I am now trying to bring it within > Access. > > > > The data I need to display is in a cross-tab > query, where I > > have categories > > as the row header and months of the year as the > column > > header. I need to > > show all the months even though we currently have > data only > > for January. > > > > If I base the chart on the cross-tab, I cannot see > a way to > > tell it that > > each column should be an axis entry. If I base the > chart on a > > select query, > > it correctly allows me to set 'month' as an axis, > but only > > shows me January. > > > > Can anyone help? > > > > TIA > > > > Roz > > _______________________________________________ > > 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 > _______________________________________________ > 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 __________________________________ Do you Yahoo!? Yahoo! SiteBuilder - Free web site building tool. Try it! http://webhosting.yahoo.com/ps/sb/ From roz.clarke at donnslaw.co.uk Fri Jan 30 03:11:02 2004 From: roz.clarke at donnslaw.co.uk (Roz Clarke) Date: Fri, 30 Jan 2004 09:11:02 -0000 Subject: [AccessD] Charts Message-ID: <61F915314798D311A2F800A0C9C83188047C6A25@dibble.observatory.donnslaw.co.uk> Thanks. It looks interesting... if I can get the data link to run smoothly I'll give it a whirl, and even if I can't manage that, it looks like I have things to learn about using pivot tables in Excel. -----Original Message----- From: Hale, Jim [mailto:Jim.Hale at FleetPride.com] Sent: 29 January 2004 19:20 To: 'Access Developers discussion and problem solving' Subject: RE: [AccessD] Charts You might explore using pivot charts in Excel. I export the data either manually or in code to a hidden excel worksheet. The chart does the hard work. It is very flexible. It is easier to show than explain so I am sending you an example. HTH Jim Hale -----Original Message----- From: Roz Clarke [mailto:roz.clarke at donnslaw.co.uk] Sent: Thursday, January 29, 2004 12:04 PM To: 'Access Developers discussion and problem solving' Subject: RE: [AccessD] Charts Sorry Stephen, I guess I wasn't clear enough I have the column headings set in my cross-tab query and that works just fine. The problem is when I try to base a line graph on that data... I just can't see a way to do it. -----Original Message----- From: Stephen Bond [mailto:stephen at bondsoftware.co.nz] Sent: 29 January 2004 17:34 To: Access Developers discussion and problem solving Subject: RE: [AccessD] Charts Making an assumption here that you have a Cross-tab Q with the month column header formatted MM ... * go to Query Properties, and put something like this in the 'Column Headings' entry: 1;2;3;4;5;6;7;8;9;10;11;12 This will force a column heading for each month. Stephen Bond > -----Original Message----- > From: Roz Clarke [mailto:roz.clarke at donnslaw.co.uk] > Sent: Friday, 30 January 2004 5:54 a.m. > To: 'Access Developers discussion and problem solving' > Subject: [AccessD] Charts > > > Hi all. Hope everyone is well. > > I have a problem with a chart I need to display in Access. I used to > do this by exporting data to Excel but the connection to Excel has > been so slow and > unstable that I am now trying to bring it within Access. > > The data I need to display is in a cross-tab query, where I have > categories as the row header and months of the year as the column > header. I need to > show all the months even though we currently have data only > for January. > > If I base the chart on the cross-tab, I cannot see a way to tell it > that each column should be an axis entry. If I base the chart on a > select query, > it correctly allows me to set 'month' as an axis, but only > shows me January. > > Can anyone help? > > TIA > > Roz > _______________________________________________ > 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 _______________________________________________ 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 From roz.clarke at donnslaw.co.uk Fri Jan 30 03:18:06 2004 From: roz.clarke at donnslaw.co.uk (Roz Clarke) Date: Fri, 30 Jan 2004 09:18:06 -0000 Subject: [AccessD] Charts Message-ID: <61F915314798D311A2F800A0C9C83188047C6A26@dibble.observatory.donnslaw.co.uk> I don't know about sledgehammer but it sounds like it could do the job... :) -----Original Message----- From: Stephen Bond [mailto:stephen at bondsoftware.co.nz] Sent: 29 January 2004 19:44 To: Access Developers discussion and problem solving Subject: RE: [AccessD] Charts I see what you're up against - I've never been a fan of Access charts ..... Excel always excels .... I had a bit of a play, I'm afraid my approach has overtones of sledgehammer, but tell me what you think: I created a new local table called tblMasterMonths, one field called MM, type number (byte). Filled the table with 12 records, values 1, 2, 3, ... 12. To build the query underlying the Chart, I took the select query I had (the one that only shows me January) and altered it to include tblMasterMonths, with a Left Join from tblmasterMonths to the query that contains the raw data. This forces months with no data to still have an entry in the output. Use the output from this into the Chart. Stephen Bond > -----Original Message----- > From: Roz Clarke [mailto:roz.clarke at donnslaw.co.uk] > Sent: Friday, 30 January 2004 7:04 a.m. > To: 'Access Developers discussion and problem solving' > Subject: RE: [AccessD] Charts > > > Sorry Stephen, I guess I wasn't clear enough > > I have the column headings set in my cross-tab query and that > works just > fine. The problem is when I try to base a line graph on that > data... I just > can't see a way to do it. > > -----Original Message----- > From: Stephen Bond [mailto:stephen at bondsoftware.co.nz] > Sent: 29 January 2004 17:34 > To: Access Developers discussion and problem solving > Subject: RE: [AccessD] Charts > > > Making an assumption here that you have a Cross-tab Q with > the month column > header formatted MM ... > > * go to Query Properties, and put something like this in the 'Column > Headings' entry: 1;2;3;4;5;6;7;8;9;10;11;12 > > This will force a column heading for each month. > > Stephen Bond > > > -----Original Message----- > > From: Roz Clarke [mailto:roz.clarke at donnslaw.co.uk] > > Sent: Friday, 30 January 2004 5:54 a.m. > > To: 'Access Developers discussion and problem solving' > > Subject: [AccessD] Charts > > > > > > Hi all. Hope everyone is well. > > > > I have a problem with a chart I need to display in Access. I used to > > do this by exporting data to Excel but the connection to Excel has > > been so slow and > > unstable that I am now trying to bring it within Access. > > > > The data I need to display is in a cross-tab query, where I have > > categories as the row header and months of the year as the column > > header. I need to > > show all the months even though we currently have data only > > for January. > > > > If I base the chart on the cross-tab, I cannot see a way to tell it > > that each column should be an axis entry. If I base the chart on a > > select query, > > it correctly allows me to set 'month' as an axis, but only > > shows me January. > > > > Can anyone help? > > > > TIA > > > > Roz > > _______________________________________________ > > 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 > _______________________________________________ > 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 From my.lists at verizon.net Fri Jan 30 04:19:24 2004 From: my.lists at verizon.net (Francisco H Tapia) Date: Fri, 30 Jan 2004 02:19:24 -0800 Subject: [AccessD] OT: Cannot get rid of spam! In-Reply-To: <20040130070811.68143.qmail@web60206.mail.yahoo.com> References: <20040130070811.68143.qmail@web60206.mail.yahoo.com> Message-ID: <401A2FAC.9060809@verizon.net> Plain and simple, you don't the faked' microsoft emails are viruses... i'd not open those if I were you... lastly if you hookinto thes inboxes via an email client such as hotmail popper for hotmail then a nice program like thunderbird or some other 3rd party program, you'll find that you'll almost never see these emails again :) hths. btw, I cc'ed the tech list as this thread can potentially outgrow itself... :) -- -Francisco Sad Der wrote: > Hi group, > > approx 2 weeks ago I saw that my mailbox for my > AccessD-list mail was full. I then saw that I had only > a 'couple' (100+) e-mails in it. I checked my Bulk > folder and it was full with 'microsoft' updates. They > all came from e-mail like: > > qweerejkks at yahoo.com > 2q323312 at yahoo.com > etc. > > I receive these mails every day. They keep comming in > until my mailbox is completely full. > I tried blocking the mailadresses, but since they > change every day that didn't work. > I tried blocking the 'domain' www.yahoo.com, that also > didn't work. > I tried to unsubscribe from the mails, no info about > that in the mails > I checked my Microsoft account, Yahoo account for any > subscriptions and i canceled them all. > Result? The mails keep coming in! > > How do I get rid of these mails? > > TIA!! > > Sander > From gustav at cactus.dk Fri Jan 30 04:52:45 2004 From: gustav at cactus.dk (Gustav Brock) Date: Fri, 30 Jan 2004 11:52:45 +0100 Subject: [AccessD] Using Dates In-Reply-To: <5.1.0.14.2.20040129132506.028deff8@pop3.highstream.net> References: <5.1.0.14.2.20040129132506.028deff8@pop3.highstream.net> Message-ID: <15711059162.20040130115245@cactus.dk> Hi Robert > I have been seeing a lot of people posting lately in many of the lists > about how to do different tings with dates. Here is what I do. I have > what is called a Date Dimension table. A dimension table is one used in > data warehouses. In this case, it is great for relational data also. The > date table has all of the things done to a date that can be done. Yes, Charlotte has mentioned this before and we had a thread touching this (Calculating days, July 2003). The main reason for reluctancy to follow your method would be the large amount of redundant data and the fact that Access is pretty fast in date operations using the built in functions except Format() which is slow. Thus, it may be faster to use Month() than to establish a join to a another table to look up the month of a date. However, there may be situations where that could be advantageous but I can see no reason to store both the month number as well as the string value of the month number. The example Charlotte mentioned was (I think) storing the holiday flag. Indeed, what should be stored in such a table should be values that can not - or only with some difficulty - be calculated like banking days which mostly follows days not being weekends/holidays but not always. Another example is working days. It could be useful to include field like Workingday_of_Month First_Workingday_In_Month_Flag Last_Workingday_In_Month_Flag Also, I would suggest flags stored as Boolean. /gustav > Here is > a sample structure: > Date_ID Date/Time (loaded using the date() function) PK > Year_Nbr Number, integer > Year_Txt Text(4) > Month_Nbr Number, byte > Month_Nbr_Txt Text(2) > Month_Name Text(15) > Month_Name_Abbrv Text(3) > Day_of_Month_Nbr Number, byte > Day_of_Month_Nbr Text(2) > Day_Of_Year_Nbr Number, integer > Week_Of_Year_Nbr Number, byte > Quarter_Nbr Number, byte > Quarter_Nbr_Txt Text(2) > Fiscal_Period Text(10) > Weekday_Flag Text(1) > Holiday_Flag Text(1) > Last_Day_In_Month_Flag Text(1) > By using this table joined to the date, you do not have to do any functions > against a date to filter by month, your, quarter, or whatever. > If anyone has questions about this, just send them to the list and I will > answer them as best I can. > Robert From rbgajewski at adelphia.net Fri Jan 30 05:51:37 2004 From: rbgajewski at adelphia.net (Bob Gajewski) Date: Fri, 30 Jan 2004 06:51:37 -0500 Subject: [AccessD] OT: Cannot get rid of spam! In-Reply-To: <20040130070811.68143.qmail@web60206.mail.yahoo.com> Message-ID: Suggestions: 1) NEVER open these emails, especially if they are from other than a microsoft.com address - and that is no guarantee, as the sending address can be spoofed. 2) NEVER use the "opt out" links included in these emails. All that does is validate to the sender that your email address is valid, and they will send you even more. 3) Invest in a "spam-blocker" software program; there are many reasonably good ones out there, and they are often free or at least low priced. Personally, I have been using "iHateSpam", and it works quite well (cost is about $15 ??). Good Luck! Bob Gajewski -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Sad Der Sent: Friday, January 30, 2004 02:08 To: Acces User Group Subject: [AccessD] OT: Cannot get rid of spam! Hi group, approx 2 weeks ago I saw that my mailbox for my AccessD-list mail was full. I then saw that I had only a 'couple' (100+) e-mails in it. I checked my Bulk folder and it was full with 'microsoft' updates. They all came from e-mail like: qweerejkks at yahoo.com 2q323312 at yahoo.com etc. I receive these mails every day. They keep comming in until my mailbox is completely full. I tried blocking the mailadresses, but since they change every day that didn't work. I tried blocking the 'domain' www.yahoo.com, that also didn't work. I tried to unsubscribe from the mails, no info about that in the mails I checked my Microsoft account, Yahoo account for any subscriptions and i canceled them all. Result? The mails keep coming in! How do I get rid of these mails? TIA!! Sander __________________________________ Do you Yahoo!? Yahoo! SiteBuilder - Free web site building tool. Try it! http://webhosting.yahoo.com/ps/sb/ _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From Bryan_Carbonnell at cbc.ca Fri Jan 30 07:04:00 2004 From: Bryan_Carbonnell at cbc.ca (Bryan Carbonnell) Date: Fri, 30 Jan 2004 08:04:00 -0500 Subject: [AccessD] Getting internet data Message-ID: They are thinking that maybe, just maybe it's time to start following RFC specs for IE? >From RFC 1738: "An HTTP URL takes the form: http://:/? where and are as described in Section 3.1. If : is omitted, the port defaults to 80. No user name or password is allowed. is an HTTP selector, and is a query" Naw, sorry, I must be smoking something funny. Bryan Carbonnell bryan_carbonnell at cbc.ca >>> DWUTKA at marlow.com 28-Jan-04 7:26:05 PM >>> WHAT is microsoft thinking! Grrrr..... Somedays I just think Redmond been smoking something funny! If I download that update, I'm just going to disable it in the registry. I like their user work arounds: Don't use it. Tough. At least, that's what they sounded like! Drew From Bryan_Carbonnell at cbc.ca Fri Jan 30 07:06:28 2004 From: Bryan_Carbonnell at cbc.ca (Bryan Carbonnell) Date: Fri, 30 Jan 2004 08:06:28 -0500 Subject: [AccessD] OT: Cannot get rid of spam! Message-ID: My response to this over on dba-tech. Bryan Carbonnell bryan_carbonnell at cbc.ca >>> rbgajewski at adelphia.net 30-Jan-04 6:51:37 AM >>> Suggestions: 1) NEVER open these emails, especially if they are from other than a microsoft.com address - and that is no guarantee, as the sending address can be spoofed. 2) NEVER use the "opt out" links included in these emails. All that does is validate to the sender that your email address is valid, and they will send you even more. 3) Invest in a "spam-blocker" software program; there are many reasonably good ones out there, and they are often free or at least low priced. Personally, I have been using "iHateSpam", and it works quite well (cost is about $15 ??). Good Luck! Bob Gajewski -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Sad Der Sent: Friday, January 30, 2004 02:08 To: Acces User Group Subject: [AccessD] OT: Cannot get rid of spam! Hi group, approx 2 weeks ago I saw that my mailbox for my AccessD-list mail was full. I then saw that I had only a 'couple' (100+) e-mails in it. I checked my Bulk folder and it was full with 'microsoft' updates. They all came from e-mail like: qweerejkks at yahoo.com 2q323312 at yahoo.com etc. I receive these mails every day. They keep comming in until my mailbox is completely full. I tried blocking the mailadresses, but since they change every day that didn't work. I tried blocking the 'domain' www.yahoo.com, that also didn't work. I tried to unsubscribe from the mails, no info about that in the mails I checked my Microsoft account, Yahoo account for any subscriptions and i canceled them all. Result? The mails keep coming in! How do I get rid of these mails? TIA!! Sander __________________________________ Do you Yahoo!? Yahoo! SiteBuilder - Free web site building tool. Try it! http://webhosting.yahoo.com/ps/sb/ _______________________________________________ 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 From jimdettman at earthlink.net Fri Jan 30 07:23:37 2004 From: jimdettman at earthlink.net (Jim Dettman) Date: Fri, 30 Jan 2004 08:23:37 -0500 Subject: [AccessD] Access as Service In-Reply-To: Message-ID: Drop an e-mail to Drew Wutka. I believe he has played around with that. Jim Dettman President, Online Computer Services of WNY, Inc. (315) 699-3443 jimdettman at earthlink.net -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of ggonzalez at cccis.com Sent: Thursday, January 29, 2004 10:28 AM To: Access Developers discussion and problem solving Subject: Re: [AccessD] Access as Service Has anyone ever had to run an Access application as a service on a computer? if so can you pint me in the direction on how I could do this. Thanks! _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From rl_stewart at highstream.net Fri Jan 30 07:28:58 2004 From: rl_stewart at highstream.net (Robert L. Stewart) Date: Fri, 30 Jan 2004 07:28:58 -0600 Subject: [AccessD] Re: Using Dates In-Reply-To: <200401301304.i0UD4nm19566@databaseadvisors.com> Message-ID: <5.1.0.14.2.20040130072451.028f4078@pop3.highstream.net> Charlotte, I have a function that I run that populates the table with about 100 years of data. Since that is only a little over 36,500 rows, it is relatively small. The only thing that has to be done then is to define holidays for each year. After it is created, it makes handling dates so much simpler for end users and programmers alike. ;-) Robert At 07:04 AM 1/30/2004 -0600, you wrote: >Date: Thu, 29 Jan 2004 12:34:58 -0800 >From: "Charlotte Foust" >Subject: RE: [AccessD] Using Dates >To: "Access Developers discussion and problem solving" > >Message-ID: > >Content-Type: text/plain; charset="us-ascii" > >Yes, it's a very effective tool for doing date filtering in queries and >reports. I've used it in data warehouse type applications and also >where users wanted to be able to get results for the last 6 months and >compare that to the same period last year or some similar kind of time >frame slicing and dicing. The biggest problem with it is creating the >code to keep it updated. I usually only updated it once a year to add >the new year's values. > >Charlotte Foust From rl_stewart at highstream.net Fri Jan 30 07:41:18 2004 From: rl_stewart at highstream.net (Robert L. Stewart) Date: Fri, 30 Jan 2004 07:41:18 -0600 Subject: [AccessD] Re: Using Dates In-Reply-To: <200401301304.i0UD4nm19566@databaseadvisors.com> Message-ID: <5.1.0.14.2.20040130073341.029d9da0@pop3.highstream.net> Gustav, Since I am using SQL Server for all my BEs, I use Char(1) for the Flag columns. Personal preference since I do not like to deal with 0 and 1 or -1. In Access (JET) itself, I would store it as a boolean. There are a number of other columns that I have in the actual one that I use. And, I actually keep the Fiscal Period in a related table because of the possibility of have different departments/companies operating under different Fiscal Periods. I was trying to keep the example simple. A join is generally cheaper than doing the calculations. Though that is not always the case. Also, since I do use SQL Server, I do this join in a view on the server side and not on the client. Thanks for adding to my post. It is great when we can exchange ideas. ;-) Robert At 07:04 AM 1/30/2004 -0600, you wrote: >From: Gustav Brock >Subject: Re: [AccessD] Using Dates >To: Access Developers discussion and problem solving > >Message-ID: <15711059162.20040130115245 at cactus.dk> >Content-Type: text/plain; charset=us-ascii > >Hi Robert > > > I have been seeing a lot of people posting lately in many of the lists > > about how to do different tings with dates. Here is what I do. I have > > what is called a Date Dimension table. A dimension table is one used in > > data warehouses. In this case, it is great for relational data also. The > > date table has all of the things done to a date that can be done. > >Yes, Charlotte has mentioned this before and we had a thread touching >this (Calculating days, July 2003). > >The main reason for reluctancy to follow your method would be the >large amount of redundant data and the fact that Access is pretty fast >in date operations using the built in functions except Format() which >is slow. Thus, it may be faster to use Month() than to establish a >join to a another table to look up the month of a date. However, there >may be situations where that could be advantageous but I can see no >reason to store both the month number as well as the string value of >the month number. > >The example Charlotte mentioned was (I think) storing the holiday >flag. Indeed, what should be stored in such a table should be values >that can not - or only with some difficulty - be calculated like >banking days which mostly follows days not being weekends/holidays but >not always. >Another example is working days. It could be useful to include field >like > > Workingday_of_Month > First_Workingday_In_Month_Flag > Last_Workingday_In_Month_Flag > >Also, I would suggest flags stored as Boolean. > >/gustav From gustav at cactus.dk Fri Jan 30 07:54:57 2004 From: gustav at cactus.dk (Gustav Brock) Date: Fri, 30 Jan 2004 14:54:57 +0100 Subject: [AccessD] Re: Using Dates In-Reply-To: <5.1.0.14.2.20040130073341.029d9da0@pop3.highstream.net> References: <5.1.0.14.2.20040130073341.029d9da0@pop3.highstream.net> Message-ID: <19921990590.20040130145457@cactus.dk> Hi Robert OK. I had Jet in mind. /gustav > Since I am using SQL Server for all my BEs, I use Char(1) for the Flag > columns. Personal preference since I do not like to deal with 0 and 1 or > -1. In Access (JET) itself, I would store it as a boolean. There are a > number of other columns that I have in the actual one that I use. And, I > actually keep the Fiscal Period in a related table because of the > possibility of have different departments/companies operating under > different Fiscal Periods. I was trying to keep the example simple. > A join is generally cheaper than doing the calculations. Though that is > not always the case. Also, since I do use SQL Server, I do this join in a > view on the server side and not on the client. > Thanks for adding to my post. It is great when we can exchange ideas. ;-) > Robert > At 07:04 AM 1/30/2004 -0600, you wrote: >>From: Gustav Brock >>Subject: Re: [AccessD] Using Dates >>To: Access Developers discussion and problem solving >> >>Message-ID: <15711059162.20040130115245 at cactus.dk> >>Content-Type: text/plain; charset=us-ascii >> >>Hi Robert >> >> > I have been seeing a lot of people posting lately in many of the lists >> > about how to do different tings with dates. Here is what I do. I have >> > what is called a Date Dimension table. A dimension table is one used in >> > data warehouses. In this case, it is great for relational data also. The >> > date table has all of the things done to a date that can be done. >> >>Yes, Charlotte has mentioned this before and we had a thread touching >>this (Calculating days, July 2003). >> >>The main reason for reluctancy to follow your method would be the >>large amount of redundant data and the fact that Access is pretty fast >>in date operations using the built in functions except Format() which >>is slow. Thus, it may be faster to use Month() than to establish a >>join to a another table to look up the month of a date. However, there >>may be situations where that could be advantageous but I can see no >>reason to store both the month number as well as the string value of >>the month number. >> >>The example Charlotte mentioned was (I think) storing the holiday >>flag. Indeed, what should be stored in such a table should be values >>that can not - or only with some difficulty - be calculated like >>banking days which mostly follows days not being weekends/holidays but >>not always. >>Another example is working days. It could be useful to include field >>like >> >> Workingday_of_Month >> First_Workingday_In_Month_Flag >> Last_Workingday_In_Month_Flag >> >>Also, I would suggest flags stored as Boolean. >> >>/gustav From stuart at lexacorp.com.pg Fri Jan 30 07:45:23 2004 From: stuart at lexacorp.com.pg (Stuart McLachlan) Date: Fri, 30 Jan 2004 23:45:23 +1000 Subject: [AccessD] Getting internet data In-Reply-To: Message-ID: <401AEC93.8817.36B3596@localhost> What? MS follow the RFCs, you've definitely been smoking something funny :-) On 30 Jan 2004 at 8:04, Bryan Carbonnell wrote: > They are thinking that maybe, just maybe it's time to start following > RFC specs for IE? > > >From RFC 1738: > > "An HTTP URL takes the form: > > http://:/? > > where and are as described in Section 3.1. If : > is omitted, the port defaults to 80. No user name or password is > allowed. is an HTTP selector, and is a query" > > Naw, sorry, I must be smoking something funny. > > Bryan Carbonnell > bryan_carbonnell at cbc.ca > > >>> DWUTKA at marlow.com 28-Jan-04 7:26:05 PM >>> > WHAT is microsoft thinking! Grrrr..... Somedays I just think Redmond > been > smoking something funny! > > If I download that update, I'm just going to disable it in the > registry. > > I like their user work arounds: > Don't use it. > Tough. > > At least, that's what they sounded like! > > Drew > > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com -- Lexacorp Ltd http://www.lexacorp.com.pg Information Technology Consultancy, Software Development,System Support. From jwcolby at colbyconsulting.com Fri Jan 30 07:58:19 2004 From: jwcolby at colbyconsulting.com (John W. Colby) Date: Fri, 30 Jan 2004 08:58:19 -0500 Subject: [AccessD] Getting ALL word instances Message-ID: Folks, I am trying to clean up after my merge stuff. If the user fails to close the document, I have to do so before I can continue. My mail stuff opens two documents, which appear to be TWO instances of word. Further the user may already have a document of their own open. It LOOKS like when several word documents are open, each one is an instance of word. There is an icon in the toolbar for each document. I have the following code (which works, kind of): Public objWord As Word.Application Function OpenWord() As Word.Application On Error Resume Next Set objWord = GetObject(, "Word.Application") If objWord Is Nothing Then Else objWord.Visible = True End If End Function Function TestWrdClose() OpenWord objWord.Quit False Set objWord = Nothing End Function The problem is, that if I have three docs open, when I call TestWrdClose ONE TIME, all word docs close. So.... I need to close any instances of word that I opened, yet leave any instances that THEY opened. I know (think) I can use code like First question... Is it possible to open an instance of Word and give it a "name" such that I can search for that "name", get a handle to that instance, and then close it?. Second question... I assume that in order to close it, all I need to do is use the application.close once I have a handle? Or is it just a simple matter of closing all my own documents, then seeing if any documents are open, and if not closing the word instance? John W. Colby www.ColbyConsulting.com From Bryan_Carbonnell at cbc.ca Fri Jan 30 08:12:21 2004 From: Bryan_Carbonnell at cbc.ca (Bryan Carbonnell) Date: Fri, 30 Jan 2004 09:12:21 -0500 Subject: [AccessD] Getting internet data Message-ID: Yea, that's what I thought too. :-)) Bryan Carbonnell bryan_carbonnell at cbc.ca >>> stuart at lexacorp.com.pg 30-Jan-04 8:45:23 AM >>> What? MS follow the RFCs, you've definitely been smoking something funny :-) On 30 Jan 2004 at 8:04, Bryan Carbonnell wrote: > They are thinking that maybe, just maybe it's time to start following > RFC specs for IE? From John.Clark at niagaracounty.com Fri Jan 30 08:14:54 2004 From: John.Clark at niagaracounty.com (John Clark) Date: Fri, 30 Jan 2004 09:14:54 -0500 Subject: [AccessD] Question of process Message-ID: Thanks for all the input on this dilemma. And sorry it took so long to respond, but, while doing this, something else arose. It turns out that they don't always have an SSN, so I am not sure how to tell exactly who is who. I know I can match by name and DOB, and that will probably work, but I don't think I can guarantee the integrity by doing this. I have discussed with them some 'procedural' modifications. It seems that it might be a possibility to get SSNs before entering, if their procedures changed. This is also important, because lawyers, as a group, seem to be more particular about their names. For instance, if I was a lawyer, I might not go by, "John W Clark," but rather, "J Wallace Clark," and this is how I would be in the system. Yet, if I were to be processed for a crime, the police agency would probably list me by the "First, Middle Init, Last" format. They have confirmed this thinking, but also conceded that this is a rarity; having only happened once in the last dozen or so years. It will be in my documentation though--just to save my butt, when it happens that second time, which given my luck will probably happen about a month after I deliver the program. Thanks again! PS I will reserve the right to revisit this topic, at a later time! Take care! J Wallace Clark (I'm going to act lawyerish) >>> DWUTKA at marlow.com 01/28/04 04:29PM >>> I think you just need to apply the rules of normalization here. Build a 'person' table, with information that is common no matter what 'type' they are. Then, if you need more information for a particular type, build a table for the extra information, but give it a foriegn key field back to the person table. That way, the person ID will interrelate all types that a person is. Drew -----Original Message----- From: John Clark [mailto:John.Clark at niagaracounty.com] Sent: Wednesday, January 28, 2004 9:39 AM To: accessd at databaseadvisors.com Subject: [AccessD] Question of process I am beginning a new project. The purpose of this program will be to track indictment cases for the District Attorney's office. My question isn't so much technical, like usual, but rather 'technique'. I'll start with a scenario: Lets say I am a Asst. DA, so I am in the system as such. Then after a couple of years, I go into private practice and become a defense attorney; I may now be in the system as the lawyer for a defendant. Now let's assume that I am assaulted and my attacker is charged, so now I am in this system as a victim of this case. Finally, I cross over to the dark side (I know lawyers are already there), and I am indicted for a crime of my own. I will now be in the system as a defendant, a victim, a defense attorney, and an ADA...these last two, very probably, several times. My situation is that I would like to bring up every instance of a person fitting this description, or similar ones. For Instance a report of the previous example might produce the following: JOHN W CLARK #2001-023 ADA #2001-102 ADA #2001-140 ADA #2002-334 ATTORNEY #2003-153 ATTORNEY #2003-543 VICTIM #2003-654 ATTORNEY #2004-030 DEFENDANT I had originally thought to create a table for the 'types' (i.e. attorney, ADA, victim, etc.), a table with names and personal info, an indictment table, and link these all via a fourth table, but this soon seemed insufficient. The average indictment number will have at least five people connected to it (Defendant, Attorney, ADA, Victim, and Judge), and possibly many more, with multiple victims and/or co-defendants. Am I over thinking this? Would it just be as simple as having a table for each type and searching these tables by indictment number later in the program? I thought that maybe, by typing this out, it would be clearer in my mind, by the time I was done, but I am still fuzzy with it! Thanks for any insight or advise you could give me! John W Clark _______________________________________________ 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 From Lambert.Heenan at AIG.com Fri Jan 30 08:18:14 2004 From: Lambert.Heenan at AIG.com (Heenan, Lambert) Date: Fri, 30 Jan 2004 09:18:14 -0500 Subject: [AccessD] OT: Cannot get rid of spam! Message-ID: <8B98F8EA48F8BA47A2F24E0D0AF40CF407AD7D79@xlivmbx12.aig.com> Check out K9 at http://www.keir.net/k9.html Works a treat and it's postcardware. > -----Original Message----- > From: Sad Der [SMTP:accessd666 at yahoo.com] > Sent: Friday, January 30, 2004 2:08 AM > To: Acces User Group > Subject: [AccessD] OT: Cannot get rid of spam! > > Hi group, > > approx 2 weeks ago I saw that my mailbox for my > AccessD-list mail was full. I then saw that I had only > a 'couple' (100+) e-mails in it. I checked my Bulk > folder and it was full with 'microsoft' updates. They > all came from e-mail like: > > qweerejkks at yahoo.com > 2q323312 at yahoo.com > etc. > > I receive these mails every day. They keep comming in > until my mailbox is completely full. > I tried blocking the mailadresses, but since they > change every day that didn't work. > I tried blocking the 'domain' www.yahoo.com, that also > didn't work. > I tried to unsubscribe from the mails, no info about > that in the mails > I checked my Microsoft account, Yahoo account for any > subscriptions and i canceled them all. > Result? The mails keep coming in! > > How do I get rid of these mails? > > TIA!! > > Sander > > __________________________________ > Do you Yahoo!? > Yahoo! SiteBuilder - Free web site building tool. Try it! > http://webhosting.yahoo.com/ps/sb/ > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com From John.Clark at niagaracounty.com Fri Jan 30 08:22:42 2004 From: John.Clark at niagaracounty.com (John Clark) Date: Fri, 30 Jan 2004 09:22:42 -0500 Subject: [AccessD] This should be simple...but... Message-ID: On a form I am working on, I am trying to provide 'leading dots', between the label and text box. I want to make all labels equal by doing this, which means some will have more or less dots than others. I usually don't do this, because of what I am now experiencing; they don't all line up. They are slightly off, but enough to notice. EXAMPLE: (These are slightly off also) Name ....................: Address .................: City ........................: St ..........................: Zip .........................: Any ideas on this? Maybe even alternatives? Thanks, J Wallace Clark (Hey, this lawerese is kinda fun) From Bryan_Carbonnell at cbc.ca Fri Jan 30 08:29:24 2004 From: Bryan_Carbonnell at cbc.ca (Bryan Carbonnell) Date: Fri, 30 Jan 2004 09:29:24 -0500 Subject: [AccessD] Getting ALL word instances Message-ID: > It LOOKS like when several word documents are open, each one is an instance > of word. There is an icon in the toolbar for each document. I have the > following code (which works, kind of): What version of Word are you dealing with? Word 2K (and Higher I think) actually only open one instance of Word, but put each document in it's own "button" in the task bar. If want to visually verify that you only have one instance open, have a look at the Close buttons in the Upper right corner. If you have two documents open, when looking at either document you should only have a close button in the title bar if the docs are in the instance of Word. If you have a close button in the tile bar AND the menu bar, then you have two separate instances of Word open. I see a couple of problems with your code. Basically what I don't see is how you deal with Word not being opened at all. Here is how I deal with automating word: 'Get pointer to Word Object ' Handle Error In-Line On Error Resume Next Set objWord = GetObject(, "Word.Application") If Err.Number = 429 Then 'If we got an error, that means there was no Word Instance Set objWord = CreateObject("Word.Application") 'Set Flag to let us know we opened Word bolOpenedWord = True End If 'Make Word Instance visible objWord.Visible = True 'Reset Error Handler On Error GoTo 0 'Do your processing stuff here 'Time to close up shop 'Did we create the Word instance we are using ' or did we reuse an open instance? If bolOpenedWord = True Then 'We created an instance, so now we need to close it. objWord.Quit End If Set objWord = Nothing Does this sort of answer your question? Basically yyou need to keep track of if you open Word or are reusing an already opened instance of Word and only closing Word if YOU created it. You will still need to close your docs though. Bryan Carbonnell bryan_carbonnelL at cbc.ca >>> jwcolby at colbyconsulting.com 30-Jan-04 8:58:19 AM >>> Folks, I am trying to clean up after my merge stuff. If the user fails to close the document, I have to do so before I can continue. My mail stuff opens two documents, which appear to be TWO instances of word. Further the user may already have a document of their own open. It LOOKS like when several word documents are open, each one is an instance of word. There is an icon in the toolbar for each document. I have the following code (which works, kind of): Public objWord As Word.Application Function OpenWord() As Word.Application On Error Resume Next Set objWord = GetObject(, "Word.Application") If objWord Is Nothing Then Else objWord.Visible = True End If End Function Function TestWrdClose() OpenWord objWord.Quit False Set objWord = Nothing End Function The problem is, that if I have three docs open, when I call TestWrdClose ONE TIME, all word docs close. So.... I need to close any instances of word that I opened, yet leave any instances that THEY opened. I know (think) I can use code like First question... Is it possible to open an instance of Word and give it a "name" such that I can search for that "name", get a handle to that instance, and then close it?. Second question... I assume that in order to close it, all I need to do is use the application.close once I have a handle? Or is it just a simple matter of closing all my own documents, then seeing if any documents are open, and if not closing the word instance? John W. Colby www.ColbyConsulting.com _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From wdhindman at bellsouth.net Fri Jan 30 08:53:40 2004 From: wdhindman at bellsouth.net (William Hindman) Date: Fri, 30 Jan 2004 09:53:40 -0500 Subject: [AccessD] This should be simple...but... References: Message-ID: <007e01c3e740$db594610$6101a8c0@dejpolsys> John ...www.lebans.com has a sample mdb on how to produce and manage leader dots ...HTH :) William Hindman Government is not reason, government is not persuasion, government is force. It is a dangerous servant." G. Washington ----- Original Message ----- From: "John Clark" To: Sent: Friday, January 30, 2004 9:22 AM Subject: [AccessD] This should be simple...but... > On a form I am working on, I am trying to provide 'leading dots', > between the label and text box. I want to make all labels equal by doing > this, which means some will have more or less dots than others. I > usually don't do this, because of what I am now experiencing; they don't > all line up. They are slightly off, but enough to notice. > > EXAMPLE: (These are slightly off also) > > Name ....................: > Address .................: > City ........................: > St ..........................: > Zip .........................: > > Any ideas on this? Maybe even alternatives? > > Thanks, > J Wallace Clark (Hey, this lawerese is kinda fun) > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com > From Bryan_Carbonnell at cbc.ca Fri Jan 30 09:01:50 2004 From: Bryan_Carbonnell at cbc.ca (Bryan Carbonnell) Date: Fri, 30 Jan 2004 10:01:50 -0500 Subject: [AccessD] This should be simple...but... Message-ID: John, The easiest way is to use a fixed width font, such as Courier, for the label font. Bryan Carbonnell bryan_carbonnell at cbc.ca >>> John.Clark at niagaracounty.com 30-Jan-04 9:22:42 AM >>> On a form I am working on, I am trying to provide 'leading dots', between the label and text box. I want to make all labels equal by doing this, which means some will have more or less dots than others. I usually don't do this, because of what I am now experiencing; they don't all line up. They are slightly off, but enough to notice. EXAMPLE: (These are slightly off also) Name ....................: Address .................: City ........................: St ..........................: Zip .........................: Any ideas on this? Maybe even alternatives? From JColby at dispec.com Fri Jan 30 09:26:54 2004 From: JColby at dispec.com (Colby, John) Date: Fri, 30 Jan 2004 10:26:54 -0500 Subject: [AccessD] Getting ALL word instances Message-ID: <05C61C52D7CAD211A7830008C7DF6F1079BD0D@DISABILITYINS01> >What version of Word are you dealing with? Office2K or XP >Basically yyou need to keep track of if you open Word or are reusing an already opened instance of Word and only closing Word if YOU created it. You will still need to close your docs though. That's what I thought. Thanks, John W. Colby The database guy -----Original Message----- From: Bryan Carbonnell [mailto:Bryan_Carbonnell at cbc.ca] Sent: Friday, January 30, 2004 9:29 AM To: accessd at databaseadvisors.com Subject: Re: [AccessD] Getting ALL word instances > It LOOKS like when several word documents are open, each one is an instance > of word. There is an icon in the toolbar for each document. I have the > following code (which works, kind of): What version of Word are you dealing with? Word 2K (and Higher I think) actually only open one instance of Word, but put each document in it's own "button" in the task bar. If want to visually verify that you only have one instance open, have a look at the Close buttons in the Upper right corner. If you have two documents open, when looking at either document you should only have a close button in the title bar if the docs are in the instance of Word. If you have a close button in the tile bar AND the menu bar, then you have two separate instances of Word open. I see a couple of problems with your code. Basically what I don't see is how you deal with Word not being opened at all. Here is how I deal with automating word: 'Get pointer to Word Object ' Handle Error In-Line On Error Resume Next Set objWord = GetObject(, "Word.Application") If Err.Number = 429 Then 'If we got an error, that means there was no Word Instance Set objWord = CreateObject("Word.Application") 'Set Flag to let us know we opened Word bolOpenedWord = True End If 'Make Word Instance visible objWord.Visible = True 'Reset Error Handler On Error GoTo 0 'Do your processing stuff here 'Time to close up shop 'Did we create the Word instance we are using ' or did we reuse an open instance? If bolOpenedWord = True Then 'We created an instance, so now we need to close it. objWord.Quit End If Set objWord = Nothing Does this sort of answer your question? Basically yyou need to keep track of if you open Word or are reusing an already opened instance of Word and only closing Word if YOU created it. You will still need to close your docs though. Bryan Carbonnell bryan_carbonnelL at cbc.ca >>> jwcolby at colbyconsulting.com 30-Jan-04 8:58:19 AM >>> Folks, I am trying to clean up after my merge stuff. If the user fails to close the document, I have to do so before I can continue. My mail stuff opens two documents, which appear to be TWO instances of word. Further the user may already have a document of their own open. It LOOKS like when several word documents are open, each one is an instance of word. There is an icon in the toolbar for each document. I have the following code (which works, kind of): Public objWord As Word.Application Function OpenWord() As Word.Application On Error Resume Next Set objWord = GetObject(, "Word.Application") If objWord Is Nothing Then Else objWord.Visible = True End If End Function Function TestWrdClose() OpenWord objWord.Quit False Set objWord = Nothing End Function The problem is, that if I have three docs open, when I call TestWrdClose ONE TIME, all word docs close. So.... I need to close any instances of word that I opened, yet leave any instances that THEY opened. I know (think) I can use code like First question... Is it possible to open an instance of Word and give it a "name" such that I can search for that "name", get a handle to that instance, and then close it?. Second question... I assume that in order to close it, all I need to do is use the application.close once I have a handle? Or is it just a simple matter of closing all my own documents, then seeing if any documents are open, and if not closing the word instance? John W. Colby www.ColbyConsulting.com _______________________________________________ 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 From cfoust at infostatsystems.com Fri Jan 30 10:03:20 2004 From: cfoust at infostatsystems.com (Charlotte Foust) Date: Fri, 30 Jan 2004 08:03:20 -0800 Subject: [AccessD] Using Dates Message-ID: You misunderstood me, Gustav. I indeed have used something like what Robert described. The reason is that the dimension table can then be used directly as a rowsource for comboboxes, etc. and when joined to another table on the date key, it makes it very simple to query out something like the last 6 months without resorting to any kind of date manipulation but just using the month numbers. What might not have been clear is that those month numbers aren't necessarily just 1 to 12. There's usually also a month number from the start of the table, as there is a running year number. It may also include a quarter in year column and a quarter number from start. It looks a bit bizarre until you learn how useful it can be It is actually a fast technique since it is designed to filter data in very large tables quickly. You want the data for last year? Look at the date, find the year number and then look all the records where the year number is 1 less. You don't have to manipulate dates at all that way and you can use integer math. A dimension table does, indeed, contain "redundant" data because that is the way that kind of table is designed. It is not a data entry table at all. It is strictly a lookup table and its only purpose is to provide a fast way to return a set of specific records without doing a bunch of calculations. I don't build one for a hundred year period, because my clients usually want a specific start date, and I build from that. Charlotte Foust -----Original Message----- From: Gustav Brock [mailto:gustav at cactus.dk] Sent: Friday, January 30, 2004 2:53 AM To: Access Developers discussion and problem solving Subject: Re: [AccessD] Using Dates Hi Robert > I have been seeing a lot of people posting lately in many of the lists > about how to do different tings with dates. Here is what I do. I > have what is called a Date Dimension table. A dimension table is one > used in data warehouses. In this case, it is great for relational > data also. The date table has all of the things done to a date that > can be done. Yes, Charlotte has mentioned this before and we had a thread touching this (Calculating days, July 2003). The main reason for reluctancy to follow your method would be the large amount of redundant data and the fact that Access is pretty fast in date operations using the built in functions except Format() which is slow. Thus, it may be faster to use Month() than to establish a join to a another table to look up the month of a date. However, there may be situations where that could be advantageous but I can see no reason to store both the month number as well as the string value of the month number. The example Charlotte mentioned was (I think) storing the holiday flag. Indeed, what should be stored in such a table should be values that can not - or only with some difficulty - be calculated like banking days which mostly follows days not being weekends/holidays but not always. Another example is working days. It could be useful to include field like Workingday_of_Month First_Workingday_In_Month_Flag Last_Workingday_In_Month_Flag Also, I would suggest flags stored as Boolean. /gustav > Here is > a sample structure: > Date_ID Date/Time (loaded using the date() function) PK > Year_Nbr Number, integer > Year_Txt Text(4) > Month_Nbr Number, byte > Month_Nbr_Txt Text(2) > Month_Name Text(15) > Month_Name_Abbrv Text(3) > Day_of_Month_Nbr Number, byte > Day_of_Month_Nbr Text(2) > Day_Of_Year_Nbr Number, integer > Week_Of_Year_Nbr Number, byte > Quarter_Nbr Number, byte > Quarter_Nbr_Txt Text(2) > Fiscal_Period Text(10) > Weekday_Flag Text(1) > Holiday_Flag Text(1) > Last_Day_In_Month_Flag Text(1) > By using this table joined to the date, you do not have to do any > functions > against a date to filter by month, your, quarter, or whatever. > If anyone has questions about this, just send them to the list and I > will > answer them as best I can. > Robert _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From Oleg_123 at xuppa.com Fri Jan 30 10:46:32 2004 From: Oleg_123 at xuppa.com (Oleg_123 at xuppa.com) Date: Fri, 30 Jan 2004 11:46:32 -0500 (EST) Subject: [AccessD] macro can't find function In-Reply-To: <007101c3e68b$55342830$b274d0d5@minster33c3r25> References: <8B98F8EA48F8BA47A2F24E0D0AF40CF407AD7D71@xlivmbx12.aig.com> <007101c3e68b$55342830$b274d0d5@minster33c3r25> Message-ID: <41912.12.3.132.98.1075481192.squirrel@heck.bay9.com> still gives me the same error :--( > Beat me to it Lambert :-) > > Andy Lacey > http://www.minstersystems.co.uk > >> -----Original Message----- >> From: accessd-bounces at databaseadvisors.com >> [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of >> Heenan, Lambert >> Sent: 29 January 2004 17:08 >> To: 'Access Developers discussion and problem solving' >> Subject: RE: [AccessD] macro can't find function >> >> >> I'd suggest you get rid of the space between "BreakName" and >> the opening parentheses. >> >> Lambert >> >> > -----Original Message----- >> > From: Oleg_123 at xuppa.com [SMTP:Oleg_123 at xuppa.com] >> > Sent: Thursday, January 29, 2004 11:52 AM >> > To: accessd at databaseadvisors.com >> > Subject: RE: [AccessD] macro can't find function >> > >> > it's public (of course ;-) >> > and this is how it looks -- BreakName () >> > >> > i decided to try to make that macro call another macro >> which contains >> > the function >> > >> > > Oleg >> > > >> > > In a macro the function has to be expressed as fn(), ie. >> no = sign >> > > before it but must have the parentheses. May be worth >> checking. Oh >> > > and the function must of course be Public. >> > > >> > > Andy Lacey >> > > http://www.minstersystems.co.uk >> > > >> > >> -----Original Message----- >> > >> From: accessd-bounces at databaseadvisors.com >> > >> [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of >> Oleg_123 at xuppa.com >> > >> Sent: 29 January 2004 16:12 >> > >> To: accessd at databaseadvisors.com >> > >> Subject: RE: [AccessD] macro can't find function >> > >> >> > >> >> > >> Group, >> > >> >> > >> I have a long macro that opens several queries, at the end its >> suppose to RunCode - function, however it gives me an >> message "The >> > >> expression you entered has a function name that xxx can't find". >> When I run that function separetely it works fine, and >> the name is >> > >> spelled correctly since i didn't type it but selected it using >> their device what should i do ? >> > >> >> > >> >> > >> ----------------------------------------- >> > >> Get Breaking News from CNN, ABC, NBC, CBS Now. >> > >> http://www.xuppa.com/news/?link=webmail >> > >> >> > >> >> > >> >> > >> _______________________________________________ >> > >> AccessD mailing list >> > >> AccessD at databaseadvisors.com >> > >> http://databaseadvisors.com/mailman/listinfo/a> ccessd >> > >> Website: >> > >> http://www.databaseadvisors.com >> > >> >> > >> >> > > >> > > _______________________________________________ >> > > AccessD mailing list >> > > AccessD at databaseadvisors.com >> > > http://databaseadvisors.com/mailman/listinfo/accessd >> > > Website: http://www.databaseadvisors.com >> > >> > >> > >> > ----------------------------------------- >> > Get Breaking News from CNN, ABC, NBC, CBS Now. >> > http://www.xuppa.com/news/?link=webmail >> > >> > >> > _______________________________________________ >> > 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/a> ccessd >> Website: >> http://www.databaseadvisors.com >> >> > > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com ----------------------------------------- Get Breaking News from CNN, ABC, NBC, CBS Now. http://www.xuppa.com/news/?link=webmail From Bryan_Carbonnell at cbc.ca Fri Jan 30 11:33:42 2004 From: Bryan_Carbonnell at cbc.ca (Bryan Carbonnell) Date: Fri, 30 Jan 2004 12:33:42 -0500 Subject: [AccessD] Getting ALL word instances Message-ID: What I said about the close buttons should hold for XP, except, IIRC, there is a setting that will allow you to switch Word back to an MDI interface, like W97 and not an SDI like W2K. Bryan Carbonnell bryan_carbonnell at cbc.ca >>> JColby at dispec.com 30-Jan-04 10:26:54 AM >>> >What version of Word are you dealing with? Office2K or XP >Basically yyou need to keep track of if you open Word or are reusing an already opened instance of Word and only closing Word if YOU created it. You will still need to close your docs though. That's what I thought. Thanks, John W. Colby The database guy -----Original Message----- From: Bryan Carbonnell [mailto:Bryan_Carbonnell at cbc.ca] Sent: Friday, January 30, 2004 9:29 AM To: accessd at databaseadvisors.com Subject: Re: [AccessD] Getting ALL word instances > It LOOKS like when several word documents are open, each one is an instance > of word. There is an icon in the toolbar for each document. I have the > following code (which works, kind of): What version of Word are you dealing with? Word 2K (and Higher I think) actually only open one instance of Word, but put each document in it's own "button" in the task bar. If want to visually verify that you only have one instance open, have a look at the Close buttons in the Upper right corner. If you have two documents open, when looking at either document you should only have a close button in the title bar if the docs are in the instance of Word. If you have a close button in the tile bar AND the menu bar, then you have two separate instances of Word open. I see a couple of problems with your code. Basically what I don't see is how you deal with Word not being opened at all. Here is how I deal with automating word: 'Get pointer to Word Object ' Handle Error In-Line On Error Resume Next Set objWord = GetObject(, "Word.Application") If Err.Number = 429 Then 'If we got an error, that means there was no Word Instance Set objWord = CreateObject("Word.Application") 'Set Flag to let us know we opened Word bolOpenedWord = True End If 'Make Word Instance visible objWord.Visible = True 'Reset Error Handler On Error GoTo 0 'Do your processing stuff here 'Time to close up shop 'Did we create the Word instance we are using ' or did we reuse an open instance? If bolOpenedWord = True Then 'We created an instance, so now we need to close it. objWord.Quit End If Set objWord = Nothing Does this sort of answer your question? Basically yyou need to keep track of if you open Word or are reusing an already opened instance of Word and only closing Word if YOU created it. You will still need to close your docs though. Bryan Carbonnell bryan_carbonnelL at cbc.ca >>> jwcolby at colbyconsulting.com 30-Jan-04 8:58:19 AM >>> Folks, I am trying to clean up after my merge stuff. If the user fails to close the document, I have to do so before I can continue. My mail stuff opens two documents, which appear to be TWO instances of word. Further the user may already have a document of their own open. It LOOKS like when several word documents are open, each one is an instance of word. There is an icon in the toolbar for each document. I have the following code (which works, kind of): Public objWord As Word.Application Function OpenWord() As Word.Application On Error Resume Next Set objWord = GetObject(, "Word.Application") If objWord Is Nothing Then Else objWord.Visible = True End If End Function Function TestWrdClose() OpenWord objWord.Quit False Set objWord = Nothing End Function The problem is, that if I have three docs open, when I call TestWrdClose ONE TIME, all word docs close. So.... I need to close any instances of word that I opened, yet leave any instances that THEY opened. I know (think) I can use code like First question... Is it possible to open an instance of Word and give it a "name" such that I can search for that "name", get a handle to that instance, and then close it?. Second question... I assume that in order to close it, all I need to do is use the application.close once I have a handle? Or is it just a simple matter of closing all my own documents, then seeing if any documents are open, and if not closing the word instance? John W. Colby www.ColbyConsulting.com _______________________________________________ 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 _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From KIsmert at TexasSystems.com Fri Jan 30 11:25:25 2004 From: KIsmert at TexasSystems.com (Ken Ismert) Date: Fri, 30 Jan 2004 11:25:25 -0600 Subject: [AccessD] Using Dates In-Reply-To: <15711059162.20040130115245@cactus.dk> Message-ID: <004401c3e756$0c898a50$2a3ca8c0@TEXASSYSTEMS.COM> Gustav, In my estimation, the simplicity and flexibility that the Date Dimension table provides will outweigh its drawbacks for all but the most basic of date query tasks. For example, with a Date table, it would be possible to write a single parameterized query that would provide answers for a wide range of date related questions, like: * All January sales in the table * All sales for weeks with a holiday since 2000 * All weekend sales for June, July and August of 2002 The results could easily be returned an any text or numeric date format desired. While you could do all of this with date calculations and the Format function in one query, it would be very complex, and the computational overhead would likely be prohibitive. You'd probably be forced to break it into smaller queries, with the added maintainance that entails. Alternately, you could build a custom WHERE clause for each question, but you've only moved the complexity from the query to code. It also shines when you need to calculate working day intervals, as mentioned. I wish I had known about Date tables when I was developing a Purchase Order Expediting module, which needed to know the number of working days between the Order Date and the Required date. Using a properly setup Date table would have simplified my code, and provided better results. -Ken -----Original Message----- From: Gustav Brock [mailto:gustav at cactus.dk] Sent: Friday, January 30, 2004 4:53 AM To: Access Developers discussion and problem solving Subject: Re: [AccessD] Using Dates Hi Robert > I have been seeing a lot of people posting lately in many of the lists > about how to do different tings with dates. Here is what I do. I have > what is called a Date Dimension table. A dimension table is one used in > data warehouses. In this case, it is great for relational data also. The > date table has all of the things done to a date that can be done. Yes, Charlotte has mentioned this before and we had a thread touching this (Calculating days, July 2003). The main reason for reluctancy to follow your method would be the large amount of redundant data and the fact that Access is pretty fast in date operations using the built in functions except Format() which is slow. Thus, it may be faster to use Month() than to establish a join to a another table to look up the month of a date. However, there may be situations where that could be advantageous but I can see no reason to store both the month number as well as the string value of the month number. The example Charlotte mentioned was (I think) storing the holiday flag. Indeed, what should be stored in such a table should be values that can not - or only with some difficulty - be calculated like banking days which mostly follows days not being weekends/holidays but not always. Another example is working days. It could be useful to include field like Workingday_of_Month First_Workingday_In_Month_Flag Last_Workingday_In_Month_Flag Also, I would suggest flags stored as Boolean. /gustav > Here is > a sample structure: > Date_ID Date/Time (loaded using the date() function) PK > Year_Nbr Number, integer > Year_Txt Text(4) > Month_Nbr Number, byte > Month_Nbr_Txt Text(2) > Month_Name Text(15) > Month_Name_Abbrv Text(3) > Day_of_Month_Nbr Number, byte > Day_of_Month_Nbr Text(2) > Day_Of_Year_Nbr Number, integer > Week_Of_Year_Nbr Number, byte > Quarter_Nbr Number, byte > Quarter_Nbr_Txt Text(2) > Fiscal_Period Text(10) > Weekday_Flag Text(1) > Holiday_Flag Text(1) > Last_Day_In_Month_Flag Text(1) > By using this table joined to the date, you do not have to do any functions > against a date to filter by month, your, quarter, or whatever. > If anyone has questions about this, just send them to the list and I will > answer them as best I can. > Robert From HollisVJ at pgdp.usec.com Fri Jan 30 11:52:20 2004 From: HollisVJ at pgdp.usec.com (Hollis,Virginia) Date: Fri, 30 Jan 2004 11:52:20 -0600 Subject: [AccessD] Code Not Working in XP Message-ID: <618EB4D6DDCDD3119B0A00508B6FD37A0CB0CFE0@cntexchange.pgdp.usec.com> Do you know what needed to be changed with the permissions? I talked to IT about the problem and they do not know what I am talking about. They said they need specifics. I do not know enough about XP or how they have the permissions set up to give them an answer. Virginia -----Original Message----- From: Perry Harold [mailto:pharold at proftesting.com] Sent: Thursday, January 29, 2004 6:35 PM To: 'Access Developers discussion and problem solving' Subject: RE: [AccessD] Code Not Working in XP Maybe something with the permission settings on the XP boxes. Had something similar that worked great with 98 & did the same thing as yours when switching to XP until some permissions were set to allow them access to the shared resources. Perry Harold -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Hollis,Virginia Sent: Thursday, January 29, 2004 11:29 AM To: 'accessD at databaseadvisors.com' Subject: [AccessD] Code Not Working in XP I have been using the code shown below to access data on our Intranet. The code matches a field entry in the database and looks up the details. In this example it finds a stock number. Problem: The code does not work for users that are running XP. It does not do anything, it will not even try to access the web. They click the button and nothing happens. What can I do to correct this for users of XP? Virginia _____ strPath = " http://web.com/vr.asp?xml=orafin%2Stock= strFile = strPath & Me.StockNumber If Dir(strFile) = "" Then strFile = strPath & Me.StockNumber End If Call fHandleFile(strFile, WIN_MAX) _______________________________________________ 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 From JColby at dispec.com Fri Jan 30 11:58:44 2004 From: JColby at dispec.com (Colby, John) Date: Fri, 30 Jan 2004 12:58:44 -0500 Subject: [AccessD] Using Dates Message-ID: <05C61C52D7CAD211A7830008C7DF6F1079BD12@DISABILITYINS01> I have to assume though that you only create these as required for reporting? The overhead would be enormous otherwise. John W. Colby The database guy -----Original Message----- From: Ken Ismert [mailto:KIsmert at TexasSystems.com] Sent: Friday, January 30, 2004 12:25 PM To: 'Access Developers discussion and problem solving' Subject: RE: [AccessD] Using Dates Gustav, In my estimation, the simplicity and flexibility that the Date Dimension table provides will outweigh its drawbacks for all but the most basic of date query tasks. For example, with a Date table, it would be possible to write a single parameterized query that would provide answers for a wide range of date related questions, like: * All January sales in the table * All sales for weeks with a holiday since 2000 * All weekend sales for June, July and August of 2002 The results could easily be returned an any text or numeric date format desired. While you could do all of this with date calculations and the Format function in one query, it would be very complex, and the computational overhead would likely be prohibitive. You'd probably be forced to break it into smaller queries, with the added maintainance that entails. Alternately, you could build a custom WHERE clause for each question, but you've only moved the complexity from the query to code. It also shines when you need to calculate working day intervals, as mentioned. I wish I had known about Date tables when I was developing a Purchase Order Expediting module, which needed to know the number of working days between the Order Date and the Required date. Using a properly setup Date table would have simplified my code, and provided better results. -Ken -----Original Message----- From: Gustav Brock [mailto:gustav at cactus.dk] Sent: Friday, January 30, 2004 4:53 AM To: Access Developers discussion and problem solving Subject: Re: [AccessD] Using Dates Hi Robert > I have been seeing a lot of people posting lately in many of the lists > about how to do different tings with dates. Here is what I do. I have > what is called a Date Dimension table. A dimension table is one used in > data warehouses. In this case, it is great for relational data also. The > date table has all of the things done to a date that can be done. Yes, Charlotte has mentioned this before and we had a thread touching this (Calculating days, July 2003). The main reason for reluctancy to follow your method would be the large amount of redundant data and the fact that Access is pretty fast in date operations using the built in functions except Format() which is slow. Thus, it may be faster to use Month() than to establish a join to a another table to look up the month of a date. However, there may be situations where that could be advantageous but I can see no reason to store both the month number as well as the string value of the month number. The example Charlotte mentioned was (I think) storing the holiday flag. Indeed, what should be stored in such a table should be values that can not - or only with some difficulty - be calculated like banking days which mostly follows days not being weekends/holidays but not always. Another example is working days. It could be useful to include field like Workingday_of_Month First_Workingday_In_Month_Flag Last_Workingday_In_Month_Flag Also, I would suggest flags stored as Boolean. /gustav > Here is > a sample structure: > Date_ID Date/Time (loaded using the date() function) PK > Year_Nbr Number, integer > Year_Txt Text(4) > Month_Nbr Number, byte > Month_Nbr_Txt Text(2) > Month_Name Text(15) > Month_Name_Abbrv Text(3) > Day_of_Month_Nbr Number, byte > Day_of_Month_Nbr Text(2) > Day_Of_Year_Nbr Number, integer > Week_Of_Year_Nbr Number, byte > Quarter_Nbr Number, byte > Quarter_Nbr_Txt Text(2) > Fiscal_Period Text(10) > Weekday_Flag Text(1) > Holiday_Flag Text(1) > Last_Day_In_Month_Flag Text(1) > By using this table joined to the date, you do not have to do any functions > against a date to filter by month, your, quarter, or whatever. > If anyone has questions about this, just send them to the list and I will > answer them as best I can. > Robert _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From bchacc at san.rr.com Fri Jan 30 12:00:16 2004 From: bchacc at san.rr.com (Rocky Smolin - Beach Access Software) Date: Fri, 30 Jan 2004 10:00:16 -0800 Subject: [AccessD] Error 2468 - You can'tcarry out this action at thepresent time - notsolved References: <024001c3e610$66b99750$6601a8c0@HAL9002> <00ed01c3e688$1dd64bf0$6601a8c0@HAL9002> Message-ID: <013b01c3e75a$eb743400$6601a8c0@HAL9002> Charlotte (or anybody else with a wild idea): This is the strangest Access problem I've ever encountered. I have tracked the problem down to one field on the sub-form. When I delete that field, everything works. The field is named fldPODUnitCost and is the unit cost of the purchase order detail line. (BTW, I checked the back end definition of this field and didn't see anything different from the other numeric fields.) On the theory that there was some difference in a property of this text box from one that was working, I tried deleting the text box, copying the text box which holds the quantity ordered (fldPODQuantityOrdered) and changing the name and Control Source back to fldPODUnitCost. No luck. Then I tried deleting the fldPODUnitCost and dropping it in fresh from the Field List. Same problem. Here's two strange things: 1) there are two calculated fields on the sub-form which use fldPODUnitCost the extension (=[fldPODUnitCost]*[fldPODQuantityOrdered]) and the total of the lines (=Sum([fldPODUnitCost]*[fldPODQuantityOrdered])). These fields both display the correct information even though fldPODUnitCost isn't on the form. 2) there's a line of code in a procedure which referenced fldPODUnitCost: Me.fldPODUnitCost = rs!MaterialCost which pulls the unit cost from the Part Master table - a DAO record set. When I step through the code (F8) it sails right through this line as if the control was there and inserts the right value from rs!MaterialCost. But it ain't there. What do you make of this? Thanks in advance, Rocky Smolin Beach Access Software ----- Original Message ----- > > > "Any way you look at it, it pays to make sure you know where you are > before > > you try to do anything. " > > > > Good advice at any time. Brain fade dictates I address this in the a.m. > > Thanks for your input and have a nice night. > > > > Rocky > > > > > > ----- Original Message ----- > > From: "Charlotte Foust" > > To: "Access Developers discussion and problem solving" > > > > Sent: Wednesday, January 28, 2004 5:16 PM > > Subject: RE: [AccessD] Error 2468 - You > > can'tcarryoutthisactionatthepresenttime. > > > > > > > Yep, the command button wizard still writes Access 95 code. Cute, huh? > > > > > > Is there anything else on your form that has a connection to the same > > > table the parent form is based on? If not, then you need to make sure > > > there is a current record before you try deleting again. You might > > > stick some debug.print code in there to print the current Me.fldPOPrefix > > > or return the Me.NewRecord flag to see where you are. If you wind up on > > > a new record by deleting the last record in the recordset, then you'll > > > get an error if you try to go to a new record. If you're on the new > > > record when you try to delete, you'll get an error because there is no > > > current record. If you have started to create a new record, you can't > > > delete it because it isn't saved, and you can't go to NewRecord for the > > > same reason. Any way you look at it, it pays to make sure you know > > > where you are before you try to do anything. > > > > > > Charlotte Foust > > > > > > -----Original Message----- > > > From: Rocky Smolin - Beach Access Software [mailto:bchacc at san.rr.com] > > > Sent: Wednesday, January 28, 2004 5:07 PM > > > To: Access Developers discussion and problem solving > > > Subject: Re: [AccessD] Error 2468 - You > > > can'tcarryoutthisactionatthepresenttime. > > > > > > > > > Trying to delete from the parent form. A parent record that has no > > > child records. > > > > > > For delete what should I use: DoCmd.RunCommand acDeleteRecord? > > > > > > That code came from the command button wizard. > > > > > > Rocky > > > > > > ----- Original Message ----- > > > From: "Charlotte Foust" > > > To: "Access Developers discussion and problem solving" > > > > > > Sent: Wednesday, January 28, 2004 4:22 PM > > > Subject: RE: [AccessD] Error 2468 - You can't > > > carryoutthisactionatthepresenttime. > > > > > > > > > > Ack! Lose that old A95 code, please! I can't even read it any more. > > > > Comment out the SetWarnings False and see what Access tells you about > > > > the operation. > > > > > > > > HOY! I just noticed that you appear to be running this from the > > > > parent form. Which form are you trying to delete a record from? > > > > > > > > Charlotte Foust > > > > > > > > -----Original Message----- > > > > From: Rocky Smolin - Beach Access Software [mailto:bchacc at san.rr.com] > > > > Sent: Wednesday, January 28, 2004 4:18 PM > > > > To: Access Developers discussion and problem solving > > > > Subject: Re: [AccessD] Error 2468 - You can't carry > > > > outthisactionatthepresenttime. > > > > > > > > > > > > Rats. No soap. Got the error on the second delete after adding the > > > > dbengineidle and the subfrm requery like this: > > > > > > > > > > > > DoCmd.SetWarnings False > > > > DoCmd.DoMenuItem acFormBar, acEditMenu, 8, , acMenuVer70 > > > > DoCmd.DoMenuItem acFormBar, acEditMenu, 6, , acMenuVer70 > > > > DoCmd.SetWarnings True > > > > > > > > DBEngine.Idle dbRefreshCache > > > > > > > > Me.Requery > > > > Me!subfrmPODetail.Requery > > > > > > > > Any other ideas? > > > > > > > > Thanks and regards, > > > > > > > > Rocky > > > > > > > > ----- Original Message ----- > > > > From: "Charlotte Foust" > > > > To: "Access Developers discussion and problem solving" > > > > > > > > Sent: Wednesday, January 28, 2004 3:47 PM > > > > Subject: RE: [AccessD] Error 2468 - You can't carry out > > > > thisactionatthepresenttime. > > > > > > > > > > > > > Rocky, > > > > > > > > > > I suspect you're running into an issue I've seen in somewhat similar > > > > > > > > circumstances, where the deletion didn't actually seem to get > > > > > processed until I requeried the subform. Have you tried a > > > > > DBEngine.Idle dbRefreshCache after the deletion? > > > > > > > > > > Charlotte Foust > > > > > > > > > > -----Original Message----- > > > > > From: Rocky Smolin - Beach Access Software > > > > > [mailto:bchacc at san.rr.com] > > > > > Sent: Wednesday, January 28, 2004 2:13 PM > > > > > To: Access Developers discussion and problem solving > > > > > Subject: Re: [AccessD] Error 2468 - You can't carry out > > > > > thisactionatthepresent time. > > > > > > > > > > > > > > > Charlotte: > > > > > > > > > > Further to my reply, I found that when I did a delete then, before I > > > > > > > > did anything else, I went and looked in the tblPOHeader and the > > > > > record > > > > > > > > > was still there. For some reason it's not completing the delete and > > > > > > > > that's why I think it's telling me that I can't make any moves at > > > > > this > > > > > > > > > time. > > > > > > > > > > Rocky > > > > > > > > > > ----- Original Message ----- > > > > > From: "Charlotte Foust" > > > > > To: "Access Developers discussion and problem solving" > > > > > > > > > > Sent: Wednesday, January 28, 2004 1:20 PM > > > > > Subject: RE: [AccessD] Error 2468 - You can't carry out this > > > > > actionatthepresent time. > > > > > > > > > > > > > > > > It sounds like you may have the parent and child forms linked to > > > > > > the > > > > > > > > > > same dataset. Do you? > > > > > > > > > > > > Charlotte Foust > > > > > > > > > > > > -----Original Message----- > > > > > > From: Rocky Smolin - Beach Access Software > > > > > > [mailto:bchacc at san.rr.com] > > > > > > Sent: Wednesday, January 28, 2004 1:04 PM > > > > > > To: Access Developers discussion and problem solving > > > > > > Subject: Re: [AccessD] Error 2468 - You can't carry out this > > > > > > action atthepresent time. > > > > > > > > > > > > > > > > > > I'm getting closer. I deleted the sub-form that on the second tab > > > > > > > > > of the tab form and the two deletes worked. > > > > > > > > > > > > It has something to do with a sub form on a tab. Any clues, > > > > > > anybody? > > > > > > > > > > > > Rocky > > > > > > > > > > > > ----- Original Message ----- > > > > > > From: "Joe K Anderson" > > > > > > To: "Rocky Smolin - Beach Access Software" ; > > > > > > > > > > > > Cc: "Wayne Warren Angelucci" ; "Gordon > > > > > > Bennett" ; "Barry Hynum" > > > > > > ; "Dixon Foss" ; "Mark > > > > > > Krisburg" > > > > > > > > > > > > > > > > Sent: Wednesday, January 28, 2004 11:44 AM > > > > > > Subject: Re: [AccessD] Error 2468 - You can't carry out this > > > > > > action at thepresent time. > > > > > > > > > > > > > > > > > > You may need to do a Requery between deletes? > > > > > > > > > > > > joe > > > > > > ----- Original Message ----- > > > > > > From: Rocky Smolin - Beach Access Software > > > > > > To: Access Developers discussion and problem solving > > > > > > Cc: Wayne Warren Angelucci ; Mark Krisburg ; Joe Anderson ; > > > > > > Gordon > > > > > > > > > > Bennett ; Dixon Foss ; Bob Heygood ; Barry Hynum > > > > > > Sent: 01-28-2004 11:34 > > > > > > Subject: Re: [AccessD] Error 2468 - You can't carry out this > > > > > > action at the present time. > > > > > > > > > > > > > > > > > > Randall: > > > > > > > > > > > > Tried this experiment just to get the DAO recordset out of the > > > > > > way. > > > > > I > > > > > > deleted all references to it. > > > > > > > > > > > > Then I replaced: > > > > > > > > > > > > 'DoCmd.SetWarnings False > > > > > > 'DoCmd.DoMenuItem acFormBar, acEditMenu, 8, , acMenuVer70 > > > > > > 'DoCmd.DoMenuItem acFormBar, acEditMenu, 6, , acMenuVer70 > > > > > > 'DoCmd.SetWarnings True > > > > > > > > > > > > with > > > > > > > > > > > > DoCmd.RunCommand acCmdDelete > > > > > > > > > > > > I selected a record and ran that code which does the delete. > > > > > > Then > > > > > > > > > > before > > > > > > trying to delete the second record, I checked the table and the > > > > > > record was > > > > > > still there! > > > > > > > > > > > > So the delete (and probably other operations) are not completing > > > > > > > > > for > > > > > > > > > > > some > > > > > > reason. > > > > > > > > > > > > Pluse, when I get the error, I have to use the task manager to > > > > > > clear > > > > > > > > > > > access. > > > > > > It won't quit, cant close any forms, etc. > > > > > > > > > > > > Any ideas? > > > > > > > > > > > > Many thanks in advance and regards, > > > > > > > > > > > > is > > > > > > > > > > > > ----- Original Message ----- > > > > > > From: "Randall Anthony" > > > > > > To: "'Access Developers discussion and problem solving'" > > > > > > > > > > > > Sent: Wednesday, January 28, 2004 10:31 AM > > > > > > Subject: RE: [AccessD] Error 2468 - You can't carry out this > > > > > > action at the > > > > > > present time. > > > > > > > > > > > > > > > > > > > Right off the top of my head, it has to do with the movefirst, > > > > > > > > > movelast. > > > > > > I > > > > > > > ran into this when converting A97 to A2K. Code worked in A97, > > > > > > > > > not > > > > > > > > > > > A2K and > > > > > > > M$ said this was designed behavior. I'll try to find the > > > > article. > > > > > > > > > > > > > > -----Original Message----- > > > > > > > From: Rocky Smolin - Beach Access Software > > > > > > [mailto:bchacc at san.rr.com] > > > > > > > Sent: Wednesday, January 28, 2004 1:07 PM > > > > > > > To: AccessD at databaseadvisors.com > > > > > > > Subject: [AccessD] Error 2468 - You can't carry out this > > > > > > action at > > > > > > > > > > > the > > > > > > > present time. > > > > > > > > > > > > > > Dear List: > > > > > > > > > > > > > > I am getting the following error message on a bound form: > > > > > > > > > > > > > > Error 2468 - You can't carry out this action at the present > > > > time. > > > > > > > > > > > > > > This form has a sub form linked to the main form by the main > > > > > form's > > > > > > primary > > > > > > > key. (Main form is P.O. Header, subform is P.O. Detail). > > > > > > > > > > > > > > I get this error if I try to delete two records in a row. > > > > > > > > > > > > > > DoCmd.SetWarnings False > > > > > > > DoCmd.DoMenuItem acFormBar, acEditMenu, 8, , acMenuVer70 > > > > > > > DoCmd.DoMenuItem acFormBar, acEditMenu, 6, , acMenuVer70 > > > > > > > DoCmd.SetWarnings True > > > > > > > > > > > > > > I also get this error after I try to add a record. The > > > > > > problem started > > > > > > > because I wanted to get the last PO in the file, add one to > > > > > > the PO > > > > > > > > > > > number, > > > > > > > and put the prefix and the new PO number ito the new record: > > > > > > > > > > > > > > DoCmd.GoToRecord , , acNewRec > > > > > > > > > > > > > > 'If rstPOHeader.RecordCount <> 0 Then > > > > > > > ' rstPOHeader.MoveLast > > > > > > > ' Me.fldPOPrefix = Nz(rstPOHeader!fldPOPrefix) > > > > > > > ' If IsNumeric(rstPOHeader!fldPONumber) Then > > > > > > > ' Me.fldPONumber = rstPOHeader!fldPONumber + 1 > > > > > > > ' fldPOOrderDate.SetFocus > > > > > > > ' Else > > > > > > > ' Me.fldPONumber.SetFocus > > > > > > > ' End If > > > > > > > 'End If > > > > > > > 'If Nz(Me.fldPOPrefix) = "" And > > > Nz(rstPOHeader!fldPOPrefix) > > > > = > > > > > "" > > > > > > Then > > > > > > _ > > > > > > > Me.fldPOPrefix.SetFocus > > > > > > > > > > > > > > Right now the code is commented out. If I uncomment the two > > > > > lines: > > > > > > > > > > > > > > ' rstPOHeader.MoveLast > > > > > > > ' Me.fldPOPrefix = Nz(rstPOHeader!fldPOPrefix) > > > > > > > > > > > > > > I get the error when I try to save: > > > > > > > > > > > > > > DoCmd.DoMenuItem acFormBar, acRecordsMenu, acSaveRecord, , > > > > > > acMenuVer70 > > > > > > > > > > > > > > I checked the web and there is nothing. Has anyone > > > > > > encountered > > > > > this > > > > > > before? > > > > > > > > > > > > > > Thanks and regards, > > > > > > > > > > > > > > Rocky Smolin > > > > > > > Beach Access Software > > > > > > > _______________________________________________ > > > > > > > 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 > > > > > > > > > > > > > _______________________________________________ > > > > > > 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 > > > > > > _______________________________________________ > > > > > > 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 > > > > > _______________________________________________ > > > > > 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 > > > > _______________________________________________ > > > > 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 > > > _______________________________________________ > > > 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 > > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com > From hoopesg at hotmail.com Fri Jan 30 12:12:00 2004 From: hoopesg at hotmail.com (Gina Hoopes) Date: Fri, 30 Jan 2004 12:12:00 -0600 Subject: [AccessD] DatePart Question Message-ID: This may be a dumb question, but here goes. I have a table full of data that I need to query, and what I need returned is the data from last month. If I query the Max on DatePart("m",PeriodEnd) on the data that's there now, I get a 12 which is correct (from 12/31/03). But, next month we will have added January '04 data, so the latest data in the PeriodEnd field will be 1/31/04, but when I query for just the month, am I going to get a 1? I guess I'm asking if the Max function is still going to look at the whole date and return just the DatePart of "m", or will 12 be considered alone, and therefore greater than 1? I'm always open to an easier method, if you've got any ideas. Thanks, Gina _________________________________________________________________ High-speed users?be more efficient online with the new MSN Premium Internet Software. http://join.msn.com/?pgmarket=en-us&page=byoa/prem&ST=1 From KIsmert at TexasSystems.com Fri Jan 30 11:44:49 2004 From: KIsmert at TexasSystems.com (Ken Ismert) Date: Fri, 30 Jan 2004 11:44:49 -0600 Subject: [AccessD] Interface Callback Class Questions. In-Reply-To: <000201c3e6d7$30d74fc0$6501a8c0@RG> Message-ID: <004601c3e758$c24313a0$2a3ca8c0@TEXASSYSTEMS.COM> Robert, Oh, now you're getting greedy! ;-) The report object can't sink section events. Likely, you'd have to invent a section class that sinks section events. You'd need to make a collection of Section objects for all the sections used in your report, and have them hook the OnPrint or OnFormat events for their individual section. The collection would be maintained in your Report object, so its responsibilities would expand to hooking report events, setting up the section collection, having them hook their section events, and possibly servicing the section object requests. -Ken -----Original Message----- From: Robert Gracie [mailto:Subscriptions at servicexp.com] Sent: Thursday, January 29, 2004 8:17 PM To: 'Access Developers discussion and problem solving' Subject: RE: [AccessD] Interface Callback Class Questions. Ken, Thanks A Million!! Yep the report did not have module....:-), and that solved the problem... How in the world do I sink the OnPrint, or OnFormat events... with mrRpt.Section(acDetail).OnPrint = pcsEventStub I think I have tried every possible stub, and it seems like it's just ignored.... Thanks Again!! Robert Gracie From dw-murphy at cox.net Fri Jan 30 12:21:30 2004 From: dw-murphy at cox.net (Doug Murphy) Date: Fri, 30 Jan 2004 10:21:30 -0800 Subject: [AccessD] Error # 3343 Unrecognized database format In-Reply-To: Message-ID: <001601c3e75d$e4fcbf90$8500a8c0@CX615377a> Thanks Greg and Rocky, I visited the customer and found that the problem, while still unaceptable, is something that happens infrequently. When I got the call it sounded like it was happening every time they used the DB. Fortunately every time they close the system down it backs itself up. The network they use has just kind of grown so there are lots of places network errors could be introduced. The good thing is they will be upgrading their network soon so hopefully this will be a thing of the past. Doug Douglas Murphy Murphy's Creativity (619) 334-5121 doug at murphyscreativity.com www.murphyscreativity.com -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Greg Smith Sent: Thursday, January 29, 2004 6:21 AM To: Access Developers discussion and problem solving Subject: Re: [AccessD] Error # 3343 Unrecognized database format Doug: I've seen this before. One of my clients has A97 FE and BE and occasionally gets the "Unrecognized db ... error". Their MIS guy has found that almost every time it happened they had a bad switch, bad NIC, or bad wiring which was causing the user's FE to break the connection improperly, leaving the BE in a questionable state. Of course, the same thing can occur if users reboot their computers or reset them without logging out of Access first. HTH! Greg Smith weeden1949 at hotmail.com ----- Original Message ----- From: "Doug Murphy" To: "'Access Developers discussion and problem solving'" Sent: Wednesday, January 28, 2004 5:44 PM Subject: [AccessD] Error # 3343 Unrecognized database format Folks, I have a client who has started getting an Error #3343 on their back end DB. The DB is Access 97. From what I can find on this error it usually has to do with database writes being interupted or hard shutdowns. They claim that there have been no changes to thier network and that all etc. etc. _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From bchacc at san.rr.com Fri Jan 30 12:27:12 2004 From: bchacc at san.rr.com (Rocky Smolin - Beach Access Software) Date: Fri, 30 Jan 2004 10:27:12 -0800 Subject: [AccessD] Displaying the Control SOurce of a text box Message-ID: <014401c3e75e$adf03ad0$6601a8c0@HAL9002> Dear List: I'm trying to display the control source of a text box. I can get the name - ctl.Name - but can't find the syntax for getting the control source. Anybody know? MTIA, Rocky Smolin Beach Access Software From bchacc at san.rr.com Fri Jan 30 12:38:56 2004 From: bchacc at san.rr.com (Rocky Smolin - Beach Access Software) Date: Fri, 30 Jan 2004 10:38:56 -0800 Subject: [AccessD] This should be simple...but... References: Message-ID: <017201c3e760$5197b7c0$6601a8c0@HAL9002> John: Could you set the width of the label to a fixed width? That should cut off the dots no matter how many there are. This is not a solution to your problem but if I have a bunch of text boxes aligned vertically with labels to the left, I right align the labels with a colon at the end and it looks real nice. HTH Rocky ----- Original Message ----- From: "John Clark" To: Sent: Friday, January 30, 2004 6:22 AM Subject: [AccessD] This should be simple...but... > On a form I am working on, I am trying to provide 'leading dots', > between the label and text box. I want to make all labels equal by doing > this, which means some will have more or less dots than others. I > usually don't do this, because of what I am now experiencing; they don't > all line up. They are slightly off, but enough to notice. > > EXAMPLE: (These are slightly off also) > > Name ....................: > Address .................: > City ........................: > St ..........................: > Zip .........................: > > Any ideas on this? Maybe even alternatives? > > Thanks, > J Wallace Clark (Hey, this lawerese is kinda fun) > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com > From bchacc at san.rr.com Fri Jan 30 12:39:53 2004 From: bchacc at san.rr.com (Rocky Smolin - Beach Access Software) Date: Fri, 30 Jan 2004 10:39:53 -0800 Subject: [AccessD] Error # 3343 Unrecognized database format References: <001601c3e75d$e4fcbf90$8500a8c0@CX615377a> Message-ID: <018e01c3e760$73c801b0$6601a8c0@HAL9002> Hopefully they won't automatically back up their corrupted database... Rocky ----- Original Message ----- From: "Doug Murphy" To: "'Access Developers discussion and problem solving'" Sent: Friday, January 30, 2004 10:21 AM Subject: RE: [AccessD] Error # 3343 Unrecognized database format > Thanks Greg and Rocky, > > I visited the customer and found that the problem, while still > unaceptable, is something that happens infrequently. When I got the > call it sounded like it was happening every time they used the DB. > Fortunately every time they close the system down it backs itself up. > The network they use has just kind of grown so there are lots of places > network errors could be introduced. The good thing is they will be > upgrading their network soon so hopefully this will be a thing of the > past. > > Doug > > Douglas Murphy > Murphy's Creativity > (619) 334-5121 > doug at murphyscreativity.com > www.murphyscreativity.com > > > > > -----Original Message----- > From: accessd-bounces at databaseadvisors.com > [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Greg Smith > Sent: Thursday, January 29, 2004 6:21 AM > To: Access Developers discussion and problem solving > Subject: Re: [AccessD] Error # 3343 Unrecognized database format > > > Doug: > > I've seen this before. One of my clients has A97 FE and BE and > occasionally gets the "Unrecognized db ... error". Their MIS guy has > found that almost every time it happened they had a bad switch, bad NIC, > or bad wiring which was causing the user's FE to break the connection > improperly, leaving the BE in a questionable state. Of course, the same > thing can occur if users reboot their computers or reset them without > logging out of Access first. > > HTH! > > Greg Smith > weeden1949 at hotmail.com > > > ----- Original Message ----- > From: "Doug Murphy" > To: "'Access Developers discussion and problem solving'" > > Sent: Wednesday, January 28, 2004 5:44 PM > Subject: [AccessD] Error # 3343 Unrecognized database format > > > Folks, > > I have a client who has started getting an Error #3343 on their back end > DB. The DB is Access 97. From what I can find on this error it usually > has to do with database writes being interupted or hard shutdowns. They > claim that there have been no changes to thier network and that all etc. > etc. _______________________________________________ > 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 From rl_stewart at highstream.net Fri Jan 30 12:53:58 2004 From: rl_stewart at highstream.net (Robert L. Stewart) Date: Fri, 30 Jan 2004 12:53:58 -0600 Subject: [AccessD] Re: This should be simple...but... In-Reply-To: <200401301800.i0UI0Qm16112@databaseadvisors.com> Message-ID: <5.1.0.14.2.20040130125205.0299c820@pop3.highstream.net> Use a pad function to chance the text displayed and change the font to a mono-spaced font. Here is the function. Watch out for line wrap. Function PadString(strText As String, intWidth As Integer, _ strSide As String, Optional strPad As String = " ") As String ' Pad strText on either side, so the whole output is ' at least intWidth characters. ' If strText is longer than intWidth, just return strText. ' If strPad is wider than one character, this code only takes ' the first character for padding with it. ' Parameters: ' strText: ' Input text ' intWidth: ' Minimum width of the output. If ' Len(strText) < intWidth, then the ' output will be exactly intWidth characters ' wide. The code will not truncate strText, ' no matter what. ' strSide: ' This is either L or R for Left or Right ' strPad (Optional, default is " "): ' string whose first character will ' be used to pad the output. ' Returns: ' Return Value: ' strText, padded on the specified side with ' the first character of strPad. ' Example: ' PadString("Name", 10, "R", ".") returns ' "Name......" ' If Len(strText) > intWidth Then PadString = strText End If If strSide = "R" Then PadString = Left$(strText & String(intWidth, strPad), intWidth) Else PadString = Right$(String(intWidth, strPad) & strText, intWidth) End If End Function This will not align text to the center, only left or right. Paste this into a module, then in the immediate window type ? PadString("Name", 10, "R", ".") You should see Name...... Robert At 12:00 PM 1/30/2004 -0600, you wrote: >Date: Fri, 30 Jan 2004 09:22:42 -0500 >From: "John Clark" >Subject: [AccessD] This should be simple...but... >To: >Message-ID: >Content-Type: text/plain; charset=US-ASCII > >On a form I am working on, I am trying to provide 'leading dots', >between the label and text box. I want to make all labels equal by doing >this, which means some will have more or less dots than others. I >usually don't do this, because of what I am now experiencing; they don't >all line up. They are slightly off, but enough to notice. > >EXAMPLE: (These are slightly off also) > >Name ....................: >Address .................: >City ........................: >St ..........................: >Zip .........................: > >Any ideas on this? Maybe even alternatives? > >Thanks, >J Wallace Clark (Hey, this lawerese is kinda fun) From KIsmert at TexasSystems.com Fri Jan 30 12:39:56 2004 From: KIsmert at TexasSystems.com (Ken Ismert) Date: Fri, 30 Jan 2004 12:39:56 -0600 Subject: [AccessD] Using Dates In-Reply-To: <05C61C52D7CAD211A7830008C7DF6F1079BD12@DISABILITYINS01> Message-ID: <005c01c3e760$759e6f60$2a3ca8c0@TEXASSYSTEMS.COM> Right. My first example was an ad-hoc reporting type of thing. The second, PO Expediting, is a nightly ETL process that reads all active POs from the accounting system, compares it with receiving, flags late orders, and compiles a list of everything that needs follow up. As far as the overhead, Robert's table had about 102 bytes per date record. Rounding that up to 8 records per kilobyte, you could fit over 22 years worth of data in a megabyte - not a big table by most standards. Indexing against 8 byte datetime fields adds additional overhead, but if that was a concern, you could store and index dates as Modified Julian Dates, which would usually require no more than a smallint. -Ken -----Original Message----- From: Colby, John [mailto:JColby at dispec.com] Sent: Friday, January 30, 2004 11:59 AM To: 'Access Developers discussion and problem solving' Subject: RE: [AccessD] Using Dates I have to assume though that you only create these as required for reporting? The overhead would be enormous otherwise. John W. Colby The database guy -----Original Message----- From: Ken Ismert [mailto:KIsmert at TexasSystems.com] Sent: Friday, January 30, 2004 12:25 PM To: 'Access Developers discussion and problem solving' Subject: RE: [AccessD] Using Dates Gustav, In my estimation, the simplicity and flexibility that the Date Dimension table provides will outweigh its drawbacks for all but the most basic of date query tasks. For example, with a Date table, it would be possible to write a single parameterized query that would provide answers for a wide range of date related questions, like: * All January sales in the table * All sales for weeks with a holiday since 2000 * All weekend sales for June, July and August of 2002 The results could easily be returned an any text or numeric date format desired. While you could do all of this with date calculations and the Format function in one query, it would be very complex, and the computational overhead would likely be prohibitive. You'd probably be forced to break it into smaller queries, with the added maintainance that entails. Alternately, you could build a custom WHERE clause for each question, but you've only moved the complexity from the query to code. It also shines when you need to calculate working day intervals, as mentioned. I wish I had known about Date tables when I was developing a Purchase Order Expediting module, which needed to know the number of working days between the Order Date and the Required date. Using a properly setup Date table would have simplified my code, and provided better results. -Ken From JColby at dispec.com Fri Jan 30 12:56:36 2004 From: JColby at dispec.com (Colby, John) Date: Fri, 30 Jan 2004 13:56:36 -0500 Subject: [AccessD] Error # 3343 Unrecognized database format Message-ID: <05C61C52D7CAD211A7830008C7DF6F1079BD19@DISABILITYINS01> >Hopefully they won't automatically back up their corrupted database... lol. You can bet on it! John W. Colby The database guy -----Original Message----- From: Rocky Smolin - Beach Access Software [mailto:bchacc at san.rr.com] Sent: Friday, January 30, 2004 1:40 PM To: Access Developers discussion and problem solving Subject: Re: [AccessD] Error # 3343 Unrecognized database format Hopefully they won't automatically back up their corrupted database... Rocky ----- Original Message ----- From: "Doug Murphy" To: "'Access Developers discussion and problem solving'" Sent: Friday, January 30, 2004 10:21 AM Subject: RE: [AccessD] Error # 3343 Unrecognized database format > Thanks Greg and Rocky, > > I visited the customer and found that the problem, while still > unaceptable, is something that happens infrequently. When I got the > call it sounded like it was happening every time they used the DB. > Fortunately every time they close the system down it backs itself up. > The network they use has just kind of grown so there are lots of places > network errors could be introduced. The good thing is they will be > upgrading their network soon so hopefully this will be a thing of the > past. > > Doug > > Douglas Murphy > Murphy's Creativity > (619) 334-5121 > doug at murphyscreativity.com > www.murphyscreativity.com > > > > > -----Original Message----- > From: accessd-bounces at databaseadvisors.com > [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Greg Smith > Sent: Thursday, January 29, 2004 6:21 AM > To: Access Developers discussion and problem solving > Subject: Re: [AccessD] Error # 3343 Unrecognized database format > > > Doug: > > I've seen this before. One of my clients has A97 FE and BE and > occasionally gets the "Unrecognized db ... error". Their MIS guy has > found that almost every time it happened they had a bad switch, bad NIC, > or bad wiring which was causing the user's FE to break the connection > improperly, leaving the BE in a questionable state. Of course, the same > thing can occur if users reboot their computers or reset them without > logging out of Access first. > > HTH! > > Greg Smith > weeden1949 at hotmail.com > > > ----- Original Message ----- > From: "Doug Murphy" > To: "'Access Developers discussion and problem solving'" > > Sent: Wednesday, January 28, 2004 5:44 PM > Subject: [AccessD] Error # 3343 Unrecognized database format > > > Folks, > > I have a client who has started getting an Error #3343 on their back end > DB. The DB is Access 97. From what I can find on this error it usually > has to do with database writes being interupted or hard shutdowns. They > claim that there have been no changes to thier network and that all etc. > etc. _______________________________________________ > 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 _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From rl_stewart at highstream.net Fri Jan 30 12:58:28 2004 From: rl_stewart at highstream.net (Robert L. Stewart) Date: Fri, 30 Jan 2004 12:58:28 -0600 Subject: [AccessD] Re: Using Dates In-Reply-To: <200401301800.i0UI0Qm16112@databaseadvisors.com> Message-ID: <5.1.0.14.2.20040130125736.029a5740@pop3.highstream.net> Actually, you have a "standard" date dimension table that everyone uses and the overhead is minimal. At 12:00 PM 1/30/2004 -0600, you wrote: >Date: Fri, 30 Jan 2004 12:58:44 -0500 >From: "Colby, John" >Subject: RE: [AccessD] Using Dates >To: "'Access Developers discussion and problem solving'" > >Message-ID: <05C61C52D7CAD211A7830008C7DF6F1079BD12 at DISABILITYINS01> >Content-Type: text/plain; charset="iso-8859-1" > >I have to assume though that you only create these as required for >reporting? The overhead would be enormous otherwise. > >John W. Colby From JColby at dispec.com Fri Jan 30 13:05:57 2004 From: JColby at dispec.com (Colby, John) Date: Fri, 30 Jan 2004 14:05:57 -0500 Subject: [AccessD] RE: Using Dates Message-ID: <05C61C52D7CAD211A7830008C7DF6F1079BD1A@DISABILITYINS01> I think I finally "got it". This is joined to any date to pull out the various pieces needed? Then you build a function to populate this thing for the dates that your app needs? I think I might just appreciate this one! ;-) John W. Colby The database guy -----Original Message----- From: Robert L. Stewart [mailto:rl_stewart at highstream.net] Sent: Friday, January 30, 2004 1:58 PM To: accessd at databaseadvisors.com Cc: JColby at dispec.com Subject: Re: Using Dates Actually, you have a "standard" date dimension table that everyone uses and the overhead is minimal. At 12:00 PM 1/30/2004 -0600, you wrote: >Date: Fri, 30 Jan 2004 12:58:44 -0500 >From: "Colby, John" >Subject: RE: [AccessD] Using Dates >To: "'Access Developers discussion and problem solving'" > >Message-ID: <05C61C52D7CAD211A7830008C7DF6F1079BD12 at DISABILITYINS01> >Content-Type: text/plain; charset="iso-8859-1" > >I have to assume though that you only create these as required for >reporting? The overhead would be enormous otherwise. > >John W. Colby From doug at murphyscreativity.com Fri Jan 30 13:13:59 2004 From: doug at murphyscreativity.com (Doug Murphy) Date: Fri, 30 Jan 2004 11:13:59 -0800 Subject: [AccessD] Displaying the Control SOurce of a text box In-Reply-To: <014401c3e75e$adf03ad0$6601a8c0@HAL9002> Message-ID: <001a01c3e765$36b23e30$8500a8c0@CX615377a> Control.controlsource Douglas Murphy Murphy's Creativity (619) 334-5121 doug at murphyscreativity.com www.murphyscreativity.com -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Rocky Smolin - Beach Access Software Sent: Friday, January 30, 2004 10:27 AM To: AccessD at databaseadvisors.com Subject: [AccessD] Displaying the Control SOurce of a text box Dear List: I'm trying to display the control source of a text box. I can get the name - ctl.Name - but can't find the syntax for getting the control source. Anybody know? MTIA, Rocky Smolin Beach Access Software _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From dw-murphy at cox.net Fri Jan 30 13:14:45 2004 From: dw-murphy at cox.net (Doug Murphy) Date: Fri, 30 Jan 2004 11:14:45 -0800 Subject: [AccessD] Error # 3343 Unrecognized database format In-Reply-To: <018e01c3e760$73c801b0$6601a8c0@HAL9002> Message-ID: <001b01c3e765$523c42e0$8500a8c0@CX615377a> The process is first the DB compacts which fails on the corupted DB and generates a message to the operator informing them of the problem and ends the process. The last good backup is still there. Doug Douglas Murphy Murphy's Creativity (619) 334-5121 doug at murphyscreativity.com www.murphyscreativity.com -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Rocky Smolin - Beach Access Software Sent: Friday, January 30, 2004 10:40 AM To: Access Developers discussion and problem solving Subject: Re: [AccessD] Error # 3343 Unrecognized database format Hopefully they won't automatically back up their corrupted database... Rocky ----- Original Message ----- From: "Doug Murphy" To: "'Access Developers discussion and problem solving'" Sent: Friday, January 30, 2004 10:21 AM Subject: RE: [AccessD] Error # 3343 Unrecognized database format > Thanks Greg and Rocky, > > I visited the customer and found that the problem, while still > unaceptable, is something that happens infrequently. When I got the > call it sounded like it was happening every time they used the DB. > Fortunately every time they close the system down it backs itself up. > The network they use has just kind of grown so there are lots of > places network errors could be introduced. The good thing is they > will be upgrading their network soon so hopefully this will be a thing > of the past. > > Doug > > Douglas Murphy > Murphy's Creativity > (619) 334-5121 > doug at murphyscreativity.com > www.murphyscreativity.com > > > > > -----Original Message----- > From: accessd-bounces at databaseadvisors.com > [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Greg Smith > Sent: Thursday, January 29, 2004 6:21 AM > To: Access Developers discussion and problem solving > Subject: Re: [AccessD] Error # 3343 Unrecognized database format > > > Doug: > > I've seen this before. One of my clients has A97 FE and BE and > occasionally gets the "Unrecognized db ... error". Their MIS guy has > found that almost every time it happened they had a bad switch, bad > NIC, or bad wiring which was causing the user's FE to break the > connection improperly, leaving the BE in a questionable state. Of > course, the same thing can occur if users reboot their computers or > reset them without logging out of Access first. > > HTH! > > Greg Smith > weeden1949 at hotmail.com > > > ----- Original Message ----- > From: "Doug Murphy" > To: "'Access Developers discussion and problem solving'" > > Sent: Wednesday, January 28, 2004 5:44 PM > Subject: [AccessD] Error # 3343 Unrecognized database format > > > Folks, > > I have a client who has started getting an Error #3343 on their back > end DB. The DB is Access 97. From what I can find on this error it > usually has to do with database writes being interupted or hard > shutdowns. They claim that there have been no changes to thier > network and that all etc. etc. > _______________________________________________ > 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 _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From joconnell at indy.rr.com Fri Jan 30 13:26:45 2004 From: joconnell at indy.rr.com (Joseph O'Connell) Date: Fri, 30 Jan 2004 14:26:45 -0500 Subject: [AccessD] DatePart Question Message-ID: <087301c3e767$004b79e0$6701a8c0@joe> Gina, If I understand what you are asking, then stated a different way would be: select all records whose date is prior to the first day of this month (1/1/04) and greater than or equal to the first day of the prior month (12/1/03). Your query should consider the full date, not just the month. Assuming that you always want to key off of today's date, the date of the first day of this month is: DateSerial(DatePart("yyyy",Date()),DatePart("m",Date()),1) and the date of the first day of the prior month is: DateAdd("m",-1,DateSerial(DatePart("yyyy",Date()),DatePart("m",Date()),1) Combining them in a where clause for your query would be: WHERE ((tblTableName.dtmDateFieldName)=DateAdd("m",-1,DateSerial(DatePart("yyyy",D ate()),DatePart("m",Date()),1))) Using less than the first day of the current month and greater than or equal to the first day of the prior month ensures that the query will work properly if your field also includes the time. This should work for any date/time, even January. Joe O'Connell -----Original Message----- From: Gina Hoopes To: AccessD at databaseadvisors.com Date: Friday, January 30, 2004 1:26 PM Subject: [AccessD] DatePart Question This may be a dumb question, but here goes. I have a table full of data that I need to query, and what I need returned is the data from last month. If I query the Max on DatePart("m",PeriodEnd) on the data that's there now, I get a 12 which is correct (from 12/31/03). But, next month we will have added January '04 data, so the latest data in the PeriodEnd field will be 1/31/04, but when I query for just the month, am I going to get a 1? I guess I'm asking if the Max function is still going to look at the whole date and return just the DatePart of "m", or will 12 be considered alone, and therefore greater than 1? I'm always open to an easier method, if you've got any ideas. Thanks, Gina _________________________________________________________________ High-speed users-be more efficient online with the new MSN Premium Internet Software. http://join.msn.com/?pgmarket=en-us&page=byoa/prem&ST=1 _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From bchacc at san.rr.com Fri Jan 30 13:37:53 2004 From: bchacc at san.rr.com (Rocky Smolin - Beach Access Software) Date: Fri, 30 Jan 2004 11:37:53 -0800 Subject: [AccessD] Displaying the Control SOurce of a text box References: <001a01c3e765$36b23e30$8500a8c0@CX615377a> Message-ID: <01f101c3e768$8e167f80$6601a8c0@HAL9002> Go it. Thanks. Only works for certain controls. Rocky ----- Original Message ----- From: "Doug Murphy" To: "'Access Developers discussion and problem solving'" Sent: Friday, January 30, 2004 11:13 AM Subject: RE: [AccessD] Displaying the Control SOurce of a text box > Control.controlsource > > Douglas Murphy > Murphy's Creativity > (619) 334-5121 > doug at murphyscreativity.com > www.murphyscreativity.com > > > > > -----Original Message----- > From: accessd-bounces at databaseadvisors.com > [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Rocky Smolin > - Beach Access Software > Sent: Friday, January 30, 2004 10:27 AM > To: AccessD at databaseadvisors.com > Subject: [AccessD] Displaying the Control SOurce of a text box > > > Dear List: > > I'm trying to display the control source of a text box. I can get the > name - ctl.Name - but can't find the syntax for getting the control > source. > > Anybody know? > > MTIA, > > Rocky Smolin > Beach Access Software _______________________________________________ > 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 > From dw-murphy at cox.net Fri Jan 30 13:11:22 2004 From: dw-murphy at cox.net (Doug Murphy) Date: Fri, 30 Jan 2004 11:11:22 -0800 Subject: [AccessD] Error # 3343 Unrecognized database format In-Reply-To: <018e01c3e760$73c801b0$6601a8c0@HAL9002> Message-ID: <001901c3e764$d95e5610$8500a8c0@CX615377a> The process is first the DB compacts which fails on the corupted DB and generates a message to the operator informing them of the problem and ends the process. The last good backup is still there. Doug Douglas Murphy Murphy's Creativity (619) 334-5121 doug at murphyscreativity.com www.murphyscreativity.com -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Rocky Smolin - Beach Access Software Sent: Friday, January 30, 2004 10:40 AM To: Access Developers discussion and problem solving Subject: Re: [AccessD] Error # 3343 Unrecognized database format Hopefully they won't automatically back up their corrupted database... Rocky ----- Original Message ----- From: "Doug Murphy" To: "'Access Developers discussion and problem solving'" Sent: Friday, January 30, 2004 10:21 AM Subject: RE: [AccessD] Error # 3343 Unrecognized database format > Thanks Greg and Rocky, > > I visited the customer and found that the problem, while still > unaceptable, is something that happens infrequently. When I got the > call it sounded like it was happening every time they used the DB. > Fortunately every time they close the system down it backs itself up. > The network they use has just kind of grown so there are lots of > places network errors could be introduced. The good thing is they > will be upgrading their network soon so hopefully this will be a thing > of the past. > > Doug > > Douglas Murphy > Murphy's Creativity > (619) 334-5121 > doug at murphyscreativity.com > www.murphyscreativity.com > > > > > -----Original Message----- > From: accessd-bounces at databaseadvisors.com > [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Greg Smith > Sent: Thursday, January 29, 2004 6:21 AM > To: Access Developers discussion and problem solving > Subject: Re: [AccessD] Error # 3343 Unrecognized database format > > > Doug: > > I've seen this before. One of my clients has A97 FE and BE and > occasionally gets the "Unrecognized db ... error". Their MIS guy has > found that almost every time it happened they had a bad switch, bad > NIC, or bad wiring which was causing the user's FE to break the > connection improperly, leaving the BE in a questionable state. Of > course, the same thing can occur if users reboot their computers or > reset them without logging out of Access first. > > HTH! > > Greg Smith > weeden1949 at hotmail.com > > > ----- Original Message ----- > From: "Doug Murphy" > To: "'Access Developers discussion and problem solving'" > > Sent: Wednesday, January 28, 2004 5:44 PM > Subject: [AccessD] Error # 3343 Unrecognized database format > > > Folks, > > I have a client who has started getting an Error #3343 on their back > end DB. The DB is Access 97. From what I can find on this error it > usually has to do with database writes being interupted or hard > shutdowns. They claim that there have been no changes to thier > network and that all etc. etc. > _______________________________________________ > 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 _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From BBarabash at TappeConstruction.com Fri Jan 30 13:45:52 2004 From: BBarabash at TappeConstruction.com (Brett Barabash) Date: Fri, 30 Jan 2004 13:45:52 -0600 Subject: [AccessD] OT - Friday Humor Message-ID: <426071E0B0A6D311B3C0006008B0AB23AFE305@TAPPEEXCH01> Just stumbled across this as a link from Joel on Software Funny because it is so true... http://neopoleon.com/blog/posts/434.aspx Brett Barabash, MCP Tappe Construction, Co. Eagan, MN bbarabash at tappeconstruction.com (651) 256-6831 "One thing a computer can do that most humans can't is be sealed up in a cardboard box and sit in a warehouse." -Jack Handey -------------------------------------------------------------------------------------------------------------------- This email and any files transmitted with it are confidential and intended solely for the use of the individual or entity to whom they are addressed. If you have received this email in error please notify the originator of the message. This footer also confirms that this email message has been scanned for the presence of computer viruses. Any views expressed in this message are those of the individual sender, except where the sender specifies and with authority, states them to be the views of Tappe Construction Co. Scanning of this message and addition of this footer is performed by SurfControl E-mail Filter software in conjunction with virus detection software. From John.Clark at niagaracounty.com Fri Jan 30 13:47:32 2004 From: John.Clark at niagaracounty.com (John Clark) Date: Fri, 30 Jan 2004 14:47:32 -0500 Subject: [AccessD] Re: This should be simple...but... Message-ID: This is pretty cool code. I thought about doing something like this, but I thought it would be too 'difficult' or in-depth to make it worthwhile. But, this is actually quite simple for what it accomplishes. I really didn't want to use a universal font, and although I agree w/Rocky about the right justify, it just doesn't look right in this case. I was going to do that though, until I got this code. Thanks Robert! This will be a keeper for me. John >>> rl_stewart at highstream.net 01/30/04 01:53PM >>> Use a pad function to chance the text displayed and change the font to a mono-spaced font. Here is the function. Watch out for line wrap. Function PadString(strText As String, intWidth As Integer, _ strSide As String, Optional strPad As String = " ") As String ' Pad strText on either side, so the whole output is ' at least intWidth characters. ' If strText is longer than intWidth, just return strText. ' If strPad is wider than one character, this code only takes ' the first character for padding with it. ' Parameters: ' strText: ' Input text ' intWidth: ' Minimum width of the output. If ' Len(strText) < intWidth, then the ' output will be exactly intWidth characters ' wide. The code will not truncate strText, ' no matter what. ' strSide: ' This is either L or R for Left or Right ' strPad (Optional, default is " "): ' string whose first character will ' be used to pad the output. ' Returns: ' Return Value: ' strText, padded on the specified side with ' the first character of strPad. ' Example: ' PadString("Name", 10, "R", ".") returns ' "Name......" ' If Len(strText) > intWidth Then PadString = strText End If If strSide = "R" Then PadString = Left$(strText & String(intWidth, strPad), intWidth) Else PadString = Right$(String(intWidth, strPad) & strText, intWidth) End If End Function This will not align text to the center, only left or right. Paste this into a module, then in the immediate window type ? PadString("Name", 10, "R", ".") You should see Name...... Robert At 12:00 PM 1/30/2004 -0600, you wrote: >Date: Fri, 30 Jan 2004 09:22:42 -0500 >From: "John Clark" >Subject: [AccessD] This should be simple...but... >To: >Message-ID: >Content-Type: text/plain; charset=US-ASCII > >On a form I am working on, I am trying to provide 'leading dots', >between the label and text box. I want to make all labels equal by doing >this, which means some will have more or less dots than others. I >usually don't do this, because of what I am now experiencing; they don't >all line up. They are slightly off, but enough to notice. > >EXAMPLE: (These are slightly off also) > >Name ....................: >Address .................: >City ........................: >St ..........................: >Zip .........................: > >Any ideas on this? Maybe even alternatives? > >Thanks, >J Wallace Clark (Hey, this lawerese is kinda fun) _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From hoopesg at hotmail.com Fri Jan 30 14:03:59 2004 From: hoopesg at hotmail.com (Gina Hoopes) Date: Fri, 30 Jan 2004 14:03:59 -0600 Subject: [AccessD] DatePart Question Message-ID: Thank you, Joe. I think that sounds much better than what I was using. Gina From: "Joseph O'Connell" To: , Subject: Re: [AccessD] DatePart Question Date: Fri, 30 Jan 2004 14:26:45 -0500 Gina, If I understand what you are asking, then stated a different way would be: select all records whose date is prior to the first day of this month (1/1/04) and greater than or equal to the first day of the prior month (12/1/03). Your query should consider the full date, not just the month. Assuming that you always want to key off of today's date, the date of the first day of this month is: DateSerial(DatePart("yyyy",Date()),DatePart("m",Date()),1) and the date of the first day of the prior month is: DateAdd("m",-1,DateSerial(DatePart("yyyy",Date()),DatePart("m",Date()),1) Combining them in a where clause for your query would be: WHERE ((tblTableName.dtmDateFieldName)=DateAdd("m",-1,DateSerial(DatePart("yyyy",D ate()),DatePart("m",Date()),1))) Using less than the first day of the current month and greater than or equal to the first day of the prior month ensures that the query will work properly if your field also includes the time. This should work for any date/time, even January. Joe O'Connell -----Original Message----- From: Gina Hoopes To: AccessD at databaseadvisors.com Date: Friday, January 30, 2004 1:26 PM Subject: [AccessD] DatePart Question This may be a dumb question, but here goes. I have a table full of data that I need to query, and what I need returned is the data from last month. If I query the Max on DatePart("m",PeriodEnd) on the data that's there now, I get a 12 which is correct (from 12/31/03). But, next month we will have added January '04 data, so the latest data in the PeriodEnd field will be 1/31/04, but when I query for just the month, am I going to get a 1? I guess I'm asking if the Max function is still going to look at the whole date and return just the DatePart of "m", or will 12 be considered alone, and therefore greater than 1? I'm always open to an easier method, if you've got any ideas. Thanks, Gina _________________________________________________________________ Find high-speed ?net deals ? comparison-shop your local providers here. https://broadband.msn.com From jwcolby at colbyconsulting.com Fri Jan 30 14:28:23 2004 From: jwcolby at colbyconsulting.com (John W. Colby) Date: Fri, 30 Jan 2004 15:28:23 -0500 Subject: [AccessD] Displaying the Control SOurce of a text box In-Reply-To: <01f101c3e768$8e167f80$6601a8c0@HAL9002> Message-ID: Rocky, A "control" is a generic type that can contain any control, even a label. Obviously a label can't have a control source. Thus... To see it using autosense etc. it would have to be dimensioned as type textbox. John W. Colby www.ColbyConsulting.com -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Rocky Smolin - Beach Access Software Sent: Friday, January 30, 2004 2:38 PM To: Access Developers discussion and problem solving Subject: Re: [AccessD] Displaying the Control SOurce of a text box Go it. Thanks. Only works for certain controls. Rocky ----- Original Message ----- From: "Doug Murphy" To: "'Access Developers discussion and problem solving'" Sent: Friday, January 30, 2004 11:13 AM Subject: RE: [AccessD] Displaying the Control SOurce of a text box > Control.controlsource > > Douglas Murphy > Murphy's Creativity > (619) 334-5121 > doug at murphyscreativity.com > www.murphyscreativity.com > > > > > -----Original Message----- > From: accessd-bounces at databaseadvisors.com > [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Rocky Smolin > - Beach Access Software > Sent: Friday, January 30, 2004 10:27 AM > To: AccessD at databaseadvisors.com > Subject: [AccessD] Displaying the Control SOurce of a text box > > > Dear List: > > I'm trying to display the control source of a text box. I can get the > name - ctl.Name - but can't find the syntax for getting the control > source. > > Anybody know? > > MTIA, > > Rocky Smolin > Beach Access Software _______________________________________________ > 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 > _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From Oleg_123 at xuppa.com Fri Jan 30 14:59:00 2004 From: Oleg_123 at xuppa.com (Oleg_123 at xuppa.com) Date: Fri, 30 Jan 2004 15:59:00 -0500 (EST) Subject: [AccessD] Opening report on desired record In-Reply-To: References: <01f101c3e768$8e167f80$6601a8c0@HAL9002> Message-ID: <42162.12.3.132.98.1075496340.squirrel@heck.bay9.com> Hey Group I have a form that opens report, and I'd like it open on the record thats selected on the form. Bith are coming from the same table. How can I do that ? (i am in access97) textbox is called employeenumber Dim stDocName As String stDocName = "Carol" DoCmd.OpenReport stDocName, acPreview where stDocName![employee name] = Me.employeenumber.Text ----------------------------------------- Get Breaking News from CNN, ABC, NBC, CBS Now. http://www.xuppa.com/news/?link=webmail From HollisVJ at pgdp.usec.com Fri Jan 30 15:37:10 2004 From: HollisVJ at pgdp.usec.com (Hollis,Virginia) Date: Fri, 30 Jan 2004 15:37:10 -0600 Subject: [AccessD] Code Not Working in XP Message-ID: <618EB4D6DDCDD3119B0A00508B6FD37A0CB0CFED@cntexchange.pgdp.usec.com> Ok, I have been playing around on Microsoft site today. It looks like the problem may be the rundll32.exe in the fHandleFile code. I haven't figured out why yet or what would need to be changed to correct this. Any ideas? Virginia -----Original Message----- From: Hollis,Virginia [mailto:HollisVJ at pgdp.usec.com] Sent: Friday, January 30, 2004 11:52 AM To: 'Access Developers discussion and problem solving' Subject: RE: [AccessD] Code Not Working in XP Do you know what needed to be changed with the permissions? I talked to IT about the problem and they do not know what I am talking about. They said they need specifics. I do not know enough about XP or how they have the permissions set up to give them an answer. Virginia -----Original Message----- From: Perry Harold [mailto:pharold at proftesting.com] Sent: Thursday, January 29, 2004 6:35 PM To: 'Access Developers discussion and problem solving' Subject: RE: [AccessD] Code Not Working in XP Maybe something with the permission settings on the XP boxes. Had something similar that worked great with 98 & did the same thing as yours when switching to XP until some permissions were set to allow them access to the shared resources. Perry Harold -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Hollis,Virginia Sent: Thursday, January 29, 2004 11:29 AM To: 'accessD at databaseadvisors.com' Subject: [AccessD] Code Not Working in XP I have been using the code shown below to access data on our Intranet. The code matches a field entry in the database and looks up the details. In this example it finds a stock number. Problem: The code does not work for users that are running XP. It does not do anything, it will not even try to access the web. They click the button and nothing happens. What can I do to correct this for users of XP? Virginia _____ strPath = " http://web.com/vr.asp?xml=orafin%2Stock= strFile = strPath & Me.StockNumber If Dir(strFile) = "" Then strFile = strPath & Me.StockNumber End If Call fHandleFile(strFile, WIN_MAX) From DWUTKA at marlow.com Fri Jan 30 15:50:57 2004 From: DWUTKA at marlow.com (DWUTKA at marlow.com) Date: Fri, 30 Jan 2004 15:50:57 -0600 Subject: [AccessD] Access as Service Message-ID: <2F8793082E00D4119A1700B0D0216BF80222780F@main2.marlow.com> Whoops, how did I miss the original....ack, need more coffee... Drew -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Jim Dettman Sent: Friday, January 30, 2004 7:24 AM To: Access Developers discussion and problem solving Subject: RE: [AccessD] Access as Service Drop an e-mail to Drew Wutka. I believe he has played around with that. Jim Dettman President, Online Computer Services of WNY, Inc. (315) 699-3443 jimdettman at earthlink.net -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of ggonzalez at cccis.com Sent: Thursday, January 29, 2004 10:28 AM To: Access Developers discussion and problem solving Subject: Re: [AccessD] Access as Service Has anyone ever had to run an Access application as a service on a computer? if so can you pint me in the direction on how I could do this. Thanks! _______________________________________________ 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 From DWUTKA at marlow.com Fri Jan 30 16:01:42 2004 From: DWUTKA at marlow.com (DWUTKA at marlow.com) Date: Fri, 30 Jan 2004 16:01:42 -0600 Subject: [AccessD] Access as Service Message-ID: <2F8793082E00D4119A1700B0D0216BF802227810@main2.marlow.com> Not Access directly. There is an NT service control, and it works well with a VB program, but msaccess.exe has a pretty big memory footprint, I don't think you'd want to use it directly as a service. Drew -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of ggonzalez at cccis.com Sent: Thursday, January 29, 2004 9:28 AM To: Access Developers discussion and problem solving Subject: Re: [AccessD] Access as Service Has anyone ever had to run an Access application as a service on a computer? if so can you pint me in the direction on how I could do this. Thanks! _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From pedro at plex.nl Fri Jan 30 16:07:07 2004 From: pedro at plex.nl (Pedro Janssen) Date: Fri, 30 Jan 2004 23:07:07 +0100 Subject: [AccessD] error 3309 Message-ID: <000801c3e77e$3eb85830$f1c581d5@pedro> Hello Group, i get an error inserting some new fields in a table. The value of this property is to large (Error 3309). The help says something about: that i am trying to adjust a property value of an object, larger then 2 kb. I don't understand why i am getting this eror. The table is large, about 200 fields. Most of the fields are valuta-fields and checkboxes. About 25 fields are lookup fields. Do i go beyond the maiximum of the tables properties??? TIA Pedro Janssen From ggonzalez at cccis.com Fri Jan 30 16:36:33 2004 From: ggonzalez at cccis.com (ggonzalez at cccis.com) Date: Fri, 30 Jan 2004 16:36:33 -0600 Subject: [AccessD] Access as Service Message-ID: Thanks, All I am going to look at creating somthing in VB. DWUTKA at marlow.com Sent by: To: accessd at databaseadvisors.com accessd-bounces at databasea cc: dvisors.com Subject: RE: [AccessD] Access as Service 01/30/2004 04:01 PM Please respond to Access Developers discussion and problem solving Not Access directly. There is an NT service control, and it works well with a VB program, but msaccess.exe has a pretty big memory footprint, I don't think you'd want to use it directly as a service. Drew -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of ggonzalez at cccis.com Sent: Thursday, January 29, 2004 9:28 AM To: Access Developers discussion and problem solving Subject: Re: [AccessD] Access as Service Has anyone ever had to run an Access application as a service on a computer? if so can you pint me in the direction on how I could do this. Thanks! _______________________________________________ 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 From Subscriptions at servicexp.com Fri Jan 30 17:19:20 2004 From: Subscriptions at servicexp.com (Robert Gracie) Date: Fri, 30 Jan 2004 18:19:20 -0500 Subject: [AccessD] Interface Callback Class Questions. In-Reply-To: <004601c3e758$c24313a0$2a3ca8c0@TEXASSYSTEMS.COM> Message-ID: <000301c3e787$7d7581c0$6501a8c0@RG> Go figure...., now that changes things for me...... Thanks For All Your Help!! Robert Gracie -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Ken Ismert Sent: Friday, January 30, 2004 12:45 PM To: 'Access Developers discussion and problem solving' Subject: RE: [AccessD] Interface Callback Class Questions. Robert, Oh, now you're getting greedy! ;-) The report object can't sink section events. Likely, you'd have to invent a section class that sinks section events. You'd need to make a collection of Section objects for all the sections used in your report, and have them hook the OnPrint or OnFormat events for their individual section. The collection would be maintained in your Report object, so its responsibilities would expand to hooking report events, setting up the section collection, having them hook their section events, and possibly servicing the section object requests. -Ken -----Original Message----- From: Robert Gracie [mailto:Subscriptions at servicexp.com] Sent: Thursday, January 29, 2004 8:17 PM To: 'Access Developers discussion and problem solving' Subject: RE: [AccessD] Interface Callback Class Questions. Ken, Thanks A Million!! Yep the report did not have module....:-), and that solved the problem... How in the world do I sink the OnPrint, or OnFormat events... with mrRpt.Section(acDetail).OnPrint = pcsEventStub I think I have tried every possible stub, and it seems like it's just ignored.... Thanks Again!! Robert Gracie _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From martyconnelly at shaw.ca Fri Jan 30 19:40:51 2004 From: martyconnelly at shaw.ca (MartyConnelly) Date: Fri, 30 Jan 2004 17:40:51 -0800 Subject: [AccessD] Code Not Working in XP References: <618EB4D6DDCDD3119B0A00508B6FD37A0CB0CFED@cntexchange.pgdp.usec.com> Message-ID: <401B07A3.4080309@shaw.ca> Okay this test code below works for me on WinXP. It opens up an IE window or overwrites it if one is open So a coupleof things to try 1. put your final value for strfile in the url address of IE on a WinXP box and see if it works, the url may be jiggered or you may have a security permission problem in IE (internet options) that is causing a problem There is some weird way to query these IE permissions in VBA code. and reset them, I have seen it somewhere. You would be amazed at what you can stick in an IE URL address bar and it works. Like the following javascript:alert("Actual URL address: " + location.protocol + "//" + location.hostname + "/"); 2. You may want to rewrite this with an xmlhttp get method as per code further below, if you are trying to parse some returned value 3. try this code works on WinXP access97 Sub testda() Dim strfile As String Dim strpath As String 'strpath = " http://web.com/vr.asp?xml=orafin%2Stock=" ' " ' strfile = strpath & Me.StockNumber ' If Dir(strfile) = "" Then ' strfile = strpath & Me.StockNumber ' End If strfile = "http://moneycentral.msn.com/investor/research/printrep.asp?Symbol=MSFT" Call fHandleFile(strfile, WIN_MAX) End Sub ------- Dim xmlhttp As MSXML2.XMLHTTP40 Dim sString As String Dim strURL As String sString = "?iPage=qd&Symbol=MSFT" strURL = "http://moneycentral.msn.com/scripts/webquote.dll" Set xmlhttp = New MSXML2.XMLHTTP40 xmlhttp.Open "GET", "http://moneycentral.msn.com/scripts/webquote.dll?iPage=qd&Symbol=MSFT", False xmlhttp.send Debug.Print xmlhttp.responseText Hollis,Virginia wrote: >Ok, I have been playing around on Microsoft site today. It looks like the >problem may be the rundll32.exe in the fHandleFile code. I haven't figured >out why yet or what would need to be changed to correct this. > >Any ideas? > >Virginia > >-----Original Message----- >From: Hollis,Virginia [mailto:HollisVJ at pgdp.usec.com] >Sent: Friday, January 30, 2004 11:52 AM >To: 'Access Developers discussion and problem solving' >Subject: RE: [AccessD] Code Not Working in XP > > >Do you know what needed to be changed with the permissions? I talked to IT >about the problem and they do not know what I am talking about. They said >they need specifics. I do not know enough about XP or how they have the >permissions set up to give them an answer. > >Virginia > >-----Original Message----- >From: Perry Harold [mailto:pharold at proftesting.com] >Sent: Thursday, January 29, 2004 6:35 PM >To: 'Access Developers discussion and problem solving' >Subject: RE: [AccessD] Code Not Working in XP > > >Maybe something with the permission settings on the XP boxes. Had something >similar that worked great with 98 & did the same thing as yours when >switching to XP until some permissions were set to allow them access to the >shared resources. > >Perry Harold > >-----Original Message----- >From: accessd-bounces at databaseadvisors.com >[mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Hollis,Virginia >Sent: Thursday, January 29, 2004 11:29 AM >To: 'accessD at databaseadvisors.com' >Subject: [AccessD] Code Not Working in XP > > >I have been using the code shown below to access data on our Intranet. The >code matches a field entry in the database and looks up the details. In this >example it finds a stock number. > >Problem: The code does not work for users that are running XP. It does not >do anything, it will not even try to access the web. They click the button >and nothing happens. > >What can I do to correct this for users of XP? > >Virginia > _____ > > strPath = " http://web.com/vr.asp?xml=orafin%2Stock= > > strFile = strPath & Me.StockNumber > > If Dir(strFile) = "" Then > strFile = strPath & Me.StockNumber > End If > > Call fHandleFile(strFile, WIN_MAX) >_______________________________________________ >AccessD mailing list >AccessD at databaseadvisors.com >http://databaseadvisors.com/mailman/listinfo/accessd >Website: http://www.databaseadvisors.com > > > -- Marty Connelly Victoria, B.C. Canada From clh at christopherhawkins.com Fri Jan 30 22:42:14 2004 From: clh at christopherhawkins.com (Christopher Hawkins) Date: Fri, 30 Jan 2004 21:42:14 -0700 Subject: [AccessD] A2003: Masked bitmaps as button images? Message-ID: <410-22004163144214150@christopherhawkins.com> All, I'm trying to create some pretty navigation buttons for a client. I have a great set of icons to use, but cannot figure out how to tell Access to render each icon's mask color as transparant. This works like a chamr in VB, of course - but I need it to work in Access as well! I thought that the ImageList controls might work, but then I discovered that although I can put my icons into the ImageList, I cannot assign those images to any of my buttons. I've got to be doing something wrong. There's no way these features aren't offered in Access. Heeeeeelp... -Christopher- From rl_stewart at highstream.net Fri Jan 30 23:36:38 2004 From: rl_stewart at highstream.net (Robert L. Stewart) Date: Fri, 30 Jan 2004 23:36:38 -0600 Subject: [AccessD] Re: This should be simple...but... In-Reply-To: <200401302027.i0UKRmm29485@databaseadvisors.com> Message-ID: <5.1.0.14.2.20040130233056.0195da68@pop3.highstream.net> John, Thanks. I try to do things in a very generic manner. It makes it very useable. I did figure out that you could use it to center also. Something like: CenteredValue: PadString(PadString("Name", 10, "R", "."),20 - len("Name"),"L",".") Should return something like: ......NAME...... Robert At 02:27 PM 1/30/2004 -0600, you wrote: >Date: Fri, 30 Jan 2004 14:47:32 -0500 >From: "John Clark" >Subject: [AccessD] Re: This should be simple...but... >To: >Message-ID: >Content-Type: text/plain; charset=US-ASCII > >This is pretty cool code. I thought about doing something like this, but >I thought it would be too 'difficult' or in-depth to make it worthwhile. >But, this is actually quite simple for what it accomplishes. > >I really didn't want to use a universal font, and although I agree >w/Rocky about the right justify, it just doesn't look right in this >case. I was going to do that though, until I got this code. > >Thanks Robert! This will be a keeper for me. > >John From rl_stewart at highstream.net Fri Jan 30 23:39:52 2004 From: rl_stewart at highstream.net (Robert L. Stewart) Date: Fri, 30 Jan 2004 23:39:52 -0600 Subject: [AccessD] Re: DatePart Question In-Reply-To: <200401302027.i0UKRmm29485@databaseadvisors.com> Message-ID: <5.1.0.14.2.20040130233712.01977120@pop3.highstream.net> Gina, What are you going to do when the year changes and you have data for 2 January's in 2 years? The year has to be part of what you us in the query. Try using the date dimension table technique I have been talking about and it will smooth things out for you and dates (well dates in the database anyway ;-)) ). Robert At 02:27 PM 1/30/2004 -0600, you wrote: >From: Gina Hoopes >To: AccessD at databaseadvisors.com >Date: Friday, January 30, 2004 1:26 PM >Subject: [AccessD] DatePart Question > > >This may be a dumb question, but here goes. I have a table full of data >that I need to query, and what I need returned is the data from last month. >If I query the Max on DatePart("m",PeriodEnd) on the data that's there now, >I get a 12 which is correct (from 12/31/03). But, next month we will have >added January '04 data, so the latest data in the PeriodEnd field will be >1/31/04, but when I query for just the month, am I going to get a 1? I >guess I'm asking if the Max function is still going to look at the whole >date and return just the DatePart of "m", or will 12 be considered alone, >and therefore greater than 1? > >I'm always open to an easier method, if you've got any ideas. > >Thanks, >Gina From Erwin.Craps at ithelps.be Sat Jan 31 02:56:08 2004 From: Erwin.Craps at ithelps.be (Erwin Craps - IT Helps) Date: Sat, 31 Jan 2004 09:56:08 +0100 Subject: [AccessD] OT - Friday Humor Message-ID: <46B976F2B698FF46A4FE7636509B22DF03D1B2@stekelbes.ithelps.local> I have mixed feelings... Is this funny or is this sad?! But it is healthy to laugh about your sad things, its a first step to improvement :-) Erwin -----Oorspronkelijk bericht----- Van: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] Namens Brett Barabash Verzonden: vrijdag 30 januari 2004 20:46 Aan: 'accessd at databaseadvisors.com' Onderwerp: [AccessD] OT - Friday Humor Just stumbled across this as a link from Joel on Software Funny because it is so true... http://neopoleon.com/blog/posts/434.aspx Brett Barabash, MCP Tappe Construction, Co. Eagan, MN bbarabash at tappeconstruction.com (651) 256-6831 "One thing a computer can do that most humans can't is be sealed up in a cardboard box and sit in a warehouse." -Jack Handey ------------------------------------------------------------------------ -------------------------------------------- This email and any files transmitted with it are confidential and intended solely for the use of the individual or entity to whom they are addressed. If you have received this email in error please notify the originator of the message. This footer also confirms that this email message has been scanned for the presence of computer viruses. Any views expressed in this message are those of the individual sender, except where the sender specifies and with authority, states them to be the views of Tappe Construction Co. Scanning of this message and addition of this footer is performed by SurfControl E-mail Filter software in conjunction with virus detection software. _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From gustav at cactus.dk Sat Jan 31 04:50:57 2004 From: gustav at cactus.dk (Gustav Brock) Date: Sat, 31 Jan 2004 11:50:57 +0100 Subject: [AccessD] DatePart Question In-Reply-To: References: Message-ID: <787082133.20040131115057@cactus.dk> Hi Gina > .. I have a table full of data that I need to query, and what I > need returned is the data from last month. Why not use DateDiff(): SELECT * FROM tblYourTable WHERE DateDiff("m",[PeriodEnd],Date())=1; /gustav From gustav at cactus.dk Sat Jan 31 05:54:44 2004 From: gustav at cactus.dk (Gustav Brock) Date: Sat, 31 Jan 2004 12:54:44 +0100 Subject: [AccessD] This should be simple...but... In-Reply-To: References: Message-ID: <13410909156.20040131125444@cactus.dk> Hi John > On a form I am working on, I am trying to provide 'leading dots', > between the label and text box. I want to make all labels equal by doing > this, which means some will have more or less dots than others. I > usually don't do this, because of what I am now experiencing; they don't > all line up. They are slightly off, but enough to notice. > EXAMPLE: (These are slightly off also) > Name ....................: > Address .................: > City ........................: > St ..........................: > Zip .........................: > Any ideas on this? Maybe even alternatives? Why not create a right justified label containing: .............................: Then duplicate this into all relevant positions. Finally, resize all labels with text to the width of the text plus a space and mark them as "Move to front". Of course, this technique won't work if the background "colour" of the text labels is transparent. On the other hand, any font can be selected for the text and a different font may be used for the punctuation. /gustav From andy at minstersystems.co.uk Sat Jan 31 09:08:34 2004 From: andy at minstersystems.co.uk (Andy Lacey) Date: Sat, 31 Jan 2004 15:08:34 -0000 Subject: [AccessD] Opening report on desired record In-Reply-To: <42162.12.3.132.98.1075496340.squirrel@heck.bay9.com> Message-ID: <01ab01c3e80c$18b85110$b274d0d5@minster33c3r25> Oleg Do something like this Dim stDocName As String Dim strSQL as string strSQL = "[employee name] = '" & Me!employeenumber stDocName = "Carol" DoCmd.OpenReport stDocName, acPreview, , strSQL However you seem to be comparing a field called Employee Number against a form control called EmployeeNumber. Did you mean to? Andy Lacey http://www.minstersystems.co.uk > -----Original Message----- > From: accessd-bounces at databaseadvisors.com > [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of > Oleg_123 at xuppa.com > Sent: 30 January 2004 20:59 > To: accessd at databaseadvisors.com > Subject: [AccessD] Opening report on desired record > > > Hey Group > > I have a form that opens report, and I'd like it open on the > record thats selected on the form. Bith are coming from the > same table. How can I do that ? (i am in access97) textbox is > called employeenumber > > > > Dim stDocName As String > > stDocName = "Carol" > DoCmd.OpenReport stDocName, acPreview > where stDocName![employee name] = Me.employeenumber.Text > > > ----------------------------------------- > Get Breaking News from CNN, ABC, NBC, CBS Now. > http://www.xuppa.com/news/?link=webmail > > > > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/a> ccessd > Website: > http://www.databaseadvisors.com > > From andy at minstersystems.co.uk Sat Jan 31 09:08:34 2004 From: andy at minstersystems.co.uk (Andy Lacey) Date: Sat, 31 Jan 2004 15:08:34 -0000 Subject: [AccessD] macro can't find function In-Reply-To: <41912.12.3.132.98.1075481192.squirrel@heck.bay9.com> Message-ID: <01ad01c3e80c$19312a90$b274d0d5@minster33c3r25> Well all I can think is a) rename the function (could BreakName possibly be a reserved word?) and/or b) decompile, repair etc to be sure it isn't just glitchy. Other than that I cn't see what the problem is. Andy Lacey http://www.minstersystems.co.uk > -----Original Message----- > From: accessd-bounces at databaseadvisors.com > [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of > Oleg_123 at xuppa.com > Sent: 30 January 2004 16:47 > To: accessd at databaseadvisors.com > Subject: RE: [AccessD] macro can't find function > > > still gives me the same error :--( > > > > > Beat me to it Lambert :-) > > > > Andy Lacey > > http://www.minstersystems.co.uk > > > >> -----Original Message----- > >> From: accessd-bounces at databaseadvisors.com > >> [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Heenan, > >> Lambert > >> Sent: 29 January 2004 17:08 > >> To: 'Access Developers discussion and problem solving' > >> Subject: RE: [AccessD] macro can't find function > >> > >> > >> I'd suggest you get rid of the space between "BreakName" and the > >> opening parentheses. > >> > >> Lambert > >> > >> > -----Original Message----- > >> > From: Oleg_123 at xuppa.com [SMTP:Oleg_123 at xuppa.com] > >> > Sent: Thursday, January 29, 2004 11:52 AM > >> > To: accessd at databaseadvisors.com > >> > Subject: RE: [AccessD] macro can't find function > >> > > >> > it's public (of course ;-) > >> > and this is how it looks -- BreakName () > >> > > >> > i decided to try to make that macro call another macro > >> which contains > >> > the function > >> > > >> > > Oleg > >> > > > >> > > In a macro the function has to be expressed as fn(), ie. > >> no = sign > >> > > before it but must have the parentheses. May be worth > >> checking. Oh > >> > > and the function must of course be Public. > >> > > > >> > > Andy Lacey > >> > > http://www.minstersystems.co.uk > >> > > > >> > >> -----Original Message----- > >> > >> From: accessd-bounces at databaseadvisors.com > >> > >> [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of > >> Oleg_123 at xuppa.com > >> > >> Sent: 29 January 2004 16:12 > >> > >> To: accessd at databaseadvisors.com > >> > >> Subject: RE: [AccessD] macro can't find function > >> > >> > >> > >> > >> > >> Group, > >> > >> > >> > >> I have a long macro that opens several queries, at the end its > >> suppose to RunCode - function, however it gives me an message "The > >> > >> expression you entered has a function name that xxx > can't find". > >> When I run that function separetely it works fine, and > >> the name is > >> > >> spelled correctly since i didn't type it but selected it using > >> their device what should i do ? > >> > >> > >> > >> > >> > >> ----------------------------------------- > >> > >> Get Breaking News from CNN, ABC, NBC, CBS Now. > >> > >> http://www.xuppa.com/news/?link=webmail > >> > >> > >> > >> > >> > >> > >> > >> _______________________________________________ > >> > >> AccessD mailing list > >> > >> AccessD at databaseadvisors.com > >> > >> http://databaseadvisors.com/mailman/listinfo/a> ccessd > >> > >> Website: > >> > >> http://www.databaseadvisors.com > >> > >> > >> > >> > >> > > > >> > > _______________________________________________ > >> > > AccessD mailing list > >> > > AccessD at databaseadvisors.com > >> > > http://databaseadvisors.com/mailman/listinfo/accessd > >> > > Website: http://www.databaseadvisors.com > >> > > >> > > >> > > >> > ----------------------------------------- > >> > Get Breaking News from CNN, ABC, NBC, CBS Now. > >> > http://www.xuppa.com/news/?link=webmail > >> > > >> > > >> > _______________________________________________ > >> > 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/a> ccessd > >> Website: > >> http://www.databaseadvisors.com > >> > >> > > > > _______________________________________________ > > AccessD mailing list > > AccessD at databaseadvisors.com > > http://databaseadvisors.com/mailman/listinfo/accessd > > Website: http://www.databaseadvisors.com > > > > ----------------------------------------- > Get Breaking News from CNN, ABC, NBC, CBS Now. > http://www.xuppa.com/news/?link=webmail > > > > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/a> ccessd > Website: > http://www.databaseadvisors.com > > From gustav at cactus.dk Sat Jan 31 09:50:59 2004 From: gustav at cactus.dk (Gustav Brock) Date: Sat, 31 Jan 2004 16:50:59 +0100 Subject: [AccessD] ER tools ... In-Reply-To: <009d01c2b92d$8e2b6270$8e01a8c0@Rock> References: <2F8793082E00D4119A1700B0D0216BF801D81D16@main2.marlow.com> <000c01c2b930$7cdcf760$eca39a44@tomvideo> <009d01c2b92d$8e2b6270$8e01a8c0@Rock> Message-ID: <9325083998.20040131165059@cactus.dk> Hi Arthur et all Another tool in the cheap category is Charonware CASE Studio 2: http://www.casestudio.com If you don't need reverse engineering, the Lite package will do at a very low price. Still, the Full package is not expensive. Both support Access and most of the major open source engines like MaxDB (SAP DB) and Firebird. Anyone having experience with this product? /gustav > Free: CoreModel > Cheap: DeZign > Pricey: ERwin, PowerDesigner > My personal fave at the moment is DeZign but I'm looking carefully at > CoreModel. None of my current clients can afford the pricey set of > alternatives, but in that set I really liked PowerDesigner. > Google the names and you'll be there in a second. > ----- Original Message ----- > From: "Tom Adams" > To: > Sent: Saturday, January 11, 2003 12:15 AM > Subject: [AccessD] ER tools ... >> Arthur said: >> >> I don't build any tables directly; always through an ER tool, >> >> Just found this. Can you give us your recommendations and any >> comments about those you don't recommend? >> >> Thanks - Tom From jwcolby at colbyconsulting.com Sat Jan 31 10:37:50 2004 From: jwcolby at colbyconsulting.com (John W. Colby) Date: Sat, 31 Jan 2004 11:37:50 -0500 Subject: [AccessD] Upsizing wizard Message-ID: I am trying to upsize a reasonably large database and four tables, two of which are main tables, failed to upsize (table skipped or export failed). Does the wizard provide any error log which would point me to the reason for the failure? John W. Colby www.ColbyConsulting.com From jwcolby at colbyconsulting.com Sat Jan 31 10:42:22 2004 From: jwcolby at colbyconsulting.com (John W. Colby) Date: Sat, 31 Jan 2004 11:42:22 -0500 Subject: [AccessD] Upsizing wizard In-Reply-To: Message-ID: Looking at the tables in SQL Server manager, the table structure made it out there, but no data which leads me to believe perhaps some data field caused the problem. Any thoughts? John W. Colby www.ColbyConsulting.com -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of John W. Colby Sent: Saturday, January 31, 2004 11:38 AM To: AccessD Subject: [AccessD] Upsizing wizard I am trying to upsize a reasonably large database and four tables, two of which are main tables, failed to upsize (table skipped or export failed). Does the wizard provide any error log which would point me to the reason for the failure? John W. Colby www.ColbyConsulting.com _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From mwp.reid at qub.ac.uk Sat Jan 31 11:41:25 2004 From: mwp.reid at qub.ac.uk (Martin Reid) Date: Sat, 31 Jan 2004 17:41:25 -0000 Subject: [AccessD] Upsizing wizard References: Message-ID: <002e01c3e821$7396e6e0$09f66e51@martin1> John As before it could be dates? Did you read the upsizing report? It should be saved int he same folder as the MDB file. I always use upsizing pro now before moving anything in an MDB file. Its more than worwth the $100 Martin ----- Original Message ----- From: "John W. Colby" To: "Access Developers discussion and problem solving" Sent: Saturday, January 31, 2004 4:42 PM Subject: RE: [AccessD] Upsizing wizard > Looking at the tables in SQL Server manager, the table structure made it out > there, but no data which leads me to believe perhaps some data field caused > the problem. Any thoughts? > > John W. Colby > www.ColbyConsulting.com > > -----Original Message----- > From: accessd-bounces at databaseadvisors.com > [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of John W. Colby > Sent: Saturday, January 31, 2004 11:38 AM > To: AccessD > Subject: [AccessD] Upsizing wizard > > > I am trying to upsize a reasonably large database and four tables, two of > which are main tables, failed to upsize (table skipped or export failed). > Does the wizard provide any error log which would point me to the reason for > the failure? > > John W. Colby > www.ColbyConsulting.com > > > _______________________________________________ > 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 > From gustav at cactus.dk Sat Jan 31 11:55:31 2004 From: gustav at cactus.dk (Gustav Brock) Date: Sat, 31 Jan 2004 18:55:31 +0100 Subject: [AccessD] Upsizing wizard In-Reply-To: References: Message-ID: <6232555932.20040131185531@cactus.dk> Hi John > I am trying to upsize a reasonably large database and four tables, two of > which are main tables, failed to upsize (table skipped or export failed). > Does the wizard provide any error log which would point me to the reason for > the failure? If only four tables, you could on behalf of us give Case Studio 2 a whirl (Full, not Lite): http://www.casestudio.com/enu/download.aspx The demo will handle six entities (tables) while handling all queries (views). Reverse engineering of an Access database requires a few selections. Watch this tiny avi movie to learn how: http://www.casestudio.com/download/movies/CS2_re_access.zip Of course, no data will be transferred; you'll have to do that afterwards. It could be interesting to know how a real life case is handled. /gustav From jwcolby at colbyconsulting.com Sat Jan 31 12:14:59 2004 From: jwcolby at colbyconsulting.com (John W. Colby) Date: Sat, 31 Jan 2004 13:14:59 -0500 Subject: [AccessD] Upsizing wizard In-Reply-To: <6232555932.20040131185531@cactus.dk> Message-ID: Since the structure was upsized, I went into the DTS and tried the import from there. In all cases so far, the problem has been data entry errors in date fields. Things like Disability dates of 1022 AD. Been disabled a LONG time, some of these folks! John W. Colby www.ColbyConsulting.com -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Gustav Brock Sent: Saturday, January 31, 2004 12:56 PM To: Access Developers discussion and problem solving Subject: Re: [AccessD] Upsizing wizard Hi John > I am trying to upsize a reasonably large database and four tables, two of > which are main tables, failed to upsize (table skipped or export failed). > Does the wizard provide any error log which would point me to the reason for > the failure? If only four tables, you could on behalf of us give Case Studio 2 a whirl (Full, not Lite): http://www.casestudio.com/enu/download.aspx The demo will handle six entities (tables) while handling all queries (views). Reverse engineering of an Access database requires a few selections. Watch this tiny avi movie to learn how: http://www.casestudio.com/download/movies/CS2_re_access.zip Of course, no data will be transferred; you'll have to do that afterwards. It could be interesting to know how a real life case is handled. /gustav _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From jwcolby at colbyconsulting.com Sat Jan 31 13:00:12 2004 From: jwcolby at colbyconsulting.com (John W. Colby) Date: Sat, 31 Jan 2004 14:00:12 -0500 Subject: [AccessD] Export query to SQL Server Message-ID: Is there a way to export an entire query to SQL Server? I don't want to have to go manually recreate my queries out there. John W. Colby www.ColbyConsulting.com From mwp.reid at qub.ac.uk Sat Jan 31 13:09:06 2004 From: mwp.reid at qub.ac.uk (Martin Reid) Date: Sat, 31 Jan 2004 19:09:06 -0000 Subject: [AccessD] Export query to SQL Server References: Message-ID: <000d01c3e82d$b44b1e20$09f66e51@martin1> John Only thos e the upsizing wiz will pick up the reszt I do manually usually creating stored procedures. Simly cut and paste the SQL into the Query Analyser and convert to a stored procedure. The QA will highligh the error lines for you. Slightly different version of SQL used. Access 2003 does a good job reporting non upsized queries which helps speed this up a bit. I have head of a tool called Proc Blaster. Not sure of the URL Martin ----- Original Message ----- From: "John W. Colby" To: "AccessD" Sent: Saturday, January 31, 2004 7:00 PM Subject: [AccessD] Export query to SQL Server > Is there a way to export an entire query to SQL Server? I don't want to > have to go manually recreate my queries out there. > > John W. Colby > www.ColbyConsulting.com > > > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com > From deanellis at iprimus.com.au Sat Jan 31 17:18:49 2004 From: deanellis at iprimus.com.au (Dean Ellis) Date: Sun, 1 Feb 2004 10:18:49 +1100 (AUS Eastern Daylight Time) Subject: [AccessD] Trapping Key STrokes Message-ID: <401C37D9.000008.02541@jedel> Good Morning (or Afternoon) Group. I am having some difficulty in trapping the CTRL ALT DEL keystroke in Access and VB. Can anyone help? The code so Far: Private Sub Form_Load() Me.KeyPreview = True End Sub ------------------------------------------ Private Sub Form_KeyDown(KeyCode As Integer, Shift As Integer) Select Case KeyCode Case (vbKeyControl + Alt + Del) SendKeys = "" MsgBox "Nope" End Select End Sub -------------------------------------------------- Thanks in Advance Cheers Dean From stuart at lexacorp.com.pg Sat Jan 31 17:48:15 2004 From: stuart at lexacorp.com.pg (Stuart McLachlan) Date: Sun, 01 Feb 2004 09:48:15 +1000 Subject: [AccessD] Trapping Key STrokes In-Reply-To: <401C37D9.000008.02541@jedel> Message-ID: <401CCB5F.23786.15F8F0@localhost> On 1 Feb 2004 at 10:18, Dean Ellis wrote: > Good Morning (or Afternoon) Group. > > I am having some difficulty in trapping the CTRL ALT DEL keystroke in Access > and VB. Can anyone help? > > The code so Far: > You're solution won't work - Ctrl+Alt+Del is trapped at a lower level. If you are still using Win9X, there are ways to do it (you fool Windows into thinking that a screensaver is running), but that doesn't work on NT,2K or XP. It would be possible by writing your own GINA, but I really don't think you want to go there. That's certainly not an Access or VB solution. Take a look at (watch for linew wrap) http://msdn.microsoft.com/library/default.asp?url=/library/en-us/security/security/winlogon_and_gina.asp One possible commercial solution is: "KeyboardControl Software Development Kit allows your Win32 applications to filter out any keystroke or combination keystroke such as PrintScreen, Alt+Tab, Alt+F4, Ctrl+Tab, Ctrl+Alt+Del, Alt+Esc, Ctrl+F4, etc. on all versions of Windows including Windows 95/98/Me and Windows NT/2000/XP" See http://www.meliorasoft.com/kits/keyboard/index.htm -- Lexacorp Ltd http://www.lexacorp.com.pg Information Technology Consultancy, Software Development,System Support. From stuart at lexacorp.com.pg Sat Jan 31 17:50:32 2004 From: stuart at lexacorp.com.pg (Stuart McLachlan) Date: Sun, 01 Feb 2004 09:50:32 +1000 Subject: [AccessD] Export query to SQL Server In-Reply-To: Message-ID: <401CCBE8.5785.181008@localhost> On 31 Jan 2004 at 14:00, John W. Colby wrote: > Is there a way to export an entire query to SQL Server? I don't want to > have to go manually recreate my queries out there. > Open the Access query in SQL view and then copy/paste? It will often take a fair bit of editing afterwards though. -- Lexacorp Ltd http://www.lexacorp.com.pg Information Technology Consultancy, Software Development,System Support. From jwcolby at colbyconsulting.com Sat Jan 31 18:02:00 2004 From: jwcolby at colbyconsulting.com (John W. Colby) Date: Sat, 31 Jan 2004 19:02:00 -0500 Subject: [AccessD] Export query to SQL Server In-Reply-To: <000d01c3e82d$b44b1e20$09f66e51@martin1> Message-ID: So the idea is to move the tables back into a copy of the FE and upsize the whole? John W. Colby www.ColbyConsulting.com -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Martin Reid Sent: Saturday, January 31, 2004 2:09 PM To: Access Developers discussion and problem solving Subject: Re: [AccessD] Export query to SQL Server John Only thos e the upsizing wiz will pick up the reszt I do manually usually creating stored procedures. Simly cut and paste the SQL into the Query Analyser and convert to a stored procedure. The QA will highligh the error lines for you. Slightly different version of SQL used. Access 2003 does a good job reporting non upsized queries which helps speed this up a bit. I have head of a tool called Proc Blaster. Not sure of the URL Martin ----- Original Message ----- From: "John W. Colby" To: "AccessD" Sent: Saturday, January 31, 2004 7:00 PM Subject: [AccessD] Export query to SQL Server > Is there a way to export an entire query to SQL Server? I don't want to > have to go manually recreate my queries out there. > > John W. Colby > www.ColbyConsulting.com > > > _______________________________________________ > 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 From jwcolby at colbyconsulting.com Sat Jan 31 19:44:31 2004 From: jwcolby at colbyconsulting.com (John W. Colby) Date: Sat, 31 Jan 2004 20:44:31 -0500 Subject: [AccessD] SQL Server queries - appending strings Message-ID: In Access I often do things in queries like: [LastName] & ", " & [FirstName] This appears to be bad syntax in SQL Server. Is there an equivalent? John W. Colby www.ColbyConsulting.com From jmoss111 at bellsouth.net Sat Jan 31 22:03:24 2004 From: jmoss111 at bellsouth.net (JMoss) Date: Sat, 31 Jan 2004 20:03:24 -0800 Subject: [AccessD] SQL Server queries - appending strings References: Message-ID: <000501c3e878$56a7c160$75a09a44@bitchamq5cupg3> John, Lose the brackets and substitute + for & and ' for ". Jim ----- Original Message ----- From: "John W. Colby" To: "SQLServer" ; "AccessD" Sent: Saturday, January 31, 2004 5:44 PM Subject: [AccessD] SQL Server queries - appending strings > In Access I often do things in queries like: [LastName] & ", " & [FirstName] > > This appears to be bad syntax in SQL Server. Is there an equivalent? > > John W. Colby > www.ColbyConsulting.com > > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com > From stuart at lexacorp.com.pg Sat Jan 31 19:59:23 2004 From: stuart at lexacorp.com.pg (Stuart McLachlan) Date: Sun, 01 Feb 2004 11:59:23 +1000 Subject: [AccessD] SQL Server queries - appending strings In-Reply-To: Message-ID: <401CEA1B.21659.8E078E@localhost> On 31 Jan 2004 at 20:44, John W. Colby wrote: > In Access I often do things in queries like: [LastName] & ", " & [FirstName] > > This appears to be bad syntax in SQL Server. Is there an equivalent? > Lastname + ', ' + FirstName Text delimiters are single quotes. String concatenation uses "+". "&" performs an AND logical bitwise comparison. -- Lexacorp Ltd http://www.lexacorp.com.pg Information Technology Consultancy, Software Development,System Support. From jwcolby at colbyconsulting.com Sat Jan 31 20:27:35 2004 From: jwcolby at colbyconsulting.com (John W. Colby) Date: Sat, 31 Jan 2004 21:27:35 -0500 Subject: [AccessD] was SQL Server queries - appending strings In-Reply-To: <401CEA1B.21659.8E078E@localhost> Message-ID: Thanks both of you. I have a client that purchased SQL Server and so it's time to get off the dime and learn this stuff. The client uses A2K. Now that I am changing to SQL Server I have to get the server doing more of the work - the whole point is of course to speed things up. For technical reasons (a whole SLEW of reasons) going to an ADP is NOT an option any time in the near future, if at all. I have a main tabbed form which uses a multi-table join to get live data from a client / claim . The client wanted it that way so that the user could edit fields in either table. Views appear to be similar to tables, i.e. I can link to them and they show up in the table window. Is there a way to pass parameters to them? "Where LastName like col*" etc? ATM, I pull the whole recordset and then filter down to a single record. Not fast, but after the initial pull the filter proceeds at a reasonable rate. I can then "filter" to a specific claim reasonably fast. I would like to change this to actually ask SQL Server for a view of exactly one record each time they want to see a claim. Thus avoiding the "pull the entire recordset across the net, now pull the index, etc. This must be editable so AFAIK I cannot use stored procedures which would allow passing parameters. Because this is A2K AFAIK I cannot assign a recordset to the form's recordsource property. What are my options here? Do I have any? John W. Colby www.ColbyConsulting.com -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Stuart McLachlan Sent: Saturday, January 31, 2004 8:59 PM To: Access Developers discussion and problem solving Subject: Re: [AccessD] SQL Server queries - appending strings On 31 Jan 2004 at 20:44, John W. Colby wrote: > In Access I often do things in queries like: [LastName] & ", " & [FirstName] > > This appears to be bad syntax in SQL Server. Is there an equivalent? > Lastname + ', ' + FirstName Text delimiters are single quotes. String concatenation uses "+". "&" performs an AND logical bitwise comparison. -- Lexacorp Ltd http://www.lexacorp.com.pg Information Technology Consultancy, Software Development,System Support. _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From jwcolby at colbyconsulting.com Sat Jan 31 19:44:31 2004 From: jwcolby at colbyconsulting.com (John W. Colby) Date: Sat, 31 Jan 2004 20:44:31 -0500 Subject: [AccessD] [dba-SQLServer]SQL Server queries - appending strings Message-ID: In Access I often do things in queries like: [LastName] & ", " & [FirstName] This appears to be bad syntax in SQL Server. Is there an equivalent? John W. Colby www.ColbyConsulting.com _______________________________________________ dba-SQLServer mailing list dba-SQLServer at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/dba-sqlserver http://www.databaseadvisors.com